Duello Sistemi

Aşşağıda gordugunuz duello sistemini Bolumlere ayırmak istedim. 3 Bolum
Pvp Bolum 1 2 3 Gibi. Fakat Targeti Gormedi teklif ederken On=@Targonchar yerini gormuyor Scp de bu.

[plevel 1]
duell
duelwin

[Function duell]
src.sysmessage @1953,1,1,1 *Bugune kadar <src.tag.duelwins> 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   04001247a
Osman		09cbb
Armi


/////////////////////
//	ITEMS
////////////////////
[Itemdef i_link_them]
Name = Linkci basi
ID = i_handr_1
Type = t_eq_script


[Itemdef i_duello_pvpp]
Name = Duello Tasi
ID i_gravestone_17
Type = t_script

ON=@Create
Color=1983
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)
endif
message @1953,1,1,1 <name>
message @1955,1,1,1 [ NotoriouS ]
return 1

ON=@DClick
if (<distance> >3)
src.sysmessage @1953,1,1,1 Ulasamiyorsunuz.
return 1
else
src.dialog d_duelo
return 1

[dialog d_duelo]
150, 100
PAGE 0
resizepic 120 00 83 220 130
resizepic 120 00 3500 220 130

PAGE 1
htmlgump 180 23 200 20 0 0 0
htmlgump 175 42 150 30 1 0 0
htmlgump 175 62 150 30 2 0 0
htmlgump 175 82 150 30 3 0 0

button 155 44 2511 2510 1 1 1
button 155 64 2511 2510 2 2 2
button 155 84 2511 2510 3 3 3

[DIALOG d_duelo TEXT]
Duello Menusu
PvP Bolum 1
PvP Bolum 2
PvP Bolum 3

[dialog d_duelo button]
ONBUTTON=0
SRC.SYSMESSAGE @1953,1,1,1 Dialogu kapattiniz!
on=1
IF (<src.findlayer(25)>)
src.sysmessage @1953,1,1,1 Duelloya Binekli Katilamazsiniz..!
return 1
ELSE
Target
src.Sysmessage @1965,1,1,1 Karsilasmak istediginiz kisiyi seciniz.
endif

On=@targonchar   BURAYI GALİBA GORMUYOR BİRİSİNE TEKLİF EDİNCE ''' Targetted item is gone ? '''' Diyor.
ELSEIF <src.targ.npc>
src.sysmessage @1965,1,1,1 * Bu fonksiyon sadece oyuncular icin gecerlidir! *
ELSEIF (<src.targ.uid>==<src.uid>)
src.sysmessage @1953,1,1,1 * Kendinizi secemezsiniz ! *
ELSE

Timer 6
Var.Old_act <src.act>
Tag.teklifeden <src.name>
Var.teklifeden_uid <src.uid>

Link <src.targ.uid>
	If <link.findid.i_dialogg.uid>
		link.i_dialogg.timer 1
	endif
link.newitem i_dialogg
link.act.cont <link.serial>
link.act.timer 0

src.act <var.Old_act>

ENDIF
return 1

ON=@targon_item
return 1

//////////////////////////////////
//		DIALOGZ
/////////////////////////////////
[Function Cagrii]
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_cagrii
endif

[dialog d_cagrii]
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_cagrii TEXT]
Guclu Bir player size Duello teklif ediyor. Kabul ediyor musunuz ?
Kabul ediyorum.
Hayir, kabul etmiyorum.

[dialog d_cagrii BUTTON]
ON=1
if (<var.duel>==1)
	src.sysmessage @1965,1,1,1 Suanda Baska Biri Duello Yapiyor..!

ELSEIF (<src.findlayer(25)>)
	src.sysmessage @1953,1,1,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]
	Alansecc
	pvpbaslaa
ENDIF

ON=0
src.sysmessage @1953,1,1,1 *Duello reddedildi.

/////////////////////////////////////
//	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_dialogg]
Name dialoger
id i_handr_1
Type t_eq_script

