UO LEGEND

UO-Dev Arama

 

İçerde : 1 misafir, 0 üye : --- Sayfalar: 1
Yazar
Skill Title: Novice
Toplam Mesaj: 35
Oyun Tarzı: Rp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 13
Beğeni: 0
Mesaj #100936   20-02-2021 15:56 GMT    
     
arkadaşlar duelloya silahta poison varken katılabiliyorlar hata nerede bakarmsnz. sürüm X1

Script Kodu:
on=@ItemEquipTest
if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <uid.<tag.cpvp_duello_rakip>.findid.i_duellocu.uid>
endif

if (<eval <obj.tag.poison>>==0)
if <act.isevent.t_weapon_poisoned>
src.sysmessage @33,,1 Kurallara gore silahta poison yasak.
return 1
endif
endif
                   if (<eval <obj.tag.poison>>==0) && (strmatch(*t_weapon*,<act.type>)) && (<eval <act.morez>> >0) //?
                   src.sysmessage @021 Poisonlu silah kullanamazsiniz.
                   act.unequip
                   endif


konsoldaki hatalar

Script Kodu:
16:55:ERROR:(Duello_System.scp,658)Undefined keyword 'findlayer(1).cont'.
16:55:ERROR:(Duello_System.scp,668)Undefined keyword 'findlayer(1).cont'.
16:55:ERROR:Undefined keyword 'closealldialogs'.
16:56:ERROR:(Duello_System.scp,890)Undefined keyword 'stone'.
16:56:ERROR:(Duello_System.scp,894)Can't resolve <act.str>.
16:56:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
16:56:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
16:56:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
16:56:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
16:56:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
16:56:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
16:56:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
16:56:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
16:56:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
16:56:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
16:56:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
16:56:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
16:56:ERROR:(Duello_System.scp,979)Undefined keyword 'findid.i_bleeding.remove'.
16:56:ERROR:(Duello_System.scp,980)Undefined keyword 'findid.i_bleeding2.remove'.
16:56:ERROR:(Duello_System.scp,981)Undefined keyword 'findid.i_rune_poison.remove'.
16:56:ERROR:(Duello_System.scp,982)Undefined symbol 'i_memory_poison_new' [Evaluated expression: 'i_memory_poison_new.remove'].
16:56:ERROR:(Duello_System.scp,982)Undefined keyword 'findid.i_memory_poison_new.remove'.
16:56:ERROR:(Duello_System.scp,990)Undefined keyword 'findid.i_bleeding.remove'.
16:56:ERROR:(Duello_System.scp,991)Undefined keyword 'findid.i_bleeding2.remove'.
16:56:ERROR:(Duello_System.scp,992)Undefined symbol 'i_memory_poison_new' [Evaluated expression: 'i_memory_poison_new.remove'].
16:56:ERROR:(Duello_System.scp,992)Undefined keyword 'findid.i_memory_poison_new.remove'.
16:56:ERROR:(Duello_System.scp,993)Undefined keyword 'findid.i_rune_poison.remove'.
17:00:3:'test' commands 'duel'=1
17:00:ERROR:(Duello_System.scp,668)Undefined keyword 'findlayer(1).cont'.
17:01:ERROR:Undefined keyword 'closealldialogs'.
17:01:1:Client disconnected [Total:2]. Account: 'test2'. Char: 'Legion Commander'. IP='127.0.0.1'.
17:02:ERROR:(Duello_System.scp,975)Can't resolve <ctag.duello_beraber>.
17:02:ERROR:(Duello_System.scp,979)Undefined keyword 'findid.i_bleeding.remove'.
17:02:ERROR:(Duello_System.scp,980)Undefined keyword 'findid.i_bleeding2.remove'.
17:02:ERROR:(Duello_System.scp,981)Undefined keyword 'findid.i_rune_poison.remove'.
17:02:ERROR:(Duello_System.scp,982)Undefined symbol 'i_memory_poison_new' [Evaluated expression: 'i_memory_poison_new.remove'].
17:02:ERROR:(Duello_System.scp,982)Undefined keyword 'findid.i_memory_poison_new.remove'.
17:02:ERROR:(Duello_System.scp,986)Can't resolve <ctag.duello_beraber>.
17:02:ERROR:(Duello_System.scp,990)Undefined keyword 'findid.i_bleeding.remove'.
17:02:ERROR:(Duello_System.scp,991)Undefined keyword 'findid.i_bleeding2.remove'.
17:02:ERROR:(Duello_System.scp,992)Undefined symbol 'i_memory_poison_new' [Evaluated expression: 'i_memory_poison_new.remove'].
17:02:ERROR:(Duello_System.scp,992)Undefined keyword 'findid.i_memory_poison_new.remove'.
17:02:ERROR:(Duello_System.scp,993)Undefined keyword 'findid.i_rune_poison.remove'.
17:02:ERROR:(Duello_System.scp,1014)Can't resolve <ctag.duello_beraber>.
17:02:ERROR:(Duello_System.scp,1055)Can't resolve <src.ctag.duel_area>.
17:02:ERROR:(Duello_System.scp,1057)Can't resolve <src.ctag.duel_area>.
17:02:ERROR:(Duello_System.scp,1059)Can't resolve <src.ctag.duel_area>.
17:02:ERROR:(Duello_System.scp,1061)Can't resolve <src.ctag.duel_area>.
17:02:ERROR:(Duello_System.scp,1063)Can't resolve <src.ctag.duel_area>.
17:02:ERROR:(Duello_System.scp,1068)Can't resolve <ctag.duello_beraber>.
17:02:ERROR:(Duello_System.scp,1077)Can't resolve <ctag.duello_beraber>.


Son güncelleme: Alone tarafından 20-02-2021 17:06 GMT, 117 Gün önce düzenlendi.



Yazar
Skill Title: Expert
Toplam Mesaj: 289
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 60
Mesaj #100937   20-02-2021 16:13 GMT    
     
şimdik adam düello alanina girdi cantasinda vanq katana var önceden poiyi sürmüş ve sadece bir tane silah var yaninda adam o silahta poi var die eline Düelloda silah kullanmiyacak. bunu yerine eline alaciği zaman silahtaki poiyi sildirmek daha mantıklı deilmi ?


Script Kodu:
if (<act.morez> > 1)
  act.morez=
  src.sysmessage @07a1,1,1 Silahtaki Poi silindi.
endif


Consoldaki hatalar Sadece poi ile ilgili deil eğer düello sistemin scp buraya atabilirsen hatayi çözebiliriz.


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

Yazar
Skill Title: Novice
Toplam Mesaj: 35
Oyun Tarzı: Rp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 13
Beğeni: 0
Mesaj #100940   20-02-2021 17:16 GMT    
     
öyle olduğunda poison serbest duello seçeneği seçildiğinde de eline silahı alınca poison silinir. Sistem işleyişi olarak poison sürülü silahı eline alamaması gerekli onu çözersek sevinirm. konsoldaki hatalarıda çözersek sevinirim

Script Kodu:
[function hazir_pot_duel] 
newitem i_bag
ref1 = <new.uid>
new.bounce

newitem i_potion_healgreat
new.amount <argn>
new.cont <ref1>


newitem i_potion_curegreat
new.amount <argn>
new.cont <ref1>

newitem i_potion_poisondeadly
new.amount <argn>
new.cont <ref1>


//newitem i_potion_bleed
//new.amount <argn>
//new.cont <ref1>


newitem i_potion_refreshtotal
new.amount <argn>
new.cont <ref1>


newitem i_potion_agilitygreat
new.amount <argn>
new.cont <ref1>


newitem i_bandage
new.amount 5
new.cont <ref1>

//newitem i_cloth_oil
//new.cont <ref1>

newitem i_arrow
new.amount 25
new.bounce

newitem i_xbolt
new.amount 25
new.bounce

//newitem loot_reg_30
//new.bounce

[Plevel 1]
duel

[function duel]
src.sysmessage Duello yapmak istediğiniz kişiyi seçiniz.
targetf f_duel_x

[function f_duel_x]
if (<argo.uid>==<src.uid>)
src.sysmessage Kendinizi seçemezsiniz.
return 1
endif
if <argo.tag0.duelloda> //XXX
src.sysmessage @,,1 Şuanda bu kişi duelloda.
return 1
else
src.ctag.duel_opponent = <argo.uid>
src.dialog d_duel_alan
if <src.findid.i_duellocu>
src.findid.i_duellocu.remove
endif
endif


[dialog d_duel_alan]
50,50


resizepic 50 0 2620 400 200
checkertrans 55 5 390 190


text 105 50 0250 0


if <eval <var.duel_1>> == 1
text 105 80 38 1
else
button 85 83 1209 1210 1 0 1
text 105 80 800 1
endif


if <eval <var.duel_2>> == 1
text 105 100 38 2
else
button 85 103 1209 1210 1 0 2
text 105 100 800 2
endif

if <eval <var.duel_3>> == 1
text 105 120 38 3
else
button 85 123 1209 1210 1 0 3
text 105 120 800 3
endif

//button 85 143 1209 1210 1 0 4
//text 105 140 800 4


//button 85 163 1209 1210 1 0 5
//text 105 160 800 5


//button 195 194 3 4 1 0 0
//text 215 190 800 6

[dialog d_duel_alan text]
Kirmizi alanlar suanda dolu olan alanlardir.
Duello Alan 1 ( Gargoyle City )
Duello Alan 2 ( Zento )
Duello Alan 3 ( Luna )
//Duello Alan 4
//Duello Alan 5
//Kapat

[dialog d_duel_alan button]

On=1
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 1
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif

On=2
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 2
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif
On=3
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 3
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif
On=4
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 4
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif

On=5
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 5
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif










[itemdef i_skor_duello]
id i_bulletin_board
name Skorlar
type t_eq_script

on=@create
attr=attr_static|attr_move_never

on=@dclick
src.duellist
src.duelgalib
return 1


[function duellist]
dialog d_duellist

[defname duelloplayer]
duelloplayer 5

[function duello5]
tag0.duelkazan +=1
for 1 <ddef.duelloplayer>
        var.remove <ddef.duelloplayer>
        for y 1 <ddef.duelloplayer>
                ref1=<var.duelloplayer_<dlocal.y>>
                if (<ref1> = <uid>)
                        var.remove <dlocal.y>
                endif
        endfor
        ref2=<var.duelloplayer_<dlocal._for>>
        if (<dtag.duelkazan> >= <ref2.dtag.duelkazan>)
                var.duelloplayer_<dvar.remove>
                for x <dvar.remove> <dlocal._for>
                        var.duelloplayer_<dlocal.x> <var.duelloplayer_<eval <dlocal.x> -1>>
                endfor
                var.duelloplayer_<dlocal._for> <uid>
                var.remove
                return 1
        endif
endfor

[function duelyazdir]
serv.deletefile C:\AppServ\www\Web\dueldiz.php
serv.writefile C:\AppServ\www\Web\dueldiz.php
for c 1 5
obj = <var.duelloplayer_<dlocal.c>>
IF (<FILE.OPEN C:\AppServ\www\Web\dueldiz.php>)
file.writeline <var.ebe>body text=#FFFFFF background-color:transparent<var.ebesi>
file.writeline <var.ebe>font size=2<var.ebesi><obj.name><var.ebe>/font<var.ebesi>  //<var.ebe>font face=Argos size=2<var.ebesi><obj.name> <var.ebe>/font<var.ebesi><var.ebe>font size=2<var.ebesi><var.ebe>font face=Argos <var.ebesi>:<var.ebe>/font<var.ebesi><var.ebe>font face=Argos color=#000000 <var.ebesi>:<var.ebe>/font<var.ebesi> <var.ebe>font face=Argos <var.ebesi><eval <obj.tag.pan>><var.ebe>/font<var.ebesi> //<var.ebe>font face=Argos color=#FF0000 <var.ebesi>Kills:<var.ebe>/font<var.ebesi> <var.ebe>font face=Argos <var.ebesi><obj.kills><var.ebe>/font<var.ebesi>
file.writeline <var.ebe>body text=#FFFFFF background=aaaa.png<var.ebesi>
file.writeline <var.ebe>/font<var.ebesi>
file.writeline <var.ebe>p<var.ebesi>
file.close
endif
endfor

[function duelpuanreset]
for c 1 1000
obj = <var.duelloplayer_<dlocal.c>>
obj.tag.duelkazan
endfor



[function f_duel_tablo_list]
for c 1 5
obj = <var.duelloplayer_<dlocal.c>>
if !<isempty <var.duelloplayer_<dlocal.c>>>
    var.duel_list_name_<dlocal.c> <obj.name>
  var.duel_list_puan_<dlocal.c> <dobj.tag.duelkazan>
endif
endfor

[function f_get_duel]
serv.f_duel_tablo_list
if <argn1> == 1
return <var.duel_list_name_1>
elif <argn1> == 11
return <eval <var.duel_list_puan_1>>
elif <argn1> == 2
return <var.duel_list_name_2>
elif <argn1> == 22
return <eval <var.duel_list_puan_2>>
elif <argn1> == 3
return <var.duel_list_name_3>
elif <argn1> == 33
return <eval <var.duel_list_puan_3>>
elif <argn1> == 4
return <var.duel_list_name_4>
elif <argn1> == 44
return <eval <var.duel_list_puan_4>>
elif <argn1> == 5
return <var.duel_list_name_5>
elif <argn1> == 55
return <eval <var.duel_list_puan_5>>
endif


[plevel 1]
duellist

[dialog d_duellist]
120,260
//resizepic 39 0 60000 525 205//ARka Fon
//resizepic 50 12 83 501 180

resizepic 50 0 2620 495 260
checkertrans 55 5 485 250


page 0
   dtext 270 30 38 Duello Top 5
   dtext 75 80 38 1.                     
   dtext 75 110 38 2.                       
   dtext 75 140 38 3.
   dtext 75 170 38 4.                         
   dtext 75 200 38 5.
   dtext 450 80 38 Puan:                       
   dtext 450 110 38 Puan:                         
   dtext 450 140 38 Puan:
   dtext 450 170 38 Puan: 
   dtext 450 200 38 Puan:       
for c 1 5
obj = <var.duelloplayer_<dlocal.c>>
   dtext 106 <hval (<local.c>*30)+50> 50 <obj.name>
   dtext 493 <hval (<local.c>*30)+50> 50 <dobj.tag.duelkazan>
endfor

[dialog d_duellist button]
on=0

[plevel 1]
duelgalib

[function duelgalib]
src.sysmessage Suana kadar <eval <tag0.duelkazan>> kere duello'da galip geldiniz.


[chardef c_cpvp_duello]
name Duello Hakemi
id c_man
can mt_equip|mt_nonmover

On=@Create
str 9500
dex 1000
int 1000
magery 100
invul 1
speechcolor 1953
food 990
color 083ea
taming 32000

ITEMNEWBIE=i_PLATEMAIL_ARMS
ITEMNEWBIE=i_PLATEMAIL_leggings
ITEMNEWBIE=i_PLATEMAIL_chest
ITEMNEWBIE=i_PLATEMAIL_GORGET
ITEMNEWBIE=i_PLATEMAIL_gloves
ITEMNEWBIE=i_helm_closed
ITEMNEWBIE=i_staff_black

on=@gethit
return 1
on=@spelleffect
return 1
on=@death
hits 100
return 1
on=@attack
skill fail
action -1
return 1

on=@hit
return 1

on=@click
messageua 0481,6,6,enu [<name>]
messageua 0481,6,6,enu Duello Master
return 1

