Selam Arkadaşlar Ben Kendime Göre Bi Moongate Scripti Yazdım Moongateyi Çift Tıkladığında Geri Atıyor Last Objet Yapınca Üç Kere Tıklayabiliyor Sonra Yeterince Yakın Değilsiniz Yani Bi Kere Tıkladığında Tek Kare Geri Atsın Bidaha Atmasın Ve Moongateyi Burda Tıklıyorsun MEsela Başka Menüyü Kapatmadan Başka Bir Bölgeye Gidiyosun Ordan'da Gidiyor. Yazdıklarım Biraz Karışık Olabilir Ama Nasıl Anlatacağımı Bilemedim BEni Anlayanlar Lütfen Yardım Etsin.



[itemdef i_wistamoongate]
id=i_moongate_blue
name Wista Pvp Moongate
type=t_moongate
defname=i_travgate

on=@create
color=0980
attr attr_invis|attr_can_decay

on=@step
src.smsgx Moongateleri sadece cift tiklayarak kullanabilirsiniz.
src.move se 1
IF (<targ.DISTANCE> <=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> > 2)
src.sysmessage @0481,,1 Yeterince yakin degilsiniz.
else
src.dialog d_facet_moongate
RETURN 1 
endif

on=@click
message @0481,,1 <name>
return 1

on=@timer
return 1

[dialog d_facet_moongate]
-75,-25
move 1

resizepic 215 92 5170 205 285

text 250 125 62 0
text 270 155 38 1
text 270 175 38 2
text 270 195 38 3
text 270 215 38 4
text 270 235 78 5
text 270 255 63 6
text 270 275 63 7
text 270 295 63 8
text 270 315 62 9

button 245 158 2224 2117 1 0 1
button 245 178 2224 2117 1 0 2
button 245 198 2224 2117 1 0 3
button 245 218 2224 2117 1 0 4
button 245 238 2224 2117 1 0 5
button 245 258 2224 2117 1 0 6
button 245 278 2224 2117 1 0 7
button 245 298 2224 2117 1 0 8
button 245 318 2224 2117 1 0 9


[dialog d_facet_moongate text]
Wista Pvp Shard
Britain 
Moonglow
Bilet Alani
Destard
Rare Odasi
Spawn Odasi
Vendor Alani
Moonglow Zoo
Safe Alani 

[dialog d_facet_moongate button]
On=0
findid.i_moongater.remove

/////\\\\\ Britain //////\\\\\
On=1
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)
DORAND 1
	SRC.GO 1483,1628,20
ENDDO
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX

/////\\\\\ Moonglow //////\\\\\
On=2
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)
DORAND 1
	SRC.GO 4451,1152
ENDDO
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX

/////\\\\\ Bilet Alani //////\\\\\
On=3
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)
DORAND 1
	SRC.GO 2786,862
ENDDO
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX

/////\\\\\ Destard //////\\\\\
On=4
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)
DORAND 1
	SRC.GO 5244,998
ENDDO
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX

/////\\\\\ Rare Odasi //////\\\\\
On=5
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)
DORAND 1
	SRC.GO 3687,1279,61
ENDDO
src.sysmessage @0481,0,1 Rare Dunyasi'na Hos Geldiniz.
endif
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX


/////\\\\\ Spawn Odasi //////\\\\\
On=6
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)
DORAND 1
	SRC.GO 5515,1200
ENDDO
src.sysmessage @2085 Vendor Alani'na Hos Geldiniz.
endif
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX

/////\\\\\ Vendor Alani //////\\\\\
On=7
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)
DORAND 4
	SRC.GO 5205,451,15
	SRC.GO 5178,424,15
	SRC.GO 5205,410,15
	SRC.GO 5225,431,15
ENDDO
src.sysmessage @2085 Vendor Alani'na Hos Geldiniz.
endif
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX

/////\\\\\ Moonglow Zoo //////\\\\\
On=8
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)
DORAND 1
	SRC.GO 4530,1378,23
ENDDO
src.sysmessage @2085 Zoo'ya Hos Geldiniz..
endif
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX


/////\\\\\ Safe Alani //////\\\\\
On=9
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)
DORAND 5
	SRC.GO 3759,1351
	SRC.GO 3755,1307
	SRC.GO 3740,1353
	SRC.GO 3755,1290
	SRC.GO 3779,1306
ENDDO
src.sysmessage @2085 Safe Alan'a Hos Geldiniz.
endif
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 200 175 5170 140 120
htmlgump 230 195 120 20 0 0 0

htmlgump 268 224 80 20 1 0 0
htmlgump 268 244 80 20 2 0 0

button 235 225 4006 4007 1 0 1
button 235 245 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
go <findid.i_gater.morep>
findid.i_gater.timer 2
endif


[eof]


Bu konu Slothere tarafından düzenlendi(2009-04-29 05:43, 15 yıl önce)
Hocam şunu kod içine al bu ne hal.

bide şunu
src.str diye ayarlamayın sonra adam rel sanet atıyo hp de 115 oluyo sonra rel sanet etkisi kaybolunca eşit olmadığı için yaralısın diyo amatör bi hata :)
DORAND 1
SRC.GO 4451,1152
ENDDO

arkadaş bu ne şakamı???

On=@step te yaparsan eğer atlamayı bu durumda 1 kere gider birdaha üstünden geçtiğinde yine 1 kare gider böylece 2-3 kare geriye asla gidemez...

Üye Ol veya Giriş Yap

Bu forum başlığına mesaj atmak istiyorsanız hemen üye olun veya giriş yapın.