Deepandi cidden hiç bir şey anlamadım. Ama zannedersem nasıl moongate yapabilirime getiriyorsun lafı.
Örnek; Buna bakarak yapabilirsin.
[itemdef i_travgates]
id=i_moongate_blue
type=t_moongate
defname=i_travgates
on=@create
color=080a
on=@step
src.sysmessage @0481,,1 Moongateleri sadece cift tiklayarak kullanabilirsiniz.
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 @0484 Moongate
return 1
on=@timer
return 1
[dialog d_facet_moongate]
50,50
nomove
PAGE 0
resizepic 187 80 5054 240 295
resizepic 200 90 3000 215 277
button 240 130 2714 2715 1 0 1
button 240 155 2714 2715 1 0 2
button 240 180 2714 2715 1 0 3
button 240 205 2714 2715 1 0 4
button 240 230 2714 2715 1 0 5
button 240 255 2714 2715 1 0 6
button 240 280 2714 2715 1 0 7
button 240 305 2714 2715 1 0 8
button 240 330 2714 2715 1 0 9
text 270 126 <eval 045e> 0
text 270 151 <eval 045e> 1
text 270 176 <eval 045e> 2
text 270 201 <eval 045e> 3
text 270 226 <eval 045e> 4
text 270 251 <eval 045e> 5
text 270 276 <eval 045e> 6
text 270 301 <eval 045e> 7
text 225 100 <eval 0481> 8
text 270 326 <eval 045e> 9
[dialog d_facet_moongate text]
Safe Alani
Britain (Acti)
Moonglow
Wrong (Sp)
Boya Alani
Hayvanat Bahcesi
Sp Alani
Delucia
<serv.name> Moongate Menu
Spawn Alani
[dialog d_facet_moongate button]
on=1 // safe Alan
if (<src.findid i_rune_poison>)
src.sysmessage @07a1,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @07a1,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> < 4)
SRC.Go 5729,1149,0,0
src.sysmessage @07a1,,1 Safe Alani'na Hosgeldiniz.
ELSE
SRC.SYSMESSAGE @07a1,,1 Moongateden cok uzaktasiniz.
ENDIF
src.fix
on=2 // Britain
if (<src.findid i_rune_poison>)
src.sysmessage @07a1,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @07a1,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
if <src.FINDID.i_mem_exp>
sysmessage @07a1,,1 Safe Alan'a Giderken Explosion Kullanimi Yasaktir.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO Britain
src.sysmessage @07a1,,1 Britain'e Hosgeldiniz. Action Actif !
ELSE
SRC.SYSMESSAGE @07a1,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=3 // Moonglow
if (<src.findid i_rune_poison>)
src.sysmessage @07a1,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @07a1,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO Moonglow
src.sysmessage @07a1,,1 Moonglow'a Hosgeldiniz. Action Actif !
ELSE
SRC.SYSMESSAGE @07a1,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=4 // Wrong
if (<src.findid i_rune_poison>)
src.sysmessage @07a1,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @07a1,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO Wrong
src.sysmessage @07a1,,1 Wrong'a Hosgeldiniz. Action Aktif !
ELSE
SRC.SYSMESSAGE @07a1,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=5 // Boya
if (<src.findid i_rune_poison>)
src.sysmessage @07a1,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @07a1,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO 5755,1147,0
src.sysmessage @07a1,,1 Boya Alanina Hosgeldiniz..
ELSE
SRC.SYSMESSAGE @07a1,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=6 // vendor
if (<src.findid i_rune_poison>)
src.sysmessage @07a1,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @07a1,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.go 4528,1378,23
src.sysmessage @07a1,,1 Hayvanat Bahcesi'ne Hosgeldiniz.
ELSE
SRC.SYSMESSAGE @07a1,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=7 // MacigaL
if (<src.findid i_rune_poison>)
src.sysmessage @07a1,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @07a1,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
if <src.FINDID.i_mem_exp>
sysmessage @07a1,,1 Safe Alan'a Giderken Explosion Kullanimi Yasaktir.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO 2272,1210
src.sysmessage @07a1,,1 Sp Alani'na Hosgeldiniz. Action Aktif !
ELSE
SRC.SYSMESSAGE @07a1,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=8 // Delucia
if (<src.findid i_rune_poison>)
src.sysmessage @07a1,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @07a1,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO 5269,3995,37
src.sysmessage @07a1,,1 Delucis'a Hosgeldiniz. Action Aktif !
ELSE
SRC.SYSMESSAGE @07a1,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=9 // Pazar
if (<src.findid i_rune_poison>)
src.sysmessage @07a1,,1 Uzerinizde Zehir Varken Moongate'leri Kullanamazsiniz.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.sysmessage @07a1,,1 Yaraliyken Moongate'leri Kullanamazsiniz.
return 1
endif
IF (<targ.DISTANCE> <=3)
SRC.GO 5450,1714,0
src.sysmessage @0481,,1 Spawn Alanina Hosgeldiniz..//
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.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
[dialog d_gatetravel]
-100,-100
nomove
resizepic 190 165 5120 140 120
resizepic 200 175 3000 120 100
htmlgump 220 185 120 20 0 0 0
htmlgump 258 218 80 20 1 0 1
htmlgump 258 238 80 20 2 0 1
button 225 215 4006 4007 1 0 1
button 225 235 4018 4019 1 0 0
[dialog d_gatetravel text]
GATE TRAVEL
Evet
Hayir
[dialog d_gatetravel button]
On=0
findid.i_gater.remove
On=1 // gate'e gir
if !(<findid.i_gater.link.isitem>)
sysmessage Gate gecemeden kapanmis.
findid.i_gater.remove
elseif (<findid.i_gater.link.distance> > 3)
sysmessage Gate'e ulasamiyorsunuz.
findid.i_gater.remove
else
goplace <findid.i_gater.morep>
findid.i_gater.timer 2
endif
[EOF]