P99 GPS Gone?

[Ahmet]

So many people hated it.. but I loved it. p99gps.com website is no longer functional.

Any idea what happened?

[Oleris]

what did it do?

[Ahmet]

It parsed your log file for /locs and displayed them on a map. It was tight.

[Oleris]

https://www.norrathmap.com/

[Hogfather]

Speaking of logs, I remember back in the day I could set my client to always log with some sort of autolog command.

Is that a thing I can do now in Titanium or was that later?

[Ahmet]

Speaking of logs, I remember back in the day I could set my client to always log with some sort of autolog command.

Is that a thing I can do now in Titanium or was that later?

/log on

set it in .ini file.. forget which one

[nilbog]

So send 0.0.0 to every /loc request written to log file? I'll see what I can do.

[Ahmet]

So send 0.0.0 to every /loc request written to log file? I'll see what I can do.

Didn't think it was against any rules.. just parses the log. Has been around since June of this year.

[Ahmet]

Original P99 Gps Post
http://www.project1999.com/forums/showthread.php?t=155390&highlight=p99gps

Derubael's input on parsing locs
https://www.norrathmap.com/Faq/is_this_cheating

[Izzni]

Original P99 Gps Post
http://www.project1999.com/forums/showthread.php?t=155390&highlight=p99gps

Derubael's input on parsing locs
https://www.norrathmap.com/Faq/is_this_cheating

"Unless management chimes in..."

Nilbog I'm pretty sure counts as management :P

[myriverse]

So send 0.0.0 to every /loc request written to log file? I'll see what I can do.
Extremely NOT classic!

[nyclin]

So send 0.0.0 to every /loc request written to log file? I'll see what I can do.

This is a joke, right? If not, what are your thoughts on tools like GamParse and GINA?

[Niedar]

So send 0.0.0 to every /loc request written to log file? I'll see what I can do.

Sounds great, lets make a change that is not classic thereby removing a quality of life feature that actually was in classic all in an attempt to stay "classic".

[nilbog]

Halfway joking, yes.

However, I have to ask: What else would you use loc output in the log file for, other than sending it to a map overlay to circumvent the removal of maps?

[Ele]

Halfway joking, yes.

However, I have to ask: What else would you use loc output in the log file for, other than sending it to a map overlay to circumvent the removal of maps?

