UO-Dev Arama

 

İçerde : 1 misafir, 0 üye : --- Sayfalar: 1
Yazar
Skill Title: Journeyman
Toplam Mesaj: 120
Oyun Tarzı: Pvp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 27
Beğeni: 11
Mesaj #101856   29-04-2021 21:14 GMT    
     
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.



Script Kodu:
[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






Script Kodu:
[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=@death
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]



Yazar
Skill Title: Expert
Toplam Mesaj: 305
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 68
Mesaj #101885   01-05-2021 19:33 GMT    
     
SAYIN EREN BEY BU ŞEKİLDE KALP ALMASI LAZM GEREKLİ ACIKLAMALARI SCP ICINE // KOYARAK BELİRTİM

Script Kodu:
[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=@death
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İ ?


Son güncelleme: mahsuni tarafından 01-05-2021 20:55 GMT, 173 Gün önce düzenlendi.


 Eren19944
Discord= Zedikus#4967
Script && Mull && Word

Yazar
Skill Title: Journeyman
Toplam Mesaj: 120
Oyun Tarzı: Pvp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 27
Beğeni: 11
Mesaj #101886   01-05-2021 20:55 GMT    
     
oldu mahsuni sağolasın reis



Yazar
Skill Title: Expert
Toplam Mesaj: 305
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 68
Mesaj #101887   01-05-2021 21:01 GMT    
     
BUDA DIALOG AYIPSIN KİMSE DESTEK OLMAZSA BEN VARIM EREN... ZOR GELMİSTİR ONDAN MİLLET KONUNA CVP YAZMAMİŞ HEHE


Script Kodu:
[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=@death
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]


 Eren19944
Discord= Zedikus#4967
Script && Mull && Word

Yazar
Skill Title: Journeyman
Toplam Mesaj: 120
Oyun Tarzı: Pvp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 27
Beğeni: 11
Mesaj #101888   01-05-2021 21:18 GMT    
     
eyvallah yılmazcım cansın herkezin canı sağolsun


 mahsuni

Sayfalar: 1


Benzer Konular :

KonularMesajlarSon gönderenTarih
yardım futbol4helpmee21-10-2021
Debug hata yardım.4Gokku28-09-2021
NPC bow hata6Jada17-04-2021
Özel Sette Armor Hata12Eren1994427-04-2021
Duello Sistemi Poison Sorunu18mahsuni22-02-2021


Kullanıcı Adı:Parola: Beni Hatırla?


Mythic broadsword sphereserver modernuo runuo ServUO JustUO

Keywords:

ultima online, RunUO, ultima online download, sphere scripting, role play, uo grafik, second age ultima, uo loop, macroman, pvp server, server kurulumu, sphere, multool, ml mulls, 56b 55r 55i, htmlgumps, client 4x, client edit, sphere release, osi, rp server, sunucular, ghost mouse, inside uo, kingdom reborn, stygian abyss, uo nasıl oynanır, mondain's legacy, age of shadows, world build, grandmaster, ultima online pvp, player dosyaları, ultima online indir, frp game, RunUO 1.0.0, razor, uo rice, hue editör, skill tools, ultima online patch, axis, world build, verdata, verdata patcher, map editör, gump editör, mul patcher, aos mulls, scriptler, anim edit, anim publish, hues mul, hosting vps, event dialog, account sistemi, skill gain, static yapımı,

UO-Dev Footer UO-Dev Footer