[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]