equal
deleted
inserted
replaced
12 * GNU General Public License for more details. |
12 * GNU General Public License for more details. |
13 * |
13 * |
14 * You should have received a copy of the GNU General Public License |
14 * You should have received a copy of the GNU General Public License |
15 * along with this program; if not, write to the Free Software |
15 * along with this program; if not, write to the Free Software |
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA |
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA |
|
17 *) |
|
18 |
|
19 (* |
|
20 * This file contains the step handlers for gears. |
|
21 * |
|
22 * Important: Since gears change the course of the game, calculations that |
|
23 * lead to different results for different clients/players/machines |
|
24 * should NOT occur! |
|
25 * Use safe functions and data types! (e.g. GetRandom() and hwFloat) |
17 *) |
26 *) |
18 |
27 |
19 procedure doStepPerPixel(Gear: PGear; step: TGearStepProcedure; onlyCheckIfChanged: boolean); |
28 procedure doStepPerPixel(Gear: PGear; step: TGearStepProcedure; onlyCheckIfChanged: boolean); |
20 var |
29 var |
21 dX, dY, sX, sY: hwFloat; |
30 dX, dY, sX, sY: hwFloat; |