Seri 1k HP

Lütfen bi cevap verin

vericem size tüyo vericem 1dk

Alıntı :

vericem size tüyo vericem 1dk

Valla sen olmasan bizim halimiz nolurdu Proking

JustIWiseI demiş ki:

Benim teorime göre 1k buff sc yi silip basıyor ama nasıl yapıcağımı bilmiyorum bu tüyoysa tek tüyoyla bırakmayız

öle tüyomu olur onu bilmeyenmi var kod tüyosu vericem

Alıntı :

öle tüyomu olur onu bilmeyenmi var kod tüyosu vericem

Ben programlamaya yeni başladım normalde php ve photoshop cs 2 de ustayım isterseniz bende hertürlü yardım yapabilirim.Tüyo yerine tamamen versen süpr olur

bu kodlardaki pBytes(2) = &H3 basar pBytes(2) = &H6 olursa siler çok büyük bir tüyo


Dim ID As String
Dim ID1 As String
Dim ID2 As String
Dim IDs As Long
Dim skillid1
Dim skillid2
Dim skillid3
Dim skillhex As String


skillid = skillid
skillhex = Hex(skillid)
skillid1 = Mid$(skillhex, 4, 6)
skillid2 = Mid$(skillhex, 2, 2)
skillid3 = Mid$(skillhex, 1, 1)

IDs = ReadLong(KO_ADR_CHR + KO_OFF_ID)
ID = AlignDWORD(IDs)
ID1 = Strings.Mid(ID, 3, 2)
ID2 = Strings.Mid(ID, 5, 2)
Dim pBytes(1 To 18) As Byte
pBytes(1) = &H31
pBytes(2) = &H3
pBytes(3) = "&H" & skillid1
pBytes(4) = "&H" & skillid2
pBytes(5) = "&H" & skillid3
pBytes(6) = &H0
pBytes(7) = "&H" & ID1
pBytes( = "&H" & ID2
pBytes(9) = "&H" & ID1
pBytes(10) = "&H" & ID2
pBytes(11) = &H0
pBytes(12) = &H0
pBytes(13) = &H0
pBytes(14) = &H0
pBytes(15) = &H0
pBytes(16) = &H0
pBytes(17) = &H0
pBytes(18) = &H0
SendPackets pBytes
End Sub

Knkam Ben Bunları Nereye Eklicem Burda ?

CihatmanKing demiş ki:

Knkam Ben Bunları Nereye Eklicem Burda ?

sc sil mek ve sc bastırma kodu kalanını siz bulun

şuan sourceler var sc nin bastırılış yöntemi ile sildiriliş yöntemi aynı biraz deneme yapın beni sıkıştırmayınız arkadaşlar o sebeple konu kilit