ExtraForum - 1299 Private Serverlar - Server Dosya Paylaşımları
Would you like to react to this message? Create an account in a few clicks or log in to continue.
ExtraForum - 1299 Private Serverlar - Server Dosya Paylaşımları

Güncel Paylaşım Forumu !
 
AnasayfaGaleriAramaLatest imagesKayıt OlGiriş yap
Eğlence Başladı Rütbeni Seç! TIKLA
Moderatör Alımı Başladı TIKLA

 

 Ders8 - Basit Macro Yapalım

Aşağa gitmek 
+4
BANNED
tercal
by fire
SessizAdam
8 posters
YazarMesaj
SessizAdam
Sponsor
Sponsor
SessizAdam


Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı Rep Puanı : 47

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimePtsi Mayıs 11, 2009 7:45 pm

2 Adet CommandButton Ekleyelim

Attack Start
Kod:
Private Sub Command1_Click()
Timer1.Enabled = True
End Sub


Attack Stop
Kod:
If Check1.Value = 1 Then
'Form her zaman üstte
lFlag = HWND_TOPMOST
SetWindowPos Form1.hwnd, lFlag, Form1.Left / Screen.TwipsPerPixelX, Form1.Top / Screen.TwipsPerPixelY, Form1.Width / Screen.TwipsPerPixelX, Form1.Height / Screen.TwipsPerPixelY, SWP_NOACTIVATE Or SWP_SHOWWINDOW
Else
'Form normal
lFlag = HWND_NOTOPMOST
SetWindowPos Form1.hwnd, lFlag, Form1.Left / Screen.TwipsPerPixelX, Form1.Top / Screen.TwipsPerPixelY, Form1.Width / Screen.TwipsPerPixelX, Form1.Height / Screen.TwipsPerPixelY, SWP_NOACTIVATE Or SWP_SHOWWINDOW
End If
End Sub

Bir Adet Timer:
Kod:
Komut.Send ("z")
Komut.Send ("r")


En son SessizAdam tarafından Ptsi Mayıs 11, 2009 7:48 pm tarihinde değiştirildi, toplamda 1 kere değiştirildi
Sayfa başına dön Aşağa gitmek
SessizAdam
Sponsor
Sponsor
SessizAdam


Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı Rep Puanı : 47

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimePtsi Mayıs 11, 2009 7:45 pm

Alıntıya Karşıyım.

Bir Sorun Olursa Söyleyin.
Sayfa başına dön Aşağa gitmek
by fire
Sponsor
Sponsor
by fire


Mesaj Sayısı : 326
Nerden : T4TV4N
Kayıt tarihi : 27/04/09
Rep Puanı Rep Puanı : 41

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeCuma Mayıs 15, 2009 2:18 pm

Saoll
Sayfa başına dön Aşağa gitmek
https://extra.yetkin-forum.com
tercal
Level 1
Level 1
avatar


Mesaj Sayısı : 11
Kayıt tarihi : 15/05/09
Rep Puanı Rep Puanı : 0

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeCuma Mayıs 15, 2009 6:58 pm

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Command2_Click()
If Check1.Value = 1 Then
'Form her zaman üstte
lFlag = HWND_TOPMOST
SetWindowPos Form1.hWnd, lFlag, Form1.Left / Screen.TwipsPerPixelX, Form1.Top / Screen.TwipsPerPixelY, Form1.Width / Screen.TwipsPerPixelX, Form1.Height / Screen.TwipsPerPixelY, SWP_NOACTIVATE Or SWP_SHOWWINDOW
Else
'Form normal
lFlag = HWND_NOTOPMOST
SetWindowPos Form1.hWnd, lFlag, Form1.Left / Screen.TwipsPerPixelX, Form1.Top / Screen.TwipsPerPixelY, Form1.Width / Screen.TwipsPerPixelX, Form1.Height / Screen.TwipsPerPixelY, SWP_NOACTIVATE Or SWP_SHOWWINDOW
End If
End Sub
Private Sub Timer1_Timer()
Komut.Send ("z")
Komut.Send ("r")
End Sub


Çalışmıyor nerde hata var

burdamı var hata : SetWindowPos
Sayfa başına dön Aşağa gitmek
SessizAdam
Sponsor
Sponsor
SessizAdam


Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı Rep Puanı : 47

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeCuma Mayıs 15, 2009 7:11 pm

Private Sub Timer1_Timer()
Komut.Send ("z")
Komut.Send ("r")
End Sub

bu kısmı timere ekle
Sayfa başına dön Aşağa gitmek
tercal
Level 1
Level 1
avatar


Mesaj Sayısı : 11
Kayıt tarihi : 15/05/09
Rep Puanı Rep Puanı : 0

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeCuma Mayıs 15, 2009 7:12 pm

ekledim

2 ci kısım çlışmıyor

Private Sub Check1_Click()
If Check1.Value = 1 Then
'Form her zaman üstte
lFlag = HWND_TOPMOST
SetWindowPos Form1.hWnd, lFlag, Form1.Left / Screen.TwipsPerPixelX, Form1.Top / Screen.TwipsPerPixelY, Form1.Width / Screen.TwipsPerPixelX, Form1.Height / Screen.TwipsPerPixelY, SWP_NOACTIVATE Or SWP_SHOWWINDOW
Else
'Form normal
lFlag = HWND_NOTOPMOST
SetWindowPos Form1.hWnd, lFlag, Form1.Left / Screen.TwipsPerPixelX, Form1.Top / Screen.TwipsPerPixelY, Form1.Width / Screen.TwipsPerPixelX, Form1.Height / Screen.TwipsPerPixelY, SWP_NOACTIVATE Or SWP_SHOWWINDOW
End If
End Sub
Sayfa başına dön Aşağa gitmek
SessizAdam
Sponsor
Sponsor
SessizAdam


