Merhabalar Arkadaşlar duello sistemine gold ile giriliyor ben bunu kendim bir tane item yarattım gold ile değiştirdim i_kalp yaptım onunla giriyordum ama sonra girmemeye başladı sorun nerde anlamadım [ 2 sıkıntım duello eski bir sistem teklif gönderme kişi eliyle belirleğini rakamda giriliyor ben kendim bir dialog yaptım bunuda eski teklifle nasıl değiştireceğimi bilemedim karışmasın diye kendi yaptığım dialoğuda buraya ilk başa konuyorum size zahmet onuda enteğre edebilirmisin.

[dialog d_npcgold_ucret]

-240,0

nomove



resizepic 240 20 5150 290 260

dhtmlgump 310 43 150 40 0 0 <def.bfont_black>[ Duello Giris Özellikler ] 

dhtmlgump 310 81 150 40 0 0 <def.bfont_red>[ 1 ] Npc Gold                  

dhtmlgump 310 121 150 40 0 0 <def.bfont_red>[ 5 ] Npc Gold

dhtmlgump 310 161 150 40 0 0 <def.bfont_red>[ 10 ] Npc Gold

dhtmlgump 370 230 150 40 0 0 <def.bfont_red> Not: Npc Gold Duello





button 270 80 4023 4025 1 0 1

button 270 120 4023 4025 1 0 2

button 270 160 4023 4025 1 0 3

[itemdef i_duello_stone]

id i_grave_stone

name duello tasi



on=@create

attr 010



on=@click

if (<more1> == 2)

message @58,,1 [Sure:<timer>]

message @58,,1 [<uid.<tag.player1>.name> vs. <uid.<tag.player2>.name>]

endif

message @38,,1 [ Npc Gold Duello Tasi ]

return 1



on=@dclick

if !(<src.findid.i_duellocezasure>)

else

src.sysmessage @0790,,1 Duello yapabilmek için <src.findid.i_duellocezasure.timer> saniye beklemelisiniz.

return 1

endif

if (<src.account.plevel> >= 2)

sdialog d_duello_ayar

return 1

endif

for x 1 4

if (strmatch('<tag0.koordinat<dlocal.x>>','0'))

src.sysmessage @38,,1 Bu duello tasi ayarlanmamis lutfen page atin.

return 1

endif

endfor



///local.saat=<SERV.RTIME.FORMAT %H>

///local.dakika=<SERV.RTIME.FORMAT %M>

///if !((<local.saat> == 13) || (<local.saat> == 19))

///src.sysmessage @38,,1 Duello sistemi 13:00-14:00 ve 19:00-20:00 saatlerinde calismaktadir.

///return 1

///endif



if (<distance> > 3)

src.sysmessage @38,,1 Tasa yeterince yakin degilsiniz.

return 1

elseif (<more1> == 1)

src.sysmessage @38,,1 Suanda duello teklifi bekleniyor.

return 1

elseif (<more1> == 2)

src.sysmessage @07a1,,1 Suanda <uid.<tag.player1>.name> ve <uid.<tag.player2>.name> duellosu yapiyor.

return 1

elseif (<more1> == 3)

src.sysmessage @38,,1 Duello tasi kullanima kapatilmistir.

return 1

else

sdialog d_duello_teklif_ana_menu

endif

return 1



on=@timer

say Berabere

serv.allclients sysmessage @38,,1 Duello Duyuru :

serv.allclients sysmessage @0790,,1 <uid.<tag0.player1>.name> ile <uid.<tag0.player2>.name> arasindaki [ Duello ] berabere bitti.

trysrc <tag0.player1> src.p <tag0.koordinat2>

trysrc <tag0.player2> src.p <tag0.koordinat2>

trysrc <tag0.player1> src.statlarifulle

trysrc <tag0.player2> src.statlarifulle

trysrc <tag0.player1> src.tag.ocsavas

trysrc <tag0.player2> src.tag.ocsavas

trysrc <tag0.player1> src.events -e_duello

trysrc <tag0.player2> src.events -e_duello

trysrc <tag0.player1> src.paraverlann <eval <obj.tag.ucret>*2>

trysrc <tag0.player2> src.paraverlann <eval <obj.tag.ucret>*2>

trysrc <tag0.player1> src.update

trysrc <tag0.player2> src.update

more1 0



return 1



[function paraverlann]

serv.newitem i_kalp

new.amount <eval <obj.dtag.ucret>*1>

new.bounce



[function kalp]

serv.newitem i_kalp

new.amount <eval <obj.dtag0.ucret>*2>

new.cont <uid>



[function f_duelloteklif]

obj = <src.tag.duellotas>

if !(<argo.isplayer>)

src.sysmessage @38,,1 Sadece oyuncularla duello yapabilirsiniz.

return 1

elseif (<argo.uid> == <src.uid>)

src.sysmessage @38,,1 Kendinize duello teklifi atamazsiniz.

return 1

elseif (<argo.distance <src.uid>> > 3)

src.sysmessage @38,,1 <argo.name> adli oyuncunun yakininda bulunmalisiniz.

return 1

elseif (<argo.distance <obj>> > 10)

src.sysmessage @38,,1 <argo.name> adli oyuncu duello tasina yakin degil.

return 1

elseif (<obj.more1> == 1)

src.sysmessage @38,,1 suanda baska bir teklif bekleniyor.

return 1

elseif (<obj.more1> == 2)

src.sysmessage @38,,1 suanda <uid.<obj.tag0.player1>.name> vs. <uid.<obj.tag0.player2>.name> duellosu var.

return 1

elseif !(<argo.bankbalance> >= <src.dtag0.ucret>)

src.sysmessage @38,,1 <argo.name> adli oyuncunun bankasinda bu meblada Npc Gold bulunmuyor.

return 1

else

if !(<argo.findid.i_duellocezasure>)

else

src.sysmessage @0790,,1 Rakibinizin <argo.findid.i_duellocezasure.timer> saniye cezasi var.

return 1

endif

obj.more1 1

argo.tag.ucret <src.dtag0.ucret>

argo.tag.poison <src.tag0.poison>

argo.tag.loot <src.tag0.loot>

argo.tag0.duellotas <obj>

argo.tag0.duellorakip <src.uid>

argo.timerf 20,dialogclose d_duello_teklif

argo.sysmessage @0481,,1 Duello teklifi aldiniz. 20 saniye icinde kabul etmelisiniz.

src.tag.duellorakip <argo>

trysrc <argo> sdialog d_duello_teklif

endif



[dialog d_duello_teklif]

0,0

nomove

page 1

button 15 15 30 30 0 2 1



page 2

resizepic 70 120 5150 350 260

//resizepic 80 128 5150 330 245

dtext 95 150 1153 <uid.<src.tag0.duellorakip>.name> adli oyuncu

dtext 95 170 1153 size duello teklifinde bulunuyor.

dtext 95 190 1153 Katilmak istiyormusunuz?

dtext 95 215 38 Sartlar;

dtext 95 240 049 Ucret: <src.dtag0.ucret>

dtext 95 260 1153 Loot: <qval (<src.tag0.loot> < 1)?YASAK:SERBEST>

dtext 95 280 1153 Silaha zehir: <qval (<src.tag0.poison> < 1)?SERBEST:YASAK>

button 100 320 55 56 1 0 1

dtext 140 320 049 Evet

button 250 320 55 56 1 0 0

dtext 290 320 049 Hayir





[dialog d_duello_teklif button]

on=0

obj = <src.tag0.duellorakip>

obj.sysmessage @38,,1 <src.name> adli oyuncu duello teklifinizi reddetti.

try uid.<src.tag0.duellotas>.more1 0



on=1

obj = <src.tag0.duellorakip>

if (<uid.<src.tag0.duellotas>.more1> == 2)

src.sysmessage @38,,1 Suanda <uid.<uid.<src.tag0.duellotas>.tag0.player1>.name> vs. <uid.<uid.<src.tag0.duellotas>.tag0.player2>.name> duellosu var.

return 1

endif



if !(<src.bankbalance> >= <src.dtag0.ucret>)

src.sysmessage @38,,1 Bankanizda bu meblada Npc Gold bulunmuyor.

obj.sysmessage @38,,1 Rakibinizin bankasinda bu meblada Npc Gold bulunmuyor.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if !(<obj.bankbalance> >= <src.dtag0.ucret>)

obj.sysmessage @38,,1 Bankanizda bu meblada Npc Gold bulunmuyor.

src.sysmessage @38,,1 Rakibinizin bankasinda bu meblada Npc Gold bulunmuyor.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if (<obj.findlayer(25).uid>)

obj.sysmessage @38,,1 Altinizda binek varken duello yapamazsiniz.

src.sysmessage @38,,1 Rakibinizin altinda binek oldugu icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if (<src.findlayer(25).uid>)

src.sysmessage @38,,1 Altinizda binek varken duello yapamazsiniz.

obj.sysmessage @38,,1 Rakibinizin altinda binek oldugu icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



forchars 25

if (<memoryfindtype.memory_ipet>)

if (<memoryfindtype.memory_ipet.link>==<src.uid>)

src.sysmessage @38,,1 Etrafinizda size ait bir hayvan varken duello yapamazsiniz.

obj.sysmessage @38,,1 Rakibinizin yakininda ona ait bir binek bulundugu icin duello iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endif

endfor



forchars 25

if (<memoryfindtype.memory_ipet>)

if (<memoryfindtype.memory_ipet.link>==<obj.uid>)

obj.sysmessage @38,,1 Etrafinizda size ait bir hayvan varken duello yapamazsiniz.

src.sysmessage @38,,1 Rakibinizin yakininda ona ait bir binek bulundugu icin duello iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endif

endfor



if ((<obj.findlayer(25).uid>) && !(<src.findlayer(25).uid>)) || ((<src.findlayer(25).uid>) && !(<obj.findlayer(25).uid>))

obj.sysmessage @38,,1 Rakibinizle esit sartlarda degilsiniz.

src.sysmessage @38,,1 Rakibinizle esit sartlarda degilsiniz.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



for x 0 <src.findlayer(21).rescount>

if (<uid.<src.findlayer.21.uid>.findcont(<dlocal.x>).isweapon>) && !(<uid.<src.findlayer.21.uid>.findcont(<dlocal.x>).morez> == 0) && (<src.tag0.poison> == 1)

src.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

obj.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endfor



for x 0 <obj.findlayer(21).rescount>

if (<uid.<obj.findlayer.21.uid>.findcont(<dlocal.x>).isweapon>) && !(<uid.<obj.findlayer.21.uid>.findcont(<dlocal.x>).morez> == 0) && (<obj.tag0.poison> == 1)

obj.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

src.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endfor



if ((<src.findlayer(1).isweapon>) && !(<src.findlayer(1).morez> == 0) && (<src.tag0.poison> == 1))

src.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

obj.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if ((<src.findlayer(2).isweapon>) && !(<src.findlayer(2).morez> == 0) && (<src.tag0.poison> == 1))

src.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

obj.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if ((<obj.findlayer(1).isweapon>) && !(<obj.findlayer(1).morez> == 0) && (<src.tag0.poison> == 1))

obj.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

src.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if ((<obj.findlayer(2).isweapon>) && !(<obj.findlayer(2).morez> == 0) && (<src.tag0.poison> == 1))

obj.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

src.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif





//obj.findlayer(1).morez 0

//obj.findlayer(2).morez 0

//src.findlayer(1).morez 0

//src.findlayer(2).morez 0

src.events +e_duello

src.events -e_pazarsafe

src.duelloitemver

src.duelloitemver3

src.events -e_pazarsafe

obj.events +e_duello

obj.duelloitemver

obj.duelloitemver3

obj.events -e_pazarsafe

obj.tag.ocsavas 1

src.tag.ocsavas 1

obj.events -e_pazarsafe

src.findid.i_rune_incognito.timer

obj.findid.i_rune_incognito.timer

serv.allclients sysmessage @38,,1 Duello Duyuru :

serv.allclients sysmessage @0790,,1 <obj.name> vs <src.name> duellosu basliyor.

src.gold -=<eval <obj.dtag0.ucret>>

obj.gold -=<eval <obj.dtag0.ucret>>

serv.newnpc c_hakem

new.p <uid.<src.tag0.duellotas>.tag0.koordinat1>

new.gerisay

new.update

trysrc <obj> src.statlarifulle

statlarifulle

try uid.<src.tag0.duellotas>.tag.player1 <obj>

try uid.<src.tag0.duellotas>.tag.player2 <src.uid>

try uid.<src.tag0.duellotas>.timer 400

try uid.<src.tag0.duellotas>.more1 2

trysrc <obj> p <uid.<src.tag0.duellotas>.tag0.koordinat3>

obj.update

src.p <uid.<src.tag0.duellotas>.tag0.koordinat4>

trysrc <obj> src.kafeslee

src.kafeslee

src.update





[function duellosureceza]

serv.newitem i_duellocezasure

new.cont <uid>



[itemdef i_duellocezasure]

id i_gold

name bekle biraz

type t_eq_script



on=@create

attr attr_invis | attr_decay

timer 120



on=@equip

timer 120



on=@timer

remove

return 1



[function gerisay]

timerf 22,remove

timerf 21, say @0790 Basla.

timerf 21, say @0790 1

timerf 20, say @0790 2

timerf 19, say @0790 3

timerf 18, say @0790 4

timerf 17, say @0790 5

timerf 16, say @0790 6

timerf 15, say @0790 7

timerf 14, say @0790 8

timerf 13, say @0790 9

timerf 12, say @0790 10

timerf 11, say @0790 11

timerf 10, say @0790 12

timerf 9, say @0790 13

timerf 8, say @0790 14

timerf 7, say @0790 15

timerf 6, say @0790 16

timerf 5, say @0790 17

timerf 4, say @0790 18

timerf 3, say @0790 19

timerf 2, say @0790 20



[function kafeslee]

NEWITEM=06b

ACT.TYPE=t_normal 

ACT.COLOR=08ad

ACT.P=<P> 

ACT.MOVE 1,1 

ACT.ATTR=00002 

ACT.TIMER=22



NEWITEM=06a

ACT.TYPE=t_normal 

ACT.COLOR=08ad

ACT.P=<P> 

ACT.MOVE 1,0

ACT.ATTR=00002 

ACT.TIMER=22



NEWITEM=06a

ACT.TYPE=t_normal 

ACT.COLOR=08ad

ACT.P=<P> 

ACT.MOVE -1,0

ACT.ATTR=00002 

ACT.TIMER=22



NEWITEM=06a

ACT.TYPE=t_normal 

ACT.COLOR=08ad

ACT.P=<P> 

ACT.MOVE -1,1

ACT.ATTR=00002 

ACT.TIMER=22





NEWITEM=069

ACT.TYPE=t_normal 

ACT.COLOR=08ad

ACT.P=<P> 

ACT.MOVE 0,1

ACT.ATTR=00002 

ACT.TIMER=22



NEWITEM=069

ACT.TYPE=t_normal 

ACT.COLOR=08ad

ACT.P=<P> 

ACT.MOVE 0,1

ACT.ATTR=00002 

ACT.TIMER=22



NEWITEM=069

ACT.TYPE=t_normal 

ACT.COLOR=08ad

ACT.P=<P> 

ACT.MOVE 0,-1

ACT.ATTR=00002 

ACT.TIMER=22



NEWITEM=069

ACT.TYPE=t_normal 

ACT.COLOR=08ad

ACT.P=<P> 

ACT.MOVE 1,-1

ACT.ATTR=00002 

ACT.TIMER=22



NEWITEM=i_duelpot

ACT.TYPE=t_normal 

ACT.COLOR=08ad

ACT.P=<P> 

ACT.MOVE 0,0

ACT.ATTR=00002 

ACT.TIMER=2



[chardef c_hakem]

name #names_humanmale the refree

id c_man

can mt_equip|mt_nonmover



on=@click

message @07a1,,1 Duello Hakem

return 1



On=@Create

str 9500

dex 9500

int 9500

color 0418

speechcolor 0481

food 990

npc 1



itemnewbie i_shield_chaos

color 0

//item i_mt_ostard_zostrich

//color 0c86

//name Night Ostard

itemnewbie i_kryss_force

Color 0

itemnewbie i_hair_long

color 0

itemnewbie i_beard_vandyke

color 0

itemnewbie i_backpack

itemnewbie i_bankbox

color 0

timer 900

attr 014

itemnewbie i_blackrock_platemail

itemnewbie i_blackrock_platemail_leggings

itemnewbie i_blackrock_platemail_arms

itemnewbie i_blackrock_platemail_gorget

itemnewbie i_blackrock_platemail_gauntlets



[function statlarifulle]

src.hits <src.str>

src.mana <src.int>

src.stam <src.dex>

src.findid.i_rune_poison.remove

src.findid.i_bleeding.remove

src.findid.i_bleeding2.remove



[dialog d_duello_ayar]

0,0

resizepic 100 100 5150 300 200

//resizepic 110 110 3000 280 180

dhtmlgump 140 120 300 20 0 0 <serv.name> Npc Gold Duello Sistemi



button 120 150 55 56 1 0 1

button 120 175 55 56 1 0 2

button 120 200 55 56 1 0 3

button 120 225 55 56 1 0 4

button 120 250 55 56 1 0 5

dhtmlgump 142 150 400 20 0 0 Gerisayim Koordinati: <tag0.koordinat1>

dhtmlgump 142 175 400 20 0 0 Cikis Koordinati: <tag0.koordinat2>

dhtmlgump 142 200 400 20 0 0 1.Player: <tag0.koordinat3>

dhtmlgump 142 225 400 20 0 0 2.Player: <tag0.koordinat4>

dhtmlgump 142 250 400 20 0 0 <qval (<more1> == 3)?Duelloyu kullanima ac.:Duelloyu kullanima kapat.>



[dialog d_duello_ayar button]

onbutton 1

src.ctag0.duellotasuids <uid>

targetfg koordinat 1

onbutton 2

src.ctag0.duellotasuids <uid>

targetfg koordinat 2

onbutton 3

src.ctag0.duellotasuids <uid>

targetfg koordinat 3

onbutton 4

src.ctag0.duellotasuids <uid>

targetfg koordinat 4

onbutton 5

more1 <qval (<more1> == 3)?0:3>

src.sysmessage @<qval (<more1> == 3)?38,,1 Duello tasini kullanima kapattiniz.:58,,1 Duello tasini kullanima actiniz.>

say @<qval (<more1> == 3)?38,,1 Duello tasi kullanima kapatildi.:58,,1 Duello tasi kullanima acildi.>



[function koordinat]

try uid.<src.ctag0.duellotasuids>.tag.koordinat<args> <src.targp>

src.sysmessage @07a1,,1 Yeni koordinat ayarlandi : <src.targp>



[dialog d_duello_teklif_ana_menu]

200,200

resizepic 0 0 5150 275 200

//resizepic 10 10 5150 255 180

resizepic 25 66 3000 190 20

dtextentry 40 67 3000 20 049 0 1

button 220 65 4023 4025 1 0 1

dtext 40 30 0 Duello Bahis Ucreti:



checkbox 23 120 210 211 0 1

dtext 45 120 0 Loot serbest

dtext 110 150 0 Not: Npc Gold Duello



//checkbox 25 140 210 211 0 2

//dtext 45 140 0 Silaha zehir serbest



[dialog d_duello_teklif_ana_menu button]

on=1

if !(<isnum <argtxt[0]>>)

src.sysmessage @38,,1 Sadece rakam girebilirsiniz.

return 1

//elseif !(<argtxt[0]> >= 1)

elseif !(<argtxt[0]> >= 1) || (<eval <argtxt[0]>> > 25000)

src.sysmessage @38,,1 Bahis en az 1 Bilet en çok 25.000 bilet olmalıdır.

return 1

elseif !(<src.bankbalance> >= <argtxt[0]>)

src.sysmessage @38,,1 Bankanizda bu meblada Npc Gold bulunmuyor.

return 1

endif

src.targetf f_duelloteklif

src.sysmessage @07a1,,1 Duello yapmak istediginiz kisiyi secin.

src.tag.duellotas <uid>

src.tag.ucret <argtxt[0]>

src.tag.loot <qval (<argchk[1]> < 1)?0:1>

src.tag.poison <qval (<argchk[2]> < 1)?1:0>



[function lootbankaya]

serv.newitem i_bag

src.new.cont <src.findlayer.29>

local.bag <src.new>

var.lfor 

for <uid.<args>.rescount>

if (<uid.<args>.findcont.<eval <var.lfor>>.attr>&attr_newbie)

var.lfor <eval <var.lfor>> +1

else

try uid.<args>.findcont.<eval <var.lfor>>.cont <uid.<local.bag>>

endif

endfor















[events e_duello]



ON=@itemequip

if (<eval <obj.tag.poison>>==0) && (strmatch(*t_weapon*,<act.type>)) && (<eval <act.morez>> >0)

src.sysmessage @021 Poisonlu silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_poison_bow)

