Görünmeyen Bi Moongate üzerine yürüyünce Dialog çıkıyor
[itemdef i_quest]
defname=i_quest
type=t_moongate
id=i_moongate_blue
name=Quest Baslangic
category=Diger itemler
subsection=Diger
description=Facet moongate
ON=@Create
COLOR=0455
return 1
on=@Click
message @1153 <name>
return 1
ON=@DCLICK
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Zehirliyken Gecemessiniz.
elseif (<src.hits> < <src.str>)
src.sysmessage @0481,,1 Yaraliyken Gecemessiniz.
elseif (<distance> > 2)
src.sysmessage @0481,,1 Yeterince yakin degilsiniz.
else
sdialog d_questmoon
RETURN 1
endif
ON=@STEP
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Zehirliyken Gecemessiniz.
elseif (<src.hits> < <src.str>)
src.sysmessage @0481,,1 Yaraliyken Gecemessiniz.
else
sDIALOG d_questmoon
SRC.MOVE 1
RETURN 1
[dialog d_questmoon]
0, 0
nomove
PAGE 1
resizepic 95 20 2620 260 100
dtext 140 20 0481 Quest Katilim
dtext 140 40 5 Quest'e Katilicakmisiniz ?
dtext 140 60 5 Evet Hayir
button 147 80 2117 2118 1 0 1
button 255 80 2117 2118 2 0 2
[dialog d_quest button]
ONBUTTON=0
RETURN 1
ONBUTTON=2
IF (<DISTANCE><=2)
SRC.GO <------- nerde yapıcaksan questi oraya yaz
RETURN 1
ELSE
SRC.sysmessage @54 Yaklas Azcik !!
ENDIF
SRC.FIX