|
You last visited: Today at 17:51
Advertisement
writing a own bot question
Discussion on writing a own bot question within the Perfect World forum part of the MMORPGs category.
04/21/2010, 20:46
|
#1
|
elite*gold: 18
Join Date: Jun 2009
Posts: 1,213
Received Thanks: 56
|
writing a own bot question
hi people i have some questions xD.
1 I plan to write with AutoIT a simple perfect world international bot. i have Basic knowledge with AutoIT and it would be a realy simple bot nothing complicated or other difficult things, know my question have i need to know something importent if i write my bot ?
2 This bot would be only for me and im a bit afraid to use this bot because i think the gms are very very active and detect me if i use my bot so how big is the chance that they detect my bot ? And if they detect me is only the Charackter banned oder the full Account?
Thanks alot for your help and sry for my bad english
|
|
|
04/23/2010, 22:31
|
#2
|
elite*gold: 0
Join Date: Jan 2008
Posts: 138
Received Thanks: 18
|
if the gm detect you or not, its a matter of luck and how the bot works, you have to make it "act naturaly". If they ban you, they´ll ban the account, not only the character, good luck with that :P
|
|
|
04/27/2010, 17:06
|
#3
|
elite*gold: 18
Join Date: Jun 2009
Posts: 1,213
Received Thanks: 56
|
k and its a permanent ban or a 3 day ban ?
and which class is good for a bot ?
|
|
|
07/03/2010, 14:01
|
#4
|
elite*gold: 0
Join Date: Feb 2009
Posts: 9
Received Thanks: 0
|
hi there, i've written a little autoit3 bot to, it will only work if you've got the game selected, you can add the numbers/Fbuttons you want for what skills,
info: when you can click at the start bot button, dont click at it yet, but press alt+1 on the spot at your hpbar where you want the autohppot to work, same for mp only with alt+2, for the pet is it alt+3, than press alt+4 in the screen of your pet, so it drinks some water if its not sastefied anymore, and as last but not least you'll have to press alt+5 at the left end of the hpbar of a monster, then press start and it will start botting
grz,
djekkoo
Quote:
#region pwibot
func pwibot()
if $Bstate = "OFF" then
fillin()
else
FMM()
EndIf
EndFunc
func FMM()
#Region ### START Koda GUI section ### Form=
$Form2 = GUICreate("Form1", 225, 139, 250, 374)
GUISetBkColor(0xB9D1EA)
$MyButton1 = GUICtrlCreateButton("Exit", 120, 104, 100, 30,0)
$MyButton2 = GUICtrlCreateButton("start bot", 64, 32, 100, 30, 0)
$MyButton3 = GUICtrlCreateButton("Main Menu", 8, 104, 100, 30, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
HotKeySet("!1", "_getHp")
hotkeyset("!2", "_getMp")
hotkeyset("!3", "_getP")
hotkeyset("!4","_getPS")
hotkeyset("!5","_getO")
hotkeyset("!0","_botpause")
$pwidata1 = iniread("C:\masterpiece\mp.ini","PWI","AS1","")
$pwidata2 = iniread("C:\masterpiece\mp.ini","PWI","AS2","")
$pwidata3 = iniread("C:\masterpiece\mp.ini","PWI","HP","")
$pwidata4 = iniread("C:\masterpiece\mp.ini","PWI","MP","")
$pwidata5 = iniread("C:\masterpiece\mp.ini","PWI","PetHP","")
$pwidata6 = iniread("C:\masterpiece\mp.ini","PWI","PetFOOD","" )
$pwidata7 = iniread("C:\masterpiece\mp.ini","PWI","PICK","")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
case $Mybutton2
$pwiloop = 0
$pwiloop2 = 1
$rungpwi = 1
do
if $rungpwi = 1 then
guictrlsetdata($Mybutton2,"botting...")
if $pwiloop2 = 1 then
do
If _getCurrentColorH( $xH, $yH) <> $colorH Then
WinWaitActive("Element Client")
Send($pwidata3)
EndIf
if _getcurrentcolorM($xM, $yM) <> $colorM Then
WinWaitActive("Element Client")
Send($pwidata4)
endif
if _getcurrentcolorP( $xP, $yP) <> $colorP Then
WinWaitActive("Element Client")
Send($pwidata5)
endif
if _getcurrentcolorPS($XPS, $YPS) <> $colorPS Then
winwaitactive("Element Client")
Send($pwidata6)
EndIf
if $Rungpwi = 0 Then
guictrlsetdata($Mybutton2,"Start bot")
winsetstate($form2,"",@sw_hide)
do
sleep(1)
until $rungpwi = 1
FMM()
EndIf
WinWaitActive("Element Client")
send($pwidata7)
WinWaitActive("Element Client")
send($pwidata1)
WinWaitActive("Element Client")
send($pwidata7)
winWaitActive("Element Client")
send($pwidata2)
global $escape = _getcurrentcolorO( $xO, $yO)
until $escape <> $colorO
WinWaitActive("Element Client")
send ($pwidata7)
sleep (800)
WinWaitActive("Element Client")
send ($pwidata7)
sleep(300)
WinWaitActive("Element Client")
send ("{tab}")
guictrlsetdata($Mybutton2,"start bot")
EndIf
EndIf
until $pwiloop = 1
case $mybutton1
exifc()
case $mybutton3
winsetstate($form2,"",@sw_hide)
dmm()
EndSwitch
WEnd
EndFunc
func fillin()
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("start pwi bot", 316, 219, 193, 125)
GUISetBkColor(0xB9D1EA)
$Input1 = GUICtrlCreateInput("Attack skill 1", 8, 16, 121, 21)
$Input2 = GUICtrlCreateInput("Attack skill 2", 8, 40, 121, 21)
$Input3 = GUICtrlCreateInput("Heal HP", 8, 64, 121, 21)
$Input4 = GUICtrlCreateInput("Heal MP", 8, 88, 121, 21)
$Input5 = GUICtrlCreateInput("Heal PET", 8, 112, 121, 21)
$Input6 = GUICtrlCreateInput("Feed pet, with water, etc", 8, 136, 121, 21)
$Input7 = GUICtrlCreateInput("pickup", 8, 160, 121, 21)
$MyButton1 = GUICtrlCreateButton("Confirm", 184, 16, 100, 30, 0)
$MyButton2 = GUICtrlCreateButton("exit", 184, 72, 100, 30, 0)
$MyButton3 = GUICtrlCreateButton("Main Menu", 184, 128, 100, 30, 0)
$Label1 = GUICtrlCreateLabel("To enter another character that is not a letter or a number youll have to do it like this: {enter} or {F2}", 136, 168, 172, 41)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
case $Mybutton2
Exifc()
case $mybutton3
winsetstate($form1,"",@sw_hide)
DMM()
case $mybutton1
global $inp1 = guictrlread($input1)
global $inp2 = guictrlread($input2)
global $inp3 = guictrlread($input3)
global $inp4 = guictrlread($input4)
global $inp5 = guictrlread($input5)
global $inp6 = guictrlread($input6)
global $inp7 = guictrlread($input7)
iniwrite("C:\masterpiece\MP.ini","PWI","AS1",$inp1 )
iniwrite("C:\masterpiece\MP.ini","PWI","AS2",$inp2 )
iniwrite("C:\masterpiece\MP.ini","PWI","HP",$inp3)
iniwrite("C:\masterpiece\MP.ini","PWI","MP",$inp4)
iniwrite("C:\masterpiece\MP.ini","PWI","PetHP",$in p5)
iniwrite("C:\masterpiece\MP.ini","PWI","PetFOOD",$ inp6)
iniwrite("C:\masterpiece\MP.ini","PWI","PICK",$inp 7)
iniwrite("C:\masterpiece\MP.ini","PWI","state","ON ")
FMM()
EndSwitch
WEnd
endfunc
func _getps()
global $coordPS = mousegetpos()
global $XPS = $coordPS[0]
global $YPS = $coordPS[1]
global $colorPS = hex(pixelgetcolor( $XPS, $YPS), 6)
EndFunc
func _getcurrentcolorPS($xPSDEF, $YPSDEF)
global $newcolorPS = hex(pixelgetcolor($XPSDEF, $YPSDEF),6)
return( $newcolorPS)
EndFunc
Func _getHp()
global $coordH = MouseGetPos()
global $xH = $coordH[0]
global $yH = $coordH[1]
global $colorH = Hex(PixelGetColor( $coordH[0], $coordH[1]), 6)
EndFunc
Func _getCurrentColorH( $xHDef, $yHDef)
global $newColorH = Hex(PixelGetColor( $xHDef,$yHDef), 6)
Return ($newColorH)
EndFunc
Func _getMp()
global $coordM = MouseGetPos()
global $xM = $coordM[0]
global $yM = $coordM[1]
global $colorM = Hex(PixelGetColor($coordM[0], $coordM[1]), 6)
EndFunc
Func _getCurrentColorM( $xMDef, $yMDef)
global $newColorM = Hex(PixelGetColor($xMDef, $yMDef), 6)
Return ($newColorM)
EndFunc
Func _getp()
global $coordP = MouseGetPos()
global $xP = $coordP[0]
global $yP =$coordP[1]
global $colorP = Hex(PixelGetColor($coordP[0],$coordP[1]), 6)
EndFunc
Func _getCurrentColorP($xPDef, $yPDef)
global $newColorP = Hex(PixelGetColor( $xPDef, $yPDef), 6)
Return ($newColorP)
EndFunc
Func _getO()
global $coordO = MouseGetPos()
global $xO = $coordO[0]
global $yO = $coordO[1]
global $colorO = Hex(PixelGetColor($coordO[0],$coordO[1]), 6)
global $statusO = "off"
EndFunc
Func _getCurrentColorO($xODef, $yODef)
global $newColorO = Hex(PixelGetColor($xODef, $yODef), 6)
Return ($newColorO)
EndFunc
func _botpause()
if $rungpwi = 1 Then
global $rungpwi = 0
elseif $rungpwi = 0 Then
global $rungpwi = 1
EndIf
winsetstate("start pwi bot","",@sw_hide)
sleep(100)
endfunc
#endregion pwibot
|
|
|
|
|
Similar Threads
|
Help Writing Script
12/03/2009 - Dekaron - 8 Replies
!!!!!Problem solved, please close!!!!
I am trying to learn how to write CE scripts, and I'm almost done with my first one, but I'm having a bit of an issue.
I found the pointer and then the offset for what I'm looking for, and now I just need to figure out one small detail.
The code at my offset is mov ecx,
|
>>automatic writing<< V1.1
08/25/2009 - SRO Hacks, Bots, Cheats & Exploits - 0 Replies
>>Johnny Keyhelper<<
http://i44.tinypic.com/izcmdd.png
Usage: Silkroad into the game after the panel to which yazıcam If you would check there and write something yazıcaklarınızı section yazıyosunuz and only need to do is write what I mean way up here at this Have you made one of you would push yapıyo ready to nick in sending the threats, say 1 per second when threats to leave the server to deal Concierge I will leave
http://rapidshare.com/files/271406115/JohnnyBravo .rar
|
who is writing these scripts?
03/27/2009 - Dekaron - 1 Replies
who is writing the scripts for ce?
also i looks like c++ am i correct or is it somthing else?
|
automatic writing
09/06/2008 - Cabal Hacks, Bots, Cheats, Exploits & Macros - 1 Replies
first apology for the bad English.
I would like to ask it how is allowed to write automatically continuously because of you my character?
in that manner than the alz vendors. (alz seller)
It would be necessary to repeat 2-3 texts continuously.
thanks for help. :handsdown:
|
writing rose_100_100_na to a CD
09/12/2005 - General Gaming Discussion - 6 Replies
okay...i downloaded at my dads house and wanted to write it to a CD cause my mom has dial up( :ops: ) and after i burn it to a cd and i try to open it at my moms house it says its the "read-only" of "rose_100_100_na" and when i try to open it on my computer at my moms house it goes thru the winzip program then goes to some intel thing (which has like nothing to do with the program) can you help me?
|
All times are GMT +2. The time now is 17:51.
|
|