[Tool] PosInfo
#1

Today i want to share my old tool, it shows the current X, Y and Z coordinates plus the current rotation.

It is very useful for add new NPCs...

 

Pic:

 

Source:

#cs ----------------------------------------------------------------------------

AutoIt Version: 3.3.6.1
Author: fabi202cool

Script Function:
Template AutoIt script.

#ce ----------------------------------------------------------------------------

#include
#include
#include
#include
#include
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("", 138, 177, 192, 124)
GUISetBkColor(0x000000)
$Group1 = GUICtrlCreateGroup("", 8, 0, 121, 169)
$Label4 = GUICtrlCreateLabel("X:", 24, 19, 14, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$Label5 = GUICtrlCreateLabel("Y:", 24, 52, 14, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$Label6 = GUICtrlCreateLabel("Z:", 24, 84, 14, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$Input1 = GUICtrlCreateInput("", 40, 16, 73, 21)
$Input2 = GUICtrlCreateInput("", 40, 48, 73, 21)
$Input3 = GUICtrlCreateInput("", 40, 80, 73, 21)
$Label1 = GUICtrlCreateLabel("Rotation:", 24, 120, 47, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$Input4 = GUICtrlCreateInput("", 24, 136, 89, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

WinSetOnTop("PosInfo", "", 1)

$Base = 0x105F2B18
$offset_xpos=0x000FC4A8
$offset_ypos=0x000fc44C
$offset_zpos=0x000fc450
$offset_rot=0x000fc4d8

$posxOld = 0
$posyOld = 0
$poszOld = 0
$rotationOld = 0

If Not ProcessExists("Nksp.exe") Then
MsgBox(48, "Error", "Bitte zuerst LastChaos starten !")
Exit
EndIf

$Window = "[CLASS:Nksp]"
$Handle = _MemoryOpen(WinGetProcess($Window))
$Address = _MemoryRead($Base, $Handle)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch

$posy = _MemoryRead($Address + $offset_ypos, $Handle, "float")
$posx = _MemoryRead($Address + $offset_xpos, $Handle, "float")
$posz = _MemoryRead($Address + $offset_zpos, $Handle, "float")
$rotation = _MemoryRead($Address + $offset_rot, $Handle, "float")

$coordx = Round($posx, 4)
$coordy = Round($posy, 4)
$coordz = Round($posz, 4)
$coordrot = Round($rotation, 4)

If $posxOld <> $coordx Then
GUICtrlSetData($Input1, $coordx)
EndIf

If $posyOld <> $coordy Then
GUICtrlSetData($Input2, $coordy)
EndIf

If $poszOld <> $coordz Then
GUICtrlSetData($Input3, $coordz)
EndIf

If $rotationOld <> $coordrot Then
GUICtrlSetData($Input4, $coordrot)
EndIf

$posxOld = $coordx
$posyOld = $coordy
$poszOld = $coordz
$rotationOld = $coordrot

Sleep(10)

WEnd

 

Download: 2

#2

thanks it wil be very usefull Big Grin

 

PD: Hit the wrong buttong and disliked the thread lol

#3

Trojan found

 

2

#4
what did you expect from an antivirus named SUPERAntiSpyware

#5

what did you expect from an antivirus named SUPERAntiSpyware
 

- I expect less from a member with 36 posts.

- SAP its a well known anti-spyware

- An alert doesnt trigger just becuse, thousands of files have been scanned with virustotal, if the file is clean, its clean and something made the alert.

 

Im not saying this exe is infect noir if not, just letting you and everyone else know that there could be a risk.

If you download or not its not my problem and i couldnt care less, but i like this forum and i like to give my help to keep the infections out of it. If in a future you find yourself with a infected computer you wont be able to complain as you have been warned.

 

Anyways...

 

PS: I mean you in general.

#6

You have the source, just copy paste it into autoit and run it, code does nothing wrong(I think SUPERAntiSpyware shows that because it accesses the Process memory to get the info).

 

The source looks safe to me.

#7

Trojan found 

2

 

omg n00b detected. he spam all threads with a trojan alert post..

 

fabi have posted the source-code of it, and 1/43 is nothing

you can cry when is 30/43..

#8

why n00b detected?

 

if some ppl it not know but such toold will always be detected as trojana or virus.

 

now u gona ask why?

the reson is bc they read the memory.

 

it can be alot resons but like someone says:

 

You have the source, just copy paste it into autoit and run it, code does nothing wrong(I think SUPERAntiSpyware shows that because it accesses the Process memory to get the info). 

The source looks safe to me.

#9

- I expect less from a member with 36 posts.- SAP its a well known anti-spyware

- An alert doesnt trigger just becuse, thousands of files have been scanned with virustotal, if the file is clean, its clean and something made the alert.

 

Im not saying this exe is infect noir if not, just letting you and everyone else know that there could be a risk.

If you download or not its not my problem and i couldnt care less, but i like this forum and i like to give my help to keep the infections out of it. If in a future you find yourself with a infected computer you wont be able to complain as you have been warned.

 

Anyways...

 

PS: I mean you in general.

 

1. Ive never heard about "SUPERAntiSpyware" ^^ And for one hit you gave me a dislike and never testet the tool before... I see that is the thank for my work

2. One hit is nothing, have you ever scanned the German (LastChaos Gamigo) Nksp.exe? There are more than 15 hits and still thousands of players are playing the game ^^ (for example)

3. If you think im not trusted compile the script with autoit or look at 2

 

I didnt wanted to flame, that is only my statement to your post.



Forum Jump:


Users browsing this thread: 1 Guest(s)