ON=@Create
ATTR attr_decay

ON=@Unequip
cont.cagrii

ON=@Timer
remove


/////////////////////////////////
//	RONDOM AREA FONKSIYONU
/////////////////////////////////
[Function alansecc]
//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 @1953,1,1,1 Basarilar Dilerim..
		try src.tag.karma1 <src.karma>
		try src.tag.fame1 <src.fame>
		try src.tag.kills1 <src.kills>
		try src.karma 2000
		try src.fame 0
		try fly 5801,783

		try uid.<var.teklifeden_uid>.fly 5801,767
		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 2000
		try uid.<var.teklifeden_uid>.fame 0
	ENDIF

//////////////////////////////////
//	KAFES FONKSIYONU
//////////////////////////////////

[Function PvPbaslaa]
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=079a
ACT.P=<P> 
ACT.MOVE 1,1 
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0821
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE 1,0
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0821
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE -1,0
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0821
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE -1,1
ACT.ATTR=00002 
ACT.TIMER=10


NEWITEM=0823
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE 0,1
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0823
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE 0,1
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0823
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE 0,-1
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0823
ACT.TYPE=t_normal 
ACT.COLOR=079a
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 0481,6,6,0 * Basla *
Remove
RETURN 1

//////////////////////////////
//	EVENTZ
//////////////////////////////

[Events e_Pvp]
ON=@Click
Message @56,,1 [Duelling]


ON=@Death
var.duel 0
src.Serv.allclients y <src.act.name>, <src.name>'i Duelloda Yenmeyi Basardi.
src.resurrect
src.act.resurrect
src.res
src.act.res
src.go nujel'm	      // OLUM ALANI
src.act.go nujel'm
src.karma <src.tag.karma1>
src.fame <src.tag.fame1>					//OLEN EZUK
src.kills <src.tag.kills1>
src.pvpbiter
src.act.pvpbiter		//CRIMSIZLIK SCP SI
src.act.hits <src.act.100>		   				 // KAZANMA ALANI
src.act.tag.duelwin=<src.act.tag.duelwin>+1
src.act.events -e_pvp
events -e_pvp
src.hits 100
return 1

ON=@Logout
var.duel 0
Serv.allclients duyuru <src.name>, <src.act.name> ile kapisirken oyundan cikti!
src.resurrect
src.act.resurrect
src.res
src.act.res
src.go nujel'm	      // OLUM ALANI
src.act.go nujel'm
src.karma <src.tag.karma1>
src.fame <src.tag.fame1>					//OLEN EZUK
src.kills <src.tag.kills1>
src.pvpbiter
src.act.pvpbiter		//CRIMSIZLIK SCP SI
src.act.hits <src.act.100>		   				 // KAZANMA ALANI
src.act.tag.duelwin=<src.act.tag.duelwin>+1
src.act.events -e_pvp
events -e_pvp
src.hits 100
return 1

[function duelwin]
src.sysmessage @1965,1,1,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 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 Ozguven Deed
Src.message <name>
return 1

on=@dclick
SRC.SYSMESSAGE Bence Busefer Yeneceksin. Kendine Guven Sansini Bidaha Dene...
src.sysmessafe Ne Kaybedersin ki....
return 1

///////////////////////////////////////////////////////////////////////////////////////////
[ITEMDEF i_travgate2]
ID=0f6c
TYPE=0 
NAME=NotoriouS Gate

ON=@CREATE
COLOR=07c4
RETURN 1

ON=@STEP
SRC.DIALOG d_duelcik
SRC.MOVE 1
return 1

ON=@DCLICK
SRC.DIALOG d_duelcik
return 1

ON=@CLICK
message @1953,1,1,1 NotoriouS Moongate
message @1965,1,1,1 Sehir Gate
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 0455 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 0455 1
text 110 144 0455 2
text 110 171 0455 3
text 110 198 0455 4
text 110 225 0455 5
text 110 252 0455 6
text 110 279 0455 7
text 110 306 0455 8
text 110 398 0455 9
text 110 333 0455 10



