Script İstek...

Bi Script İsteğim Olacaktı Eminim Herkesin ELinde Wardır...Duello Scripti Scriptler Bölümünde Aradım Aldım Hatalı çıktı Editledim Editledim Ama Hataları düseltemedim Sizin Elinizde Olanlardan Bir Tanesini Paylaşmanız Mumkunmu acba ?

Hocam sscripti burdan alıorum sonucta bunu herkes bilior herşey ortada olsun yani bunu gizlememe ne gerek war yani ismi neden kirlensin ki serverimn ?

hadi koyam bare

[PLEVEL 1]
duello

[function duello]
var.uid
if (<var0.duello> == 1)
src.sysmessage @1153 Suan duello alani dolu lutfen daha sonra deneyin.
return 1
elseif (<var0.teklifvar> == 1)
src.sysmessage @1153,,1 Su Anda Birine Teklif Yapilmis.
return 1
endif
targetf _duello

[function _duello]
obj=<argo>
if (<obj.isplayer>) && !(<obj.uid> == <src.uid>) && (<obj.hits> >= <obj.str>)
var.uid <src.uid>
trysrc <obj> src.act <var.uid>
trysrc <obj> src.dialog d_duello
<uid.<obj>.newitem i_zaman
<uid.<obj>.new.equip
var.teklifvar 1
else
src.sysmessage @1153 Kendiniz disindaki playerlara yarasiz iken duello teklifi yapabilirsiniz.
return 1
endif

[dialog d_duello]
0,10
PAGE 0
resizepic 100 100 3600 300 125
dtext 120 120 1153 Duello Teklifi ( <act.name> )
dtext 145 140 1502 Evet
dtext 145 160 1502 Hayir
button 120 140 210 211 1 0 1
button 120 160 210 211 1 0 2

[dialog d_duello button]
on=0
act.sysmessage @1153 <obj.name> duelloyu kabul etmedi
var.teklifvar 0
return 1

on=1
if (<var0.duello> == 1)
src.sysmessage @1153,,1 Duello Alani Su Anda Dolu.
return 1
endif
trysrc <act> src.sysmessage @1153,,1 Altinizdaki Binek Bankaniza Aktarildi.
trysrc <act> src.binekolmazsaolmaz
trysrc <act> src.yollabeni
src.yollabeni2
src.sysmessage @1153,,1 Altinizdaki Binek Bankaniza Aktarildi.
src.binekolmazsaolmaz
var.duello 1

on=2
act.sysmessage @1153 <obj.name> duelloyu kabul etmedi
Var.teklifvar 0
return 1

[function yollabeni]
src.go 5927,2296
serv.newitem i_duelloda
new.more 10
new.equip
serv.newitem i_duellotasi
new.p <src.p>
new.move -1
serv.newitem i_duellotasi
new.p <src.p>
new.move -1 -1
serv.newitem i_duellotasi
new.p <src.p>
new.move 0 -1
serv.newitem i_duellotasi
new.p <src.p>
new.move 1 0
serv.newitem i_duellotasi
new.p <src.p>
new.move 1 1
serv.newitem i_duellotasi
new.p <src.p>
new.move 0 1
serv.newitem i_duellotasi
new.move 0 2

[function yollabeni2]
src.go 5927,2278
serv.newitem i_duelloda
new.more 10
new.equip
serv.newitem i_duellotasi
new.p <src.p>
new.move -1
serv.newitem i_duellotasi
new.p <src.p>
new.move -1 -1
serv.newitem i_duellotasi
new.p <src.p>
new.move 0 -1
serv.newitem i_duellotasi
new.p <src.p>
new.move 1 0
serv.newitem i_duellotasi
new.p <src.p>
new.move 1 1
serv.newitem i_duellotasi
new.p <src.p>
new.move 0 1
serv.newitem i_duellotasi
new.p <src.p>
new.move 0 2

[events e_duello]
on=@death
serv.allclients sysmessage @0ad,6,1,1 Duello Duyuru : 
serv.allclients sysmessage @0ad,6,1,1 <src.name> - ,Vs, - <src.act.name>
serv.allclients sysmessage @1153,,1 <src.name> <src.act.name> Tarafindan Duelloda Malup Edilmistir.
trysrc <act> src.kazandim
src.kaybettim
src.hits 100
var.duello 0
var.teklifvar 0
return 1

on=@logout
src.flags <src.flags>&statf_dead

on=@spellcast 
if ((<argn>==24)) || (<argn>==28)) || (<argn>==32)) || (<argn>==33)) || (<argn>=35)) || (<argn>==37)) || (<argn>==38)) || (<argn>==42)) || (<argn>==43)) || (<argn>==45)) || (<argn>==46)) || (<argn>==47)) || (<argn>==48)) || (<argn>==49)) || (<argn>==50)) || (<argn>==51)) || (<argn>==52)) || (<argn>==53)) || (<argn>==54)) || (<argn>==55)) || (<argn>==56)) || (<argn>==57)) || (<argn>==58)) || (<argn>==59))  || (<argn>==60)) || (<argn>==51)) || (<argn>==62)) || (<argn>==63)) || (<argn>==64)) 
src.sysmessage @1153,,1 Bu Tür Büyüleri Duelloda Kullanamazsiniz.
Return 1
Endif

[function kazandim]
src.events -e_duello
src.go safe alani
src.sysmessage @1153 <act.name>'yi yendiniz.

[function kaybettim]
src.events -e_duello
src.go safe alani
src.sysmessage @1153 <act.name> sizi yendi.

[ITEMDEF i_duelloda]
NAME=Duello
ID=i_handr_1
TYPE=T_EQ_SCRIPT
WEIGHT=0
LAYER=layer_special

ON=@Create
ATTR=attr_invis|attr_decay
MORE=10

ON=@Equip
TIMER=1

ON=@Timer
  	if ( <cont> )
                if ( <more> )
                        CONT.sysmessage @1153 <EVAL(<more>)> 
                        more=<more>-1
                        TIMER=1
                        return 1
                else
                        cont.events +e_duello
                        cont.flags <cont.flags>&~04
                endif
        endif
        remove
        return 1

[itemdef i_duellotasi]
id 02ff

on=@create
name invisible stone
attr 090
timer 12

on=@timer
remove
return 1

[itemdef i_zaman]
id i_gold

on=@create
name asd
attr attr_invis|attr_Static
MORE=20

on=@equip
timer 20

on=@timer
  	if ( <cont> )
                if ( <more> )
                        cont.sysmessage @1153 <EVAL(<more>)> 
                        more=<more>-1
                        TIMER=1
remove
var.teklifvar 0
src.dialogclose d_duello
return 1
endif
endif
/////////////////////////////////////////