ships-upgrade.ads

1. Ships/SUpgrade

1.1. SUpgrade/SUpgrade.Start_Upgrading

Ships/SUpgrade [ Packages ]

FUNCTION

 Provided code for upgrade player ship modules

SOURCE

package Ships.Upgrade is

SUpgrade/SUpgrade.Start_Upgrading [ Subprograms ]

[ Top ] [ SUpgrade ] [ Subprograms ]

FUNCTION

 Set upgrading order

SOURCE

   procedure Start_Upgrading
     (Module_Index: Modules_Container.Extended_Index;
      Upgrade_Type: Positive) with
      Pre => Module_Index in
        Player_Ship.Modules.First_Index .. Player_Ship.Modules.Last_Index and
      Upgrade_Type < 5;

PARAMETERS

 Module_Index - Player ship index of module to upgrade
 Upgrade_Type - Type of upgrade to start

TABLE OF CONTENTS

Ships/SUpgrade [ Packages ]

SUpgrade/SUpgrade.Start_Upgrading [ Subprograms ]