Kod: [defname ethy_settings]
mount_delay 6
[itemdef i_ethereal_bear]
name=Ethereal Polar Bear Statuette
id=i_pet_bear_polar
type=t_ethereal_statuette
tdata1=c_bear_polar
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Bear Statuette
[itemdef i_ethereal_reptalon]
name=Ethereal Reptalon Statuette
id=i_pet_dragon
type=t_ethereal_statuette
tdata1=c_m_reptalon
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Reptalon Statuette
[itemdef i_ethereal_armorsteed]
name=Ethereal Armored Steed Statuette
id=i_pet_horse_brown_lt
type=t_ethereal_statuette
tdata1=c_armor_steed
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Armored Steed Statuette
[itemdef i_ethereal_horse]
name=Ethereal Horse Statuette
id=i_pet_horse
type=t_ethereal_statuette
tdata1=c_horse_gray
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Horse Statuette
[itemdef i_ethereal_llama]
name=Ethereal Llama Statuette
id=i_pet_llama
type=t_ethereal_statuette
tdata1=c_llama
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Llama Statuette
[itemdef i_ethereal_ostard]
name=Ethereal Ostard Statuette
id=i_pet_ostard_zostrich
type=t_ethereal_statuette
tdata1=c_ostard_zostrich
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Llama Statuette
[itemdef i_ethereal_unicorn]
name=Ethereal Unicorn Statuette
id=i_pet_unicorn
type=t_ethereal_statuette
tdata1=c_m_unicorn
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Unicorn Statuette
[itemdef 03eb4]
//prow (really used as horse equipped)
defname=i_mt_unicorn
type=t_eq_horse
layer=layer_horse
tdata3=c_m_unicorn
[itemdef i_ethereal_ridgeback]
name=Ethereal Ridgeback Statuette
id=i_pet_ridgeback
type=t_ethereal_statuette
tdata1=c_ridgeback
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Ridgeback Statuette
[itemdef 03eba]
//prow (really used as horse equipped)
defname=i_mt_ridgeback
type=t_eq_horse
layer=layer_horse
tdata3=c_ridgeback
[itemdef i_ethereal_kirin]
name=Ethereal Kirin Statuette
id=i_pet_kirin
type=t_ethereal_statuette
tdata1=c_kirin
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Kirin Statuette
[itemdef 03ead]
//deck (really used as horse equipped)
defname=i_mt_kirin
type=t_eq_horse
layer=layer_horse
tdata3=c_kirin
[itemdef i_ethereal_beetle]
name=Ethereal Beetle Statuette
id=i_pet_giantbeetle
type=t_ethereal_statuette
tdata1=c_giant_beetle
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Beetle Statuette
[itemdef 03ebc]
//rudder (really used as horse equipped)
defname=i_mt_beetle
type=t_eq_horse
layer=layer_horse
tdata3=c_giant_beetle
[itemdef i_ethereal_swamp_dragon]
name=Ethereal Swamp Dragon Statuette
id=i_pet_swampdragon
type=t_ethereal_statuette
tdata1=c_swamp_dragon
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Swamp Dragon Statuette
[itemdef 03ebd]
//tiller (really used as horse equipped)
defname=i_mt_swamp_dragon
type=t_eq_horse
layer=layer_horse
tdata3=c_swamp_dragon
[itemdef i_ethereal_hiryu]
name=Ethereal Hiryu Statuette
id=i_pet_hiryu
type=t_ethereal_statuette
tdata1=c_m_hiryu
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Hiryu Statuette
[itemdef 03e94]
//ship (really used as horse equipped)
defname=i_mt_hiryu
type=t_eq_horse
layer=layer_horse
tdata3=c_m_hiryu
[itemdef i_ethereal_cusidhe]
name=Ethereal Cu Sidhe Statuette
id=i_pet_wolf
type=t_ethereal_statuette
tdata1=c_cu_sidhe
on=@create
color=0900
attr=04
category=Ethereal
subsection=Ethereal pets
description=Ethereal Cu Sidhe Statuette
[itemdef 03e91]
//ship (really used as horse equipped)
defname=i_mt_cu_sidhe
type=t_eq_horse
layer=layer_horse
tdata3=c_cu_sidhe
[typedef t_ethereal_statuette]
on=@dclick
IF ( <CONT> != <SRC.FINDLAYER.21> )
src.SYSMESSAGE @,3,1 The item must be in your backpack.
RETURN 1
ENDIF
FORCHARS 100
FORCHARMEMORYTYPE memory_war_targ
IF <LINK.UID>==<SRC.UID>
IF <CONT.CANSEELOS <LINK.UID>>
SRC.sysMESSAGE @,3,1 You cannot mount an ethereal when in battle.
Return 1
ENDIF
ENDIF
ENDFOR
ENDFOR
if (<src.tag0.ethyused>>0)
src.sysmessage @,3,1 You must wait to perform another action.
return 1
endif
src.tag0.ethyused 1
src.timerf 8 , src.tag0.ethyused
src.action -1
src.tag0.ethyusing 1
src.flags |= statf_freeze
if <src.cant_mount>
src.flags &= ~statf_freeze
return 1
else
src.loop_anim,16,<eval (<def0.mount_delay>/2)>,2
timerf <def0.mount_delay>,mount_ethy <tdata1>
return 1
endif
[function mount_ethy]
if (<src.tag0.ethyusing><1)
src.flags &= ~statf_freeze
return 1
endif
if <src.cant_mount>
return 1
else
src.flags &= ~statf_freeze
serv.newnpc <args>
new.p <src.p>
new.name=an ethereal
if (<tag0.dyed>=1)
new.color <color>
else
new.color 07ffff
endif
new.tag0.ethereal_mount=<baseid>
new.update
ref1=<new.uid>
serv.newitem i_memory
new.color=memory_ipet
new.link= <src.uid>
new.cont=<ref1>
ref1.mount <src>
consume
src.tag0.ethyusing
return 1
endif
[function cant_mount]
if !(<topobj.uid>==<uid>)
sysMESSAGE @,3,1 You cannot use this where it is.
src.flags &= ~statf_freeze
return 1
elseif (<flags>&statf_dead)
sysMESSAGE @,3,1 You cannot use that right now.
src.flags &= ~statf_freeze
return 1
elseif !((<id>=c_man) || (<id>=c_woman) || (<id>=c_elf_male) || (<id>=c_elf_female))
sysMESSAGE @,3,1 You cannot use that while polymorphed.
src.flags &= ~statf_freeze
return 1
elseif (<flags>&statf_stone)
sysMESSAGE @,3,1 You cannot use that while stoned.
src.flags &= ~statf_freeze
return 1
elseif (<restest 1 i_bushido_4>)
sysMESSAGE @,3,1 You cannot use that when you are a tiger.
src.flags &= ~statf_freeze
return 1
elseif (<findlayer.25.uid>)
sysMESSAGE @,3,1 You are already on a mount.
src.flags &= ~statf_freeze
return 1
else
return 0
endif
[function loop_anim]
for <eval (<argv[1]>-1)>
timerf <eval (<local._for>*2)>,anim <eval <argv[0]>>
endfor
anim <argv[0]>
[eof]
|