on=@dclick
if (<src.findid.i_duellocu>)
src.findid.i_duellocu.remove
endif
if (<src.account.plevel>==7) || (<src.isgm>)
sdialog d_cpvp_duello_ayar
elif (<src.account.plevel>==1) || (<src.account.plevel>==7)
if (<distance> >3)
src.sysmessage @1953,1,1,1 Yetisemiyorsunuz...
return 1
endif
endif
sdialog d_cpvp_duello

return 1

[dialog d_cpvp_duello_ayar]
0,0
resizepic 100 100 5120 300 200
resizepic 110 110 9350 280 180
dhtmlgump 170 120 300 20 0 0 <serv.servname> Duello Sistemi

button 120 150 210 211 1 0 1
button 120 175 210 211 1 0 2
button 120 200 210 211 1 0 3
button 120 225 210 211 1 0 4
button 120 250 210 211 1 0 5
dhtmlgump 142 150 400 20 0 0 Normal Koordinati: <tag0.koordinat1>
dhtmlgump 142 175 400 20 0 0 Gerisayim Koordinati: <tag0.koordinat2>
dhtmlgump 142 200 400 20 0 0 Pvp'deki Koordinati: <tag0.koordinat3>
dhtmlgump 142 225 400 20 0 0 1.Player: <tag0.koordinat4>
dhtmlgump 142 250 400 20 0 0 2.Player: <tag0.koordinat5>

[dialog d_cpvp_duello_ayar button]
onbutton 1
var.hakemuid <uid>
targetfg hakemkoordinat 1
onbutton 2
var.hakemuid <uid>
targetfg hakemkoordinat 2
onbutton 3
var.hakemuid <uid>
targetfg hakemkoordinat 3
onbutton 4
var.hakemuid <uid>
targetfg hakemkoordinat 4
onbutton 5
var.hakemuid <uid>
targetfg hakemkoordinat 5

[dialog d_cpvp_duello]
0,0
//resizepic 100 100 9300 300 270
//resizepic 110 110 9300 280 250
resizepic 100 100 2620 300 270
checkertrans 105 105 290 260
//gumppictiled 110 110 280 250 2624

resizepic 155 150 9300 185 20
//checkertrans 160 155 175 10

dtext 170 120 38 <serv.servname> Duello Sistemi

dtext 120 150 60 Bahis:
dtext 345 150 60 Gold
dtextentry 170 150 100 20 910 1 15000
checkbox 132 186 210 211 0 1
checkbox 132 210 210 211 0 2

dtext 130 230 48 Oyundan dustugunuzde/ciktiginizda
dtext 130 250 48 60 saniye icerisinde tekrar girmesseniz
dtext 130 270 48 duelloyu kaybedersiniz.
dtext 160 190 50 Loot var
dtext 280 310 50 Potion adet:
dtextentry 355 310 100 20 910 2 3
dtext 160 210 50 Silaha poison var


button 227 310 4023 4025 1 0 1

[dialog d_cpvp_duello button]
onbutton 1
if !(<isnum <argtxt[1]>>)
src.sysmessage @38,1,1 Sadece rakam kullanabilirsiniz
return 1
elseif (<eval <argtxt[1]>> > 1000000)
src.sysmessage @38,1,1 1m den daha buyuk bir meblada duello gerceklestiremezsiniz.
return 1
elseif (<eval <argtxt[1]>> < 15000)
src.sysmessage @38,1,1 15k dan daha dusuk bir meblada duello gerceklestiremezsiniz.
return 1
elseif (<eval <argtxt[2]>> > 10)
src.sysmessage @,,1 10 adet pottan daha fazla pot ile duello gerceklestiremezsiniz.
return 1
else



serv.newitem i_duellocu
src.new.link <uid>
src.new.tag.duellocu <ctag.duel_opponent>
src.new.tag.bahis <argtxt[1]>
src.new.tag.loot <argchk[1]>
src.new.tag.poison <argchk[2]>
src.new.tag.pot_quantity <argtxt[2]>
src.new.timer 45
src.new.equip
timerf 45,src.closealldialogs

endif


[dialog d_cpvp_duello_teklif]
0,0
resizepic 100 100 2620 300 270
checkertrans 105 105 290 260
dtext 170 120 38 <serv.servname> Duello Sistemi

dtext 120 150 60 <cont.name> Duello teklifinde bulundu.

dtext 130 180 38 Bahis : <eval <tag.bahis>> Gold
dtext 130 200 38 Loot : <qval (<tag0.loot>) ? var:yok>
dtext 130 224 38 Silaha poison <qval (<tag0.poison>) ? var:yok>
dtext 130 240 48 Oyundan dustugunuzde/ciktiginizda
dtext 130 260 48 Yenilmis sayilirsiniz ve
dtext 130 280 48 <eval <tag.bahis>> Gold Kaybedersiniz.
dtext 130 300 48  Potion miktari : <eval <tag.pot_quantity>>

button 123 320 4023 4025 1 0 1
dtext 156 320 38 Kabul Ediyorum

[dialog d_cpvp_duello_teklif button]
on=0
cont.sysmessage @1976,1,1,1 <src.name> teklifi kabul etmedi..
cont.findid.i_duellocu.remove
//move

on=1


if (<src.findtype.t_potion>) || (<src.findid.i_bandage>)
src.sysmessage @,,1 Yaninizdaki potion ve bandaji lutfen birakiniz.
cont.sysmessage @,,1 Rakibinizin cantasinda potion ya da bandaj bulunmakta...
remove
return 1
endif

if (<cont.findtype.t_potion>) || (<cont.findid.i_bandage>)
cont.sysmessage @,,1 Yaninizdaki potion ve bandaji lutfen birakiniz.
src.sysmessage @,,1 Rakibinizin cantasinda pot ya da bandaj bulunmakta...
remove
return 1
endif



if (<src.findlayer.25>) || (<cont.findlayer.25>)
src.sysmessage @1953,1,1,1 Senin yada onun altinda binek var..
cont.sysmessage @1953,1,1,1 Senin yada onun altinda binek var..
remove
return 1
endif

local.uid1 <src.uid>
local.uid2 <cont.uid>
forchars 25
if (<memoryfindtype.memory_ipet>)
if (<memoryfindtype.memory_ipet.link>==<local.uid1>) || (<memoryfindtype.memory_ipet.link>==<local.uid2>)
try uid.<local.uid1>.sysmessage @1953,1,1,1 Sizin veya rakibinizin binekleri etrafta oldugu surece duello baslamayacaktir.
try uid.<local.uid2>.sysmessage @1953,1,1,1 Sizin veya rakibinizin binekleri etrafta oldugu surece duello baslamayacaktir.
remove
return 1
endif
endif
endfor
local.uid1
local.uid2

timer -1


if (<eval <tag.bahis>> == 0)
else
if (<src.BANKBALANCE> >= <eval <tag.bahis>>) && (<cont.BANKBALANCE> >= <eval <tag.bahis>>)
src.gold -= <eval <tag.bahis>>
cont.gold -= <eval <tag.bahis>>
else
src.sysmessage @1976,1,1,1 <cont.name> veya sizde <eval <tag.bahis>> gold yok..
cont.sysmessage @1976,1,1,1 <src.name> veya sizde <eval <tag.bahis>> gold yok..
remove
return 1
endif
endif

if <eval <cont.ctag.duel_area>> == 1
if !<eval <var.duel_1>>
var.duel_1 1
else
src.sysmessage @,,1 Duello alani dolu.
cont.sysmessage @,,1 Duello alani dolu.
remove
return 1
endif
endif

if <eval <cont.ctag.duel_area>> == 2
if !<eval <var.duel_2>>
var.duel_2 1
else
src.sysmessage @,,1 Duello alani dolu.
cont.sysmessage @,,1 Duello alani dolu.
remove
return 1
endif
endif

if <eval <cont.ctag.duel_area>> == 3
if !<eval <var.duel_3>>
var.duel_3 1
else
src.sysmessage @,,1 Duello alani dolu.
cont.sysmessage @,,1 Duello alani dolu.
remove
return 1
endif
endif

if <eval <cont.ctag.duel_area>> == 4
if !<eval <var.duel_4>>
var.duel_4 1
else
src.sysmessage @,,1 Duello alani dolu.
cont.sysmessage @,,1 Duello alani dolu.
remove
return 1
endif
endif


if <eval <cont.ctag.duel_area>> == 5
if !<eval <var.duel_5>>
var.duel_5 1
else
src.sysmessage @,,1 Duello alani dolu.
cont.sysmessage @,,1 Duello alani dolu.
remove
return 1
endif
endif

//src.tag.events -e_safe2


if <eval <cont.ctag.duel_area>> == 1
src.go 859,642,-40,2 //<link.tag.koordinat4>
cont.go 880,642,-40,2//<link.tag.koordinat5>
src.ctag.duel_area = 1
src.tag0.duelloda = 1 //XXX
cont.tag0.duelloda = 1 //XXX
endif

if <eval <cont.ctag.duel_area>> == 2
src.go 737,1247,30,4 //<link.tag.koordinat4>
cont.go 737,1264,30,4//<link.tag.koordinat5>
src.ctag.duel_area = 2
src.tag0.duelloda = 1 //XXX
cont.tag0.duelloda = 1 //XXX
endif

if <eval <cont.ctag.duel_area>> == 3
src.go 981,519,-50,3 //<link.tag.koordinat4>
cont.go 998,519,-50,3//<link.tag.koordinat5>
src.ctag.duel_area = 3
src.tag0.duelloda = 1 //XXX
cont.tag0.duelloda = 1 //XXX
endif

if <eval <cont.ctag.duel_area>> == 4
src.go 859,642,-40,2 //<link.tag.koordinat4>
cont.go 880,642,-40,2//<link.tag.koordinat5>
src.ctag.duel_area = 4
src.tag0.duelloda = 1 //XXX
cont.tag0.duelloda = 1 //XXX
endif


if <eval <cont.ctag.duel_area>> == 5
src.go 859,642,-40,2 //<link.tag.koordinat4>
cont.go 880,642,-40,2//<link.tag.koordinat5>
src.ctag.duel_area = 5
src.tag0.duelloda = 1 //XXX
cont.tag0.duelloda = 1 //XXX
endif


src.events +e_cpvp_duello
src.findlayer(1).cont=<src.findlayer.layer_pack.uid>
src.Kafesle_duel
src.food 15
trysrc <src.uid> hazir_pot_duel <eval <tag.pot_quantity>>
//src.tag.cpvp_duello_rakip.events -e_safe2
src.tag.cpvp_duello_rakip <cont.uid>
src.tag.cpvp_duello_karma <src.karma>
src.tag.cpvp_duello_kills <src.kills>
src.tag.cpvp_duello_fame <src.fame>
cont.events +e_cpvp_duello
cont.findlayer(1).cont=<cont.findlayer.layer_pack.uid>
cont.food 15
cont.Kafesle_duel
trysrc <cont.uid> hazir_pot_duel <eval <tag.pot_quantity>>
//cont.events -e_safe2
//cont.tag.cpvp_duello_rakip.events -e_safe2
cont.tag.cpvp_duello_rakip <src.uid>
cont.tag.cpvp_duello_karma <cont.karma>
cont.tag.cpvp_duello_kills <cont.kills>
cont.tag.cpvp_duello_fame <cont.fame>
//link.tag.pvpdeyim 1
//serv.newitem i_cpvp_duello_gerisayim
//new.timer 1
//new.morex 5
//new.cont <link.uid>
//link.go <link.tag.koordinat2>
link.tag.player1 <src.uid>
link.tag.player2 <cont.uid>

//-----------------------------------------------------------------------------------------
// Functions

[function hakemkoordinat]
try uid.<var.hakemuid>.tag.koordinat<args> <src.targp>
src.sysmessage @1953,1,1,1 Yeni koordinat ayarlandi : <src.targp>

[function cpvp_duello_loot]
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


//-----------------------------------------------------------------------------------------
// Items
[itemdef i_duel_berabere]
id i_memory
type t_eq_script
name duel berabere


on=@timer
cont.ctag.duello_beraber 1
//cont.f_cpvp_duello_death
cont.kill 1
remove
return 1



[itemdef i_duellocu]
id i_memory
type t_eq_script
name duellocu

on=@equip
ref1 = <tag.duellocu>
//cont.sysmessage @,,1 <ref1.name>
trysrc <ref1> sdialog d_cpvp_duello_teklif
cont.sysmessage @1976,1,1,1 Teklif yapildi. Lutfen bekleyiniz.
timer 60*12

on=@timer
remove
return 1

on=@targon_char
if !(<src.targ.isplayer>)
src.sysmessage @1952,1,1,1 Sadece playerlarla duello yapabilirsiniz
return 1
elif (<src.targ.isevent.e_cpvp_duello>)
src.sysmessage @1952,1,1,1 <src.targ.name> zaten duello yapiyor.
return 1
elif (<src.isevent.e_cpvp_duello>)
src.sysmessage @1952,1,1,1 Zaten pvp yapiyorsunuz
return 1
elif (<src.uid>==<src.targ.uid>)
src.sysmessage @1952,1,1,1 Kendinizle duello yapamazsiniz
return 1
endif
trysrc <src.targ.uid> sdialog d_cpvp_duello_teklif
src.sysmessage @1976,1,1,1 Teklif yapildi. Lutfen bekleyiniz.
timer 60*120
return 1

[itemdef i_cpvp_duello_gerisayim]
id i_memory
type t_eq_script
name gerisayim

on=@timer
if (<morex>==0)
cont.say Basarilar..
cont.go <cont.tag.koordinat3>
try uid.<cont.tag.player1>.events e_cpvp_duello
try uid.<cont.tag.player2>.events e_cpvp_duello
try uid.<cont.tag.player1>.events -e_cpvp_area
try uid.<cont.tag.player2>.events -e_cpvp_area
try uid.<cont.tag.player1>.findlayer(1).bounce
try uid.<cont.tag.player2>.findlayer(1).bounce
try uid.<cont.tag.player1>.findlayer(2).bounce
try uid.<cont.tag.player2>.findlayer(2).bounce
try uid.<cont.tag.player1>.findlayer(31).bounce
try uid.<cont.tag.player2>.findlayer(31).bounce
remove
else
timer 1
morex -=1
endif
return 1


[function duel_cantasil]
forcont <findlayer.21.uid> 10
if (<type>==<args>)
remove
endif
endfor


[events e_cpvp_duello]

on=@logout
src.stone 1
act <src.tag.cpvp_duello_rakip>
src.timerf 2,act.sysmessage @69,1,1 <src.name> oyundan dustu 60 saniye icerisinde oyuna girmesse otomatik kazanacaksiniz.
src.timerf 60,src.f_cpvp_duello_death

on=@login
src.TIMERF CLEAR
src.stone 0


//on=@itemtargon_char
//if (<findid.i_duellocu>)
//obj <findid.i_duellocu.uid>
//else
//obj <uid.<tag.cpvp_duello_rakip>.findid.i_duellocu.uid>
//endif


on=@spellcast
if (<argn>==45) || (<argn>==32) || (<argn>==52) || (<argn>==24) || (<argn>==57) || (<argn>==54) || (<argn>==50) || (<argn>==49) || (<argn>==45) || (<argn>==43) || (<argn>==40) || (<argn>==39) || (<argn>==28) || (<argn>==38) || (<argn>==44) || (<argn>==58)
src.sysmessage @1976,1,1,1 Duello'da bu buyuleri kullanamazsiniz..
f_fizzle
skill fail
return 1
endif

on=@itemdclick
if (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosionless)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

