| changeset 3985 | 57121975b64b |
| parent 3976 | abaf741a4e21 |
| child 3997 | 6baa46aad645 |
| child 3999 | 411e71912f4c |
| 3974:91ac041ecb20 | 3985:57121975b64b |
|---|---|
532 gear^.Timer:= 10; |
532 gear^.Timer:= 10; |
533 gear^.Health:= 500; |
533 gear^.Health:= 500; |
534 end; |
534 end; |
535 gtPoisonCloud: begin |
535 gtPoisonCloud: begin |
536 gear^.Timer:= 5000; |
536 gear^.Timer:= 5000; |
537 gear^.dY:= int2hwfloat((-4 + getRandom(8))) / 1000; |
537 gear^.dY:= int2hwfloat(-4 + longint(getRandom(8))) / 1000; |
538 end; |
538 end; |
539 gtResurrector: begin |
539 gtResurrector: begin |
540 gear^.Radius := 100; |
540 gear^.Radius := 100; |
541 end; |
541 end; |
542 end; |
542 end; |
1032 begin |
1032 begin |
1033 with PHedgehog(Gear^.Hedgehog)^ do |
1033 with PHedgehog(Gear^.Hedgehog)^ do |
1034 begin |
1034 begin |
1035 if not (((Ammoz[CurAmmoType].Ammo.Propz and ammoprop_AltUse) <> 0) and ((Gear^.State and gstAttacked) = 0)) then |
1035 if not (((Ammoz[CurAmmoType].Ammo.Propz and ammoprop_AltUse) <> 0) and ((Gear^.State and gstAttacked) = 0)) then |
1036 exit; |
1036 exit; |
1037 DrawTexture(round(sx + 16), round(sy + 16), ropeIconTex); |
1037 DrawTexture(round(int64(sx) + 16), round(int64(sy) + 16), ropeIconTex); |
1038 DrawTextureF(SpritesData[sprAMAmmos].Texture, 0.75, round(sx + 30), round(sy + 30), ord(CurAmmoType) - 1, 1, 32, 32); |
1038 DrawTextureF(SpritesData[sprAMAmmos].Texture, 0.75, round(int64(sx) + 30), round(int64(sy) + 30), ord(CurAmmoType) - 1, 1, 32, 32); |
1039 end; |
1039 end; |
1040 end; |
1040 end; |
1041 |
1041 |
1042 procedure DrawRopeLinesRQ(Gear: PGear); |
1042 procedure DrawRopeLinesRQ(Gear: PGear); |
1043 begin |
1043 begin |