Techwizz/Gobligine
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Added cancel costs factor.

Browse source
This commit is contained in:
johns 2001-02-28 15:42:44 +00:00
parent f259a6277a
commit 2662ce0085
1 changed files with 9 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
src/action/command.cpp
View file

@ -896,8 +896,10 @@ global void CommandCancelTraining(Unit* unit,int slot)
//
n=unit->Command.Data.Train.Count;
if( unit->Command.Action==UnitActionTrain && slot<n ) {
PlayerAddUnitType(unit->Player,unit->Command.Data.Train.What[slot]);
PlayerAddCostsFactor(unit->Player,
unit->Command.Data.Train.What[slot]
->Stats[unit->Player->Player].Costs,
CancelTrainingCostsFactor);
if ( --n ) {
for( i = slot; i < n; i++ ) {
@ -998,7 +1000,8 @@ global void CommandCancelUpgradeTo(Unit* unit)
if( unit->Command.Action == UnitActionUpgradeTo ) {
PlayerAddCostsFactor(unit->Player,
unit->Command.Data.UpgradeTo.What->Stats->Costs,75);
unit->Command.Data.UpgradeTo.What->Stats->Costs,
CancelUpgradeCostsFactor);
unit->Command.Action=UnitActionStill;
@ -1087,8 +1090,9 @@ global void CommandCancelResearch(Unit* unit)
// Check if unit is still researching? (NETWORK!)
//
if( unit->Command.Action == UnitActionResearch ) {
PlayerAddCostsFactor(unit->Player
,unit->Command.Data.Research.What->Costs,75);
PlayerAddCostsFactor(unit->Player,
unit->Command.Data.UpgradeTo.What->Stats->Costs,
CancelResearchCostsFactor);
unit->Command.Action=UnitActionStill;