ALPA
Site Kurucusu
Mesaj Sayısı : 815
Nerden : Ankara
Kayıt tarihi : 02/03/09
 Rep Puanı : 32
 |  Konu: Visual Basic Mana save kodları 1728  Çarş. Nis. 08, 2009 5:12 pm | |
| 'Modüle ekle - Kod:
-
Public Sub ManaSAVE()
Dim pPtr As Long
pPtr = ReadLong(KO_CHRDMA)
WriteLong pPtr + 2364, KO_OFF_MAXMP
End Sub
'Public Sub MaxMana() 'The manasave
'Dim pPtr As Long
'pPtr = ReadLong(KO_CHRDMA)
'WriteLong pPtr + 2360, totalMP
'End Sub
'by aster
sonra forma ekle
Private Sub Check18_Click()
If Check18.Value = 1 Then
ManaSAVE
End If
End Sub | |
|
CeRKeS
Level 45
Mesaj Sayısı : 87
Kayıt tarihi : 04/05/09
Rep Puanı : 2
| | Konu: Geri: Visual Basic Mana save kodları 1728 Çarş. Mayıs 27, 2009 5:49 am | |
| Hp Savede Yapabilirmiyiz acaba ? | |
|
