--- a/hedgewars/uTypes.pas Tue Mar 24 21:18:05 2015 +0100
+++ b/hedgewars/uTypes.pas Wed Mar 25 20:30:52 2015 +0100
@@ -283,6 +283,7 @@
Tint: LongWord; // Used to colour a texture
LinkedGear: PGear; // Used to track a related gear. Portal pairs for example.
SoundChannel: LongInt; // Used to track a sound the gear started
+ Data: Pointer; // pointer to gear type specific data structure (if any)
end;
TPGearArray = array of PGear;
PGearArrayS = record
@@ -516,6 +517,19 @@
getDimensions, getImageDimensions: boolean;
end;
+ // gear data types
+
+ const cakeh = 27;
+
+ type TCakeData = record
+ CakeI: integer;
+ CakePoints: array[0..Pred(cakeh)] of record
+ x, y: hwFloat;
+ end;
+ end;
+
+ PCakeData = ^TCakeData;
+
implementation
end.