bu duello sisteminde bir sorun war ancak cozemedim sorunu
adam duello bittikten sonra cesediyle ucuyor duello bittikten sonra gidiceği yere birde duello dayken 2 player den biri oyundan dusunce diğeri orada kalıyor ve kafasında duelling yazıyor...
bide puanlı pvp sistemini ekleyemedim ben bu duello sistemine
[events e_pvpsys]
on=@click
if (0<tag.titleverdikla>)
message @995,9,0 [<tag.puantitle>]
endif
on=@death
if (<act.isevent.e_pvpsys>)
if (<eval <tag.puansux>>=10)
tag.puansux 0
else
tag.puansux <eval <tag.puansux>>-10
endif
if !(0<act.tag.puanci>)
act.tag.puanci 1
act.tag.puansux 1
endif
if (<act.uid> != <uid>)
if (<fame>>9900)
act.tag.puanhesap <eval <act.tag.puanci>>*10
act.smsx Katlettiginiz kisiden <eval <act.tag.puanhesap>> puan aldiniz.
act.tag.puansux <eval <act.tag.puansux>+<act.tag.puanhesap>>
act.komutaatlalan
elseif (<fame>>9000)
act.tag.puanhesap <eval <act.tag.puanci>>*9
act.smsx Katlettiginiz kisiden <eval <act.tag.puanhesap>> puan aldiniz.
act.tag.puansux <eval <act.tag.puansux>+<act.tag.puanhesap>>
act.komutaatlalan
elseif (<fame>>8000)
act.tag.puanhesap <eval <act.tag.puanci>>*8
act.smsx Katlettiginiz kisiden <eval <act.tag.puanhesap>> puan aldiniz.
act.tag.puansux <eval <act.tag.puansux>+<act.tag.puanhesap>>
act.komutaatlalan
elseif (<fame>>7000)
act.tag.puanhesap <eval <act.tag.puanci>>*7
act.smsx Katlettiginiz kisiden <eval <act.tag.puanhesap>> puan aldiniz.
act.tag.puansux <eval <act.tag.puansux>+<act.tag.puanhesap>>
act.komutaatlalan
elseif (<fame>>6000)
act.tag.puanhesap <eval <act.tag.puanci>>*6
act.smsx Katlettiginiz kisiden <eval <act.tag.puanhesap>> puan aldiniz.
act.tag.puansux <eval <act.tag.puansux>+<act.tag.puanhesap>>
act.komutaatlalan
elseif (<fame>>5000)
act.tag.puanhesap <eval <act.tag.puanci>>*5
act.smsx Katlettiginiz kisiden <eval <act.tag.puanhesap>> puan aldiniz.
act.tag.puansux <eval <act.tag.puansux>+<act.tag.puanhesap>>
act.komutaatlalan
elseif (<fame>>4000)
act.tag.puanhesap <eval <act.tag.puanci>>*4
act.smsx Katlettiginiz kisiden <eval <act.tag.puanhesap>> puan aldiniz.
act.tag.puansux <eval <act.tag.puansux>+<act.tag.puanhesap>>
act.komutaatlalan
elseif (<fame>>3000)
act.tag.puanhesap <eval <act.tag.puanci>>*3
act.smsx Katlettiginiz kisiden <eval <act.tag.puanhesap>> puan aldiniz.
act.tag.puansux <eval <act.tag.puansux>+<act.tag.puanhesap>>
act.komutaatlalan
elseif (<fame>>2500)
act.tag.puanhesap <eval <act.tag.puanci>>*2
act.tag.komutaatlalan
act.smsx Katlettiginiz kisiden <eval <act.tag.puanhesap>> puan aldiniz.
act.tag.puansux <eval <act.tag.puansux>+<act.tag.puanhesap>>
act.komutaatlalan
elseif (<fame><2500)
act.smsx Katlettiginiz kisiden puan alamadiniz.
endif
endif
endif
[function komutaatlalan]
sms asd
if (<eval <tag.puansux>> > 1999)
tag.puanci 6
tag.titleverdikla 1
tag.puantitle Title Buraya
elseif (<eval <tag.puansux>> >999)
tag.puanci 5
tag.titleverdikla 1
tag.puantitle Title Buraya
elseif (<eval <tag.puansux>> >499)
tag.puanci 4
tag.titleverdikla 1
tag.puantitle Title Buraya
elseif (<eval <tag.puansux>> >246)
tag.puanci 3
tag.titleverdikla 1
tag.puantitle Title Buraya
elseif (<eval <tag.puansux>> >99)
tag.puanci 2
tag.titleverdikla 1
tag.puantitle Title Buraya
endif
[plevel 1]
duel
duelwin
[Function duel]
src.smX *Bugune kadar <src.tag.duelwin> duello kazanmissiniz.
[itemdef i_res_pad]
id=i_rune_alchem_6
name Res Tasi
On=@Create
attr attr_invis
on=@step
src.spelleffect s_resurrection 1000
src
src.sayua 920,6,6,0
[Defname Pvpuid]
Duelstone 0400077c9
OSman 09cbb
Armi
/////////////////////
// ITEMS
////////////////////
[Itemdef i_link_them]
Name = Linkci basi
ID = i_handr_1
Type = t_eq_script
[Itemdef i_stone_pvp]
Name = Duello Tasi
ID i_grave_Stone
Type = t_script
ON=@Create
Color=0b65
ATTR attr_move_never | attr_decay
TAG.Daveteden
TAG.daveteden_uid
TAG.scripter asd
ON=@Click
IF (<src.account.plevel>>2)&&(<src.tag.special>>0)
message Uid: <uid>
endif
message @021,,1 Querra Uo <name>
return 1
ON=@DClick
IF (<src.findlayer(25)>)
src.sysmessage @095,,1 Duelloya Binekli Katilamazsiniz..!
return 1
ELSE
Target
src.Smg Karsilasmak istediginiz kisiyi seciniz.
Endif
return 1
ON=@Targon_Char
IF <src.targ.npc>
src.sms * Bu fonksiyon sadece oyuncular icin gecerlidir!
ELSEIF (<src.targ.uid>==<src.uid>)
src.sms * Kendinizi secemezsiniz !
ELSE
Timer 5
Var.Old_act <src.act>
Tag.teklifeden <src.name>
Var.teklifeden_uid <src.uid>
Link <src.targ.uid>
If <link.findid.i_dialog.uid>
link.i_dialog.timer 1
endif
link.newitem i_dialog
link.act.cont <link.serial>
link.act.timer 0
src.act <var.Old_act>
ENDIF
return 1
ON=@Targon_item
return 1
//////////////////////////////////
// DIALOGZ
/////////////////////////////////
[Function Cagri]
var.br <br
var.center <center
var.centerb </center
var.a <a href=
var.ab </a
var.b <b
var.bb </b
var.font1 <basefont color=black
var.font2 <basefont color=Darkred
dialog d_cagri
endif
[dialog d_cagri]
150,100
Nomove
resizepic 0 0 3600 320 190
resizepic 20 25 3000 280 150
htmlgump 20 15 280 65 0 1 1 // Text 0
Button 35 95 4006 4007 1 0 1
Button 35 135 4018 4019 1 0 0
Text 70 95 1152 1 // Text 1
Text 70 135 1152 2 // Text 2
[dialog d_cagri TEXT]
<var.font2>><src.uid.duelstone.tag.teklifeden> <var.font1>>size Duello teklif ediyor. Kabul ediyor musunuz ?
Kabul ediyorum.
Hayir, kabul etmiyorum.
[dialog d_cagri BUTTON]
ON=1
if (<var.duel>==1)
src.sysmessage @056,,1 Suanda Baska Biri Duello Yapiyor..!
ELSEIF (<src.findlayer(25)>)
src.sysmessage @095,,1 Duelloya Binekli Katilamazsiniz..!
else
Var.Duel 1
serv.allclients smg ** PvP Basliyor **
serv.allclients smg <src.uid.duelstone.tag.teklifeden> vs. <src.name> [10 saniye]
Alansec
pvpbasla
ENDIF
ON=0
sms *Duello reddedildi.
try uid.<var.teklifeden_uid>.smg * Duello reddedildi.
Try uid.duelstone.link 0
/////////////////////////////////////
// SPECIAL FONKSIYONU
////////////////////////////////////
[plevel 2]
special
[Function Special]
IF (strmatch(<args>,1))
tag.special 1
sysmessage Special ON
return 1
endif
IF (<tag.special>>0)
tag.special 0
Sysmessage Special OFF
else
tag.special 1
sysmessage Special ON
endif
///////////////////////////////////
// FLY FONKSIYONU
///////////////////////////////////
[Function fly]
p <args>
fix
///////////////////////////////////
// DIALOG FONKSIYONU
//////////////////////////////////
[Itemdef i_dialog]
Name dialoger
id i_handr_1
Type t_eq_script
ON=@Create
ATTR attr_decay
ON=@Unequip
cont.cagri
ON=@Timer
remove
/////////////////////////////////
// RONDOM AREA FONKSIYONU
/////////////////////////////////
[Function alansec]
//Dorand 3
VAR.X 1
//VAR.X 2
//VAR.X 3
//enddo
IF (X==1)
IF !((<src.findlayer(25)>) || (<<uid.<var.teklifeden_uid>.findlayer(25)>))
src.sysmessage @095,,1 Duelloya Binekli Katilamazsiniz..!
try src.tag.karma1 <src.karma>
try src.tag.fame1 <src.fame>
try src.tag.kills1 <src.kills>
try src.karma -3000
try src.fame 0
try fly 5399,1238
try uid.<var.teklifeden_uid>.fly 5407,1238
try uid.<var.teklifeden_uid>.tag.karma1 <src.karma>
try uid.<var.teklifeden_uid>.tag.fame1 <src.fame>
try uid.<var.teklifeden_uid>.tag.kills1 <src.fame>
try uid.<var.teklifeden_uid>.karma -3000
try uid.<var.teklifeden_uid>.fame 0
ENDIF
//elseif (X==2)
//fly 5399,1238
//try uid.<var.teklifeden_uid>.fly 5399,1238
//elseif (X==3)
//fly 5399,1238
//try uid.<var.teklifeden_uid>.fly 5399,1238
endif
//////////////////////////////////
// KAFES FONKSIYONU
//////////////////////////////////
[plevel 7]
pvpbasla
[Function PvPbasla]
Var.old_act <act>
newitem i_kafes_timer
act.equip
Kafesle_duel
Newitem i_kafes_timer
act.cont <uid.<var.teklifeden_uid>.serial>
act.timer 1
Try uid.<var.teklifeden_uid>.kafesle_duel
act <var.old_act>
events +e_pvp
try uid.<var.teklifeden_uid>.events +e_pvp
[Function Kafesle_duel]
NEWITEM=0822
ACT.TYPE=t_normal
ACT.COLOR=0b4d
ACT.P=<P>
ACT.MOVE 1,1
ACT.ATTR=00002
ACT.TIMER=10
NEWITEM=0821
ACT.TYPE=t_normal
ACT.COLOR=0b4d
ACT.P=<P>
ACT.MOVE 1,0
ACT.ATTR=00002
ACT.TIMER=10
NEWITEM=0821
ACT.TYPE=t_normal
ACT.COLOR=0b4d
ACT.P=<P>
ACT.MOVE -1,0
ACT.ATTR=00002
ACT.TIMER=10
NEWITEM=0821
ACT.TYPE=t_normal
ACT.COLOR=0b4d
ACT.P=<P>
ACT.MOVE -1,1
ACT.ATTR=00002
ACT.TIMER=10
NEWITEM=0823
ACT.TYPE=t_normal
ACT.COLOR=0b4d
ACT.P=<P>
ACT.MOVE 0,1
ACT.ATTR=00002
ACT.TIMER=10
NEWITEM=0823
ACT.TYPE=t_normal
ACT.COLOR=0b4d
ACT.P=<P>
ACT.MOVE 0,1
ACT.ATTR=00002
ACT.TIMER=10
NEWITEM=0823
ACT.TYPE=t_normal
ACT.COLOR=0b4d
ACT.P=<P>
ACT.MOVE 0,-1
ACT.ATTR=00002
ACT.TIMER=10
NEWITEM=0823
ACT.TYPE=t_normal
ACT.COLOR=0b4d
ACT.P=<P>
ACT.MOVE 1,-1
ACT.ATTR=00002
ACT.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 <VALSTR(<more1>)>
more1=<more1>-1
TIMER=1
return 1
endif
endif
cont.sayua 920,6,6,0 * Basla *
Remove
RETURN 1
//////////////////////////////
// EVENTZ
//////////////////////////////
[Events e_Pvp]
ON=@Click
Message @56,,1 [Duelling]
ON=@Death
var.duel 0
Serv.allclients SMX <src.act.name>, <src.name>'i teke tek duelloda yendi.
//src.resurrect
fly 3767,1295 // OLUM ALANI
src.act.fly 3767,1295
src.pvpbiter
src.act.pvpbiter //CRIMSIZLIK SCP SI
src.act.hits <src.act.str> // KAZANMA ALANI
src.act.tag.duelwin=<src.act.tag.duelwin>+1
src.act.events -e_pvp
events -e_pvp
src.hits 0
return 1
ON=@Logout
var.duel 0
Serv.allclients SMX <src.name>, <src.act.name> ile kapisirken oyundan cikti!
hits 25
fly 3767,1295 // OLUM ALANI
src.pvpbiter
src.act.pvpbiter
src.hits 0
//src.act.hits <src.act.str>
src.act.fly 3767,1295 // KAZANMA ALANI
src.act.events -e_pvp
src.act.tag.duelwin=<src.act.tag.duelwin>+1
events -e_pvp
[function duelwin]
src.sysmessage @045,,1 Kazandiginiz Duello Sayisi: <src.tag.duelwin>
///////////////////////////////////////////////////////////////////////////////////7
[ITEMDEF i_duel_res]
id=i_rune_alchem_6
type=t_eq_script
name=Duel Res Tasi
On=@Create
ATTR=08010
color=0b81
on=@click
MESSAGE @0482,,1 <NAME>
return 1
on=@step
//if <statf> & STATF_DEAD
src.resurrect
//src.move 1
//src.sayua 0452,6,0,0 * Hayata Doner *
return 1
//else
//src.sysmessage @0482,,1 Sadece olu iken kullanilir.
//return 1
[ITEMDEF i_duel_doymaz]
id=i_deed
type=t_eq_script
name=Yenilen Pehlivan Gurese Doymazmis.
on=@create
attr=08010
color=0b86
on=@click
MESSAGE @0481,,1 Ozguven DEED
Src.message @021,,1 <NamE>
return 1
on=@dclick
SRC.SYSMESSAGE @021,,1 Bence Busefer Yeneceksin. Kendine Guven Sansini Bidaha Dene...
src.sysmessafe @0481,,1 Ne Kaybedersin ki....
return 1
///////////////////////////////////////////////////////////////////////////////////////////
[ITEMDEF i_duel_gate]
ID=0f6c
TYPE=0
NAME=Duel Cikis Gate
ON=@CREATE
COLOR=07b8
RETURN 1
ON=@STEP
SRC.DIALOG d_duelcik
SRC.MOVE 1
return 1
ON=@DCLICK
SRC.targ.message @021,,1 <name>
return 1
ON=@CLICK
SRC.targ.MESSAGE @021,,1 <name>
return 1
[DIALOG d_duelcik]
50, 20
page 0
nomove
noclose
resizepic 60 84 5120 183 363
gumppic 72 52 10440
gumppic 16 -2 10440
gumppic 217 -2 10441
text 92 96 5 0
button 90 119 1209 1210 1 0 1
button 90 146 1209 1210 1 0 2
button 90 173 1209 1210 1 0 3
button 90 200 1209 1210 1 0 4
button 90 227 1209 1210 1 0 5
button 90 254 1209 1210 1 0 6
button 90 281 1209 1210 1 0 7
button 90 308 1209 1210 1 0 8
button 90 400 1209 1210 1 0 9
button 90 335 1209 1210 1 0 10
text 110 117 5 1
text 110 144 5 2
text 110 171 5 3
text 110 198 5 4
text 110 225 5 5
text 110 252 5 6
text 110 279 5 7
text 110 306 5 8
text 110 398 5 9
text 110 333 5 10
[DIALOG d_duelcik TEXT]
Gidiceginiz Yeri Secin
Britain
Moonglow
Minoc
Skara Brae
Jhelom
Trinsic
Yew
Bucaneer's Den
Kapat!!!
Delucia
[DIALOG d_duelcik BUTTON]
ON=1
IF ( <SRC.FLAGS> & 000000002 )
src.resurrect
src.hits=<str>
src.smg Sayin <name>, Duelloda yenik dustunuz, Tekrar bekleriz.
src.sayua 920,6,6,0 *Pvp de kaybetti*
ELSE
SRC.SMG Sayin <NAME>, Querra Uo Duello Alanindan Galibiyetle Ayrildiniz, Tekrar Bekleriz.
src.sayua 920,6,6,0 *Pvp de kazandi*
ENDIF
src.go britain
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=2
IF ( <SRC.FLAGS> & 000000002 )
src.resurrect
src.hits=<str>
src.smg Sayin <name>, Duelloda yenik dustunuz, Tekrar bekleriz.
src.sayua 920,6,6,0 *Pvp de kaybetti*
ELSE
SRC.SMG Sayin <NAME>, Querra Uo Duello Alanindan Galibiyetle Ayrildiniz, Tekrar Bekleriz.
src.sayua 920,6,6,0 *Pvp de kazandi*
ENDIF
src.go moonglow
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=3
IF ( <SRC.FLAGS> & 000000002 )
src.resurrect
src.hits=<str>
src.smg Sayin <name>, Duelloda yenik dustunuz, Tekrar bekleriz.
src.sayua 920,6,6,0 *Pvp de kaybetti*
ELSE
SRC.SMG Sayin <NAME>, Querra Uo Duello Alanindan Galibiyetle Ayrildiniz, Tekrar Bekleriz.
src.sayua 920,6,6,0 *Pvp de kazandi*
ENDIF
src.go minoc
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=4
IF ( <SRC.FLAGS> & 000000002 )
src.resurrect
src.hits=<str>
src.smg Sayin <name>, Duelloda yenik dustunuz, Tekrar bekleriz.
src.sayua 920,6,6,0 *Pvp de kaybetti*
ELSE
SRC.SMG Sayin <NAME>, Querra Uo Duello Alanindan Galibiyetle Ayrildiniz, Tekrar Bekleriz.
src.sayua 920,6,6,0 *Pvp de kazandi*
ENDIF
src.go skara brae
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=5
IF ( <SRC.FLAGS> & 000000002 )
src.resurrect
src.hits=<str>
src.smg Sayin <name>, Duelloda yenik dustunuz, Tekrar bekleriz.
src.sayua 920,6,6,0 *Pvp de kaybetti*
ELSE
SRC.SMG Sayin <NAME>, Querra Uo Duello Alanindan Galibiyetle Ayrildiniz, Tekrar Bekleriz.
src.sayua 920,6,6,0 *Pvp de kazandi*
ENDIF
src.go jhelom
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=6
IF ( <SRC.FLAGS> & 000000002 )
src.resurrect
src.hits=<str>
src.smg Sayin <name>, Duelloda yenik dustunuz, Tekrar bekleriz.
src.sayua 920,6,6,0 *Pvp de kaybetti*
ELSE
SRC.SMG Sayin <NAME>, Querra Uo Duello Alanindan Galibiyetle Ayrildiniz, Tekrar Bekleriz.
src.sayua 920,6,6,0 *Pvp de kazandi*
ENDIF
src.go trinsic
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=7
IF ( <SRC.FLAGS> & 000000002 )
src.resurrect
src.hits=<str>
src.smg Sayin <name>, Duelloda yenik dustunuz, Tekrar bekleriz.
src.sayua 920,6,6,0 *Pvp de kaybetti*
ELSE
SRC.SMG Sayin <NAME>, Querra Uo Duello Alanindan Galibiyetle Ayrildiniz, Tekrar Bekleriz.
src.sayua 920,6,6,0 *Pvp de kazandi*
ENDIF
src.go yew
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=8
IF ( <SRC.FLAGS> & 000000002 )
src.resurrect
src.hits=<str>
src.smg Sayin <name>, Duelloda yenik dustunuz, Tekrar bekleriz.
src.sayua 920,6,6,0 *Pvp de kaybetti*
ELSE
SRC.SMG Sayin <NAME>, Querra Uo Duello Alanindan Galibiyetle Ayrildiniz, Tekrar Bekleriz.
src.sayua 920,6,6,0 *Pvp de kazandi*
ENDIF
src.go 2706,2163
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=9
src.smg Menu Kapandi!!!
ON=10
IF ( <SRC.FLAGS> & 000000002 )
src.resurrect
src.hits=<str>
src.smg Sayin <name>, Duelloda yenik dustunuz, Tekrar bekleriz.
src.sayua 920,6,6,0 *Pvp de kaybetti*
ELSE
SRC.SMG Sayin <NAME>, Querra Uo Duello Alanindan Galibiyetle Ayrildiniz, Tekrar Bekleriz.
src.sayua 920,6,6,0 *Pvp de kazandi*
ENDIF
src.go delucia
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
///////////////////
[FUNCTION pvpevent]
NEWITEM i_karmakorur
ACT.CONT <UID>
ACT.TARGET @056,,1 Kime PvP Event'i Verilecek?
[ITEMDEF i_karmakorur]
ID=i_memory
TYPE=t_eq_script
ON=@Create
timer=1
attr=attr_invis | Attr_decay
equip
ON=@Timer
REMOVE
RETURN 1
on=@targon_ground
return 1
on=@targon_item
return 1
on=@targon_char
src.targ.tag.karma1 <src.targ.karma>
src.targ.tag.fame1 <src.targ.fame>
src.targ.tag.kills1 <src.targ.kills>
src.targ.karma -3000
src.targ.fame 0
src.targ.events +e_pvpci
src.sysmessage @056,,1 PvP Eventi Eklendi.
return 1
[events e_pvpci]
on=@click
message @56,,1 [Savasiyor]
on=@death
src.pvpbiter
src.act.pvpbiter
src.sysmessage @056,,1 Turnuvadan Elendiniz..!!
src.hits 0
src.act.stone
src.act.sysmessage @056,,1 Bu raundun galibisiniz..!!
src.act.hits <src.act.str>
src.events -e_pvpci
src.act.events -e_pvpci
return 1
[function pvpbiter]
src.newitem i_equipper
src.act.cont <src.targ.uid>
src.act.timer 1
[itemdef i_equipper]
name olmesin adamcagiz
weight 0
id i_gold
type t_eq_script
layer layer_special
on=@create
attr=attr_invis|attr_decay
return 1
On=@UnEquip
try src.karma <src.tag.karma1>
try src.fame <src.tag.fame1> //OLEN EZUK
try src.kills <src.tag.kills1>
return 1
on=@timer
remove
return 1
[EOF]
