[DIALOG d_moongate]
0, 0
NOMOVE
PAGE 1
resizepic 95 30 5054 210 380
dtext 140 40 0481 <serv.name> Menu
button 144 70 2117 2118 1 0 1
dtext 165 66 5 Moonglow
button 144 100 2117 2118 1 0 2
dtext 165 97 5 Britain
button 144 130 2117 2118 1 0 3
dtext 165 127 5 Jhelom
button 144 160 2117 2118 1 0 4
dtext 165 157 5 Yew
button 144 190 2117 2118 1 0 5
dtext 165 187 5 Minoc
button 144 220 2117 2118 1 0 6
dtext 165 217 5 Trinsic
button 144 250 2117 2118 1 0 7
dtext 165 247 5 Skara Brae
button 144 280 2117 2118 1 0 8
dtext 165 277 5 Magincia
button 144 310 2117 2118 1 0 9
dtext 165 307 5 Delucia
button 144 340 2117 2118 1 0 10
dtext 165 337 5 Ceza Evi
button 144 370 2117 2118 1 0 11
dtext 165 367 5 Pazar Alani
[DIALOG d_moongate TEXT]
[DIALOG d_moongate BUTTON]
ONBUTTON=0
RETURN 1
ONBUTTON=1
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 4468,1283,5
RETURN 1
ELSE
SRC.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=2
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1337,1997,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=3
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1500,3772,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=4
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 772,752,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=5
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 2702,693,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=6
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1829,2948,-20
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=7
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 644,2067,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=8
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 3564,2139,34
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=9
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 5267,3995,37
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=10
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1270,892
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=11
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO britain
src.events +pazarcik
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
[ITEMDEF i_mgate]
DEFNAME=i_mgate
TYPE=t_moongate
ID=i_moongate_blue
NAME=Moongate
category=Diger itemler
subsection=Diger
description=Facet moongate
On=@Click
message @021,1,1 <serv.name>
message @07a1,1,1 Moongate Of <region.name>
message @0785,1,1 Kordinatlar : <p>
return 1
endif
ON=@DCLICK
IF (<src.flags>&04)
src.dialogclose d_moongate
src.dialog d_moongate
return 1
elseif !(<src.str> = <src.hits>) && !(<src.hits> > <src.str>)
src.sysmessage @38,1,1 Yaraliyken moongateleri kullanamazsiniz.
return 1
elseif (<DISTANCE><=3)
dialogclose d_moongate
DIALOG d_moongate
RETURN 1
else
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
return 1
endif
ON=@STEP
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<src.flags>&04)
src.dialogclose d_moongate
src.dialog d_moongate
src.f_ittir <src.dir>
return 1
elseif !(<src.str> = <src.hits>) && !(<src.hits> > <src.str>)
src.sysmessage @38,1,1 Yaraliyken moongateleri kullanamazsiniz.
return 1
elseif (<DISTANCE><=3)
dialogclose d_moongate
DIALOG d_moongate
src.f_ittir <src.dir>
RETURN 1
else
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
return 1
endif
[function f_ittir]
if (<argn>==0)
Move N
more=0
elseif (<argn>==1)
Move N
Move E
more=1
elseif (<argn>==2)
Move E
more=2
elseif (<argn>==3)
Move E
Move S
more=3
elseif (<argn>==4)
Move S
more=4
elseif (<argn>==5)
Move S
Move W
more=5
elseif (<argn>==6)
Move W
more=6
elseif (<argn>==7)
Move N
Move W
more=7
endif
return 1
[EOF]
[events e_pazarcik]
on=@click
message @0810 [Pazar Alaninda]
on=@attack
src.sysmessage @0785,1,1 Bu Alanda Saldiri Yapamazsiniz...
return 1
on=@spellcast
src.sysmessage @0785,1,1 Bu Alanda Buyu Yapamazsiniz...
return 1
on=@skillstart
src.sysmessage @0785,1,1 Bu Alanda Yeteneklerinizi Kullanamazsiniz...
return 1
[DIALOG d_moongate]
0, 0
NOMOVE
PAGE 1
resizepic 95 30 5054 210 380
dtext 140 40 0481 <serv.name> Menu
button 144 70 2117 2118 1 0 1
dtext 165 66 5 Moonglow
button 144 100 2117 2118 1 0 2
dtext 165 97 5 Britain
button 144 130 2117 2118 1 0 3
dtext 165 127 5 Jhelom
button 144 160 2117 2118 1 0 4
dtext 165 157 5 Yew
button 144 190 2117 2118 1 0 5
dtext 165 187 5 Minoc
button 144 220 2117 2118 1 0 6
dtext 165 217 5 Trinsic
button 144 250 2117 2118 1 0 7
dtext 165 247 5 Skara Brae
button 144 280 2117 2118 1 0 8
dtext 165 277 5 Magincia
button 144 310 2117 2118 1 0 9
dtext 165 307 5 Delucia
button 144 340 2117 2118 1 0 10
dtext 165 337 5 Ceza Evi
button 144 370 2117 2118 1 0 11
dtext 165 367 5 Pazar Alani
[DIALOG d_moongate TEXT]
[DIALOG d_moongate BUTTON]
ONBUTTON=0
RETURN 1
ONBUTTON=1
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 4468,1283,5
RETURN 1
ELSE
SRC.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=2
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1337,1997,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=3
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1500,3772,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=4
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 772,752,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=5
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 2702,693,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=6
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1829,2948,-20
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=7
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 644,2067,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=8
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 3564,2139,34
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=9
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 5267,3995,37
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=10
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1270,892
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=11
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO britain
src.events +e_pazarcik
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
[ITEMDEF i_mgate]
DEFNAME=i_mgate
TYPE=t_moongate
ID=i_moongate_blue
NAME=Moongate
category=Diger itemler
subsection=Diger
description=Facet moongate
On=@Click
message @021,1,1 <serv.name>
message @07a1,1,1 Moongate Of <region.name>
message @0785,1,1 Kordinatlar : <p>
return 1
endif
ON=@DCLICK
IF (<src.flags>&04)
src.dialogclose d_moongate
src.dialog d_moongate
return 1
elseif !(<src.str> = <src.hits>) && !(<src.hits> > <src.str>)
src.sysmessage @38,1,1 Yaraliyken moongateleri kullanamazsiniz.
return 1
elseif (<DISTANCE><=3)
dialogclose d_moongate
DIALOG d_moongate
RETURN 1
else
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
return 1
endif
ON=@STEP
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<src.flags>&04)
src.dialogclose d_moongate
src.dialog d_moongate
src.f_ittir <src.dir>
return 1
elseif !(<src.str> = <src.hits>) && !(<src.hits> > <src.str>)
src.sysmessage @38,1,1 Yaraliyken moongateleri kullanamazsiniz.
return 1
elseif (<DISTANCE><=3)
dialogclose d_moongate
DIALOG d_moongate
src.f_ittir <src.dir>
RETURN 1
else
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
return 1
endif
[function f_ittir]
if (<argn>==0)
Move N
more=0
elseif (<argn>==1)
Move N
Move E
more=1
elseif (<argn>==2)
Move E
more=2
elseif (<argn>==3)
Move E
Move S
more=3
elseif (<argn>==4)
Move S
more=4
elseif (<argn>==5)
Move S
Move W
more=5
elseif (<argn>==6)
Move W
more=6
elseif (<argn>==7)
Move N
Move W
more=7
endif
return 1
[EOF]
[DIALOG d_moongate]
0, 0
NOMOVE
PAGE 1
resizepic 95 30 5054 210 380
dtext 140 40 0481 <serv.name> Menu
button 144 70 2117 2118 1 0 1
dtext 165 66 5 Moonglow
button 144 100 2117 2118 1 0 2
dtext 165 97 5 Britain
button 144 130 2117 2118 1 0 3
dtext 165 127 5 Jhelom
button 144 160 2117 2118 1 0 4
dtext 165 157 5 Yew
button 144 190 2117 2118 1 0 5
dtext 165 187 5 Minoc
button 144 220 2117 2118 1 0 6
dtext 165 217 5 Trinsic
button 144 250 2117 2118 1 0 7
dtext 165 247 5 Skara Brae
button 144 280 2117 2118 1 0 8
dtext 165 277 5 Magincia
button 144 310 2117 2118 1 0 9
dtext 165 307 5 Delucia
button 144 340 2117 2118 1 0 10
dtext 165 337 5 Ceza Evi
button 144 370 2117 2118 1 0 11
dtext 165 367 5 Pazar Alani
[DIALOG d_moongate TEXT]
[DIALOG d_moongate BUTTON]
ONBUTTON=0
RETURN 1
ONBUTTON=1
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 4468,1283,5
RETURN 1
ELSE
SRC.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=2
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1337,1997,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=3
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1500,3772,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=4
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 772,752,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=5
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 2702,693,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=6
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1829,2948,-20
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=7
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 644,2067,5
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=8
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 3564,2139,34
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=9
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 5267,3995,37
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=10
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<DISTANCE><=3)
SRC.GO 1270,892
ELSE
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
ENDIF
SRC.FIX
ONBUTTON=11
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
elseif (<DISTANCE> > 3)
src.sysmessage @07a7,,1 Yakin degilsiniz !
return 1
ELSE
src.go britain
src.events +e_pazarcik
ENDIF
[ITEMDEF i_mgate]
DEFNAME=i_mgate
TYPE=t_moongate
ID=i_moongate_blue
NAME=Moongate
category=Diger itemler
subsection=Diger
description=Facet moongate
On=@Click
message @021,1,1 <serv.name>
message @07a1,1,1 Moongate Of <region.name>
message @0785,1,1 Kordinatlar : <p>
return 1
endif
ON=@DCLICK
IF (<src.flags>&04)
src.dialogclose d_moongate
src.dialog d_moongate
return 1
elseif !(<src.str> = <src.hits>) && !(<src.hits> > <src.str>)
src.sysmessage @38,1,1 Yaraliyken moongateleri kullanamazsiniz.
return 1
elseif (<DISTANCE><=3)
dialogclose d_moongate
DIALOG d_moongate
RETURN 1
else
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
return 1
endif
ON=@STEP
if <eval <src.tag.ticaret>>==1
src.sysmessage @0481 Canim benim ticaret yaparken iih yapamazsin
return 1
else
IF (<src.flags>&04)
src.dialogclose d_moongate
src.dialog d_moongate
src.f_ittir <src.dir>
return 1
elseif !(<src.str> = <src.hits>) && !(<src.hits> > <src.str>)
src.sysmessage @38,1,1 Yaraliyken moongateleri kullanamazsiniz.
return 1
elseif (<DISTANCE><=3)
dialogclose d_moongate
DIALOG d_moongate
src.f_ittir <src.dir>
RETURN 1
else
src.sysmessage @38,1,1 Yeterince yakin degilsiniz.
return 1
endif
[function f_ittir]
if (<argn>==0)
Move N
more=0
elseif (<argn>==1)
Move N
Move E
more=1
elseif (<argn>==2)
Move E
more=2
elseif (<argn>==3)
Move E
Move S
more=3
elseif (<argn>==4)
Move S
more=4
elseif (<argn>==5)
Move S
Move W
more=5
elseif (<argn>==6)
Move W
more=6
elseif (<argn>==7)
Move N
Move W
more=7
endif
return 1
[EOF]
[AREADEF Safe]
EVENTS=r_default,r_default_rock,r_default_water,r_default_tree,r_default_grass
NAME=Safe
GROUP=Moonglow
FLAGS=region_antimagic_all|region_antimagic_recall_in|region_antimagic_recall_out|region_flag_no_pvp|region_flag_safe|region_flag_nobuilding
P=4310,1009,0,1
RECT=4285,947,4336,1012,1
[events e_safefix]
if (<src.region.safe> == 1)
src.invul 1
else
src.invul 0
On=@Attack
if (<src.region.safe> == 1)
src.sysmessage @058,,1 Safe alanda Saldiramasin
skill fail
action -1
return 1
On=@Spellcast
if (<src.region.safe> == 1)
src.sysmessage @058,,1 Safe Alanda Buyu Atamassiniz
f_fizzle
action -1
return 1
On=@click
if (<src.region.safe> == 1)
message @0790 [Safe Alanda]
On=@skillstart
if (<src.region.safe> == 1)
skill fail
action -1
src.sysmessage @058,,1 Safe Alanda Skill Kasamassiniz
return 1
On=@Itemdclick
if (<src.region.safe> == 1)
if (<act.baseid> == i_deed_Tower)|(<act.baseid> == i_deed_house_3room)|(<act.baseid> == i_deed_house_stone_plaster_small)|(<act.baseid> == i_deed_castle)|(<act.baseid> == i_deed_keep)
sysmessage @058,,1 Sayin <src.name> Safe Alanda Bina Kuramassiniz.
return 1
elseif (<act.baseid> == i_runebook)|
sysmessage @058,,1Sayin <src.name> Safe Alanda Rune Book Kullanamassiniz
return 1
endif