Yoko

sub kresti() 
 var xv , vy , vz
 UO.Set('laststatus','lasttarget')
 UO.WaitTargetObject('lasttarget')
 UO.Cast('Paralyze')
 wait(3000)
  xv=UO.Getx('lasttarget')
  vy=UO.Gety('lasttarget')
  vz=UO.Getz('lasttarget')
 UO.WaitTargetTile('-1','xv','vy','vz')
 UO.Cast('Wall of Stone')
 wait(3000)
 UO.WaitTargetTile('-1','(xv-1)','vy','vz')
 UO.Cast('Wall of Stone')
end sub

var man=' type '
var color=' color '
uo.Set('finddistance','7')
uo.FindType(man,color,'ground')
if uo.FindCount() then
status=uo.GetSerial('finditem')
end if
...

uo.Ignore('self')

int dx = Caster.Location.X - p.X;
   int dy = Caster.Location.Y - p.Y;
   int rx = (dx - dy) * 44;
   int ry = (dx + dy) * 44;

   bool eastToWest;

   if ( rx >= 0 && ry >= 0 )
   {
      eastToWest = false;
   }
   else if ( rx >= 0 )
   {
      eastToWest = true;
   }
   else if ( ry >= 0 )
   {
      eastToWest = true;
   }
   else
   {
      eastToWest = false;
   }

sub PField()
   var X = UO.GetSerial('laststatus.0x0E75')
   if UO.FindCount() then
      UO.Cast('Paralyze Field', X)
   else
      UO.Sound(63)
   endif
endsub