function guild_house()  -- MAin  call with npc |||dlg_menu( "Guild HOUSE TEST", "guild_house()" )	
dlg_title( "GIVE" )
guild_id = gv("guild_id")
	
-- 1 > 255 channel ( min / max )
--get_global_variable()
--set_global_variable()
--del_global_variable()


--warp( gv("x") , gv("y") , gv("Layer") , gv("name") )

dlg_text( "Ur Guild ID is " .. guild_id )

-- gv("guild_id") = Get guild ID

house = tonumber(get_global_variable("House" .. guild_id )) or 0




if house > 0 then

dlg_menu( "TP TO GUILD HOUSE", "guild_houseTP()" )

else 

dlg_menu( "BUY GUILD HOUSE", "buy_guild_house()" )

end

dlg_show()
end



function buy_guild_house()


House_Max = tonumber(get_global_variable("House_Max")) or 0

if House_Max >= 255 then 
 cprint("Can't create more Guild House")
 return 0
end

guild_id = gv("guild_id")
set_global_variable("House" .. guild_id  , House_Max + 1 )
set_global_variable("House_Max"  , House_Max + 1 )

--m00_001  map guild 1 - 255
--m00_002  map guild 256 - 550

end


function guild_houseTP()


guild_id = gv("guild_id")
house = tonumber(get_global_variable("House" .. guild_id ))
--warp( gv("x") , gv("y") , gv("Layer") , gv("name") )

x = gv("x")
y =  gv("y")
layer = house
name = gv("name")

warp( x , y , layer , name )

end