Register for your free account! | Forgot your password?

Go Back   elitepvpers > Popular Games > Silkroad Online > SRO Private Server > SRO PServer Guides & Releases
You last visited: Today at 11:34

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

Advertisement



[Tutorial] How to use Fuse-O-Mat (vSro alchemy tool)

Discussion on [Tutorial] How to use Fuse-O-Mat (vSro alchemy tool) within the SRO PServer Guides & Releases forum part of the SRO Private Server category.

Reply
 
Old 07/16/2012, 19:00   #76
 
elite*gold: 0
Join Date: Dec 2010
Posts: 159
Received Thanks: 5
yes it is
Jamy2 is offline  
Old 07/16/2012, 20:22   #77
 
elite*gold: 130
Join Date: Mar 2008
Posts: 2,485
Received Thanks: 934
Quote:
Originally Posted by Jamy2 View Post
yes it is
Look around the forum, maybe someone unpacked it (its a habit around here to unpack packed clients).
intercsaki is offline  
Old 07/16/2012, 20:57   #78
 
GFX'LER's Avatar
 
elite*gold: 0
Join Date: May 2012
Posts: 66
Received Thanks: 6
i cant start it i get dc every time.. i changed the source to make items +50 but the client crashes all time
GFX'LER is offline  
Old 07/16/2012, 21:09   #79
 
elite*gold: 130
Join Date: Mar 2008
Posts: 2,485
Received Thanks: 934
Quote:
Originally Posted by GFX'LER View Post
i cant start it i get dc every time.. i changed the source to make items +50 but the client crashes all time
The source? Where did you get the source from? Officially it's not released. So there can be problems with it.

If you set the source to +7 as a max, it doesn't crash?

(By the way, can you upload it for us, please? So someone maybe can fix it.)
intercsaki is offline  
Old 07/16/2012, 22:10   #80
 
GFX'LER's Avatar
 
elite*gold: 0
Join Date: May 2012
Posts: 66
Received Thanks: 6
#Changed
GFX'LER is offline  
Thanks
1 User
Old 07/16/2012, 23:04   #81
 
elite*gold: 130
Join Date: Mar 2008
Posts: 2,485
Received Thanks: 934
Quote:
Originally Posted by GFX'LER View Post
I decompiled it and then i changed the + to 50
but it doesnt works on nesro -__-

the game crashes because of other opcodes
the Fuse-O-Mat.exe works fine




(MY.exe VIRUS TOTAL):
virus found (in original too )



(ORIGINAL.exe VIRUS TOTAL):



Can you upload the decompiled source code? I wouldn't waste time searching around, and then I would link your post to the first post.
intercsaki is offline  
Old 07/16/2012, 23:17   #82
 
GFX'LER's Avatar
 
elite*gold: 0
Join Date: May 2012
Posts: 66
Received Thanks: 6
Quote:
Originally Posted by intercsaki View Post
Can you upload the decompiled source code? I wouldn't waste time searching around, and then I would link your post to the first post.

the tool works for you?
GFX'LER is offline  
Old 07/16/2012, 23:20   #83
 
elite*gold: 0
Join Date: Jan 2010
Posts: 507
Received Thanks: 203
Yea men.. I found the source..
If anyone can fix the problem that the program stuck at the end of the bar many ppl will be very happy I think

