Basvurmak icin tiklayin!
Basvurmak icin tiklayin!

Tüm zamanlar UTC - 2 saat [ GITZ ]




Yeni başlık gönder Başlığa cevap ver  [ 2 mesaj ] 
Yazar Mesaj
 Mesaj Başlığı: AutoIt # Tıkla-Girsin # ByUzZy
MesajGönderilme zamanı: 07 May 2011 
Tanınıyorum
Tanınıyorum
Çevrimdışı
Kullanıcı avatarı

Kayıt: 07 May 2008
Mesajlar: 313

Server: Odin

Takımı: Galatasaray





İlk olarak şunu diyeyim autoit ten fazla anlamama rağmen deneme-yanılma yöntemi ile bir program elde ettim. :)
İlk olarak ibot kısayolu öğrenelim kısaca.

C:\iBot\iBot.exe SN:1 SU:MyUsername SP:MyPassword AS:CharName AB:2 AC HI
Bu şekilde kodumuzu aşağıdakilere göre ayarladıktan sonra esas kısma geçiş yapabiliriz.

- SN:1 Xiana ayarlamak için (1=Xian)
- SU:kullanıcı adı | Karakter ismini ayarlayın.
- SP:şifre | Şifrenizi ayarlayın
- AS:karakter ismi | Oyuna girdikten sonra seçilecek karakter ismini ayarlayın.
- AB:2 | Hiçbirşey yapmaya ayarlayın. (1 de otomatik bot başlar)
- AC | Deneme aralıklarını yazın (20sn(20.000) ya da 8sn(8000) yazın )
- HI | Ibot penceresini saklayın.

/-----------------------------------------------------------------------\
| Silkroad Server #: |
+-----------------------------------------------------------------------+

# Silkroad Server İsimleri
1 Xian
2 Aege
3 Troy
4 Athens
5 Oasis
6 Venice
7 Greece
8 Alps
9 Olympus
10 Tibet
11 Babel
12 RedSea
13 Rome
14 Sparta
15 Eldorado
16 Pacific
17 Alexander
18 Persia
19 Zeus
20 Poseidon
21 Hercules
22 Odin
23 Mercury
24 Mars
25 Saturn
26 Venus
27 Uranus
28 Pluto
29 Neptune
30 Hera
31 Gaia
32 Eos
33 Phoenix
34 Ares
35 Iris
36 Titan
37 Apollo


Kodumuzu ayarladıktan sonra autoiti açıp aşağıdaki kodu yapıştırıyoruz. Ve sadece bizi ilgilendiren kısımları değiştiriyoruz.
Kod:
#include <GUIConstantsEx.au3>

Opt('MustDeclareVars', 1)

Example()

