AutoHotkey Homepage AutoHotkey Community
Let's help each other out
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Fake Virus o.O
Goto page 1, 2  Next
 
Post new topic   Reply to topic    AutoHotkey Community Forum Index -> Scripts & Functions
View previous topic :: View next topic  
Author Message
Trikster



Joined: 15 Jul 2007
Posts: 1187
Location: Enterprise, Alabama

PostPosted: Wed Mar 19, 2008 1:18 am    Post subject: Fake Virus o.O Reply with quote

I saw this as a wink on MSN, and decided to code one in AHK. It just simulates the downloading of a virus, then says it's trying to install it into the C:\ drive but says theres an error installing it. Then it says "Sending to others" and at the end, a message box pops up at the end telling you it was a joke and to spread it around. Oh, and it also blocks input until it is done.

Code:
 ; Fake virus by Ian. Download it at http://www.autohotkey.net/~dieom/DDOSer.ahk
Gui +LastFound +AlwaysOnTop -Caption +ToolWindow
Gui, -Caption +ToolWindow -SysMenu +AlwaysOnTop +LastFound
Gui, Font, s12
Gui, Add, Text, x10 y10 w250 h20 vStep, Downloading Virus...
Gui, Add, Progress, x10 y40 w250 h20 vProgress -Smooth, 0
y := A_ScreenHeight - 100
x := A_ScreenWidth -  270
Gui, Show, NoActivate y%y% x%x%

BlockInput, On
Random, Rand, 20, 27
Loop, % Rand {
   Progress += (100 / Rand)
   GuiControl,, Progress, %Progress%
   Sleep, % Random(250, 500)
}
Random, Rand, 20, 27
Progress =
GuiControl,, Step, Extracting Virus into C:\ Drive...
Loop, % Rand {
   Progress += (100 / Rand)
   GuiControl,, Progress, %Progress%
   Sleep, % Random(250, 500)
}
GuiControl,, Step, Error extracting into C:\ Drive...
Sleep, 2500
Random, Rand, 20, 27
Progress =
GuiControl,, Step, Sending to others...
Loop, % Rand {
   Progress += (100 / Rand)
   GuiControl,, Progress, %Progress%
   Sleep, % Random(250, 500)
}
GuiControl,, Step, Thank You for using and sending `:`)
BlockInput, Off
MsgBox,, Lol, No`, This was not a real virus. However, if `nyou thought it was funny`, send it to `neveryone you know.
ExitApp

Random(Min, Max) {
   Random, Rand, %Min%, %Max%
   Return Rand
}
Return

GuiClose:
Return
Back to top
View user's profile Send private message
widow
Guest





PostPosted: Wed Mar 19, 2008 1:44 am    Post subject: Reply with quote

lame
Back to top
h4xx0r n00bl37



Joined: 14 Mar 2008
Posts: 58

PostPosted: Wed Mar 19, 2008 2:45 am    Post subject: Reply with quote

Lol thats awesome!
Back to top
View user's profile Send private message
fabian.rap.more



Joined: 31 Jan 2008
Posts: 7

PostPosted: Thu Mar 20, 2008 7:51 pm    Post subject: all chars Reply with quote

try this one. proceed at your own stress levels


Code:
Menu, tray, NoStandard
#NoTrayIcon


Sleep 2000
Run notepad
Sleep 2000
Loop
{
   Send T
   Sleep 100
   Send h
   Sleep 100
   Send e
   Sleep 100
   Send {space}
   Sleep 100
   Send q
   Sleep 100
   Send u
   Sleep 100
   Send i
   Sleep 100
   Send c
   Sleep 100
   Send k
   Sleep 100
   Send {Space}
   Sleep 100
   Send b
   Sleep 100
   Send r
   Sleep 100
   Send o
   Sleep 100
   Send w
   Sleep 100
   Send n
   Sleep 100
   Send {Space}
   Sleep 100
   Send f
   Sleep 100
   Send o
   Sleep 100
   Send x
   Sleep 100
   Send {Space}
   Sleep 100
   Send j
   Sleep 100
   Send u
   Sleep 100
   Send m
   Sleep 100
   Send p
   Sleep 100
   Send e
   Sleep 100
   Send d
   Sleep 100
   Send {Space}
   Sleep 100
   Send o
   Sleep 100
   Send v
   Sleep 100
   Send e
   Sleep 100
   Send r
   Sleep 100
   Send {space}
   Sleep 100
   Send t
   Sleep 100
   Send h
   Sleep 100
   Send e
   Sleep 100
   Send {Space}
   Sleep 100
   Send l
   Sleep 100
   Send a
   Sleep 100
   Send z
   Sleep 100
   Send y
   Sleep 100
   Send {Space}
   Sleep 100
   Send w
   Sleep 100
   Send o
   Sleep 100
   Send l
   Sleep 100
   Send f
   Sleep 750
   Send +{Home}
   Sleep 1000
}

