[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)
Silindi
Members
0
ne yapmak istediğini anlamadım sunu kod içinde kullanırmısın yeni bir duello sistemimi yayınlıyorsun yoksa yardımmı istiyorsun belli olmuyor.
gold yerine sp ye nasıl çevirebilirz bide bunu bi yol söyleyebilirmisnz.(boşa topiç açmaym dedim]
Novice
0.1
neyi gold yerine sp ye çevirmek istiyorsun anlamadım :s
Silindi
Novice
0.1
bildiğin altını sp yapıcak sanırım öyle anladım ben
i_gold u i _silver_piece yapıcaksın bunları sormaya pek gerek yok gibi?
Green i_silver_piece değiilde i_fctn_silver olması lzm diilmi . (:
CeIIo : Green i_silver_piece değiilde i_fctn_silver olması lzm diilmi . (:

ne fark eder? yapıcağı işlemi söylemiş sonuçta.

Üye Ol veya Giriş Yap

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