/*if CLIENT then return end

if IsValid(TESTNPC) then
	TESTNPC:Remove()
 end

local npc = ents.Create("speaking_npc")
TESTNPC = npc
npc:SetPos(Vector(0,0,0))
npc:Spawn()

npc.Language = "pl"

local d = npc:GetDialogue()
d:AddCustomText("Srać panię w dupę się łotrowi chciało")
d:AddCustomText("You don't really have to do anything there, but you can for example test his addons.")
d:AddCustomText("What would you like to know?")

local loop = Dialogue()
d:AddDialogueChange(loop)

local whois = loop:AddOption("Who is Szymekk?")
whois:AddCustomText("Szymekk is a developer.")
whois:AddCustomText("He makes addons for Garry's Mod.")

local profile = loop:AddOption("Show me his profile")
profile:AddCustomText("Here you go!")
profile:AddFunction(function(npc, ply)
	ply:SendLua("gui.OpenURL('http://steamcommunity.com/profiles/76561198017720556/')")
end)

local pretty = loop:AddOption("You're pretty")
pretty:AddFunction(function(npc)
	npc:SetFlexWeight(42,1)
end)
pretty:AddDelay(1)
pretty:AddCustomText("Thank you my boy!")
pretty:AddDelay(1)
pretty:AddFunction(function(npc)
	npc:SetFlexWeight(42,0)
end)

local pretty = loop:AddOption("Kill me")
pretty:AddCustomText("Why?")
pretty:AddDelay(1)
pretty:AddCustomText("Actually, why not.")
pretty:AddFunction(function(npc, ply)
	ply:Kill()
end)
pretty:AddDelay(1)
pretty:AddCustomText("Haha. You wanted that.")
pretty:AddExit()

local exit = loop:AddOption("Thank you")
exit:AddCustomText("Bye!")
exit:AddExit()
*/

if CLIENT then return end

if IsValid(TESTNPC) then
    TESTNPC:Remove()
end

hook.Add("InitPostEntity", "SpeakingNPCSpawn", function()
timer.Simple(20, function()
local npc = ents.Create("speaking_npc")
TESTNPC = npc
npc:SetPos(Vector( 1184, 2938, -660))
npc:SetAngles(Angle(0,90,0))
//npc:SetPos(player.GetAll()[1]:GetPos())
npc:Spawn()

npc.Language = "pl"

local d = npc:GetDialogue()
d:AddCustomText("Cześc przyjacielu!.", "http://rage-gaming.pl/@/v/przyjaciel.mp3")
d:AddCustomText("Na utrzymanie serwera wydajemy ponad 300 zł miesięcznie, może byś nam pomógł w jego utrzymaniu.", "http://rage-gaming.pl/@/v/utrzymanie.mp3")

local loop = Dialogue()
d:AddDialogueChange(loop)



local vip = loop:AddOption("Ranga VIP")
vip:AddCustomText("Świetnie!", "http://rage-gaming.pl/@/v/swietnie.mp3")
vip:AddCustomText("VIP pozwala na używanie zablokowanych prac, takich jak: ", "http://rage-gaming.pl/@/v/uzywanie.mp3")
vip:AddCustomText("SWAT", "http://rage-gaming.pl/@/v/swat.mp3")
vip:AddCustomText("DJ", "http://rage-gaming.pl/@/v/dj.mp3")
vip:AddCustomText("HITMAN", "http://rage-gaming.pl/@/v/hitman.mp3")
vip:AddCustomText("Dodatki typu: Adv. Dup. 2 oraz E2", "http://rage-gaming.pl/@/v/dodatki.mp3")
vip:AddCustomText("To jak skusisz się?", "http://rage-gaming.pl/@/v/skusisz.mp3")
local yes = vip:AddOption("Tak")
yes:AddCustomText("Dzieki!", "http://rage-gaming.pl/@/v/dzieki.mp3")
yes:AddFunction(function(npc, ply)
	net.Start("vip_show")
	net.Send(ply)
end)
yes:AddExit()
local no = vip:AddOption("Nie")
no:AddCustomText("Nie, wracaj!", "http://rage-gaming.pl/@/v/wracaj.mp3")
no:AddDialogueChange(loop)

local group = loop:AddOption("Grupa Steam")
group:AddCustomText("Dołącz do naszej grupy Steam, aby otrzymywać najnowsze powiadomienia o serwerze.", "http://szymekk.info/@/v/23.mp3")
group:AddFunction(function(npc, ply)
    ply:SendLua("gui.OpenURL('http://steamcommunity.com/groups/ragegangs')")
end)


local exit = loop:AddOption("Zamknij")
exit:AddExit()
end)
end)