Öncelikle Selamın Aleyküm Beyler Bugün Açma kapamalı hile kodlamayı göstericem öncelikle konu bana aittir daha önce böyle konu açanı görmedim oyüzden rep verirseniz makbule geçer data:image/webp;base64,UklGRrACAABXRUJQVlA4TKMCAAAvFUAFELfjtNq2ZXmeD3dJHh0m8B3oGqlsoBsQSdBcM4nDAg6VJs2dNdzEtu0qe9+fsyOCDuoctFBRfRM4oEcIg4DYfSi2rS3L7vN+uLsMwBsJEtUZB4vu7g7NdQyQJJFpjID6W3d52TaSpDhcu3ePFtv85geA/4QoLK8lDpjv+257nETgWqfhe//Ay+XhSxRwuoXq/WnuXZdyyuofy/Ww+sd0EjYBfsw3g48TIjjmf4Lyh1/ft7JATjTv1udm9/tLRwTStjowz24Wm15XeflT0xDIAUI4SUoIKEpIciFDRSCoGUCAMGqMrr6JUjCOKQp5TuoRBEi2OGvmCUI45Gp5j3pZGAMSw8TEIgiUCGEXCl4/bFXw8kGWMmFzZg6EyJDqNa2SlAEU5BlDiT7svvUbQNzEPfInEA7eQaBgMeUYK9KMkacijH/yQmDG4Zw/EIDgpIXA3qpGWKR5o0ilRJB/8kOWMhIkqhrkeEYJASL4+4cSQiAHiLZtm25i20Yd3NhO3ca2bbX3/8dT0z+I6L8Ct22UG/PRK0hYYLAEIpGAxSARAk0iVxohNCrlEhpeIzMVkAAUTDKWxBpICBoxGV1MhP5AJlqhgH+CAimQwCtAQmLIkU7jj1TrB8KfRvJrjvSTM1hKCI9JAPxdCDt+AJ5PECpZAuR+RrFiOf1+2KZfK4X4ErkvgQgpX9Wru+P8cplcdtXaGskViX6H3z6btdfHQM9q830Of0V8Q9Bms0XbOIgimwga+FytDYHMbDabTpG8DLoLLVdoQjpZnAA83N8+AuC0IP1MQp4O6eR2AGC+uTM/AYcb6afj0WV6X6IUAC5vJOKxg0Ap4dNL6SQqW3X+GYTeFvv94iU8+DmrORT8C26a+Ww219xgXvDK1/7Hz7j2FwEA
Öncelikle checkboxlara kodunu giriyoruz sonra timera geliyoruz mesela timer 5 e kodluycaksınız şu kodu yazıyoruz Timer kaçsa üstteki ve alttaki checkbox.checked sayısını düzenleyin ona göre sonra ise pointer ve value yazan yere girin
Kod:
If CheckBox5.Checked = True Then
WriteLong("wolftü.bin", Label1.Text + &HPointer, "Value")
End If
If CheckBox5.Checked = False Then
WriteLong("wolftü.bin", Label1.Text + &HPointer, "Value")
End If
End Sub
Örnek Çalışan Kod Name Esp : (12.05.2016 çalışıyor)
If CheckBox1.Checked = True Then
WriteLong("wolftü.bin", Label1.Text + &H358130, "2251829620")
End If
If CheckBox1.Checked = False Then
WriteLong("wolftü.bin", Label1.Text + &H358130, "2251829621")
End If
End Sub
Bilgileri toplayıp konu olarak paylasyrm
Öncelikle checkboxlara kodunu giriyoruz sonra timera geliyoruz mesela timer 5 e kodluycaksınız şu kodu yazıyoruz Timer kaçsa üstteki ve alttaki checkbox.checked sayısını düzenleyin ona göre sonra ise pointer ve value yazan yere girin
Kod:
If CheckBox5.Checked = True Then
WriteLong("wolftü.bin", Label1.Text + &HPointer, "Value")
End If
If CheckBox5.Checked = False Then
WriteLong("wolftü.bin", Label1.Text + &HPointer, "Value")
End If
End Sub
Örnek Çalışan Kod Name Esp : (12.05.2016 çalışıyor)
If CheckBox1.Checked = True Then
WriteLong("wolftü.bin", Label1.Text + &H358130, "2251829620")
End If
If CheckBox1.Checked = False Then
WriteLong("wolftü.bin", Label1.Text + &H358130, "2251829621")
End If
End Sub
Bilgileri toplayıp konu olarak paylasyrm