//if (<act.baseid> == i_egg_ostard_olgun)
//src.sysmessage @2028 Bu bolgede kullanilmaz..
//return 1
//endif

if (<act.baseid> == i_deed_animal)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.baseid> == i_pet_horse)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.baseid> == i_pet_horse_brown_dk)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.baseid> == i_runebook)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.type> == t_figurine)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <uid.<tag.cpvp_duello_rakip>.findid.i_duellocu.uid>
endif

obj
act


on=@ItemEquipTest
if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <uid.<tag.cpvp_duello_rakip>.findid.i_duellocu.uid>
endif

if (<eval <obj.tag.poison>>==0)
if <act.isevent.t_weapon_poisoned>
src.sysmessage @33,,1 Kurallara gore silahta poison yasak.
return 1
endif
endif
                   if (<eval <obj.tag.poison>>==0) && (strmatch(*t_weapon*,<act.type>)) && (<eval <act.morez>> >0) //?
                   src.sysmessage @021 Poisonlu silah kullanamazsiniz.
                   act.unequip
                   endif

On=@Death
src.stone 1
act.stone 1
src.tag0.duelloda //XXX
act.tag0.duelloda  //XXX
src.hits <src.str>
act.hits <act.str>
src.duel_cantasil t_potion
act.duel_cantasil t_potion
src.duel_cantasil t_reagent
act.duel_cantasil t_reagent
src.duel_cantasil t_bandage
act.duel_cantasil t_bandage
src.duel_cantasil t_container
act.duel_cantasil t_container
src.duel_cantasil t_weapon_bolt
act.duel_cantasil t_weapon_bolt
src.duel_cantasil t_weapon_arrow
act.duel_cantasil t_weapon_arrow

act <tag.cpvp_duello_rakip>
if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <act.findid.i_duellocu.uid>
endif
//obj.link.go <obj.link.tag.koordinat1>
//obj.link.tag.pvpdeyim
src.timerf 3,src.f_cpvp_duello_death
return 1


on=@Skillstart

if (<action> == (skill_hiding)) || (<action> == id(skill_hiding)) || (<action> == id(skill_stealth)) || (<action> == (skill_stealth))
src.sysmessage @,,1 Hide olamazsiniz..
skill fail
return 1
endif

[function f_cpvp_duello_death]








act <tag.cpvp_duello_rakip>
if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <act.findid.i_duellocu.uid>
endif







obj.link.go <obj.link.tag.koordinat1>
obj.link.tag.pvpdeyim
obj.link.tag.player1
obj.link.tag.player2
go 5333,1825 //<obj.link.tag.koordinat1>
criminal 0

if (<memoryfindtype.memory_sawcrime>)
memoryfindtype.memory_sawcrime.remove
endif
tag.cpvp_duello_fame <eval <tag.cpvp_duello_fame>>
tag.cpvp_duello_karma <eval <tag.cpvp_duello_karma>>
tag.cpvp_duello_kills <eval <tag.cpvp_duello_kills>>
tag.cpvp_duello_rakip
act.go 5333,1825//<obj.link.tag.koordinat1>
act.criminal 0

if (<act.memoryfindtype.memory_sawcrime>)
act.memoryfindtype.memory_sawcrime.remove
endif
act.tag.cpvp_duello_fame <eval <act.tag.cpvp_duello_fame>>
act.tag.cpvp_duello_karma <eval <act.tag.cpvp_duello_karma>>
act.tag.cpvp_duello_kills <eval <act.tag.cpvp_duello_kills>>
act.tag.cpvp_duello_rakip

if !<ctag.duello_beraber>
src.message @33,,1 Duelloyu kaybettiniz...
endif
//src.events +e_safe2
src.findid.i_bleeding.remove
src.findid.i_bleeding2.remove
src.findid.i_rune_poison.remove
src.findid.i_memory_poison_new.remove
src.update
src.f_fizzle
src.hits 100
if !<ctag.duello_beraber>
act.message @69,,1 Tebrikler..Duelloyu kazandiniz!
endif
//act.events +e_safe2
src.findid.i_bleeding.remove
src.findid.i_bleeding2.remove
act.findid.i_memory_poison_new.remove
act.findid.i_rune_poison.remove
act.hits 100
act.update
act.f_fizzle
src.stone 0
act.stone 0

//if !(strmatch('<src.account.lastip>','<act.account.lastip>')) //Multi Test
act.duello5
//endif

//if (strmatch('<src.account.lastip>','<act.account.lastip>'))
//act.sysmessage Multi karakterle puan kazanamassiniz.
//src.sysmessage Multi karakterle puan kazanamassiniz.
//endif

obj.remove

hits <str>


if !<ctag.duello_beraber>
if (<eval <obj.tag.bahis>> >0)
//trysrc <act> paraver <eval <obj.tag.bahis>*2>
act.gold += <eval <obj.tag.bahis>*2>
act.sysmessage @1976,1,1,1 <eval <obj.tag.bahis>*2> gold bankaniza aktarildi.
endif
if (<eval <obj.tag.loot>>==1)
findlayer.1.cont <findlayer.21>
findlayer.2.cont <findlayer.21>
findlayer.3.cont <findlayer.21>
findlayer.4.cont <findlayer.21>
findlayer.5.cont <findlayer.21>
findlayer.6.cont <findlayer.21>
findlayer.7.cont <findlayer.21>
findlayer.8.cont <findlayer.21>
findlayer.10.cont <findlayer.21>
findlayer.12.cont <findlayer.21>
findlayer.13.cont <findlayer.21>
findlayer.17.cont <findlayer.21>
findlayer.18.cont <findlayer.21>
findlayer.19.cont <findlayer.21>
findlayer.20.cont <findlayer.21>
findlayer.22.cont <findlayer.21>
findlayer.23.cont <findlayer.21>
findlayer.24.cont <findlayer.21>
findlayer.31.cont <findlayer.21>
trysrc <act> cpvp_duello_loot <findlayer.21>
act.sysmessage @0790,,1 Rakibinizin Loot'u Bag icinde Bankaniza Aktarilmistir.
endif
endif

//if (strmatch(*pvp*,<act.region.name>))
//act.events +e_cpvp_area
//endif
act.events -e_cpvp_duello
//if (strmatch(*pvp*,<region.name>))
//events +e_cpvp_area
//endif
events -e_cpvp_duello


if (<eval <src.ctag.duel_area>> == 1 )
var.duel_1 = 0
elseif <eval <src.ctag.duel_area>> == 2
var.duel_2 = 0
elseif <eval <src.ctag.duel_area>> == 3
var.duel_3 = 0
elseif <eval <src.ctag.duel_area>> == 4
var.duel_4 = 0
elseif <eval <src.ctag.duel_area>> == 5
var.duel_5 = 0
endif
//return 1

if <ctag.duello_beraber>
src.gold += <eval <obj.tag.bahis>>
act.gold += <eval <obj.tag.bahis>*2>
act.sys_error Ucretiniz bankaniza geri iade edilmistir.
src.sys_error Ucretiniz bankaniza geri iade edilmistir.
src.ctag.duello_beraber
act.ctag.duello_beraber
endif

if !<ctag.duello_beraber>
serv.allclients sysmessage @38,,1 Duello Duyuru :
serv.allclients sysmessage @0790,,1 "<src.name>" ile "<act.name>" arasındaki duelloyu "<act.name>" kazanmıştır.
var.sonduelkazanan=<serv.rtime> - "<src.name>" ile "<act.name>" arasındaki duelloyu "<act.name>" kazanmıştır.
endif
obj
act

[events e_cpvp_area]
on=@attack
skill fail
action -1
return 1

on=@itemdclick
if (<act.baseid> == i_shrink_deed) || (<act.baseid> == i_pet_horse) || (<act.baseid> == i_pet_horse_brown_dk) || (<act.type> == t_figurine) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosionless) || (<act.baseid> == i_runebook) // || (<act.baseid> == i_egg_ostard_olgun)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

on=@hit
return 1
on=@gethit
return 1
on=@spellcast
if !(<src.uid>==<act.uid>)
f_fizzle
return 1
endif
on=@skillgain
return 1


[events e_cpvp_area_delucia]
on=@attack
skill fail
action -1
return 1

on=@itemdclick
if (<act.baseid> == i_shrink_deed) || (<act.baseid> == i_pet_horse) || (<act.baseid> == i_pet_horse_brown_dk) || (<act.type> == t_figurine) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosionless) || (<act.baseid> == i_runebook) // || (<act.baseid> == i_egg_ostard_olgun)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

on=@hit
return 1
on=@gethit
return 1
on=@spellcast
if !(<src.uid>==<act.uid>)
f_fizzle
return 1
endif
on=@skillgain
return 1


[events e_duellogiris]

on=@hit
If !(<act.uid> == <src.uid>)
src.sysmessage @38,,1 Bu alanda sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
return 1
endif

On=@SpellCast
if ((<argn> == 28) || (<argn> == 24) || (<argn> == 32) || (<argn> == 33) || (<argn> == 39) || (<argn> == 40) || (<argn> == 45) || (<argn> == 46) || (<argn> == 47) || (<argn> == 49) || (<argn> == 50) || (<argn> >= 55) || (<argn> >= 44))
src.sysmessage @38,,1 Sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
f_fizzle
return 1
endif
If !(<act.uid> == <src.uid>)
src.sysmessage @38,,1 Sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
return 1
endif

On=@SkillStart
if (<action> == id(skill_hiding)) || (<action> == skill_hiding) || (<action> == id(skill_stealth)) || (<action> == skill_stealth)
src.sysmessage @07a1 Burada bunu yapamazsiniz.
skill fail
return 1
endif
mana <int>
If !(<act.uid> == <src.uid>)
src.sysmessage @38,,1 Bu alanda sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
return 1
endif

on=@itemdclick
if (<act.baseid> == i_shrink_deed) || (<act.baseid> == i_pet_horse) || (<act.baseid> == i_pet_horse_brown_dk) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosionless) || (<act.baseid> == i_runebook) || (<act.type> == t_figurine)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif





[function paraver]
serv.newitem i_gold
new.amount <eval <obj.tag.bahis>*2>
new.bounce

[Function Kafesle_duel]
//timerf 0,stam 0 // stam sifirlaki yürümesinler.
//src.newitem i_duel_berabere
//src.new.timer <eval 60*10>
//src.new.equip
//src.criminal
//ctag.duello_beraber 1
//src.ctag.duello_beraber 1
//sysmessage @69,,1 Staminiz duello basladiginda fullenecektir.
timerf 9,stam <dex>
timerf 2,hits <str>
timerf 2,mana <int> // stam basabilirsin duello basladi.
// sincerly duello
timerf 0,say 10 saniye sonra basliyor...
timerf 1,sysmessage 9
timerf 2,sysmessage 8
timerf 3,sysmessage 7
timerf 4,sysmessage 6
timerf 5,sysmessage 5
timerf 6,sysmessage 4
timerf 7,sysmessage 3
timerf 8,sysmessage 2
timerf 9,sysmessage 1
timerf 10,say  Basla


SERV.NEWITEM=065
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=066
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,-1
NEW.ATTR=00002
NEW.TIMER=10



[Itemdef i_Kafes_timer]
Name Osman
Id i_handr_1
type t_eq_script

ON=@Create
ATTR attr_decay
MORE1=9
COLOR=0480

ON=@Equip
TIMER=1

ON=@Timer
if ( <cont> )
if ( <more1> )
cont.sysmessage (<more1>)>
more1=<more1>-1
TIMER=1
return 1
endif
endif
Remove
RETURN 1

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

SERV.NEWITEM=065
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=066
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,-1
NEW.ATTR=00002
NEW.TIMER=10
[eof]



Yazar
Skill Title: Expert
Toplam Mesaj: 289
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 60
Mesaj #100943   20-02-2021 18:20 GMT    
     
Dostm Sistem başştan sona sıkıntılı biraz sabredersen sana sorunsuz bir sekilde halletcem


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

Yazar
Skill Title: Novice
Toplam Mesaj: 35
Oyun Tarzı: Rp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 13
Beğeni: 0
Mesaj #100944   20-02-2021 18:44 GMT    
     
tamam hocam teşekkürler



Yazar
Skill Title: Expert
Toplam Mesaj: 289
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 60
Mesaj #100954   20-02-2021 23:11 GMT    
     
Dostm Bu sistem bir yerden tanıdık geliyor bana ama
şimdi senin bana attgin sistem baştan aşşagı hatali çalışma mantıgı yanliş ama ben yine onu bozmada çalişir hale getirdim Senin bana attigin scp yi sil bunu direk yapistir..
1. arena 1 2 3 4 yapmana gerek yok artik istegin yere duello vendorunu cikar kordinatlaari belirle sorunsuz çalişir
2. poi ve loot sistemin zaten çalismiyordu yeniden düzenledim eger poi yasak ise poili silahi dulledo eline almaya calişşinca Silahtaki poiyi siler
3. dullo listesi vardi orada onuda kazanan kişiyi ekledim kazana dullo puani aliyor.
dostm sistemi sıfırdan yazsam bukadar yorulmazdim ama olsn pratik pratiktirr


Script Kodu:
[function hazir_pot_duel]
newitem i_bag
ref1 = <new.uid>
new.bounce

newitem i_potion_healgreat
new.amount <argn>
new.cont <ref1>


newitem i_potion_curegreat
new.amount <argn>
new.cont <ref1>

newitem i_potion_poisondeadly
new.amount <argn>
new.cont <ref1>


//newitem i_potion_bleed
//new.amount <argn>
//new.cont <ref1>


newitem i_potion_refreshtotal
new.amount <argn>
new.cont <ref1>


newitem i_potion_agilitygreat
new.amount <argn>
new.cont <ref1>


newitem i_bandage
new.amount 5
new.cont <ref1>

//newitem i_cloth_oil
//new.cont <ref1>

newitem i_arrow
new.amount 25
new.bounce

newitem i_xbolt
new.amount 25
new.bounce

//newitem loot_reg_30
//new.bounce

[Plevel 1]
duel

[function duel]
src.sysmessage Duello yapmak istediğiniz kişiyi seçiniz.
targetf f_duel_x

[function f_duel_x]
if (<argo.uid>==<src.uid>)
src.sysmessage Kendinizi seçemezsiniz.
return 1
endif
if <argo.tag0.duelloda> //XXX
src.sysmessage @,,1 Şuanda bu kişi duelloda.
return 1
else
src.ctag.duel_opponent = <argo.uid>
src.dialog d_duel_alan
if <src.findid.i_duellocu>
src.findid.i_duellocu.remove
endif
endif


[dialog d_duel_alan]
50,50


resizepic 50 0 2620 400 200
checkertrans 55 5 390 190


text 105 50 0250 0


if <eval <var.duel_1>> == 1
text 105 80 38 1
else
button 85 83 1209 1210 1 0 1
text 105 80 800 1
endif


if <eval <var.duel_2>> == 1
text 105 100 38 2
else
button 85 103 1209 1210 1 0 2
text 105 100 800 2
endif

if <eval <var.duel_3>> == 1
text 105 120 38 3
else
button 85 123 1209 1210 1 0 3
text 105 120 800 3
endif

//button 85 143 1209 1210 1 0 4
//text 105 140 800 4


//button 85 163 1209 1210 1 0 5
//text 105 160 800 5


//button 195 194 3 4 1 0 0
//text 215 190 800 6

[dialog d_duel_alan text]
Kirmizi alanlar suanda dolu olan alanlardir.
Duello Alan 1 ( Gargoyle City )
Duello Alan 2 ( Zento )
Duello Alan 3 ( Luna )
//Duello Alan 4
//Duello Alan 5
//Kapat