[DIALOG d_duelcik TEXT]
Gideceginiz Yer..

Safe Alani
Moonglow
Britain
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
ENDIF
src.go Nujel'm
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=2
IF ( <SRC.FLAGS> & 000000002 )
 src.resurrect
 src.hits=<str>
 src.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
ENDIF
src.go 1417,1669,10
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=4
IF ( <SRC.FLAGS> & 000000002 )
 src.resurrect
 src.hits=<str>
 src.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 90481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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 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 2000
src.targ.fame 0
src.targ.events +e_pvpci
src.sysmessage PvP Eventi Eklendi.
return 1


[events e_pvpci]
on=@click
message @56,,1 [Savasiyor]

on=@death
src.pvpbiter
src.act.pvpbiter
src.karma
src.sysmessage Turnuvadan Elendiniz..!!
src.hits 0
src.act.stone
src.act.sysmessage 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=04
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]

Aynen soyle diyor. '''' Targetted item is gone ? ''''' teklfi ettiğin targeti gormuyor galiba.

Nexiel Bi bakarmısn buna Diger Buttonlarada verdik ama gelmedi. birinde dolu olunca onlardada dolu diyor.

[plevel 1]
duell
duelwin

[Function duell]
src.sysmessage @1953,1,1,1 *Bugune kadar <src.tag.duelwins> 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 04001247a
Osman 09cbb
Armi

[Itemdef i_link_them]
Name = Linkci basi
ID = i_handr_1
Type = t_eq_script

[Itemdef i_duello_pvpp]
Name = Duello Tasi
ID i_gravestone_17
type t_script

ON=@Create
Color=1983
ATTR attr_move_never | attr_decay
TAG.Daveteden
TAG.daveteden_uid
TAG.scripter asd

ON=@Click
message @1953,1,1,1 <name>
message @1955,1,1,1 [ NotoriouS ]
return 1

ON=@DClick
if (<distance> >3)
src.sysmessage @1953,1,1,1 Ulasamiyorsunuz.
return 1
else
src.dialog d_duelo
return 1

[dialog d_duelo]
150, 100
PAGE 0
resizepic 120 00 83 220 130
resizepic 120 00 3500 220 130

PAGE 1
htmlgump 180 23 200 20 0 0 0
htmlgump 175 42 150 30 1 0 0
htmlgump 175 62 150 30 2 0 0
htmlgump 175 82 150 30 3 0 0

button 155 44 2511 2510 1 1 1
button 155 64 2511 2510 2 2 2
button 155 84 2511 2510 3 3 3

[DIALOG d_duelo TEXT]
Duello Menusu
PvP Bolum 1
PvP Bolum 2
PvP Bolum 3

[dialog d_duelo button]
ONBUTTON=0
SRC.SYSMESSAGE @1953,1,1,1 Dialogu kapattiniz!
on=1
IF (<src.findlayer(25)>)
src.sysmessage @1953,1,1,1 Duelloya Binekli Katilamazsiniz..!
return 1
ELSE
serv.newitem i_duello
new.equip
endif
on=2
IF (<src.findlayer(25)>)
src.sysmessage @1953,1,1,1 Duelloya Binekli Katilamazsiniz..!
return 1
ELSE
serv.newitem i_duelloo
new.equip
endif
on=3
IF (<src.findlayer(25)>)
src.sysmessage @1953,1,1,1 Duelloya Binekli Katilamazsiniz..!
return 1
ELSE
serv.newitem i_duellooo
new.equip
endif

[itemdef i_duellooo]
id i_memory
type t_eq_script
name duello

on=@equip
target @53,1,1,1 Duello yapacaginiz oyuncuyu seciniz..

on=@targon_cancel
remove

on=@timer
remove
return 1

