| | Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler |  |
|
+7nakata11 celalibo hellpich 3yl3mci asker158 paper59 SessizAdam 11 posters |
|
| Yazar | Mesaj |
|---|
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
|  Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler ![Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler - Sayfa 2 Icon_minitime](https://2img.net/i/fa/icon_minitime.gif) Paz Haz. 14, 2009 11:12 am | |
| Arkadaşlar Çoğu Kodu Elimle Yazıyorum. Yanlışlık Olursa Afbuyrun... | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:13 am | |
| Irk Hack Yapalım: Karus İçin: - Kod:
-
WriteLong KO_ADR_CHR + nation, 1 Human İçin: - Kod:
-
WriteLong KO_ADR_CHR + nation, 2 | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:22 am | |
| Chat Flood Yapalım:2 Adet Text - 2 Adet CommandButton - 1 Adet ComboBox - 1 adet timerAnlatım: Text1 i küçük şekilde bir alana koyun ve içine 100 yazın. Text2 Yi Büyük Tutun. Flood Yapılacak Yazı. CommandButton'un 1.sini Test Et Yapın. 2. sini Başlat Yapın. ve ComboBox'u Ekleyin. CommandButton 1: (Başlat) - Kod:
-
If Check1.Value = 1 Then
Timer1.Enabled = True
Else
Timer1.Enabled = False
End If CommandButton 2: (Test Et) - Kod:
-
Notice Text2.Text Timer1: - Kod:
-
Notice Text2.Text Modülü Yazmam Uzun Sürecek Sabır  | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:24 am | |
| Char SabitleyeLim: - Kod:
-
If Check1.Value = 1 Then
WriteLong KO_ADR_CHR + KO_OFF_SWIFT, 1
Else
WriteLong KO_ADR_CHR + KO_OFF_SWIFT, 16256
End If | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:24 am | |
| Işınlanma Ekleyelim: - Kod:
-
Dim VVA As Single
VVA = ReadFloat(KO_ADR_CHR + KO_OFF_X)
WriteFloat KO_ADR_CHR + KO_OFF_X, VVA + 5
Dim VVA2 As Single
VVA2 = ReadFloat(KO_ADR_CHR + KO_OFF_Y)
WriteFloat KO_ADR_CHR + KO_OFF_Y, VVA2 + 5 | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:25 am | |
| Form Pozisyonunu Ayarlamak: - Kod:
-
SetWindowPos Form1.hwnd, _
lFlag, _
Form1.Left / Screen.TwipsPerPixelX, _
Form1.Top / Screen.TwipsPerPixelY, _
Form1.Width / Screen.TwipsPerPixelX, _
Form1.Height / Screen.TwipsPerPixelY, _
SWP_NOACTIVATE Or SWP_SHOWWINDOW | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:26 am | |
| Lupines Eyes Ekleyelim: - Kod:
-
If Check1.Value = 1 Then
WriteLong KO_ADR_CHR + KO_OFF_LUP, "1103626240"
Else
WriteLong KO_ADR_CHR + KO_OFF_LUP, "0"
End If | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:27 am | |
| Form Load Ayarı: - Kod:
-
PotID
Form1.Left = 11050
FormAcik = "1"
Label1_Click | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:27 am | |
| Form Timer Ayarı: - Kod:
-
Dim a1, a2, Msg As String
If GetAsyncKeyState(VK_F11) Then
If FormAcik = "0" Then
FormOn
Exit Sub
End If
If FormAcik = "1" Then
FormOff
Exit Sub
End If
End If | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
 Rep Puanı : 47
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:28 am | |
| Menü Açmak: - Kod:
-
STabOn1(0).Visible = False
STabOff1(0).Visible = True
STabOn1(1).Visible = True
STabOff1(1).Visible = False
STabOn1(2).Visible = True
STabOff1(2).Visible = False
page1.Left = 240
page1.Top = 840
page1.Visible = True
page2.Visible = False
page3.Visible = False
Bu Mantıkla Menüleri Çoğaltın. ________Kullanıcı İmzası_________ | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı : 47
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:29 am | |
| Menüde Açamayanlar SSTAB Kodu: - Kod:
-
If Button = 1 Then
If Index = 0 Then
STabOn1(0).Visible = False
STabOff1(0).Visible = True
STabOn1(1).Visible = True
STabOff1(1).Visible = False
STabOn1(2).Visible = True
STabOff1(2).Visible = False
page1.Left = 240
page1.Top = 840
page1.Visible = True
page2.Visible = False
page3.Visible = False
End If
If Index = 1 Then
STabOn1(1).Visible = False
STabOff1(1).Visible = True
STabOn1(0).Visible = True
STabOff1(0).Visible = False
STabOn1(2).Visible = True
STabOff1(2).Visible = False
page2.Left = 140
page2.Top = 740
page1.Visible = False
page2.Visible = True
page3.Visible = False
End If
If Index = 2 Then
STabOn1(2).Visible = False
STabOff1(2).Visible = True
STabOn1(1).Visible = True
STabOff1(1).Visible = False
STabOn1(0).Visible = True
STabOff1(0).Visible = False
page3.Left = 240
page3.Top = 940
page1.Visible = False
page2.Visible = False
page3.Visible = True
End If
End If ________Kullanıcı İmzası_________ | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı : 47
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:30 am | |
| Charınızın HP & MP 'ini Okutmak: - Kod:
-
LabelHP.Caption = ReadLong(KO_ADR_CHR + KO_OFF_HP)
Labelmp.Caption = ReadLong(KO_ADR_CHR + KO_OFF_MP)
LabelHp2.Caption = ReadLong(KO_ADR_CHR + KO_OFF_HP)
If Combo1.Text = "" Then
Else
If UseOtocanPot = 1 Then
Dim CurrentHP As Long, maxhp As Long, HEALON2 As Single, HEALON As Long
CurrentHP = ReadLong(KO_ADR_CHR + KO_OFF_HP)
maxhp = ReadLong(KO_ADR_CHR + KO_OFF_MAXHP)
HEALON2 = HealPercent
HEALON = Round(HEALON2, 0)
If CurrentHP <= HEALON And CurrentHP <> 0 Then
PotionDiff = DateDiff("s", PotionTimer, Now)
If PotionDiff >= 3 Then
Skill Combo1.ItemData(Combo1.ListIndex)
End If
End If 'end if van UseAutoHeal = 1
End If
End If
If Combo2.Text = "" Then
Else
If UseOtomanapot = 1 Then
Dim CurrentMP As Long, MaxMP As Long, ManaON2 As Single, ManaON As Long
CurrentMP = ReadLong(KO_ADR_CHR + KO_OFF_MP)
MaxMP = ReadLong(KO_ADR_CHR + KO_OFF_MAXMP)
ManaON2 = ManaPercent
ManaON = Round(ManaON2, 0)
If CurrentMP <= ManaON And CurrentMP <> 0 Then
PotionDiff = DateDiff("s", PotionTimer, Now)
If PotionDiff >= 3 Then
Skill Combo2.ItemData(Combo2.ListIndex)
End If
End If
End If
End If ________Kullanıcı İmzası_________ | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı : 47
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:30 am | |
| MOB IDsi Bulmak (%) Hesabı: - Kod:
-
Dim IDs As Long
Dim ID As String
Dim ID1 As String
Dim ID2 As String
Dim MobXIDs As String
Dim MobXID As String
Dim MobXID1 As String
Dim MobXID2 As String
Dim attackskill As String
IDs = ReadLong(KO_ADR_CHR + KO_OFF_ID)
MobXIDs = ReadLong(KO_ADR_CHR + KO_OFF_MOB)
MobXID = Hex(MobXIDs)
MobXID1 = Strings.Right(MobXID, 2)
MobXID2 = Strings.Left(MobXID, 2)
ID = AlignDWORD(IDs)
ID1 = Strings.Mid(ID, 3, 2)
ID2 = Strings.Mid(ID, 5, 2)
CharID = ID1 & ID2
MobID = MobXID1 & MobXID2 ________Kullanıcı İmzası_________ | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı : 47
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 11:32 am | |
| İSTEKLERİNİZİ BEKLİYORUM.. ________Kullanıcı İmzası_________ | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı : 47
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 4:47 pm | |
| Auto Defance: Modül İçin: - Kod:
-
Form1.Combo3.AddItem "Evade"
Form1.Combo3.ItemData(Form1.Combo3.NewIndex) = 710
Form1.Combo3.AddItem "Safety"
Form1.Combo3.ItemData(Form1.Combo3.NewIndex) = 730
Form1.Combo3.AddItem "Scaled skin"
Form1.Combo3.ItemData(Form1.Combo3.NewIndex) = 760 Check: - Kod:
-
If Combo1.Text = "" Then
Check1.Value = 0
Else
If Check1.Value = 1 Then
safety
Timer1.Enabled = True
Label1.Caption = "30"
Else
Timer1.Enabled = False
Label1.Caption = "30"
End If
End If Timer: - Kod:
-
Dim safetytime
Label1.Caption = Label1.Caption - 1
safetytime = Label1.Caption[/b]
[b]If Label1.Caption = 0 Then
safety
Label1.Caption = "30"
End If ________Kullanıcı İmzası_________ | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı : 47
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Paz Haz. 14, 2009 4:51 pm | |
| OpakLık: 1 Adet HScroll Ekliyoruz: - Kod:
-
MakeTransparent Me.hwnd, HS.Value ________Kullanıcı İmzası_________ | |
|
| | |
asker158
Level 1
Mesaj Sayısı : 16
Nerden : konya
Kayıt tarihi : 03/06/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Ptsi Haz. 15, 2009 9:58 am | |
| sessizadam benim gibi vb 6.0 kullanmasını bilmeyen ancak koxp yapmaı cok isteyen ve bunu için herseyi yapacak olan arkadaslarada yardım edermsn geveze.forum7 koxpu yapmak istiyorum yardımına ihtiyacım var...
tesekkürler,
asker158
En son asker158 tarafından Salı Haz. 16, 2009 7:44 am tarihinde değiştirildi, toplamda 1 kere değiştirildi (Sebep : ehemniyetsiz) | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı : 47
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Ptsi Haz. 15, 2009 11:10 am | |
| kodlar ortada  ________Kullanıcı İmzası_________ | |
|
| | |
3yl3mci
Level 20
Mesaj Sayısı : 23
Kayıt tarihi : 16/05/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Ptsi Haz. 15, 2009 11:48 am | |
| Koxp İÇin eğtim seti çıkartsanız yani 50cd olsa bile indirirm  | |
|
| | |
hellpich
Level 40
Mesaj Sayısı : 43
Kayıt tarihi : 29/05/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Ptsi Haz. 15, 2009 2:52 pm | |
| krdeş bi de modul kodunu yani toplm modul kodunu ve dinbut8 kodnu kyabilirmisin | |
|
| | |
3yl3mci
Level 20
Mesaj Sayısı : 23
Kayıt tarihi : 16/05/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Ptsi Haz. 15, 2009 4:39 pm | |
| Ağa vb6 ile hazırladığım proyi kaydettim size upload ettim bakarmısınız tek nik bir arıza veriyorr :S uygulamaya çevirrken birde eksik diğer eksikleri giderirmisinizz PLss Çoksağol şimdiden [Linkleri görebilmek için üye olun veya giriş yapın.] Bu ben | |
|
| | |
celalibo
Level 50
Mesaj Sayısı : 100
Kayıt tarihi : 15/05/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Salı Haz. 16, 2009 4:02 am | |
| oto wolfün intervali ne olacak? | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı : 47
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Salı Haz. 16, 2009 6:22 am | |
| 122sn. ye eşitle. ________Kullanıcı İmzası_________ | |
|
| | |
asker158
Level 1
Mesaj Sayısı : 16
Nerden : konya
Kayıt tarihi : 03/06/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Salı Haz. 16, 2009 7:46 am | |
| - SessizAdam demiş ki:
- kodlar ortada
haklısın ama ben hiç bilmiom kodları nereye yapıstırcaz... yapıstırınca napcaz*????? . tessekürler, asker158 | |
|
| | |
celalibo
Level 50
Mesaj Sayısı : 100
Kayıt tarihi : 15/05/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Salı Haz. 16, 2009 2:20 pm | |
| - SessizAdam demiş ki:
- 122sn. ye eşitle.
kaç olsun işte interval? ya da sen kaç yapıyorsun | |
|
| | |
nakata11
Level 1
Mesaj Sayısı : 2
Kayıt tarihi : 14/06/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Salı Haz. 16, 2009 4:56 pm | |
| sessiz adam öncelikle verdiğin bilgiler için çok sağol ama senin dediğin gibi yaptım ama bir türlü rpr yapmadı koxp deli olacam iron crosbow +3 ve +7 var nasıl rpr yaptıracağım module bir şey ekleyecekmiyim anlatırmısın bu oto rpr mantığını anlayamadım sadece item kodu var rpr kodu yollamıyormuyuz bu item kodunu nasıl algılayıp rpr yapıyor modulemi bir şey ekleyeceğiz nasıl denediysem olmadı çıldıracağım. | |
|
| | |
SessizAdam
Sponsor
Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı : 47
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Salı Haz. 16, 2009 6:47 pm | |
| Anlatıyım
If Form1.OtoRprList.Text = "IronX(+1" Then
ItemID = "943F080S"
Örnek Bunu Vereyim. Simdi Form'un Görünmez Bir Kısmına List Ekle. Adı "OtoRprList" Olsun. Bu Kdr. ________Kullanıcı İmzası_________ | |
|
| | |
celalibo
Level 50
Mesaj Sayısı : 100
Kayıt tarihi : 15/05/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Çarş. Haz. 17, 2009 12:54 pm | |
| sessiz senin oto wolf intervali kaç | |
|
| | |
lzalim07l
Level 1
Mesaj Sayısı : 2
Kayıt tarihi : 23/04/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Çarş. Haz. 17, 2009 3:25 pm | |
| sessiz adam bunları yapdım bunları nasıl exe halıne getırecegım sımdıden tesekkurler daha yeniyim k.bakma | |
|
| | |
nakata11
Level 1
Mesaj Sayısı : 2
Kayıt tarihi : 14/06/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Çarş. Haz. 17, 2009 4:42 pm | |
| sessiz adam rahatsız ediyorum kusura bakma ama harbi delireceğim ya herşey tamam bu oto rpr olmuyor senden ricam sadece oto rpr yapan bir exe source kodları yaparmısın okun cinsi önemli değil bow için yap bow için kullanıp deneyeyim olmadı ya yapamadım bir türlü içinde başka hiç bir özellik olmasın sadece bir tane ok cinsini rpr eden bir kod olsun yeter | |
|
| | |
3yl3mci
Level 20
Mesaj Sayısı : 23
Kayıt tarihi : 16/05/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Perş. Haz. 18, 2009 1:30 pm | |
| [Linkleri görebilmek için üye olun veya giriş yapın.] sessiz adam bir de buna bakrmısın plss vb6 ile hazırladığım projee exe çevirince hata veriyor:S | |
|
| | |
Dertman!
Level 1
Mesaj Sayısı : 1
Kayıt tarihi : 28/07/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Perş. Tem. 30, 2009 3:07 pm | |
| bazı kodlar yanlıs kaydettırmıo v.b | |
|
| | |
caglar1994
Level 1
Mesaj Sayısı : 14
Kayıt tarihi : 24/05/09
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Cuma Tem. 31, 2009 7:10 pm | |
| Bu kodlar pwp de calısırmı lutfen acıl cewap pls ... bide sadece hp mp eklıcem koxp uma onun ıcın knight online client yükle koymalımıyım? acıl cevp pls sessiz adam | |
|
| | |
salveres34
Level 1
Mesaj Sayısı : 1
Kayıt tarihi : 06/07/12
Rep Puanı : 0
| | Konu: Geri: Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler Cuma Tem. 06, 2012 12:36 pm | |
| ya bi vidyo içinde gostersen ? | |
|
| | |
| | Özel Anlatımlarımız [SessizAdam'dan] Koxp Yapmak İsteyenler | |
|