[dialog d_duel_alan button]

On=1
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 1
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif

On=2
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 2
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif
On=3
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 3
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif
On=4
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 4
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif

On=5
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 5
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif










[itemdef i_skor_duello]
id i_bulletin_board
name Skorlar
type t_eq_script

on=@create
attr=attr_static|attr_move_never

on=@dclick
src.duellist
src.duelgalib
return 1


[function duellist]
dialog d_duellist

[defname duelloplayer]
duelloplayer 5

[function duello5]
tag0.duelkazan +=1
for 1 <ddef.duelloplayer>
        var.remove <ddef.duelloplayer>
        for y 1 <ddef.duelloplayer>
                ref1=<var.duelloplayer_<dlocal.y>>
                if (<ref1> = <uid>)
                        var.remove <dlocal.y>
                endif
        endfor
        ref2=<var.duelloplayer_<dlocal._for>>
        if (<dtag.duelkazan> >= <ref2.dtag.duelkazan>)
                var.duelloplayer_<dvar.remove>
                for x <dvar.remove> <dlocal._for>
                        var.duelloplayer_<dlocal.x> <var.duelloplayer_<eval <dlocal.x> -1>>
                endfor
                var.duelloplayer_<dlocal._for> <uid>
                var.remove
                return 1
        endif
endfor

[function duelyazdir]
serv.deletefile C:\AppServ\www\Web\dueldiz.php
serv.writefile C:\AppServ\www\Web\dueldiz.php
for c 1 5
obj = <var.duelloplayer_<dlocal.c>>
IF (<FILE.OPEN C:\AppServ\www\Web\dueldiz.php>)
file.writeline <var.ebe>body text=#FFFFFF background-color:transparent<var.ebesi>
file.writeline <var.ebe>font size=2<var.ebesi><obj.name><var.ebe>/font<var.ebesi>  //<var.ebe>font face=Argos size=2<var.ebesi><obj.name> <var.ebe>/font<var.ebesi><var.ebe>font size=2<var.ebesi><var.ebe>font face=Argos <var.ebesi>:<var.ebe>/font<var.ebesi><var.ebe>font face=Argos color=#000000 <var.ebesi>:<var.ebe>/font<var.ebesi> <var.ebe>font face=Argos <var.ebesi><eval <obj.tag.pan>><var.ebe>/font<var.ebesi> //<var.ebe>font face=Argos color=#FF0000 <var.ebesi>Kills:<var.ebe>/font<var.ebesi> <var.ebe>font face=Argos <var.ebesi><obj.kills><var.ebe>/font<var.ebesi>
file.writeline <var.ebe>body text=#FFFFFF background=aaaa.png<var.ebesi>
file.writeline <var.ebe>/font<var.ebesi>
file.writeline <var.ebe>p<var.ebesi>
file.close
endif
endfor

[function duelpuanreset]
for c 1 1000
obj = <var.duelloplayer_<dlocal.c>>
obj.tag.duelkazan
endfor



[function f_duel_tablo_list]
for c 1 5
obj = <var.duelloplayer_<dlocal.c>>
if !<isempty <var.duelloplayer_<dlocal.c>>>
    var.duel_list_name_<dlocal.c> <obj.name>
  var.duel_list_puan_<dlocal.c> <dobj.tag.duelkazan>
endif
endfor

[function f_get_duel]
serv.f_duel_tablo_list
if <argn1> == 1
return <var.duel_list_name_1>
elif <argn1> == 11
return <eval <var.duel_list_puan_1>>
elif <argn1> == 2
return <var.duel_list_name_2>
elif <argn1> == 22
return <eval <var.duel_list_puan_2>>
elif <argn1> == 3
return <var.duel_list_name_3>
elif <argn1> == 33
return <eval <var.duel_list_puan_3>>
elif <argn1> == 4
return <var.duel_list_name_4>
elif <argn1> == 44
return <eval <var.duel_list_puan_4>>
elif <argn1> == 5
return <var.duel_list_name_5>
elif <argn1> == 55
return <eval <var.duel_list_puan_5>>
endif


[plevel 1]
duellist

[dialog d_duellist]
120,260
//resizepic 39 0 60000 525 205//ARka Fon
//resizepic 50 12 83 501 180

resizepic 50 0 2620 495 260
checkertrans 55 5 485 250


page 0
   dtext 270 30 38 Duello Top 5
   dtext 75 80 38 1.                     
   dtext 75 110 38 2.                       
   dtext 75 140 38 3.
   dtext 75 170 38 4.                         
   dtext 75 200 38 5.
   dtext 450 80 38 Puan:                       
   dtext 450 110 38 Puan:                         
   dtext 450 140 38 Puan:
   dtext 450 170 38 Puan:
   dtext 450 200 38 Puan:       
for c 1 5
obj = <var.duelloplayer_<dlocal.c>>
   dtext 106 <hval (<local.c>*30)+50> 50 <obj.name>
   dtext 493 <hval (<local.c>*30)+50> 50 <dobj.tag.duelkazan>
endfor

[dialog d_duellist button]
on=0

[plevel 1]
duelgalib

[function duelgalib]
src.sysmessage Suana kadar <eval <tag0.duelkazan>> kere duello'da galip geldiniz.


[chardef c_cpvp_duello]
name Duello Hakemi
id c_man
can mt_equip|mt_nonmover

On=@Create
str 9500
dex 1000
int 1000
magery 100
invul 1
speechcolor 1953
food 990
color 083ea
taming 32000
tag0.duellotas=<uid>

ITEMNEWBIE=i_PLATEMAIL_ARMS
ITEMNEWBIE=i_PLATEMAIL_leggings
ITEMNEWBIE=i_PLATEMAIL_chest
ITEMNEWBIE=i_PLATEMAIL_GORGET
ITEMNEWBIE=i_PLATEMAIL_gloves
ITEMNEWBIE=i_helm_closed
ITEMNEWBIE=i_staff_black

on=@gethit
return 1
on=@spelleffect
return 1
on=@death
hits 100
return 1
on=@attack
skill fail
action -1
return 1

on=@hit
return 1

on=@click
messageua 0481,6,6,enu [<name>]
messageua 0481,6,6,enu Duello Master
return 1

on=@dclick
if (<src.findid.i_duellocu>)
src.findid.i_duellocu.remove
endif
if (<src.account.plevel>==7) || (<src.isgm>)
sdialog d_cpvp_duello_ayar
elif (<src.account.plevel>==1) || (<src.account.plevel>==7)
if (<distance> >3)
src.sysmessage @1953,1,1,1 Yetisemiyorsunuz...
return 1
endif
endif

if (<tag0.dolu>==1)
src.sysmessage @07a1,,1 Suanda <uid.<tag.player1>.name> ve <uid.<tag.player2>.name> Duello Yapıyor.
return 1
endif


sdialog d_cpvp_duello

return 1

[dialog d_cpvp_duello_ayar]
0,0
resizepic 100 100 5120 300 200
resizepic 110 110 9350 280 180
dhtmlgump 170 120 300 20 0 0 <serv.servname> Duello Sistemi

button 120 150 210 211 1 0 1
button 120 175 210 211 1 0 2
button 120 200 210 211 1 0 3
button 120 225 210 211 1 0 4
button 120 250 210 211 1 0 5
dhtmlgump 142 150 400 20 0 0 1.Player Çıkış Kordinatı: <tag0.koordinat1>
dhtmlgump 142 175 400 20 0 0 2.Player Çıkış Kordinatı: <tag0.koordinat2>
dhtmlgump 142 200 400 20 0 0 Pvp Hakem: <tag0.koordinat3>
dhtmlgump 142 225 400 20 0 0 1.Player: <tag0.koordinat4>
dhtmlgump 142 250 400 20 0 0 2.Player: <tag0.koordinat5>

[dialog d_cpvp_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
src.ctag0.duellotasuids <uid>
targetfg koordinat 5



[function koordinat]
try uid.<src.ctag0.duellotasuids>.tag.koordinat<args> <src.targp>
src.sysmessage @07a1,,1 Yeni koordinat ayarlandi : <src.targp>

[dialog d_cpvp_duello]
0,0
//resizepic 100 100 9300 300 270
//resizepic 110 110 9300 280 250
resizepic 100 100 2620 300 270
checkertrans 105 105 290 260
//gumppictiled 110 110 280 250 2624

resizepic 155 150 9300 185 20
//checkertrans 160 155 175 10

dtext 170 120 38 <serv.servname> Duello Sistemi

dtext 120 150 60 Bahis:
dtext 345 150 60 Gold
dtextentry 170 150 100 20 910 1 15000
checkbox 132 186 210 211 0 1
checkbox 132 210 210 211 0 2

dtext 130 230 48 Oyundan dustugunuzde/ciktiginizda
dtext 130 250 48 60 saniye icerisinde tekrar girmesseniz
dtext 130 270 48 duelloyu kaybedersiniz.
dtext 160 190 50 Loot var
dtext 280 310 50 Potion adet:
dtextentry 355 310 100 20 910 2 3
dtext 160 210 50 Silaha poison var


button 227 310 4023 4025 1 0 1

[dialog d_cpvp_duello button]
onbutton 1
if !(<isnum <argtxt[1]>>)
src.sysmessage @38,1,1 Sadece rakam kullanabilirsiniz
return 1
elseif (<eval <argtxt[1]>> > 1000000)
src.sysmessage @38,1,1 1m den daha buyuk bir meblada duello gerceklestiremezsiniz.
return 1
elseif (<eval <argtxt[1]>> < 15000)
src.sysmessage @38,1,1 15k dan daha dusuk bir meblada duello gerceklestiremezsiniz.
return 1
elseif (<eval <argtxt[2]>> > 10)
src.sysmessage @,,1 10 adet pottan daha fazla pot ile duello gerceklestiremezsiniz.
return 1
else

Src.tag0.bahis=<argtxt[1]>
src.tag.duellotas <uid>
src.targetf f_teklifim
if (<argchk[1]> < 1)
src.tag0.loot=
else
src.tag0.loot=1
endif
if (<argchk[2]> < 1)
src.tag0.poison=
else
src.tag0.poison=1
endif



[dialog d_cpvp_duello_teklif]
0,0
resizepic 100 100 2620 300 270
checkertrans 105 105 290 260
dtext 170 120 38 <serv.servname> Duello Sistemi

dtext 120 150 60 <uid.<src.tag0.duellorakip>.name> Duello teklifinde bulundu.

dtext 130 180 38 Bahis : <eval <tag0.bahis>> Gold
dtext 130 240 48 Oyundan dustugunuzde/ciktiginizda
dtext 130 260 48 Yenilmis sayilirsiniz ve
dtext 130 280 48 <eval <src.tag0.bahis>> Gold Kaybedersiniz.
dtext 130 300 48  Potion miktari : <eval <tag.pot_quantity>>

button 123 320 4023 4025 1 0 1
dtext 156 320 38 Kabul Ediyorum

if (<src.dtag0.poison>==1)
dtext 130 224 68 Silaha Poi Serbest
else
dtext 130 224 38 Silaha Poison Yok
endif

if (<src.dtag0.loot>==1)
dtext 130 200 68 Loot Serbest
else
dtext 130 200 38 Loot Yok
endif


[dialog d_cpvp_duello_teklif button]
on=0
REF1=<uid.<src.dtag0.duellorakip>>
ref1.sysmessage @07a1,1,1 <src.name> Teklifinizi Kabul etmedi.

on=1
REF1=<uid.<src.dtag0.duellorakip>>
if (<src.findtype.t_potion>) || (<src.findid.i_bandage>)
src.sysmessage @,,1 Yaninizdaki potion ve bandaji lutfen birakiniz.
return 1
endif

if (<ref1.findtype.t_potion>) || (<ref1.findid.i_bandage>)
src.sysmessage @,,1 Rakibinizin Yaninizdaki potion ve bandaji lutfen birakiniz.
return 1
endif


if (<src.findlayer.25>)
src.sysmessage @1953,1,1,1 Altınızda binek varken Olmaz..
return 1
endif

if (<REF1.findlayer.25>)
src.sysmessage @1953,1,1,1 Rakibinizin Altında Binek varken Olmaz..
return 1
endif


local.uid1 <src.uid>
local.uid2 <REF1.uid>
forchars 25
if (<memoryfindtype.memory_ipet>)
if (<memoryfindtype.memory_ipet.link>==<local.uid1>) || (<memoryfindtype.memory_ipet.link>==<local.uid2>)
try uid.<local.uid1>.sysmessage @1953,1,1,1 Sizin veya rakibinizin binekleri etrafta oldugu surece duello baslamayacaktir.
try uid.<local.uid2>.sysmessage @1953,1,1,1 Sizin veya rakibinizin binekleri etrafta oldugu surece duello baslamayacaktir.
remove
return 1
endif
endif
endfor
local.uid1
local.uid2





if (<REF1.BANKBALANCE> < <eval <tag.bahis>>)
src.sysmessage @07a1,1,1  <Ref1.name> Adlı Rakibinizin Bankasında <eval <tag.bahis>> gold yok..
return 1
endif

if (<src.BANKBALANCE> < <eval <tag.bahis>>)
src.sysmessage @07a1,1,1  Bankanizda <eval <tag.bahis>> gold yok..
return 1
endif


obj = <src.tag0.duellorakip>
try uid.<src.tag0.duellotas>.tag.player1 <obj>
try uid.<src.tag0.duellotas>.tag.player2 <src.uid>
trysrc <obj> p <uid.<src.tag0.duellotas>.tag0.koordinat4>
src.p <uid.<src.tag0.duellotas>.tag0.koordinat5>
try uid.<src.tag0.duellotas>.Tag0.dolu=1
src.gold -=<eval <obj.dtag0.bahis>>
obj.gold -=<eval <obj.dtag0.bahis>>



src.events +e_cpvp_duello
src.findlayer(1).cont=<src.findlayer.layer_pack.uid>
src.Kafesle_duel
src.food 15
trysrc <src.uid> hazir_pot_duel <eval <tag.pot_quantity>>
src.tag.cpvp_duello_rakip <ref1.uid>
src.tag.cpvp_duello_karma <src.karma>
src.tag.cpvp_duello_kills <src.kills>
src.tag.cpvp_duello_fame <src.fame>
ref1.events +e_cpvp_duello
ref1.findlayer(1).cont=<ref1.findlayer.layer_pack.uid>
ref1.food 15
ref1.Kafesle_duel
trysrc <ref1.uid> hazir_pot_duel <eval <tag.pot_quantity>>
ref1.tag.cpvp_duello_rakip <src.uid>
ref1.tag.cpvp_duello_karma <ref1.karma>
ref1.tag.cpvp_duello_kills <ref1.kills>
ref1.tag.cpvp_duello_fame <ref1.fame>
serv.newnpc c_cpvp_duello
new.p <uid.<src.tag0.duellotas>.tag0.koordinat3>
new.gerisay
new.update


obj.update
src.update

//-----------------------------------------------------------------------------------------
// Functions

[function hakemkoordinat]
try uid.<var.hakemuid>.tag.koordinat<args> <src.targp>
src.sysmessage @1953,1,1,1 Yeni koordinat ayarlandi : <src.targp>

[function cpvp_duello_loot]
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


//-----------------------------------------------------------------------------------------
// Items
[itemdef i_duel_berabere]
id i_memory
type t_eq_script
name duel berabere


on=@timer
cont.ctag.duello_beraber 1
//cont.f_cpvp_duello_death
cont.kill 1
remove
return 1



[itemdef i_duellocu]
id i_memory
type t_eq_script
name duellocu

on=@equip
ref1 = <tag.duellocu>
//cont.sysmessage @,,1 <ref1.name>
//trysrc <ref1> f_dialog d_cpvp_duello_teklif
cont.sysmessage @1976,1,1,1 Teklif yapildi. Lutfen bekleyiniz.
timer 60*12
cont.targetf f_teklifim



[function f_teklifim]
//on=@targon_char
obj = <src.tag.duellotas>
if !(<argo.isplayer>)
src.sysmessage @1952,1,1,1 Sadece playerlarla duello yapabilirsiniz
return 1
elif (<argo.isevent.e_cpvp_duello>)
src.sysmessage @1952,1,1,1 <src.targ.name> zaten duello yapiyor.
return 1
elif (<argo.isevent.e_cpvp_duello>)
src.sysmessage @1952,1,1,1 Zaten pvp yapiyorsunuz
return 1
elif (<argo.uid>==<src.targ.uid>)
src.sysmessage @1952,1,1,1 Kendinizle duello yapamazsiniz
return 1
endif
trysrc <argo.uid> sdialog d_cpvp_duello_teklif
argo.tag0.bahis=<src.dtag0.bahis>
argo.tag0.loot <src.tag0.loot>
argo.tag0.duellorakip <src.uid>
argo.tag0.duellotas <obj>
argo.tag.poison <src.dtag0.poison>
src.sysmessage @1976,1,1,1 Teklif yapildi. Lutfen bekleyiniz.
timer 60*120
return 1


on=@timer
remove
return 1



[itemdef i_cpvp_duello_gerisayim]
id i_memory
type t_eq_script
name gerisayim

on=@timer
if (<morex>==0)
cont.say Basarilar..
cont.go <cont.tag.koordinat3>
try uid.<cont.tag.player1>.events e_cpvp_duello
try uid.<cont.tag.player2>.events e_cpvp_duello
try uid.<cont.tag.player1>.events -e_cpvp_area
try uid.<cont.tag.player2>.events -e_cpvp_area
try uid.<cont.tag.player1>.findlayer(1).bounce
try uid.<cont.tag.player2>.findlayer(1).bounce
try uid.<cont.tag.player1>.findlayer(2).bounce
try uid.<cont.tag.player2>.findlayer(2).bounce
try uid.<cont.tag.player1>.findlayer(31).bounce
try uid.<cont.tag.player2>.findlayer(31).bounce
remove
else
timer 1
morex -=1
endif
return 1


[function duel_cantasil]
forcont <findlayer.21.uid> 10
if (<type>==<args>)
remove
endif
endfor


[events e_cpvp_duello]

on=@logout
src.stone 1
act <src.tag.cpvp_duello_rakip>
src.timerf 2,act.sysmessage @69,1,1 <src.name> oyundan dustu 60 saniye icerisinde oyuna girmesse otomatik kazanacaksiniz.
src.timerf 60,src.f_cpvp_duello_death

on=@login
src.TIMERF CLEAR
src.stone 0




on=@spellcast
if (<argn>==45) || (<argn>==32) || (<argn>==52) || (<argn>==24) || (<argn>==57) || (<argn>==54) || (<argn>==50) || (<argn>==49) || (<argn>==45) || (<argn>==43) || (<argn>==40) || (<argn>==39) || (<argn>==28) || (<argn>==38) || (<argn>==44) || (<argn>==58)
src.sysmessage @1976,1,1,1 Duello'da bu buyuleri kullanamazsiniz..
f_fizzle
skill fail
return 1
endif

on=@itemdclick
if (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosionless)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif


if (<act.baseid> == i_deed_animal)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.baseid> == i_pet_horse)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.baseid> == i_pet_horse_brown_dk)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.baseid> == i_runebook)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.type> == t_figurine)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <uid.<tag.cpvp_duello_rakip>.findid.i_duellocu.uid>
endif

