1. Reklam


    1. joysro
      asur
      serenity
      redsea
      blacksro
      plag
      alaaddin
      erix

AutoIt Bilenler lütfen baksın.[Party Reform]


  1. darts

    darts rank8

    Kayıt:
    16 Kasım 2008
    Mesajlar:
    72
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    0
    http://rapidshare.com/files/225163692/GFX.au3.html
    MD5: 3CC1FEE3CC204EFAF2303E406EA3A473

    arkadaslar bu GFX autoreform ptnin açık kodu bunu sbota uyarlayabilirmisiniz.

    Kod:
    #cs ----------------------------------------------------------------------------
    
     AutoIt Version: 3.2.9.14 (beta)èT?0U?xU?
     Author:         GreYFoX
    
     Script Function:
    	Automatically Creates a Matching Entry for your party and accepts the applicants
    	
    #ce ----------------------------------------------------------------------------
    
    #RequireAdmin
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=E:\My Documents\1\Desktop\GFX.ico
    #AutoIt3Wrapper_outfile=..\compiled\nodcbeta.exe
    #AutoIt3Wrapper_Compression=4
    #AutoIt3Wrapper_UseAnsi=y
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #Include <nomadmemoryfox.au3>
    #include <GUIConstants.au3>
    #Include <Array.au3>
    #include <misc.au3>
    #Include <Date.au3>
    #Include <File.au3>
    $progtitle="GreYFoX Party Matching lvl 100"
    Global $4thx=22  ;22,301) <> 0xD6CFAD)
    Global $4thy=301
    Global $4thc=0xD6CFAD
    Global $8thx=155
    Global $8thy=233
    Global $8thc=0xB5AA84
    Global $xthx
    Global $xthy
    Global $xthc
    
    Global $settype1
    Global $kick
    Global $kick1
    Global $settype
    Global $partytype=0
    Global $ExpTyp
    Global $ItmTyp
    Global $pttype
    Global $settype
    Global $Hunting=$GUI_CHECKED
    Global $Quest=$GUI_UNCHECKED
    Global $Thief=$GUI_UNCHECKED
    Global $Trade=$GUI_UNCHECKED
    ;~ Opt("TrayIconHide",1)
    	
    	If ProcessExists("sro_client.exe")<>1 Then
    		MsgBox(0,$progtitle,"please start silkroad")
    	EndIf
    	If ProcessExists("sro_client.exe")<>1 Then
    		MsgBox(0,$progtitle,"You still didn't start SRo BB")
    		Exit
    	EndIf
    If _Singleton("GFX\GFXAIO",1) = 0 Then
    	MsgBox(0,"N00B ^_^ BUSTED","Don't run my stuff twice")
    	GuiSetState(@SW_SHOW)
    	WinActivate($progtitle)
    	Exit
    
    	
    EndIf
    Global $ptt
    Dim $PTC=30
    Dim $PT=$PTC
    Global $msg=0
    Global $doit=False
    Global $Start
    Global $hqtt
    			
    ;~ 			$trayhelp	=	TrayCreateItem("&Help")
    			$statusitem  = TrayCreateItem("&Show")
    			$aboutitem1  = TrayCreateItem("&About")
    			$exititem   = TrayCreateItem("E&xit")
    			
    			Opt("TrayIconHide",0)
    			Opt("TrayMenuMode",1)
    GUICtrlSetOnEvent($Start, "StartButton")
    $AIO=GuiCreate($progtitle, 285, 300)
    ;~ GUISetBkColor (0x1E1D1B) 
    $party=GuiCtrlCreateTab(0, 0, 285, 300)
    ;~ GUICtrlSetBkColor ( $party, 0x1E1D1B )
    GuiCtrlCreateTabItem("Party Match")
    GuiCtrlCreateGroup("Choose Party Obj.", 5, 25, 275, 52)
    $Hunting = GUICtrlCreateCheckbox ("Hunting", 10, 45, 70, 20)
    GUICtrlSetState($Hunting,$GUI_CHECKED)
    $Quest = GUICtrlCreateCheckbox ("Quest", 85, 45, 70, 20)
    $Trade = GUICtrlCreateCheckbox ("Trade", 160, 45, 70, 20)
    $Thief = GUICtrlCreateCheckbox ("Thief", 230, 45, 48, 20)
    GuiCtrlCreateGroup("Level Restrict", 5, 80, 275, 52)
    GUICtrlCreateLabel("Min.",20,105)
    $minlv=GUICtrlCreateInput(1,45,102,90)
    GUICtrlCreateLabel("Max.",145,105)
    $maxlv=GUICtrlCreateInput(90,170,102,90)
    $afk = GUICtrlCreateCheckbox ("AFK", 10, 135, 40, 20)
    GuiCtrlCreateGroup("Title", 5, 210, 275, 52)
    $txtc=GuiCtrlCreateCombo("GreYFoX LTP FTW", 20, 230, 240, -1, $CBS_DROPDOWN)
    GUICtrlSetData($txtc,"For open hunting on the Silk Road!|When will the quests wnd on the Silk Road?|No need blood or tears for thieves! Robbery is the only...|Until the day the Silk Road is all covered with money!|LTP|Long Time Party|Please, Join But Stay For a Long Time|Don't Join|Trading5*|All Thieves Come|For open hunting on the Silk Road! LTP","For open hunting on the Silk Road!")
    $Start = GUICtrlCreateButton("Start", 200, 265, 45, 25 ,$BS_FLAT)
    GUICtrlCreateLabel("Interval",10,270)
    $interval = GUICtrlCreateInput($PTC,60,268,50)
    GUICtrlCreateLabel("Sec.",115,270)
    
    GUISetState()
    
    
    
    While 1	
    		$size = WinGetClientSize("SRO_Client")
    		$PTC=GUICtrlRead($interval)
    	while ($size[0]<>@DesktopWidth) and ($size[1]<>@DesktopHeight)
    		GUISetState(@SW_DISABLE)
    		MsgBox(0,$progtitle,"This only works in Full screan Mode"&@CRLF&"Please Make SRO in FUll screen Mode ty")
    		GUISetState(@SW_ENABLE)
    		WinActivate($progtitle)
    		WinActivate("[CLASS]")
    		MouseClick("Right",(1024/2),(768/2),1,0)
    		Send("!{TAB}")
    		GUISetState(@SW_ENABLE)
    	WEnd
    	If $PTC<$PT And $PT>$PTC Then
    		$PT=0
    	EndIf
    	
    	$msg = GUIGetMsg()
    	$tray_msg = TrayGetMsg()
    		If $msg = $afk Then 
    			partytype()
    		EndIf
    	If (GUICtrlRead($afk)=$GUI_UNCHECKED) Then
    		$ptt=4
    	EndIf
    	If $msg=$kick Then
    		setkick()
    	EndIf
    	if $msg=$kick1 Then
    		setkick1()
    	EndIf
    	
    		Select
    			Case $msg = $GUI_EVENT_MINIMIZE
    				TraySetState()
    				GuiSetState(@SW_HIDE)
    			Case $msg = $GUI_EVENT_CLOSE
    				Exit
    			Case $tray_msg = $exititem
    				Exit 0
    ;~ 					Case $tray_msg = $trayhelp
    ;~ 						Help()
    			Case $tray_msg = $aboutitem1
    				MsgBox(0,"GreYFoX All In one V1.0 - About","Made by GreYFoX FTW"&@CRLF&"I'm Now Part of StealtHex.org"&@CRLF&"This was made for StealtHex.org.")
    			Case $tray_msg = $statusitem
    				TraySetState(2)
    				GuiSetState(@SW_SHOW)
    				GuiSetState(@SW_RESTORE)
    				WinActivate($progtitle)
    		EndSelect
    					
    		If ($msg=$Start) Then
    			StartButton()
    		EndIf	
    		If ((GUICtrlRead($ExpTyp)<>"Exp Distribution") And (GUICtrlRead($ExpTyp)<>"Exp Auto Share")) Or ((GUICtrlRead($ItmTyp)<>"Item Auto Share") And (GUICtrlRead($ItmTyp)<>"Item Distribution")) Then
    			MsgBox(0,$progtitle,"Please Select The Right PT type",5)
    			sleep(5000)
    		EndIf
    		If (GUICtrlRead($maxlv)>100) Or (GUICtrlRead($maxlv)<1) Or (GUICtrlRead($minlv)>80) Or (GUICtrlRead($minlv)<1) Or (GUICtrlRead($maxlv)<GUICtrlRead($minlv) Or (GUICtrlRead($minlv)>GUICtrlRead($maxlv)))Then
    			MsgBox(0,$progtitle,"Please Choose Appropriate Levels"&@CRLF&"Min Between 1-80"&@CRLF&"Max Between 1-100"&@CRLF&"Min Not Greater Than Max"&@CRLF&"Max Not Lower Than Min",5)
    			sleep(5000)
    		EndIf
    		If $msg = $GUI_EVENT_CLOSE Then
    			Exit 0
    		EndIf
    		If $msg = $Hunting Then 
    			sethunting()
    		EndIf
    		If $msg = $Quest Then 
    			setquest()
    		EndIf
    		If $msg = $Trade Then 
    			settrade()
    		EndIf
    		If $msg = $settype Then 
    			setptalw()
    		EndIf
    		If $msg = $settype1 Then 
    			setpt1()
    		EndIf
    		If $msg = $Thief Then 
    			setthief()
    		EndIf
    	if $doit=true and winactive("SRO_Client") then
    	$PT= $PT-1
    	ToolTip($PT&" Seconds.",0,0)
    	if $PT <= 0 then
    		ToolTip("Working",0,0)
    		$PT=$PTC
    		party1024x768()
    	EndIf
    	acceptpt()
    	sleep(1000)	
    	EndIf
    WEnd
    Func party1024x768()
    	If (GUICtrlRead($ExpTyp)<>"Exp Distribution") Then
    		$xthx=$4thx
    		$xthy=$4thy
    		$xthc=$4thc
    	EndIf
    	If (GUICtrlRead($ExpTyp)<>"Exp Auto Share") Then
    		$xthx=$8thx
    		$xthy=$8thy
    		$xthc=$8thc
    	EndIf
    		if (PixelGetColor($xthx,$xthy) <> $xthc) OR (PixelGetColor(1,139) <> 0xDFD5AB) then ;Fourth member Exist ?
    			
    
    			if (PixelGetColor(473,160)= 16777215) and (PixelGetColor(208,280) = 16777215 ) then	;pt matching open then close it
    				MouseClick("Right",(1024/2),(768/2),1,0)
    				Send("e")
    				Sleep(200)
    			EndIf
    			if (GUICtrlRead($afk)=$GUI_CHECKED) Then;afk enabeled
    				if (GUICtrlRead($settype)=$GUI_CHECKED) Or (GUICtrlRead($settype1)=$GUI_CHECKED) Then;set type enabled
    					MouseClick("Right",(1024/2),(768/2),1,0)
    					Send("p")
    					sleep(200)
    					If PixelGetColor(801,620)<>0xF0D9A5 And PixelGetColor(773,283)<>0xFFFFFF Then;pt window not in place
    						MouseClick("left",882,713,1,0);click on system
    						MouseMove(495,348)
    ;~ 						if PixelGetColor(494,293)=0xffffff And PixelGetColor(495,348)=0xFEFBD8 Then;option window in place
    							MouseClick("left",495,348,1,0);option
    							sleep(100)
    							MouseClick("left",556,668,1,0);confirm
    							Send("{ESC}")
    							While PixelGetColor(494,293)=0xffffff
    								Send("{ESC}")
    								sleep(200)
    							WEnd
    						Send("p")
    						sleep(200)
    					EndIf
    					While (PixelGetColor(801,620)<>0xF0D9A5) And (PixelGetColor(773,283)<>0xFFFFFF);while pt is win not open
    						Send("p")
    						
    					WEnd
    					
    					If PixelGetColor(791,656)=0x5A5A5A Then
    						if (GUICtrlRead($kick)=$GUI_CHECKED) Or (GUICtrlRead($kick1)=$GUI_CHECKED) Then ;kick/ban or Not
    							MouseClick("Left",943,587,1,0)
    							sleep(100)
    							MouseClick("Left",943,555,1,0)
    							sleep(100)
    							MouseClick("Left",943,521,1,0)
    							sleep(100)
    							MouseClick("Left",943,487,1,0)
    							sleep(100)
    							MouseClick("Left",943,458,1,0)
    							sleep(100)
    							MouseClick("Left",943,424,1,0)
    							sleep(100)
    							MouseClick("Left",943,390,1,0)
    							sleep(100)
    							MouseClick("Left",943,349,1,0)
    							sleep(100)
    							If GUICtrlRead($kick1)=$GUI_CHECKED Then
    								GUICtrlSetState($kick1,$GUI_UNCHECKED)
    							EndIf
    							While (PixelGetColor(801,620)<>0xF0D9A5) And (PixelGetColor(773,283)<>0xFFFFFF);while pt  win  is not open
    								Send("p")
    								sleep(200)
    							WEnd
    						EndIf
    					Else
    						While (PixelGetColor(801,620)<>0xF0D9A5) And (PixelGetColor(773,283)<>0xFFFFFF);while pt is win not open
    						Send("p")
    						sleep(200)
    						WEnd
    						If (GUICtrlRead($settype)<>$GUI_CHECKED) AND (GUICtrlRead($settype1)<>$GUI_CHECKED) Then
    							MsgBox(0,$progtitle,"A Party already exists,pls check ur configuration for ban/leave, or leave manually",5)
    						EndIf
    					EndIf
    					MouseMove(791,655)
    					If (PixelGetColor(791,655)=0x844229) Then
    						MouseClick("left",791,655,1,0)
    						If GUICtrlRead($ExpTyp)="Exp Distribution" Then
    							MouseClick("left",659,458,1,0)
    						EndIf
    						If GUICtrlRead($ExpTyp)="Exp Auto Share" Then
    							MouseClick("left",659,436,1,0)
    						EndIf
    						If GUICtrlRead($ItmTyp)="Item Distribution" Then
    							MouseClick("left",791,458,1,0)
    						EndIf
    						If GUICtrlRead($ItmTyp)="Item Auto Share" Then
    							MouseClick("left",791,436,1,0)
    						EndIf
    					EndIf
    					MouseClick("left",732,519,1,0)
    					MouseClick("Right",(1024/2),(768/2),1,0)
    					Send("p")
    					sleep(200)
    					While PixelGetColor(801,620)=0xF0D9A5 And PixelGetColor(773,283)=0xFFFFFF
    						Send("p")
    						sleep(200)
    					WEnd
    					if (GUICtrlRead($settype1)=$GUI_CHECKED) Then
    						GUICtrlSetState($settype1,$GUI_UNCHECKED);=======================================
    					EndIf
    				EndIf
    				
    			EndIf
    			
    			
    						
    			$p=0
    			MouseClick("Right",(1024/2),(768/2),1,0)
    			Send("e")
    			Sleep(500)
    			while (PixelGetColor(250,302) = 0) and $p<50 ;wait for pt list to come up
    				Sleep(50);wait for pt list to come up
    				$p=$p+1;wait for pt list to come up
    			WEnd;wait for pt list to come up
    			$p=0
    			if (PixelGetColor(250,302) = 16777215) then ; if pt don't Exist
    				MouseClick("left",610,590,1,0)
    				Sleep(500)
    				MouseClick("left",500,500,1,0)
    				Send("{BS 50}")
    				sleep(200)
    				$txt=GUICtrlRead($txtc)
    				Send(""&$txt)
    				sleep(200)
    				MouseClick("Left",450,355)
    				sleep(200)
    				Send("{BS 10}{DEL 10}")
    				sleep(200)
    				send(GUICtrlRead($minlv))
    				MouseClick("Left",600,355)
    				sleep(200)
    				Send("{BS 10}{DEL 10}")
    				sleep(200)
    				send(GUICtrlRead($maxlv))
    				If (GUICtrlRead($Hunting)=$GUI_CHECKED) Then
    					If (PixelGetColor(414,284)<>0xFFFFFF) Then
    					MouseClick("Right",(1024/2),(768/2),1,0)
    					Send("{ESC}")
    					Msgbox(0,$progtitle,"You Are Curently Wearing a Job Suit,Please take it off or Choose Another PT Type"&@CRLF&"Then press start again")
    					StartButton()
    					Else
    					MouseClick("left",392,282)
    					EndIf
    				EndIf
    				If (GUICtrlRead($Quest)=$GUI_CHECKED) Then
    					If (PixelGetColor(480,288)<>0xFFFFFF)Then
    					MouseClick("Right",(1024/2),(768/2),1,0)
    					Send("{ESC}")
    					Msgbox(0,$progtitle,"You Are Curently Wearing a Job Suit,Please take it off or Choose Another PT Type"&@CRLF&"Then press start again")
    					StartButton()
    					Else
    						MouseClick("left",459,282)
    					EndIf
    				EndIf
    				If (GUICtrlRead($Trade)=$GUI_CHECKED) Then
    					If (PixelGetColor(542,280)<>0xFFFFFF)Then
    					MouseClick("Right",(1024/2),(768/2),1,0)
    					Send("{ESC}")
    					Msgbox(0,$progtitle,"You Are Curently NOT Wearing a Trader/Hunter Suit(flag),Please Wear It or Choose Another PT Type"&@CRLF&"Then press start again")
    					StartButton()
    					Else
    					 MouseClick("left",525,282)
    					EndIf
    				EndIf
    				If (GUICtrlRead($Thief)=$GUI_CHECKED) Then
    					If (PixelGetColor(608,280)<>0xFFFFFF)Then
    					MouseClick("Right",(1024/2),(768/2),1,0)
    					Send("{ESC}")
    					Msgbox(0,$progtitle,"You Are Curently NOT Wearing the Thief Suit,Please Wear It or Choose Another PT Type"&@CRLF&"Then press start again")
    					StartButton()
    					Else
    					MouseClick("left",591,282)
    					EndIf
    				EndIf
    				MouseClick("left",460,540,1,0)
    
    			EndIf
    				
    				
    			sleep(100)
    		
    		MouseClick("Right",(1024/2),(768/2),1,0)
    		Send("e")
    		sleep(200)
    		Endif
    	
    EndFunc
    
    Func partytype()
    	Select
    	Case (GUICtrlRead($afk)=$GUI_CHECKED)
    			$settype=GUICtrlCreateCheckbox ("Set Eveytime", 55, 135, 80, 20)
    			$kick=GUICtrlCreateCheckbox ("Ban/Leave", 205, 135, 73, 10)
    			$kick1=GUICtrlCreateCheckbox ("Ban Once", 205, 145, 73, 10)
    			$settype1=GUICtrlCreateCheckbox ("Set once", 140, 135, 65, 20)
    			$pttype=GuiCtrlCreateGroup("Party Type", 5, 155, 275, 52)
    			$ExpTyp=GuiCtrlCreateCombo("Exp Distribution", 20, 170, 115,-1, $CBS_DROPDOWNLIST )
    			GUICtrlSetData($ExpTyp,"Exp Auto Share")
    			$ItmTyp=GuiCtrlCreateCombo("Item Distribution", 145, 170, 115, -1, $CBS_DROPDOWNLIST)
    			GUICtrlSetData($ItmTyp,"Item Auto Share")
    				GuiSetState(@SW_HIDE) ;without those 3 steps they won't show, it's a mistery to me why :s
    				GuiSetState(@SW_SHOW)
    				GuiSetState(@SW_RESTORE)
    		Case (GUICtrlRead($afk)=$GUI_UNCHECKED)
    			GUICtrlDelete($pttype)
    			GUICtrlDelete($settype)
    			GUICtrlDelete($settype1)
    			GUICtrlDelete($kick)
    			GUICtrlDelete($kick1)
    			GUICtrlDelete($ExpTyp)
    			GUICtrlDelete($ItmTyp)
    	EndSelect
    		
    			
    			
    EndFunc
    Func setptalw()
    	GUICtrlSetState($settype1,$GUI_UNCHECKED)
    EndFunc
    
    Func setpt1()
    	GUICtrlSetState($settype,$GUI_UNCHECKED)
    EndFunc
    
    Func setkick()
    	GUICtrlSetState($kick1,$GUI_UNCHECKED)
    EndFunc
    
    Func setkick1()
    	GUICtrlSetState($kick,$GUI_UNCHECKED)
    EndFunc
    
    Func sethunting()
    	GUICtrlSetData($txtc,"Hunting @ ","For open hunting on the Silk Road!")
    	GUICtrlSetData($txtc,"For open hunting on the Silk Road!")
    	GUICtrlSetState($Quest,$GUI_UNCHECKED)
    	GUICtrlSetState($Trade,$GUI_UNCHECKED)
    	GUICtrlSetState($Thief,$GUI_UNCHECKED)
    EndFunc
    
    Func setquest()
    	GUICtrlSetData($txtc,"Doing The Quest","When will the quests wnd on the Silk Road?")
    	GUICtrlSetData($txtc,"When will the quests wnd on the Silk Road?")
    	GUICtrlSetState($Hunting,$GUI_UNCHECKED)
    	GUICtrlSetState($Trade,$GUI_UNCHECKED)
    	GUICtrlSetState($Thief,$GUI_UNCHECKED)
    EndFunc
    
    Func settrade()
    	GUICtrlSetData($txtc,"Need Hunters|Go Away Thieves|1* Only|No Noob Hunters Pls","Until the day the Silk Road is all covered with money!")
    	GUICtrlSetData($txtc,"Until the day the Silk Road is all covered with money!")
    	GUICtrlSetState($Hunting,$GUI_UNCHECKED)
    	GUICtrlSetState($Quest,$GUI_UNCHECKED)
    	GUICtrlSetState($Thief,$GUI_UNCHECKED)
    EndFunc
    
    Func setthief()
    	GUICtrlSetData($txtc,"We See a Trader *|We are In Thieftown|Samarkand|lvl80 only|No Noob THieves pls","Until the day the Silk Road is all covered with money!")
    	GUICtrlSetData($txtc,"No need blood or tears for thieves! Robbery is the only...")
    	GUICtrlSetState($Hunting,$GUI_UNCHECKED)
    	GUICtrlSetState($Quest,$GUI_UNCHECKED)
    	GUICtrlSetState($Trade,$GUI_UNCHECKED)
    EndFunc
    
    Func StartButton()
    	If (1024=@DesktopWidth) and (768=@DesktopHeight) Then
    		if $doit=false then
    		$doit=True
    		GUICtrlSetData($Start,"Stop")
    		ToolTip("Starting",0,0)
    		WinActivate("[CLASS]")
    		else
    		$doit=false
    		ToolTip("Paused(Press Start To Continue",0,0)
    		GUICtrlSetData($Start,"Start")
    		endif
    	Else
    		MsgBox(0,$progtitle,"Curently This program only works with 1024x768 and in full screen only")
    	EndIf
    	
    EndFunc
    Func acceptpt()
    if PixelGetColor(10,300)<>0 Then
    
    	;window title pt J <--             and   Race												
    	if (PixelGetColor(468,243) = 16777215) and (PixelGetColor(546,387) = 16777215) and (PixelGetColor(364,355) = 16777215) then
    		MouseClick("left",470,500,1,0)
    		Sleep(200)
    	Endif
    EndIf
    
    
    Endfunc
    
     
  2. Agilla

    Agilla rank8

    Kayıt:
    18 Haziran 2008
    Mesajlar:
    2.809
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    0
    Şehir:
    30-Day Trial
    Sbota Uygulamak Mümkün Ama Sbotta Bu Özellik Oldugundan Gerek Yok Bence(Autoit Bİliyorum)Ancak Sitede Benden Başka Bilen Var Sana YArdımcı Olucaklardır.
     
  3. darts

    darts rank8

    Kayıt:
    16 Kasım 2008
    Mesajlar:
    72
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    0
    sbotta pt reform özelliği yokki auto invite veya auto accept var.Şöyle söyleyeyim onglarda farm yapıyorum ve 1-10 arası 1-15 arası noob lazım partye ve bunun içinde sürekli pt'yi reform yapmam lazım eğer uyarlaması kolay olursa lütfen...benim için çok lazım ve bütün sbot ile kasan ong farmcılar için.
     
  4. darts

    darts rank8

    Kayıt:
    16 Kasım 2008
    Mesajlar:
    72
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    0
  5. endorphin

    endorphin rank8

    Kayıt:
    24 Nisan 2007
    Mesajlar:
    419
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    16
    Şehir:
    Женат
    hazır yapılmışını versem :)
     
  6. endorphin

    endorphin rank8

    Kayıt:
    24 Nisan 2007
    Mesajlar:
    419
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    16
    Şehir:
    Женат
    direk bakar bakmaz kodların eksikliği göz önünde örn.

    #Include <nomadmemoryfox.au3>
    #include <GUIConstants.au3>
    #Include <Array.au3>
    #include <misc.au3>
    #Include <Date.au3>
    #Include <File.au3>

    burda belirtildiği gibi dosyaya iliştirilmiş 6 adet au3 kodu daha gerekiyor sana yapılmışını yollarım bi süre sonra. kullanırsın.
     
  7. darts

    darts rank8

    Kayıt:
    16 Kasım 2008
    Mesajlar:
    72
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    0
    valla cok büyük iyilik yapmış olursun hocam 3 haftadır o kadar çok ihtiyacım varki özellikle ong farm yapanlar cok sevinecek hatta auto login programına bile entegre edebilirsin.
     
  8. mustafa491

    mustafa491 rank8

    Kayıt:
    17 Temmuz 2009
    Mesajlar:
    1
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    0
  9. Chorus

    Chorus Admin

    Kayıt:
    6 Şubat 2007
    Mesajlar:
    341.367
    Beğenilen Mesajlar:
    254
    Ödül Puanları:
    83
    Şehir:
    Taksim/IST.
    bilgim yok bu konuda ama alternatif programlarla işi kotarabilirsiniz.
     
  10. sarkolata

    sarkolata zaa xD

    Kayıt:
    15 Temmuz 2009
    Mesajlar:
    8.630
    Beğenilen Mesajlar:
    76
    Ödül Puanları:
    58
    Meslek:
    İt Kopuk
    Şehir:
    Istanbul City
    Artık re-form vardır heralde konuya 1sene olmuş :mrgreen:
     
  11. RecLast

    RecLast rank8

    Kayıt:
    7 Mart 2008
    Mesajlar:
    4.550
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    0
    Meslek:
    Programmer , Web Designer
    Şehir:
    Zonguldak/Düzce
    ^^ Ne yazıkki alternatif de yok ^^ Reform yapan tek program sro bot.

    Srobotun kodları olsaydı belki bişeyler yapabilirdik :)
     
  12. hanry007

    hanry007 rank8

    Kayıt:
    19 Ekim 2008
    Mesajlar:
    167
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    0

    Eeet malesef kı sro bot o pt reform ozellıgınden sbot dan 1 adım onde 8)