Jump to content
  • Kaydol

Party Cure Kontrol [Kod]


POK3M0N
 Share

Önerilen Mesajlar

Function CureKontrol
Dim CureUye(1 to 8) as Long
CureUye(1)=ReadLong(ReadLong(ReadLong(ReadLong(ReadLong(KO_PARTY) + &H1C8) + &H35C) + &H0) + &H25)
CureUye(2)=ReadLong(ReadLong(ReadLong(ReadLong(ReadLong(ReadLong(KO_PARTY) + &H1C8) + &H35C) + &H0) + &H0) + &H25)
CureUye(3)=ReadLong(ReadLong(ReadLong(ReadLong(ReadLong(ReadLong(ReadLong(KO_PARTY) + &H1C8) + &H35C) + &H0) + &H0) + &H0) + &H25)

If CureUye(1)=1 Then Cure1
If CureUye(2)=1 Then Cure2
If CureUye(3)=1 Then Cure3
End Function

(KO_PARTY) + &H1C8) + &H35C) + &H0) + &H0) + &H25) her sayıda +1 arttırın

KO_OFF_PARTY = &HC1ED4C

PartySayusı = &H360
PartyID = &H8

Yorum bağlantısı
Sitelerde Paylaş

Misafir
Bu konu kapalıdır ama konuya cevap yazmaya yetkiniz var görünüyor.
 Share

×
×
  • Yeni Oluştur...