obj
act


on=@ItemEquipTest
if !(<src.tag0.poi>==1) && !(<act.morez> <1)
   Act.morez=
   src.sysmessage @07a1,1,1 Silahtan Poi Silindi.
endif

On=@Death
obj = <act>//<tag0.duellorakip>
ref1 = <uid>//<obj.tag0.duellorakip>
obj.hits <obj.str>
obj.mana <obj.int>
obj.stam <obj.dex>

ref1.hits <ref1.str>
ref1.mana <ref1.int>
ref1.stam <ref1.dex>


obj.duello5


ref1.events -e_cpvp_duello
obj.events -e_cpvp_duello
ref1.action -1
obj.action -1
try uid.<src.tag0.duellotas>.Tag0.dolu=

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

trysrc <obj> src.Kazanan <eval <obj.dtag0.ucret>*2>
obj.goldver <eval <dtag0.bahis> *2>

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.yendimseni <ref1.findlayer(21).uid>
endif
return 1








on=@Skillstart

if (<action> == (skill_hiding)) || (<action> == id(skill_hiding)) || (<action> == id(skill_stealth)) || (<action> == (skill_stealth))
src.sysmessage @,,1 Hide olamazsiniz..
skill fail
return 1
endif



[FUNCTION Goldver]
LOCAL.AMOUNT=<ARGN1>
WHILE <LOCAL.AMOUNT>

IF (<LOCAL.AMOUNT> >= 65000)
SERV.NEWITEM i_gold,65000
LOCAL.AMOUNT -= 65000
ELSE
SERV.NEWITEM i_gold,<LOCAL.AMOUNT>
LOCAL.AMOUNT=0
ENDIF

IF (0<ARGN2>)
NEW.CONT <ARGN2>
ELSE
BOUNCE <NEW>
ENDIF
ENDWHILE




[function kazanan]
src.sysmessage @07a1,1,1 Tebrikler Kazandiniz.
return 1
endif


[function Yendimseni]
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




[function f_cpvp_duello_death]



act <tag.cpvp_duello_rakip>
if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <act.findid.i_duellocu.uid>
endif



obj.link.go <obj.link.tag.koordinat1>
obj.link.tag.pvpdeyim
obj.link.tag.player1
obj.link.tag.player2
go 5333,1825 //<obj.link.tag.koordinat1>
criminal 0

if (<memoryfindtype.memory_sawcrime>)
memoryfindtype.memory_sawcrime.remove
endif
tag.cpvp_duello_fame <eval <tag.cpvp_duello_fame>>
tag.cpvp_duello_karma <eval <tag.cpvp_duello_karma>>
tag.cpvp_duello_kills <eval <tag.cpvp_duello_kills>>
tag.cpvp_duello_rakip
act.go 5333,1825//<obj.link.tag.koordinat1>
act.criminal 0

if (<act.memoryfindtype.memory_sawcrime>)
act.memoryfindtype.memory_sawcrime.remove
endif
act.tag.cpvp_duello_fame <eval <act.tag.cpvp_duello_fame>>
act.tag.cpvp_duello_karma <eval <act.tag.cpvp_duello_karma>>
act.tag.cpvp_duello_kills <eval <act.tag.cpvp_duello_kills>>
act.tag.cpvp_duello_rakip

if !<ctag.duello_beraber>
src.message @33,,1 Duelloyu kaybettiniz...
endif
//src.events +e_safe2
src.findid.i_bleeding.remove
src.findid.i_bleeding2.remove
src.findid.i_rune_poison.remove
src.findid.i_memory_poison_new.remove
src.update
src.f_fizzle
src.hits 100
if !<ctag.duello_beraber>
act.message @69,,1 Tebrikler..Duelloyu kazandiniz!
endif
//act.events +e_safe2
src.findid.i_bleeding.remove
src.findid.i_bleeding2.remove
act.findid.i_memory_poison_new.remove
act.findid.i_rune_poison.remove
act.hits 100
act.update
act.f_fizzle
src.stone 0
act.stone 0

//if !(strmatch('<src.account.lastip>','<act.account.lastip>')) //Multi Test
act.duello5
//endif

//if (strmatch('<src.account.lastip>','<act.account.lastip>'))
//act.sysmessage Multi karakterle puan kazanamassiniz.
//src.sysmessage Multi karakterle puan kazanamassiniz.
//endif

obj.remove

hits <str>


if !<ctag.duello_beraber>
if (<eval <obj.tag.bahis>> >0)
//trysrc <act> paraver <eval <obj.tag.bahis>*2>
act.gold += <eval <obj.tag.bahis>*2>
act.sysmessage @1976,1,1,1 <eval <obj.tag.bahis>*2> gold bankaniza aktarildi.
endif
if (<eval <obj.tag.loot>>==1)
findlayer.1.cont <findlayer.21>
findlayer.2.cont <findlayer.21>
findlayer.3.cont <findlayer.21>
findlayer.4.cont <findlayer.21>
findlayer.5.cont <findlayer.21>
findlayer.6.cont <findlayer.21>
findlayer.7.cont <findlayer.21>
findlayer.8.cont <findlayer.21>
findlayer.10.cont <findlayer.21>
findlayer.12.cont <findlayer.21>
findlayer.13.cont <findlayer.21>
findlayer.17.cont <findlayer.21>
findlayer.18.cont <findlayer.21>
findlayer.19.cont <findlayer.21>
findlayer.20.cont <findlayer.21>
findlayer.22.cont <findlayer.21>
findlayer.23.cont <findlayer.21>
findlayer.24.cont <findlayer.21>
findlayer.31.cont <findlayer.21>
trysrc <act> cpvp_duello_loot <findlayer.21>
act.sysmessage @0790,,1 Rakibinizin Loot'u Bag icinde Bankaniza Aktarilmistir.
endif
endif

//if (strmatch(*pvp*,<act.region.name>))
//act.events +e_cpvp_area
//endif
act.events -e_cpvp_duello
//if (strmatch(*pvp*,<region.name>))
//events +e_cpvp_area
//endif
events -e_cpvp_duello


if (<eval <src.ctag.duel_area>> == 1 )
var.duel_1 = 0
elseif <eval <src.ctag.duel_area>> == 2
var.duel_2 = 0
elseif <eval <src.ctag.duel_area>> == 3
var.duel_3 = 0
elseif <eval <src.ctag.duel_area>> == 4
var.duel_4 = 0
elseif <eval <src.ctag.duel_area>> == 5
var.duel_5 = 0
endif
//return 1

if <ctag.duello_beraber>
src.gold += <eval <obj.tag.bahis>>
act.gold += <eval <obj.tag.bahis>*2>
act.sys_error Ucretiniz bankaniza geri iade edilmistir.
src.sys_error Ucretiniz bankaniza geri iade edilmistir.
src.ctag.duello_beraber
act.ctag.duello_beraber
endif

if !<ctag.duello_beraber>
serv.allclients sysmessage @38,,1 Duello Duyuru :
serv.allclients sysmessage @0790,,1 "<src.name>" ile "<act.name>" arasındaki duelloyu "<act.name>" kazanmıştır.
var.sonduelkazanan=<serv.rtime> - "<src.name>" ile "<act.name>" arasındaki duelloyu "<act.name>" kazanmıştır.
endif
obj
act

[events e_cpvp_area]
on=@attack
skill fail
action -1
return 1

on=@itemdclick
if (<act.baseid> == i_shrink_deed) || (<act.baseid> == i_pet_horse) || (<act.baseid> == i_pet_horse_brown_dk) || (<act.type> == t_figurine) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosionless) || (<act.baseid> == i_runebook) // || (<act.baseid> == i_egg_ostard_olgun)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

on=@hit
return 1
on=@gethit
return 1
on=@spellcast
if !(<src.uid>==<act.uid>)
f_fizzle
return 1
endif
on=@skillgain
return 1


[events e_cpvp_area_delucia]
on=@attack
skill fail
action -1
return 1

on=@itemdclick
if (<act.baseid> == i_shrink_deed) || (<act.baseid> == i_pet_horse) || (<act.baseid> == i_pet_horse_brown_dk) || (<act.type> == t_figurine) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosionless) || (<act.baseid> == i_runebook) // || (<act.baseid> == i_egg_ostard_olgun)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

on=@hit
return 1
on=@gethit
return 1
on=@spellcast
if !(<src.uid>==<act.uid>)
f_fizzle
return 1
endif
on=@skillgain
return 1


[events e_duellogiris]

on=@hit
If !(<act.uid> == <src.uid>)
src.sysmessage @38,,1 Bu alanda sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
return 1
endif

On=@SpellCast
if ((<argn> == 28) || (<argn> == 24) || (<argn> == 32) || (<argn> == 33) || (<argn> == 39) || (<argn> == 40) || (<argn> == 45) || (<argn> == 46) || (<argn> == 47) || (<argn> == 49) || (<argn> == 50) || (<argn> >= 55) || (<argn> >= 44))
src.sysmessage @38,,1 Sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
f_fizzle
return 1
endif
If !(<act.uid> == <src.uid>)
src.sysmessage @38,,1 Sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
return 1
endif

On=@SkillStart
if (<action> == id(skill_hiding)) || (<action> == skill_hiding) || (<action> == id(skill_stealth)) || (<action> == skill_stealth)
src.sysmessage @07a1 Burada bunu yapamazsiniz.
skill fail
return 1
endif
mana <int>
If !(<act.uid> == <src.uid>)
src.sysmessage @38,,1 Bu alanda sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
return 1
endif

on=@itemdclick
if (<act.baseid> == i_shrink_deed) || (<act.baseid> == i_pet_horse) || (<act.baseid> == i_pet_horse_brown_dk) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosionless) || (<act.baseid> == i_runebook) || (<act.type> == t_figurine)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif





[function paraver]
serv.newitem i_gold
new.amount <eval <obj.tag.bahis>*2>
new.bounce

[Function Kafesle_duel]
//timerf 0,stam 0 // stam sifirlaki yürümesinler.
//src.newitem i_duel_berabere
//src.new.timer <eval 60*10>
//src.new.equip
//src.criminal
//ctag.duello_beraber 1
//src.ctag.duello_beraber 1
//sysmessage @69,,1 Staminiz duello basladiginda fullenecektir.
timerf 9,stam <dex>
timerf 2,hits <str>
timerf 2,mana <int> // stam basabilirsin duello basladi.
// sincerly duello
timerf 0,say 10 saniye sonra basliyor...
timerf 1,sysmessage 9
timerf 2,sysmessage 8
timerf 3,sysmessage 7
timerf 4,sysmessage 6
timerf 5,sysmessage 5
timerf 6,sysmessage 4
timerf 7,sysmessage 3
timerf 8,sysmessage 2
timerf 9,sysmessage 1
timerf 10,say  Basla


SERV.NEWITEM=065
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=066
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,-1
NEW.ATTR=00002
NEW.TIMER=10



[Itemdef i_Kafes_timer]
Name Osman
Id i_handr_1
type t_eq_script

ON=@Create
ATTR attr_decay
MORE1=9
COLOR=0480

ON=@Equip
TIMER=1

ON=@Timer
if ( <cont> )
if ( <more1> )
cont.sysmessage (<more1>)>
more1=<more1>-1
TIMER=1
return 1
endif
endif
Remove
RETURN 1

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

SERV.NEWITEM=065
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=066
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,-1
NEW.ATTR=00002
NEW.TIMER=10



Eğer bi sıkınntı çıkarsa yazarsin


Son güncelleme: mahsuni tarafından 20-02-2021 23:20 GMT, 116 Gün önce düzenlendi.


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

Yazar
Skill Title: Novice
Toplam Mesaj: 35
Oyun Tarzı: Rp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 13
Beğeni: 0
Mesaj #100955   20-02-2021 23:41 GMT    
     
