[plevel 1]
duel
[itemdef i_duello_gate]
id i_moongate_red
name Duello Alanina Gider
type t_script
weight 500
on=@create
color 0808
attr 010
var.duelloyeri = 5212,1756//kendi alaninin koordinatlari
on=@click
message @1153 Duello Alani
var.duelloyeri = 5212,1756//kendi alaninin koordinatlari
return 1
ON=@Step
if (<src.isgm>)
src.go <var.duelloyeri>
else
if (<src.findlayer(25)>)
src.sysmessage @1153 Binek ile katilamazsiniz...
return 1
endif
if (<src.skilltotal> < 5000)
src.sysmessage @1153 Duello alanina gidebilmek en az 500.0 yetenek puanina sahip olmalisin
return 1
endif
if (<src.hits> >= <src.str>
src.message
elseif (<src.hits> == 00)
src.message Olu haldeyken gecemezsin
return 1
else
src.sysmessage @1153 Yarali iken gateden gecemezsin
return 1
endif
if (<SRC.FLAGS> & 0800000)
src.sysmessage @1153 Invis iken gecemezsiniz...
return 1
else
src.go <var.duelloyeri>
src.sayua All stay
if (0<src.account.plevel> < 2)
src.events +e_duelloda
endif
endif
on=@dclick
if (<src.isgm>)
src.go <var.duelloyeri>
else
src.sayua All stay
if (<src.findlayer(25)>
src.sysmessage @1153 Binek ile katilamazsiniz...
return 1
endif
if (<src.skilltotal> < 5000)
src.sysmessage @1153 Duello alanina gidebilmek en az 500.0 yetenek puanina sahip olmalisin
return 1
endif
if (<SRC.FLAGS> & 0800000)
src.sysmessage @1153 Invis iken gecemezsiniz...
return 1
endif
if (<src.hits> >= <src.str>
src.message
elseif (<src.hits> == 00)
src.message Olu haldeyken gecemezsin
return 1
else
src.sysmessage @1153 Yarali iken gateden gecemezsin
return 1
endif
if !(<src.flags>&statf_stone)
if (<distance> > 2)
src.sysmessage @1153 Gate'e ulasamiyorsunuz.
return 1
else
src.go <var.duelloyeri>
src.sayua All stay
if (0<src.account.plevel> < 2)
src.events +e_duelloda
endif
src.message @1153 Duello Alanina Hosgeldiniz
return 1
endif
[itemdef i_duello_cikis]
id i_moongate_red
name Delucia
type t_script
weight 500
on=@create
color 080a
attr 010
on=@click
message @1153 Duello Cikis Gate
message @1153 Safe Alani
return 1
on=@step
src.go green acres 3
src.events -e_duelloda
on=@dclick
src.go green acres 3
src.events -e_duelloda
[itemdef i_duello_cikis2]
id i_moongate_red
name Safe Alan
type t_telepad
weight 500
on=@create
color 07a0
attr 010
on=@click
message @1153 Safe Alan
return 1
on=@step
if (<src.isevent.e_duello_pvp>)
src.lynx Siz $u anda duellodasiniz...
return 1
else
src.go Safe Alan
src.events -e_duelloda
on=@dclick
if (<src.isevent.e_duello_pvp>)
src.lynx Siz $u anda duellodasiniz...
return 1
else
src.go Safe Alan
src.events -e_duelloda
[events e_duelloda]
on=@click
message @1153 [Duello Alaninda]
on=@attack
skill fail
sysmessage @1153 Sadece duelloda olanlar savasabilir...
return 1
on=@spellcast
if !((<argn> == 6) || (<argn> == 7) || (<argn> == 9) || (<argn> == 10) || (<argn> == 15) || (<argn> == 16) || (<argn> == 17) || (<argn> == 36))
skill fail
ekranitemizle
sysmessage @1153 Sadece stat ve armor buyulerini kullanabilirsiniz...
return 1
endif
on=@skillstart
if !((<action> == id(skill_magery)) || (<action> == skill_magery) || (<action> == id(skill_meditation)) || (<action> == skill_meditation) || (<action> == id(skill_alchemy)) || (<action> == skill_alchemy))
skill fail
skill fail
ekranitemizle
sysmessage @1153 Stat ve armor buyuleri disinda herhengi bir buyu yada skill kullanamazsiniz...
return 1
endif
on=@itemPickup_Pack
if (<act.type> == t_potion)
sysmessage @1153 Sadece Duello esnasinda kullanabilirsin...
return 1
endif
On=@ItemDClick
if (<act.baseid> == i_deed_animal)
sysmessage @1153 Bu alanda binek kullanamazsiniz...
return 1
endif
if (<act.type> == t_scroll)
sysmessage @1153 Duello alaninda bunu kullanamazsin
return 1
elseif (<act.type> == t_potion)
sysmessage @1153 Sadece Duello esnasinda kullanabilirsin...
return 1
endif
if (<act.baseid> == i_runebook)
sysmessage @1153 Duello alaninda runebook kullanamazsin...
return 1
elseif (<act.baseid> == i_bandage)
sysmessage @1153 Sadece Duello esnasinda kullanabilirsin...
return 1
endif
[chardef c_hakem]
name #names_humanmale
id c_man
can mt_equip|mt_nonmover
On=@Create
str 9500
dex 9500
int 9500
color 0418
speechcolor 0481
food 990
npc 1
itemnewbie i_hair_long
color 044e
itemnewbie i_beard_vandyke
color 044e
itemnewbie i_backpack
itemnewbie i_bankbox
color 0384
timer 900
attr 014
itemnewbie i_duello_ticket
itemnewbie i_blackrock_platemail
itemnewbie i_blackrock_platemail_leggings
itemnewbie i_blackrock_platemail_arms
itemnewbie i_blackrock_platemail_gorget
itemnewbie i_blackrock_platemail_gauntlets
// 02ff 02fe 02fd
on=@click
message @1153 Duello Gozetmeni
message @035 <name>
return 1
on=@dclick
if (strmatch('<src.account.plevel>','1')
if !(<src.isevent.e_duelloda>
src.events e_duelloda
say Bir daha dene savasci
return 1
endif
endif
if (<src.findlayer(25)>
src.sysmessage @38,1,1 Atli olarak duelloya katilamazsiniz.
return 1
endif
if (<distance> < 3) && (<canseelos> && !(<src.findid(i_duellolink)>
if (<findid(i_duello_ticket).timer> == -1)
findid.i_duello_ticket.dialog d_bahis_price
face
else
src.sysmessage @38,1,1 Duello alani suanda kullaniliyor.
endif
endif
return 1
on=@gethit
return 1
on=@spelleffect
return 1
on=@death
hits 9999
return 1
[itemdef i_duello_ticket]
name duello ticket
id i_cgold
type t_eq_script
layer layer_special
on=@targon_char
if (<src.gm>
src.say <cont.distance>
endif
if (<link> == <src.uid>
if (<src.findid(i_duellolink)>
src.sysmessage @38,1,1 Suan duelloya katilamazsiniz.
morey 0
morez 0
morex 0
link -1
tag.rakip -1
timer -1
elseif (<src.targ.findid(i_duellolink)>
src.targ.sysmessage @38,1,1 Suan duelloya katilamazsiniz.
morey 0
morez 0
morex 0
link -1
tag.rakip -1
timer -1
elseif (<src.targ.findlayer(25)>
src.targ.sysmessage @38,1,1 Atli olarak duelloya katilamazsiniz.
src.sysmessage @38,1,1 Rakibiniz atin uzerindeyken duelloya katilamaz.
morey 0
morez 0
morex 0
link -1
tag.rakip -1
timer -1
elseif !(<src.targ.canseelos> || (<src.targ.distance> > 3)
src.sysmessage @38,1,1 Duello teklifi icin rakibinize yaklasmalisiniz.
morey 0
morez 0
morex 0
link -1
tag.rakip -1
timer -1
elseif (<src.targ.uid> == <src.uid> || (<src.targ.npc>
morey 0
morez 0
morex 0
link -1
tag.rakip -1
timer -1
elseif (<src.targ.bankbalance> < <eval <more2>>
src.sysmessage @38,1,1 Rakibinizin bankasinda yeterli miktarda bilet bulunmuyor.
morey 0
morez 0
morex 0
link -1
tag.rakip -1
timer -1
else
trysrc <src.targ.uid> f_pvp_teklif <uid>
tag.rakip <src.targ.uid>
endif
endif
return 1
on=@Targon_Cancel
src.sysmessage @38,1,1 Hata.
morey 0
morez 0
morex 0
link -1
tag.rakip -1
timer -1
return 1
on=@targon_item
morey 0
morez 0
morex 0
link -1
tag.rakip -1
timer -1
return 1
on=@timer
if (<morez> == 1)
morey 0
morez 0
morex 0
link.sysmessage @38,1,1 Duello teklifiniz rededildi.
if (<uid.<tag.rakip>.isplayer>
trysrc <tag.rakip> src.sysmessage @38,1,1 Duello teklifini reddettiniz.
trysrc <tag.rakip> src.dialogclose d_teklif_pvp
endif
link -1
tag.rakip -1
timer -1
cont.f_return_to_base
return 1
endif
if (<morex> > 0)
if (<morex> < 4)
cont.say <morex>
endif
morex <morex>-1
timer 1
elseif (<morex> == 00) && (<morey> == 00)
cont.say Basla!
timer 4
morey 24
elseif (<morey> > 1)
timer 5
morey -= 1
elseif (<morey> == 1)
morey 0
morex 0
f_pvp_giveprize
cont.p <eval <cont.tag.morex>>,<eval <cont.tag.morey>>,<eval <cont.tag.morez>>
cont.fix
cont.say Berabere.
link.go <eval <cont.p.x>-1>,<cont.p.y>
link.criminal 0
link.findid(i_duellolink).link.criminal 0
link.events -e_Duello_pvp
link.events +e_duelloda
link.findid(i_duellolink).link.events -e_duello_pvp
link.findid(i_duellolink).link.events +e_duelloda
link.findid(i_duellolink).link.go <eval <cont.p.x>+1>,<cont.p.y>
link.findid(i_duellolink).link.findid.(i_duellolink).remove
link.findid(i_duellolink).remove
link -1
endif
return 1
[events e_duello_pvp]
on=@click
message @1153 [Duelloda Savasmakta]
On=@SpellCast
if ((<argn> == 24) || (<argn> == 33) || (<argn> == 39) || (<argn> == 40) || (<argn> == 44) || (<argn> == 46) || (<argn> == 47) || (<argn> == 49) || (<argn> == 50) || (<argn> >= 55) || (<argn> >= 45))
src.sysmessage @38 Duello sirasinda bu buyuyu kullanamazsiniz.
f_fizzle
return 1
endif
On=@ItemDClick
if (<act.baseid> == i_deed_animal)
sysmessage @1153 Bu alanda binek kullanamazsiniz...
return 1
endif
if (<act.baseid> == i_runebook)
sysmessage @1153 Savasirken runebook kullanamazsin...
return 1
on=@gethit
//say <eval <hits>-<argn1>>
if (<eval <hits>-<argn1>> < 5)
if (<src.findid(i_duellolink).link.uid> == <uid>
if (<src.findid(i_duellolink)>
try uid.<src.findid(i_duellolink).tag.ticket>.morey 0
try uid.<src.findid(i_duellolink).tag.ticket>.morex 0
try uid.<src.findid(i_duellolink).tag.ticket>.timer -1
trysrc <uid.<src.findid(i_duellolink).tag.ticket>.cont.uid> src.f_return_to_base
try uid.<src.findid(i_duellolink).tag.ticket>.cont.fix
src.p <uid.<src.findid(i_duellolink).tag.ticket>.cont.p>
src.move -1
p <uid.<src.findid(i_duellolink).tag.ticket>.cont.p>
move 1
src.say Ben kazandim!
src.tag0.kazanilanduel +=1
say Tebrikler beni yendin
tag0.kaybedilenduel +=1
src.events -e_duello_pvp
src.events +e_duelloda
events -e_duello_pvp
events +e_duelloda
if (<src.findid.i_bleeding>
src.findid.i_bleeding.remove
src.findid.i_bleeding2.remove
src.sysmessage @1153 Bleeding etkisi gecti
endif
if (<findid.i_bleeding>
findid.i_bleeding.remove
findid.i_bleeding2.remove
sysmessage @1153 Bleeding etkisi gecti
endif
src.hits <src.str>
hits <str>
try uid.<src.findid(i_duellolink).tag.ticket>.link -1
trysrc <src.uid> f_pvp_wonprize <eval <uid.<src.findid(i_duellolink).tag.ticket>.more1>*2>
//try uid.<uid.<src.findid(i_duellolink).tag.ticket>.cont.uid>.message @990,1,1 <src.name> yendi.
try uid.<uid.<src.findid(i_duellolink).tag.ticket>.cont.uid>.serv.allclients sysmessage @1153 <src.name> ile <name> arasindaki duelloyu <src.name> kazandi. Tebrikler!
if (<src.flags>&statf_war)
src.flags <src.flags>&~statf_war
src.update
endif
if (<flags>&statf_war)
flags <flags>&~statf_war
update
endif
findid.(i_duellolink).remove
src.findid(i_duellolink).remove
if (<findid(i_rune_poison)>
spelleffect s_cure,2000
fix
endif
if (<src.findid(i_rune_poison)>
src.spelleffect s_cure,2000
src.fix
endif
endif
endif
return 1
endif
[dialog d_bahis_price]
200,200
resizepic 0 0 5054 275 150
resizepic 10 10 3000 255 130
resizepic 25 59 5054 190 35
textentry 40 67 600 20 1152 1 0
button 220 65 4005 4006 1 0 1
text 40 30 1153 1
[dialog d_bahis_price text]
5000
Duello bahis ucreti(Bilet):
[dialog d_bahis_price button]
On=1
if !(<isnum <argtxt[1]>>
src.sysmessage @38,1,1 Hatali karakter kullanimi.
return 1
endif
if (<eval <argtxt[1]>> < 5000)
src.sysmessage @38,1,1 Bahis en az 5000 Bilet olabilir.
elseif (<eval <argtxt[1]>> > 1000000)
src.sysmessage @38,1,1 Bahis en fazla 1000000 Bilet olabilir.
elseif (<eval <argtxt[1]>> > <src.bankbalance>
src.sysmessage @38,1,1 Bankanizda bu kadar bilet bulunmuyor.
elseif !(<link> == 04fffffff) && (<morez> > 0)
src.sysmessage @38,1,1 Duelloya girmek uzere teklifte bulunmus kisiler var.
else
more2 <eval <argtxt[1]>>
timer 10
morez 1
more1 0
link <src.uid>
target @68,1,1 Duelloda rakibiniz kim olacak?
endif
[dialog d_teklif_pvp]
0,0
noclose
nomove
resizepic 190 165 5054 275 200
//resizepic 200 175 3000 255 180
htmlgump 215 190 220 60 0 1 1
text 270 260 0 3
text 290 295 0 1
text 290 315 0 2
button 255 295 4006 4007 1 0 1
button 255 315 4018 4019 1 0 0
[dialog d_teklif_pvp text]
<link.name> tarafindan duello teklifi aldiniz. Cevabiniz nedir?
Kabul ediyorum
Kabul etmiyorum
Bahis: <eval <more2>> gp
[dialog d_teklif_pvp button]
on=1
if !(strmatch('<cont.p.x>x<cont.p.y>','<eval <cont.tag.morex>>x<eval <cont.tag.morey>>')
cont.say @38,1,1 Duello alani suan dolu.
return 1
endif
if (<eval <more2>> > <src.bankbalance>
src.sysmessage @38,1,1 Bankanizda yeterli bilet bulunmuyor.
elseif (<src.findid(i_duellolink)>
src.sysmessage @38,1,1 Suan duelloya katilamazsiniz.
elseif (<link.findid(i_duellolink)>
link.sysmessage @38,1,1 Suan duelloya katilamazsiniz.
elseif (<src.findid(i_morpher)>
src.sysmessage @38,1,1 Polymorph buyusu etkisindeyken duelloya katilamazsiniz.
elseif (<link.findid(i_morpher)>
src.sysmessage @38,1,1 Rakibiniz polymorph buyusu etkisinde, bu durumda duelloya katilamaz.
elseif (<src.findlayer(25)>
src.sysmessage @38,1,1 At uzerindeyken duelloya katilamazsiniz.
elseif (<link.findlayer(25)>
link.sysmessage @38,1,1 At uzerindeyken duelloya katilamazsiniz.
elseif !(<tag.rakip> == <src.uid>
src.sysmessage @38,1,1 Teklifi reddetiniz.
else
f_turnuvaconsume
cont.dir 4
cont.move 0 -10
src.p <cont.p>
src.move -4
link.p <cont.p>
link.move 3 7
link.criminal 1
link.events +e_Duello_pvp
link.events -e_duelloda
src.criminal 1
src.events +e_duello_pvp
src.events -e_duelloda
src.newitem i_duellotasi
src.act.p <link.p>
src.act.move -1
src.newitem i_duellotasi
src.act.p <link.p>
src.act.move -1 -1
src.newitem i_duellotasi
src.act.p <link.p>
src.act.move 0 -1
src.newitem i_duellotasi
src.act.p <src.p>
src.act.move 1 0
src.newitem i_duellotasi
src.act.p <src.p>
src.act.move 1 1
src.newitem i_duellotasi
src.act.p <src.p>
src.act.move 0 1
src.newitem i_duellolink
src.act.cont <src.uid>
src.act.tag.ticket <uid>
src.act.link <link.uid>
src.newitem i_duellolink
src.act.cont <link.uid>
src.act.tag.ticket <uid>
src.act.link <src.uid>
morez 0
timer 3
morex 5
endif
[itemdef i_duellolink]
name Duelloda
id i_cgold
type t_eq_script
on=@create
timer 150
on=@unequip
if (<src.isevent.e_duello_pvp>
src.events -e_duello_pvp
src.events +e_duelloda
src.go duelloa
endif
on=@timer
remove
return 1
[itemdef i_duellotasi]
id 02ff
on=@create
name invisible stone
attr 090
timer 10
on=@timer
remove
return 1
[function pvpkur]
src.newnpc c_hakem
src.act.p <src.p>
src.act.tag.morex <src.p.x>
src.act.tag.morey <src.p.y>
src.act.tag.morez <src.p.z>
src.newitem 02fe
src.act.p <src.p>
src.act.move -4 -2
src.newitem 02fe
src.act.p <src.p>
src.act.move -3 -2
src.newitem 02fe
src.act.p <src.p>
src.act.move -2 -2
src.newitem 02fe
src.act.p <src.p>
src.act.move -1 -2
src.newitem 02fe
src.act.p <src.p>
src.act.move 0 -2
src.newitem 02fe
src.act.p <src.p>
src.act.move 1 -2
src.newitem 02fe
src.act.p <src.p>
src.act.move 2 -2
src.newitem 02fe
src.act.p <src.p>
src.act.move 3 -2
src.newitem 02fe
src.act.p <src.p>
src.act.move -4 -11
src.newitem 02fe
src.act.p <src.p>
src.act.move -3 -11
src.newitem 02fe
src.act.p <src.p>
src.act.move -2 -11
src.newitem 02fe
src.act.p <src.p>
src.act.move -1 -11
src.newitem 02fe
src.act.p <src.p>
src.act.move 0 -11
src.newitem 02fe
src.act.p <src.p>
src.act.move 1 -11
src.newitem 02fe
src.act.p <src.p>
src.act.move 2 -11
src.newitem 02fe
src.act.p <src.p>
src.act.move 3 -11
src.newitem 02fe
src.act.p <src.p>
src.act.move 4 -11
src.newitem 0300
src.act.p <src.p>
src.act.move -5 -11
src.newitem 02ff
src.act.p <src.p>
src.act.move -5 -10
src.newitem 02ff
src.act.p <src.p>
src.act.move -5 -9
src.newitem 02ff
src.act.p <src.p>
src.act.move -5 -8
src.newitem 02ff
src.act.p <src.p>
src.act.move -5 -7
src.newitem 02ff
src.act.p <src.p>
src.act.move -5 -6
src.newitem 02ff
src.act.p <src.p>
src.act.move -5 -5
src.newitem 02ff
src.act.p <src.p>
src.act.move -5 -4
src.newitem 02ff
src.act.p <src.p>
src.act.move -5 -3
src.newitem 02ff
src.act.p <src.p>
src.act.move -5 -2
src.newitem 02ff
src.act.p <src.p>
src.act.move 4 -10
src.newitem 02ff
src.act.p <src.p>
src.act.move 4 -9
src.newitem 02ff
src.act.p <src.p>
src.act.move 4 -8
src.newitem 02ff
src.act.p <src.p>
src.act.move 4 -7
src.newitem 02ff
src.act.p <src.p>
src.act.move 4 -6
src.newitem 02ff
src.act.p <src.p>
src.act.move 4 -5
src.newitem 02ff
src.act.p <src.p>
src.act.move 4 -4
src.newitem 02ff
src.act.p <src.p>
src.act.move 4 -3
src.newitem 02fd
src.act.p <src.p>
src.act.move 4 -2
[function f_return_to_base]
p <eval <tag.morex>>,<eval <tag.morey>>,<eval <tag.morez>>
fix
[function f_pvp_giveprize]
if (<eval <more1>> > 65000)
cont.newitem i_check_rbrt
new.more1 <eval <more1>>
new.cont <link.findlayer(21).uid>
cont.newitem i_check_rbrt
new.more1 <eval <more1>>
new.cont <link.findid(i_duellolink).link.findlayer(21).uid>
else
cont.newitem i_cgold
new.amount <eval <more1>>
new.cont <link.findlayer(29).uid>
cont.newitem i_cgold
new.amount <eval <more1>>
new.cont <link.findid(i_duellolink).link.findlayer(29).uid>
endif
[function f_pvp_wonprize]
if (<isnum <args>>
if (<args> > 65000)
src.newitem i_check_rbrt
new.more1 <eval <args>>
new.cont <src.findlayer(21).uid>
else
src.newitem i_cgold
new.amount <eval <args>>
new.cont <src.findlayer(29).uid>
endif
endif
[function f_pvp_teklif]
dialog d_teklif_pvp
[function f_turnuvaconsume]
if !(<more2> == <more1>
if (<eval <more2>-<more1>> < 65001)
src.consumebank <eval <more2>-<more1>>
trysrc <link.uid> src.consumebank <eval <more2>-<more1>>
more1 += <eval <more2>-<more1>>
else
src.consumebank 65000
trysrc <link.uid> src.consumebank 65000
more1 += 65000
f_turnuvaconsume
endif
endif
[FUNCTION consumebank] //alinti
act=<SRC.FINDLAYER(layer_bankbox).uid>
act.layer=layer_pack
act.type=t_container
act.equip
src.consume <args> i_cgold
act.layer=layer_bankbox
act.type=t_eq_bank_box
act.equip
[function duel]
src.sysmessage @07a1 PVP Shard Duello Bilgilendirme sistemi ;
src.sysmessage @0187 Bugune kadar <eval <tag0.kazanilanduel>> duello kazandiniz, <eval <tag0.kaybedilenduel>> duello kaybettiniz...
[itemdef i_duellogirisfix]
id i_teleporter
name Safeye Giris
on=@create
attr attr_invis | 08
timer -1
on=@timer
timer 10
return 1
on=@step
if (<src.body> = c_man) || (<src.body> = c_woman)
return 1
else
timerf 2,src.remove
return 1
Script Fullu Bu bana nereye ekleneceğini falan ayarlayıp yollarsan cok iyi oLur :S sabahtan beri uğraşıyorum kafam karman çorman.. =)
