starcraft.eng.inc.pl

   1 use utf8;
   2
   3 my %CONS = (
   4         r => "rally point",
   5 );
   6 my %UNIT = (
   7         m => "move",
   8         s => "stop",
   9         p => "patrol",
  10         h => "hold",
  11         a => "attack",
  12         b => "burrow",
  13         g => "gather",
  14         c => "return cargo",
  15 );
  16
  17 {
  18
  19 key => {
  20         (map { 'P'.$_ => $UNIT{$_} } qw'm s a g c'),
  21         Pb => "build structure",
  22         Pv => "build adv$sign{_}anced structure",
  23
  24         Pbn => "nexus",
  25         Pbp => "pylon",
  26         Pba => "assimi$sign{_}lator",
  27         Pbg => "gate$sign{_}way",
  28         Pbf => "forge",
  29         Pbc => "photon cannon",
  30         Pby => "cyber$sign{_}netics core",
  31         Pbb => "shield batt$sign{_}ery",
  32
  33         (map { 'Pbn'.$_ => $CONS{$_} } 'r'),
  34         Pbnp => "probe",
  35
  36         (map { 'Pbg'.$_ => $CONS{$_} } 'r'),
  37         Pbgz => "zealot",
  38         Pbgd => "dragoon",
  39         Pbgt => "high templar",
  40         Pbgk => "dark templar",
  41
  42         (map { 'Pbgt'.$_ => $UNIT{$_} } qw'm s p h'),
  43         t => "psionic storm",
  44         l => "halluci$sign{_}nation",
  45         r => "archon warp",
  46
  47         (map { 'Pbgk'.$_ => $UNIT{$_} } qw'm s p h a'),
  48         Pbgkr => "dark archon meld",
  49
  50         (map { 'Pbgkr'.$_ => $UNIT{$_} } qw'm s p h'),
  51         Pbgkrf => "feed$sign{_}back",
  52         Pbgkrc => "mind control",
  53         Pbgkre => "mael$sign{_}strom",
  54
  55         Pbfw => "ground weap$sign{_}on$sign{_}s",
  56         Pbfa => "ground armor",
  57         Pbfs => "plasma shields",
  58
  59         Pbyw => "air weap$sign{_}on$sign{_}s",
  60         Pbya => "air armor",
  61         Pbys => "dragoon range",
  62
  63         Pbbr => "recharge shields",
  64
  65         Pvr => "robotics facility",
  66         Pvs => "stargate",
  67         Pvc => "citadel of adun",
  68         Pvb => "support bay",
  69         Pvf => "fleet beacon",
  70         Pvt => "templar archives",
  71         Pvo => "observa$sign{_}tory",
  72         Pva => "arbiter tribunal",
  73
  74         (map { 'Pvr'.$_ => $CONS{$_} } 'r'),
  75         Pvrs => "shuttle",
  76         Pvro => "observer",
  77         Pvrv => "reaver",
  78
  79         (map { 'Pvrv'.$_ => $UNIT{$_} } qw'm s p h a'),
  80         Pvrvr => "scarab",
  81
  82         (map { 'Pvs'.$_ => $CONS{$_} } 'r'),
  83         Pvss => "scout",
  84         Pvsc => "carrier",
  85         Pvsa => "arbiter",
  86         Pvso => "corsair",
  87
  88         (map { 'Pvsc'.$_ => $UNIT{$_} } qw'm s p h a'),
  89         Pvsci => "inter$sign{_}ceptor",
  90
  91         (map { 'Pvsa'.$_ => $UNIT{$_} } qw'm s p h a'),
  92         Pvsar => "recall",
  93         Pvsat => "statis field",
  94
  95         (map { 'Pvso'.$_ => $UNIT{$_} } qw'm s p h a'),
  96         Pvsod => "disrup$sign{_}tion web",
  97
  98         Pvcl => "leg en$sign{_}hancem$sign{_}ent$sign{_}s",
  99
 100         Pvbs => "scarab damage",
 101         Pvbc => "reaver capacity",
 102         Pvbg => "gravitic drive",
 103
 104         Pvfa => "apial sensors",
 105         Pvfg => "gravitic thrust$sign{_}ers",
 106         Pvfc => "carrier capacity",
 107         Pvfd => "disrup$sign{_}tion web",
 108         Pvfj => "argus jewel",
 109
 110         Pvtt => "psionic storm",
 111         Pvth => "halluci$sign{_}nation",
 112         Pvtk => "khayda$sign{_}rin amul$sign{_}et",
 113 #       Pvtc => "mind control?", #TODO
 114         Pvte => "mael$sign{_}strom",
 115         Pvtt => "argus talisman",
 116
 117         Pvog => "gravitic booster",
 118         Pvos => "sensor array",
 119
 120         Pvar => "recall",
 121         Pvas => "stasis field",
 122         Pvak => "khayda$sign{_}rin core",
 123
 124         Zd => "drone",
 125         Zz => "zergling",
 126         Zo => "overlord",
 127         Zh => "hydra$sign{_}lisk",
 128         Zq => "queen",
 129
 130         (map { 'Zd'.$_ => $UNIT{$_} } qw'm s a g c b'),
 131         Zdb => "basic mutat$sign{_}ion",
 132         Zdv => "advance$sign{_}d mutat$sign{_}ion",
 133
 134         Zdbh => "hatche$sign{_}ry",
 135         Zdbc => "creep colony",
 136         Zdbe => "extrac$sign{_}tor",
 137         Zdbs => "spawning pool",
 138         Zdbv => "evolution chamber",
 139         Zdbd => "hydra$sign{_}lisk den",
 140
 141         (map { 'Zdbh'.$_ => $CONS{$_} } 'r'),
 142         Zdbhb => "burrow",
 143         Zdbhs => "select larvae",
 144         Zdbhl => "lair",
 145
 146         (map { 'Zdbhl'.$_ => $CONS{$_} } 'r'),
 147         Zdbhlb => "burrow",
 148         Zdbhlv => "ventral sacs",
 149         Zdbhla => "antennae",
 150         Zdbhlp => "pneumatized carapace",
 151         Zdbhlh => "hive",
 152
 153         (map { 'Zdbhlh'.$_ => $CONS{$_} } 'r'),
 154         Zdbhlhb => "burrow",
 155         Zdbhlhv => "ventral sacs",
 156         Zdbhlha => "antennae",
 157         Zdbhlhp => "pneumatized carapace",
 158
 159         Zdbsm => "metabol boost",
 160         Zdbsa => "adrenal glands",
 161
 162         Zdbvm => "melee attack$sign{_}s",
 163         Zdbva => "missile attack$sign{_}s",
 164         Zdbvc => "carapace",
 165         Zdbdm => "muscular augments",
 166         Zdbdg => "grooved spines",
 167         Zdbdl => "lurker aspect",
 168 },
 169
 170 mode => {
 171         P => 'Protoss Probe',
 172         Pb => 'Protoss Probe build',
 173         Pbn => 'Protoss Nexus',
 174         Pbg => 'Protoss Gateway',
 175         Pbgt => 'Protoss High Templar',
 176         Pbgk => 'Protoss Dark Templar',
 177         Pbgkr => 'Protoss Dark Archon',
 178         Pbf => 'Protoss Forge',
 179         Pby => 'Protoss Cybernetics Core',
 180         Pbb => 'Protoss Shield Battery',
 181         Pv => 'Protoss Probe advanced build',
 182         Pvr => 'Protoss Robotics facility',
 183         Pvrv => 'Protoss Reaver',
 184         Pvs => 'Protoss Stargate',
 185         Pvsc => 'Protoss Carrier',
 186         Pvsa => 'Protoss Arbiter',
 187         Pvso => 'Protoss Corsair',
 188         Pvt => 'Protoss Templar Archives',
 189         Pvo => 'Protoss Observatory',
 190         Pva => 'Protoss Arbiter Tribunal',
 191
 192         Z => 'Zerg Larva',
 193         Zd => 'Zerg Drone',
 194         Zdb => 'Zerg basic Drone mutation',
 195         Zdbh => 'Zerg Hatchery',
 196         Zdbhl => 'Zerg Lair',
 197         Zdbhlh => 'Zerg Hive',
 198         Zdbs => 'Zerg Spawning Pool',
 199         Zdbd => 'Zerg Hydralisk Den',
 200         Zdv => 'Zerg advanced Drone mutation',
 201 },
 202
 203 }