on=@targon_char
if (<src.targ.isplayer>) && (<src.targ.uid> != <src.uid>)
Timer 4
Var.Old_act <src.act>
Tag.teklifeden <src.name>
Var.teklifeden_uid <src.uid>

Link <src.targ.uid>
If <link.findid.i_dialogggg.uid>
link.i_dialogggg.timer 1
endif
link.newitem i_dialogggg
link.act.cont <link.serial>
link.act.timer 0

src.act <var.Old_act>

ENDIF
return 1

ON=@targon_item
return 

[itemdef i_duelloo]
id i_memory
type t_eq_script
name duello

on=@equip
target @53,1,1,1 Duello yapacaginiz oyuncuyu seciniz..

on=@targon_cancel
remove

on=@timer
remove
return 1

on=@targon_char
if (<src.targ.isplayer>) && (<src.targ.uid> != <src.uid>)
Timer 4
Var.Old_act <src.act>
Tag.teklifeden <src.name>
Var.teklifeden_uid <src.uid>

Link <src.targ.uid>
If <link.findid.i_dialoggg.uid>
link.i_dialoggg.timer 1
endif
link.newitem i_dialoggg
link.act.cont <link.serial>
link.act.timer 0

src.act <var.Old_act>

ENDIF
return 1

ON=@targon_item
return 

[itemdef i_duello]
id i_memory
type t_eq_script
name duello

on=@equip
target @53,1,1,1 Duello yapacaginiz oyuncuyu seciniz..

on=@targon_cancel
remove

on=@timer
remove
return 1

on=@targon_char
if (<src.targ.isplayer>) && (<src.targ.uid> != <src.uid>)
Timer 4
Var.Old_act <src.act>
Tag.teklifeden <src.name>
Var.teklifeden_uid <src.uid>

Link <src.targ.uid>
If <link.findid.i_dialogg.uid>
link.i_dialogg.timer 1
endif
link.newitem i_dialogg
link.act.cont <link.serial>
link.act.timer 0

src.act <var.Old_act>

ENDIF
return 1

ON=@targon_item
return 1

[Function Cagrii]
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_cagrii
endif

[dialog d_cagrii]
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_cagrii TEXT]
<var.teklifeden_uid> size Duello teklif ediyor. Kabul ediyor musunuz ?
Kabul ediyorum.
Hayir, kabul etmiyorum.

[dialog d_cagrii BUTTON]
ON=1
if (<var.duel>==1)
src.sysmessage @1965,1,1,1 Suanda Baska Biri Duello Yapiyor..!

ELSEIF (<src.findlayer(25)>)
src.sysmessage @1953,1,1,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]
Alansecc
pvpbaslaa
ENDIF

ON=0
src.sysmessage @1953,1,1,1 *Duello reddedildi.

[Function Cagriii]
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_cagriii
endif

[dialog d_cagriii]
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_cagriii TEXT]
<var.teklifeden_uid> size Duello teklif ediyor. Kabul ediyor musunuz ?
Kabul ediyorum.
Hayir, kabul etmiyorum.

[dialog d_cagriii BUTTON]
ON=1
if (<var.duel>==1)
src.sysmessage @1965,1,1,1 Suanda Baska Biri Duello Yapiyor..!

ELSEIF (<src.findlayer(25)>)
src.sysmessage @1953,1,1,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]
Alanseccc
pvpbaslaa
ENDIF

ON=0
src.sysmessage @1953,1,1,1 *Duello reddedildi.

[Function Cagriiii]
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_cagriiii
endif

[dialog d_cagriiii]
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_cagriiii TEXT]
<var.teklifeden_uid> size Duello teklif ediyor. Kabul ediyor musunuz ?
Kabul ediyorum.
Hayir, kabul etmiyorum.

[dialog d_cagriiii BUTTON]
ON=1
if (<var.duel>==1)
src.sysmessage @1965,1,1,1 Suanda Baska Biri Duello Yapiyor..!