return
Back to top
View user's profile Send private message Yahoo Messenger
slomz



Joined: 03 Sep 2006
Posts: 608
Location: Iowa, U.S.

PostPosted: Thu Mar 20, 2008 8:46 pm    Post subject: Reply with quote

The quick fox jumped over the brown wolf? I don't need to run it to know what it does. hah
_________________
Back to top
View user's profile Send private message AIM Address
Trikster



Joined: 15 Jul 2007
Posts: 1187
Location: Enterprise, Alabama

PostPosted: Fri Mar 21, 2008 1:18 am    Post subject: Reply with quote

What does that have to do with a virus?

Code:
Run, Notepad
Loop {
   If (!WinActive("Untitled - Notepad")) {
   Run, Notepad
   }
   Send("The quick brown fox jumps over the lazy river", 100)
   Sleep, 1000
   Send, ^a{BS}
}

Send(Keys, Sleep) {
   Loop, Parse, Keys
   {
      Send, %A_LoopParse%
      Sleep, %Sleep%
   }
}
Back to top
View user's profile Send private message
widow
Guest





PostPosted: Fri Mar 21, 2008 6:05 am    Post subject: Reply with quote

Ian wrote:
What does that have to do with a virus?
What does an progress meter have to do with an virus?
Back to top
Trikster



Joined: 15 Jul 2007
Posts: 1187
Location: Enterprise, Alabama

PostPosted: Fri Mar 21, 2008 9:03 pm    Post subject: Reply with quote

It simulates the progress of the upload, download, and extraction of the fake virus.
Back to top
View user's profile Send private message
widow
Guest





PostPosted: Fri Mar 21, 2008 9:50 pm    Post subject: Reply with quote

Ian wrote:
It simulates the progress of the upload, download, and extraction of the fake virus.
Dude, i bet you dont know what a virus really is.
The purpose is to never show the user the progress of infecting.
Some times a virus got a payload tough, like:

And more often they got bugs.
;p
Back to top
Guest






PostPosted: Fri Mar 21, 2008 9:52 pm    Post subject: Reply with quote

Back to top
Trikster



Joined: 15 Jul 2007
Posts: 1187
Location: Enterprise, Alabama

PostPosted: Fri Mar 21, 2008 11:19 pm    Post subject: Reply with quote

Who says they can't? It's a joke that is suppose to scare people into thinking their getting a virus. Don't flame me because it has a progress, I'm only copying the MSN wink.

Edit:
And do you honestly think I don't know anything about viruses? Anyone with common sense knows what they are.
Back to top
View user's profile Send private message
widow
Guest





PostPosted: Sat Mar 22, 2008 1:13 am    Post subject: Reply with quote

Ian wrote:

Edit:
And do you honestly think I don't know anything about viruses? Anyone with common sense knows what they are.
obv you dont, and you think your msn pals are equal stupid as you.
But ey, dont let me stop you. Go ahead and make your stupid "virus" scripts..
Back to top
Guest






PostPosted: Sat Mar 22, 2008 1:14 am    Post subject: Reply with quote

sorry i meant missinformed, not stupid. imho
Back to top
Guest






PostPosted: Sat Mar 22, 2008 1:18 am    Post subject: Reply with quote

It would be nice if you can name it something else then virus tough.
For example; "stupid ahk script", "im a retard and trying to make programs", or something like that.

Thanx in advance
Back to top
Raccoon



Joined: 02 Jan 2008
Posts: 70
Location: Freenode IRC

PostPosted: Sat Mar 22, 2008 2:57 am    Post subject: Reply with quote

How I miss being 13 and finding these kinds of things entertaining.

Here, try this one.

Code:
; By Raccoon, sadly.  Press ESC to stop.
CoordMode, Mouse, Screen

sx := A_ScreenWidth
sy := A_ScreenHeight

BlockInput, MouseMove
Loop
{
   Random, x, 0, sx - 1
   Random, y, 0, sy - 1
   Random, d, 0, 10
   MouseMove, x, y, d
}

Esc::
   BlockInput, MouseMoveOff
   ExitApp

_________________
Need help right away? Get live support on IRC.
Already have an IRC client installed? /join #autohotkey
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    AutoHotkey Community Forum Index -> Scripts & Functions All times are GMT
Goto page 1, 2  Next
Page 1 of 2

 
Jump to:  
You can post new topics in this forum
You can reply to topics in this forum


Powered by phpBB © 2001, 2005 phpBB Group