Use it to track (and later search via log) mob/item spawn locations rather than writing them down by hand or taking screen shots. :(

[haksum]

Halfway joking, yes.

However, I have to ask: What else would you use loc output in the log file for, other than sending it to a map overlay to circumvent the removal of maps?


It's been some time but it helped me when I /loc'd before a death and dc'd in unfamiliar territory during the death zone thus resetting my chat log. I was very happy I had logs on. I don't use any map software other than EQ maps.

[Niedar]

It's been some time but it helped me when I /loc'd before a death and dc'd in unfamiliar territory during the death zone thus resetting my chat log. I was very happy I had logs on. I don't use any map software other than EQ maps.

This right here.

[Hogfather]

Classic cartographers (ie eqmaps etc) also made and make extensive use of /loc to record data points. Basically anyone gathering data on the game's world will use and need it, writing shit down is annoying yo.

I get that the existence and use of map overlays is annoying given that you spent development time killing the in game maps, but killing useful classic data that players have always had because people are using it in innovative ways contrary to The Vision feels a bit OTT.

Disclaimer: grovel thank you you guys rock love this server love your work feedback provided and hopefully received in a positive and constructive fashion oh Christ please don't let Haynar ban me

[Pudge]

So send 0.0.0 to every /loc request written to log file? I'll see what I can do.

do it

[dustysr06]

do it

^

[Sk00ba5t3v3]

It parsed your log file for /locs and displayed them on a map. It was tight.

That is so not classic! Ban this man!

[pharmakos]

So send 0.0.0 to every /loc request written to log file? I'll see what I can do.

pras.




and besides, cheating or not, if you guys don't know these zones by heart yet then you're not playing hard enough.

[Ahmet]

That is so not classic! Ban this man!

http://tinyurl.com/kcfjz44

[BardPop]

https://www.norrathmap.com/[/QUOTE]
Trojan or safe

[myriverse]

https://www.norrathmap.com/
Trojan or safe
Safe as it gets.

[Tann]

do it

http://i.imgur.com/iyNxczf.gif

[Clark]

Extremely NOT classic!

[Sirken]

do it

^

[toolshed]

Enable /guildwar please

[Oleris]

^

I get lost without it sirken, plz no :(

[Nuggie]

Not classic. Why would you want to make this game easier?

WoW is that way -------->

[Ahldagor]

What was wrong with mental maps and landmarks?

[pharmakos]

I get lost without it sirken, plz no :(

you should print out all the eqatlas maps.

for classicness.

[myriverse]

Not classic. Why would you want to make this game easier?

WoW is that way -------->
Very classic. Everyone since April 1999 has sought to make the game easier. That's EQ classic.
you should print out all the eqatlas maps.

for classicness.
No difference between the two.

[pharmakos]

there's no difference between a GPS and a paper map? huh?

[jcr4990]

I don't understand how anyone could think this is not Classic. This program could've easily existed in 1999. Just because nobody did it doesn't mean its not classic. All it does is read a log file and post your location to a map overlay. Somebody could've written a program to do the same thing in 1999 over night.

"Fixing" this by changing how /loc writes to log file is the very definition of "Not Classic"

[pharmakos]

could not have existed in 1999 because you could only play everquest in full screen mode.

[kennymack007]

2. Arrogant is a pretty straight forward word. If your saying, "I know that maps are disabled on this server, but I think I can be an exception via this 3rd party app. If you don't like it then just pretend it doesn't exist." That sir, is arrogant.

This was from http://www.project1999.com/forums/showthread.php?t=155688
My opinion is the same on this thread as well.

Don't be arrogant about the mapping. If the Devs want to write 0's to your location so the program doesn't work, that is something they have decided is healthy for this server(which is provided Free of Charge).

That being said, If enough people really enjoy the GPS, perhaps one day the Devs will make it part of this website so it is easily accessible to all players(new and old).

[nilbog]

Look, this is simple. The 0.0001% of players that had a second machine running a homemade program to read logs from a network share of a running Everquest client to display maps on a secondary machine are none. Seriously.

Remember windows on top of Everquest <2001? Well, eqw came out in december of 2000, so probably not. You couldn't do it.

The definition of not classic is an overlay map program whose only legitimate argument is wanting to circumvent the removal of maps in game.

Forcing the client to not write locs to log file isn't a simple modification to begin with. My opinion of not classic is having an interactive map on screen, showing you where to go and not having to learn the game due to innovations in technology.

[kennymack007]

could not have existed in 1999 because you could only play everquest in full screen mode.

I never thought about that.

[jcr4990]

Remember windows on top of Everquest <2001? Well, eqw came out in december of 2000, so probably not. You couldn't do it.

Scars of Velious expansion Dec 5th 2000

So confirmed log file reading program classic once Velious is out? :)

[pharmakos]

and running EQW was a bannable offense when it first came out, wasn't it?

[nilbog]

The version in 2000 was a working prototype from a guy who didn't release it. Later, in 2001 sometime, another project was started that took his source and later released eqwindow. I came across this research at some point, and would have to find it.

[Llodd]

you should print out all the eqatlas maps.

for classicness.

Sigh, I chucked all mine out once in game maps were introduced. Had several folders all alphabetically arranged. Even now with tabbing out and checking eqatlas still wished I'd kept them.

Definately approve of this though; in game maps takes something away, for me atleast.

[Darksinga]

Wiki Maps vs Norrath Maps. Honestly not much difference. Just need to /loc and read it on website rather than /loc and read it on map.

[Llodd]

Most of the time no. But there are those rare moments where it gets you killed ;p

[teija]

Look, this is simple. The 0.0001% of players that had a second machine running a homemade program to read logs from a network share of a running Everquest client to display maps on a secondary machine are none. Seriously.

Remember windows on top of Everquest <2001? Well, eqw came out in december of 2000, so probably not. You couldn't do it.

The definition of not classic is an overlay map program whose only legitimate argument is wanting to circumvent the removal of maps in game.

Forcing the client to not write locs to log file isn't a simple modification to begin with. My opinion of not classic is having an interactive map on screen, showing you where to go and not having to learn the game due to innovations in technology.

I would agree with you opinion of not having the gps maps, But taking away /loc is the most horrible idea ever and very non-classic. I can think of a few times i have gotten summoned away from my grp in hate/fear halfway across the zone and hitting /loc right before i died saved the person retrieving my corpse alot of time and frustration.

[Nuggie]

Nilb, stop justifying yourself. This is your project.

[Grimjaw]

don't forget the fact that in 1999 the best maps to exist were hand drawn sketches using pencil & paper and scanned. There wasn't even maps available for every zone. So given those facts then no, this program could not have existed in 1999

example: Jan 18, 2000 - no map for highkeep hold (and the highpass map is done in crayon)

http://web.archive.org/web/20000118191236/http://www.eqatlas.com/highpasshold.html

[pharmakos]

I would agree with you opinion of not having the gps maps, But taking away /loc is the most horrible idea ever and very non-classic. I can think of a few times i have gotten summoned away from my grp in hate/fear halfway across the zone and hitting /loc right before i died saved the person retrieving my corpse alot of time and frustration.

his proposed solution wouldn't take away /loc completely -- it would just remove /loc from your /log file. you could still use /loc in game no problem.

[JackFlash]

So send 0.0.0 to every /loc request written to log file? I'll see what I can do.

Please yes.

[myriverse]

don't forget the fact that in 1999 the best maps to exist were hand drawn sketches using pencil & paper and scanned. There wasn't even maps available for every zone. So given those facts then no, this program could not have existed in 1999

example: Jan 18, 2000 - no map for highkeep hold (and the highpass map is done in crayon)

http://web.archive.org/web/20000118191236/http://www.eqatlas.com/highpasshold.html
Back then, Everlore had better maps than EQAtlas.

[Swish]

I think what people are saying in this thread is EQ is really hard and they want to make it easier.

Ignore for a moment the Chardok AOE groups helping you hit 60 ASAP, ignore the ahungry auction tracker saving you time in EC, ignore the MQ epics saving you time doing those "difficult" quests... the next issue is people might get a bit lost because there's no in game maps, so lets solve that real quick.

Now lets see, why did we come back to play a 15 year old elf sim?

http://i.imgur.com/txuLeVj.png

It's meant to be hard, stop using shortcuts :p

[pharmakos]

I think what people are saying in this thread is EQ is really hard and they want to make it easier.

Ignore for a moment the Chardok AOE groups helping you hit 60 ASAP, ignore the ahungry auction tracker saving you time in EC, ignore the MQ epics saving you time doing those "difficult" quests... the next issue is people might get a bit lost because there's no in game maps, so lets solve that real quick.

Now lets see, why did we come back to play a 15 year old elf sim?

http://i.imgur.com/txuLeVj.png

It's meant to be hard, stop using shortcuts :p

quoted for truth

[toolshed]

I think what people are saying in this thread is EQ is really hard and they want to make it easier.

Ignore for a moment the Chardok AOE groups helping you hit 60 ASAP, ignore the ahungry auction tracker saving you time in EC, ignore the MQ epics saving you time doing those "difficult" quests... the next issue is people might get a bit lost because there's no in game maps, so lets solve that real quick.

Now lets see, why did we come back to play a 15 year old elf sim?

http://i.imgur.com/txuLeVj.png

It's meant to be hard, stop using shortcuts :p

Classic EQ included /guildwar too

Please bring back classic content!

[foldupmonk]

Im glad I got the PoP World Atlas book for Christmas when I was younger. Still comes in handy when Im too lazy to alt tab.

[Silent]

When was the last someone heard of this? Just curious because there was another map program that someone from red was working on I think also linked into here, But someone mentioned something about p99gps.com being down or gone but it still works. However a virus scan reveals a detection of w32.nimnul albeit a 1 out of 53 detection from some random noname AV company most likely a false flag but who knows.

Just want to double check if the original author(s) did in fact take the site down or stop maintaining it, and someone possibly took over the domain name and uploaded a compiled p99gps with a trojan or rootkit in it?

[Mag]

Hello all. I'm not sure if any of you recall seeing my post about this time last year, but I did develop a standalone log-reading map viewer using VB.Net and GDI+. Includes a mode where it's on top of EQ, with adjustable opacity, and ignores all input so it doesn't interfere with EQ. Etc. Here's a link to that thread: http://www.project1999.com/forums/showthread.php?t=126067

I did some work on the app today to improve responsiveness when zooming and moving the map with the mouse. Ignore the download links in the previous post, here's the most recent archive, including source and classic/kunark maps:

https://www.dropbox.com/s/mun2exoktf3ztjw/eqmap.rar?dl=0

Here's a full copy/paste of the(ugly) VB.Net code. The calls you see to getasynckeystate are for the hotkeys that toggle opacity/topmost mode, not a keylogger:

Imports EQMap.User32Wrappers


Public Class Form1

Private _InitialStyle As Integer
Dim opaque As Boolean = True

Dim pX As Integer
Dim pY As Integer
Dim pZ As Integer
Dim pXtwo As Integer
Dim pYtwo As Integer
Dim r As Integer
Dim g As Integer
Dim b As Integer
Dim zoom As Double = 22.2
Dim offset As Integer
Dim offsety As Integer
Dim logfile As String
Dim MouseUpx As Integer
Dim MouseUpy As Integer

Dim zonelong As String
Dim rely As Integer
Dim relx As Integer
Dim mousedown As Boolean = False
Dim playery As Double
Dim playerx As Double
Dim zoneshort As String
Dim zones As New Dictionary(Of String, String)
Private Declare Function GetKeyPress Lib "user32" Alias "GetAsyncKeyState" (ByVal key As Integer) As Integer

Private Sub Form1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.GotFocus
drawmap()
Drawpoint()
drawpoint2()

End Sub

Private Sub SetFormToTransparent()
SetWindowLong(Me.Handle, GWL.ExStyle, _
_InitialStyle Or WS_EX.Layered Or WS_EX.Transparent)
SetLayeredWindowAttributes(Me.Handle, 0, _
255 * (TrackBar3.Value / 100), LWA.Alpha)
End Sub

Private Sub SetFormToOpaque()
' Turn off the Transparent Extended Style.
SetWindowLong(Me.Handle, GWL.ExStyle, _
_InitialStyle Or WS_EX.Layered)

' Set the Alpha back to 100% opaque.
SetLayeredWindowAttributes(Me.Handle, _
0, 255, LWA.Alpha)
End Sub


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


' Grab the Extended Style information
' for this window and store it.
_InitialStyle = GetWindowLong(Me.Handle, GWL.ExStyle)

' Set this window to Transparent
' (to the mouse that is!)
'SetFormToTransparent()

' Just for giggles, set this window
' to stay on top of all others so we
' can see what's happening.

ComboBox2.Text = 1

zoom = TrackBar2.Value + 0.2
Try
For Each n In TextBox5.Text.Split("|")
zoneshort = n.Split(",")(0)
zonelong = n.Split(",")(1)
Try
Dim fileExists As Boolean
fileExists = My.Computer.FileSystem.FileExists(Application.Star tupPath() & "\maps\" & zoneshort & ".txt")
If fileExists = True Then
ComboBox1.Items.Add(zonelong.Replace(vbNewLine, ""))
addz(zonelong.Replace(vbNewLine, ""), zoneshort)
End If
Catch ex As Exception
End Try
Next
Catch ex As Exception
End Try
ComboBox1.Sorted = True

End Sub
Function addz(ByVal shortz As String, ByVal longz As String)
zones.Add(shortz, longz)

End Function
Sub drawmap()
Using redBrush As New SolidBrush(Color.Tan), _
formGraphics As Graphics = PictureBox1.CreateGraphics()
formGraphics.FillRectangle(redBrush, New Rectangle(0, 0, PictureBox1.Width, PictureBox1.Height))
End Using

For Each line In TextBox1.Text.Split(vbNewLine)
Try
If line.Substring(0, 2).IndexOf("L") <> -1 Then

r = line.Split(",")(6)
g = line.Split(",")(7)
b = line.Split(",")(8)


pY = line.Split(",")(1)
pX = line.Split(",")(0).Replace("L ", "")

pXtwo = line.Split(",")(3)
pYtwo = line.Split(",")(4)

pXtwo = pXtwo / zoom
pYtwo = pYtwo / zoom


pX = pX / zoom
pY = pY / zoom


If pY < 0 Then
pY = Math.Abs(pY)
pY = 300 - pY
Else
pY = 300 + pY
End If

If pYtwo < 0 Then
pYtwo = Math.Abs(pYtwo)
pYtwo = 300 - pYtwo
Else
pYtwo = 300 + pYtwo

End If




If pX > 0 Then
pX = pX + 300
Else
pX = 300 - Math.Abs(pX)

End If

If pXtwo > 0 Then
pXtwo = pXtwo + 300
Else
pXtwo = 300 - Math.Abs(pXtwo)

End If

Using redBrush As New Pen(Color.FromArgb(r, g, b)), _
formGraphics As Graphics = PictureBox1.CreateGraphics()
formGraphics.DrawLine(redBrush, New System.Drawing.Point(pX + offset, pY + offsety), New System.Drawing.Point(pXtwo + offset, pYtwo + offsety))


End Using
ElseIf line.Substring(0, 2).IndexOf("P") <> -1 Then
Dim label As String = line.Split(",")(7)

pY = line.Split(",")(1)
pX = line.Split(",")(0).Replace("P ", "")

pX = pX / zoom
pY = pY / zoom

If pY < 0 Then
pY = Math.Abs(pY)
pY = 300 - pY
Else
pY = 300 + pY
End If

If pX > 0 Then
pX = pX + 300
Else
pX = 300 - Math.Abs(pX)

End If


'MsgBox(pX & "," & pY & ":" & pXtwo & "," & pYtwo)
Dim drawFont As New Font("Arial", 10)
Using blueb As New SolidBrush(Color.Black), _
formGraphics As Graphics = PictureBox1.CreateGraphics()
If CheckBox2.Checked = True Then


If CheckBox1.Checked = True Then
If label.ToUpper.Contains(txtFilter.Text.ToUpper) Then
formGraphics.DrawString(label, drawFont, blueb, New System.Drawing.Point(pX + offset, pY + offsety))

End If
Else
formGraphics.DrawString(label, drawFont, blueb, New System.Drawing.Point(pX + offset, pY + offsety))

End If
End If
End Using
End If


Catch ex As Exception

End Try
Next

End Sub
Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
TrackBar2.Focus()

drawmap()

Drawpoint()
drawpoint2()

End Sub



Private Sub TrackBar1_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs)
zoom = TrackBar2.Value + 0.2
drawmap()
Drawpoint()
drawpoint2()

End Sub




Private Sub OpenMapToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
OpenFileDialog1.ShowDialog()

End Sub





Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
drawmap()
drawpoint2()


Drawpoint()

End Sub
Sub Drawpoint()
If TextBox3.Text.Length > 1 Then


Dim friendx As Double = TextBox3.Text * -1
Dim friendy As Double = TextBox4.Text * -1


friendx = friendx / zoom
friendy = friendy / zoom


If friendy < 0 Then
friendy = Math.Abs(friendy)
friendy = 300 - friendy
Else
friendy = 300 + friendy
End If

If friendx > 0 Then
friendx = friendx + 300
Else
friendx = 300 - Math.Abs(friendx)

End If
Using redBrush As New SolidBrush(Color.Blue), _
formGraphics1 As Graphics = PictureBox1.CreateGraphics()

formGraphics1.FillRectangle(redBrush, New Rectangle(friendx + offset, friendy + offsety, TextBox8.Text, TextBox8.Text))
End Using
End If
End Sub

Private Sub OpenFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk
Dim fileContents As String
fileContents = My.Computer.FileSystem.ReadAllText(OpenFileDialog1 .FileName)
TextBox1.Text = fileContents
Threading.Thread.Sleep(500)
drawmap()
Drawpoint()
drawpoint2()
End Sub

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
drawmap()
Drawpoint()
drawpoint2()
End Sub

Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
If CheckBox3.Checked = True Then
drawmap()
Drawpoint()
drawpoint2()
End If
Try
Timer3.Interval = ComboBox2.Text * 1000

Catch ex As Exception

End Try




End Sub

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
Dim fileContents As String

Try
fileContents = My.Computer.FileSystem.ReadAllText(Application.Sta rtupPath() & "\maps\" & zones(ComboBox1.Text) & ".txt")

TextBox1.Text = fileContents
drawmap()
Drawpoint()
drawpoint2()
Catch ex As Exception

End Try


End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
drawmap()
Drawpoint()

drawpoint2()


End Sub
Sub drawpoint2()
If TextBox6.Text.Length > 1 Then
Dim friendx As Double = TextBox7.Text * -1
Dim friendy As Double = TextBox6.Text * -1

friendx = friendx / zoom
friendy = friendy / zoom


If friendy < 0 Then
friendy = Math.Abs(friendy)
friendy = 300 - friendy
Else
friendy = 300 + friendy
End If

If friendx > 0 Then
friendx = friendx + 300
Else
friendx = 300 - Math.Abs(friendx)

End If

Using redBrush As New SolidBrush(Color.Green), _
formGraphics1 As Graphics = PictureBox1.CreateGraphics()
formGraphics1.FillRectangle(redBrush, New Rectangle(friendx + offset, friendy + offsety, TextBox2.Text, TextBox2.Text))
End Using
End If

End Sub
Private Sub txtFilter_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtFilter.TextChanged
If CheckBox1.Checked = True Then
drawmap()
Drawpoint()
drawpoint2()
End If
End Sub


Function openmap(ByVal map As String)

Dim fileContents As String
Try
fileContents = My.Computer.FileSystem.ReadAllText(Application.Sta rtupPath() & "\maps\" & map & ".txt")
TextBox1.Text = fileContents
drawmap()
Drawpoint()
drawpoint2()
Catch ex As Exception

End Try
End Function

Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown
relx = e.X
rely = e.Y
mousedown = True


End Sub

Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove


If mousedown = True Then
Dim oldoff As Integer = offset
Dim oldoffy As Integer = offsety

offset = offset + (e.X - relx)
offsety = offsety + (e.Y - rely)
MouseUpx = offset
MouseUpy = offsety

drawmap()
Drawpoint()
drawpoint2()
offset = oldoff
offsety = oldoffy
Exit Sub
Else
If relx <> 0 Then
offset = offset + (e.X - relx)
offsety = offsety + (e.Y - rely)
MouseUpx = offset
MouseUpy = offsety

drawmap()
Drawpoint()
drawpoint2()

End If

End If
End Sub

Private Sub PictureBox1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseUp

relx = 0
rely = 0


offset = MouseUpx
offsety = MouseUpy

drawmap()
Drawpoint()
drawpoint2()
mousedown = False
End Sub

Private Sub PictureBox2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
offset = 300 - playerx
offsety = 300 - playery
drawmap()
Drawpoint()
drawpoint2()
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
offset = 0
offsety = 0
zoom = 22.2
TrackBar2.Value = 20

drawmap()
Drawpoint()
drawpoint2()
End Sub

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
If CheckBox4.Checked = True Then



Dim fileContents2 As String

Dim loc As String
Dim locs As New ArrayList



fileContents2 = My.Computer.FileSystem.ReadAllText(logfile)


For Each n In fileContents2.Split(vbNewLine)
If n.Contains("Your Location") Then
loc = n.Substring(n.IndexOf("Your Lo") + 17, n.Length - 17 - n.IndexOf("Your Lo"))
If locs.Contains(loc) = False Then
locs.Add(loc)
End If
End If
Next
If locs.Count <> 0 Then
If TextBox3.Text <> locs(locs.Count - 1).Split(",")(1) Then
TextBox4.Text = locs(locs.Count - 1).Split(",")(0)
TextBox3.Text = locs(locs.Count - 1).Split(",")(1)

drawmap()

Drawpoint()

drawpoint2()
End If
End If
End If


End Sub

Private Sub Button4_Click(sender As Object, e As EventArgs)

End Sub

Private Sub Button4_Click_1(sender As Object, e As EventArgs)
MsgBox("Please navigate to your /logs directory and choose a " & vbNewLine & "log so that I can read its location")

OpenFileDialog2.ShowDialog()

End Sub

Private Sub OpenFileDialog2_FileOk(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog2.FileOk

logfile = OpenFileDialog2.FileName
CheckBox4.Enabled = True

End Sub



Private Sub keyhot_Tick(sender As Object, e As EventArgs) Handles keyhot.Tick


If GetKeyPress(Keys.Pause) Then

Me.WindowState = FormWindowState.Normal


If opaque = True Then
SetFormToTransparent()
opaque = False
Me.TopMost = True
drawmap()
drawpoint2()
Drawpoint()
Else
SetFormToOpaque()
opaque = True
Me.TopMost = False
drawmap()
drawpoint2()
Drawpoint()

End If
ElseIf GetKeyPress(Keys.Scroll) Then
opaque = True
SetFormToOpaque()


Me.TopMost = False
Me.WindowState = FormWindowState.Minimized

drawmap()
drawpoint2()
Drawpoint()
End If


End Sub

Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
OpenFileDialog1.ShowDialog()


End Sub

Private Sub TrackBar2_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrackBar2.Scroll
zoom = TrackBar2.Value + 0.2
drawmap()
Drawpoint()
drawpoint2()
End Sub

Private Sub Button4_Click_2(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
OpenFileDialog2.ShowDialog()
End Sub

Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
drawmap()
Drawpoint()
drawpoint2()

End Sub



End Class

[loramin]

I think what people are saying in this thread is EQ is really hard and they want to make it easier.

Nothing is more classic than EQ players trying to make the painful UI of EQ less painful ;)

[myriverse]

Nothing is more classic than EQ players trying to make the painful UI of EQ less painful ;)
Except of course the fact that the painful UI couldn't be made less painful.:p