Jump to content

Autoit Ile Aimpoint Yapımı


cerix
 Share

Recommended Posts

Heralde arkadaş bir oyun için istiyor. :)
Biraz kurcalamayla ilgili oyuna bağlı olarak belki yapılabilir.
Normal windwos ekranı için bu işlem doğru anladıysam basit sayılır. Mesela;
Tabi emin deyilim :)
[codebox]Global $BX = GUICreate("Blue AimPoint", 5, 30, -1, -1,0x80000000 + 0x00010000, 0x00000080 + 0x00000008)
GUISetBkColor(0xFF0000)
GUISetState(@SW_SHOWNOACTIVATE)
Global $BY = GUICreate("Blue AimPoint", 30, 5, -1, -1,0x80000000 + 0x00010000, 0x00000080 + 0x00000008)
GUISetBkColor(0xFF0000)
GUISetState(@SW_SHOWNOACTIVATE)
While 1
Sleep(100)
WEnd[/codebox]

Link to comment
Share on other sites

@Aqil990

As. Tabiki autoit ile küçük oyunlar yapabilirsin.
Bu senin hayalgücüne ve autoit tecrübene bakar.

Misal şöyle bir oyun yapacağız.
Bir kuşumuz var ve biz onu vurmaya çalışıyoruz.
O zaman kısaca malzemeler;

Kuşu ifade eden bir icon veyahut resim lazım.
Sonra arkaplan için bir resim lazım.
Sesler fena olmaz.
Cursor için bir resim lazım. Belki tüfek :)
Tabi kuş vurulunca uygulanacak farklı bir resim fena olmaz.

Malzemeler tamam ise yemeği hazırlamaya başlayalım.
Hım heralde açıkmışım. :)

Guimizi oluşturur arkaplan resminide kuşumuzu ekleriz.
Sonra kuşumuzu hareket ettirmek için kerekli kodları yazarız.

Kuş vurulunca ne yapılacaksa, onlarıda ekleriz.
Çok çok basit bir örnek karaladım. Incele!
[color="#0000FF"][u][b]http://www.4shared.com/file/93y9Dq_a/KUS_VUR.html[/b][/u][/color]

Link to comment
Share on other sites

  • 2 hafta sonra ...
  • 4 hafta sonra ...

Kodları kendime göre düzenledim:


[code]Global $BX = GUICreate("Blue AimPoint", 5, 5, -1, -1,0x80000000 + 0x00080000, 0x00010000 + 0x00000008)
GUISetBkColor(0xFF0000)
GUISetState(@SW_SHOWNOACTIVATE)
While 1
Sleep(100)
WEnd[/code]

Ama sonuç böyle. Noktanın biraz daha aşağıda çıkması gerekiyor. Yardımcı olursanız sevinirim.


[img]http://img218.imageshack.us/img218/2494/adszwdr.jpg[/img]

Link to comment
Share on other sites

Aşağıdaki satırdan -1 değerlerini editliyerek ayarlıyabilirsin. Birinicisi x koordinatı, ikinciside y koordinatıdır.

[code]GUICreate("Blue AimPoint", 5, 5, -1, -1,0x80000000 + 0x00080000, 0x00010000 + 0x00000008)[/code]

Link to comment
Share on other sites

:D -1 değerleri ekranı ortalar. Yani başka - li değerler işlemez. Eksili sadece 1 işler. Oda ekranı ortalar.

Her çözünürlükte tam ortada olması için -1 olması lazım her ikisininde.

Link to comment
Share on other sites

Oyuna göre değil farenin bulunduğu koordinata göre ayarlanır.

Kod vermek gerekirse kısaca;
[php]While 1
GUIDelete("Blue AimPoint")
Sleep(100)
$Koordinat = MouseGetPos()
$BX = GUICreate("Blue AimPoint", 5, 5, $Koordinat[0], $Koordinat[1],0x80000000 + 0x00080000, 0x00010000 + 0x00000008)
GUISetBkColor(0xFF0000)
GUISetState(@SW_SHOWNOACTIVATE)
Sleep(100)
WEnd[/php]

Edited by djonur007
Link to comment
Share on other sites

Ek olarak çözünürlülük değiştikçe gui [b]Winmove [/b]ile taşınabilir...

[codebox]Global $BL_DW = @DesktopWidth
Global $BL_DH = @DesktopHeight

Opt("GUIOnEventMode", 1)
Global $BX = GUICreate("Blue AimPoint", 8, 8, ($BL_DW / 2) - 3, ($BL_DH / 2) - 3, 0x80000000 + 0x00080000)
GUISetOnEvent(-3, "_EXIT")
GUISetBkColor(0xFF0000)
GUISetState(@SW_SHOWNOACTIVATE)
WinSetTrans($BX, "", 240)
WinSetOnTop($BX, "", 1)
While 1
If $BL_DW <> @DesktopWidth Or $BL_DH <> @DesktopHeight Then
$BL_DW = @DesktopWidth
$BL_DH = @DesktopHeight
WinMove($BX, "", ($BL_DW / 2) - 3, ($BL_DH / 2) - 3)
EndIf
Sleep(100) ;Speed
WEnd

Func _EXIT()
Exit
EndFunc ;==>_EXIT[/codebox]

Edited by blue_life
Link to comment
Share on other sites

sorun şu: blue life'ın en son verdiği gayet iyi. çözünürleğe de uyum sağlıyor. ama oyunu açınca masaüstünde kalıyor. oyunda gözükmüyor yani. ayrıca nokta hala cross'un üstünde. hackleri yapan insanlar bunu nasıl yapıyo ki? :D

Link to comment
Share on other sites

Blue_Life hocamın verdiği sadece çözünürlük değişmine ayak uydurmak için. Yani mouse hareketleri dahil değil. Mouse hareketleri göre noktanın değişmesini istiyorsan benim yukarıda verdiğim kodları kullan.

Link to comment
Share on other sites

  • 2 hafta sonra ...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...