PDA

View Full Version : [Tutorial] How to make a dot crosshair.


wr194t
10-20-2007, 02:32 PM
Ok first add this into your module or make another module and add this:


Private Declare Function SetWindowPos Lib "user32" _
(ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, _
ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Const HWND_TOPMOST = -1
Const SWP_NOMOVE = &H2
Const SWP_NOSIZE = &H1


Public Function PutWindowOnTop (pFrm as Form)
Dim lngWindowPosition As Long

LngWindowPosition = SetWindowPos(pFrm.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)

End Function

Now make a new form, go to properties, BackColor, Palette and pick the color you want (The color you choose will be the color of your crosshair.):

http://img518.imageshack.us/img518/7383/68924052pp4.png

Still in properties find BoderStyle and change it to 0 - None:

http://img521.imageshack.us/img521/1889/71812322eg8.png

Now find StartUpPosition and change it to 2 - CenterScreen:

http://img518.imageshack.us/img518/552/91092162ca3.png

Now with the background of your form make it into a dot by making it smaller:

http://img136.imageshack.us/img136/4701/75033596lt2.png

After doing all that go to your 1st/main form.

If you want buttons:
Make two buttons for On and Off.

Code for the On Button:

Call PutWindowOnTop(Form2)
Form2.Show

Code for the Off button:

Call PutWindowOnTop(Form2)
Form2.Hide

If you want hotkeys then make two timers.

The first timer:

If GetKeyPress(vbKeyControl) And GetKeyPress(vbKeyC) Then
Call PutWindowOnTop(Form2)
Form2.Show

The second timer:

If GetKeyPress(vbKeyControl) And GetKeyPress(vbKeyV) Then
Call PutWindowOnTop(Form2)
Form2.Hide

You don't have to use Ctrl + V, C, you can use any hotkey(s) you desire.

Edit: I decided to add screenshots incase anyone has trouble with this tutorial.

Credits: wr194t.
zezima
10-20-2007, 02:48 PM
Very nice! I like!
Firesnipe
10-21-2007, 02:02 PM
allright ty very much
i really needed this tut
lol
m0she
10-22-2007, 02:33 PM
good tut but the crssair of the warrock game is now in the meadel i is a littel bit down and right so how can i move my cross air a littele bit to the right and a littele bit down from the middle of the screen
wr194t
10-22-2007, 05:12 PM
It's close enough. i don't know how to move it. It was set to the middle of the screen.
kradrick
11-10-2007, 05:02 AM
when i close my finished program using the x, the window disappears but the program stays running in the task manager and crosshair stays on the screen, any way to close the program completely either by hitting the X or adding an exit function or kill all function to the program itself?

I also get an error when trying to use hotkeys that says:

Compile Error:

Sub or Function not defined

then i hit ok and it highlights GetKeyPress
and i have no idea how to fix it other then not use hotkeys
jawad_33
11-10-2007, 04:46 PM
the module is detected i was banned 2 times
how can i make a new module? help:)
sk1nhead
11-11-2007, 03:10 AM
Normally you don't need any module at all:eek:at least i learned how to make dot crosshairs without modules....
jawad_33
11-11-2007, 03:36 AM
Normally you don't need any module at all:eek:at least i learned how to make dot crosshairs without modules....

can maybe say how ? plzzz
sk1nhead
11-11-2007, 05:46 AM
can maybe say how ? plzzz
What do i get in trade?:rolleyes:
apezwijn
11-13-2007, 12:44 PM
OMG I CANT TAKE THIS ANY LONGER WATCHING THIS SHIT !
I FIRST CREATED THIS YOU GUYS STOLE IT..
DXT
****
And otherS!
God Damn it
AND EVEN I GOT IT FROM PLANET-Source-Code.com
omfg you being soo cool leeching
wr194t
11-13-2007, 12:50 PM
OMG I CANT TAKE THIS ANY LONGER WATCHING THIS SHIT !
I FIRST CREATED THIS YOU GUYS STOLE IT..
DXT
****
And otherS!
God Damn it
AND EVEN I GOT IT FROM PLANET-Source-Code.com
omfg you being soo cool leechingI wrote the whole thing myself so STFU. I didn't leech any of this from any other forum.
jawad_33
11-14-2007, 11:09 AM
lol this module is DETECTED
I GET BANNNN!!!!!!!!!!!!
Aprill27
11-14-2007, 12:04 PM
lol this module is DETECTED
I GET BANNNN!!!!!!!!!!!!

make it undetected than

1.got to module

2.find the word PutWindowOnTop on the module

3.change that to what ever word like Nokia

4. also change the words in your codes i mean in bottons

5.and now the dot hack should by undetected