Edit : //
I tried to run the script and I allways got an disconnect..
Tried both the script and the normal Fuse program..
The normal one works ((

Code:
#include <GUIConstants.au3>
#include <GUIListView.au3>
#include <EditConstants.au3>
#include <String.au3>

;Zeug
$wintitel = "Fuse-O-Mat v1.1"
$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 bis +",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("Elexiere übrig: ",20,100)
$elexiere_box = GUICtrlCreateInput("n/a",150,100,30,20,$ES_ReadOnly)
GUICtrlCreateLabel("Lucky Powder übrig: ",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&" - Tool gestartet...",$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 ist +"&$plus, $liste)
				_GUICtrlListView_Scroll($liste,0,20)


				If $plus = GUICtrlRead($plus_combo) then
					GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" - Gewünsches + erreicht!", $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 entdeckt! Gestopped.", $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&" - Elexiere alle!",$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 alle!",$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 gestartet",$liste)
				_GUICtrlListView_Scroll($liste,0,20)
				GUICtrlSetData($start_btn, "Stopp")
		EndIf
	EndSwitch

	If $fusen = True And $fertig = True then

			$fertig = false
			GUICtrlCreateListViewItem(@HOUR&":"&@MIN&":"&@SEC&" - Am fusen...", $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

Func InjectPacket($opcode, $data, $security = "0100")
	$size = Hex(StringLen($data) / 2, 4)
	$size = StringMid($size, 3, 2) & StringMid($size, 1, 2)
	$opcode = StringMid($opcode, 3, 2) & StringMid($opcode, 1, 2)
	$packet = _HexToString($size & $opcode & $security & $data)
	TCPSend($socket, $packet)
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
Shishidump is offline  
Old 07/16/2012, 23:28   #84
 
GFX'LER's Avatar
 
elite*gold: 0
Join Date: May 2012
Posts: 66
Received Thanks: 6
#Changed
GFX'LER is offline  
Old 07/17/2012, 00:12   #85
 
elite*gold: 130
Join Date: Mar 2008
Posts: 2,485
Received Thanks: 934
Quote:
Originally Posted by GFX'LER View Post
the tool works for you?
I could start, but did not try to run sro, I'm running other apps which consume my ram. Later I'll try. Can you upload your decompiled source code? The one you edited, and recompiled.

Thanks in advance.

Quote:
Originally Posted by Shishidump View Post
Yea men.. I found the source..
If anyone can fix the problem that the program stuck at the end of the bar many ppl will be very happy I think

Edit : //
I tried to run the script and I allways got an disconnect..
Tried both the script and the normal Fuse program..
The normal one works ((


Try for sharing. ^^
intercsaki is offline  
Old 07/17/2012, 00:15   #86
 
GFX'LER's Avatar
 
elite*gold: 0
Join Date: May 2012
Posts: 66
Received Thanks: 6
try to run and try to pimp..
i think it wont work
GFX'LER is offline  
Old 07/17/2012, 00:27   #87
 
elite*gold: 0
Join Date: Jan 2010
Posts: 507
Received Thanks: 203
The script I posted doesnt work for me..
We need one who can edit the source to get work ..

I have a tipp :
It works for me ( Win 7 Ultimate x64 ) :
-> Right click on ur desktop
-> Adept
-> Change ur Style to Windows 7 - Basis

On the .exe of the program :
-> Righ click on it
-> Settings
-> Compatibility
-> Windows XP Service Pack 3
-> Tick Run as administrator

Now try the alchemy tool ...
Shishidump is offline  
Old 07/17/2012, 00:49   #88
dotCom
 
Devsome's Avatar
 
elite*gold: 12400
The Black Market: 104/0/0
Join Date: Mar 2009
Posts: 15,884
Received Thanks: 4,386
Quote:
Originally Posted by intercsaki View Post
I could start, but did not try to run sro, I'm running other apps which consume my ram. Later I'll try. Can you upload your decompiled source code? The one you edited, and recompiled.

Thanks in advance.




Try for sharing. ^^
He got the source from the owner
Devsome is offline  
Old 07/17/2012, 00:51   #89
 
elite*gold: 0
Join Date: Jan 2010
Posts: 507
Received Thanks: 203
Yea I found it there..
I never said it is mine and I decompiled it?

That was a other guy....
Shishidump is offline  
Old 07/17/2012, 07:27   #90
 
leboreiro's Avatar
 
elite*gold: 0
Join Date: Jul 2009
Posts: 178
Received Thanks: 11
Quote:
Originally Posted by intercsaki View Post
Oh, 64 bit! Number one source of problems.

It seems anyway that the tool has been written poorly even for 32bit systems, not even to mention 64bit ones...
this tool works great on my w7 ultimate 64bits . it works for me even for +09 . but after +10 it wont stop . so ur item will fail eventually.

i had before w7 32bits . and letme tell u i've never seen more stability on a operative system. 64bits FTW

unfortunadely i don't know at all that autoit languange.. i barely have some c++ knowledge .

basically the tool need only 1 thing. it has to stop when a plus over +10 gets reached .. coz the original works till +09. you just have to write it .
leboreiro is offline  
Reply

Tags
alchemy, fuse-o-mat, tool, tutorial, vsro


Similar Threads Similar Threads
[Release] Vsro Auto Alchemy Tool
12/15/2015 - SRO PServer Guides & Releases - 98 Replies
Hey guys,today I found vsro autoalchemy tool. All credits goes to schadowhunter http://i.epvpimg.com/h8CYc.png Small tutorial -Open phconnector -Login with edxloader.Dont forget edit ip's -Open auto alchemy tool -Set your inventory
Vsro Auto Fuse?
10/02/2012 - SRO Private Server - 7 Replies
Hi, i want to know if their is any auto fuse program or bot with auto fuse that work on vsro files thank:]
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
VSRO files, alchemy rate
11/04/2011 - SRO Private Server - 6 Replies
Hi guys, if you know how to increase the alchemy rates please help us. :) Thanks. :)
[ribot] does auto fuse give a better chance at alchemy?
07/30/2010 - Silkroad Online - 3 Replies
^^ and also, how to make it work, i set the item, check use lucky powders. i put elixirs on my inventory. but still a no, is it even working? tia



All times are GMT +2. The time now is 11:34.


Powered by vBulletin®
Copyright ©2000 - 2024, 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 ©2024 elitepvpers All Rights Reserved.