Mesaj Sayısı : 571
Kayıt tarihi : 09/05/09
Rep Puanı Rep Puanı : 47

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeCuma Mayıs 15, 2009 8:13 pm

kendi kodlamam
Cool
Sayfa başına dön Aşağa gitmek
tercal
Level 1
Level 1
avatar


Mesaj Sayısı : 11
Kayıt tarihi : 15/05/09
Rep Puanı Rep Puanı : 0

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeCuma Mayıs 15, 2009 8:46 pm

peki o zaman hatayı nasıl düzeltece söyle

halen hata oluyor

Private Sub Check1_Click()
If Check1.Value = 1 Then
'Form her zaman üstte
lFlag = HWND_TOPMOST
SetWindowPos Form1.hWnd, lFlag, Form1.Left / Screen.TwipsPerPixelX, Form1.Top / Screen.TwipsPerPixelY, Form1.Width / Screen.TwipsPerPixelX, Form1.Height / Screen.TwipsPerPixelY, SWP_NOACTIVATE Or SWP_SHOWWINDOW
Else
'Form normal
lFlag = HWND_NOTOPMOST
SetWindowPos Form1.hWnd, lFlag, Form1.Left / Screen.TwipsPerPixelX, Form1.Top / Screen.TwipsPerPixelY, Form1.Width / Screen.TwipsPerPixelX, Form1.Height / Screen.TwipsPerPixelY, SWP_NOACTIVATE Or SWP_SHOWWINDOW
End If
End Sub
Sayfa başına dön Aşağa gitmek
BANNED
Level 1
Level 1
avatar


Mesaj Sayısı : 14
Kayıt tarihi : 16/05/09
Rep Puanı Rep Puanı : 0

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeC.tesi Mayıs 16, 2009 8:59 am

ewt aynı hata bendede var yaf bune
Sayfa başına dön Aşağa gitmek
tercal
Level 1
Level 1
avatar


Mesaj Sayısı : 11
Kayıt tarihi : 15/05/09
Rep Puanı Rep Puanı : 0

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeC.tesi Mayıs 16, 2009 9:15 am

yaw Adam başka yerden almış getirmiş

hata olunca hatayı düzeltemiyor
Sayfa başına dön Aşağa gitmek
BANNED
Level 1
Level 1
avatar


Mesaj Sayısı : 14
Kayıt tarihi : 16/05/09
Rep Puanı Rep Puanı : 0

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeC.tesi Mayıs 16, 2009 9:23 am

eed yaf madem bilmiom neden yazıon demi?
Sayfa başına dön Aşağa gitmek
desdek
Level 1
Level 1
avatar


Mesaj Sayısı : 11
Kayıt tarihi : 16/05/09
Rep Puanı Rep Puanı : 0

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeC.tesi Mayıs 16, 2009 9:40 am

kardesim ilk etapda sen dene ondan sonra millete ver bosuna üye yaptirma insanları
Sayfa başına dön Aşağa gitmek
tercal
Level 1
Level 1
avatar


Mesaj Sayısı : 11
Kayıt tarihi : 15/05/09
Rep Puanı Rep Puanı : 0

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeC.tesi Mayıs 16, 2009 10:30 am

Edit...
Sayfa başına dön Aşağa gitmek
muckac
Level 1
Level 1
avatar


Mesaj Sayısı : 10
Kayıt tarihi : 28/04/09
Rep Puanı Rep Puanı : 0

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeC.tesi Mayıs 16, 2009 12:09 pm

Bu Kodlari nereye yazcaz
Sayfa başına dön Aşağa gitmek
muckac
Level 1
Level 1
avatar


Mesaj Sayısı : 10
Kayıt tarihi : 28/04/09
Rep Puanı Rep Puanı : 0

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeC.tesi Mayıs 16, 2009 12:10 pm

Bu Kodlari nereye yazcaz
Sayfa başına dön Aşağa gitmek
Ahdevefa
Level 50
Level 50
Ahdevefa


Mesaj Sayısı : 136
Kayıt tarihi : 24/04/09
Rep Puanı Rep Puanı : 6

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimePtsi Mayıs 18, 2009 2:51 pm

Çok Çok Çok Teşekkürler.....
Sayfa başına dön Aşağa gitmek
besimbicer
Level 45
Level 45
avatar


Mesaj Sayısı : 78
Nerden : ordan burdan
Kayıt tarihi : 27/04/09
Rep Puanı Rep Puanı : 0

Ders8 - Basit Macro Yapalım Empty
MesajKonu: Geri: Ders8 - Basit Macro Yapalım   Ders8 - Basit Macro Yapalım Icon_minitimeSalı Mayıs 19, 2009 12:53 am

tsklrrrrrrrrr
Sayfa başına dön Aşağa gitmek
 
Ders8 - Basit Macro Yapalım
Sayfa başına dön 
1 sayfadaki 1 sayfası
 Similar topics
-
» Ders8 - Cheat Engine ile NPC Kodları Bulmak.
» Vb 6.0 İle Basit Koxp yapimi . . ., Ders !.. Kaçirmayin.
» Ders9 - Basit Ama [Herzaman Üstte Kodu]
» Actool Macro Setting
» PVPLife [Elite] Macro v1.2

Bu forumun müsaadesi var:Bu forumdaki mesajlara cevap veremezsiniz
ExtraForum - 1299 Private Serverlar - Server Dosya Paylaşımları :: Y Ö N E T İ M :: Çöp Kutusu-
Buraya geçin:  

weyyo

knight online serverlar

metin2 serverlar

silkroad serverlar