[itemdef i_moongate_cal]
id=i_moongate_black
type=t_moongate1
defname=i_moongate_cal
on=@create
color=0
on=@step
if (<src.hits>)
src.sysmessage @0481,,1 Moongateleri sadece cift tikliyarak kullanabilirsiniz.
src.move 1
RETURN 1
else
src.dialog d_moongate
RETURN 1
endif
on=@dclick
src.dialogclose d_moongate
src.dialogclose d_runebook
if (<src.findid i_rune_poison>)
src.sysmessage @0481,,1 Uzerinizde zehir varken Moongate'leri kullanamazsiniz.
return 1
elseif (<src.hits> < <src.str>)
src.sysmessage @0481,,1 Yaraliyken Moongate'leri kullanamazsiniz.
return 1
elseif (<distance> > 2)
src.sysmessage @0481,,1 Yeterince yakin degilsiniz.
return 1
else
src.sdialog d_moongate
RETURN 1
endif
on=@click
message @0481,,1 Moongate
return 1
on=@timer
return 1
[dialog d_moongate]
50,50
nomove
PAGE 0
resizepic 167 50 9300 260 340
resizepic 177 60 9300 240 320
button 240 130 55 56 1 0 1
button 240 155 55 56 1 0 2
button 240 180 55 56 1 0 3
button 240 205 55 56 1 0 4
button 240 230 55 56 1 0 5
button 240 255 55 56 1 0 6
button 240 280 55 56 1 0 7
button 240 305 55 56 1 0 8
button 240 330 55 56 1 0 9
button 240 355 55 56 1 0 10
dhtmlgump 270 128 300 20 0 0 Britain
dhtmlgump 270 153 300 20 0 0 Jhelom
dhtmlgump 270 178 300 20 0 0 Moonglow
dhtmlgump 270 203 300 20 0 0 Yew
dhtmlgump 270 227 300 20 0 0 Minoc
dhtmlgump 270 253 300 20 0 0 Magincia
dhtmlgump 270 277 300 20 0 0 Trinsic
dhtmlgump 270 303 300 20 0 0 Skara Brae
dhtmlgump 240 80 300 20 0 0 <serv.name> Sehir Menu
dhtmlgump 270 327 300 20 0 0 Vesper
dhtmlgump 270 353 300 20 0 0 Safe Alan
[dialog d_moongate text]
Britain
Jhelom
Moonglow
Yew
Minoc
Magincia
Trinsic
Skara Brae
<serv.name> Sehir Menu
Vesper
Safe Alan
[dialog d_moongate button]
on=1 // Britain
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 (0<src.tag0.ticaret>==01)
src.sysmessage @187 Ticaret yaparken moongate kullanamazsiniz.
return 1
endif
IF (<src.ISNEARTYPE t_Moongate1 3>)
SRC.GO 1337,1997,5
src.events -e_olum
src.events -e_pazarsafe
src.events -e_biletalani
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
ENDIF
src.fix
on=2 // Jhelom
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 (0<src.tag0.ticaret>==01)
src.sysmessage @187 Ticaret yaparken moongate kullanamazsiniz.
return 1
endif
IF (<src.ISNEARTYPE t_Moongate1 3>)
SRC.GO 1500,3772,5
src.events -e_olum
src.events -e_pazarsafe
src.events -e_biletalani
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
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 (0<src.tag0.ticaret>==01)
src.sysmessage @187 Ticaret yaparken moongate kullanamazsiniz.
return 1
endif
IF (<src.ISNEARTYPE t_Moongate1 3>)
SRC.GO 4468,1283,5
src.events -e_olum
src.events -e_pazarsafe
src.events -e_biletalani
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=4 // Yew
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 (0<src.tag0.ticaret>==01)
src.sysmessage @187 Ticaret yaparken moongate kullanamazsiniz.
return 1
endif
IF (<src.ISNEARTYPE t_Moongate1 3>)
SRC.GO 772,752,5
src.events -e_olum
src.events -e_pazarsafe
src.events -e_biletalani
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=5 // Minoc
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 (0<src.tag0.ticaret>==01)
src.sysmessage @187 Ticaret yaparken moongate kullanamazsiniz.
return 1
endif
IF (<src.ISNEARTYPE t_Moongate1 3>)
SRC.GO 2703,693,5
src.events -e_olum
src.events -e_pazarsafe
src.events -e_biletalani
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=6 // Magincia
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 (0<src.tag0.ticaret>==01)
src.sysmessage @187 Ticaret yaparken moongate kullanamazsiniz.
return 1
endif
IF (<src.ISNEARTYPE t_Moongate1 3>)
SRC.GO 3564,2139,34
src.events -e_olum
src.events -e_pazarsafe
src.events -e_biletalani
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=7 // Trinsic
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 (0<src.tag0.ticaret>==01)
src.sysmessage @187 Ticaret yaparken moongate kullanamazsiniz.
return 1
endif
IF (<src.ISNEARTYPE t_Moongate1 3>)
SRC.GO 1829,2948,-20
src.events -e_olum
src.events -e_pazarsafe
src.events -e_biletalani
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=8 // Skara Brae
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 (0<src.tag0.ticaret>==01)
src.sysmessage @187 Ticaret yaparken moongate kullanamazsiniz.
return 1
endif
IF (<src.ISNEARTYPE t_Moongate1 3>)
SRC.GO 644,2067,5
src.events -e_olum
src.events -e_pazarsafe
src.events -e_biletalani
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=9 // Vesper
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 (0<src.tag0.ticaret>==01)
src.sysmessage @187 Ticaret yaparken moongate kullanamazsiniz.
return 1
endif
IF (<src.ISNEARTYPE t_Moongate1 3>)
SRC.GO vesper
src.events -e_olum
src.events -e_pazarsafe
src.events -e_biletalani
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=10 // Safe alan
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 (0<src.tag0.ticaret>==01)
src.sysmessage @187 Ticaret yaparken moongate kullanamazsiniz.
return 1
endif
IF (<src.ISNEARTYPE t_Moongate1 3>)
SRC.GO safe alan
src.events -e_olum
src.events +e_pazarsafe
src.events -e_biletalani
dialogclose d_itemmstone
src.dialogclose d_runebook
ELSE
SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
return 1
ENDIF
SRC.FIX
on=9 // Pazar Alani
dialog d_moongateeklenti
return 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 <src.FINDID.i_mem_exp>
//sysmessage @0481,,1 Pazar Alanina Giderken Explosion Kullanimi Yasaktir.
//return 1
//endif
//IF (<targ.DISTANCE> <=3)
//SRC.GO 5891,2019,1
src.events -e_olum
src.events -e_pazarsafe
src.events -e_biletalani
//src.sysmessage @50 Pazar Alani'na Hosgeldiniz.
//ELSE
//SRC.SYSMESSAGE @0481,,1 Moongateden cok uzaktasiniz.
//return 1
//ENDIF
[typedef t_moongate1]
[eof]
Arkadaşlar moongateye tıklıyorum Brite gidicem mesela Moongate'den uzaksınız diyor ama orda distance 2 yazıyor. sorun nedir yardım edermisiniz?
@Ghlann Daha detaylı anlatırmısın ?