[itemdef i_travgate]
id=i_moongate_blue
type=t_moongate
defname=i_travgate
on=@create
color=07d3
on=@step
src.sysmessage @0481,,1 Moongateleri sadece cift tiklayarak kullanabilirsiniz.
src.move 1
RETURN 1
endif
on=@dclick
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
elseif (<src.hits> < <src.str>)
src.sysmessage @0481,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
elseif (<distance> > 3)
src.sysmessage @0481,,1 Yeterince yakin degilsiniz.
else
src.dialog d_facet_moongate
RETURN 1
endif
on=@click
message @0481,,1 Moongate
return 1
[dialog d_facet_moongate]
50,50
nomove
resizepic 187 110 3500 350 350
button 200 130 2714 2715 1 0 1
button 200 155 2714 2715 1 0 2
button 200 180 2714 2715 1 0 3
button 200 205 2714 2715 1 0 4
button 200 230 2714 2715 1 0 5
button 200 255 2714 2715 1 0 6
button 200 280 2714 2715 1 0 7
button 200 305 2714 2715 1 0 8
dtext 220 126 38 Safe Alani
dtext 220 151 38 Pazar Alani
dtext 220 176 38 Moonglow
dtext 220 201 38 Serpent's Hold
dtext 220 226 38 Boya Alani
dtext 220 251 38 Spawm Odasi
dtext 220 276 38 Dungeonlar
dtext 220 301 38 Sp Alanlari
[dialog d_facet_moongate button]
on=1 // Safe Alani
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @0481,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO Safe
src.events +e_pazar
src.dialogclose d_runebook
ELSE
sc.fix
on=2 // Pazar Alani
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @0481,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO 1359,1625,94
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
src.events -e_pazar
src.dialogclose d_runebook
on=3 // Moonglow
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @0481,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO Moonglow
src.events -e_pazar
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=4 // Serp
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @0481,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
iF (<targ.DISTANCE> <=3)
SRC.GO Serpents Hold
src.events -e_pazar
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=5 // Boya Alani
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @0481,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO 4330,997,20
src.events -e_pazar
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=6 // Spawm Alani
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @0481,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO 4294,954,50
src.events -e_pazar
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=7 // Dungeonlar
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @0481,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO Moonglow
src.events -e_pazar
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=8 // Sp Alanlari
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @0481,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO 4297,997,21
src.events -e_pazar
src.dialogclose d_runebook
ELSE
sc.fix
[itemdef i_gater]
name gater
id i_handr_1
type t_eq_script
weight 0
layer layer_special
On=@Create
attr attr_invis|attr_can_decay
On=@Equip
timer 30
src.dialog d_gatetravel
On=@Timer
remove
return 1
[itemdef i_moongater]
name moongater
id i_handr_1
type t_eq_script
weight 0
layer layer_special
On=@Create
attr attr_invis|attr_can_decay
On=@Equip
timer 30
src.dialog d_facet_moongate
On=@Timer
remove
return 1
[typedef t_facet_moongate]
On=@Step
if !((<src.findid.i_moongater>) || (<src.flags>&statf_stone))
src.newitem i_moongater
src.act.link <uid>
src.act.equip
endif
return 1
On=@Dclick
if !(<src.flags>&statf_stone)
if (<distance> > 3)
src.sysmessage Gate'e ulasamiyorsunuz.
else
if (<src.findid.i_moongater>)
src.findid.i_moongater.remove
endif
src.newitem i_moongater
src.act.link <uid>
src.act.equip
endif
endif
return 1
On=@Click
if (<src.region.type> == <region.type>)
sayua 0905,0,0,0 a Moongate
else
message a Moongate
endif
return 1
Bu şekilde bi denermisin ?
Bu arada sorun bir text eksikdi..
ps : +1 puan isterim .)