Register for your free account! | Forgot your password?

You last visited: Today at 22:34

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



[Release] Vsro Auto Alchemy Tool

Discussion on [Release] Vsro Auto Alchemy Tool within the SRO PServer Guides & Releases forum part of the SRO Private Server category.

Reply
 
Old 06/29/2012, 21:23   #61
 
CyberEagle's Avatar
 
elite*gold: 0
Join Date: Oct 2009
Posts: 278
Received Thanks: 55
The thing is that the tool won't stop if you set it to Fuse bis +5 instead of 05.
CyberEagle is offline  
Old 07/01/2012, 10:44   #62
 
elite*gold: 0
Join Date: Apr 2011
Posts: 14
Received Thanks: 1
Quote:
Originally Posted by stefsika View Post
Yea i didn`t changed anything, only the ip and port..


Here is the source code if any1 wants to play with it

Code:
#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.0.0
 Author:         myName

 Script Function:
	Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here
#include <GUIConstants.au3>
#include <GUIListView.au3>
#include <EditConstants.au3>
#include <String.au3>

;Zeug
$wintitel = "Auto fuser"
$fusen = False
$fertig = True
$alle = false

;Load from Ini
$alchemy_packet = IniRead("settings.ini","opcodes","alchemy","")
$result_packet = IniRead("settings.ini","opcodes","result","")
$invupdate_packet = IniRead("settings.ini","opcodes","inventory_update","")
$slotclean_packet = IniRead("settings.ini","opcodes","slot_clean","")

;GUI
$fenster = GUICreate(""&$wintitel,300,400)
GUICtrlCreateLabel("Fuse  +",20,20)
$plus_combo = GUICtrlCreateCombo("01",75,18,40,20)
GUICtrlSetData(-1, "02|03|04|05|06|07|08|09|10")
$start_btn = GUICtrlCreateButton("Start",20,50,100,40)
GUICtrlCreateLabel("Elexirs: ",20,100)
$elexiere_box = GUICtrlCreateInput("n/a",150,100,30,20,$ES_ReadOnly)
GUICtrlCreateLabel("Lucky Powder: ",20,120)
$powder_box = GUICtrlCreateInput("n/a",150,120,30,20,$ES_ReadOnly)
$leiste = GUICtrlCreateProgress(20,150,260,20)
$liste = GUICtrlCreateListView("Log",10,180,280,210)
_GUICtrlListView_SetColumnWidth($liste,0,250)
$header = HWnd(_GUICtrlListView_GetHeader($liste))
ControlDisable($fenster, "", $header)
GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" - Start Tool...",$liste)
GUISetState()

WinSetOnTop(""&$wintitel,"",1);

;connect to phCOnnector
TCPStartUp()
$socket = TCPConnect("127.0.0.1", 22580)
If $socket > 0 then
		GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" - Connected to phConnector...",$liste)
		_GUICtrlListView_Scroll($liste,0,20)
Else
		GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" - Connection Error!!!",$liste)
		_GUICtrlListView_Scroll($liste,0,20)
		Sleep(1000)
		Exit
EndIf


While 1

	$recv = ReadPacket()
	$msg = GUIGetMsg()

	If $recv<>"" then
		$size = Dec(StringMid($recv, 3, 2) & StringMid($recv, 1, 2))
		$opcode = StringMid($recv, 7, 2) & StringMid($recv, 5, 2)
		$data = StringMid($recv, 13)
		BeginParse($data, $size)

		;If $opcode = "B150" then ;Alchemy Result
		If $opcode = $result_packet then

			$ok    = ParseByte() ;->01
			if $ok= "01" then
				$dummy = ParseByte() ;->02
				$dummy = ParseByte() ;->01
				$iPos  = ParseByte() ;->11
				$dummy = ParseDWord() ; 00 00 00 00
				$iId   = ParseDWord() ;
				Global $plus  = ParseByte() ;->01

				GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" - Item is +"&$plus, $liste)
				_GUICtrlListView_Scroll($liste,0,20)


				If $plus = GUICtrlRead($plus_combo) then
					GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" - succes + succes!", $liste)
					_GUICtrlListView_Scroll($liste,0,20)
					GUICtrlSetData($start_btn, "Start")
					$fusen = False
				EndIf

				GUICtrlSetData($leiste,0)
				$fertig = True
			Else
				GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" - Error Packet ! stopped.", $liste)
				_GUICtrlListView_Scroll($liste,0,20)
				GUICtrlSetData($leiste,0)
				GUICtrlSetData($start_btn, "Start")
				$fusen = False
			EndIF
		EndIf

		;If $opcode = "3040" then ;Inventar Update
		If $opcode = $invupdate_packet then

			$iPos = ParseByte() ;->Inv. Pos.
			$dummy  = ParseByte() ;->kp
			$iCount  = ParseWord() ;->Anzahl

			If $iPos = "0E" Then GUICtrlSetData($elexiere_box, Dec($iCount))
			If $iPos = "0F" Then GUICtrlSetData($powder_box, Dec($iCount))

		EndIf

		;If $opcode = "B034" then ;Slot clean
		If $opcode = $slotclean_packet then

			$ok = ParseByte()  ;->01
			$type = ParseByte() ;->0F

			if ($ok="01") and ($type="0F") then

				$iPos  = ParseByte() ;->0E

				If $iPos = "0E" Then
					$fusen = false
					$fertig = True
					GUICtrlSetData($elexiere_box, "0")
					GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" - Elixirs !",$liste)
					_GUICtrlListView_Scroll($liste,0,20)
				EndIf

				If $iPos = "0F" Then
					$fusen = false
					$fertig = true
					GUICtrlSetData($start_btn, "Start")
					GUICtrlSetData($powder_box, "0")
					GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" - Lucky Powder !",$liste)
					_GUICtrlListView_Scroll($liste,0,20)

				EndIf
			EndIf
		EndIf
	EndIf

	Switch $msg
	Case $GUI_Event_Close
		ExitLoop
	Case $start_btn
		If $fusen = FALSE Then
				$fusen = True
				GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" - Tool start",$liste)
				_GUICtrlListView_Scroll($liste,0,20)
				GUICtrlSetData($start_btn, "Stop")
		EndIf
	EndSwitch

	If $fusen = True And $fertig = True then

			$fertig = false
			GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" -  fuse...", $liste)
			_GUICtrlListView_Scroll($liste,0,20)
			;InjectPacket("7150", "0203030D0E0F")
			InjectPacket($alchemy_packet, "0203030D0E0F")
			GUICtrlSetData($leiste,20)
			sleep(900)
			GUICtrlSetData($leiste,40)
			sleep(900)
			GUICtrlSetData($leiste,60)
			sleep(900)
			GUICtrlSetData($leiste,80)
			sleep(900)
			GUICtrlSetData($leiste,100)
	EndIf

WEnd

;Read & Inject --------------------------------------------------------------------------------------------------------
Func ReadPacket()
	$recv = Hex(Binary(TCPRecv($socket, 2)))
	If $recv = "" Then
		Return ""
	Else
		$size = Dec(StringMid($recv, 3, 2) & StringMid($recv, 1, 2))
		$recv &= Hex(Binary(TCPRecv($socket, $size+4)))
		Return $recv
	EndIf
EndFunc



;Parser ----------------------------------------------------------------------------------------------------------------
Func BeginParse($buffer, $size)
	Global $globalParseIndex = 1
	Global $globalParseSize = $size
	Global $globalParseBuffer = $buffer
EndFunc

Func ParseByte()
	$result = StringMid($globalParseBuffer, $globalParseIndex, 2)
	$globalParseIndex = $globalParseIndex + 2
	return $result
EndFunc

Func ParseWord()
	$low = ParseByte()
	$hi = ParseByte()
	return $hi & $low
EndFunc

Func ParseDword()
	$low = ParseWord()
	$hi = ParseWord()
	return $hi & $low
EndFunc

Func ParseQWord()
	$low = ParseDword()
	$hi = ParseDword()
	return $hi & $low
EndFunc

Func ParseAscii($length)
	$result = StringMid($globalParseBuffer, $globalParseIndex, $length * 2)
	$globalParseIndex = $globalParseIndex + ($length * 2)
	$len = StringLen($result)
	$strResult = ""
	For $i = 1 to $len Step 2
		$strResult = $strResult & Chr(Dec(StringMid($result, $i, 2)))
	Next
	return $strResult
EndFunc
FxxCK script.. always close client
dboyz is offline  
Old 07/08/2012, 09:53   #63
 
grasvys112's Avatar
 
elite*gold: 0
Join Date: Nov 2008
Posts: 229
Received Thanks: 25
how to make to + it till 11 or more ?
grasvys112 is offline  
Old 07/14/2012, 02:00   #64
 
elite*gold: 0
Join Date: Jan 2010
Posts: 507
Received Thanks: 203
hey
If any of you has a problem that often remains hanging at the end of the bar?
If so .. Is there one who knows the script well, and can modify it so that it is better?

Thank you very much
Shishidump is offline  
Old 07/24/2012, 16:43   #65
 
elite*gold: 0
Join Date: Sep 2009
Posts: 8
Received Thanks: 0
Hi
Kenn mich mit dem tool nicht aus, ich Spiele auf dem Pserver:QueenSro und da fangen die waffen ab +7 an!! Wenn das geht kann mir wer erklären ob man das so einstellen kann das er ab +7 pimpt!!!
babaganhusch12 is offline  
Old 08/02/2012, 10:16   #66
 
xpr33s's Avatar
 
elite*gold: 0
Join Date: Jan 2011
Posts: 215
Received Thanks: 15
hy all... i got a problem when i try to open phConnector , i take this error ,, This application has failed to start because the application configuration is incorrect.Reinstalling the application may fix this problem ,,
Any ideea what i should do now???
xpr33s is offline  
Old 08/02/2012, 14:25   #67
 
elite*gold: 0
Join Date: Dec 2008
Posts: 43
Received Thanks: 5
can anyone upload the confing to heaven server at play ****** /> and edx loader confing
D4rkBuffer is offline  
Old 08/03/2012, 15:31   #68
 
lol321678's Avatar
 
elite*gold: 0
Join Date: Jul 2011
Posts: 102
Received Thanks: 1
I can not run this on zeusonline. When i click Start client hangs and the game doesnt start. Ip i type it as. it is a ZEUS.PLAYSRO.COM port 15779
what's the problem?
lol321678 is offline  
Old 08/03/2012, 15:33   #69
 
elite*gold: 1000
Join Date: Apr 2012
Posts: 1,003
Received Thanks: 208
Use [5.39.49.131] instead of [zeus.playsro.com]
qkuh is offline  
Thanks
1 User
Old 08/06/2012, 06:28   #70
 
leboreiro's Avatar
 
elite*gold: 0
Join Date: Jul 2009
Posts: 178
Received Thanks: 11
the original tool works till 09 . i think if u want to make it plus more . you just have to change the number ... for +8 , write 08 . 09 or so...over +9 . 10 11 12 . i think u have to write 011 012 and so.. that way it will stop on the desired plus.
leboreiro is offline  
Old 08/06/2012, 17:37   #71
 
elite*gold: 0
Join Date: Jul 2012
Posts: 24
Received Thanks: 5
Is there any available auto alchemy tool for the servers which use br files?
Easilydone is offline  
Old 08/20/2012, 18:11   #72
 
elite*gold: 0
Join Date: Mar 2012
Posts: 1
Received Thanks: 0
not working ..
player1337 is offline  
Old 08/20/2012, 21:37   #73
 
elite*gold: 130
Join Date: Mar 2008
Posts: 2,485
Received Thanks: 934
Oh yea it is working. Check the tutorial. Maybe the server you're playing on sucks.
intercsaki is offline  
Old 08/23/2012, 11:16   #74
 
dumping's Avatar
 
elite*gold: 0
Join Date: Jun 2008
Posts: 73
Received Thanks: 89
Hey guys! I play on PlaySRO, on the server heaven... and i am not able to get it to work.

I was wondering if 1. If it even works on PlaySRO

and 2. If it does work on PlaySRO, could some post a picture of their EDXLoader and Phconnector coding Much appreciated!!!

Edit: When i followed the tutorial... the loader pops up (The small rectangle) and it just stays there and does not go to the login menu
dumping is offline  
Old 08/23/2012, 12:02   #75
 
elite*gold: 130
Join Date: Mar 2008
Posts: 2,485
Received Thanks: 934
Quote:
Originally Posted by dumping View Post
Hey guys! I play on PlaySRO, on the server heaven... and i am not able to get it to work.

I was wondering if 1. If it even works on PlaySRO

and 2. If it does work on PlaySRO, could some post a picture of their EDXLoader and Phconnector coding Much appreciated!!!

Edit: When i followed the tutorial... the loader pops up (The small rectangle) and it just stays there and does not go to the login menu
The small rectangle means that sro_client.exe starts, but it doesn't do anything more? (Check taskmgr meanwhile, typical problem that it stops at a certain memory usage).

If so, it means you gave the wrong ip in phconnector.ini. Search for the right ip, you can get it through mbot (You start client with mbot, and at Logs, it shows the ip in the second line). Add that IP in phconnector ini, save it, and it should be ok. Of course in edxloader you have to do the redirect (tick both, 127.0.0.1 - 15778).


EDIT: I don't know if it's working on playsro, I heard problems about that, but imo its solvable, if you can use mbot with it....
intercsaki is offline  
Reply


Similar Threads Similar Threads
[Release] Change Rate Alchemy 3x for vSRO Files
12/24/2023 - SRO PServer Guides & Releases - 24 Replies
USE UPDATE . set Param2='1682979880',Param3='473720360',Param4='134 944072' where ID='2033' UPDATE . set Param2='1682979880',Param3='473720360',Param4='134 944072' where ID='2034' UPDATE . set Param2='1682979880',Param3='473720360',Param4='134 944072' where ID='2035' UPDATE . set Param2='1682979880',Param3='473720360',Param4='134 944072' where ID='2036' UPDATE . set Param2='1682979880',Param3='473720360',Param4='134 944072' where ID='2037' UPDATE . set...
[WTS] AllSro Auto Alchemy Tool [INFO INSIDE]
11/30/2015 - Silkroad Online Trading - 6 Replies
Hi everyone, I would like to introduce you a little allSro Auto Alchemy Tool Here is the video "how does it work": Silkroad Auto Alchemy Tool - YouTube As you can see, it's not a programm, it is a script. This script works good and fine, it fuses your item to +5 (w/o lucky stones, just elixirs and lucky powders, but lucky stones option is addable, contact me if need) then stops and make"Owh Oh" ICQ sound. As any script, this script works only when sro window is active, so you can't just...
working auto alchemy tool
07/14/2012 - SRO Private Server - 5 Replies
hi is there a working auto alchemy tool for private servers thx for answer
auto alchemy tool for vsro
05/04/2012 - SRO Private Server - 2 Replies
is there a working auto alchemy tool for vsro if yea can you pls post the link ty
[S] Auto Alchemy / Fusing Bot for VSro
04/18/2012 - SRO Private Server - 4 Replies
Hi all together, i am looking for an Free (not Sbot :-P ) Auto Fusing Bot which can Plus my Items :) Im playing on a VSro server. Is there any program i can use for ? Regards, Sevve



All times are GMT +1. The time now is 22:40.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.