Knight OnLine Güncel Koxp - Koxp Yapımı- Programlama - USKoxp ...
Sitemize Üye Değilseniz Lütfen Üye Olunuz. Eğer Üye İseniz Giriş Yapınız... Sitemizdeki Linkleri Görebilmeniz ve Konulara Cevap Yazabilmek İçin İçin Üye Olmanız Gerekmektedir...



 
AnasayfaTakvimAramaKayıt OlGiriş yap

Paylaş | 
 

 Seri CS - Attack Hızını Ayarlama

Aşağa gitmek 
YazarMesaj
ByLetsFeeL
Admin
Admin
avatar

Mesaj Sayısı : 161
Puanlar : 145791501
REP : 94
Kayıt tarihi : 02/02/10
Nerden : Nereyee...

MesajKonu: Seri CS - Attack Hızını Ayarlama   Paz Şub. 21, 2010 4:56 pm

Evet arkadaşlar şimdi seri cs yapımı ve bu seri cs nin atack hızını ayarlamayı yapıcaz..

1 adet check box açın ve bu kodu girin (caption seri cs)

Kod:
Private Sub Check26_Click()
If Check26.Value = 1 Then
Timer5.Enabled = True
Else
Timer5.Enabled = False
End If
End Sub

1 Adet Timer açın bu kodu girin. enabled= false interwal = 1350

Kod:
Private Sub Timer5_Timer()
On Error Resume Next
Dim pStr As String
Dim pBytes() As Byte
Dim skillid As String

Dim AttackID1 As String
Dim AttackID2 As String
Dim AttackID3 As String
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
Class = ReadLong(KO_ADR_CHR + KO_OFF_CLASS)

attackid = Class & 552

IDs = ReadLong(KO_ADR_CHR + KO_OFF_ID)
MobXIDs = ReadLong(KO_ADR_CHR + KO_OFF_MOB)



ID = AlignDWORD(IDs)
ID1 = Strings.Mid(ID, 3, 2)
ID2 = Strings.Mid(ID, 5, 2)



MobXID = Hex(MobXIDs)
MobXID1 = Strings.Right(MobXID, 2)
MobXID2 = Strings.Left(MobXID, 2)


attackskill = Hex(attackid)
AttackID1 = Strings.Right(attackskill, 2)
AttackID2 = Strings.Mid(attackskill, 2, 2)
AttackID3 = Strings.Left(attackskill, 1)

pStr = ("3101" + AttackID1 + AttackID2 + "0" + AttackID3 + "00" + ID1 + ID2 + MobXID1 + MobXID2 + "5D020600B6019BFF0000F0000A00")

ConvHEX2ByteArray pStr, pBytes
SendPackets pBytes

pStr = ("3102" + AttackID1 + AttackID2 + "0" + AttackID3 + "00" + "FFFF" + MobXID1 + MobXID2 + "5D020600B6019BFF0000F0000A00")

ConvHEX2ByteArray pStr, pBytes
SendPackets pBytes


pStr = ("3103" + AttackID1 + AttackID2 + "0" + AttackID3 + "00" + ID1 + ID2 + MobXID1 + MobXID2 + "0000000000000000000000000000")

ConvHEX2ByteArray pStr, pBytes
SendPackets pBytes
End Sub

Seri Cs Atack hızını ayarlama:
1 adet label açın Captionuna Seri cs atack hızı filan kendiniz bişiler yazın..

1 adet text box açın (oraya atack hızı sayısı girilcek)

1 adet command açın şu kodu yazın:

Kod:
Timer5.Interval = Text15

Timer5 seri cs nin timerıydı Text15 ise atack hızı sayısı girilcek text..

TİMER CHECK VS. HEPSİNİN NUMARALARINI KENDİNİZE GÖRE AYARLAYIN..


ByLetsFeeL
Bi Tşk. Yeter...
Sayfa başına dön Aşağa gitmek
http://koxpworld.yetkin-forum.com
burak
Moderator
Moderator
avatar

Mesaj Sayısı : 26
Puanlar : 16267
REP : 0
Kayıt tarihi : 08/02/10
Yaş : 22
Nerden : Konya

MesajKonu: Geri: Seri CS - Attack Hızını Ayarlama   Paz Şub. 21, 2010 5:57 pm

Teşekkürler
Sayfa başına dön Aşağa gitmek
http://www.forumkat.com
 
Seri CS - Attack Hızını Ayarlama
Sayfa başına dön 
1 sayfadaki 1 sayfası

Bu forumun müsaadesi var:Bu forumdaki mesajlara cevap veremezsiniz
Knight OnLine Güncel Koxp - Koxp Yapımı- Programlama - USKoxp ... :: Knight OnLine Koxp - TBL & Bug - Hile :: Koxp Yapımı - Programlama :: Anlatımlar-
Buraya geçin: