COMapReader v3

[ChrisR872]

NO LONGER WORKS... OUTDATED... HERE FOR REFERENCE OR UNTIL I DECIDE TO UPDATE... THANKS!
Greetings epvpers,

Updated version of my Moonbox Tatic Reader. See what tatic your in without a token.
1.) Simply unzip
2.) Run COMapReader v3.exe
3.) Click on the Conquer that is in the Tatics.
4.) COMapReader v3 will let you know. Either leave running or close.

NOTE: This only works in Moonbox Tatic, any other maps will not be detected and reader will display "Unable to Identify". This is not a bug, simply an unadded feature.

Version 3 (2442 Previous Downloads)
-Fixed to work with patch 4331
-Fixed again for patch 4334

Version 2 (315 Previous Downloads)
-Fixed to work with patch 4312

Enjoy, post any problems.
~Chris

[Schanz]

Thank you, ill try it later

[tsu]

If I recall right someone else made this...and you've only updated it?
Think the name was something with d0v3r?

[Fujiy]

So that it serves, to know the map? If you dont have a token....you have to cacth one do exit

[relax]

yea it lets u know which tactic of moonbox quest u r in the moment u get in there. no token is needed so if u get into a tactic u dont want to be in u can just die and not waste time getting a token to find out which tactic it is. a very usefull program indeed.

[Fujiy]

Please, virus scan

[ANTIn00b]

its clean !! nice done & very usefull i give ya karma 4 it !!

[Mikrons]

its clean

File: COMapReader_v2.exe
Status: OK
MD5 57d8fc3fb7ccc00cc649e0c498adf760
Packers detected: -
Scanner results
AntiVir Found nothing
ArcaVir Found nothing
Avast Found nothing
AVG Antivirus Found nothing
BitDefender Found nothing
ClamAV Found nothing
Dr.Web Found nothing
F-Prot Antivirus Found nothing
Fortinet Found nothing
Kaspersky Anti-Virus Found nothing
NOD32 Found nothing
Norman Virus Control Found nothing
UNA Found nothing
VirusBuster Found nothing
VBA32 Found nothing

[Dark-Knight]

Originally posted by relax@Jun 1 2006, 22:38
yea it lets u know which tactic of moonbox quest u r in the moment u get in there. no token is needed so if u get into a tactic u dont want to be in u can just die and not waste time getting a token to find out which tactic it is. a very usefull program indeed.

when i go MB, i leave my char boting from start, be4 i had to wait to get token, so i could set the partner to pick up that token, becuz i got the itemtype file modified, to c the tokens name, its very usefull for me...

if i could give karma lol

[Fujiy]

Mikrons suspicious....1 post this...

[relax]

Originally posted by Fujiy@Jun 1 2006, 21:02
Mikrons suspicious....1 post this...

if hes suspicious ill scan it again, seems clean. results:

File: COMapReader_v2.exe
Status:
OK (Note: this file has been scanned before. Therefore, this file's scan results will not be stored in the database)
MD5 57d8fc3fb7ccc00cc649e0c498adf760
Packers detected:
-
Scanner results
AntiVir
Found nothing
ArcaVir
Found nothing
Avast
Found nothing
AVG Antivirus
Found nothing
BitDefender
Found nothing
ClamAV
Found nothing
Dr.Web
Found nothing
F-Prot Antivirus
Found nothing
Fortinet
Found nothing
Kaspersky Anti-Virus
Found nothing
NOD32
Found nothing
Norman Virus Control
Found nothing
UNA
Found nothing
VirusBuster
Found nothing
VBA32
Found nothing

[Fujiy]

Thx

[RENAMER]

release source code so we can work with that =D

[bgreen]

that code i make for me, and i dont posted it here cause its very simple code.... it works and sometimes need to change the memory address, but is easy to get that.


the code:

Dim hWnd As Long
Dim pID As Long
Dim pHandle As Long

hWnd = FindWindow(vbNullString, WindowCaption)

GetWindowThreadProcessId hWnd, pID
pHandle = OpenProcess(PROCESS_ALL_ACCESS, False, pID)
ReadProcessMemory pHandle, &H502B2C, map, Len(map), 0&
CloseHandle pHandle

Label1.Caption = "Unknown"
If (map = 1039) Then

Label1.Caption = "Training Ground"
End If
If (map = 1002) Then

Label1.Caption = "Twin City"
End If
If (map = 1048) Then

Label1.Caption = "Calmed"
End If
If (map = 1045) Then

Label1.Caption = "Deserted"
End If
If (map = 1044) Then

Label1.Caption = "Chaos"
End If
If (map = 1043) Then

Label1.Caption = "Peace"
End If
If (map = 1049) Then

Label1.Caption = "Death"
End If
If (map = 1047) Then

Label1.Caption = "Disturbed"
End If
If (map = 1046) Then

Label1.Caption = "Prosperous"
End If

End Sub

sry for my bad english.

[tsu]

Originally posted by bgreen@Jun 2 2006, 18:12
that code i make for me, and i dont posted it here cause its very simple code.... it works and sometimes need to change the memory address, but is easy to get that.

...

sry for my bad english.

pretty simple code, nice work getting it.