src.sysmessage @021 Duello'da Poison Bow kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_warlock_silah)

src.sysmessage @021 Duello'da Özel Warlock Silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_warrior_silah)

src.sysmessage @021 Duello'da Özel Warrior Silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_mage_silah)

src.sysmessage @021 Duello'da Özel Mage Silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_tunic)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_leggings)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_sleeves)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_gloves)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_gorget)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_duvar_kafalik)

src.sysmessage @021 Duello'da Field Sapka kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_tc_mr15)

src.sysmessage @021 Duello'da [+15] Fix Robe kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dex_cape)

src.sysmessage @021 Duello'da Dex Pelerin kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_pvprobesi)

src.sysmessage @021 Duello'da Pvp Robe kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_pvpbere)

src.sysmessage @021 Duello'da Pvp Bere kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_pvp_one)

src.sysmessage @021 Duello'da Pvp Nox kullanamazsiniz

act.unequip

endif















On=@ItemTargOn_Item

if (<src.targ.type> == t_corpse)

sysmessage @38,,1 Bu alanda Cesetlere bu islemi yapamazsiniz.

return 1 

endif



On=@ItemDropOn_Ground

act.timerf 30,f_silin

src.sysmessage @38,,1 <act.name> 30 Saniye Icinde Silinicektir..



on=@click

message @68,,1 [<eval <rescount i_bandage>> bandaj] [<eval <rescount i_potion_HealGreat>+<rescount i_potion_Heal>> heal] [<eval <rescount i_potion_cureGreat>+<rescount i_potion_cure>> cure]

//message @38,,1 [Galibiyet: <eval <tag0.duelkazan>> Kaybettigi: <eval <tag0.duelkaybet>>]

message @48,,1 <name>

return 1







on=@logout

timerf 30,duellooyundandustum



on=@login

src.timerf clear





on=@spellcast

if ((<argn> == 28) ||(<argn> == 24) || (<argn> == 33) || (<argn> == 35) || (<argn> == 39) || (<argn> == 40) || (<argn> == 44) || (<argn> == 45) || (<argn> == 43) || (<argn> == 46) || (<argn> == 47) || (<argn> == 49) || (<argn> == 50) || (<argn> == 55))  || (<argn> == 64)  || (<argn> == 63) || (<argn> == 62)  || (<argn> == 61)   || (<argn> == 60)   || (<argn> == 59)   || (<argn> == 58)  || (<argn> == 57)   || (<argn> == 56)  || (<argn> == 54)  || (<argn> == 48))

src.sysmessage @07a1,,1 Duello kurallarina gore bu buyuyu kullanamazsiniz.

f_fizzle

return 1

endif



On=@SkillStart

if (<action> == id(skill_stealth)) || (<action> == skill_stealth) || ((<action> == id(skill_snooping)) || (<action> == skill_snooping)) || ((<action> == id(skill_stealing)) || (<action> == skill_stealing)) || ((<action> == id(skill_hiding)) || (<action> == skill_hiding))  

src.sysmessage @38,,1 Duello esnasinda bu yeteneklerinizi kullanamazsiniz.

return 1

endif



on=@itemdclick

