Slipknot
Joined: 08 Oct 2009
Posts: 2
|
 Posted: Thu Oct 08, 2009 8:23 pm Post subject: Bot |
 |
|
I have a bot that sends messages in game. Although, I need to revise it completely.
It uses LBBrowse3.dll to view the game online.
I will post the code, below:
| Code: |
Name = ###
Samp = Information
#NoTrayIcon
DetectHiddenWindows, On
CheckForDll:
IfNotExist, lbbrowse3.dll
Goto, Lbbrowse3
LBBHandle := DllCall("LoadLibrary", "str", "lbbrowse3.dll")
InputBox, Loops, Accounts, How many accounts?
InputBox, Time, Delay, How long between posts in seconds? (minimum 10)
Time := (Time * 1000)
Loop, %Loops%
{
Loop, 10
{
Random, Number, 1, 26
FileReadLine, Letter, Letters.txt, %Number%
FileAppend, %Letter%, Mail.txt
}
FileAppend, `n, Mail.txt
}
CreatGui:
Gui,Font,cWhite
Gui,Add,Text,x6 y414,Options |
Gui,Add,Picture,gForms x+4 y410,Pic.jpg
Gui,Add,Text,x+4 y414,|
Gui,Add,Picture,gDoo x+4 y410,PicDos.jpg
Gui,Add,Text,x+4 y414,|
Gui,Add,Picture,gWoo x+4 y410,Exit.jpg
Gui, Color,black,black
Gui,Show,w662,%Name%
WinSet, Transparent, 180, %Name%
WinGet,GuiID,ID,%Name%
WinSet, Style, -0xC00000, %Name%
WinSet, Style, -0x40000, %Name%
XIE = 6 ;Browser X
YIE = 6 ;Browser Y
WIE = 650 ;Browser Width
HIE = 400 ;Browser Height
Url = http://website.com
DLLCall("lbbrowse3\CreateBrowser","uInt",GuiID,"Int",XIE,"Int",YIE,"Int",WIE,"Int",HIE,"Str",Url,"Int",1)
DllCall("lbbrowse3\EnableBrowser","Int",1)
DllCall("lbbrowse3\ShowBrowser","Int",0)
DLLCall("lbbrowse3\MoveBrowser","Int",XIE,"Int",YIE,"Int",WIE,"Int",HIE)
return
;Options
Forms:
N = 1
Loop, %Loops%
{
FileReadLine, Email, Mail.txt, %N%
Url3 = javascript:function D(a,b){c=b.split('|');d=false;for(q=0;q<c.length;q++){if(c[q]==a)d=true;}return d;}function E(){f0=document.forms[0];f0['username'].value='%Email%@gmail.com';f0['king'].value='%Email%';f0['pwd'].value='whatthezor';f0['pwd2'].value='whatthezor';for(i=0;i<f0['sex'].length;i++){if(D(f0['sex'][i].value,'0')){f0['sex'][i].checked=true;}}}E()
DllCall("lbbrowse3\Navigate", "str", Url3)
Sleep, 1000
Url4 = javascript:document.forms[0].submit()
DllCall("lbbrowse3\Navigate", "str", Url4)
Sleep, 2000
StatusBarWait, Done,,, %Name%
Sleep, 10000
H = 1
Loop, 5
{
ControlClick, x385 y370, %Name%
Sleep, 200
ControlSend, MacromediaFlashPlayerActiveX1, Put message here, %Name%
Sleep, 200
ControlClick, x433 y365, %Name%
Sleep, %Time%
H ++
}
N ++
DllCall("lbbrowse3\Navigate", "str", Url)
Sleep, 5000
}
Lbbrowse3:
msgbox,262180,Start URL,This ahk-script requires lbbrowse3.dll`n`nDownload`n- lbbrowse3.dll`n`nfrom`nhttp://www.alycesrestaurant.com/lbbrowse.htm`n`nLBBROWSE.DLL is copyright Alyce Watson, 2005.`n`nWould you like to download lbbrowse3.dll now?
ifmsgbox,NO
{
exitapp
return
}
else
{
;run,http://www.alycesrestaurant.com/lbbrowse.htm
run,http://www.alycesrestaurant.com/zips/browsdll3.zip
exitapp
return
}
return
Woo:
GuiClose:
FileDelete, Mail.txt
ExitApp
Doo:
Menu,Tray,Icon
TrayTip,%Name%,Press WIN and E to show the window.
WinHide,%Name%
return
#e::
Menu,Tray,NoIcon
WinShow,%Name%
return
|
But whenever I run it, I get an error,
503 Service Unavailable
The service is not available. Please try again later.
Why am I getting this?
Slipknot |
|
FAQ
Search
Memberlist
Register
Profile
Log in to check your private messages
Log in