uğraşmışsın sağol kardeşim ama iyice hatalı ve problemli bir hale gelmiş sistem lootsuz duelloda rakibin ölmesinden duello başlarken bulundukları alanda doğrudan duellonun başlaması gibi bir çok şey bozulmuş. Sen sadece ilk başta belirttiğim gibi duelloda poison olan silahı ellerine almalarını engellemeye yardım edersen sevinirim. düzenlediğin halinden de yeni yaptığın şeyleri kullanırım bakıp



Yazar
Skill Title: Expert
Toplam Mesaj: 289
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 60
Mesaj #100956   20-02-2021 23:54 GMT    
     
Dostm yanlisin var sen staff olarak kordinatlari vermezsen bulundugu yerden başlar 1.ci player Olunce cikacagi kordinat 2.playerin ölünce çıkacgı kordinat Hakkimin çıkacagı kordinat ve dulle icin player 1 ve 2 nin baslangic kordinatlari vermen lazm sen daha sisteme bakmadan on=@death triggerin altındaki if sorugu ile sorulan lotsuz olan bolumun altindaki return 1 görüpp sistemin calişmiyacagini soyluyorsun denemeden yorum yapma lüütfen Birde hangi sphere sürümü kullanıyorsn kullanıyorsn ?


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

Yazar
Skill Title: Novice
Toplam Mesaj: 35
Oyun Tarzı: Rp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 13
Beğeni: 0
Mesaj #100959   21-02-2021 00:23 GMT    
     

@mahsuni
Dostm yanlisin var sen staff olarak kordinatlari vermezsen bulundugu yerden başlar 1.ci player Olunce cikacagi kordinat 2.playerin ölünce çıkacgı kordinat Hakkimin çıkacagı kordinat ve dulle icin player 1 ve 2 nin baslangic kordinatlari vermen lazm sen daha sisteme bakmadan on=@death triggerin altındaki if sorugu ile sorulan lotsuz olan bolumun altindaki return 1 görüpp sistemin calişmiyacagini soyluyorsun denemeden yorum yapma lüütfen Birde hangi sphere sürümü kullanıyorsn kullanıyorsn ?



Savunma yada saldırı moduna girmene gerek yok elbette verdim kordinatları girip test ettim denedim onun sonucunda bu hatalar ve bir çoğu daha da var eskisi daha stabildi dedim. kızacak bir şey yok burada. X1 version.



Yazar
Skill Title: Expert
Toplam Mesaj: 289
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 60
Mesaj #100962   21-02-2021 00:28 GMT    
     
mevzu kızmak deil dostum sorunu çozmeye calisyorm farkli bir arkdasda denedim suan sıkıtın yok


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

Yazar
Skill Title: Novice
Toplam Mesaj: 35
Oyun Tarzı: Rp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 13
Beğeni: 0
Mesaj #100988   21-02-2021 17:51 GMT    
     
Şurada sorun nedir, poison sürülü silahı eline alamamasını nasıl sağlayabilirim onu düzeltebilirmisiniz

Script Kodu:
on=@ItemEquipTest
if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <uid.<tag.cpvp_duello_rakip>.findid.i_duellocu.uid>
endif

if (<eval <obj.tag.poison>>==0)
if <act.isevent.t_weapon_poisoned>
src.sysmessage @33,,1 Kurallara gore silahta poison yasak.
return 1
endif
endif
                   if (<eval <obj.tag.poison>>==0) && (strmatch(*t_weapon*,<act.type>)) && (<eval <act.morez>> >0) //?
                   src.sysmessage @021 Poisonlu silah kullanamazsiniz.
                   act.unequip
                   endif



Yazar
Skill Title: Expert
Toplam Mesaj: 289
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 60
Mesaj #100989   21-02-2021 18:52 GMT    
     
Dostm sistem calişma mantıgı hatali senin attıgın scp de Dullo vendoruna cift tıklayınca i_duellocu itemi verip target alidiyor Vendora tıklayınca sadce bu itemi veriyor sen burda on=@ItemEquipTest triggeri altinda obj i_duellocu iteminin uid dine eşşitlemişsin ee simdi gelelm meseleye bu item sadece Vendora tıklayan player da var Rakip te item olmadıgı için sorun yaritiyor. birde itemi verdirken iteme uid verilmiş itemi alan kişşiye deil o yuzden sürekli hata alirsin ben elimden geneli yaptim konu gene ayni yere geldi kızma yada darılma gücenme yok yanliş anlama sadece mantıgını anlatmaya calisiyorm


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

Yazar
Skill Title: Novice
Toplam Mesaj: 35
Oyun Tarzı: Rp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 13
Beğeni: 0
Mesaj #100990   21-02-2021 21:03 GMT    
     
Ben o kısmı sana belirtmeyi unuttum o yüzden anlaşmazlık yaşıyoruz galiba. ben .duel komutu ile kullanıyorum sistemi rp server için öyle duello npc'si koyup onun üzerinden yapmayacağım. .duel ile player'lar birbirine istediği yerde istek atıp alanı seçip gidiyorlar. İstersen dene bilgisayarında sistemi herşey istediğim gibi çalışıyor zaten o şekilde. tek yapamadığım poison serbest kısmı seçilmediği halde poisonlu silahı ele alabiliyorlar. Alamamalarını istiyorum tek sorun bu



Yazar
Skill Title: Expert
Toplam Mesaj: 289
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 60
Mesaj #100991   21-02-2021 22:24 GMT    
     
Evet Dostm bende vendor ile Duello sistemi saniyorm yukarlara hiç bakmadim simdi orta yolu bulduk buyrun istegin sistem hatayıda engelledim


Script Kodu:
[function hazir_pot_duel]
newitem i_bag
ref1 = <new.uid>
new.bounce

newitem i_potion_healgreat
new.amount <argn>
new.cont <ref1>


newitem i_potion_curegreat
new.amount <argn>
new.cont <ref1>

newitem i_potion_poisondeadly
new.amount <argn>
new.cont <ref1>


//newitem i_potion_bleed
//new.amount <argn>
//new.cont <ref1>


newitem i_potion_refreshtotal
new.amount <argn>
new.cont <ref1>


newitem i_potion_agilitygreat
new.amount <argn>
new.cont <ref1>


newitem i_bandage
new.amount 5
new.cont <ref1>

//newitem i_cloth_oil
//new.cont <ref1>

newitem i_arrow
new.amount 25
new.bounce

newitem i_xbolt
new.amount 25
new.bounce

//newitem loot_reg_30
//new.bounce

[Plevel 1]
duel

[function duel]
src.sysmessage Duello yapmak istediğiniz kişiyi seçiniz.
targetf f_duel_x

[function f_duel_x]
if (<argo.uid>==<src.uid>)
src.sysmessage Kendinizi seçemezsiniz.
return 1
endif
if <argo.tag0.duelloda> //XXX
src.sysmessage @,,1 Şuanda bu kişi duelloda.
return 1
else
src.ctag.duel_opponent = <argo.uid>
src.dialog d_duel_alan
if <src.findid.i_duellocu>
src.findid.i_duellocu.remove
endif
endif


[dialog d_duel_alan]
50,50


resizepic 50 0 2620 400 200
checkertrans 55 5 390 190


text 105 50 0250 0


if <eval <var.duel_1>> == 1
text 105 80 38 1
else
button 85 83 1209 1210 1 0 1
text 105 80 800 1
endif


if <eval <var.duel_2>> == 1
text 105 100 38 2
else
button 85 103 1209 1210 1 0 2
text 105 100 800 2
endif

if <eval <var.duel_3>> == 1
text 105 120 38 3
else
button 85 123 1209 1210 1 0 3
text 105 120 800 3
endif

//button 85 143 1209 1210 1 0 4
//text 105 140 800 4


//button 85 163 1209 1210 1 0 5
//text 105 160 800 5


//button 195 194 3 4 1 0 0
//text 215 190 800 6

[dialog d_duel_alan text]
Kirmizi alanlar suanda dolu olan alanlardir.
Duello Alan 1 ( Gargoyle City )
Duello Alan 2 ( Zento )
Duello Alan 3 ( Luna )
//Duello Alan 4
//Duello Alan 5
//Kapat

[dialog d_duel_alan button]

On=1
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 1
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif

On=2
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 2
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif
On=3
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 3
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif
On=4
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 4
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif

On=5
if !<src.isevent.e_cpvp_duello>
src.dialog d_cpvp_duello
src.ctag.duel_area 5
else
src.sysmessage Duellodayken tekrar duello atamazsiniz.
endif










[itemdef i_skor_duello]
id i_bulletin_board
name Skorlar
type t_eq_script

on=@create
attr=attr_static|attr_move_never

on=@dclick
src.duellist
src.duelgalib
return 1


[function duellist]
dialog d_duellist

[defname duelloplayer]
duelloplayer 5

[function duello5]
tag0.duelkazan +=1
for 1 <ddef.duelloplayer>
        var.remove <ddef.duelloplayer>
        for y 1 <ddef.duelloplayer>
                ref1=<var.duelloplayer_<dlocal.y>>
                if (<ref1> = <uid>)
                        var.remove <dlocal.y>
                endif
        endfor
        ref2=<var.duelloplayer_<dlocal._for>>
        if (<dtag.duelkazan> >= <ref2.dtag.duelkazan>)
                var.duelloplayer_<dvar.remove>
                for x <dvar.remove> <dlocal._for>
                        var.duelloplayer_<dlocal.x> <var.duelloplayer_<eval <dlocal.x> -1>>
                endfor
                var.duelloplayer_<dlocal._for> <uid>
                var.remove
                return 1
        endif
endfor

[function duelyazdir]
serv.deletefile C:\AppServ\www\Web\dueldiz.php
serv.writefile C:\AppServ\www\Web\dueldiz.php
for c 1 5
obj = <var.duelloplayer_<dlocal.c>>
IF (<FILE.OPEN C:\AppServ\www\Web\dueldiz.php>)
file.writeline <var.ebe>body text=#FFFFFF background-color:transparent<var.ebesi>
file.writeline <var.ebe>font size=2<var.ebesi><obj.name><var.ebe>/font<var.ebesi>  //<var.ebe>font face=Argos size=2<var.ebesi><obj.name> <var.ebe>/font<var.ebesi><var.ebe>font size=2<var.ebesi><var.ebe>font face=Argos <var.ebesi>:<var.ebe>/font<var.ebesi><var.ebe>font face=Argos color=#000000 <var.ebesi>:<var.ebe>/font<var.ebesi> <var.ebe>font face=Argos <var.ebesi><eval <obj.tag.pan>><var.ebe>/font<var.ebesi> //<var.ebe>font face=Argos color=#FF0000 <var.ebesi>Kills:<var.ebe>/font<var.ebesi> <var.ebe>font face=Argos <var.ebesi><obj.kills><var.ebe>/font<var.ebesi>
file.writeline <var.ebe>body text=#FFFFFF background=aaaa.png<var.ebesi>
file.writeline <var.ebe>/font<var.ebesi>
file.writeline <var.ebe>p<var.ebesi>
file.close
endif
endfor

[function duelpuanreset]
for c 1 1000
obj = <var.duelloplayer_<dlocal.c>>
obj.tag.duelkazan
endfor



[function f_duel_tablo_list]
for c 1 5
obj = <var.duelloplayer_<dlocal.c>>
if !<isempty <var.duelloplayer_<dlocal.c>>>
    var.duel_list_name_<dlocal.c> <obj.name>
  var.duel_list_puan_<dlocal.c> <dobj.tag.duelkazan>
endif
endfor

[function f_get_duel]
serv.f_duel_tablo_list
if <argn1> == 1
return <var.duel_list_name_1>
elif <argn1> == 11
return <eval <var.duel_list_puan_1>>
elif <argn1> == 2
return <var.duel_list_name_2>
elif <argn1> == 22
return <eval <var.duel_list_puan_2>>
elif <argn1> == 3
return <var.duel_list_name_3>
elif <argn1> == 33
return <eval <var.duel_list_puan_3>>
elif <argn1> == 4
return <var.duel_list_name_4>
elif <argn1> == 44
return <eval <var.duel_list_puan_4>>
elif <argn1> == 5
return <var.duel_list_name_5>
elif <argn1> == 55
return <eval <var.duel_list_puan_5>>
endif


[plevel 1]
duellist

[dialog d_duellist]
120,260
//resizepic 39 0 60000 525 205//ARka Fon
//resizepic 50 12 83 501 180

resizepic 50 0 2620 495 260
checkertrans 55 5 485 250


page 0
   dtext 270 30 38 Duello Top 5
   dtext 75 80 38 1.                     
   dtext 75 110 38 2.                       
   dtext 75 140 38 3.
   dtext 75 170 38 4.                         
   dtext 75 200 38 5.
   dtext 450 80 38 Puan:                       
   dtext 450 110 38 Puan:                         
   dtext 450 140 38 Puan:
   dtext 450 170 38 Puan:
   dtext 450 200 38 Puan:       
for c 1 5
obj = <var.duelloplayer_<dlocal.c>>
   dtext 106 <hval (<local.c>*30)+50> 50 <obj.name>
   dtext 493 <hval (<local.c>*30)+50> 50 <dobj.tag.duelkazan>
endfor

[dialog d_duellist button]
on=0

[plevel 1]
duelgalib

[function duelgalib]
src.sysmessage Suana kadar <eval <tag0.duelkazan>> kere duello'da galip geldiniz.


[chardef c_cpvp_duello]
name Duello Hakemi
id c_man
can mt_equip|mt_nonmover

On=@Create
str 9500
dex 1000
int 1000
magery 100
invul 1
speechcolor 1953
food 990
color 083ea
taming 32000

ITEMNEWBIE=i_PLATEMAIL_ARMS
ITEMNEWBIE=i_PLATEMAIL_leggings
ITEMNEWBIE=i_PLATEMAIL_chest
ITEMNEWBIE=i_PLATEMAIL_GORGET
ITEMNEWBIE=i_PLATEMAIL_gloves
ITEMNEWBIE=i_helm_closed
ITEMNEWBIE=i_staff_black

on=@gethit
return 1
on=@spelleffect
return 1
on=@death
hits 100
return 1
on=@attack
skill fail
action -1
return 1

on=@hit
return 1

on=@click
messageua 0481,6,6,enu [<name>]
messageua 0481,6,6,enu Duello Master
return 1

on=@dclick
if (<src.findid.i_duellocu>)
src.findid.i_duellocu.remove
endif
if (<src.account.plevel>==7) || (<src.isgm>)
sdialog d_cpvp_duello_ayar
elif (<src.account.plevel>==1) || (<src.account.plevel>==7)
if (<distance> >3)
src.sysmessage @1953,1,1,1 Yetisemiyorsunuz...
return 1
endif
endif
sdialog d_cpvp_duello

return 1

[dialog d_cpvp_duello_ayar]
0,0
resizepic 100 100 5120 300 200
resizepic 110 110 9350 280 180
dhtmlgump 170 120 300 20 0 0 <serv.servname> Duello Sistemi

button 120 150 210 211 1 0 1
button 120 175 210 211 1 0 2
button 120 200 210 211 1 0 3
button 120 225 210 211 1 0 4
button 120 250 210 211 1 0 5
dhtmlgump 142 150 400 20 0 0 Normal Koordinati: <tag0.koordinat1>
dhtmlgump 142 175 400 20 0 0 Gerisayim Koordinati: <tag0.koordinat2>
dhtmlgump 142 200 400 20 0 0 Pvp'deki Koordinati: <tag0.koordinat3>
dhtmlgump 142 225 400 20 0 0 1.Player: <tag0.koordinat4>
dhtmlgump 142 250 400 20 0 0 2.Player: <tag0.koordinat5>

