|
You last visited: Today at 17:40
Advertisement
[SWSRO][ZSZC]Loader/Bot/Autopot/Silkmod
Discussion on [SWSRO][ZSZC]Loader/Bot/Autopot/Silkmod within the SRO PServer Guides & Releases forum part of the SRO Private Server category.
08/14/2009, 00:34
|
#241
|
elite*gold: 0
Join Date: Jul 2008
Posts: 16
Received Thanks: 2
|
guys F7 push Start/Stop
is working
Code:
Global $Paused
HotKeySet("{F7}", "Pause")
Func Pause()
$Paused = NOT $Paused
While $Paused
Sleep (400)
WEnd
EndFunc ; => Pause()
NEW BOT
Code:
#Include <GuiListView.au3>
Dim $listview[3] = ['Belt','Slot','Delay'], $child_buf_ok = -1, $child_atk_ok = -1, $CharnameOffset = 0xA9CBB8, $run = False
GUICreate('Swsro Bot', 341, 370, @DesktopWidth/2-400/2, @DesktopHeight/2-341/2, 0x100A0000)
GUICtrlCreateGroup("Character", 5, 5, 325, 45)
$char = GUICtrlCreateCombo("", 10, 20, 230, -1, 3)
GUICtrlSetFont(-1, 10)
$refresh = GUICtrlCreateButton("Refresh", 250, 19, 70, 26)
Global $Paused
HotKeySet("{F7}", "Pause")
GUICtrlCreateGroup("Buffs", 5, 50, 160, 250)
$buf = GUICtrlCreateListView("Belt|Slot|Delay", 10, 65, 150, 200)
_GUICtrlListView_SetColumnWidth($buf, 2, -2)
For $i=0 To 2
_GUICtrlListView_SetColumn($buf, $i, $listview[$i], -1, 2)
Next
$buf_add = GUICtrlCreateButton("Add", 10, 270, 70)
$buf_del = GUICtrlCreateButton("Delete", 90, 270, 70)
GUICtrlCreateGroup("Attack Skills", 170, 50, 160, 250)
$atk = GUICtrlCreateListView("Belt|Slot", 175, 65, 150, 200)
For $i=0 To 1
_GUICtrlListView_SetColumnWidth($atk, $i, 73)
_GUICtrlListView_SetColumn($atk, $i, $listview[$i], -1, 2)
Next
$atk_add = GUICtrlCreateButton("Add", 175, 270, 70)
$atk_del = GUICtrlCreateButton("Delete", 255, 270, 70)
$start = GUICtrlCreateButton("Start Bot", 10, 305, 150)
$stop = GUICtrlCreateButton("Stop Bot", 175, 305, 150)
CharList()
ini()
While 1
Switch GUIGetMsg()
Case -3
Exit
Case $buf_add
$child = GUICreate("Add Buff", 100, 150, -1, -1, 0x10000000, 0x88)
GUICtrlCreateLabel("Belt:", 5, 13)
$child_belt = GUICtrlCreateCombo("", 45, 10, 40, -1, 3)
GUICtrlSetData(-1, "F1|F2|F3|F4", "F1")
GUICtrlCreateLabel("Slot:", 5, 43)
$child_slot = GUICtrlCreateCombo("", 45, 40, 40, -1, 3)
GUICtrlSetData(-1, "0|1|2|3|4|5|6|7|8|9", 1)
GUICtrlCreateLabel("Delay:", 5, 73)
$child_delay = GUICtrlCreateInput(100, 45, 70, 40)
$child_buf_ok = GUICtrlCreateButton("OK", 5, 100, 85, 20, 1)
Case $child_buf_ok
GUICtrlCreateListViewItem(GUICtrlRead($child_belt)&"|"&GUICtrlRead($child_slot)&"|"&GUICtrlRead($child_delay), $buf)
GUIDelete($child)
Case $buf_del
_GUICtrlListView_DeleteItemsSelected($buf)
Case $atk_add
$child = GUICreate("Add Attack Skill", 100, 120, -1, -1, 0x10000000, 0x88)
GUICtrlCreateLabel("Belt:", 5, 13)
$child_belt = GUICtrlCreateCombo("", 45, 10, 40, -1, 3)
GUICtrlSetData(-1, "F1|F2|F3|F4", "F1")
GUICtrlCreateLabel("Slot:", 5, 43)
$child_slot = GUICtrlCreateCombo("", 45, 40, 40, -1, 3)
GUICtrlSetData(-1, "0|1|2|3|4|5|6|7|8|9", 1)
$child_atk_ok = GUICtrlCreateButton("OK", 5, 70, 85, 20, 1)
Case $child_atk_ok
GUICtrlCreateListViewItem(GUICtrlRead($child_belt)&"|"&GUICtrlRead($child_slot), $atk)
GUIDelete($child)
Case $atk_del
_GUICtrlListView_DeleteItemsSelected($atk)
Case $refresh
CharList()
ini()
Case $start
FileDelete(GUICtrlRead($char)&".ini")
For $i=0 To _GUICtrlListView_GetItemCount($atk)-1
IniWrite(GUICtrlRead($char)&".ini", "atk_skill", $i+1, _GUICtrlListView_GetItemTextString($atk, $i))
Next
For $i=0 To _GUICtrlListView_GetItemCount($buf)-1
IniWrite(GUICtrlRead($char)&".ini", "buf_skill", $i+1, _GUICtrlListView_GetItemTextString($buf, $i))
Next
$run = True
Case $stop
$run = False
Case $char
ini()
Case Else
If $run Then bot(GUICtrlRead($char))
EndSwitch
WEnd
Func bot($charname)
$buff_skill = IniReadSection($charname&".ini", "buf_skill")
If IsArray($buff_skill) And $buff_skill[0][0]<>0 Then
For $i=1 To $buff_skill[0][0]
$string = StringSplit($buff_skill[$i][1], "|")
Buff($charname, $string[1], $string[2], $string[3])
Next
EndIf
$attack_skill = IniReadSection($charname&".ini", "atk_skill")
If IsArray($attack_skill) And $attack_skill[0][0]<>0 Then
For $i=1 To $attack_skill[0][0]
$string = StringSplit($attack_skill[$i][1], "|")
Skill($charname, $string[1], $string[2])
Next
EndIf
EndFunc
Func Skill($charname, $bar, $slot, $delay = 0.5)
If Not IsDeclared($charname&"skill" & $slot) Then
SendSro(GetHandle($charname), $bar)
SendSro(GetHandle($charname), $slot)
Assign($charname&"skill" & $slot, TimerInit(), 2)
ElseIf TimerDiff(Eval($charname&"skill" & $slot)) > $delay * 1000 Then
SendSro(GetHandle($charname), $bar)
SendSro(GetHandle($charname), $slot)
Assign($charname&"skill" & $slot, TimerInit(), 2)
EndIf
EndFunc
Func Buff($charname, $bar, $slot, $delay = 300)
If Not IsDeclared($charname&"buff" & $slot) Then
Sleep(2000)
SendSro(GetHandle($charname), $bar)
SendSro(GetHandle($charname), $slot)
Sleep(2000)
Assign($charname&"buff" & $slot, TimerInit(), 2)
ElseIf TimerDiff(Eval($charname&"buff" & $slot)) > $delay * 1000 Then
Sleep(2000)
SendSro(GetHandle($charname), $bar)
SendSro(GetHandle($charname), $slot)
Sleep(2000)
Assign($charname&"buff" & $slot, TimerInit(), 2)
EndIf
EndFunc
Func CharList()
$list = WinList("[CLASS:CLIENT]")
For $i=1 To $list[0][0]
Local $mid = memopen(WinGetProcess($list[$i][1]))
Local $name = memread($mid, $CharnameOffset, 'char[12]')
GUICtrlSetData($char, $name, $name)
memclose($mid)
Next
EndFunc
Func GetHandle($charname)
Local $list = WinList("[CLASS:CLIENT]")
For $i=1 To $list[0][0]
Local $mid = memopen(WinGetProcess($list[$i][1]))
Local $name = memread($mid, $CharnameOffset, 'char[12]')
If $name = $charname Then
memclose($mid)
Return $list[$i][1]
EndIf
memclose($mid)
Next
EndFunc
Func SendSro($handle, $key)
Switch $key
Case "F1"
$k = 0x70
Case "F2"
$k = 0x71
Case "F3"
$k = 0x72
Case "F4"
$k = 0x73
Case Else
$k = 0x30+$key
EndSwitch
For $i=1 To 5
DllCall("User32.dll", "int", "PostMessageA", "hwnd", $handle, "int", 0x100, "int", $k, "int", 0)
DllCall("User32.dll", "int", "PostMessageA", "hwnd", $handle, "int", 0x101, "int", $k, "int", 0)
Next
EndFunc
Func ini()
_GUICtrlListView_DeleteAllItems($atk)
_GUICtrlListView_DeleteAllItems($buf)
If FileExists(GUICtrlRead($char)&".ini") Then
$section = IniReadSection(GUICtrlRead($char)&".ini", "atk_skill")
For $i=1 To $section[0][0]
GUICtrlCreateListViewItem($section[$i][1], $atk)
Next
$section = IniReadSection(GUICtrlRead($char)&".ini", "buf_skill")
For $i=1 To $section[0][0]
GUICtrlCreateListViewItem($section[$i][1], $buf)
Next
EndIf
EndFunc
Func memopen($pid)
Local $mid = DllCall('kernel32.dll', 'int', 'OpenProcess', 'int', 0x1F0FFF, 'int', 1, 'int', $pid)
Return $mid[0]
EndFunc
Func memread($mid, $adress, $type = 'dword')
Local $struct = DllStructCreate($type)
DllCall('kernel32.dll', 'int', 'ReadProcessMemory', 'int', $mid, 'int', $adress, 'ptr', DllStructGetPtr($struct), 'int', DllStructGetSize($struct), 'int', '')
Return DllStructGetData($struct, 1)
EndFunc
Func memclose($mid)
DllCall('kernel32.dll', 'int', 'CloseHandle', 'int', $mid)
EndFunc
Func Pause()
$Paused = NOT $Paused
While $Paused
Sleep (400)
WEnd
EndFunc ; => Pause()
|
|
|
08/14/2009, 01:05
|
#242
|
elite*gold: 280
Join Date: May 2007
Posts: 2,818
Received Thanks: 3,483
|
Quote:
Originally Posted by sin2022
guys F7 push Start/Stop
is working 
|
dude sleep will ruin the bot...
|
|
|
08/14/2009, 01:33
|
#243
|
elite*gold: 0
Join Date: Jul 2008
Posts: 16
Received Thanks: 2
|
yes dude
F7 sleep
dont start / stop
yes stop / start
|
|
|
08/14/2009, 04:01
|
#244
|
elite*gold: 0
Join Date: Mar 2009
Posts: 1
Received Thanks: 0
|
are there any " I <3 lolkop " t-shirts out there? i'd buy 5! xD
man you're my hero
i hope you keep up the good work :]
|
|
|
08/14/2009, 21:03
|
#245
|
elite*gold: 0
Join Date: Jul 2009
Posts: 32
Received Thanks: 9
|
Lolcop, i have very big ask for you
Could you add little changed bot version, which would be same like this one, but bot wouldn't run to find next mob? He could just stay in one place.. cause when he is looking for next mob, he very often stuck on treeor any other obstacle  please, do ur guess. Thx, and very great job man  (sry for my english)
|
|
|
08/14/2009, 21:53
|
#246
|
elite*gold: 0
Join Date: Aug 2009
Posts: 19
Received Thanks: 0
|
hi
i have a little problem
the bot doesnt select mobs
can somebody tell me how i can make the bot let select mobs
|
|
|
08/14/2009, 22:24
|
#247
|
elite*gold: 0
Join Date: Apr 2009
Posts: 874
Received Thanks: 419
|
You need to put the auto select on skill's bar and BOT  Put on F1-1 (example).
If you don't have autoselect search for one (in lolkop's post there's 1).
|
|
|
08/14/2009, 23:17
|
#248
|
elite*gold: 0
Join Date: Apr 2008
Posts: 51
Received Thanks: 4
|
When i am logged in and then start bot i dont see the skills??? someone help me!!
|
|
|
08/14/2009, 23:43
|
#249
|
elite*gold: 0
Join Date: Aug 2009
Posts: 19
Received Thanks: 0
|
so put it in as an attack skill?
|
|
|
08/14/2009, 23:57
|
#250
|
elite*gold: 0
Join Date: Oct 2007
Posts: 9
Received Thanks: 1
|
sinces... how should this bot..work but i can't find any media.pk2 with autoselect cuz when i try to log on into sun world sro with the media.pk2 puff update and the autoselect **** dissapear ..
so if someone wanna help me just send me a pm or write here
regratz  have a nice day and peace
|
|
|
08/15/2009, 03:18
|
#251
|
elite*gold: 0
Join Date: Jul 2009
Posts: 27
Received Thanks: 2
|
where can i download autolect media please ????
|
|
|
08/15/2009, 09:39
|
#252
|
elite*gold: 0
Join Date: Jul 2009
Posts: 75
Received Thanks: 57
|
Why are there so friggin many ...
*takes a deep breath... *
nvm. >.>
Q. OMG LOL I DONT HAEV AUTOSALECT WTF!!11!11
A. Use lolkop's patch for autoselect.
Q. Q. WTF LOL WH3R3 DO I DOWNLOAD THIS PATCH?!1!!11?
A. [  ]
Q. OMG IT DOASNT ATAK?!1
A. Put autoselect on F1-1 for example and use it as a skill.
Q. OMG WTF LOL TEH BOT STIL DO3SNT ATAK!!!11!1
A. Press the start button.
Q. OMG TEH BOT DO3SNT STOPP!1111111 WTF11!!!!
A. Press the stop button and wait about 3 seconds.
|
|
|
08/16/2009, 11:42
|
#253
|
elite*gold: 0
Join Date: Aug 2009
Posts: 19
Received Thanks: 0
|
i downloaded all this stuff but it still doesnt attack mobs (i play ecsro)
-autopot
-swsro bot ( the new one for ecsro too)
-swsro autoselect
-private server loader
it keeps saying:
target is not selected !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!
|
|
|
08/16/2009, 12:53
|
#254
|
elite*gold: 0
Join Date: Aug 2009
Posts: 19
Received Thanks: 0
|
so u need another program that selects mobs too use this bot ??/
|
|
|
08/16/2009, 13:00
|
#255
|
elite*gold: 0
Join Date: Aug 2009
Posts: 19
Received Thanks: 0
|
hi (Agian -.-)
is that autoselect the number 1 or the number 2?
(the autoselect from lolskops patch)
|
|
|
 |
|
Similar Threads
|
ZSZC loader + autopot?
05/13/2011 - SRO Private Server - 1 Replies
Hey so i started using autopot again and i got addicted to it lol but last night i died then i ressed and it stoped working so i had to re-open it and it worked fine...Atm server is full ( water ) so im using NO DC loader + auto pot because u get dc if serv is full and i logged in thanks to no dc loader but when i log in with loader the autopot doesnt work and i cant live without it .. any tips ? they cant work together or something ? i even tried re-extracting in different directories and...
|
[SWSRO][ZSZC] LOADER/BOT/AUTOPOT
11/03/2010 - SRO PServer Guides & Releases - 1590 Replies
NOTICE:
I've said like 1 month ago that i've got hacked, and that i've left the sro pserv section. It would be nice if you stop spamming my epvpers account and even more important stop spamming my email adress -.-
I'll leave all my tools online so you can continue with using them, but don't ask me for any updates anymore.
Thx to all those scammers/hackers/nublets around for ruining the game! you did your best and you've reached what you deserve... which is infact absolutely nothing!
...
|
All times are GMT +1. The time now is 17:40.
|
|