/** * @(#) $RCSfile: BlueFadeTotalInit.as,v $ $Revision: 1.3 $ $Date: 2003/02/28 01:41:11 $ * * Copyright 2003 Orgdot AS. All Rights Reserved. * http://dev.swfit.com * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License * as published by the Free Software Foundation; either version 2 * of the License, or (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /** * Inits the roller movement. * * @author Olaf Havnes * @version $Revision: 1.3 $ $Date: 2003/02/28 01:41:11 $ * @since SWFIT1.0 */ // The different stages of the winding / rolling REST_STAGE = 0; WIND_STAGE = 1; WAIT_STAGE = 2; ROLL_STAGE = 3; END_STAGE = 4; stage = REST_STAGE; // Describe the active area for sub clips win_y_min = 0; win_y_max = 224; win_height = 224; // Time steps END_STEPS = 25; end_counter = 0; WAIT_STEPS = 20; wait_counter = 0; // The roller area Y_REST = - 20; Y_WIND = 240; yp = Y_REST; y = int (yp); WIND_SPEED = 10; spring = 0.3; friction = 0.3; ROLL_SPEED_START = - 3;