Karşı Irka Atak Kodu

evet beyler şimdi sizlere atak kodunu vericem ama biraz karışık ama kolay anlıosanız az laf çok iş xD

Kod:

Function MobID()
Dim pPtr As Long
Dim GetMobID As String
Dim GetMBID As Long
pPtr = ReadLong(KO_PTR_CHR)
GetMBID = ReadLong(pPtr + KO_OFF_MOB)
GetMobID = AlignDWORD(GetMBID)
MobID = Strings.Mid(GetMobID, 1, 4)
End Function

Evet beyler kod bu bunu skill modulenizin yada ana modulenizin alt veya üst kısımlarından bi yere yazın.. Ama bu kadarla bittmi hayır tabikide şimdi geldi atak timerlerindeki kodları deişmeye eğer kodları moduleye yazıp timerede sadece mesela rogueatak,atak gibi şeyler yazdıysanız bu sefer moduleden deişin yani atak kodunun en altındaki:::

Kod:

pStr = ("3101" + AttackID1 + AttackID2 + "0" + AttackID3 + "00" + ID1 + ID2 + MobID + "0000000000000000000000000D00")
ConvHEX2ByteArray pStr, pBytes
SendPackets pBytes
pStr = ("3102" + AttackID1 + AttackID2 + "0" + AttackID3 + "00" + "FFFF" + MobID + "0D020600B7019BFF0000F0000F00")
ConvHEX2ByteArray pStr, pBytes
SendPackets pBytes
pStr = ("3103" + AttackID1 + AttackID2 + "0" + AttackID3 + "00" + ID1 + ID2 + MobID + "0D020600B7019BFF0000F0000F00")
ConvHEX2ByteArray pStr, pBytes
SendPackets pBytes

Bunu yazın normalde mobId yazan yerlerde mobxd1 fln yazıo oraları silin bunu yazın.aynı şeyleri warrior ataktada yapın isterseniz arenada deneyinxD

alıntıdır