if (<act.baseid> == i_runebook) || (<act.baseid> == i_deed_animal) || (<act.baseid> == i_egg_ostard_olgun) || (<act.type> == t_figurine) || (<act.baseid> == i_p_g1) || (<act.baseid> == i_p_g2) || (<act.baseid> == i_para_kupestr10) || (<act.dispid> == i_deed) || (<act.baseid> == i_poison_bow) || (<act.baseid> == i_et_vortex)    

src.sysmessage @0790,,1 Duello alaninda <act.name> kullanamazsiniz.

return 1

endif

endif

if (<act.baseid>==i_binek_hafiza)

src.sysmessage @48,,1 Bu Alanda Yasaklanmistir.

return 1

endif







on=@dismount

src.sysmessage @38,,1 Duello esnasinda bineginizden inemezsiniz.

return 1







on=[url=u-death-9220.html]@death[/url]

obj = <tag0.duellorakip>

ref1 = <obj.tag0.duellorakip>

//obj.bilet +=<eval <obj.dtag0.ucret>*2>

obj.kalp

obj.topduelpuankazan

ref1.tag0.duelkaybet +=1 //yeni deniyorum

try uid.<ref1.tag0.duellotas>.say <obj.name> kazandi.

serv.allclients sysmessage @38,,1 Duello Duyuru :

serv.allclients sysmessage @0790,,1 <obj.name>, <ref1.name> adli oyuncuyu duelloda yenmistir.

if (<ref1.tag0.loot> == 1)

ref1.findlayer.1.cont <ref1.findlayer.21>

ref1.findlayer.2.cont <ref1.findlayer.21>

ref1.findlayer.3.cont <ref1.findlayer.21>

ref1.findlayer.4.cont <ref1.findlayer.21>

ref1.findlayer.5.cont <ref1.findlayer.21>

ref1.findlayer.6.cont <ref1.findlayer.21>

ref1.findlayer.7.cont <ref1.findlayer.21>

ref1.findlayer.8.cont <ref1.findlayer.21>

ref1.findlayer.10.cont <ref1.findlayer.21>

ref1.findlayer.12.cont <ref1.findlayer.21>

ref1.findlayer.13.cont <ref1.findlayer.21>

ref1.findlayer.17.cont <ref1.findlayer.21>

ref1.findlayer.18.cont <ref1.findlayer.21>

ref1.findlayer.19.cont <ref1.findlayer.21>

ref1.findlayer.20.cont <ref1.findlayer.21>

ref1.findlayer.22.cont <ref1.findlayer.21>

ref1.findlayer.23.cont <ref1.findlayer.21>

ref1.findlayer.24.cont <ref1.findlayer.21>

trysrc <obj> src.lootbankaya <ref1.findlayer(21).uid>

endif

trysrc <obj> src.cekyazdimduello <eval <obj.dtag0.ucret>*2>

ref1.findid.i_rune_poison.remove

ref1.findid.i_bleeding.remove

ref1.findid.i_bleeding2.remove

ref1.findid.i_silbag.remove

ref1.hits <ref1.str>

ref1.mana <ref1.int>

ref1.stam <ref1.dex>

ref1.events -e_duello

obj.events -e_duello

ref1.action -1

obj.findid.i_rune_poison.remove

obj.findid.i_bleeding.remove

obj.findid.i_bleeding2.remove

obj.findid.i_silbag.remove

obj.hits <obj.str>

obj.mana <obj.int>

obj.stam <obj.dex>

obj.action -1

try uid.<ref1.tag0.duellotas>.more1 0

try uid.<obj.tag0.duellotas>.more1 0

try uid.<ref1.tag0.duellotas>.timer -1

ref1.p <uid.<obj.tag0.duellotas>.tag0.koordinat2>

ref1.update

obj.p <uid.<ref1.tag0.duellotas>.tag0.koordinat2>

obj.update

return 1

























[function cekyazdimduello]

src.sysmessage Kazandiniz.

return 1

endif





[plevel 5]

duelloalani



[function duelloalani]

src.newitem i_duello_stone

src.act.p <src.p>

src.newitem 02fe

src.act.p <src.p>

src.act.move 0 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 1 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 2 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 3 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 4 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -1 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -2 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -3 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -4 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -5 -1

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -1

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -2

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -3

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -4

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -5

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -6

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -7

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -8

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -9

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -10

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -11

src.newitem 02fe

src.act.p <src.p>

src.act.move 5 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 4 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 3 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 2 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 1 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 0 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -1 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -2 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -3 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -4 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -5 -12

src.newitem 0300

src.act.p <src.p>

src.act.move -6 -12

src.newitem 02ff

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 02fd

src.act.p <src.p>

src.act.move 5 -1













[function duelloitemver]

for 10

src.findtype.t_potion.remove

src.findtype.t_eq_trade_window.remove

src.findtype.t_bandage.remove

src.findtype.t_reagent.remove

src.findtype.t_cloth.remove

endfor

src.sysmessage @07a1,,1 Cantaniz temizlendi ve duello icin esyalariniz yerlestirildi.

//serv.newitem i_potion_healgreat,3,<src>,1

//serv.newitem i_potion_refreshtotal,3,<src>,1

//serv.newitem i_potion_curegreat,3,<src>,1

//serv.newitem i_potion_bleed,3,<src>,1

//serv.newitem i_potion_agilitygreat,3,<src>,1

//serv.newitem i_bandage,5,<src>,1

if (<src.magery> < 300)

serv.newitem i_arrow,30,<src>,1

endif

src.findlayer(1).morez 0

src.findlayer(2).morez 0

src.findid.i_spear_power.morez 0

src.findid.i_katana_power.morez 0

src.findid.i_broadsword_power.morez 0

src.findid.i_kryss_power.morez 0





[function duelloitemver3]

for 10

findtype.t_eq_trade_window.remove

findtype.t_potion.remove

findtype.t_bandage.remove

findtype.t_reagent.remove

endfor

sysmessage @07a1,,1 Cantaniz temizlendi ve duello icin esyalariniz yerlestirildi.

if (<magery> < 300)

serv.newitem i_arrow,30

new.cont <uid>

endif

//serv.newitem i_potion_healgreat,3,<uid>,1

//serv.newitem i_potion_refreshtotal,3,<uid>,1

//serv.newitem i_potion_curegreat,3,<uid>,1

//serv.newitem i_potion_bleed,3,<uid>,1

//serv.newitem i_potion_agilitygreat,3,<uid>,1

//serv.newitem i_bandage,5,<uid>,1

findlayer(1).morez 0

findlayer(2).morez 0

findid.i_spear_power.morez 0

findid.i_katana_power.morez 0

findid.i_broadsword_power.morez 0

findid.i_kryss_power.morez 0















/////////////////////////////////////////





[itemdef i_duelpot]

id=1310

name duel



on=@create

attr 090



on=@step

src.newitem i_duelbag

src.act.bounce

remove

return 1

endif





[itemdef i_silbag]

id=i_bag

name=Duello Bag



on=@Click

message @07a1,,1 <name>

return 1



[function f_duelbagver]

newitem i_duelbag

act.bounce



[TEMPLATE i_duelbag]

CONTAINER=i_silbag

COLOR=0846

ITEM=i_potion_healgreat,4

ITEM=i_potion_curegreat,4

ITEM=i_potion_refreshtotal,4

ITEM=i_bandage,6

ITEM=i_potion_bleed,4

ITEM=i_potion_agilitygreat,4

ITEM=i_arrow,50

ITEM=i_oil_cloth,5





[function duellooyundandustum]

//src.duellosureceza

src.hits 0







[eof]

SAYIN EREN BEY BU ŞEKİLDE KALP ALMASI LAZM GEREKLİ ACIKLAMALARI SCP ICINE // KOYARAK BELİRTİM

[itemdef i_duello_stone]

id i_grave_stone

name duello tasi



on=@create

attr 010



on=@click

if (<more1> == 2)

message @58,,1 [Sure:<timer>]

message @58,,1 [<uid.<tag.player1>.name> vs. <uid.<tag.player2>.name>]

endif

message @38,,1 [ Npc Gold Duello Tasi ]

return 1



on=@dclick

if !(<src.findid.i_duellocezasure>)

else

src.sysmessage @0790,,1 Duello yapabilmek için <src.findid.i_duellocezasure.timer> saniye beklemelisiniz.

return 1

endif

if (<src.account.plevel> >= 2)

sdialog d_duello_ayar

return 1

endif

for x 1 4

if (strmatch('<tag0.koordinat<dlocal.x>>','0'))

src.sysmessage @38,,1 Bu duello tasi ayarlanmamis lutfen page atin.

return 1

endif

endfor



///local.saat=<SERV.RTIME.FORMAT %H>

///local.dakika=<SERV.RTIME.FORMAT %M>

///if !((<local.saat> == 13) || (<local.saat> == 19))

///src.sysmessage @38,,1 Duello sistemi 13:00-14:00 ve 19:00-20:00 saatlerinde calismaktadir.

///return 1

///endif



if (<distance> > 3)

src.sysmessage @38,,1 Tasa yeterince yakin degilsiniz.

return 1

elseif (<more1> == 1)

src.sysmessage @38,,1 Suanda duello teklifi bekleniyor.

return 1

elseif (<more1> == 2)

src.sysmessage @07a1,,1 Suanda <uid.<tag.player1>.name> ve <uid.<tag.player2>.name> duellosu yapiyor.

return 1

elseif (<more1> == 3)

src.sysmessage @38,,1 Duello tasi kullanima kapatilmistir.

return 1

else

sdialog d_duello_teklif_ana_menu

endif

return 1



on=@timer

say Berabere

serv.allclients sysmessage @38,,1 Duello Duyuru :

serv.allclients sysmessage @0790,,1 <uid.<tag0.player1>.name> ile <uid.<tag0.player2>.name> arasindaki [ Duello ] berabere bitti.

trysrc <tag0.player1> src.p <tag0.koordinat2>

trysrc <tag0.player2> src.p <tag0.koordinat2>

trysrc <tag0.player1> src.statlarifulle

trysrc <tag0.player2> src.statlarifulle

trysrc <tag0.player1> src.tag.ocsavas

trysrc <tag0.player2> src.tag.ocsavas

trysrc <tag0.player1> src.events -e_duello

trysrc <tag0.player2> src.events -e_duello

trysrc <tag0.player1> src.paraverlann <eval <obj.tag.ucret>*2>

trysrc <tag0.player2> src.paraverlann <eval <obj.tag.ucret>*2>

trysrc <tag0.player1> src.update

trysrc <tag0.player2> src.update

more1 0



return 1



[function paraverlann]

serv.newitem i_kalp

new.amount <eval <obj.dtag.ucret>*1>

new.bounce



[function kalp]

serv.newitem i_kalp

new.amount <eval <obj.dtag0.ucret>*2>

new.cont <uid>



[function f_duelloteklif]

obj = <src.tag.duellotas>

if !(<argo.isplayer>)

src.sysmessage @38,,1 Sadece oyuncularla duello yapabilirsiniz.

return 1

elseif (<argo.uid> == <src.uid>)

src.sysmessage @38,,1 Kendinize duello teklifi atamazsiniz.

return 1

elseif (<argo.distance <src.uid>> > 3)

src.sysmessage @38,,1 <argo.name> adli oyuncunun yakininda bulunmalisiniz.

return 1

elseif (<argo.distance <obj>> > 10)

src.sysmessage @38,,1 <argo.name> adli oyuncu duello tasina yakin degil.

return 1

elseif (<obj.more1> == 1)

src.sysmessage @38,,1 suanda baska bir teklif bekleniyor.

return 1

elseif (<obj.more1> == 2)

src.sysmessage @38,,1 suanda <uid.<obj.tag0.player1>.name> vs. <uid.<obj.tag0.player2>.name> duellosu var.

return 1



//////////////////// BURDAKI SORGUYU DEYISTIR..

//elseif !(<argo.bankbalance> >= <src.dtag0.ucret>)

//src.sysmessage @38,,1 <argo.name> adli oyuncunun bankasinda bu meblada Npc Gold bulunmuyor.

//return 1



ELSEIF !(<ARGO.RESTEST <src.dtag0.ucret> I_KALP>)

src.sysmessage @38,,1 <argo.name> adli oyuncunun bankasinda bu meblada Npc Gold bulunmuyor.

return 1



else

