equal
deleted
inserted
replaced
27 * of visual nature. |
27 * of visual nature. |
28 * |
28 * |
29 * E.g.: background flakes, visual effects: explosion, smoke trails, etc. |
29 * E.g.: background flakes, visual effects: explosion, smoke trails, etc. |
30 *) |
30 *) |
31 interface |
31 interface |
32 uses uConsts, uFloat, GLunit, uTypes, uWorld; |
32 uses uConsts, uFloat, GLunit, uTypes; |
33 |
33 |
34 procedure initModule; |
34 procedure initModule; |
35 procedure freeModule; |
35 procedure freeModule; |
36 |
36 |
37 function AddVisualGear(X, Y: LongInt; Kind: TVisualGearType; State: LongWord = 0; Critical: Boolean = false): PVisualGear; |
37 function AddVisualGear(X, Y: LongInt; Kind: TVisualGearType; State: LongWord = 0; Critical: Boolean = false): PVisualGear; |