[AREADEF a_delucia_moongate_1]
EVENTS=r_default,r_default_rock,r_default_water,r_default_tree,r_default_grass
NAME=Delucia Moongate
GROUP=Moongates
FLAGS=0100
P=5382,4008,2
RECT=5378,4005,5386,4010,0

[function f_select]
return=<argv[<argv[0]>]>

[defname moongate]
moon a_britain_moongate_1,a_moonglow_moongate_1,a_minoc_vesper_moongate_1,a_trinsic_moongate_1,a_skara_brae_moongate_1,a_delucia_moongate_1,a_yew_moongate_1,a_jhelom_moongate_1,a_magincia_moongate_1

[function kontrol]
if (<flags>&statf_poisoned) || (<hits> < <maxhits>)
src.sys_ok Üzerinizde zehir var veya enerjiniz az.
return 1
elseif (<distance> >1) || (<targ.distance> >1)
src.sys_ok Moongateye çok uzaktasınız.
return 1
else
src.<args>
endif

[itemdef i_moongate_city]
id i_moongate_blue
name Moongate

on=@dclick
src.kontrol sdialog d_moongate
return 1

on=@click
msg_ok [<region.name>]
msg_ok <name>
return 1

[dialog d_moongate]
50,50
nomove
resizepic 0 0 5120 200 270
resizepic 10 10 3000 180 250
dhtmlgump 70 20 200 20 0 0 <def.bfont_blue>Şehirler

for 1 9
dhtmlgump 60 <eval (<dlocal._for>*20)+30> 300 20 0 0 <def.bfont_red><serv.area.<f_select <dlocal._for>,<def.moon>>.name>
button 25 <eval (<dlocal._for>*20)+30> 210 211 1 0 <dlocal._for>
endfor

[dialog d_moongate button]
ON 1 90
src.kontrol go <f_select <argn>,<def.moon>>

a_britain_moongate_1,a_moonglow_moongate_1,a_minoc_vesper_moongate_1,a_trinsic_moongate_1,a_skara_brae_moongate_1,a_delucia_moongate_1,a_yew_moongate_1,a_jhelom_moongate_1,a_magincia_moongate_1