if !(<argo.findid.i_duellocezasure>)

else

src.sysmessage @0790,,1 Rakibinizin <argo.findid.i_duellocezasure.timer> saniye cezasi var.

return 1

endif

obj.more1 1

argo.tag.ucret <src.dtag0.ucret>

argo.tag.poison <src.tag0.poison>

argo.tag.loot <src.tag0.loot>

argo.tag0.duellotas <obj>

argo.tag0.duellorakip <src.uid>

argo.timerf 20,dialogclose d_duello_teklif

argo.sysmessage @0481,,1 Duello teklifi aldiniz. 20 saniye icinde kabul etmelisiniz.

src.tag.duellorakip <argo>

trysrc <argo> sdialog d_duello_teklif

endif



[dialog d_duello_teklif]

0,0

nomove

page 1

button 15 15 30 30 0 2 1



page 2

resizepic 70 120 5150 350 260

//resizepic 80 128 5150 330 245

dtext 95 150 1153 <uid.<src.tag0.duellorakip>.name> adli oyuncu

dtext 95 170 1153 size duello teklifinde bulunuyor.

dtext 95 190 1153 Katilmak istiyormusunuz?

dtext 95 215 38 Sartlar;

dtext 95 240 049 Ucret: <src.dtag0.ucret>

dtext 95 260 1153 Loot: <qval (<src.tag0.loot> < 1)?YASAK:SERBEST>

dtext 95 280 1153 Silaha zehir: <qval (<src.tag0.poison> < 1)?SERBEST:YASAK>

button 100 320 55 56 1 0 1

dtext 140 320 049 Evet

button 250 320 55 56 1 0 0

dtext 290 320 049 Hayir





[dialog d_duello_teklif button]

on=0

obj = <src.tag0.duellorakip>

obj.sysmessage @38,,1 <src.name> adli oyuncu duello teklifinizi reddetti.

try uid.<src.tag0.duellotas>.more1 0



on=1

obj = <src.tag0.duellorakip>

if (<uid.<src.tag0.duellotas>.more1> == 2)

src.sysmessage @38,,1 Suanda <uid.<uid.<src.tag0.duellotas>.tag0.player1>.name> vs. <uid.<uid.<src.tag0.duellotas>.tag0.player2>.name> duellosu var.

return 1

endif











//////////////////////////////DJ YILMAZ CAN AÇIKLAMA////////////

/////////////////////////Saygıdeyer erencim Öncelikle altta Kapattığım kısımda hesapta Gold aratıyorsun burada farklı sorgu yapman Lazm...



//if !(<src.bankbalance> >= <src.dtag0.ucret>)

//src.sysmessage @38,,1 Bankanizda bu meblada Npc Gold bulunmuyor.

//obj.sysmessage @38,,1 Rakibinizin bankasinda bu meblada Npc Gold bulunmuyor.

//try uid.<src.tag0.duellotas>.more1 0

//return 1

//endif









//if !(<obj.bankbalance> >= <src.dtag0.ucret>)

//obj.sysmessage @38,,1 Bankanizda bu meblada Npc Gold bulunmuyor.

//src.sysmessage @38,,1 Rakibinizin bankasinda bu meblada Npc Gold bulunmuyor.

//try uid.<src.tag0.duellotas>.more1 0

//return 1

//endif







LOCAL.FIYAT=<SRC.DTAG0.UCRET>

IF !(<SRC.RESTEST <DLOCAL.FIYAT> I_KALP>)

SRC.SYSMESSAGE @07A1,1,1 ÇANTANIZDA <DLOCAL.FIYAT> ADET KALP BULUNMUYOR.

OBJ.SYSMESSAGE @07A1,1,1 RAKİBİNİZİN ÇANTANIZDA <DLOCAL.FIYAT> ADET KALP BULUNMUYOR.

TRY UID.<SRC.DTAG0.DUELLOTAS>.MORE1 0

RETURN 1

ENDIF





IF !(<OBJ.RESTEST <DLOCAL.FIYAT> I_KALP>)

OBJ.SYSMESSAGE @07A1,1,1 ÇANTANIZDA <DLOCAL.FIYAT> ADET KALP BULUNMUYOR.

SRC.SYSMESSAGE @07A1,1,1 RAKİBİNİZİN ÇANTANIZDA <DLOCAL.FIYAT> ADET KALP BULUNMUYOR.

TRY UID.<SRC.DTAG0.DUELLOTAS>.MORE1 0

RETURN 1

ENDIF







if (<obj.findlayer(25).uid>)

obj.sysmessage @38,,1 Altinizda binek varken duello yapamazsiniz.

src.sysmessage @38,,1 Rakibinizin altinda binek oldugu icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if (<src.findlayer(25).uid>)

src.sysmessage @38,,1 Altinizda binek varken duello yapamazsiniz.

obj.sysmessage @38,,1 Rakibinizin altinda binek oldugu icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



forchars 25

if (<memoryfindtype.memory_ipet>)

if (<memoryfindtype.memory_ipet.link>==<src.uid>)

src.sysmessage @38,,1 Etrafinizda size ait bir hayvan varken duello yapamazsiniz.

obj.sysmessage @38,,1 Rakibinizin yakininda ona ait bir binek bulundugu icin duello iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endif

endfor



forchars 25

if (<memoryfindtype.memory_ipet>)

if (<memoryfindtype.memory_ipet.link>==<obj.uid>)

obj.sysmessage @38,,1 Etrafinizda size ait bir hayvan varken duello yapamazsiniz.

src.sysmessage @38,,1 Rakibinizin yakininda ona ait bir binek bulundugu icin duello iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endif

endfor



if ((<obj.findlayer(25).uid>) && !(<src.findlayer(25).uid>)) || ((<src.findlayer(25).uid>) && !(<obj.findlayer(25).uid>))

obj.sysmessage @38,,1 Rakibinizle esit sartlarda degilsiniz.

src.sysmessage @38,,1 Rakibinizle esit sartlarda degilsiniz.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



for x 0 <src.findlayer(21).rescount>

if (<uid.<src.findlayer.21.uid>.findcont(<dlocal.x>).isweapon>) && !(<uid.<src.findlayer.21.uid>.findcont(<dlocal.x>).morez> == 0) && (<src.tag0.poison> == 1)

src.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

obj.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endfor



for x 0 <obj.findlayer(21).rescount>

if (<uid.<obj.findlayer.21.uid>.findcont(<dlocal.x>).isweapon>) && !(<uid.<obj.findlayer.21.uid>.findcont(<dlocal.x>).morez> == 0) && (<obj.tag0.poison> == 1)

obj.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

src.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endfor



if ((<src.findlayer(1).isweapon>) && !(<src.findlayer(1).morez> == 0) && (<src.tag0.poison> == 1))

src.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

obj.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if ((<src.findlayer(2).isweapon>) && !(<src.findlayer(2).morez> == 0) && (<src.tag0.poison> == 1))

src.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

obj.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if ((<obj.findlayer(1).isweapon>) && !(<obj.findlayer(1).morez> == 0) && (<src.tag0.poison> == 1))

obj.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

src.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if ((<obj.findlayer(2).isweapon>) && !(<obj.findlayer(2).morez> == 0) && (<src.tag0.poison> == 1))

obj.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

src.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif





//obj.findlayer(1).morez 0

//obj.findlayer(2).morez 0

//src.findlayer(1).morez 0

//src.findlayer(2).morez 0

src.events +e_duello

src.events -e_pazarsafe

src.duelloitemver

src.duelloitemver3

src.events -e_pazarsafe

obj.events +e_duello

obj.duelloitemver

obj.duelloitemver3

obj.events -e_pazarsafe

obj.tag.ocsavas 1

src.tag.ocsavas 1

obj.events -e_pazarsafe

src.findid.i_rune_incognito.timer

obj.findid.i_rune_incognito.timer

serv.allclients sysmessage @38,,1 Duello Duyuru :

serv.allclients sysmessage @0790,,1 <obj.name> vs <src.name> duellosu basliyor.





////////////////////////////////////////////////// YUKARDA SORGUYU YAPTIK ŞİMDİDE İTEMİ ÇANTADAN ALDIRALIM EREN BEY :)

//src.gold -=<eval <obj.dtag0.ucret>>

//obj.gold -=<eval <obj.dtag0.ucret>>



SRC.CONSUME <DLOCAL.FIYAT> I_KALP

OBJ.CONSUME <DLOCAL.FIYAT> I_KALP



serv.newnpc c_hakem

new.p <uid.<src.tag0.duellotas>.tag0.koordinat1>

new.gerisay

new.update

trysrc <obj> src.statlarifulle

statlarifulle

try uid.<src.tag0.duellotas>.tag.player1 <obj>

try uid.<src.tag0.duellotas>.tag.player2 <src.uid>

try uid.<src.tag0.duellotas>.timer 400

try uid.<src.tag0.duellotas>.more1 2

trysrc <obj> p <uid.<src.tag0.duellotas>.tag0.koordinat3>

obj.update

src.p <uid.<src.tag0.duellotas>.tag0.koordinat4>

trysrc <obj> src.kafeslee

src.kafeslee

src.update





[function duellosureceza]

serv.newitem i_duellocezasure

new.cont <uid>



[itemdef i_duellocezasure]

id i_gold

name bekle biraz

type t_eq_script



on=@create

attr attr_invis | attr_decay

timer 120



on=@equip

timer 120



on=@timer

remove

return 1



[function gerisay]

timerf 22,remove

timerf 21, say @0790 Basla.

timerf 21, say @0790 1

timerf 20, say @0790 2

timerf 19, say @0790 3

timerf 18, say @0790 4

timerf 17, say @0790 5

timerf 16, say @0790 6

timerf 15, say @0790 7

timerf 14, say @0790 8

timerf 13, say @0790 9

timerf 12, say @0790 10

timerf 11, say @0790 11

timerf 10, say @0790 12

timerf 9, say @0790 13

timerf 8, say @0790 14

timerf 7, say @0790 15

timerf 6, say @0790 16

timerf 5, say @0790 17

timerf 4, say @0790 18

timerf 3, say @0790 19

timerf 2, say @0790 20



[function kafeslee]

NEWITEM=06b

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 1,1

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=06a

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 1,0

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=06a

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE -1,0

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=06a

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE -1,1

ACT.ATTR=00002

ACT.TIMER=22





NEWITEM=069

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 0,1

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=069

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 0,1

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=069

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 0,-1

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=069

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 1,-1

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=i_duelpot

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 0,0

ACT.ATTR=00002

ACT.TIMER=2



[chardef c_hakem]

name #names_humanmale the refree

id c_man

can mt_equip|mt_nonmover



on=@click

message @07a1,,1 Duello Hakem

return 1



On=@Create

str 9500

dex 9500

int 9500

color 0418

speechcolor 0481

food 990

npc 1



itemnewbie i_shield_chaos

color 0

//item i_mt_ostard_zostrich

//color 0c86

//name Night Ostard

itemnewbie i_kryss_force

Color 0

itemnewbie i_hair_long

color 0

itemnewbie i_beard_vandyke

color 0

itemnewbie i_backpack

itemnewbie i_bankbox

color 0

timer 900

attr 014

itemnewbie i_blackrock_platemail

itemnewbie i_blackrock_platemail_leggings

itemnewbie i_blackrock_platemail_arms

itemnewbie i_blackrock_platemail_gorget

itemnewbie i_blackrock_platemail_gauntlets



[function statlarifulle]

src.hits <src.str>

src.mana <src.int>

src.stam <src.dex>

src.findid.i_rune_poison.remove

src.findid.i_bleeding.remove

src.findid.i_bleeding2.remove



[dialog d_duello_ayar]

0,0

resizepic 100 100 5150 300 200

//resizepic 110 110 3000 280 180

dhtmlgump 140 120 300 20 0 0 <serv.name> Npc Gold Duello Sistemi



button 120 150 55 56 1 0 1

button 120 175 55 56 1 0 2

button 120 200 55 56 1 0 3

button 120 225 55 56 1 0 4

button 120 250 55 56 1 0 5

dhtmlgump 142 150 400 20 0 0 Gerisayim Koordinati: <tag0.koordinat1>

