|
İçerde : 1 misafir, 0 üye : ---
|
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
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>.
if (<act.morez> > 1)
act.morez=
src.sysmessage @07a1,1,1 Silahtaki Poi silindi.
endif
[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]
[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
@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 ?
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
[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
|