ELSEIF (<src.findlayer(25)>)
src.sysmessage @1953,1,1,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]
Alansecccc
pvpbaslaa
ENDIF

ON=0
src.sysmessage @1953,1,1,1 *Duello reddedildi.

/////////////////////////////////////
// SPECIAL FONKSIYONU
////////////////////////////////////
[plevel 2]
special

[Function Special]
IF (strmatch(<args>,1))
tag.special 1
sysmessage @1953,1,1,1 Special ON
return 1
endif

IF (<tag.special>>0)
tag.special 0
Sysmessage @1953,1,1,1 Special OFF
else
tag.special 1
sysmessage @1953,1,1,1 Special ON
endif


///////////////////////////////////
// FLY FONKSIYONU
///////////////////////////////////
[Function fly]
p <args>
fix

///////////////////////////////////
// DIALOG FONKSIYONU
//////////////////////////////////
[Itemdef i_dialogg]
Name dialoger
id i_handr_1
Type t_eq_script

ON=@Create
ATTR attr_decay

ON=@Unequip
cont.cagrii

ON=@Timer
remove

[Itemdef i_dialoggg]
Name dialoger
id i_handr_1
Type t_eq_script

ON=@Create
ATTR attr_decay

ON=@Unequip
cont.cagriii

ON=@Timer
remove

[Itemdef i_dialogggg]
Name dialoger
id i_handr_1
Type t_eq_script

ON=@Create
ATTR attr_decay

ON=@Unequip
cont.cagriiii

ON=@Timer
remove


/////////////////////////////////
// RONDOM AREA FONKSIYONU
/////////////////////////////////
[Function alansecc]
//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 @1953,1,1,1 Basarilar Dilerim..
try src.tag.karma1 <src.karma>
try src.tag.fame1 <src.fame>
try src.tag.kills1 <src.kills>
try src.karma 2000
try src.fame 0
try fly 5747,726

try uid.<var.teklifeden_uid>.fly 5747,714
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 2000
try uid.<var.teklifeden_uid>.fame 0
ENDIF

[Function alanseccc]
//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 @1953,1,1,1 Basarilar Dilerim..
try src.tag.karma1 <src.karma>
try src.tag.fame1 <src.fame>
try src.tag.kills1 <src.kills>
try src.karma 2000
try src.fame 0
try fly 5747,726

try uid.<var.teklifeden_uid>.fly 5747,714
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 2000
try uid.<var.teklifeden_uid>.fame 0
ENDIF

[Function alansecccc]
//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 @1953,1,1,1 Basarilar Dilerim..
try src.tag.karma1 <src.karma>
try src.tag.fame1 <src.fame>
try src.tag.kills1 <src.kills>
try src.karma 2000
try src.fame 0
try fly 5747,726

try uid.<var.teklifeden_uid>.fly 5747,714
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 2000
try uid.<var.teklifeden_uid>.fame 0
ENDIF

//////////////////////////////////
// KAFES FONKSIYONU
//////////////////////////////////

[Function PvPbaslaa]
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=079a
ACT.P=<P> 
ACT.MOVE 1,1 
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0821
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE 1,0
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0821
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE -1,0
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0821
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE -1,1
ACT.ATTR=00002 
ACT.TIMER=10


NEWITEM=0823
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE 0,1
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0823
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE 0,1
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0823
ACT.TYPE=t_normal 
ACT.COLOR=079a
ACT.P=<P> 
ACT.MOVE 0,-1
ACT.ATTR=00002 
ACT.TIMER=10

NEWITEM=0823
ACT.TYPE=t_normal 
ACT.COLOR=079a
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 0481,6,6,0 * Basla *
Remove
RETURN 1

//////////////////////////////
// EVENTZ
//////////////////////////////

[Events e_Pvp]
ON=@Click
Message @56,,1 [Duelling]


