DEVILCRAFT Oluşturuldu: Mayıs 17, 2014 Share Oluşturuldu: Mayıs 17, 2014 Eski fonksiyonlar pointer + offsetler güncellerseniz tıkırında çalışır. Çar Kazı Yapıyor mu ? Function MineControl() As Boolean '// SexClub '007FC44F - 8A 85 CD070000 - mov al,[ebp+000007CD] If ReadByte(ReadLong(KO_PTR_DLG) + &H7CD) = 1 Then MineControl = True Exit Function Else MineControl = False End If End Function Sundries Açık mı ? (hp,mp pot bitince town at özelliği içinde kullanılabilir) Function SundriesControl() As Boolean '// SexClub '0077F676 - A1 5CE0C200 - mov eax,[00C2E05C] '0077F686 - 8B 88 C0010000 - mov ecx,[eax+000001C0] '0077F690 - 38 99 C0000000 - cmp [ecx+000000C0],bl If ReadByte(ReadLong(ReadLong(KO_PTR_DLG) + &H1C0) + &HC0) = 1 Then SundriesControl = True Exit Function Else SundriesControl = False End If End Function Hedef Seçili mi ? Function TargetControl() As Boolean '// SexClub '0082AB58 - 8B 85 BC010000 - mov eax,[ebp+000001BC] '0082AB66 - 8A 88 C0000000 - mov cl,[eax+000000C0] If ReadByte(ReadLong(ReadLong(KO_PTR_DLG) + &H1BC) + &HC0) = 1 Then TargetControl = True Exit Function Else TargetControl = False End If End Function Banka Açık mı ? Function BankControl() As Boolean '// SexClub '0077F6D7 - 8B 88 EC010000 - mov ecx,[eax+000001EC] '0077F6E1 - 38 99 C0000000 - cmp [ecx+000000C0],bl If ReadByte(ReadLong(ReadLong(KO_PTR_DLG) + &H1EC) + &HC0) = 1 Then BankControl = True Exit Function Else BankControl = False End If End Function Yorum bağlantısı Sitelerde Paylaş More sharing options...
Önerilen Mesajlar