diff --git a/P3D/Content/Textures/NPC/N.png b/P3D/Content/Textures/NPC/N.png
new file mode 100644
index 000000000..e8a21412a
Binary files /dev/null and b/P3D/Content/Textures/NPC/N.png differ
diff --git a/P3D/P3D.vbproj b/P3D/P3D.vbproj
index 5dd8fb524..ed8eede1d 100644
--- a/P3D/P3D.vbproj
+++ b/P3D/P3D.vbproj
@@ -14137,6 +14137,9 @@
PreserveNewest
+
+ PreserveNewest
+
Always
diff --git a/P3D/World/ActionScript/V2/ScriptConstructs/DoOverworldPokemon.vb b/P3D/World/ActionScript/V2/ScriptConstructs/DoOverworldPokemon.vb
index 45e6bbc9b..df166dd20 100644
--- a/P3D/World/ActionScript/V2/ScriptConstructs/DoOverworldPokemon.vb
+++ b/P3D/World/ActionScript/V2/ScriptConstructs/DoOverworldPokemon.vb
@@ -42,6 +42,8 @@
End With
Case "visible"
Return ReturnBoolean(Screen.Level.OverworldPokemon.IsVisible())
+ Case "id"
+ Return Screen.Level.OverworldPokemon.PokemonID
Case "skin"
If Screen.Level.OverworldPokemon.PokemonReference IsNot Nothing Then
Dim shinyString As String = "Normal"