Register for your free account! | Forgot your password?

Go Back   elitepvpers > Popular Games > Silkroad Online > SRO Coding Corner
You last visited: Today at 12:26

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

Advertisement



[Release][Srevolution]GM Helper V4.3

Discussion on [Release][Srevolution]GM Helper V4.3 within the SRO Coding Corner forum part of the Silkroad Online category.

Closed Thread
 
Old   #1

 
Haxor's Avatar
 
elite*gold: 0
Join Date: Feb 2008
Posts: 3,777
Received Thanks: 1,455
[Release][Srevolution]GM Helper V4.3[Updated

Hi
I just released a new version of gm helper

What New?


Quote:
Change log 4.3.2
◘ Added a icon to the Tool

◘Added euro Weapons codes only(no armor)
◘ Added some avatar codes
◘Added Some Mobs Codes
◘Changed the CH_Armor Display (Now its on buttons)
◘Turned off debug console (Now you can click X it close directly)
◘Added EU_Armor (Thx for that to ZeraPain)
Quote:
ChangeLog 4.3.3
◘ Added much new avatars
◘ Added Special codes and put on it much codes ( Masks , Flags , Santa sets,
◘ Added Strong uniques to list
I Autoit
Download Link:
Tool :
Source:

Picture:



Press The Thanks Button if i helped


IF YOU FIND ANYTHING WRONG OR BUG PLEASE REPORT HERE+
Post here Also What you would want to be in next version ^^
Haxor is offline  
Thanks
59 Users
Old 11/20/2010, 17:57   #2
 
elite*gold: 0
Join Date: Jul 2009
Posts: 113
Received Thanks: 39
Only an Idea. Can u combine a graphical map with x and y coords with the teleport command? Like you open a silkroad map in the tool click anywhere and it create the teleport command to teleport to that point. There are already tools with maps + coords so maybe if u are good programmer u can combine it.
Blacks0ldier is offline  
Thanks
1 User
Old 11/20/2010, 18:17   #3
 
dimkacool's Avatar
 
elite*gold: 0
Join Date: Jun 2009
Posts: 3,448
Received Thanks: 2,330
I suggest you, before making some tools, learn some grammar.

Don't accept this as an insult, you're good...

But Chinese, not Chiness.

And if you do space between Armor and Protector, do it and with Garment ;D
dimkacool is offline  
Thanks
1 User
Old 11/20/2010, 21:05   #4

 
Haxor's Avatar
 
elite*gold: 0
Join Date: Feb 2008
Posts: 3,777
Received Thanks: 1,455
Quote:
Originally Posted by dimkacool View Post
I suggest you, before making some tools, learn some grammar.

Don't accept this as an insult, you're good...

But Chinese, not Chiness.

And if you do space between Armor and Protector, do it and with Garment ;D
Cool thx for notice that
Atlease i heard 'good' from you finnaly

Now doing that atm

Quote:
Originally Posted by Blacks0ldier View Post
Only an Idea. Can u combine a graphical map with x and y coords with the teleport command? Like you open a silkroad map in the tool click anywhere and it create the teleport command to teleport to that point. There are already tools with maps + coords so maybe if u are good programmer u can combine it.
Ehh
Maybe
I think no because im not very good progammer^^


Just updated the buttons texts and all things now fine
Now uploading source^^
Haxor is offline  
Old 11/20/2010, 21:20   #5
 
elite*gold: 8
Join Date: Mar 2009
Posts: 327
Received Thanks: 22
Hm... what if i wanna make 5D Sos Garment?? :P
Jujus1994 is offline  
Old 11/20/2010, 21:23   #6

 
Haxor's Avatar
 
elite*gold: 0
Join Date: Feb 2008
Posts: 3,777
Received Thanks: 1,455
Quote:
Originally Posted by Jujus1994 View Post
Hm... what if i wanna make 5D Sos Garment?? :P
Hmm
You just change the 10 or the 11 to 05
Example:
/makeitem ITEM_CH_M_CLOTHES_05_HA_A_RARE 10

This is one
I just change the 10 to 05
Now you go to tool and you change all the pieces of sos set from 10 to 05

I will add low lvl degrees codes soon
Because it will take time to write it ^^
Haxor is offline  
Thanks
1 User
Old 11/20/2010, 21:37   #7
 
elite*gold: 0
Join Date: Mar 2009
Posts: 2,693
Received Thanks: 3,160
what about passing it on vb.net would be really better
LastThief is offline  
Old 11/20/2010, 21:41   #8

 
Haxor's Avatar
 
elite*gold: 0
Join Date: Feb 2008
Posts: 3,777
Received Thanks: 1,455
Quote:
Originally Posted by LastThief View Post
what about passing it on vb.net would be really better
Do it
i'll look on it
and add to topic(MAYBE)
if you want
and sure credits^^
Haxor is offline  
Old 11/21/2010, 00:10   #9
 
ZeraPain's Avatar
 
elite*gold: 0
Join Date: Jan 2010
Posts: 360
Received Thanks: 249
Quote:
Originally Posted by LastThief View Post
what about passing it on vb.net would be really better
reason?


@saif1999 please, please, don't release the source if it is like yours..
no one (except you) can understand what you did.

i hope you don't have anything against it but i took some minutes to optimize your tool a little bit (feel free to use or let it be )



Code:
AutoItSetOption ("TrayIconDebug", 0)

#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>

$Form1 = GUICreate("GM Helper v4.3", 660, 350, 190, 147)
$Edit1 = GUICtrlCreateEdit("", 10, 10, 490, 330)

GUICtrlCreateLabel("Type:", 510, 10)
$type = GUICtrlCreateCombo("", 560, 10, 90, 25, 0x3)
GUICtrlSetData(-1, "Chinese|Europe")
$type1 = GUICtrlCreateCombo("", 560, 35, 90, 25, 0x3)
$type2 = GUICtrlCreateCombo("", 540, 60, 110, 25, 0x3)
GUICtrlCreateLabel("Degree:", 510, 85)
$degree = GUICtrlCreateCombo("", 560, 85, 90, 25, 0x3)
GUICtrlCreateLabel("Sox:", 510, 110)
$sox = GUICtrlCreateCombo("", 560, 110, 90, 25, 0x3)
GUICtrlCreateLabel("Plus:", 510, 135)
$plus = GUICtrlCreateCombo("", 560, 135, 90, 25, 0x3)

$Button_create = GUICtrlCreateButton("Create Itemcode", 510, 160, 140, 30)
GUICtrlSetState(-1, $GUI_DISABLE)
$Button_clear = GUICtrlCreateButton("Clear Console", 510, 190, 140, 30)
$Button_warps = GUICtrlCreateButton("Warps", 510, 220, 140, 30)
$Button_unique = GUICtrlCreateButton("Uniques", 510, 250, 140, 30)
$Button_avatar = GUICTRLCreateButton("Avatar", 510, 280, 140, 30)
$Button_mobs = GUICtrlCreateButton("Mobs", 510, 310, 140, 30)

GUISetState()

While 1
	Switch GUIGetMsg()
		Case -3
			Exit
		Case $type
			GUICtrlSetData($type1, "")
			If GUICtrlRead($type) <> "" Then GUICtrlSetData($type1, "Weapon|Equipment")
		Case $type1
			GUICtrlSetData($type2, "")
			If GUICtrlRead($type1) = "Weapon" Then
				If GUICtrlRead($type) = "Chinese" Then
					GUICtrlSetData($type2, "Glavie|Spear|Sword|Blade|Bow|Shield")
				ElseIf GUICtrlRead($type) = "Europe" Then
					GUICtrlSetData($type2, "Staff|Crossbow|Axe|Dagger|Harp|Sword|Shield|Two Hand Sword|Warlock Rod|Cleric Rod")
				EndIf
			ElseIf GUICtrlRead($type1) = "Equipment" Then
				GUICtrlSetData($type2, "Armor Set (M)|Protector Set (M)|Garment Set (M)|Armor Set (F)|Protector Set (F)|Garment Set (F)")
			EndIf
		Case $type2
			GUICtrlSetData($degree, "")
			If GUICtrlRead($type2) <> "" Then GUICtrlSetData($degree, "1|2|3|4|5|6|7|8|9|10|11")
		Case $degree
			GUICtrlSetData($sox, "")
			If GUICtrlRead($degree) <> "" Then GUICtrlSetData($sox, "None|SoStar/Nova|SoMoon|SoSun")
		Case $sox
			GUICtrlSetData($plus, "")
			If GUICtrlRead($sox) <> "" Then GUICtrlSetData($plus, "1|2|3|4|5|6|7|8|9|10|11")
		Case $plus
			If GUICtrlRead($plus) <> "" Then GUICtrlSetState($Button_create, $GUI_ENABLE)
		Case $Button_create
			_CreateItem()
		Case $Button_clear
			GUICtrlSetData($Edit1, "")
		Case $Button_unique
			_GUICtrlEdit_AppendText($Edit1, StringFormat("======Uniques=====\r\n/LOADMONSTER MOB_CH_TIGERWOMAN 3 - TigerGirl\r\n/LOADMONSTER MOB_EU_KERBEROS 3 - Cerberus\r\n/LOADMONSTER MOB_OA_URUCHI 3 - Uruchi\r\n/LOADMONSTER MOB_AM_IVY 3 - Captain Ivy\r\n/LOADMONSTER MOB_KK_ISYUTARU 3 - Isyutaru\r\n/LOADMONSTER MOB_TK_BONELORD 3 - Lord Yarkan\r\n/LOADMONSTER MOB_RM_TAHOMET 3 - Demon Shaitan\r\n/LOADMONSTER MOB_TQ_BLACKSNAKE 3 - Medusa\r\n/LOADMONSTER MOB_RM_ROC 3 - Roc\r\n/LOADMONSTER MOB_SD_SETH 3 - Seth\r\n/LOADMONSTER MOB_SD_SPHINX 3 - Sphinx\r\n/LOADMONSTER MOB_SD_HORUS - Horus\r\n/LOADMONSTER MOB_SD_NEITH 3 - Neith \r\n/LOADMONSTER MOB_SD_ISIS 3-Isis\r\n/LOADMONSTER MOB_SD_ERIS 3 - Eris") & @CRLF)
		Case $Button_warps
			_GUICtrlEdit_AppendText($Edit1, StringFormat("======Warps======\r\n/warp 25000 1050 0 480 (Jangan)\r\n/warp 23711 1260 0 240 (Stronghold)\r\n/warp 26265 900 0 810 (Donwhang)\r\n/warp 23444 1050 0 1290 (Black Robber Den)\r\n/warp 23431 1200 0 450 (Hotan)\r\n/warp 23424 450 0 330 (Karakoram)\r\n/warp 26751 450 0 1800 (Taklamakan)\r\n/warp 23147 1320 0 240 (Rok Mountain)\r\n/warp 27244 60 0 840 (Samarkand)\r\n/warp 26959 300 0 1290 (Constantinope)\r\n/warp 26045 840 0 1050 (Roc Instance)\r\n/warp 24508 480 0 780 (old Loginplace)\r\n/warp 24758 840 0 510 (Thief Town)\r\n/warp 33538 0 0 1110 (Medusa Spawn)") & @CRLF)
		Case $Button_avatar
			_GUICtrlEdit_AppendText($Edit1, StringFormat("======Avatars_Male======\r\n/makeitem ITEM_MALL_AVATAR_M_ARABIA_2 0 - Arabia Avatar\r\n/makeitem ITEM_MALL_AVATAR_M_ARABIA_HAT_2 0 - Arabia Hat\r\n/makeitem ITEM_MALL_AVATAR_M_CARNIVAL 0 - Carnival Avatar\r\n/makeitem ITEM_MALL_AVATAR_M_CARNIVAL_HAT 0 - Carnival Hat\r\n/makeitem ITEM_MALL_AVATAR_M_CARNIVAL_ATTACH 0 - Carnival Accessory\r\n/makeitem ITEM_MALL_AVATAR_M_PIRATE 0 - Pirate Avatar\r\n/makeitem ITEM_MALL_AVATAR_M_PIRATE_HAT 0 - Pirate Hat\r\n/makeitem ITEM_MALL_AVATAR_M_SPARTA 0 - Sparta Avatar\r\n/makeitem ITEM_MALL_AVATAR_M_SPARTA_HAT 0 - Sparta Hat\r\n/makeitem ITEM_MALL_AVATAR_M_SPARTA_ATTACH 0 - Sparta Avatar Accessorys\r\n/makeitem ITEM_MALL_AVATAR_M_PIRATECREW 0 - Pirate Crew Avatar\r\n/makeitem ITEM_MALL_AVATAR_M_PIRATECREW_HAT 0 - Pirate Crew Hat\r\n/makeitem ITEM_MALL_AVATAR_M_PIRATE_ATTACH 0 - Pirate Crew Accessorys\r\n\r\n=====Avatars_Female=====\r\n/makeitem ITEM_MALL_AVATAR_W_ARABIA_2 0 - Arabia Avatar\r\n/makeitem ITEM_MALL_AVATAR_W_ARABIA_HAT_2 0 - Arabia Hat\r\n/makeitem ITEM_MALL_AVATAR_W_CARNIVAL 0 - Carnival Avatar\r\n/makeitem ITEM_MALL_AVATAR_W_CARNIVAL_HAT 0 - Carnival Hat\r\n/makeitem ITEM_MALL_AVATAR_W_CARNIVAL_ATTACH 0 - Carnival Accessory\r\n/makeitem ITEM_MALL_AVATAR_W_PIRATE 0 - Pirate Avatar\r\n/makeitem ITEM_MALL_AVATAR_W_PIRATE_HAT 0 - Pirate Hat\r\n/makeitem ITEM_MALL_AVATAR_W_SPARTA 0 - Sparta Avatar\r\n/makeitem ITEM_MALL_AVATAR_W_SPARTA_HAT 0 - Sparta Hat\r\n/makeitem ITEM_MALL_AVATAR_W_SPARTA_ATTACH 0 - Sparta Avatar Accessorys\r\n/makeitem ITEM_MALL_AVATAR_W_PIRATECREW 0 - Pirate Crew Avatar\r\n/makeitem ITEM_MALL_AVATAR_W_PIRATECREW_HAT 0 - Pirate Crew Hat\r\n/makeitem ITEM_MALL_AVATAR_W_PIRATE_ATTACH 0 - Pirate Crew Accessorys") & @CRLF)
		Case $Button_mobs
			_GUICtrlEdit_AppendText($Edit1, StringFormat("\===\===\==\ Dw Cave Mobs \===\===\==\r\n/LOADMONSTER MOB_DH_BUGGHOST_CLON 1\r\n/LOADMONSTER MOB_DH_WORKEARTHGHOST_CLON 1\r\n/LOADMONSTER MOB_DH_SOLDIEREARTHGHOST_CLON 1\r\n/LOADMONSTER MOB_DH_BLINDMON_CLON 1\r\n/LOADMONSTER MOB_DH_YACHA_CLON 1\r\n/LOADMONSTER MOB_DH_NACHAL_CLON 1 \r\n====\====\=====\ Alexandria Mobs =====\====\===\r\n") & @CRLF)
			_GUICtrlEdit_AppendText($Edit1, StringFormat("/loadmonster MOB_TQ_TOMBSOLDIER 1\r\n/loadmonster MOB_TQ_QINSHITOMBSTONE 1\r\n/loadmonster MOB_TQ_TOMBARCHER 1\r\n/loadmonster MOB_TQ_TOMBSTONEGHOST 1\r\n/loadmonster MOB_TQ_ROYALSOLDIER 1\r\n/loadmonster MOB_TQ_TOMBBUGGHOST 1\r\n/loadmonster MOB_TQ_SNAKESLAVE 1\r\n/loadmonster MOB_TQ_SNAKEWOMAN 1\r\n/loadmonster MOB_TQ_SNAKEDEMON 1\r\n/loadmonster MOB_TQ_SNAKEMAN 1\r\n/loadmonster MOB_TQ_SMALLSTONEGHOST 1\r\n/loadmonster MOB_TQ_TOMBSTONEGHOSTEGO 1\r\n/loadmonster MOB_TQ_BOMBSTONEGHOST 1\r\n/loadmonster MOB_TQ_SNAKEWOMANEGO 1\r\n/loadmonster MOB_TQ_TOMBGENERAL 1\r\n/loadmonster MOB_TQ_SNAKEGENERAL 1\r\n/loadmonster MOB_TQ_NORTHGUARDIAN 1\r\n/loadmonster MOB_TQ_SOUTHGUARDIAN 1\r\n/loadmonster MOB_TQ_WESTGUARDIAN 1\r\n/loadmonster MOB_TQ_EASTGUARDIAN 1\r\n/loadmonster MOB_TQ_BLACKSNAKE 1\r\n/loadmonster MOB_TQ_FLAMEMASTER 1\r\n/loadmonster MOB_TQ_WHITESNAKE 1\r\n/loadmonster MOB_TQ_QINSHITRAP1 1\r\n/loadmonster MOB_TQ_SNAKETRAP 1\r\n/loadmonster MOB_QT_TQ_TOMBGENERAL1 1\r\n/loadmonster MOB_QT_TQ_SNAKEGENERAL 1" ) & @CRLF)
	EndSwitch
WEnd

Func _CreateItem()
	Local $itemcode = "ITEM_", $itemcode1 = "", $items[6]

	If GUICtrlRead($type) = "Chinese" Then
		$itemcode &= "CH_"
	Else
		$itemcode &= "EU_"
	EndIf

	If GUICtrlRead($type1) = "Weapon" Then
		If GUICtrlRead($type2) = "Glavie" Then
			$itemcode &= "TBLADE_"
		ElseIf GUICtrlRead($type2) = "Staff" Then
			$itemcode &= "TSTAFF_"
		ElseIf GUICtrlRead($type2) = "Two Hand Sword" Then
			$itemcode &= "TSWORD_"
		ElseIf GUICtrlRead($type2) = "Cleric Rod" Then
			$itemcode &= "STAFF_"
		ElseIf GUICtrlRead($type2) = "Warlock Rod" Then
			$itemcode &= "DARKSTAFF_"
		Else
			$itemcode &= StringUpper(GUICtrlRead($type2)) & "_"
		EndIf
	Else
		Switch GUICtrlRead($type2)
			Case "Armor Set (M)"
				$itemcode &= "M_HEAVY_"
			Case "Protector Set (M)"
				$itemcode &= "M_LIGHT_"
			Case "Garment Set (M)"
				$itemcode &= "M_CLOTHES_"
			Case "Armor Set (F)"
				$itemcode &= "W_HEAVY_"
			Case "Protector Set (F)"
				$itemcode &= "W_LIGHT_"
			Case "Garment Set (F)"
				$itemcode &= "W_CLOTHES_"
		EndSwitch
	EndIf

	If StringLen(GUICtrlRead($degree)) = 1 Then
		$itemcode &= "0" & GUICtrlRead($degree) & "_"
	Else
		$itemcode &= GUICtrlRead($degree) & "_"
	EndIf

	If GUICtrlRead($type1) = "Equipment" Then
		$items[0] = $itemcode & "HA_"
		$items[1] = $itemcode & "SA_"
		$items[2] = $itemcode & "BA_"
		$items[3] = $itemcode & "LA_"
		$items[4] = $itemcode & "AA_"
		$items[5] = $itemcode & "FA_"
	EndIf

	Switch GUICtrlRead($sox)
		Case "None"
			$itemcode1 &= "A"
		Case "SoStar/Nova"
			$itemcode1 &= "A_RARE"
		Case "SoMoon"
			$itemcode1 &= "B_RARE"
		Case "SoSun"
			$itemcode1 &= "C_RARE"
	EndSwitch

	If GUICtrlRead($type1) = "Weapon" Then
		_GUICtrlEdit_AppendText($Edit1, "/MAKEITEM " & $itemcode & $itemcode1 & " " & GUICtrlRead($plus) & @CRLF)
	Else
		For $i = 0 To 5
			_GUICtrlEdit_AppendText($Edit1, "/MAKEITEM " & $items[$i] & $itemcode1 & " " & GUICtrlRead($plus) & @CRLF)
		Next
	EndIf
	GUICtrlSetData($type, "")
	GUICtrlSetData($type1, "")
	GUICtrlSetData($type2, "")
	GUICtrlSetData($degree, "")
	GUICtrlSetData($sox, "")
	GUICtrlSetData($plus, "")
	GUICtrlSetState($Button_create, $GUI_DISABLE)
	GUICtrlSetData($type, "Chinese|Europe")
EndFunc
ZeraPain is offline  
Old 11/21/2010, 07:37   #10
 
ahmed4ever2u's Avatar
 
elite*gold: 0
Join Date: Nov 2009
Posts: 1,514
Received Thanks: 891
Quote:
Originally Posted by dimkacool View Post
I suggest you, before making some tools, learn some grammar.

Don't accept this as an insult, you're good...

But Chinese, not Chiness.

And if you do space between Armor and Protector, do it and with Garment ;D
warps is buged

its not working .,..,.,.,.,.,
ahmed4ever2u is offline  
Old 11/21/2010, 08:13   #11
 
lesderid's Avatar
 
elite*gold: 0
Join Date: Dec 2007
Posts: 2,400
Received Thanks: 1,517
Nice tool!
But I don't like AutoIt, it's not because I wanna be cool by saying I don't like it or something, it's by experience.
lesderid is offline  
Old 11/21/2010, 14:56   #12

 
Haxor's Avatar
 
elite*gold: 0
Join Date: Feb 2008
Posts: 3,777
Received Thanks: 1,455
Quote:
Originally Posted by ZeraPain View Post
reason?


@saif1999 please, please, don't release the source if it is like yours..
no one (except you) can understand what you did.

i hope you don't have anything against it but i took some minutes to optimize your tool a little bit (feel free to use or let it be )



Code:
AutoItSetOption ("TrayIconDebug", 0)

#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>

$Form1 = GUICreate("GM Helper v4.3", 660, 350, 190, 147)
$Edit1 = GUICtrlCreateEdit("", 10, 10, 490, 330)

GUICtrlCreateLabel("Type:", 510, 10)
$type = GUICtrlCreateCombo("", 560, 10, 90, 25, 0x3)
GUICtrlSetData(-1, "Chinese|Europe")
$type1 = GUICtrlCreateCombo("", 560, 35, 90, 25, 0x3)
$type2 = GUICtrlCreateCombo("", 540, 60, 110, 25, 0x3)
GUICtrlCreateLabel("Degree:", 510, 85)
$degree = GUICtrlCreateCombo("", 560, 85, 90, 25, 0x3)
GUICtrlCreateLabel("Sox:", 510, 110)
$sox = GUICtrlCreateCombo("", 560, 110, 90, 25, 0x3)
GUICtrlCreateLabel("Plus:", 510, 135)
$plus = GUICtrlCreateCombo("", 560, 135, 90, 25, 0x3)

$Button_create = GUICtrlCreateButton("Create Itemcode", 510, 160, 140, 30)
GUICtrlSetState(-1, $GUI_DISABLE)
$Button_clear = GUICtrlCreateButton("Clear Console", 510, 190, 140, 30)
$Button_warps = GUICtrlCreateButton("Warps", 510, 220, 140, 30)
$Button_unique = GUICtrlCreateButton("Uniques", 510, 250, 140, 30)
$Button_avatar = GUICTRLCreateButton("Avatar", 510, 280, 140, 30)
$Button_mobs = GUICtrlCreateButton("Mobs", 510, 310, 140, 30)

GUISetState()

While 1
	Switch GUIGetMsg()
		Case -3
			Exit
		Case $type
			GUICtrlSetData($type1, "")
			If GUICtrlRead($type) <> "" Then GUICtrlSetData($type1, "Weapon|Equipment")
		Case $type1
			GUICtrlSetData($type2, "")
			If GUICtrlRead($type1) = "Weapon" Then
				If GUICtrlRead($type) = "Chinese" Then
					GUICtrlSetData($type2, "Glavie|Spear|Sword|Blade|Bow|Shield")
				ElseIf GUICtrlRead($type) = "Europe" Then
					GUICtrlSetData($type2, "Staff|Crossbow|Axe|Dagger|Harp|Sword|Shield|Two Hand Sword|Warlock Rod|Cleric Rod")
				EndIf
			ElseIf GUICtrlRead($type1) = "Equipment" Then
				GUICtrlSetData($type2, "Armor Set (M)|Protector Set (M)|Garment Set (M)|Armor Set (F)|Protector Set (F)|Garment Set (F)")
			EndIf
		Case $type2
			GUICtrlSetData($degree, "")
			If GUICtrlRead($type2) <> "" Then GUICtrlSetData($degree, "1|2|3|4|5|6|7|8|9|10|11")
		Case $degree
			GUICtrlSetData($sox, "")
			If GUICtrlRead($degree) <> "" Then GUICtrlSetData($sox, "None|SoStar/Nova|SoMoon|SoSun")
		Case $sox
			GUICtrlSetData($plus, "")
			If GUICtrlRead($sox) <> "" Then GUICtrlSetData($plus, "1|2|3|4|5|6|7|8|9|10|11")
		Case $plus
			If GUICtrlRead($plus) <> "" Then GUICtrlSetState($Button_create, $GUI_ENABLE)
		Case $Button_create
			_CreateItem()
		Case $Button_clear
			GUICtrlSetData($Edit1, "")
		Case $Button_unique
			_GUICtrlEdit_AppendText($Edit1, StringFormat("======Uniques=====\r\n/LOADMONSTER MOB_CH_TIGERWOMAN 3 - TigerGirl\r\n/LOADMONSTER MOB_EU_KERBEROS 3 - Cerberus\r\n/LOADMONSTER MOB_OA_URUCHI 3 - Uruchi\r\n/LOADMONSTER MOB_AM_IVY 3 - Captain Ivy\r\n/LOADMONSTER MOB_KK_ISYUTARU 3 - Isyutaru\r\n/LOADMONSTER MOB_TK_BONELORD 3 - Lord Yarkan\r\n/LOADMONSTER MOB_RM_TAHOMET 3 - Demon Shaitan\r\n/LOADMONSTER MOB_TQ_BLACKSNAKE 3 - Medusa\r\n/LOADMONSTER MOB_RM_ROC 3 - Roc\r\n/LOADMONSTER MOB_SD_SETH 3 - Seth\r\n/LOADMONSTER MOB_SD_SPHINX 3 - Sphinx\r\n/LOADMONSTER MOB_SD_HORUS - Horus\r\n/LOADMONSTER MOB_SD_NEITH 3 - Neith \r\n/LOADMONSTER MOB_SD_ISIS 3-Isis\r\n/LOADMONSTER MOB_SD_ERIS 3 - Eris") & @CRLF)
		Case $Button_warps
			_GUICtrlEdit_AppendText($Edit1, StringFormat("======Warps======\r\n/warp 25000 1050 0 480 (Jangan)\r\n/warp 23711 1260 0 240 (Stronghold)\r\n/warp 26265 900 0 810 (Donwhang)\r\n/warp 23444 1050 0 1290 (Black Robber Den)\r\n/warp 23431 1200 0 450 (Hotan)\r\n/warp 23424 450 0 330 (Karakoram)\r\n/warp 26751 450 0 1800 (Taklamakan)\r\n/warp 23147 1320 0 240 (Rok Mountain)\r\n/warp 27244 60 0 840 (Samarkand)\r\n/warp 26959 300 0 1290 (Constantinope)\r\n/warp 26045 840 0 1050 (Roc Instance)\r\n/warp 24508 480 0 780 (old Loginplace)\r\n/warp 24758 840 0 510 (Thief Town)\r\n/warp 33538 0 0 1110 (Medusa Spawn)") & @CRLF)
		Case $Button_avatar
			_GUICtrlEdit_AppendText($Edit1, StringFormat("======Avatars_Male======\r\n/makeitem ITEM_MALL_AVATAR_M_ARABIA_2 0 - Arabia Avatar\r\n/makeitem ITEM_MALL_AVATAR_M_ARABIA_HAT_2 0 - Arabia Hat\r\n/makeitem ITEM_MALL_AVATAR_M_CARNIVAL 0 - Carnival Avatar\r\n/makeitem ITEM_MALL_AVATAR_M_CARNIVAL_HAT 0 - Carnival Hat\r\n/makeitem ITEM_MALL_AVATAR_M_CARNIVAL_ATTACH 0 - Carnival Accessory\r\n/makeitem ITEM_MALL_AVATAR_M_PIRATE 0 - Pirate Avatar\r\n/makeitem ITEM_MALL_AVATAR_M_PIRATE_HAT 0 - Pirate Hat\r\n/makeitem ITEM_MALL_AVATAR_M_SPARTA 0 - Sparta Avatar\r\n/makeitem ITEM_MALL_AVATAR_M_SPARTA_HAT 0 - Sparta Hat\r\n/makeitem ITEM_MALL_AVATAR_M_SPARTA_ATTACH 0 - Sparta Avatar Accessorys\r\n/makeitem ITEM_MALL_AVATAR_M_PIRATECREW 0 - Pirate Crew Avatar\r\n/makeitem ITEM_MALL_AVATAR_M_PIRATECREW_HAT 0 - Pirate Crew Hat\r\n/makeitem ITEM_MALL_AVATAR_M_PIRATE_ATTACH 0 - Pirate Crew Accessorys\r\n\r\n=====Avatars_Female=====\r\n/makeitem ITEM_MALL_AVATAR_W_ARABIA_2 0 - Arabia Avatar\r\n/makeitem ITEM_MALL_AVATAR_W_ARABIA_HAT_2 0 - Arabia Hat\r\n/makeitem ITEM_MALL_AVATAR_W_CARNIVAL 0 - Carnival Avatar\r\n/makeitem ITEM_MALL_AVATAR_W_CARNIVAL_HAT 0 - Carnival Hat\r\n/makeitem ITEM_MALL_AVATAR_W_CARNIVAL_ATTACH 0 - Carnival Accessory\r\n/makeitem ITEM_MALL_AVATAR_W_PIRATE 0 - Pirate Avatar\r\n/makeitem ITEM_MALL_AVATAR_W_PIRATE_HAT 0 - Pirate Hat\r\n/makeitem ITEM_MALL_AVATAR_W_SPARTA 0 - Sparta Avatar\r\n/makeitem ITEM_MALL_AVATAR_W_SPARTA_HAT 0 - Sparta Hat\r\n/makeitem ITEM_MALL_AVATAR_W_SPARTA_ATTACH 0 - Sparta Avatar Accessorys\r\n/makeitem ITEM_MALL_AVATAR_W_PIRATECREW 0 - Pirate Crew Avatar\r\n/makeitem ITEM_MALL_AVATAR_W_PIRATECREW_HAT 0 - Pirate Crew Hat\r\n/makeitem ITEM_MALL_AVATAR_W_PIRATE_ATTACH 0 - Pirate Crew Accessorys") & @CRLF)
		Case $Button_mobs
			_GUICtrlEdit_AppendText($Edit1, StringFormat("\===\===\==\ Dw Cave Mobs \===\===\==\r\n/LOADMONSTER MOB_DH_BUGGHOST_CLON 1\r\n/LOADMONSTER MOB_DH_WORKEARTHGHOST_CLON 1\r\n/LOADMONSTER MOB_DH_SOLDIEREARTHGHOST_CLON 1\r\n/LOADMONSTER MOB_DH_BLINDMON_CLON 1\r\n/LOADMONSTER MOB_DH_YACHA_CLON 1\r\n/LOADMONSTER MOB_DH_NACHAL_CLON 1 \r\n====\====\=====\ Alexandria Mobs =====\====\===\r\n") & @CRLF)
			_GUICtrlEdit_AppendText($Edit1, StringFormat("/loadmonster MOB_TQ_TOMBSOLDIER 1\r\n/loadmonster MOB_TQ_QINSHITOMBSTONE 1\r\n/loadmonster MOB_TQ_TOMBARCHER 1\r\n/loadmonster MOB_TQ_TOMBSTONEGHOST 1\r\n/loadmonster MOB_TQ_ROYALSOLDIER 1\r\n/loadmonster MOB_TQ_TOMBBUGGHOST 1\r\n/loadmonster MOB_TQ_SNAKESLAVE 1\r\n/loadmonster MOB_TQ_SNAKEWOMAN 1\r\n/loadmonster MOB_TQ_SNAKEDEMON 1\r\n/loadmonster MOB_TQ_SNAKEMAN 1\r\n/loadmonster MOB_TQ_SMALLSTONEGHOST 1\r\n/loadmonster MOB_TQ_TOMBSTONEGHOSTEGO 1\r\n/loadmonster MOB_TQ_BOMBSTONEGHOST 1\r\n/loadmonster MOB_TQ_SNAKEWOMANEGO 1\r\n/loadmonster MOB_TQ_TOMBGENERAL 1\r\n/loadmonster MOB_TQ_SNAKEGENERAL 1\r\n/loadmonster MOB_TQ_NORTHGUARDIAN 1\r\n/loadmonster MOB_TQ_SOUTHGUARDIAN 1\r\n/loadmonster MOB_TQ_WESTGUARDIAN 1\r\n/loadmonster MOB_TQ_EASTGUARDIAN 1\r\n/loadmonster MOB_TQ_BLACKSNAKE 1\r\n/loadmonster MOB_TQ_FLAMEMASTER 1\r\n/loadmonster MOB_TQ_WHITESNAKE 1\r\n/loadmonster MOB_TQ_QINSHITRAP1 1\r\n/loadmonster MOB_TQ_SNAKETRAP 1\r\n/loadmonster MOB_QT_TQ_TOMBGENERAL1 1\r\n/loadmonster MOB_QT_TQ_SNAKEGENERAL 1" ) & @CRLF)
	EndSwitch
WEnd

Func _CreateItem()
	Local $itemcode = "ITEM_", $itemcode1 = "", $items[6]

	If GUICtrlRead($type) = "Chinese" Then
		$itemcode &= "CH_"
	Else
		$itemcode &= "EU_"
	EndIf

	If GUICtrlRead($type1) = "Weapon" Then
		If GUICtrlRead($type2) = "Glavie" Then
			$itemcode &= "TBLADE_"
		ElseIf GUICtrlRead($type2) = "Staff" Then
			$itemcode &= "TSTAFF_"
		ElseIf GUICtrlRead($type2) = "Two Hand Sword" Then
			$itemcode &= "TSWORD_"
		ElseIf GUICtrlRead($type2) = "Cleric Rod" Then
			$itemcode &= "STAFF_"
		ElseIf GUICtrlRead($type2) = "Warlock Rod" Then
			$itemcode &= "DARKSTAFF_"
		Else
			$itemcode &= StringUpper(GUICtrlRead($type2)) & "_"
		EndIf
	Else
		Switch GUICtrlRead($type2)
			Case "Armor Set (M)"
				$itemcode &= "M_HEAVY_"
			Case "Protector Set (M)"
				$itemcode &= "M_LIGHT_"
			Case "Garment Set (M)"
				$itemcode &= "M_CLOTHES_"
			Case "Armor Set (F)"
				$itemcode &= "W_HEAVY_"
			Case "Protector Set (F)"
				$itemcode &= "W_LIGHT_"
			Case "Garment Set (F)"
				$itemcode &= "W_CLOTHES_"
		EndSwitch
	EndIf

	If StringLen(GUICtrlRead($degree)) = 1 Then
		$itemcode &= "0" & GUICtrlRead($degree) & "_"
	Else
		$itemcode &= GUICtrlRead($degree) & "_"
	EndIf

	If GUICtrlRead($type1) = "Equipment" Then
		$items[0] = $itemcode & "HA_"
		$items[1] = $itemcode & "SA_"
		$items[2] = $itemcode & "BA_"
		$items[3] = $itemcode & "LA_"
		$items[4] = $itemcode & "AA_"
		$items[5] = $itemcode & "FA_"
	EndIf

	Switch GUICtrlRead($sox)
		Case "None"
			$itemcode1 &= "A"
		Case "SoStar/Nova"
			$itemcode1 &= "A_RARE"
		Case "SoMoon"
			$itemcode1 &= "B_RARE"
		Case "SoSun"
			$itemcode1 &= "C_RARE"
	EndSwitch

	If GUICtrlRead($type1) = "Weapon" Then
		_GUICtrlEdit_AppendText($Edit1, "/MAKEITEM " & $itemcode & $itemcode1 & " " & GUICtrlRead($plus) & @CRLF)
	Else
		For $i = 0 To 5
			_GUICtrlEdit_AppendText($Edit1, "/MAKEITEM " & $items[$i] & $itemcode1 & " " & GUICtrlRead($plus) & @CRLF)
		Next
	EndIf
	GUICtrlSetData($type, "")
	GUICtrlSetData($type1, "")
	GUICtrlSetData($type2, "")
	GUICtrlSetData($degree, "")
	GUICtrlSetData($sox, "")
	GUICtrlSetData($plus, "")
	GUICtrlSetState($Button_create, $GUI_DISABLE)
	GUICtrlSetData($type, "Chinese|Europe")
EndFunc
The program was like that with chiness
But because im still some newbie in autoit
I tryed to add europe items to the label by you doing (with ch eu)
I done but i do mistake when done it , Then i tryed a few days to fix it and it didnt work
Because that i released like that

I hope you dont blame me next time and thanks for edit the source code
But isnt coding corner to gain experince and teach from own mistakes
I learned autoit from few days only..

And if you dont understand just get the source code of NoN_Stop V4.0
And thanks again

Quote:
Originally Posted by lesderid View Post
Nice tool!
But I don't like AutoIt, it's not because I wanna be cool by saying I don't like it or something, it's by experience.
Thanks for your kind replay
I will edit source soon as fast as possible ,Because i learn too much now about autoit
And i appreciate you
Haxor is offline  
Old 11/21/2010, 16:39   #13
 
ZeraPain's Avatar
 
elite*gold: 0
Join Date: Jan 2010
Posts: 360
Received Thanks: 249
well i don't want to blame you
i just wanted to show you a way it would be better to perform your idea.

maybe you can learn something from it (i don't know the source code of non_stop, i
just read this thread and saw your's).

if you release your source you should keep it for yourself if no one else can understand (or just hardly) what you did in your tool.
releasing a tool with source means in the first way to teach others how to implement your idea
ZeraPain is offline  
Old 11/21/2010, 17:56   #14

 
Haxor's Avatar
 
elite*gold: 0
Join Date: Feb 2008
Posts: 3,777
Received Thanks: 1,455
Quote:
Originally Posted by ZeraPain View Post
well i don't want to blame you
i just wanted to show you a way it would be better to perform your idea.

maybe you can learn something from it (i don't know the source code of non_stop, i
just read this thread and saw your's).

if you release your source you should keep it for yourself if no one else can understand (or just hardly) what you did in your tool.
releasing a tool with source means in the first way to teach others how to implement your idea
Ok thanks again
i will check it and then put it here

I just look at source code and it look more comefortable and more understand able to people who really want to learn from it
Thank You ZeraPain!
Haxor is offline  
Old 11/21/2010, 19:05   #15
 
ZeraPain's Avatar
 
elite*gold: 0
Join Date: Jan 2010
Posts: 360
Received Thanks: 249
you're welcome
ZeraPain is offline  
Closed Thread


Similar Threads Similar Threads
[Release] GM Helper v7
02/05/2011 - SRO PServer Guides & Releases - 22 Replies
Hi, I just added d10,d11 items, and a new style. Hope you will enjoy. Credits go to http://www.elitepvpers.com/forum/members/483507-hag ster.html and me. :D DL: Multiupload.com - upload your files to multiple file hosting sites! Virus scan: VirusTotal - Free Online Virus, Malware and URL Scanner If you want something to add just ask me for it.
[Release] GM Helper v4 (For SREvolution)
01/20/2011 - SRO Coding Corner - 12 Replies
Hello Elitepvpers I will release my last tool GM Helper v4 I made this tool to help some ppl who haven't codes it's only chines codes atm Next update will be europe too Screen http://img176.imageshack.us/img176/4883/gmhelperv4 .jpg
[RELEASE]SREVOLUTION ARCANE PROJECT MYSQL REG PAGE
12/07/2010 - SRO Coding Corner - 7 Replies
Hi here I edited the somewhere founded index.php added and deleted some functions and created it for srevolution arcane mysql project, because there are no working mysql reg page. It is very simple, fast and easy to use. Extract that regpage doc, open index.php and edit these lines: DEMO: If you like or I helped press "Thanks" button.
[RELEASE]MT2 GM Helper v2
11/06/2010 - Metin2 Hacks, Bots, Cheats, Exploits & Macros - 7 Replies
So da die erste Version nicht so toll war hab ich eine neue entwickelt. Mit diesem Bot könnt ihr euch auf Knopfdruck, sofern ihr GM-Rechte habt, alle wichtigen Items für eure Klasse hermachen. Was ist neu? -Alle Bugs sind gefixxt -Interface (Siehe Screenshots) -Benutzerfreundlicher
[RELEASE]GM Helper Bot
11/01/2010 - Metin2 Hacks, Bots, Cheats, Exploits & Macros - 3 Replies
Ist ein Epic Fail meiner Seits. Sorry. Werd nen besseren erstellen. Hey, Elitepvperianer. Hier stelle ich euch meinen GM Helper für Metin2 vor. Viel Spaß damit. Diesen Bot kann man nur mit GM-Rechten nutzen. ACHTUNG: Der Fenstername des Clienten muss "METIN2" sein, da es ansonsten nicht klappt. Wer es mit einem anderen Fenstertitel machen will schreibt mir eine Nachricht mit dem neuen Fenstertitel. Dann pass ich den Bot für ihn an.



All times are GMT +1. The time now is 12:26.


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.