dhtmlgump 142 175 400 20 0 0 Cikis Koordinati: <tag0.koordinat2>

dhtmlgump 142 200 400 20 0 0 1.Player: <tag0.koordinat3>

dhtmlgump 142 225 400 20 0 0 2.Player: <tag0.koordinat4>

dhtmlgump 142 250 400 20 0 0 <qval (<more1> == 3)?Duelloyu kullanima ac.:Duelloyu kullanima kapat.>



[dialog d_duello_ayar button]

onbutton 1

src.ctag0.duellotasuids <uid>

targetfg koordinat 1

onbutton 2

src.ctag0.duellotasuids <uid>

targetfg koordinat 2

onbutton 3

src.ctag0.duellotasuids <uid>

targetfg koordinat 3

onbutton 4

src.ctag0.duellotasuids <uid>

targetfg koordinat 4

onbutton 5

more1 <qval (<more1> == 3)?0:3>

src.sysmessage @<qval (<more1> == 3)?38,,1 Duello tasini kullanima kapattiniz.:58,,1 Duello tasini kullanima actiniz.>

say @<qval (<more1> == 3)?38,,1 Duello tasi kullanima kapatildi.:58,,1 Duello tasi kullanima acildi.>



[function koordinat]

try uid.<src.ctag0.duellotasuids>.tag.koordinat<args> <src.targp>

src.sysmessage @07a1,,1 Yeni koordinat ayarlandi : <src.targp>



[dialog d_duello_teklif_ana_menu]

200,200

resizepic 0 0 5150 275 200

//resizepic 10 10 5150 255 180

resizepic 25 66 3000 190 20

dtextentry 40 67 3000 20 049 0 1

button 220 65 4023 4025 1 0 1

dtext 40 30 0 Duello Bahis Ucreti:



checkbox 23 120 210 211 0 1

dtext 45 120 0 Loot serbest

dtext 110 150 0 Not: Npc Gold Duello



//checkbox 25 140 210 211 0 2

//dtext 45 140 0 Silaha zehir serbest



[dialog d_duello_teklif_ana_menu button]

on=1

if !(<isnum <argtxt[0]>>)

src.sysmessage @38,,1 Sadece rakam girebilirsiniz.

return 1

//elseif !(<argtxt[0]> >= 1)

elseif !(<argtxt[0]> >= 1) || (<eval <argtxt[0]>> > 25000)

src.sysmessage @38,,1 Bahis en az 1 Bilet en çok 25.000 bilet olmalıdır.

return 1



///////////////////// BURDAKI SORGUYUDA DEGISTIRDIM



//elseif !(<src.bankbalance> >= <argtxt[0]>)

//src.sysmessage @38,,1 Bankanizda bu meblada Npc Gold bulunmuyor.

//return 1

//endif







ELSEIF !(<SRC.RESTEST <argtxt[0]> I_KALP>)

SRC.SYSMESSAGE @07A1,1,1 ÇANTANIZDA <argtxt[0]> ADET KALP BULUNMUYOR.

RETURN 1

ENDIF







src.targetf f_duelloteklif

src.sysmessage @07a1,,1 Duello yapmak istediginiz kisiyi secin.

src.tag.duellotas <uid>

src.tag.ucret <argtxt[0]>

src.tag.loot <qval (<argchk[1]> < 1)?0:1>

src.tag.poison <qval (<argchk[2]> < 1)?1:0>



[function lootbankaya]

serv.newitem i_bag

src.new.cont <src.findlayer.29>

local.bag <src.new>

var.lfor

for <uid.<args>.rescount>

if (<uid.<args>.findcont.<eval <var.lfor>>.attr>&attr_newbie)

var.lfor <eval <var.lfor>> +1

else

try uid.<args>.findcont.<eval <var.lfor>>.cont <uid.<local.bag>>

endif

endfor















[events e_duello]



ON=@itemequip

if (<eval <obj.tag.poison>>==0) && (strmatch(*t_weapon*,<act.type>)) && (<eval <act.morez>> >0)

src.sysmessage @021 Poisonlu silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_poison_bow)

src.sysmessage @021 Duello'da Poison Bow kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_warlock_silah)

src.sysmessage @021 Duello'da Özel Warlock Silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_warrior_silah)

src.sysmessage @021 Duello'da Özel Warrior Silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_mage_silah)

src.sysmessage @021 Duello'da Özel Mage Silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_tunic)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_leggings)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_sleeves)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_gloves)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_gorget)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_duvar_kafalik)

src.sysmessage @021 Duello'da Field Sapka kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_tc_mr15)

src.sysmessage @021 Duello'da [+15] Fix Robe kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dex_cape)

src.sysmessage @021 Duello'da Dex Pelerin kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_pvprobesi)

src.sysmessage @021 Duello'da Pvp Robe kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_pvpbere)

src.sysmessage @021 Duello'da Pvp Bere kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_pvp_one)

src.sysmessage @021 Duello'da Pvp Nox kullanamazsiniz

act.unequip

endif















On=@ItemTargOn_Item

if (<src.targ.type> == t_corpse)

sysmessage @38,,1 Bu alanda Cesetlere bu islemi yapamazsiniz.

return 1

endif



On=@ItemDropOn_Ground

act.timerf 30,f_silin

src.sysmessage @38,,1 <act.name> 30 Saniye Icinde Silinicektir..



on=@click

message @68,,1 [<eval <rescount i_bandage>> bandaj] [<eval <rescount i_potion_HealGreat>+<rescount i_potion_Heal>> heal] [<eval <rescount i_potion_cureGreat>+<rescount i_potion_cure>> cure]

//message @38,,1 [Galibiyet: <eval <tag0.duelkazan>> Kaybettigi: <eval <tag0.duelkaybet>>]

message @48,,1 <name>

return 1







on=@logout

timerf 30,duellooyundandustum



on=@login

src.timerf clear





on=@spellcast

if ((<argn> == 28) ||(<argn> == 24) || (<argn> == 33) || (<argn> == 35) || (<argn> == 39) || (<argn> == 40) || (<argn> == 44) || (<argn> == 45) || (<argn> == 43) || (<argn> == 46) || (<argn> == 47) || (<argn> == 49) || (<argn> == 50) || (<argn> == 55))  || (<argn> == 64)  || (<argn> == 63) || (<argn> == 62)  || (<argn> == 61)   || (<argn> == 60)   || (<argn> == 59)   || (<argn> == 58)  || (<argn> == 57)   || (<argn> == 56)  || (<argn> == 54)  || (<argn> == 48))

src.sysmessage @07a1,,1 Duello kurallarina gore bu buyuyu kullanamazsiniz.

f_fizzle

return 1

endif



On=@SkillStart

if (<action> == id(skill_stealth)) || (<action> == skill_stealth) || ((<action> == id(skill_snooping)) || (<action> == skill_snooping)) || ((<action> == id(skill_stealing)) || (<action> == skill_stealing)) || ((<action> == id(skill_hiding)) || (<action> == skill_hiding)) 

src.sysmessage @38,,1 Duello esnasinda bu yeteneklerinizi kullanamazsiniz.

return 1

endif



on=@itemdclick

if (<act.baseid> == i_runebook) || (<act.baseid> == i_deed_animal) || (<act.baseid> == i_egg_ostard_olgun) || (<act.type> == t_figurine) || (<act.baseid> == i_p_g1) || (<act.baseid> == i_p_g2) || (<act.baseid> == i_para_kupestr10) || (<act.dispid> == i_deed) || (<act.baseid> == i_poison_bow) || (<act.baseid> == i_et_vortex)   

src.sysmessage @0790,,1 Duello alaninda <act.name> kullanamazsiniz.

return 1

endif

endif

if (<act.baseid>==i_binek_hafiza)

src.sysmessage @48,,1 Bu Alanda Yasaklanmistir.

return 1

endif







on=@dismount

src.sysmessage @38,,1 Duello esnasinda bineginizden inemezsiniz.

return 1







on=[url=u-death-9220.html]@death[/url]

obj = <tag0.duellorakip>

ref1 = <obj.tag0.duellorakip>

//obj.bilet +=<eval <obj.dtag0.ucret>*2>

obj.kalp

obj.topduelpuankazan

ref1.tag0.duelkaybet +=1 //yeni deniyorum

try uid.<ref1.tag0.duellotas>.say <obj.name> kazandi.

serv.allclients sysmessage @38,,1 Duello Duyuru :

serv.allclients sysmessage @0790,,1 <obj.name>, <ref1.name> adli oyuncuyu duelloda yenmistir.

if (<ref1.tag0.loot> == 1)

ref1.findlayer.1.cont <ref1.findlayer.21>

ref1.findlayer.2.cont <ref1.findlayer.21>

ref1.findlayer.3.cont <ref1.findlayer.21>

ref1.findlayer.4.cont <ref1.findlayer.21>

ref1.findlayer.5.cont <ref1.findlayer.21>

ref1.findlayer.6.cont <ref1.findlayer.21>

ref1.findlayer.7.cont <ref1.findlayer.21>

ref1.findlayer.8.cont <ref1.findlayer.21>

ref1.findlayer.10.cont <ref1.findlayer.21>

ref1.findlayer.12.cont <ref1.findlayer.21>

ref1.findlayer.13.cont <ref1.findlayer.21>

ref1.findlayer.17.cont <ref1.findlayer.21>

ref1.findlayer.18.cont <ref1.findlayer.21>

ref1.findlayer.19.cont <ref1.findlayer.21>

ref1.findlayer.20.cont <ref1.findlayer.21>

ref1.findlayer.22.cont <ref1.findlayer.21>

ref1.findlayer.23.cont <ref1.findlayer.21>

ref1.findlayer.24.cont <ref1.findlayer.21>

trysrc <obj> src.lootbankaya <ref1.findlayer(21).uid>

endif

trysrc <obj> src.cekyazdimduello <eval <obj.dtag0.ucret>*2>

ref1.findid.i_rune_poison.remove

ref1.findid.i_bleeding.remove

ref1.findid.i_bleeding2.remove

ref1.findid.i_silbag.remove

ref1.hits <ref1.str>

ref1.mana <ref1.int>

ref1.stam <ref1.dex>

ref1.events -e_duello

obj.events -e_duello

ref1.action -1

obj.findid.i_rune_poison.remove

obj.findid.i_bleeding.remove

obj.findid.i_bleeding2.remove

obj.findid.i_silbag.remove

obj.hits <obj.str>

obj.mana <obj.int>

obj.stam <obj.dex>

obj.action -1

try uid.<ref1.tag0.duellotas>.more1 0

try uid.<obj.tag0.duellotas>.more1 0

try uid.<ref1.tag0.duellotas>.timer -1

ref1.p <uid.<obj.tag0.duellotas>.tag0.koordinat2>

ref1.update

obj.p <uid.<ref1.tag0.duellotas>.tag0.koordinat2>

obj.update

return 1

























[function cekyazdimduello]

src.sysmessage Kazandiniz.

return 1

endif





[plevel 5]

duelloalani



[function duelloalani]

src.newitem i_duello_stone

src.act.p <src.p>

src.newitem 02fe

src.act.p <src.p>

src.act.move 0 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 1 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 2 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 3 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 4 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -1 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -2 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -3 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -4 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -5 -1

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -1

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -2

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -3

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -4

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -5

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -6

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -7

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -8

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -9

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -10

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -11

src.newitem 02fe

src.act.p <src.p>

src.act.move 5 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 4 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 3 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 2 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 1 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 0 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -1 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -2 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -3 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -4 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -5 -12

src.newitem 0300

src.act.p <src.p>

src.act.move -6 -12

src.newitem 02ff

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 02fd

src.act.p <src.p>

src.act.move 5 -1













[function duelloitemver]

for 10

src.findtype.t_potion.remove

src.findtype.t_eq_trade_window.remove

src.findtype.t_bandage.remove

src.findtype.t_reagent.remove

src.findtype.t_cloth.remove

endfor

src.sysmessage @07a1,,1 Cantaniz temizlendi ve duello icin esyalariniz yerlestirildi.

//serv.newitem i_potion_healgreat,3,<src>,1

//serv.newitem i_potion_refreshtotal,3,<src>,1

//serv.newitem i_potion_curegreat,3,<src>,1