[dialog d_cpvp_duello_ayar button]
onbutton 1
var.hakemuid <uid>
targetfg hakemkoordinat 1
onbutton 2
var.hakemuid <uid>
targetfg hakemkoordinat 2
onbutton 3
var.hakemuid <uid>
targetfg hakemkoordinat 3
onbutton 4
var.hakemuid <uid>
targetfg hakemkoordinat 4
onbutton 5
var.hakemuid <uid>
targetfg hakemkoordinat 5

[dialog d_cpvp_duello]
0,0
//resizepic 100 100 9300 300 270
//resizepic 110 110 9300 280 250
resizepic 100 100 2620 300 270
checkertrans 105 105 290 260
//gumppictiled 110 110 280 250 2624

resizepic 155 150 9300 185 20
//checkertrans 160 155 175 10

dtext 170 120 38 <serv.servname> Duello Sistemi

dtext 120 150 60 Bahis:
dtext 345 150 60 Gold
dtextentry 170 150 100 20 910 1 15000
checkbox 132 186 210 211 0 1
checkbox 132 210 210 211 0 2

dtext 130 230 48 Oyundan dustugunuzde/ciktiginizda
dtext 130 250 48 60 saniye icerisinde tekrar girmesseniz
dtext 130 270 48 duelloyu kaybedersiniz.
dtext 160 190 50 Loot var
dtext 280 310 50 Potion adet:
dtextentry 355 310 100 20 910 2 3
dtext 160 210 50 Silaha poison var


button 227 310 4023 4025 1 0 1

[dialog d_cpvp_duello button]
onbutton 1
if !(<isnum <argtxt[1]>>)
src.sysmessage @38,1,1 Sadece rakam kullanabilirsiniz
return 1
elseif (<eval <argtxt[1]>> > 1000000)
src.sysmessage @38,1,1 1m den daha buyuk bir meblada duello gerceklestiremezsiniz.
return 1
elseif (<eval <argtxt[1]>> < 15000)
src.sysmessage @38,1,1 15k dan daha dusuk bir meblada duello gerceklestiremezsiniz.
return 1
elseif (<eval <argtxt[2]>> > 10)
src.sysmessage @,,1 10 adet pottan daha fazla pot ile duello gerceklestiremezsiniz.
return 1
else



serv.newitem i_duellocu
src.new.link <src.uid>
src.new.tag.duellocu <ctag.duel_opponent>
src.new.tag.bahis <argtxt[1]>
src.new.tag.loot <argchk[1]>
src.new.tag.poison <argchk[2]>
src.new.tag.pot_quantity <argtxt[2]>
src.new.timer 45
src.new.equip
timerf 45,src.closealldialogs

endif


[dialog d_cpvp_duello_teklif]
0,0
resizepic 100 100 2620 300 270
checkertrans 105 105 290 260
dtext 170 120 38 <serv.servname> Duello Sistemi

dtext 120 150 60 <cont.name> Duello teklifinde bulundu.

dtext 130 180 38 Bahis : <eval <tag.bahis>> Gold
dtext 130 200 38 Loot : <qval (<tag0.loot>) ? var:yok>
dtext 130 224 38 Silaha poison <qval (<tag0.poison>) ? var:yok>
dtext 130 240 48 Oyundan dustugunuzde/ciktiginizda
dtext 130 260 48 Yenilmis sayilirsiniz ve
dtext 130 280 48 <eval <tag.bahis>> Gold Kaybedersiniz.
dtext 130 300 48  Potion miktari : <eval <tag.pot_quantity>>

button 123 320 4023 4025 1 0 1
dtext 156 320 38 Kabul Ediyorum

[dialog d_cpvp_duello_teklif button]
on=0
cont.sysmessage @1976,1,1,1 <src.name> teklifi kabul etmedi..
cont.findid.i_duellocu.remove
//move

on=1


if (<src.findtype.t_potion>) || (<src.findid.i_bandage>)
src.sysmessage @,,1 Yaninizdaki potion ve bandaji lutfen birakiniz.
cont.sysmessage @,,1 Rakibinizin cantasinda potion ya da bandaj bulunmakta...
remove
return 1
endif

if (<cont.findtype.t_potion>) || (<cont.findid.i_bandage>)
cont.sysmessage @,,1 Yaninizdaki potion ve bandaji lutfen birakiniz.
src.sysmessage @,,1 Rakibinizin cantasinda pot ya da bandaj bulunmakta...
remove
return 1
endif



if (<src.findlayer.25>) || (<cont.findlayer.25>)
src.sysmessage @1953,1,1,1 Senin yada onun altinda binek var..
cont.sysmessage @1953,1,1,1 Senin yada onun altinda binek var..
remove
return 1
endif

local.uid1 <src.uid>
local.uid2 <cont.uid>
forchars 25
if (<memoryfindtype.memory_ipet>)
if (<memoryfindtype.memory_ipet.link>==<local.uid1>) || (<memoryfindtype.memory_ipet.link>==<local.uid2>)
try uid.<local.uid1>.sysmessage @1953,1,1,1 Sizin veya rakibinizin binekleri etrafta oldugu surece duello baslamayacaktir.
try uid.<local.uid2>.sysmessage @1953,1,1,1 Sizin veya rakibinizin binekleri etrafta oldugu surece duello baslamayacaktir.
remove
return 1
endif
endif
endfor
local.uid1
local.uid2

timer -1


if (<eval <tag.bahis>> == 0)
else
if (<src.BANKBALANCE> >= <eval <tag.bahis>>) && (<cont.BANKBALANCE> >= <eval <tag.bahis>>)
src.gold -= <eval <tag.bahis>>
cont.gold -= <eval <tag.bahis>>
else
src.sysmessage @1976,1,1,1 <cont.name> veya sizde <eval <tag.bahis>> gold yok..
cont.sysmessage @1976,1,1,1 <src.name> veya sizde <eval <tag.bahis>> gold yok..
remove
return 1
endif
endif

if <eval <cont.ctag.duel_area>> == 1
if !<eval <var.duel_1>>
var.duel_1 1
else
src.sysmessage @,,1 Duello alani dolu.
cont.sysmessage @,,1 Duello alani dolu.
remove
return 1
endif
endif

if <eval <cont.ctag.duel_area>> == 2
if !<eval <var.duel_2>>
var.duel_2 1
else
src.sysmessage @,,1 Duello alani dolu.
cont.sysmessage @,,1 Duello alani dolu.
remove
return 1
endif
endif

if <eval <cont.ctag.duel_area>> == 3
if !<eval <var.duel_3>>
var.duel_3 1
else
src.sysmessage @,,1 Duello alani dolu.
cont.sysmessage @,,1 Duello alani dolu.
remove
return 1
endif
endif

if <eval <cont.ctag.duel_area>> == 4
if !<eval <var.duel_4>>
var.duel_4 1
else
src.sysmessage @,,1 Duello alani dolu.
cont.sysmessage @,,1 Duello alani dolu.
remove
return 1
endif
endif


if <eval <cont.ctag.duel_area>> == 5
if !<eval <var.duel_5>>
var.duel_5 1
else
src.sysmessage @,,1 Duello alani dolu.
cont.sysmessage @,,1 Duello alani dolu.
remove
return 1
endif
endif

//src.tag.events -e_safe2


if <eval <cont.ctag.duel_area>> == 1
src.go 859,642,-40,2 //<link.tag.koordinat4>
cont.go 880,642,-40,2//<link.tag.koordinat5>
src.ctag.duel_area = 1
src.tag0.duelloda = 1 //XXX
cont.tag0.duelloda = 1 //XXX
endif

if <eval <cont.ctag.duel_area>> == 2
src.go 737,1247,30,4 //<link.tag.koordinat4>
cont.go 737,1264,30,4//<link.tag.koordinat5>
src.ctag.duel_area = 2
src.tag0.duelloda = 1 //XXX
cont.tag0.duelloda = 1 //XXX
endif

if <eval <cont.ctag.duel_area>> == 3
src.go 981,519,-50,3 //<link.tag.koordinat4>
cont.go 998,519,-50,3//<link.tag.koordinat5>
src.ctag.duel_area = 3
src.tag0.duelloda = 1 //XXX
cont.tag0.duelloda = 1 //XXX
endif

if <eval <cont.ctag.duel_area>> == 4
src.go 859,642,-40,2 //<link.tag.koordinat4>
cont.go 880,642,-40,2//<link.tag.koordinat5>
src.ctag.duel_area = 4
src.tag0.duelloda = 1 //XXX
cont.tag0.duelloda = 1 //XXX
endif


if <eval <cont.ctag.duel_area>> == 5
src.go 859,642,-40,2 //<link.tag.koordinat4>
cont.go 880,642,-40,2//<link.tag.koordinat5>
src.ctag.duel_area = 5
src.tag0.duelloda = 1 //XXX
cont.tag0.duelloda = 1 //XXX
endif


src.events +e_cpvp_duello
src.findlayer(1).cont=<src.findlayer.layer_pack.uid>
src.Kafesle_duel
src.food 15
trysrc <src.uid> hazir_pot_duel <eval <tag.pot_quantity>>
//src.tag.cpvp_duello_rakip.events -e_safe2
src.tag.cpvp_duello_rakip <cont.uid>
src.tag.cpvp_duello_karma <src.karma>
src.tag.cpvp_duello_kills <src.kills>
src.tag.cpvp_duello_fame <src.fame>
cont.events +e_cpvp_duello
cont.findlayer(1).cont=<cont.findlayer.layer_pack.uid>
cont.food 15
cont.Kafesle_duel
trysrc <cont.uid> hazir_pot_duel <eval <tag.pot_quantity>>
//cont.events -e_safe2
//cont.tag.cpvp_duello_rakip.events -e_safe2
cont.tag.cpvp_duello_rakip <src.uid>
cont.tag.cpvp_duello_karma <cont.karma>
cont.tag.cpvp_duello_kills <cont.kills>
cont.tag.cpvp_duello_fame <cont.fame>
//link.tag.pvpdeyim 1
//serv.newitem i_cpvp_duello_gerisayim
//new.timer 1
//new.morex 5
//new.cont <link.uid>
//link.go <link.tag.koordinat2>
link.tag.player1 <src.uid>
link.tag.player2 <cont.uid>

//-----------------------------------------------------------------------------------------
// Functions

[function hakemkoordinat]
try uid.<var.hakemuid>.tag.koordinat<args> <src.targp>
src.sysmessage @1953,1,1,1 Yeni koordinat ayarlandi : <src.targp>

[function cpvp_duello_loot]
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


//------------------
// Items
[itemdef i_duel_berabere]
id i_memory
type t_eq_script
name duel berabere


on=@timer
cont.ctag.duello_beraber 1
//cont.f_cpvp_duello_death
cont.kill 1
remove
return 1



[itemdef i_duellocu]
id i_memory
type t_eq_script
name duellocu

on=@equip
ref1 = <tag.duellocu>
//cont.sysmessage @,,1 <ref1.name>
trysrc <ref1> sdialog d_cpvp_duello_teklif
cont.sysmessage @1976,1,1,1 Teklif yapildi. Lutfen bekleyiniz.
timer 60*12

on=@timer
remove
return 1

on=@targon_char
if !(<src.targ.isplayer>)
src.sysmessage @1952,1,1,1 Sadece playerlarla duello yapabilirsiniz
return 1
elif (<src.targ.isevent.e_cpvp_duello>)
src.sysmessage @1952,1,1,1 <src.targ.name> zaten duello yapiyor.
return 1
elif (<src.isevent.e_cpvp_duello>)
src.sysmessage @1952,1,1,1 Zaten pvp yapiyorsunuz
return 1
elif (<src.uid>==<src.targ.uid>)
src.sysmessage @1952,1,1,1 Kendinizle duello yapamazsiniz
return 1
endif
trysrc <src.targ.uid> sdialog d_cpvp_duello_teklif
src.sysmessage @1976,1,1,1 Teklif yapildi. Lutfen bekleyiniz.
timer 60*120
return 1

[itemdef i_cpvp_duello_gerisayim]
id i_memory
type t_eq_script
name gerisayim

on=@timer
if (<morex>==0)
cont.say Basarilar..
cont.go <cont.tag.koordinat3>
try uid.<cont.tag.player1>.events e_cpvp_duello
try uid.<cont.tag.player2>.events e_cpvp_duello
try uid.<cont.tag.player1>.events -e_cpvp_area
try uid.<cont.tag.player2>.events -e_cpvp_area
try uid.<cont.tag.player1>.findlayer(1).bounce
try uid.<cont.tag.player2>.findlayer(1).bounce
try uid.<cont.tag.player1>.findlayer(2).bounce
try uid.<cont.tag.player2>.findlayer(2).bounce
try uid.<cont.tag.player1>.findlayer(31).bounce
try uid.<cont.tag.player2>.findlayer(31).bounce
remove
else
timer 1
morex -=1
endif
return 1


[function duel_cantasil]
forcont <findlayer.21.uid> 10
if (<type>==<args>)
remove
endif
endfor


[events e_cpvp_duello]

on=@logout
src.stone 1
act <src.tag.cpvp_duello_rakip>
src.timerf 2,act.sysmessage @69,1,1 <src.name> oyundan dustu 60 saniye icerisinde oyuna girmesse otomatik kazanacaksiniz.
src.timerf 60,src.f_cpvp_duello_death

on=@login
src.TIMERF CLEAR
src.stone 0


//on=@itemtargon_char
//if (<findid.i_duellocu>)
//obj <findid.i_duellocu.uid>
//else
//obj <uid.<tag.cpvp_duello_rakip>.findid.i_duellocu.uid>
//endif


on=@spellcast
if (<argn>==45) || (<argn>==32) || (<argn>==52) || (<argn>==24) || (<argn>==57) || (<argn>==54) || (<argn>==50) || (<argn>==49) || (<argn>==45) || (<argn>==43) || (<argn>==40) || (<argn>==39) || (<argn>==28) || (<argn>==38) || (<argn>==44) || (<argn>==58)
src.sysmessage @1976,1,1,1 Duello'da bu buyuleri kullanamazsiniz..
f_fizzle
skill fail
return 1
endif

on=@itemdclick
if (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosionless)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

//if (<act.baseid> == i_egg_ostard_olgun)
//src.sysmessage @2028 Bu bolgede kullanilmaz..
//return 1
//endif

if (<act.baseid> == i_deed_animal)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.baseid> == i_pet_horse)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.baseid> == i_pet_horse_brown_dk)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.baseid> == i_runebook)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<act.type> == t_figurine)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <uid.<tag.cpvp_duello_rakip>.findid.i_duellocu.uid>
endif

obj
act


on=@ItemEquipTest
if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <uid.<tag.cpvp_duello_rakip>.findid.i_duellocu.uid>
endif

if (<eval <obj.tag.poison>>==0)
//if <act.isevent.t_weapon_poisoned>
src.sysmessage @33,,1 Kurallara gore silahta poison yasak.
return 1
endif
//endif
                   if (<eval <obj.tag.poison>>==0) && (strmatch(*t_weapon*,<act.type>)) && (<eval <act.morez>> >0) //?
                   src.sysmessage @021 Poisonlu silah kullanamazsiniz.
                   act.unequip
                   Return 1
                   endif

