[chardef c_hakem]
name #names_humanmale the refree
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=@dclick
if ()
src.sysmessage @38,1,1 Atli olarak duelloya katilamazsiniz.
return 1
endif
if ( < 3) && () && !()
if ( == -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=@death
hits 9999
return 1
[itemdef i_duello_ticket]
name duello ticket
id i_gold
type t_eq_script
layer layer_special
on=@targon_char
if ()
src.say
endif
if ( == )
if ()
src.sysmessage @38,1,1 Suan duelloya katilamazsiniz.
morey 0
morez 0
morex 0
link -1
tag.rakip -1
timer -1
elseif ()
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.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 !() || ( > 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 ( == ) || ()
morey 0
morez 0
morex 0
link -1
tag.rakip -1
timer -1
elseif ( < <******* >)
src.sysmessage @38,1,1 Rakibinizin bankasinda yeterli miktarda altin bulunmuyor.
morey 0
morez 0
morex 0
link -1
tag.rakip -1
timer -1
else
trysrc f_pvp_teklif
tag.rakip
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 ( == 1)
morey 0
morez 0
morex 0
link.sysmessage @38,1,1 Duello teklifiniz rededildi.
if (.isplayer>)
trysrc src.sysmessage @38,1,1 Duello teklifini reddettiniz.
trysrc src.dialogclose d_teklif_pvp
endif
link -1
tag.rakip -1
timer -1
cont.f_return_to_base
return 1
endif
if ( > 0)
if ( < 4)
cont.say
endif
morex -1
timer 1
elseif ( == 00) && ( == 00)
cont.say Basla!
timer 4
morey 24
elseif ( > 1)
timer 5
morey -= 1
elseif ( == 1)
morey 0
morex 0
f_pvp_giveprize
cont.p <******* >,<******* >,<******* >
cont.fix
cont.say Berabere.
link.go <******* -1>,
link.criminal 0
link.findid(i_duellolink).link.criminal 0
link.events -e_Duello_pvp
link.findid(i_duellolink).link.events -e_duello_pvp
link.findid(i_duellolink).link.go <******* +1>,
link.findid(i_duellolink).link.findid.(i_duellolink).remove
link.findid(i_duellolink).remove
link -1
endif
return 1
[events e_duello_pvp]
On=@SpellCast
if (( == 28) ||( == 24) || ( == 33) || ( == 39) || ( == 40) || ( == 44) || ( == 46) || ( == 47) || ( == 49) || ( == 50) || ( >= 55))
src.sysmessage @38 Duello sirasinda bu buyuyu kullanamazsiniz.
f_fizzle
return 1
endif
on=@gethit
//say <******* ->
if (<******* -> < 5)
if ( == )
if ()
try uid..morey 0
try uid..morex 0
try uid..timer -1
trysrc .cont.uid> src.f_return_to_base
try uid..cont.fix
src.p .cont.p>
src.move -1
p .cont.p>
move 1
src.events -e_duello_pvp
events -e_duello_pvp
src.hits
hits
try uid..link -1
trysrc f_pvp_wonprize <******* .more1>*2>
//try uid..cont.uid>.message @990,1,1 yendi.
try uid..cont.uid>.say yendi.
if (&statf_war)
src.flags &~statf_war
src.update
endif
findid.(i_duellolink).remove
src.findid(i_duellolink).remove
if ()
spelleffect s_cure,2000
fix
endif
if ()
src.spelleffect s_cure,2000
src.fix
endif
endif
endif
return 1
endif
[dialog d_bahis_price]
200,200
resizepic 0 0 5120 275 150
resizepic 10 10 3000 255 130
resizepic 25 60 2620 190 35
textentry 40 67 600 20 1152 1 0
button 220 65 4005 4006 1 0 1
text 40 30 0 1
[dialog d_bahis_price text]
5000
Duello bahis ucreti:
[dialog d_bahis_price button]
On=1
if !(>)
src.sysmessage @38,1,1 Hatali karakter kullanimi.
return 1
endif
if (<******* > < 5000)
src.sysmessage @38,1,1 Bahis en az 5000 altin olabilir.
elseif (<******* > > 1000000)
src.sysmessage @38,1,1 Bahis en fazla 1000000 altin olabilir.
elseif (<******* > > )
src.sysmessage @38,1,1 Bankanizda bu kadar altin bulunmuyor.
elseif !( == 04fffffff) && ( > 0)
src.sysmessage @38,1,1 Duelloya girmek uzere teklifte bulunmus kisiler var.
else
more2 <******* >
timer 10
morez 1
more1 0
link
target @68,1,1 Duelloda rakibiniz kim olacak?
endif
[dialog d_teklif_pvp]
0,0
noclose
nomove
resizepic 190 165 5120 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]
tarafindan duello teklifi aldiniz. Cevabiniz nedir?
Kabul ediyorum
Kabul etmiyorum
Bahis: <******* > gp
[dialog d_teklif_pvp button]
on=1
if !(strmatch('x','<******* >x<******* >'))
cont.say @38,1,1 Duello alani suan dolu.
return 1
endif
if (<******* > > )
src.sysmessage @38,1,1 Bankanizda yeterli altin bulunmuyor.
elseif ()
src.sysmessage @38,1,1 Suan duelloya katilamazsiniz.
elseif ()
link.sysmessage @38,1,1 Suan duelloya katilamazsiniz.
elseif ()
src.sysmessage @38,1,1 Polymorph buyusu etkisindeyken duelloya katilamazsiniz.
elseif ()
src.sysmessage @38,1,1 Rakibiniz polymorph buyusu etkisinde, bu durumda duelloya katilamaz.
elseif ()
src.sysmessage @38,1,1 At uzerindeyken duelloya katilamazsiniz.
elseif ()
link.sysmessage @38,1,1 At uzerindeyken duelloya katilamazsiniz.
elseif !( == )
src.sysmessage @38,1,1 Teklifi reddetiniz.
else
f_turnuvaconsume
cont.dir 4
cont.move 0 -10
src.p
src.move -4
link.p
link.move 3 7
link.criminal 1
link.events +e_Duello_pvp
src.criminal 1
src.events +e_duello_pvp
src.newitem i_duellotasi
src.act.p
src.act.move -1
src.newitem i_duellotasi
src.act.p
src.act.move -1 -1
src.newitem i_duellotasi
src.act.p
src.act.move 0 -1
src.newitem i_duellotasi
src.act.p
src.act.move 1 0
src.newitem i_duellotasi
src.act.p
src.act.move 1 1
src.newitem i_duellotasi
src.act.p
src.act.move 0 1
src.newitem i_duellolink
src.act.cont
src.act.tag.ticket
src.act.link
src.newitem i_duellolink
src.act.cont
src.act.tag.ticket
src.act.link
morez 0
timer 3
morex 5
endif
[itemdef i_duellolink]
name Duelloda
id i_gold
type t_eq_script
on=@create
timer 150
on=@unequip
if ()
src.events -e_duello_pvp
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 yenibahisalani]
src.newnpc c_hakem
src.act.p
src.act.tag.morex
src.act.tag.morey
src.act.tag.morez
src.newitem 02fe
src.act.p
src.act.move -4 -2
src.newitem 02fe
src.act.p
src.act.move -3 -2
src.newitem 02fe
src.act.p
src.act.move -2 -2
src.newitem 02fe
src.act.p
src.act.move -1 -2
src.newitem 02fe
src.act.p
src.act.move 0 -2
src.newitem 02fe
src.act.p
src.act.move 1 -2
src.newitem 02fe
src.act.p
src.act.move 2 -2
src.newitem 02fe
src.act.p
src.act.move 3 -2
src.newitem 02fe
src.act.p
src.act.move -4 -11
src.newitem 02fe
src.act.p
src.act.move -3 -11
src.newitem 02fe
src.act.p
src.act.move -2 -11
src.newitem 02fe
src.act.p
src.act.move -1 -11
src.newitem 02fe
src.act.p
src.act.move 0 -11
src.newitem 02fe
src.act.p
src.act.move 1 -11
src.newitem 02fe
src.act.p
src.act.move 2 -11
src.newitem 02fe
src.act.p
src.act.move 3 -11
src.newitem 02fe
src.act.p
src.act.move 4 -11
src.newitem 0300
src.act.p
src.act.move -5 -11
src.newitem 02ff
src.act.p
src.act.move -5 -10
src.newitem 02ff
src.act.p
src.act.move -5 -9
src.newitem 02ff
src.act.p
src.act.move -5 -8
src.newitem 02ff
src.act.p
src.act.move -5 -7
src.newitem 02ff
src.act.p
src.act.move -5 -6
src.newitem 02ff
src.act.p
src.act.move -5 -5
src.newitem 02ff
src.act.p
src.act.move -5 -4
src.newitem 02ff
src.act.p
src.act.move -5 -3
src.newitem 02ff
src.act.p
src.act.move -5 -2
src.newitem 02ff
src.act.p
src.act.move 4 -10
src.newitem 02ff
src.act.p
src.act.move 4 -9
src.newitem 02ff
src.act.p
src.act.move 4 -8
src.newitem 02ff
src.act.p
src.act.move 4 -7
src.newitem 02ff
src.act.p
src.act.move 4 -6
src.newitem 02ff
src.act.p
src.act.move 4 -5
src.newitem 02ff
src.act.p
src.act.move 4 -4
src.newitem 02ff
src.act.p
src.act.move 4 -3
src.newitem 02fd
src.act.p
src.act.move 4 -2
[function f_return_to_base]
p <******* >,<******* >,<******* >
fix
[function f_pvp_giveprize]
if (<******* > > 65000)
cont.newitem i_check_rbrt
new.more1 <******* >
new.cont
cont.newitem i_check_rbrt
new.more1 <******* >
new.cont
else
cont.newitem i_gold
new.amount <******* >
new.cont
cont.newitem i_gold
new.amount <******* >
new.cont
endif
[function f_pvp_wonprize]
if (>)
if ( > 65000)
src.newitem i_check_rbrt
new.more1 <******* >
new.cont
else
src.newitem i_gold
new.amount <******* >
new.cont
endif
endif
[function f_pvp_teklif]
if !(.ischar>)
try uid..dialog d_teklif_pvp
endif
[function f_turnuvaconsume]
if !( == )
if (<******* -> < 65001)
src.consumebank <******* ->
trysrc src.consumebank <******* ->
more1 += <******* ->
else
src.consumebank 65000
trysrc src.consumebank 65000
more1 += 65000
f_turnuvaconsume
endif
endif
[FUNCTION consumebank] //alıntı
act=
act.layer=layer_pack
act.type=t_container
act.equip
src.consume i_gold
act.layer=layer_bankbox
act.type=t_eq_bank_box
act.equip
Scriptleri code içersine alınız..
Bu konu Slothere tarafından düzenlendi(2008-02-21 19:22, 17 yıl önce)