//serv.newitem i_potion_bleed,3,<src>,1

//serv.newitem i_potion_agilitygreat,3,<src>,1

//serv.newitem i_bandage,5,<src>,1

if (<src.magery> < 300)

serv.newitem i_arrow,30,<src>,1

endif

src.findlayer(1).morez 0

src.findlayer(2).morez 0

src.findid.i_spear_power.morez 0

src.findid.i_katana_power.morez 0

src.findid.i_broadsword_power.morez 0

src.findid.i_kryss_power.morez 0





[function duelloitemver3]

for 10

findtype.t_eq_trade_window.remove

findtype.t_potion.remove

findtype.t_bandage.remove

findtype.t_reagent.remove

endfor

sysmessage @07a1,,1 Cantaniz temizlendi ve duello icin esyalariniz yerlestirildi.

if (<magery> < 300)

serv.newitem i_arrow,30

new.cont <uid>

endif

//serv.newitem i_potion_healgreat,3,<uid>,1

//serv.newitem i_potion_refreshtotal,3,<uid>,1

//serv.newitem i_potion_curegreat,3,<uid>,1

//serv.newitem i_potion_bleed,3,<uid>,1

//serv.newitem i_potion_agilitygreat,3,<uid>,1

//serv.newitem i_bandage,5,<uid>,1

findlayer(1).morez 0

findlayer(2).morez 0

findid.i_spear_power.morez 0

findid.i_katana_power.morez 0

findid.i_broadsword_power.morez 0

findid.i_kryss_power.morez 0















/////////////////////////////////////////





[itemdef i_duelpot]

id=1310

name duel



on=@create

attr 090



on=@step

src.newitem i_duelbag

src.act.bounce

remove

return 1

endif





[itemdef i_silbag]

id=i_bag

name=Duello Bag



on=@Click

message @07a1,,1 <name>

return 1



[function f_duelbagver]

newitem i_duelbag

act.bounce



[TEMPLATE i_duelbag]

CONTAINER=i_silbag

COLOR=0846

ITEM=i_potion_healgreat,4

ITEM=i_potion_curegreat,4

ITEM=i_potion_refreshtotal,4

ITEM=i_bandage,6

ITEM=i_potion_bleed,4

ITEM=i_potion_agilitygreat,4

ITEM=i_arrow,50

ITEM=i_oil_cloth,5





[function duellooyundandustum]

//src.duellosureceza

src.hits 0



[eof]

DİALOG İÇİN BİR SORUM VAR YUKARDA 3 BUTON YERİNE ADAM NPC GOLD ADETİNİ KENDİ BELİRLESE DAHA İYİ OLMAZMI ?? BİDE BU NPC GOLD İD'Sİ I_KALP Mİ ?

oldu mahsuni sağolasın reis

BUDA DIALOG AYIPSIN KİMSE DESTEK OLMAZSA BEN VARIM EREN... ZOR GELMİSTİR ONDAN MİLLET KONUNA CVP YAZMAMİŞ HEHE

[itemdef i_duello_stone]

id i_grave_stone

name duello tasi



on=@create

attr 010



on=@click

if (<more1> == 2)

message @58,,1 [Sure:<timer>]

message @58,,1 [<uid.<tag.player1>.name> vs. <uid.<tag.player2>.name>]

endif

message @38,,1 [ Npc Gold Duello Tasi ]

return 1



on=@dclick

if !(<src.findid.i_duellocezasure>)

else

src.sysmessage @0790,,1 Duello yapabilmek için <src.findid.i_duellocezasure.timer> saniye beklemelisiniz.

return 1

endif

if (<src.account.plevel> >= 2)

sdialog d_duello_ayar

return 1

endif

for x 1 4

if (strmatch('<tag0.koordinat<dlocal.x>>','0'))

src.sysmessage @38,,1 Bu duello tasi ayarlanmamis lutfen page atin.

return 1

endif

endfor



///local.saat=<SERV.RTIME.FORMAT %H>

///local.dakika=<SERV.RTIME.FORMAT %M>

///if !((<local.saat> == 13) || (<local.saat> == 19))

///src.sysmessage @38,,1 Duello sistemi 13:00-14:00 ve 19:00-20:00 saatlerinde calismaktadir.

///return 1

///endif



if (<distance> > 3)

src.sysmessage @38,,1 Tasa yeterince yakin degilsiniz.

return 1

elseif (<more1> == 1)

src.sysmessage @38,,1 Suanda duello teklifi bekleniyor.

return 1

elseif (<more1> == 2)

src.sysmessage @07a1,,1 Suanda <uid.<tag.player1>.name> ve <uid.<tag.player2>.name> duellosu yapiyor.

return 1

elseif (<more1> == 3)

src.sysmessage @38,,1 Duello tasi kullanima kapatilmistir.

return 1

else

sdialog d_duello_teklif_ana_menu

endif

return 1



on=@timer

say Berabere

serv.allclients sysmessage @38,,1 Duello Duyuru :

serv.allclients sysmessage @0790,,1 <uid.<tag0.player1>.name> ile <uid.<tag0.player2>.name> arasindaki [ Duello ] berabere bitti.

trysrc <tag0.player1> src.p <tag0.koordinat2>

trysrc <tag0.player2> src.p <tag0.koordinat2>

trysrc <tag0.player1> src.statlarifulle

trysrc <tag0.player2> src.statlarifulle

trysrc <tag0.player1> src.tag.ocsavas

trysrc <tag0.player2> src.tag.ocsavas

trysrc <tag0.player1> src.events -e_duello

trysrc <tag0.player2> src.events -e_duello

trysrc <tag0.player1> src.paraverlann <eval <obj.tag.ucret>*2>

trysrc <tag0.player2> src.paraverlann <eval <obj.tag.ucret>*2>

trysrc <tag0.player1> src.update

trysrc <tag0.player2> src.update

more1 0



return 1



[function paraverlann]

serv.newitem i_kalp

new.amount <eval <obj.dtag.ucret>*1>

new.bounce



[function kalp]

serv.newitem i_kalp

new.amount <eval <obj.dtag0.ucret>*2>

new.cont <uid>



[function f_duelloteklif]

obj = <src.tag.duellotas>

if !(<argo.isplayer>)

src.sysmessage @38,,1 Sadece oyuncularla duello yapabilirsiniz.

return 1

elseif (<argo.uid> == <src.uid>)

src.sysmessage @38,,1 Kendinize duello teklifi atamazsiniz.

return 1

elseif (<argo.distance <src.uid>> > 3)

src.sysmessage @38,,1 <argo.name> adli oyuncunun yakininda bulunmalisiniz.

return 1

elseif (<argo.distance <obj>> > 10)

src.sysmessage @38,,1 <argo.name> adli oyuncu duello tasina yakin degil.

return 1

elseif (<obj.more1> == 1)

src.sysmessage @38,,1 suanda baska bir teklif bekleniyor.

return 1

elseif (<obj.more1> == 2)

src.sysmessage @38,,1 suanda <uid.<obj.tag0.player1>.name> vs. <uid.<obj.tag0.player2>.name> duellosu var.

return 1



//////////////////// BURDAKI SORGUYU DEYISTIR..

//elseif !(<argo.bankbalance> >= <src.dtag0.ucret>)

//src.sysmessage @38,,1 <argo.name> adli oyuncunun bankasinda bu meblada Npc Gold bulunmuyor.

//return 1



ELSEIF !(<ARGO.RESTEST <src.dtag0.ucret> I_KALP>)

src.sysmessage @38,,1 <argo.name> adli oyuncunun bankasinda bu meblada Npc Gold bulunmuyor.

return 1



else

if !(<argo.findid.i_duellocezasure>)

else

src.sysmessage @0790,,1 Rakibinizin <argo.findid.i_duellocezasure.timer> saniye cezasi var.

return 1

endif

obj.more1 1

argo.tag.ucret <src.dtag0.ucret>

argo.tag.poison <src.tag0.poison>

argo.tag.loot <src.tag0.loot>

argo.tag0.duellotas <obj>

argo.tag0.duellorakip <src.uid>

argo.timerf 20,dialogclose d_duello_teklif

argo.sysmessage @0481,,1 Duello teklifi aldiniz. 20 saniye icinde kabul etmelisiniz.

src.tag.duellorakip <argo>

trysrc <argo> sdialog d_duello_teklif

endif



[dialog d_duello_teklif]

0,0

nomove

page 1

button 15 15 30 30 0 2 1



page 2

resizepic 70 120 5150 350 260

//resizepic 80 128 5150 330 245

dtext 95 150 1153 <uid.<src.tag0.duellorakip>.name> adli oyuncu

dtext 95 170 1153 size duello teklifinde bulunuyor.

dtext 95 190 1153 Katilmak istiyormusunuz?

dtext 95 215 38 Sartlar;

dtext 95 240 049 Ucret: <src.dtag0.ucret>

dtext 95 260 1153 Loot: <qval (<src.tag0.loot> < 1)?YASAK:SERBEST>

dtext 95 280 1153 Silaha zehir: <qval (<src.tag0.poison> < 1)?SERBEST:YASAK>

button 100 320 55 56 1 0 1

dtext 140 320 049 Evet

button 250 320 55 56 1 0 0

dtext 290 320 049 Hayir





[dialog d_duello_teklif button]

on=0

obj = <src.tag0.duellorakip>

obj.sysmessage @38,,1 <src.name> adli oyuncu duello teklifinizi reddetti.

try uid.<src.tag0.duellotas>.more1 0



on=1

obj = <src.tag0.duellorakip>

if (<uid.<src.tag0.duellotas>.more1> == 2)

src.sysmessage @38,,1 Suanda <uid.<uid.<src.tag0.duellotas>.tag0.player1>.name> vs. <uid.<uid.<src.tag0.duellotas>.tag0.player2>.name> duellosu var.

return 1

endif











//////////////////////////////DJ YILMAZ CAN AÇIKLAMA////////////

/////////////////////////Saygıdeyer erencim Öncelikle altta Kapattığım kısımda hesapta Gold aratıyorsun burada farklı sorgu yapman Lazm...



//if !(<src.bankbalance> >= <src.dtag0.ucret>)

//src.sysmessage @38,,1 Bankanizda bu meblada Npc Gold bulunmuyor.

//obj.sysmessage @38,,1 Rakibinizin bankasinda bu meblada Npc Gold bulunmuyor.

//try uid.<src.tag0.duellotas>.more1 0

//return 1

//endif









//if !(<obj.bankbalance> >= <src.dtag0.ucret>)

//obj.sysmessage @38,,1 Bankanizda bu meblada Npc Gold bulunmuyor.

//src.sysmessage @38,,1 Rakibinizin bankasinda bu meblada Npc Gold bulunmuyor.

//try uid.<src.tag0.duellotas>.more1 0

//return 1

//endif







LOCAL.FIYAT=<SRC.DTAG0.UCRET>

IF !(<SRC.RESTEST <DLOCAL.FIYAT> I_KALP>)

SRC.SYSMESSAGE @07A1,1,1 ÇANTANIZDA <DLOCAL.FIYAT> ADET KALP BULUNMUYOR.

OBJ.SYSMESSAGE @07A1,1,1 RAKİBİNİZİN ÇANTANIZDA <DLOCAL.FIYAT> ADET KALP BULUNMUYOR.

TRY UID.<SRC.DTAG0.DUELLOTAS>.MORE1 0

RETURN 1

ENDIF





IF !(<OBJ.RESTEST <DLOCAL.FIYAT> I_KALP>)

OBJ.SYSMESSAGE @07A1,1,1 ÇANTANIZDA <DLOCAL.FIYAT> ADET KALP BULUNMUYOR.

SRC.SYSMESSAGE @07A1,1,1 RAKİBİNİZİN ÇANTANIZDA <DLOCAL.FIYAT> ADET KALP BULUNMUYOR.

TRY UID.<SRC.DTAG0.DUELLOTAS>.MORE1 0

RETURN 1

ENDIF







if (<obj.findlayer(25).uid>)

obj.sysmessage @38,,1 Altinizda binek varken duello yapamazsiniz.

src.sysmessage @38,,1 Rakibinizin altinda binek oldugu icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if (<src.findlayer(25).uid>)