ON=@Death
var.duel 0
src.Serv.allclients y <src.act.name>, <src.name>'i Duelloda Yenmeyi Basardi.
src.resurrect
src.act.resurrect
src.res
src.act.res
src.go nujel'm       // OLUM ALANI
src.act.go nujel'm
src.karma <src.tag.karma1>
src.fame <src.tag.fame1> //OLEN EZUK
src.kills <src.tag.kills1>
src.pvpbiter
src.act.pvpbiter //CRIMSIZLIK SCP SI
src.act.hits <src.act.100>     // KAZANMA ALANI
src.act.tag.duelwin=<src.act.tag.duelwin>+1
src.act.events -e_pvp
events -e_pvp
src.hits 100
return 1

ON=@Logout
var.duel 0
Serv.allclients duyuru <src.name>, <src.act.name> ile kapisirken oyundan cikti!
src.resurrect
src.act.resurrect
src.res
src.act.res
src.go nujel'm       // OLUM ALANI
src.act.go nujel'm
src.karma <src.tag.karma1>
src.fame <src.tag.fame1> //OLEN EZUK
src.kills <src.tag.kills1>
src.pvpbiter
src.act.pvpbiter //CRIMSIZLIK SCP SI
src.act.hits <src.act.100>     // KAZANMA ALANI
src.act.tag.duelwin=<src.act.tag.duelwin>+1
src.act.events -e_pvp
events -e_pvp
src.hits 100
return 1

[function duelwin]
src.sysmessage @1965,1,1,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 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 Ozguven Deed
Src.message <name>
return 1

on=@dclick
SRC.SYSMESSAGE Bence Busefer Yeneceksin. Kendine Guven Sansini Bidaha Dene...
src.sysmessafe Ne Kaybedersin ki....
return 1

///////////////////////////////////////////////////////////////////////////////////////////
[ITEMDEF i_travgate2]
ID=0f6c
TYPE=0 
NAME=NotoriouS Gate

ON=@CREATE
COLOR=07c4
RETURN 1

ON=@STEP
SRC.DIALOG d_duelcik
SRC.MOVE 1
return 1

ON=@DCLICK
SRC.DIALOG d_duelcik
return 1

ON=@CLICK
message @1953,1,1,1 NotoriouS Moongate
message @1965,1,1,1 Sehir Gate
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 0455 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 0455 1
text 110 144 0455 2
text 110 171 0455 3
text 110 198 0455 4
text 110 225 0455 5
text 110 252 0455 6
text 110 279 0455 7
text 110 306 0455 8
text 110 398 0455 9
text 110 333 0455 10



[DIALOG d_duelcik TEXT]
Gideceginiz Yer..

Safe Alani
Moonglow
Britain
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
ENDIF
src.go Nujel'm
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=2
IF ( <SRC.FLAGS> & 000000002 )
src.resurrect
src.hits=<str>
src.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
ENDIF
src.go 1417,1669,10
SRC.SOUND snd_spell_recall
SRC.MOVE 1
SRC.FIX
return 1
ON=4
IF ( <SRC.FLAGS> & 000000002 )
src.resurrect
src.hits=<str>
src.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 0481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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.sayua 90481,6,6,0 *HosGeldiniz.*
ELSE
src.sayua 0481,6,6,0 *HosGeldiniz.*
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 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 2000
src.targ.fame 0
src.targ.events +e_pvpci
src.sysmessage PvP Eventi Eklendi.
return 1


[events e_pvpci]
on=@click
message @56,,1 [Savasiyor]

on=@death
src.pvpbiter
src.act.pvpbiter
src.karma
src.sysmessage Turnuvadan Elendiniz..!!
src.hits 0
src.act.stone
src.act.sysmessage 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=04
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

Bide sp li oynanmasını istiyorum yani playerlar bi rakam giricek ordan istedigi kadar yazıcaklar teklif edicekler 3 bolu var ama 3 bolumde ayrı ayrı olmuyor nexiel.

Bu konu ycihangir tarafından düzenlendi(2008-07-01 15:54, 15 yıl önce)