equal
deleted
inserted
replaced
281 // These are not used generically, but should probably be used for purpose intended. Definitely shouldn't override pointer type |
281 // These are not used generically, but should probably be used for purpose intended. Definitely shouldn't override pointer type |
282 Tex: PTexture; // A texture created by the gear. Shouldn't use for anything but textures |
282 Tex: PTexture; // A texture created by the gear. Shouldn't use for anything but textures |
283 Tint: LongWord; // Used to colour a texture |
283 Tint: LongWord; // Used to colour a texture |
284 LinkedGear: PGear; // Used to track a related gear. Portal pairs for example. |
284 LinkedGear: PGear; // Used to track a related gear. Portal pairs for example. |
285 SoundChannel: LongInt; // Used to track a sound the gear started |
285 SoundChannel: LongInt; // Used to track a sound the gear started |
|
286 Data: Pointer; // pointer to gear type specific data structure (if any) |
286 end; |
287 end; |
287 TPGearArray = array of PGear; |
288 TPGearArray = array of PGear; |
288 PGearArrayS = record |
289 PGearArrayS = record |
289 size: LongWord; |
290 size: LongWord; |
290 ar: ^TPGearArray; |
291 ar: ^TPGearArray; |
514 saveSurf: boolean; |
515 saveSurf: boolean; |
515 priority: GLfloat; |
516 priority: GLfloat; |
516 getDimensions, getImageDimensions: boolean; |
517 getDimensions, getImageDimensions: boolean; |
517 end; |
518 end; |
518 |
519 |
|
520 // gear data types |
|
521 |
|
522 const cakeh = 27; |
|
523 |
|
524 type TCakeData = record |
|
525 CakeI: integer; |
|
526 CakePoints: array[0..Pred(cakeh)] of record |
|
527 x, y: hwFloat; |
|
528 end; |
|
529 end; |
|
530 |
|
531 PCakeData = ^TCakeData; |
|
532 |
519 implementation |
533 implementation |
520 |
534 |
521 end. |
535 end. |