=================
[itemdef i_soccer_ball]
id=i_cannon_ball
name=Soccer Ball
type=t_soccer_ball
on=@create
color=029
attr=08010
on=@dclick
if <distance>>2
src.sysmessage @07a1 Cok Uzaktasin !
return 1
else
SRC.STAM=<SRC.STAM>-5
f_calcio
if <src.dir>==0
var.mov=0 -1 0
f_shoot
return 1
elseif (<src.dir>==1)
var.mov=1 -1 0
f_shoot
return 1
elseif (<src.dir>==2)
var.mov=1 0 0
f_shoot
return 1
elseif (<src.dir>==3)
var.mov=1 1 0
f_shoot
return 1
elseif (<src.dir>==4)
var.mov=0 1 0
f_shoot
return 1
elseif (<src.dir>==5)
var.mov=-1 1 0
f_shoot
return 1
elseif (<src.dir>==)
var.mov=1 0 0
f_shoot
return 1
elseif (<src.dir>==6)
var.mov=-1 0 0
f_shoot
return 1
elseif (<src.dir>==7)
var.mov=-1 -1 0
f_shoot
return 1
endif
endif
ON=@TIMER
IF (<VAR.TIME>>>0)
MOVE=<VAR.MOV>
VAR.TIME=<EVAL (<VAR.TIME>-1)>
f_shoot
ENDIF
ON=*.sut*
if <distance>>2
src.emote Uzaktasin !
return 1
elseif (rand(100)>><SRC.STAM>)
src.emote Topu Durdun
else
src.emote stops the ball!
TIMER=-1
endif
[function f_calcio]
if (rand(10)==0)
var.time=<eval (((<SRC.STAM>+<SRC.STR>)/10)-1)>
src.emote Sut Cektin !!
elseif (rand(10)==1)
var.time=<eval (((<SRC.STAM>+<SRC.STR>)/10)-2)>
src.emote Sut Cektin !!
elseif (rand(10)==2)
var.time=<eval (((<SRC.STAM>+<SRC.STR>)/10)-3)>
src.emote Sut Cektin !!
elseif (rand(10)==3)
var.time=<eval (((<SRC.STAM>+<SRC.STR>)/10)+1)>
src.emote Sut Cektin !!
elseif (rand(10)==4)
var.time=<eval (((<SRC.STAM>+<SRC.STR>)/10)+2)>
src.emote Sut Cektin !!
elseif (rand(10)==5)
var.time=<eval (((<SRC.STAM>+<SRC.STR>)/10)+3)>
src.emote shoots the ball!
elseif (rand(10)==9) && elseif (rand(100)>><SRC.STAM>)
src.emote Sut Cekemedin!
var.time=0
else
var.time=<eval ((<SRC.STAM>+<SRC.STR>)/10)>
src.emote @07a1 Sut Cektin !!
endif
[typedef t_soccer_ball]
on=@step
IF elseif (rand(100)>><SRC.STAM>)
src.emote loses the ball.
ELSE
f_step
ENDIF
[function f_shoot]
TIMER=1
//STR gain
IF ((<SRC.STR><<60) && (rand(25)==1))
SRC.STR=<SRC.STR>+1
ELSEIF ((<SRC.STR><<70) && (rand(30)==1))
SRC.STR=<SRC.STR>+1
ELSEIF ((<SRC.STR><<80) && (rand(40)==1))
SRC.STR=<SRC.STR>+1
ELSEIF ((<SRC.STR><<90) && (rand(45)==1))
SRC.STR=<SRC.STR>+1
ELSEIF ((<SRC.STR><<100) && (rand(50)==1))
SRC.STR=<SRC.STR>+1
ENDIF
[function f_step] //DEX gain and STAM loss
IF ! (SRC.TAG.SBALL)
SRC.TAG.SBALL=0
ELSE
SRC.TAG.SBALL=<SRC.TAG.SBALL>+1
ENDIF
IF (<SRC.TAG.BALL>==10)
SRC.STAM=(SRC.STAM)-1
SRC.TAG.SBALL=0
ENDIF
TIMER=-1
IF ((<SRC.DEX><<60) && (rand(100)==1))
SRC.DEX=<SRC.DEX>+1
ELSEIF ((<SRC.DEX><<70) && (rand(200)==1))
SRC.DEX=<SRC.DEX>+1
ELSEIF ((<SRC.DEX><<80) && (rand(300)==1))
SRC.DEX=<SRC.DEX>+1
ELSEIF ((<SRC.DEX><<90) && (rand(400)==1))
SRC.DEX=<SRC.DEX>+1
ELSEIF ((<SRC.DEX><<100) && (rand(0)==1))
SRC.DEX=<SRC.DEX>+1
ENDIF
if <src.dir>==0
move=0 -1 0
elseif <src.dir>==1
move=1 -1 0
elseif <src.dir>==2
move=1 0 0
elseif <src.dir>==3
move=1 1 0
elseif <src.dir>==4
move=0 1 0
elseif <src.dir>==5
move=-1 1 0
elseif <src.dir>==6
move=-1 0 0
elseif <src.dir>==7
move=-1 -1 0
endif
Arkadaşlar Hazır Byros a yardım etmişsiniz Bari Banada Yardım EDermisiniz??? Bu Futbol Topu sistemine .sut
ve Topun Ayaktan gitmemesini yani sagada solada gitsede ayaktan gitmesin sadece bir adam topun oldugu kişinin üstünden geçtigi zaman alınmasını istiyorum.SAYIN U-S SCRİPTERLERİ BANA LÜTFEN YARDIM EDİN !! Forum kirliligi Olmasın Diye Buraya Yazdım Post u Yardım Ederseniz Sagolun.