Spell effect for levitation.

git-svn-id: svn+ssh://svn.code.sf.net/p/crossfire/code/arch/trunk@20210 282e977c-c81d-0410-88c4-b93c2d0d6712

spell/Change_Ability/levitate_effect.arc

@@ -0,0 +1,10 @@
+Object levitate_effect
+name levitate effect
+face levitate_effect.111
+animation levitate_effect
+speed 1
+is_used_up 1
+no_pick 1
+food 3
+move_type fly_high
+end

spell/Change_Ability/levitate_effect.face

@@ -0,0 +1,17 @@
+animation levitate_effect
+levitate_effect.111
+levitate_effect.112
+levitate_effect.113
+mina
+face levitate_effect.111
+magicmap blue
+visibility 255
+end
+face levitate_effect.112
+magicmap blue
+visibility 255
+end
+face levitate_effect.113
+magicmap blue
+visibility 255
+end

spell/Change_Ability/spell_levitate.arc

@@ -19,4 +19,5 @@ move_type fly_low
 msg
 Causes the caster to float or fly low over the ground so as to prevent falling into holes or traps.  It is not possible to pick things up off the ground while levitating.
 endmsg
+other_arch levitate_effect
 end