src.sysmessage @38,,1 Altinizda binek varken duello yapamazsiniz.

obj.sysmessage @38,,1 Rakibinizin altinda binek oldugu icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



forchars 25

if (<memoryfindtype.memory_ipet>)

if (<memoryfindtype.memory_ipet.link>==<src.uid>)

src.sysmessage @38,,1 Etrafinizda size ait bir hayvan varken duello yapamazsiniz.

obj.sysmessage @38,,1 Rakibinizin yakininda ona ait bir binek bulundugu icin duello iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endif

endfor



forchars 25

if (<memoryfindtype.memory_ipet>)

if (<memoryfindtype.memory_ipet.link>==<obj.uid>)

obj.sysmessage @38,,1 Etrafinizda size ait bir hayvan varken duello yapamazsiniz.

src.sysmessage @38,,1 Rakibinizin yakininda ona ait bir binek bulundugu icin duello iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endif

endfor



if ((<obj.findlayer(25).uid>) && !(<src.findlayer(25).uid>)) || ((<src.findlayer(25).uid>) && !(<obj.findlayer(25).uid>))

obj.sysmessage @38,,1 Rakibinizle esit sartlarda degilsiniz.

src.sysmessage @38,,1 Rakibinizle esit sartlarda degilsiniz.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



for x 0 <src.findlayer(21).rescount>

if (<uid.<src.findlayer.21.uid>.findcont(<dlocal.x>).isweapon>) && !(<uid.<src.findlayer.21.uid>.findcont(<dlocal.x>).morez> == 0) && (<src.tag0.poison> == 1)

src.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

obj.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endfor



for x 0 <obj.findlayer(21).rescount>

if (<uid.<obj.findlayer.21.uid>.findcont(<dlocal.x>).isweapon>) && !(<uid.<obj.findlayer.21.uid>.findcont(<dlocal.x>).morez> == 0) && (<obj.tag0.poison> == 1)

obj.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

src.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif

endfor



if ((<src.findlayer(1).isweapon>) && !(<src.findlayer(1).morez> == 0) && (<src.tag0.poison> == 1))

src.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

obj.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if ((<src.findlayer(2).isweapon>) && !(<src.findlayer(2).morez> == 0) && (<src.tag0.poison> == 1))

src.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

obj.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if ((<obj.findlayer(1).isweapon>) && !(<obj.findlayer(1).morez> == 0) && (<src.tag0.poison> == 1))

obj.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

src.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif



if ((<obj.findlayer(2).isweapon>) && !(<obj.findlayer(2).morez> == 0) && (<src.tag0.poison> == 1))

obj.sysmessage @38,,1 Zehirli silah yasak sartina uymadiginiz icin duello teklifi iptal edildi.

src.sysmessage @38,,1 Rakibiniz zehirli silah yasak sartina uymadigi icin duello teklifi iptal edildi.

try uid.<src.tag0.duellotas>.more1 0

return 1

endif





//obj.findlayer(1).morez 0

//obj.findlayer(2).morez 0

//src.findlayer(1).morez 0

//src.findlayer(2).morez 0

src.events +e_duello

src.events -e_pazarsafe

src.duelloitemver

src.duelloitemver3

src.events -e_pazarsafe

obj.events +e_duello

obj.duelloitemver

obj.duelloitemver3

obj.events -e_pazarsafe

obj.tag.ocsavas 1

src.tag.ocsavas 1

obj.events -e_pazarsafe

src.findid.i_rune_incognito.timer

obj.findid.i_rune_incognito.timer

serv.allclients sysmessage @38,,1 Duello Duyuru :

serv.allclients sysmessage @0790,,1 <obj.name> vs <src.name> duellosu basliyor.





////////////////////////////////////////////////// YUKARDA SORGUYU YAPTIK ŞİMDİDE İTEMİ ÇANTADAN ALDIRALIM EREN BEY :)

//src.gold -=<eval <obj.dtag0.ucret>>

//obj.gold -=<eval <obj.dtag0.ucret>>



SRC.CONSUME <DLOCAL.FIYAT> I_KALP

OBJ.CONSUME <DLOCAL.FIYAT> I_KALP



serv.newnpc c_hakem

new.p <uid.<src.tag0.duellotas>.tag0.koordinat1>

new.gerisay

new.update

trysrc <obj> src.statlarifulle

statlarifulle

try uid.<src.tag0.duellotas>.tag.player1 <obj>

try uid.<src.tag0.duellotas>.tag.player2 <src.uid>

try uid.<src.tag0.duellotas>.timer 400

try uid.<src.tag0.duellotas>.more1 2

trysrc <obj> p <uid.<src.tag0.duellotas>.tag0.koordinat3>

obj.update

src.p <uid.<src.tag0.duellotas>.tag0.koordinat4>

trysrc <obj> src.kafeslee

src.kafeslee

src.update





[function duellosureceza]

serv.newitem i_duellocezasure

new.cont <uid>



[itemdef i_duellocezasure]

id i_gold

name bekle biraz

type t_eq_script



on=@create

attr attr_invis | attr_decay

timer 120



on=@equip

timer 120



on=@timer

remove

return 1



[function gerisay]

timerf 22,remove

timerf 21, say @0790 Basla.

timerf 21, say @0790 1

timerf 20, say @0790 2

timerf 19, say @0790 3

timerf 18, say @0790 4

timerf 17, say @0790 5

timerf 16, say @0790 6

timerf 15, say @0790 7

timerf 14, say @0790 8

timerf 13, say @0790 9

timerf 12, say @0790 10

timerf 11, say @0790 11

timerf 10, say @0790 12

timerf 9, say @0790 13

timerf 8, say @0790 14

timerf 7, say @0790 15

timerf 6, say @0790 16

timerf 5, say @0790 17

timerf 4, say @0790 18

timerf 3, say @0790 19

timerf 2, say @0790 20



[function kafeslee]

NEWITEM=06b

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 1,1

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=06a

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 1,0

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=06a

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE -1,0

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=06a

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE -1,1

ACT.ATTR=00002

ACT.TIMER=22





NEWITEM=069

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 0,1

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=069

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 0,1

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=069

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 0,-1

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=069

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 1,-1

ACT.ATTR=00002

ACT.TIMER=22



NEWITEM=i_duelpot

ACT.TYPE=t_normal

ACT.COLOR=08ad

ACT.P=<P>

ACT.MOVE 0,0

ACT.ATTR=00002

ACT.TIMER=2



[chardef c_hakem]

name #names_humanmale the refree

id c_man

can mt_equip|mt_nonmover



on=@click

message @07a1,,1 Duello Hakem

return 1



On=@Create

str 9500

dex 9500

int 9500

color 0418

speechcolor 0481

food 990

npc 1



itemnewbie i_shield_chaos

color 0

//item i_mt_ostard_zostrich

//color 0c86

//name Night Ostard

itemnewbie i_kryss_force

Color 0

itemnewbie i_hair_long

color 0

itemnewbie i_beard_vandyke

color 0

itemnewbie i_backpack

itemnewbie i_bankbox

color 0

timer 900

attr 014

itemnewbie i_blackrock_platemail

itemnewbie i_blackrock_platemail_leggings

itemnewbie i_blackrock_platemail_arms

itemnewbie i_blackrock_platemail_gorget

itemnewbie i_blackrock_platemail_gauntlets



[function statlarifulle]

src.hits <src.str>

src.mana <src.int>

src.stam <src.dex>

src.findid.i_rune_poison.remove

src.findid.i_bleeding.remove

src.findid.i_bleeding2.remove



[dialog d_duello_ayar]

0,0

resizepic 100 100 5150 300 200

//resizepic 110 110 3000 280 180

dhtmlgump 140 120 300 20 0 0 <serv.name> Npc Gold Duello Sistemi



button 120 150 55 56 1 0 1

button 120 175 55 56 1 0 2

button 120 200 55 56 1 0 3

button 120 225 55 56 1 0 4

button 120 250 55 56 1 0 5

dhtmlgump 142 150 400 20 0 0 Gerisayim Koordinati: <tag0.koordinat1>

dhtmlgump 142 175 400 20 0 0 Cikis Koordinati: <tag0.koordinat2>

dhtmlgump 142 200 400 20 0 0 1.Player: <tag0.koordinat3>

dhtmlgump 142 225 400 20 0 0 2.Player: <tag0.koordinat4>

dhtmlgump 142 250 400 20 0 0 <qval (<more1> == 3)?Duelloyu kullanima ac.:Duelloyu kullanima kapat.>



[dialog d_duello_ayar button]

onbutton 1

src.ctag0.duellotasuids <uid>

targetfg koordinat 1

onbutton 2

src.ctag0.duellotasuids <uid>

targetfg koordinat 2

onbutton 3

src.ctag0.duellotasuids <uid>

targetfg koordinat 3

onbutton 4

src.ctag0.duellotasuids <uid>

targetfg koordinat 4

onbutton 5

more1 <qval (<more1> == 3)?0:3>

src.sysmessage @<qval (<more1> == 3)?38,,1 Duello tasini kullanima kapattiniz.:58,,1 Duello tasini kullanima actiniz.>

say @<qval (<more1> == 3)?38,,1 Duello tasi kullanima kapatildi.:58,,1 Duello tasi kullanima acildi.>



[function koordinat]

try uid.<src.ctag0.duellotasuids>.tag.koordinat<args> <src.targp>

src.sysmessage @07a1,,1 Yeni koordinat ayarlandi : <src.targp>



[dialog d_duello_teklif_ana_menue_ESKI]

200,200

resizepic 0 0 5150 275 200

//resizepic 10 10 5150 255 180

resizepic 25 66 3000 190 20

dtextentry 40 67 3000 20 049 0 1

button 220 65 4023 4025 1 0 1

dtext 40 30 0 Duello Bahis Ucreti:



checkbox 23 120 210 211 0 1

dtext 45 120 0 Loot serbest

dtext 110 150 0 Not: Npc Gold Duello



//checkbox 25 140 210 211 0 2

//dtext 45 140 0 Silaha zehir serbest











[dialog d_duello_teklif_ana_menu]

-240,0

nomove



resizepic 240 20 5150 290 260

dhtmlgump 310 43 150 40 0 0 <def.bfont_black>[ Duello Giris Özellikler ]

dhtmlgump 310 81 150 40 0 0 <def.bfont_red>[ 1 ] Npc Gold                 

dhtmlgump 310 121 150 40 0 0 <def.bfont_red>[ 5 ] Npc Gold

dhtmlgump 310 161 150 40 0 0 <def.bfont_red>[ 10 ] Npc Gold

dhtmlgump 370 230 150 40 0 0 <def.bfont_red> Not: Npc Gold Duello





button 270 80 4023 4025 1 0 1

button 270 120 4023 4025 1 0 2

button 270 160 4023 4025 1 0 3







[dialog d_duello_teklif_ana_menu button]

on=1



///////////////////// BURDAKI SORGUYUDA DEGISTIRDIM





IF !(<SRC.RESTEST 1 I_KALP>)

SRC.SYSMESSAGE @07A1,1,1 ÇANTANIZDA 1 ADET KALP BULUNMUYOR.

RETURN 1

ENDIF



src.targetf f_duelloteklif

src.sysmessage @07a1,,1 Duello yapmak istediginiz kisiyi secin.

src.tag.duellotas <uid>

src.tag.ucret=1

//src.tag.loot <qval (<argchk[1]> < 1)?0:1>

//src.tag.poison <qval (<argchk[2]> < 1)?1:0>





on=2

IF !(<SRC.RESTEST 5 I_KALP>)

SRC.SYSMESSAGE @07A1,1,1 ÇANTANIZDA 5 ADET KALP BULUNMUYOR.

RETURN 1

ENDIF



src.targetf f_duelloteklif

src.sysmessage @07a1,,1 Duello yapmak istediginiz kisiyi secin.

src.tag.duellotas <uid>

src.tag.ucret=5

//src.tag.loot <qval (<argchk[1]> < 1)?0:1>

//src.tag.poison <qval (<argchk[2]> < 1)?1:0>





on=3

IF !(<SRC.RESTEST 10 I_KALP>)