On=@Death
src.stone 1
act.stone 1
src.tag0.duelloda //XXX
act.tag0.duelloda  //XXX
src.hits <src.str>
act.hits <act.str>
src.duel_cantasil t_potion
act.duel_cantasil t_potion
src.duel_cantasil t_reagent
act.duel_cantasil t_reagent
src.duel_cantasil t_bandage
act.duel_cantasil t_bandage
src.duel_cantasil t_container
act.duel_cantasil t_container
src.duel_cantasil t_weapon_bolt
act.duel_cantasil t_weapon_bolt
src.duel_cantasil t_weapon_arrow
act.duel_cantasil t_weapon_arrow

act <tag.cpvp_duello_rakip>
if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <act.findid.i_duellocu.uid>
endif
//obj.link.go <obj.link.tag.koordinat1>
//obj.link.tag.pvpdeyim
src.timerf 3,src.f_cpvp_duello_death
return 1


on=@Skillstart

if (<action> == (skill_hiding)) || (<action> == id(skill_hiding)) || (<action> == id(skill_stealth)) || (<action> == (skill_stealth))
src.sysmessage @,,1 Hide olamazsiniz..
skill fail
return 1
endif

[function f_cpvp_duello_death]


act <tag.cpvp_duello_rakip>
if (<findid.i_duellocu>)
obj <findid.i_duellocu.uid>
else
obj <act.findid.i_duellocu.uid>
endif







obj.link.go <obj.link.tag.koordinat1>
obj.link.tag.pvpdeyim
obj.link.tag.player1
obj.link.tag.player2
go 5333,1825 //<obj.link.tag.koordinat1>
criminal 0

if (<memoryfindtype.memory_sawcrime>)
memoryfindtype.memory_sawcrime.remove
endif
tag.cpvp_duello_fame <eval <tag.cpvp_duello_fame>>
tag.cpvp_duello_karma <eval <tag.cpvp_duello_karma>>
tag.cpvp_duello_kills <eval <tag.cpvp_duello_kills>>
tag.cpvp_duello_rakip
act.go 5333,1825//<obj.link.tag.koordinat1>
act.criminal 0

if (<act.memoryfindtype.memory_sawcrime>)
act.memoryfindtype.memory_sawcrime.remove
endif
act.tag.cpvp_duello_fame <eval <act.tag.cpvp_duello_fame>>
act.tag.cpvp_duello_karma <eval <act.tag.cpvp_duello_karma>>
act.tag.cpvp_duello_kills <eval <act.tag.cpvp_duello_kills>>
act.tag.cpvp_duello_rakip

if !<ctag.duello_beraber>
src.message @33,,1 Duelloyu kaybettiniz...
endif
//src.events +e_safe2
src.findid.i_bleeding.remove
src.findid.i_bleeding2.remove
src.findid.i_rune_poison.remove
src.findid.i_memory_poison_new.remove
src.update
src.f_fizzle
src.hits 100
if !<ctag.duello_beraber>
act.message @69,,1 Tebrikler..Duelloyu kazandiniz!
endif
//act.events +e_safe2
src.findid.i_bleeding.remove
src.findid.i_bleeding2.remove
act.findid.i_memory_poison_new.remove
act.findid.i_rune_poison.remove
act.hits 100
act.update
act.f_fizzle
src.stone 0
act.stone 0

//if !(strmatch('<src.account.lastip>','<act.account.lastip>')) //Multi Test
act.duello5
//endif

//if (strmatch('<src.account.lastip>','<act.account.lastip>'))
//act.sysmessage Multi karakterle puan kazanamassiniz.
//src.sysmessage Multi karakterle puan kazanamassiniz.
//endif

obj.remove

hits <str>


if !<ctag.duello_beraber>
if (<eval <obj.tag.bahis>> >0)
//trysrc <act> paraver <eval <obj.tag.bahis>*2>
act.gold += <eval <obj.tag.bahis>*2>
act.sysmessage @1976,1,1,1 <eval <obj.tag.bahis>*2> gold bankaniza aktarildi.
endif
if (<eval <obj.tag.loot>>==1)
findlayer.1.cont <findlayer.21>
findlayer.2.cont <findlayer.21>
findlayer.3.cont <findlayer.21>
findlayer.4.cont <findlayer.21>
findlayer.5.cont <findlayer.21>
findlayer.6.cont <findlayer.21>
findlayer.7.cont <findlayer.21>
findlayer.8.cont <findlayer.21>
findlayer.10.cont <findlayer.21>
findlayer.12.cont <findlayer.21>
findlayer.13.cont <findlayer.21>
findlayer.17.cont <findlayer.21>
findlayer.18.cont <findlayer.21>
findlayer.19.cont <findlayer.21>
findlayer.20.cont <findlayer.21>
findlayer.22.cont <findlayer.21>
findlayer.23.cont <findlayer.21>
findlayer.24.cont <findlayer.21>
findlayer.31.cont <findlayer.21>
trysrc <act> cpvp_duello_loot <findlayer.21>
act.sysmessage @0790,,1 Rakibinizin Loot'u Bag icinde Bankaniza Aktarilmistir.
endif
endif

//if (strmatch(*pvp*,<act.region.name>))
//act.events +e_cpvp_area
//endif
act.events -e_cpvp_duello
//if (strmatch(*pvp*,<region.name>))
//events +e_cpvp_area
//endif
events -e_cpvp_duello


if (<eval <src.ctag.duel_area>> == 1 )
var.duel_1 = 0
elseif <eval <src.ctag.duel_area>> == 2
var.duel_2 = 0
elseif <eval <src.ctag.duel_area>> == 3
var.duel_3 = 0
elseif <eval <src.ctag.duel_area>> == 4
var.duel_4 = 0
elseif <eval <src.ctag.duel_area>> == 5
var.duel_5 = 0
endif
//return 1

if <ctag.duello_beraber>
src.gold += <eval <obj.tag.bahis>>
act.gold += <eval <obj.tag.bahis>*2>
act.sys_error Ucretiniz bankaniza geri iade edilmistir.
src.sys_error Ucretiniz bankaniza geri iade edilmistir.
src.ctag.duello_beraber
act.ctag.duello_beraber
endif

if !<ctag.duello_beraber>
serv.allclients sysmessage @38,,1 Duello Duyuru :
serv.allclients sysmessage @0790,,1 "<src.name>" ile "<act.name>" arasındaki duelloyu "<act.name>" kazanmıştır.
var.sonduelkazanan=<serv.rtime> - "<src.name>" ile "<act.name>" arasındaki duelloyu "<act.name>" kazanmıştır.
endif
obj
act

[events e_cpvp_area]
on=@attack
skill fail
action -1
return 1

on=@itemdclick
if (<act.baseid> == i_shrink_deed) || (<act.baseid> == i_pet_horse) || (<act.baseid> == i_pet_horse_brown_dk) || (<act.type> == t_figurine) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosionless) || (<act.baseid> == i_runebook) // || (<act.baseid> == i_egg_ostard_olgun)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

on=@hit
return 1
on=@gethit
return 1
on=@spellcast
if !(<src.uid>==<act.uid>)
f_fizzle
return 1
endif
on=@skillgain
return 1


[events e_cpvp_area_delucia]
on=@attack
skill fail
action -1
return 1

on=@itemdclick
if (<act.baseid> == i_shrink_deed) || (<act.baseid> == i_pet_horse) || (<act.baseid> == i_pet_horse_brown_dk) || (<act.type> == t_figurine) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosionless) || (<act.baseid> == i_runebook) // || (<act.baseid> == i_egg_ostard_olgun)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif

on=@hit
return 1
on=@gethit
return 1
on=@spellcast
if !(<src.uid>==<act.uid>)
f_fizzle
return 1
endif
on=@skillgain
return 1


[events e_duellogiris]

on=@hit
If !(<act.uid> == <src.uid>)
src.sysmessage @38,,1 Bu alanda sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
return 1
endif

On=@SpellCast
if ((<argn> == 28) || (<argn> == 24) || (<argn> == 32) || (<argn> == 33) || (<argn> == 39) || (<argn> == 40) || (<argn> == 45) || (<argn> == 46) || (<argn> == 47) || (<argn> == 49) || (<argn> == 50) || (<argn> >= 55) || (<argn> >= 44))
src.sysmessage @38,,1 Sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
f_fizzle
return 1
endif
If !(<act.uid> == <src.uid>)
src.sysmessage @38,,1 Sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
return 1
endif

On=@SkillStart
if (<action> == id(skill_hiding)) || (<action> == skill_hiding) || (<action> == id(skill_stealth)) || (<action> == skill_stealth)
src.sysmessage @07a1 Burada bunu yapamazsiniz.
skill fail
return 1
endif
mana <int>
If !(<act.uid> == <src.uid>)
src.sysmessage @38,,1 Bu alanda sadece Kendinize Armor ve stat buyulerini atabilirsiniz.
return 1
endif

on=@itemdclick
if (<act.baseid> == i_shrink_deed) || (<act.baseid> == i_pet_horse) || (<act.baseid> == i_pet_horse_brown_dk) || (<act.baseid> == i_potion_explosiongreat) || (<act.baseid> == i_potion_explosion) || (<act.baseid> == i_potion_explosionless) || (<act.baseid> == i_runebook) || (<act.type> == t_figurine)
src.sysmessage @2028 Bu bolgede kullanilmaz..
return 1
endif





[function paraver]
serv.newitem i_gold
new.amount <eval <obj.tag.bahis>*2>
new.bounce

[Function Kafesle_duel]
//timerf 0,stam 0 // stam sifirlaki yürümesinler.
//src.newitem i_duel_berabere
//src.new.timer <eval 60*10>
//src.new.equip
//src.criminal
//ctag.duello_beraber 1
//src.ctag.duello_beraber 1
//sysmessage @69,,1 Staminiz duello basladiginda fullenecektir.
timerf 9,stam <dex>
timerf 2,hits <str>
timerf 2,mana <int> // stam basabilirsin duello basladi.
// sincerly duello
timerf 0,say 10 saniye sonra basliyor...
timerf 1,sysmessage 9
timerf 2,sysmessage 8
timerf 3,sysmessage 7
timerf 4,sysmessage 6
timerf 5,sysmessage 5
timerf 6,sysmessage 4
timerf 7,sysmessage 3
timerf 8,sysmessage 2
timerf 9,sysmessage 1
timerf 10,say  Basla


SERV.NEWITEM=065
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=066
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,-1
NEW.ATTR=00002
NEW.TIMER=10



[Itemdef i_Kafes_timer]
Name Osman
Id i_handr_1
type t_eq_script

ON=@Create
ATTR attr_decay
MORE1=9
COLOR=0480

ON=@Equip
TIMER=1

ON=@Timer
if ( <cont> )
if ( <more1> )
cont.sysmessage (<more1>)>
more1=<more1>-1
TIMER=1
return 1
endif
endif
Remove
RETURN 1

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

SERV.NEWITEM=065
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,0
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=064
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 0,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=066
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE -1,-1
NEW.ATTR=00002
NEW.TIMER=10

SERV.NEWITEM=063
NEW.TYPE=t_normal
NEW.COLOR=0455
NEW.P=<P>
NEW.MOVE 1,-1
NEW.ATTR=00002
NEW.TIMER=10


Son güncelleme: TheRaskol tarafından 21-02-2021 22:26 GMT, 115 Gün önce düzenlendi.


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

Yazar
Skill Title: Novice
Toplam Mesaj: 35
Oyun Tarzı: Rp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 13
Beğeni: 0
Mesaj #100992   21-02-2021 23:11 GMT    
     
teşekkürler hocam. fakat poison yasak olarak duelloya girselerde poi sürülmemiş silahıda eline alamıyor "Kurallara gore silahta poison yasak." uyarısını poi sürülmemiş silahada veriyor



Yazar
Skill Title: Expert
Toplam Mesaj: 289
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 60
Mesaj #100993   21-02-2021 23:30 GMT    
     
şu kısmı silersen düzelir dostm zaten alta sorgu yapiyor bu kısım gereksiz silmeyi unutmuşm
sistem çalısmama sebebe i_Duello itemini verirken link'i uid' yani itemin uid inine eşitlemiş
itemi alan kişiye linkleynce sorun çözüldü

Script Kodu:
if (<eval <obj.tag.poison>>==0)
//if <act.isevent.t_weapon_poisoned>
src.sysmessage @33,,1 Kurallara gore silahta poison yasak.
return 1
endif
//endif


Son güncelleme: mahsuni tarafından 22-02-2021 00:31 GMT, 115 Gün önce düzenlendi.


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

Yazar
Skill Title: Novice
Toplam Mesaj: 35
Oyun Tarzı: Rp
Emulatör: Sphere
Tecrübe: Diğer
Yaş: 13
Beğeni: 0
Mesaj #100994   22-02-2021 00:38 GMT    
     
Teşekkürler hocam uğraştırdım saolasın. Şu hataları nasıl düzeltirim

Script Kodu:
00:29:ERROR:(Duello_System.scp,658)Undefined keyword 'findlayer(1).cont'.
00:29:ERROR:(Duello_System.scp,668)Undefined keyword 'findlayer(1).cont'.
00:30:ERROR:Undefined keyword 'closealldialogs'.
00:32:ERROR:(Duello_System.scp,886)Undefined keyword 'stone'.
00:32:ERROR:(Duello_System.scp,890)Can't resolve <act.str>.
00:32:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
00:32:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
00:32:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
00:32:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
00:32:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
00:32:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
00:32:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
00:32:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
00:32:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
00:32:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
00:32:ERROR:(Duello_System.scp,788)Can't resolve <findlayer.21.uid>.
00:32:ERROR:(Duello_System.scp,788)FORCONT called with invalid arguments (UID: 00, LEVEL: 10).
00:32:ERROR:(Duello_System.scp,969)Undefined keyword 'findid.i_bleeding.remove'.
00:32:ERROR:(Duello_System.scp,970)Undefined keyword 'findid.i_bleeding2.remove'.
00:32:ERROR:(Duello_System.scp,971)Undefined keyword 'findid.i_rune_poison.remove'.
00:32:ERROR:(Duello_System.scp,972)Undefined symbol 'i_memory_poison_new' [Evaluated expression: 'i_memory_poison_new.remove'].
00:32:ERROR:(Duello_System.scp,972)Undefined keyword 'findid.i_memory_poison_new.remove'.
00:32:ERROR:(Duello_System.scp,980)Undefined keyword 'findid.i_bleeding.remove'.
00:32:ERROR:(Duello_System.scp,981)Undefined keyword 'findid.i_bleeding2.remove'.
00:32:ERROR:(Duello_System.scp,982)Undefined symbol 'i_memory_poison_new' [Evaluated expression: 'i_memory_poison_new.remove'].
00:32:ERROR:(Duello_System.scp,982)Undefined keyword 'findid.i_memory_poison_new.remove'.
00:32:ERROR:(Duello_System.scp,983)Undefined keyword 'findid.i_rune_poison.remove'.



Yazar
Skill Title: Expert
Toplam Mesaj: 289
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 60
Mesaj #100995   22-02-2021 00:44 GMT    
     
Şimdi dostm ben arkadasa denettim bu tarz hatalar meydana gelmedi hatanin hangi oyladan sonra gerçekleştigini belirtirsen daha kolay yardim ederim misal 2.arenadan duello süresi dolduktan sonra gibi. pc ile baglanmiyorm telefondan bağlandıgım için kodlari deneyemiyorm


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

Sayfalar: 1


Benzer Konular :

KonularMesajlarSon gönderenTarih
silaha poison sürülmesi3Eren1994410-06-2021
Japanese Rank Sistemi6Jada22-05-2021
Renk sorunu11mahsuni26-05-2021
Takas Sistemi Yapmak5UltimaOnlineList04-05-2021
Duello Hata Girmiyor Yardım5Eren1994401-05-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