home *** CD-ROM | disk | FTP | other *** search
/ Canadian Forces: Prepare for Takeoff as a Pilot / CF_FS_Air.iso.iso / pc / data / swf / avions / 18_fr.swf / scripts / DefineSprite_14 / frame_2 / DoAction.as
Text File  |  2004-09-22  |  3KB  |  101 lines
  1. if(_parent.SliderYScale < 100)
  2. {
  3.    if(_parent.ScrollType == "UpPress")
  4.    {
  5.       _parent.CurrentHeight = _parent.ScrollSlider._y;
  6.       if(_parent.CurrentHeight > _parent.HighestPoint + _parent.ButtonClickSpeed)
  7.       {
  8.          _parent.NewHeight = _parent.CurrentHeight - _parent.ButtonClickSpeed;
  9.          play();
  10.          setProperty("_parent.ScrollSlider", _Y, _parent.NewHeight);
  11.       }
  12.       else
  13.       {
  14.          stop();
  15.          setProperty("_parent.ScrollSlider", _Y, _parent.HighestPoint);
  16.       }
  17.    }
  18.    else if(_parent.ScrollType == "DownPress")
  19.    {
  20.       _parent.CurrentHeight = _parent.ScrollSlider._y;
  21.       _parent.NewHeight = _parent.CurrentHeight + _parent.ButtonClickSpeed;
  22.       if(_parent.CurrentHeight < _parent.LowestPoint - _parent.ButtonClickSpeed)
  23.       {
  24.          play();
  25.          setProperty("_parent.ScrollSlider", _Y, _parent.NewHeight);
  26.       }
  27.       else
  28.       {
  29.          stop();
  30.          setProperty("_parent.ScrollSlider", _Y, _parent.LowestPoint);
  31.       }
  32.    }
  33.    else if(_parent.ScrollType == "UpHover")
  34.    {
  35.       _parent.CurrentHeight = _parent.ScrollSlider._y;
  36.       if(_parent.CurrentHeight > _parent.HighestPoint + _parent.ButtonHoverSpeed)
  37.       {
  38.          _parent.NewHeight = _parent.CurrentHeight - _parent.ButtonHoverSpeed;
  39.          play();
  40.          setProperty("_parent.ScrollSlider", _Y, _parent.NewHeight);
  41.       }
  42.       else
  43.       {
  44.          stop();
  45.          setProperty("_parent.ScrollSlider", _Y, _parent.HighestPoint);
  46.       }
  47.    }
  48.    else if(_parent.ScrollType == "DownHover")
  49.    {
  50.       _parent.CurrentHeight = _parent.ScrollSlider._y;
  51.       _parent.NewHeight = _parent.CurrentHeight + _parent.ButtonHoverSpeed;
  52.       if(_parent.CurrentHeight < _parent.LowestPoint - _parent.ButtonHoverSpeed)
  53.       {
  54.          play();
  55.          setProperty("_parent.ScrollSlider", _Y, _parent.NewHeight);
  56.       }
  57.       else
  58.       {
  59.          stop();
  60.          setProperty("_parent.ScrollSlider", _Y, _parent.LowestPoint);
  61.       }
  62.    }
  63.    else if(_parent.ScrollType == "ScrollBarClick")
  64.    {
  65.       _parent.ClickHeight = _parent._ymouse;
  66.       _parent.CurrentHeight = _parent.ScrollSlider._y;
  67.       if(_parent.ClickHeight < _parent.CurrentHeight)
  68.       {
  69.          if(_parent.CurrentHeight > _parent.HighestPoint + _parent.ScrollBarClickSpeed)
  70.          {
  71.             _parent.NewHeight = _parent.CurrentHeight - _parent.ScrollBarClickSpeed;
  72.             play();
  73.             setProperty("_parent.ScrollSlider", _Y, _parent.NewHeight);
  74.          }
  75.          else
  76.          {
  77.             stop();
  78.             setProperty("_parent.ScrollSlider", _Y, _parent.HighestPoint);
  79.          }
  80.       }
  81.       else if(_parent.ClickHeight > _parent.CurrentHeight + _parent.SliderHeight)
  82.       {
  83.          if(_parent.CurrentHeight < _parent.LowestPoint - _parent.ScrollBarClickSpeed)
  84.          {
  85.             _parent.NewHeight = _parent.CurrentHeight + _parent.ScrollBarClickSpeed;
  86.             play();
  87.             setProperty("_parent.ScrollSlider", _Y, _parent.NewHeight);
  88.          }
  89.          else
  90.          {
  91.             stop();
  92.             setProperty("_parent.ScrollSlider", _Y, _parent.LowestPoint);
  93.          }
  94.       }
  95.    }
  96. }
  97. else
  98. {
  99.    stop();
  100. }
  101.