Kusura bakmayın beyler işe gidicem onun icin böyle bir başlık actım gec kaldım baya istedigim sey pvpkur yazınca adam cıkıyor ya sol da o admın sag tafaf ta 10 kare ilerde cıkmasını istiyorum nasıl yapa bilirim ayarları nedir.. saoln acele cevap veriseniz cok sevinirim yeniden saoln.


///Duello Sistemi/// 29 Kasým 2005 Salý 01.57 //Slencer- bu isim burda kalsýn kendi adýný bi aþaðý satýra ekle.
///var.duelloyeri xxxxx ile alan belirlenecek - önemli

[itemdef i_duello_gate]
id i_moongate_red
name Duello Alanina Gider
type t_script
weight 500

on=@create
color 0808
attr 010

on=@click
message @1153 Duello i
return 1

ON=@Step
if (<src.findlayer(25)>)
src.sysmessage @1153 Binek ile katilamazsiniz...
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> 3744,1301,21
	if (0<src.account.plevel> < 2)
	src.events +e_duelloda
	endif
endif

on=@dclick
if (<src.findlayer(25)>)
src.sysmessage @1153 Binek ile katilamazsiniz...
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>
		if (0<src.account.plevel> < 2)
		src.events +e_duelloda
		endif
	src.message @1153 Duello Alanina Hosgeldiniz
	return 1
endif

[itemdef i_duello_cikis1]
id i_moongate_red
name Delucia
type t_script
weight 500

on=@create
color 080a
attr 010

on=@click
message @1153 Delucia
return 1

on=@step
src.go delucia
src.events -e_duelloda

on=@dclick
src.go delucia
src.events -e_duelloda

[itemdef i_duello_cikis2]
id i_moongate_red
name Britain
type t_script
weight 500

on=@create
color 07a0
attr 010

on=@click
message @1153 Britain
return 1

on=@step
src.go Britain
src.events -e_duelloda

on=@dclick
src.go Britain
src.events -e_duelloda



On=@ItemDClick
if (<act.baseid> == i_deed_animal)
sysmessage @1153 Bu alanda binek kullanamazsiniz...
return 1
elseif (<act.baseid> == i_staff_horse)
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_rune_book)
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,,1 Duello Hoca
message @1100,,1 Hakem
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 @1100,,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 @1100,,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_gold
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 @1100,,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 @1100,,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 @1100,,1 Atli olarak duelloya katilamazsiniz.
		src.sysmessage @1100,,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 @68,,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 @1100,,1 Rakibinizin bankasinda yeterli miktarda altin 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 @1100,,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 @68,,1 Duello teklifiniz rededildi.
	if (<uid.<tag.rakip>.isplayer>)
	trysrc <tag.rakip> src.sysmessage @68,,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=@SpellCast
if ((<argn> == 28) ||(<argn> == 24) || (<argn> == 33) || (<argn> == 39) || (<argn> == 40) || (<argn> == 44) || (<argn> == 46) || (<argn> == 47) || (<argn> == 49) || (<argn> == 50) || (<argn> >= 55) || (<argn> >= 45))
	src.sysmessage @1100,,1 Duello sirasinda bu buyuyu kullanamazsiniz.
	f_fizzle
	return 1
endif

on=@gethit
//say <eval <hits>-<argn1>>
if (<eval <hits>-<argn1>> < 10)
	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 @63 Ben kazandim :)
			//say @38 Tebrikler beni yendin :(
			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 @077a,,1 Duello Sonucu; <src.name>, Duello'da  <name> Kesti Kendisini Tebrik ederiz..
			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:

[dialog d_bahis_price button]
On=1
if !(<isnum <argtxt[1]>>)
	src.sysmessage @1100,,1 Hatali karakter kullanimi.
	return 1
endif
if (<eval <argtxt[1]>> < 5000)
	src.sysmessage @38,1,1 Bahis en az 5000 altin olabilir.
elseif (<eval <argtxt[1]>> > 45000)
	src.sysmessage @38,1,1 Bahis en fazla 45000 altin olabilir.
elseif (<eval <argtxt[1]>> > <src.bankbalance>)
	src.sysmessage @38,1,1 Bankanizda bu kadar altin 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 altin 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_gold
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.-2>
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 -10 -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_gold
	new.amount <eval <more1>>
	new.cont <link.findlayer(29).uid>
	cont.newitem i_gold
	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_gold
		new.amount <eval <args>>
		new.cont <src.findlayer(29).uid>
	endif
endif

[function f_pvp_teklif]
if !(<uid.<args1>.ischar>)
	try uid.<args1>.dialog d_teklif_pvp
endif

[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] //al&yacute;nt&yacute;
act=<SRC.FINDLAYER(layer_bankbox).uid> 
act.layer=layer_pack 
act.type=t_container 
act.equip 
src.consume <args> i_gold
act.layer=layer_bankbox 
act.type=t_eq_bank_box 
act.equip 


//// not: Bu script bana ait de&eth;ildir. Üzerinde oynama yapt&yacute;m. Çok kullan&yacute;&thorn;l&yacute; oldu
//// Pvp ile para kasmak kadar güzel bi&thorn;i var m&yacute; acaba. 
//// i_shrink_potion u kendi shrink sisteminiz ile de&eth;i&thorn;tirin
/// ekranitemizle olayi &thorn;udur
/// [function ekranitemizle]
/// sysmessage
///  .           10 tane kadar olsun
///  .
//// sysmessage
// birde ad&yacute;m&yacute; silmeyin. o kadar editledik scpyi:D
/// Edited & Fixed By Noxier

src.act.p <src.p>
bu kısmı

src.act.p <src.p+10>
yapıp denermisin?


not: bu arada yaş kaç?
yapammdım olmadı abi acık anlatırmsın birde sag tarafta cıkıcak yapamdım yardım
Daha çok cevap almak için yeni taktikler,Borland serveri senmi açacaksın yoksa u-s'deki scripterlermi ?
uff bunu yazana kadar 2 kelime cevap yazardın hasan !
Geç kalmışsın harbiden.(2 saat. xD)
Borland : yapammdım olmadı abi acık anlatırmsın birde sag tarafta cıkıcak yapamdım yardım

Güzel taktik işe gidicem demişin ama 14 yaşındakine abi diyorsun..

@EvilDark
Yalnış anlama sadece yalancının mumunun yatsıya kadar dayancagını gösterdim Borlanda...
Yok bende sordum ya zaten yaş kaç diye o yüzden sordum kodun çalışması imkansız gibi bişeydi
Birde işe gidicem diye 16:55 de demiş ya inanamıyorum.:lol

Üye Ol veya Giriş Yap

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