Sign in to follow this  
Followers 0
alex OF DEATH

USB Missile Launcher

5 posts in this topic

I maded a program to shoot missiles at people when they touch your computer.

Only does something if you own a USB missile launcher.

Which is This thing: http://www.thinkgeek.com/geektoys/warfare/86b8/

Use the resolution 1280, 1024 to make sure nothing messes up, but it has worked on some 1440, ???? resolution.

Uses the original UI for the missile launcher, so if you have a custom one, don't bother.

Warning: mouse WILL GET STUCK in top left corner after all three missiles fired.

Hit the "q" key at any time to exit the program.

It's still a work in progress, but the general use works. (adding changeable exit key, and a GUI with some extra options, general improvements to missile launching sequence)

http://www.1337planet.net/Missile%20Security.zip

#include <Misc.au3>
#cs ----------------------------------------------------------------------------

AutoIt Version: 3.2.1.14 (beta)
Author: Alex
Comment(?) All GUI pieces made with Koda GUI generator. Though there are none yet.
Description: Launches Missiles at intrudars!

#ce ----------------------------------------------------------------------------
$Program = 0 ;Sets program not running
$Count = 0 ;Sets zero missiles launched
$suspendvar = 0 ;When this goes to one, stop first loop and go to the other one.

HotKeySet ( "q", "Terminate" ) ;Set Key "q" to undo Mouse Trap (and Exit program)

do ;loop

$pos = MouseGetPos()
Sleep(200)

If WinExists ( "Missile Launcher") = 1 then $Program = 1 & WinActivate ( "Missile Launcher", "Missile Launcher" ) ; If Program open, set $program to 1 and activate it (so it's on top)
If winexists ( "Missile Launcher" ) = 0 then $program = 0
If $Program = 0 then RunProg() ;If Program not open, open it.
If $pos[0] <> MouseGetPos(0) Or $pos[1] <> MouseGetPos(1) Then Attack() ;$pos[0] greater than or less than previous value, go to attack()
until $suspendvar = 1 ;If launched more than two missiles, Stop this loop

while $suspendvar = 1 ;More than three missiles fired, so loop this now.
If $count > 2 then Suspend() ; If all missiles launched, trap mouse
WEnd ;end loop.

Func RunProg()
Run ( @ProgramFilesDir & "\USB Missile Launcher\Missile_Launcher.exe" ) ;runs missile program
$Program = 1 ; Sets program as open
WinActivate ( "Missile Launcher", "Missile Launcher" )
WinMove ( "Missile Launcher", "", 296, 291 )
EndFunc

Func Attack()
sleep (400)
WinActivate ( "Missile Launcher" ) ;Activates Missile launcher window (so it's on top)
WinMove ( "Missile Launcher", "", 296, 291 )
MouseClick ( "left" , 775, 621 ) ;Changing this to hit enter later
$count = $count + 1 ; Add one to $count, because one missile launched
If $count > 2 then $Suspendvar = 1
endfunc

Func Suspend()
_MouseTrap ( 1, 1, 1, 1 ) ;Trap teh mouse after all missiles fired
Endfunc

Func Terminate()
_MouseTrap() ;Disables MouseTrap
Exit 0 ;Exits
EndFunc

Share this post


Link to post
Share on other sites



AHAHAHAHAH! Fantastic! :whistle:


Console Browse: Navigate on the WEB in a textual consoleMultiPing!: Show computer on the lan and/or show the local/remote task, ALL animated!KillaWin: Event executingCryptPage: Crypt your webpage and show only with key

Share this post


Link to post
Share on other sites

If anyone here has a missile launcher, test it on your resolution and stuff and post if it works. If possible, fix it :\


Share this post


Link to post
Share on other sites

lol u've freakin convinced me to order a missile launcher just to try the script....its being shipped right now.... :whistle::P

Share this post


Link to post
Share on other sites

you HOW DARE YOU look at what im ordering now...

Anti-gravity Globe$79.99

Bawls Mints - High Caffeine Candy

$2.99

Foosh Energy Mints

$3.49

HomePlug AC-Power Network Extender

$49.99

x2

$99.98

Ironkey - usb (auto destruct + encryption)

$109.00

Micro Spy Remote

$8.99

Primer Caffeinated Breath Spray

$8.99

Roll-Up Keyboard

$23.99

Shower Shock Caffeine Soap Travel

$7.99

Skype Speakerphone

$9.99

The ThinkGeek Annoy-a-tron

$9.99

Touchscreen Cell Phone/PDA Wristwatch

$199.99

TV-B-Gone

$18.99

USB Memory Watch

$39.99

USB Rocket Launcher

$34.99

Sub Total

$659.35

----------------------------------

lol.....i thought i was a nerd before


Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0