Func Example()
   Local $Button_1, $Button_2, $Button_3, $Button_4, $Button_5, $Button_6, $Button_7, $Button_8, $msg
   GUICreate("ByUzZy # Tıkla-Girsin")


   Opt("GUICoordMode", 2)
               
   $Button_1 = GUICtrlCreateButton(" Karakter adı # 1 ", 15, 15, 85, 30)      ; Karakter adı kısmına karakterinizin adını yazınız.
   
               GUICtrlSetImage(-9, "xD", 10)   ; xD yi silip görünmesini istediğiniz ikonu buraya koyunuz.
               
               ;            ( F:\Users\Sech\Desktop\Yeni Klasör (2)\ICO\Mail.ico gibi ) İsteğe göre silinebilir.
               
               
               
   $Button_2 = GUICtrlCreateButton(" Karakter adı # 1 CLess Mod", 0, -1)      ; Karakter adı kısmına karakterinizin adını yazınız.
   
               GUICtrlSetImage(-1, "xD", 10)   ; xD yi silip görünmesini istediğiniz ikonu buraya koyunuz.
               
               ;            ( F:\Users\Sech\Desktop\Yeni Klasör (2)\ICO\Mail.ico gibi ) İsteğe göre silinebilir.
               
               
               
               
   $Button_3 = GUICtrlCreateButton(" Karakter adı # 2 ", -170, 10, 85, 30)      ; Karakter adı kısmına karakterinizin adını yazınız.
   
               GUICtrlSetImage(-10, "xD", 9)   ; xD yi silip görünmesini istediğiniz ikonu buraya koyunuz.
               
               ;            ( F:\Users\Sech\Desktop\Yeni Klasör (2)\ICO\Mail.ico gibi ) İsteğe göre silinebilir.
               
               
               
               
   $Button_4 = GUICtrlCreateButton(" Karakter adı # 2 Cless Mod ", 0, -1)         ; Karakter adı kısmına karakterinizin adını yazınız.
   
               GUICtrlSetImage(-1, "xD", 7)   ; xD yi silip görünmesini istediğiniz ikonu buraya koyunuz.
               
               ;            ( F:\Users\Sech\Desktop\Yeni Klasör (2)\ICO\Mail.ico gibi ) İsteğe göre silinebilir.
               
               
               
   $Button_5 = GUICtrlCreateButton(" Karakter adı # 3 ", -170, 10, 85, 30)         ; Karakter adı kısmına karakterinizin adını yazınız.
               GUICtrlSetImage(-1, "xD", 7)   ; xD yi silip görünmesini istediğiniz ikonu buraya koyunuz.
               ;            ( F:\Users\Sech\Desktop\Yeni Klasör (2)\ICO\Mail.ico gibi ) İsteğe göre silinebilir.
               
               
               
   $Button_6 = GUICtrlCreateButton(" Karakter adı # 3 Cless Mod ", 0, -1)         ; Karakter adı kısmına karakterinizin adını yazınız.
               GUICtrlSetImage(-1, "xD", 7)   ; xD yi silip görünmesini istediğiniz ikonu buraya koyunuz.
               ;            ( F:\Users\Sech\Desktop\Yeni Klasör (2)\ICO\Mail.ico gibi ) İsteğe göre silinebilir.
               
               
   $Button_7 = GUICtrlCreateButton(" Karakter adı # 4 ", -170, 10, 85, 30)         ; Karakter adı kısmına karakterinizin adını yazınız.
               GUICtrlSetImage(-1, "xD", 7)   ; xD yi silip görünmesini istediğiniz ikonu buraya koyunuz.
               ;            ( F:\Users\Sech\Desktop\Yeni Klasör (2)\ICO\Mail.ico gibi ) İsteğe göre silinebilir.
               
               
   $Button_8 = GUICtrlCreateButton(" Karakter adı # 4 Cless Mod", 0, -1)      ; Karakter adı kısmına karakterinizin adını yazınız.
               GUICtrlSetImage(-1, "xD", 7)   ; xD yi silip görünmesini istediğiniz ikonu buraya koyunuz.
               ;            ( F:\Users\Sech\Desktop\Yeni Klasör (2)\ICO\Mail.ico gibi ) İsteğe göre silinebilir.
      GUISetState()      ; 8 buton ile çalışacak.

   ; Run the GUI until the dialog is closed
   While 1
      $msg = GUIGetMsg()
      Select
         Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
         Case $msg = $Button_1
            Run(' ')    ; Daha önce ayarladığımız C:\iBot\iBot.exe SN:1 SU:MyUsername
            ; SP:MyPassword AS:CharName AB:2 AC HI örnek kodu tırnaklar arasına boşluk olmadan yerleştiriyoruz.
         Case $msg = $Button_2
            Run(' ')    ; Daha önce ayarladığımız C:\iBot\iBot.exe SN:1 SU:MyUsername
            ; SP:MyPassword AS:CharName AB:2 AC HI örnek kodu tırnaklar arasına boşluk olmadan yerleştiriyoruz. Sonuna CL eklemeyi unutmayın.
         Case $msg = $Button_3
            Run(' ')    ; Daha önce ayarladığımız C:\iBot\iBot.exe SN:1 SU:MyUsername
            ; SP:MyPassword AS:CharName AB:2 AC HI örnek kodu tırnaklar arasına boşluk olmadan yerleştiriyoruz.
         Case $msg = $Button_4
            Run(' ')    ; Daha önce ayarladığımız C:\iBot\iBot.exe SN:1 SU:MyUsername
            ; SP:MyPassword AS:CharName AB:2 AC HI örnek kodu tırnaklar arasına boşluk olmadan yerleştiriyoruz. Sonuna CL eklemeyi unutmayın.
         Case $msg = $Button_5
            Run('')     ; Daha önce ayarladığımız C:\iBot\iBot.exe SN:1 SU:MyUsername
            ; SP:MyPassword AS:CharName AB:2 AC HI örnek kodu tırnaklar arasına boşluk olmadan yerleştiriyoruz.
         Case $msg = $Button_6
            Run('')    ; Daha önce ayarladığımız C:\iBot\iBot.exe SN:1 SU:MyUsername
            ; SP:MyPassword AS:CharName AB:2 AC HI örnek kodu tırnaklar arasına boşluk olmadan yerleştiriyoruz. Sonuna CL eklemeyi unutmayın.
         Case $msg = $Button_7
            Run('')    ; Daha önce ayarladığımız C:\iBot\iBot.exe SN:1 SU:MyUsername
            ; SP:MyPassword AS:CharName AB:2 AC HI örnek kodu tırnaklar arasına boşluk olmadan yerleştiriyoruz.
         Case $msg = $Button_8
            Run('')    ; Daha önce ayarladığımız C:\iBot\iBot.exe SN:1 SU:MyUsername
            ; SP:MyPassword AS:CharName AB:2 AC HI örnek kodu tırnaklar arasına boşluk olmadan yerleştiriyoruz. Sonuna CL eklemeyi unutmayın.
      EndSelect
   WEnd
