equal
deleted
inserted
replaced
53 stats: TStatistics; |
53 stats: TStatistics; |
54 Hat: shortstring; |
54 Hat: shortstring; |
55 King: boolean; // Flag for a bunch of hedgehog attributes |
55 King: boolean; // Flag for a bunch of hedgehog attributes |
56 Unplaced: boolean; // Flag for hog placing mode |
56 Unplaced: boolean; // Flag for hog placing mode |
57 Timer: Longword; |
57 Timer: Longword; |
58 Poisoned: boolean; |
58 Effects: Array[THogEffect] of boolean; |
59 end; |
59 end; |
60 |
60 |
61 TTeam = record |
61 TTeam = record |
62 Clan: PClan; |
62 Clan: PClan; |
63 TeamName: string[MAXNAMELEN]; |
63 TeamName: string[MAXNAMELEN]; |
363 // Some initial King buffs |
363 // Some initial King buffs |
364 if (GameFlags and gfKing) <> 0 then |
364 if (GameFlags and gfKing) <> 0 then |
365 begin |
365 begin |
366 Hedgehogs[0].King:= true; |
366 Hedgehogs[0].King:= true; |
367 Hedgehogs[0].Hat:= 'crown'; |
367 Hedgehogs[0].Hat:= 'crown'; |
368 Hedgehogs[0].Poisoned := false; |
368 Hedgehogs[0].Effects[hePoisoned] := false; |
369 h:= Hedgehogs[0].Gear^.Health; |
369 h:= Hedgehogs[0].Gear^.Health; |
370 Hedgehogs[0].Gear^.Health:= hwRound(int2hwFloat(th)*_0_375); |
370 Hedgehogs[0].Gear^.Health:= hwRound(int2hwFloat(th)*_0_375); |
371 if Hedgehogs[0].Gear^.Health > h then |
371 if Hedgehogs[0].Gear^.Health > h then |
372 begin |
372 begin |
373 dec(th, h); |
373 dec(th, h); |