[ITEMDEF i_ates]
DEFNAME=i_ates
id=i_fire_column
TYPE=t_fire
CATEGORY=Animations
SUBSECTION=Fire Column
DESCRIPTION=@
On=@step
src.hits -= 35
[plevel 1]
[function x]
src.newitem i_asd
src.act.bounce
src.act.drop
timer 3
act.message <act.timer>
On=@timer
serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move n 2
serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move s 2
serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move e 2
serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move w 2
return 1
timerf,10, serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move n 2
serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move s 2
serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move e 2
serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move w 2
return 1
[plevel 1]
[function x]
src.newitem i_asd
src.act.bounce
src.act.drop
act.message <eval <more1>>
more1 (<more1> - 1)
timer 1
[plevel 1]
[function x]
src.newitem i_asd
src.act.bounce
src.act.drop
act.message <eval <more1>>
more1 (<more1> - 1)
timer 1
On=@step
if(<src.hits> = 30
src.hits -= 30
else
src.hits -= 35
src.update
endif
[function i_asd]
itemdef i_katana
type t_script
name stuck say
on=@create
more1=30 //30dan geri say
timer 1
attr 010
color 00
on=@timer
if (<more1> > 0)
say <more1>
more1 -=1
timer 1
else
remove
endif
return 1
[function x123]
serv.newitem i_asd
new.p <p>
new.timer 1
new.update
on=@timer
if (<more1> > 0)
say <more1>
more1 -=1
timer 1
else
remove
serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move n 2
serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move s 2
serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move e 2
serv.newitem i_ates
src.new.p <src.p>
src.new.timer 5
src.new.attr attr_decay
src.new.move w 2
endif
return 1
on=@timer
if (<more1> > 0)
say <dmore1>
more1 -=1
timer 1
else
f_ateslen
remove
endif
return 1
[function f_ateslen]
serv.newitem i_fire_column
new.p <p>
new.timer 5
new.attr attr_decay
new.move n 2
serv.newitem i_fire_column
new.p <p>
new.timer 5
new.attr attr_decay
new.move s 2
serv.newitem i_fire_column
new.p <p>
new.timer 5
new.attr attr_decay
new.move e 2
serv.newitem i_fire_column
new.p <p>
new.timer 5
new.attr attr_decay
new.move w 2