SRC.SYSMESSAGE @07A1,1,1 ÇANTANIZDA 10 ADET KALP BULUNMUYOR.

RETURN 1

ENDIF



src.targetf f_duelloteklif

src.sysmessage @07a1,,1 Duello yapmak istediginiz kisiyi secin.

src.tag.duellotas <uid>

src.tag.ucret=10

//src.tag.loot <qval (<argchk[1]> < 1)?0:1>

//src.tag.poison <qval (<argchk[2]> < 1)?1:0>









[function lootbankaya]

serv.newitem i_bag

src.new.cont <src.findlayer.29>

local.bag <src.new>

var.lfor

for <uid.<args>.rescount>

if (<uid.<args>.findcont.<eval <var.lfor>>.attr>&attr_newbie)

var.lfor <eval <var.lfor>> +1

else

try uid.<args>.findcont.<eval <var.lfor>>.cont <uid.<local.bag>>

endif

endfor















[events e_duello]



ON=@itemequip

if (<eval <obj.tag.poison>>==0) && (strmatch(*t_weapon*,<act.type>)) && (<eval <act.morez>> >0)

src.sysmessage @021 Poisonlu silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_poison_bow)

src.sysmessage @021 Duello'da Poison Bow kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_warlock_silah)

src.sysmessage @021 Duello'da Özel Warlock Silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_warrior_silah)

src.sysmessage @021 Duello'da Özel Warrior Silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_mage_silah)

src.sysmessage @021 Duello'da Özel Mage Silah kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_tunic)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_leggings)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_sleeves)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_gloves)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dragonite_gorget)

src.sysmessage @021 Duello'da Özel Warlock Set kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_duvar_kafalik)

src.sysmessage @021 Duello'da Field Sapka kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_tc_mr15)

src.sysmessage @021 Duello'da [+15] Fix Robe kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_dex_cape)

src.sysmessage @021 Duello'da Dex Pelerin kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_pvprobesi)

src.sysmessage @021 Duello'da Pvp Robe kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_pvpbere)

src.sysmessage @021 Duello'da Pvp Bere kullanamazsiniz

act.unequip

endif

if (<act.baseid> == i_pvp_one)

src.sysmessage @021 Duello'da Pvp Nox kullanamazsiniz

act.unequip

endif















On=@ItemTargOn_Item

if (<src.targ.type> == t_corpse)

sysmessage @38,,1 Bu alanda Cesetlere bu islemi yapamazsiniz.

return 1

endif



On=@ItemDropOn_Ground

act.timerf 30,f_silin

src.sysmessage @38,,1 <act.name> 30 Saniye Icinde Silinicektir..



on=@click

message @68,,1 [<eval <rescount i_bandage>> bandaj] [<eval <rescount i_potion_HealGreat>+<rescount i_potion_Heal>> heal] [<eval <rescount i_potion_cureGreat>+<rescount i_potion_cure>> cure]

//message @38,,1 [Galibiyet: <eval <tag0.duelkazan>> Kaybettigi: <eval <tag0.duelkaybet>>]

message @48,,1 <name>

return 1







on=@logout

timerf 30,duellooyundandustum



on=@login

src.timerf clear





on=@spellcast

if ((<argn> == 28) ||(<argn> == 24) || (<argn> == 33) || (<argn> == 35) || (<argn> == 39) || (<argn> == 40) || (<argn> == 44) || (<argn> == 45) || (<argn> == 43) || (<argn> == 46) || (<argn> == 47) || (<argn> == 49) || (<argn> == 50) || (<argn> == 55))  || (<argn> == 64)  || (<argn> == 63) || (<argn> == 62)  || (<argn> == 61)   || (<argn> == 60)   || (<argn> == 59)   || (<argn> == 58)  || (<argn> == 57)   || (<argn> == 56)  || (<argn> == 54)  || (<argn> == 48))

src.sysmessage @07a1,,1 Duello kurallarina gore bu buyuyu kullanamazsiniz.

f_fizzle

return 1

endif



On=@SkillStart

if (<action> == id(skill_stealth)) || (<action> == skill_stealth) || ((<action> == id(skill_snooping)) || (<action> == skill_snooping)) || ((<action> == id(skill_stealing)) || (<action> == skill_stealing)) || ((<action> == id(skill_hiding)) || (<action> == skill_hiding)) 

src.sysmessage @38,,1 Duello esnasinda bu yeteneklerinizi kullanamazsiniz.

return 1

endif



on=@itemdclick

if (<act.baseid> == i_runebook) || (<act.baseid> == i_deed_animal) || (<act.baseid> == i_egg_ostard_olgun) || (<act.type> == t_figurine) || (<act.baseid> == i_p_g1) || (<act.baseid> == i_p_g2) || (<act.baseid> == i_para_kupestr10) || (<act.dispid> == i_deed) || (<act.baseid> == i_poison_bow) || (<act.baseid> == i_et_vortex)   

src.sysmessage @0790,,1 Duello alaninda <act.name> kullanamazsiniz.

return 1

endif

endif

if (<act.baseid>==i_binek_hafiza)

src.sysmessage @48,,1 Bu Alanda Yasaklanmistir.

return 1

endif







on=@dismount

src.sysmessage @38,,1 Duello esnasinda bineginizden inemezsiniz.

return 1







on=[url=u-death-9220.html]@death[/url]

obj = <tag0.duellorakip>

ref1 = <obj.tag0.duellorakip>

//obj.bilet +=<eval <obj.dtag0.ucret>*2>

obj.kalp

obj.topduelpuankazan

ref1.tag0.duelkaybet +=1 //yeni deniyorum

try uid.<ref1.tag0.duellotas>.say <obj.name> kazandi.

serv.allclients sysmessage @38,,1 Duello Duyuru :

serv.allclients sysmessage @0790,,1 <obj.name>, <ref1.name> adli oyuncuyu duelloda yenmistir.

if (<ref1.tag0.loot> == 1)

ref1.findlayer.1.cont <ref1.findlayer.21>

ref1.findlayer.2.cont <ref1.findlayer.21>

ref1.findlayer.3.cont <ref1.findlayer.21>

ref1.findlayer.4.cont <ref1.findlayer.21>

ref1.findlayer.5.cont <ref1.findlayer.21>

ref1.findlayer.6.cont <ref1.findlayer.21>

ref1.findlayer.7.cont <ref1.findlayer.21>

ref1.findlayer.8.cont <ref1.findlayer.21>

ref1.findlayer.10.cont <ref1.findlayer.21>

ref1.findlayer.12.cont <ref1.findlayer.21>

ref1.findlayer.13.cont <ref1.findlayer.21>

ref1.findlayer.17.cont <ref1.findlayer.21>

ref1.findlayer.18.cont <ref1.findlayer.21>

ref1.findlayer.19.cont <ref1.findlayer.21>

ref1.findlayer.20.cont <ref1.findlayer.21>

ref1.findlayer.22.cont <ref1.findlayer.21>

ref1.findlayer.23.cont <ref1.findlayer.21>

ref1.findlayer.24.cont <ref1.findlayer.21>

trysrc <obj> src.lootbankaya <ref1.findlayer(21).uid>

endif

trysrc <obj> src.cekyazdimduello <eval <obj.dtag0.ucret>*2>

ref1.findid.i_rune_poison.remove

ref1.findid.i_bleeding.remove

ref1.findid.i_bleeding2.remove

ref1.findid.i_silbag.remove

ref1.hits <ref1.str>

ref1.mana <ref1.int>

ref1.stam <ref1.dex>

ref1.events -e_duello

obj.events -e_duello

ref1.action -1

obj.findid.i_rune_poison.remove

obj.findid.i_bleeding.remove

obj.findid.i_bleeding2.remove

obj.findid.i_silbag.remove

obj.hits <obj.str>

obj.mana <obj.int>

obj.stam <obj.dex>

obj.action -1

try uid.<ref1.tag0.duellotas>.more1 0

try uid.<obj.tag0.duellotas>.more1 0

try uid.<ref1.tag0.duellotas>.timer -1

ref1.p <uid.<obj.tag0.duellotas>.tag0.koordinat2>

ref1.update

obj.p <uid.<ref1.tag0.duellotas>.tag0.koordinat2>

obj.update

return 1

























[function cekyazdimduello]

src.sysmessage Kazandiniz.

return 1

endif





[plevel 5]

duelloalani



[function duelloalani]

src.newitem i_duello_stone

src.act.p <src.p>

src.newitem 02fe

src.act.p <src.p>

src.act.move 0 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 1 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 2 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 3 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move 4 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -1 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -2 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -3 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -4 -1

src.newitem 02fe

src.act.p <src.p>

src.act.move -5 -1

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -1

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -2

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -3

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -4

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -5

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -6

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -7

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -8

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -9

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -10

src.newitem 02ff

src.act.p <src.p>

src.act.move -6 -11

src.newitem 02fe

src.act.p <src.p>

src.act.move 5 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 4 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 3 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 2 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 1 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move 0 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -1 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -2 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -3 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -4 -12

src.newitem 02fe

src.act.p <src.p>

src.act.move -5 -12

src.newitem 0300

src.act.p <src.p>

src.act.move -6 -12

src.newitem 02ff

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 02fd

src.act.p <src.p>

src.act.move 5 -1













[function duelloitemver]

for 10

src.findtype.t_potion.remove

src.findtype.t_eq_trade_window.remove

src.findtype.t_bandage.remove

src.findtype.t_reagent.remove

src.findtype.t_cloth.remove

endfor

src.sysmessage @07a1,,1 Cantaniz temizlendi ve duello icin esyalariniz yerlestirildi.

//serv.newitem i_potion_healgreat,3,<src>,1

//serv.newitem i_potion_refreshtotal,3,<src>,1

//serv.newitem i_potion_curegreat,3,<src>,1

//serv.newitem i_potion_bleed,3,<src>,1

//serv.newitem i_potion_agilitygreat,3,<src>,1

//serv.newitem i_bandage,5,<src>,1

if (<src.magery> < 300)

serv.newitem i_arrow,30,<src>,1

endif

src.findlayer(1).morez 0

src.findlayer(2).morez 0

src.findid.i_spear_power.morez 0

src.findid.i_katana_power.morez 0

src.findid.i_broadsword_power.morez 0

src.findid.i_kryss_power.morez 0





[function duelloitemver3]

for 10

findtype.t_eq_trade_window.remove

findtype.t_potion.remove

findtype.t_bandage.remove

findtype.t_reagent.remove

endfor

sysmessage @07a1,,1 Cantaniz temizlendi ve duello icin esyalariniz yerlestirildi.

if (<magery> < 300)

serv.newitem i_arrow,30

new.cont <uid>

endif

//serv.newitem i_potion_healgreat,3,<uid>,1

//serv.newitem i_potion_refreshtotal,3,<uid>,1

//serv.newitem i_potion_curegreat,3,<uid>,1

//serv.newitem i_potion_bleed,3,<uid>,1

//serv.newitem i_potion_agilitygreat,3,<uid>,1

//serv.newitem i_bandage,5,<uid>,1

findlayer(1).morez 0

findlayer(2).morez 0

findid.i_spear_power.morez 0

findid.i_katana_power.morez 0

findid.i_broadsword_power.morez 0

findid.i_kryss_power.morez 0















/////////////////////////////////////////





[itemdef i_duelpot]

id=1310

name duel



on=@create

attr 090



on=@step

src.newitem i_duelbag

src.act.bounce

remove

return 1

endif





[itemdef i_silbag]

id=i_bag

name=Duello Bag



on=@Click

message @07a1,,1 <name>

return 1



[function f_duelbagver]

newitem i_duelbag

act.bounce



[TEMPLATE i_duelbag]

CONTAINER=i_silbag

COLOR=0846

ITEM=i_potion_healgreat,4

ITEM=i_potion_curegreat,4

ITEM=i_potion_refreshtotal,4

ITEM=i_bandage,6

ITEM=i_potion_bleed,4

ITEM=i_potion_agilitygreat,4

ITEM=i_arrow,50

ITEM=i_oil_cloth,5





[function duellooyundandustum]

//src.duellosureceza

src.hits 0







[eof]

eyvallah yılmazcım cansın herkezin canı sağolsun