EndFunc   ;==>Example


Kendime yaptığım tıkla-girsin tarzı acemi bir program. :D
Burda görüntüsü

Resim

AutoIt'ten anlayanlardan bir isteğim var şu ikonları tam sıraya sokamadım bir el atarsanız sevinirim.
Emeğe saygı .( Herşeyi bana aittir ) Yorumlarınızı da bekler(yor)im

_________________
Resim


Başa Dön
 Profil  
 
MesajGönderilme zamanı: 07 May 2011 
Aileden
Aileden
Çevrimdışı

Kayıt: 15 Tem 2009
Mesajlar: 5014
Konum: Ong Habitat

Server: Caspian

Takımı: Galatasaray




Güzel , geliştirilebilir ^^ Zaten mbotac , sbotac hepsi bu command line mantıgı ile çalışıyor.
Programcılığa yeni başlıyorsan keşke auto-it başlamasaydın. En nefret ettiğim dildir kendileri.
Bende çok usta sayılmam ama vb.net c#bilgim var orta düzeyde.

_________________
Resim

Creddy(PVP) 110Cap BlackRogue

Tüm vsro serverları için bot.
Orijinal ePvp link.


Başa Dön
 Profil  
 
Eskiden itibaren mesajları göster:  Sırala  
Yeni başlık gönder Başlığa cevap ver  [ 2 mesaj ] 

Tüm zamanlar UTC - 2 saat [ GITZ ]


Kimler çevrimiçi

Bu forumu gezen kullanıcılar: Hiç bir kayıtlı kullanıcı yok ve 2 misafir


Bu foruma yeni başlıklar gönderemezsiniz
Bu forumdaki başlıklara cevap veremezsiniz
Bu forumdaki mesajlarınızı düzenleyemezsiniz
Bu forumdaki mesajlarınızı silemezsiniz

Aranacak:
Geçiş yap:  
Powered by phpBB® Forum Software © phpBB Group

Türkçe çeviri: phpBB Türkiye
phpBB SEO