RE: Scenario Data
Posted: Sun Jun 03, 2007 8:47 pm
by Shannon V. OKeets
The data for setting up the last scenario. The USA and CW sure have a lot of ships.
=======
// ****************************************************************************
// Tenth scenario
// ****************************************************************************
scDeclineAndFall:
begin
case MCIndex of
mcChina: // Decline and Fall
begin
if SettingupCommunists then
AddGroupSimple(lCommunist, ['[Communist China]', 'HQ Mao',
'IN 2', 'MI 2', 'GA 2', 'CA 1', 'PT 1', '[Div]', 'IN 1'])
else
begin
AddGroupCountry(['China'], ['[Nationalist China]', 'HQ Chiang',
'HQ Stilwell', 'IN 4', 'MI 4', 'GA 3', 'CA 2', 'F2 1', 'L3 1',
'PI 2', '[Div]', 'AT 3', 'IN 1', 'MO 1', '[China]', 'OI 1']);
AddGroupCountry(['Burma'], ['[Nationalist China]', 'IN 1']);
end;
end;
mcJapan: // Decline and Fall
begin
AddGroupCountry(['Japan'], ['IN 1', 'MI 4', 'F2 2/1', 'PI 2',
'AT 2', '[Div]', 'EN 1']);
AddGroupCountry(['Manchuria', 'Korea'], ['HQ Terauchi', 'ME 1',
'IN 1', 'GA 2', '[Div]', 'AT 1', 'IN 1', 'TE 2']);
AddGroupCountry(['Siam'], ['[Siam]', 'MI 1']);
AddGroupCountry(['Burma'], ['HQ Yamashita', 'IN 1']);
AddGroupCountry(['China'], ['HQ Hata', 'HQ Umezu', 'IN 2', 'MI 4',
'GA 2', 'AT 2', '[Div]', 'IN 2', 'F2 1', 'L2 1', 'L3 1', 'PI 3']);
AddGroupSimple(lPacificAsia, ['HQ Yamamoto', 'MO 1', 'IN 5', 'GA 2',
'MA 1', 'F2 2/1', 'L2 1/2', 'L3 1/1', 'N2 3/1', 'N3 2', 'N4 0/1',
'A3 0/1', 'PI 9', '[Div]', 'AT 1', 'MA 1', 'OI 3', 'ASW 2',
'CS Hiyo', 'CS Junyo', 'CS Shokaku', 'CS Taiho', 'CS Zuikaku',
'CS Chitose', 'CS Chiyoda', 'CS Hosho', 'CS Hyuga', 'CS Kaiyo',
'CS Ryuho', 'CS Shinyo', 'CS Taiyo', 'CS Unyo', 'CS Zuiho',
'CS Fuso', 'CS Kongo', 'CS Nagato', 'CS Yamato', 'CS Haruna',
'CS Musashi', 'CS Yamashiro', 'CS Atago', 'CS Mogami', 'CS Myoko',
'CS Oyodo', 'CS Tone', 'CS Aoba', 'CS Ashigara', 'CS Chikuma',
'CS Chokai', 'CS Haguro', 'CS Kumano', 'CS Nachi', 'CS Suzuya',
'CS Takao', 'CL Natori', 'CL Oi', 'CL Yura', 'CL Abukuma',
'CL Isuzu', 'CL Kashii', 'CL Kashima', 'CL Kinu', 'CL Kiso',
'CL Kitakami', 'CL Nagara', 'CL Noshiro', 'CL Tama',
'NT 1', 'AM 1', 'SU 3', 'CN 14', 'CP 13/11', 'CL Ping Hai']);
AddGroupConstructionPool(['CS Ibuki', 'SU 1']);
AddGroupRepairPool(['CS Asama', 'CS Idzumo', 'CS Maya']);
AddGroupProduction(tJulAug, 1944, False, ['CS Amagi', 'CS Unryu',
'F2 1', 'PI 1', 'CP 2/1', 'CN 2', '[Down]', 'ASW 1']);
AddGroupProduction(tSepOct, 1944, False, ['N3 1', 'PI 1',
'CS Katsuragi', '[Down]', 'CS Kasagi', 'CN 2', 'CP 1/1']);
AddGroupProduction(tNovDec, 1944, False, ['CS Shinano', '[Down]',
'CL Sakawa', 'CS Aso', 'CS Ikoma', 'CP 1/1']);
end;
mcGermany: // Decline and Fall
begin
AddGroupCountry(['USSR', 'NOT Karelia', 'Poland', 'Latvia',
'Estonia', 'Lithuania', 'Rumania'], ['[Germany]',
'HQ Model', 'HQ Manstein', 'HQ von Bock', 'HQ von Leeb',
'AR 4', 'ME 5', 'MO 4', 'IN 15', 'MI 3',
'[Div]', 'AT 4', 'IN 1', 'ME 1', 'MT 1', 'RO 2',
'F2 2/1', 'F3 1', 'L2 1/1', 'L3 1/1', 'PI 4',
'[German SS]', '[Corps]', 'AR 1', 'ME 1', 'IN 1',
'[Hungary]', 'IN 2',
'[Rumania]', 'IN 1', 'CA 1', 'MT 1', 'F2 0/1', 'L2 0/1']);
AddGroupCountry(['Germany'], ['[Germany]', 'AR 1', 'MI 1',
'F2 3/1', 'F3 1', 'A4 1', 'PI 5', '[Div]', 'AT 1',
'EN 1', 'OI 2', 'ASW 1', 'SY 2']);
AddGroupCountry(['Free France', 'NOT Vichy France', 'Belgium'],
['[Germany]', 'HQ Rommel']);
AddGroupCountry(['Netherlands'], ['[Germany]', 'HQ Rundstedt',
'ME 1', 'MO 1', 'IN 2', 'GA 2', 'PA 1',
'[Div]', 'AT 2', 'IN 1', 'FT 5',
'[German SS]', '[Corps]', 'AR 1', 'ME 1']);
AddGroupCountry(['Denmark', 'Norway', 'Finland'], ['[Germany]',
'AR 1', 'ME 1', 'GA 2', 'MT 1', 'N4 1', 'PI 1']);
AddGroupCountry(['Greece', 'Yugoslavia'], ['[Germany]', 'MI 2',
'GA 2', 'MT 1',
'[Bulgaria]', 'IN 1']);
AddGroupCountry(['Finland', 'Karelia'], ['[Finland]',
'HQ Mannerheim', 'ME 1', 'MO 1', 'IN 2', 'MI 1', 'F2 1',
'CL Vainamoinen', '[Germany]', 'PI 1']);
AddGroupCountry(['Bulgaria'], ['[Bulgaria]', 'IN 1', 'MI 1', 'L2 1',
'[Germany]', 'PI 1']);
AddGroupCountry(['Hungary'], ['[Hungary]', 'MO 1', 'MI 1', 'CA 1',
'F2 0/1']);
AddGroupCountry(['Rumania'], ['[Rumania]', 'HQ Antonescu', 'ME 1',
'IN 1', 'MI 2', 'CS Destroyer Flotilla', '[Germany]', 'CN 1']);
AddGroupCountry(['Italy'], ['[Germany]', 'HQ Kesselring', 'AR 1',
'MO 1', 'MT 1', 'F2 1', 'PI 1',
'CS Conte Di Cavour', 'CL Galissonniere', 'CL Taranto', 'CN 1',
'[Italian]', 'NT 1']);
AddGroupSimple(lEuropeNoMed, ['[Germany]', 'PA 1', 'F2 1/2',
'F3 1/1', 'L3 1/2', 'L4 1',
'N3 1/1', 'A3 1/1', 'PI 6', 'AT 1', '[Div]', 'AR 1', 'FT 2',
'CS Schlesien', 'CS Schleswig-Holstein', 'CS Tirpitz',
'CS Admiral Hipper', 'CS Deutschland', 'CS Prinz Eugen',
'CS Admiral Scheer', 'CS Tordenskjold', 'CL Nürnberg', 'CL Emden',
'CL Köln', 'CL Leipzig', 'NT 1', 'SU 13', 'CN 7']);
AddGroupConstructionPool(['CS Graf Zeppelin', 'CS Seydlitz', 'SU 1',
'CS Clemenceau', 'CS Gascoigne', 'CS Impero']);
AddGroupRepairPool(['[Germany]', 'CS Gneisenau', 'CS Niels Juel',
'CS Peder Skram', 'CX Hansa', 'CX Orion', 'CX Widder']);
AddGroupProduction(tJulAug, 1944, False, ['[Germany]', 'ME 1',
'MO 1', 'IN 3', 'GA 2', 'F2 2', 'L2 1', 'PI 3',
'CS Harald Haarfagre', 'SU 1',
'[German SS]', 'MT 1']);
AddGroupProduction(tSepOct, 1944, False, ['[Germany]', 'L3 1',
'PI 1', 'SU 1',
'[German SS]', '[Corps]', 'AR 1']);
AddGroupProduction(tNovDec, 1944, True, ['[Germany]', 'AR 1',
'CS De Zeven Prov.']);
end;
mcFrance: // Decline and Fall
begin
AddGroupCountry(['Algeria', 'Morocco', 'Tunisia'], ['[Free France]',
'IN 1', 'AT 1', '[Div]', 'IN 1']);
AddGroupCountry(['Italy'], ['[Free France]', 'MT 1', 'AT 1',
'[Div]', 'MT 1']);
AddGroupSimple(lEurope, ['[Free France]', 'HQ De Gaulle',
'CS Paris', 'CS Lorraine', 'CS Tourville', 'CS Duguay Trouin',
'CS Duquesne', 'CS Suffren', 'CL Jeanne D''Arc', 'CL Africano',
'CL Emile Bertin', 'CL G. Leygues', 'CL Gloire', 'CL Montcalm',
'CL Regolo', 'SU 1', 'NT 1', 'CN 7',
'[Div]', 'AT 1', 'AR 1', 'OI 1', 'PT 2']);
AddGroupConstructionPool(['[Free France]', 'CS Jean Bart (II)']);
AddGroupRepairPool(['[Free France]', 'ME 1']);
end;
mcUSSR: // Decline and Fall
begin
AddGroupSimple(lEurope, ['HQ Koniev', 'HQ Rokossovsky',
'HQ Timoshenko', 'HQ Yeremenko', 'HQ Zhukov', 'AR 6', 'ME 7',
'MO 4', 'IN 25', 'MI 7', 'GA 6', 'CA 2', 'MT 1', 'PA 1',
'F2 6/5', 'L2 3/1', 'L3 2/1', 'L4 1/1', 'AT 3', 'PI 13', 'OF 1',
'SU 2', '[Div]', 'AT 6', 'IN 2', 'MO 1', 'MT 1', 'ME 1', 'EN 2',
'PT 3', 'SK 1', 'FT 6']);
AddGroupPorts('Baltic Sea', ['CS Kirov', 'CS Maxim Gorkiy',
'CS Oktyabr''skaya Revolutsiya']);
AddGroupPorts('Black Sea', ['CS Krasnyi Kavkaz', 'CL Krasni Krym']);
AddGroupSimple(lPacificAsia, ['MO 1', 'GA 2', 'CA 1', 'SU 2',
'[Div]', 'CA 1', 'CS Kaganovich', 'CS Kalinin']);
AddGroupSimple(lAny, ['F2 1', 'L3 1', 'PI 2', 'OF 1', 'NT 1',
'CN 4', '[Div]', 'AT 2', 'AR 1', 'PQ 1', 'OI 6', 'ASW 1']);
AddGroupConstructionPool(['CS Chapayev', 'CS Frunze',
'CS Kuibyshev', 'CS Zhelezniakov']);
AddGroupRepairPool(['CS Molotov', 'CS Krasni Kavkaz',
'CS Voroshilov']);
AddGroupProduction(tJulAug, 1944, True, ['ME 1', 'F2 1', 'L2 1',
'PI 2', 'AT 1']);
end;
mcCommonwealth: // Decline and Fall
begin
AddGroupCountry(['United Kingdom'], ['[United Kingdom]',
'HQ Montgomery', 'AR 2', 'ME 1', 'MO 2', 'MI 1', 'GA 1', 'PA 1',
'F2 3/1', 'L3 2/1', 'L4 2/1', 'N3 0/1', 'N4 0/1', 'PI 9',
'[Div]', 'AT 3', 'AR 1', 'MO 1',
'[Corps]', '[Canada]', 'AR 1', 'F2 1/1', 'L4 1',
'[Commonwealth]', 'OI 2']);
AddGroupCountry(['Egypt', 'Malta', 'Libya', 'Gibraltar', 'Tunisia'],
['[United Kingdom]', 'ME 1', 'IN 1', '[Div]', 'AT 1', 'TE 2',
'FT 1',
'[Commonwealth]', 'OI 1']);
AddGroupCountry(['Italy'], ['[United Kingdom]', 'HQ Alexander',
'AR 1', 'ME 1', 'IN 1', '[Div]', 'AT 2', 'IN 1',
'F2 1', 'L3 1', 'PI 2',
'[Corps]', '[Canada]', 'MO 1',
'[Poland]', 'IN 1']);
AddGroupSimple(lAfrica, ['[United Kingdom]', 'IN 1',
'[South Africa]', 'IN 1', 'TE 2']);
AddGroupSimple(lEurope, ['[United Kingdom]', 'CS Formidable',
'CS Furious', 'CS Indefatigable', 'CS Indomitable',
'CS Victorious', 'CS Nelson', 'CS Warspite', 'CS Ramillies',
'CS Rodney', 'CS Duke of York', 'CS Kent', 'CS Belfast',
'CS Bermuda', 'CS Berwick', 'CS Ceylon', 'CS Cumberland',
'CS Glasgow', 'CS Howe', 'CS Jamaica', 'CS Kenya', 'CS Mauritius',
'CS Nigeria', 'CS Sheffield', 'CS SwiftSure', 'CL Ajax',
'CL Arethusa', 'CL Carlisle', 'CL Danae', 'CL Dido', 'CL Durban',
'CL Royalist', 'CL Argonaut', 'CL Aurora', 'CL Bellona',
'CL Black Prince', 'CL Caledon', 'CL Caradoc', 'CL Cardiff',
'CL Cleopatra', 'CL Colombo', 'CL Dauntless', 'CL Delhi',
'CL Despatch', 'CL Diadem', 'CL Diomede', 'CL Dragon',
'CL Enterprise', 'CL Euryalus', 'CL Hermione', 'CL Neptune',
'CL Orion', 'CL Phoebe', 'CL Scylla', 'CL Sirius', 'CL Spartan',
'F2 0/1', 'F3 1/1', 'L2 0/1', 'L3 1', 'L4 1', 'N2 1/1', 'A3 /11',
'PI 5', '[Div]', 'PA 1', 'TE 2', 'ASW 9',
'[New Zealand]', 'CS Gambia',
'[Netherlands]', 'CS Sumatra',
'[Commonwealth]', 'CS Garibaldi', 'CS Abruzzi',
'CS Girgios Averoff', 'CL Cadorna', 'CL Magno',
'CL Montecuccoli']);
AddGroupCountry(['Australia'], ['[Australia]', 'ME 1', 'MI 1',
'TE 1', 'F3 1', 'N3 1', '[United Kingdom]', 'PI 2']);
AddGroupCountry(['India', 'Burma'], ['[United Kingdom]',
'HQ Wavell', 'IN 1', 'L3 1', 'PI 2', 'AT 1', 'TE 2',
'[India]', 'IN 2', 'MI 1', 'GA 1', 'F2 1',
'[Commonwealth]', 'OI 1']);
AddGroupCountry(['Papua'], ['[Australia]', 'IN 1']);
AddGroupSimple(lPacificAsia, ['[United Kingdom]', 'HQ Mountbatten',
'AT 1', 'ASW 2',
'CS Illustrious', 'CS Unicorn', 'CS Anson', 'CS Queen Elizabeth',
'CS Renown', 'CS Valiant', 'CS Hawkins', 'CS London',
'CS Devonshire', 'CS Frobisher', 'CS Suffolk', 'CS Sussex',
'CL Ceres', 'CL Emerald', 'CL Capetown',
'[Australia]', 'CS Australia', 'CS Shropshire', 'CL Adelaide',
'CL Hobart',
'[New Zealand]', 'F2 0/1', 'CL Achilles', 'CL Leander',
'[Netherlands]', 'CL Heemskerck', 'CL Tromp',
'[Commonwealth]', 'OI 1']);
AddGroupSimple(lAny, ['[United Kingdom]', 'F2 1', 'L3 1/1', 'N4 1',
'PI 3', 'OF 1', 'NT 5', 'AM 2', 'SU 4', 'CP 12/8',
'[Div]', 'EN 1', 'TE 2', 'ASW 3',
'[South Africa]', 'F2 0/1',
'[Commonwealth]', 'CN 63']);
AddGroupConstructionPool(['[United Kingdom]', 'CS Ontario',
'CS Perseus', 'CS Superb', 'CS Warrior', 'SU 1', 'ASW 1']);
AddGroupRepairPool(['[United Kingdom]', 'CS King George V',
'CS Resolution', 'CS Revenge', 'CS Norfolk', 'CS Argus',
'CS Malaya', 'CS Royal Sovereign', 'CS Birmingham',
'CS Liverpool', 'CS Newcastle', 'CS Newfoundland', 'CS Uganda']);
AddGroupProduction(tJulAug, 1944, True, ['[United Kingdom]',
'F2 1', 'PI 1', 'CS Ocean', 'CS Theseus', 'CN 2', '[Up]',
'ASW 1']);
AddGroupProduction(tSepOct, 1944, False, ['[United Kingdom]',
'CS Implacable', '[Down]', 'CS Terrible', 'CS Triumph',
'CS Defense', 'SU 1', 'CP 1/1',
'[Commonwealth]', 'CN 1']);
AddGroupProduction(tNovDec, 1944, True, ['[United Kingdom]',
'CS Vanguard', 'CS Magnificent', '[Up]', 'CS Colossus',
'CP 1/1']);
AddGroupProduction(tJanFeb, 1945, False, ['[United Kingdom',
'CS Pioneer', 'CS Venerable', 'CS Vengeance', '[Down]',
'CS Majestic', 'CS Powerful']);
AddGroupProduction(tMarApr, 1945, False, ['[United Kingdom]',
'CS Glory']);
end;
mcUnitedStates: // Decline and Fall
begin
AddGroupCountry(['Tunisia'], ['MO 1', '[Div]', 'IN 1']);
AddGroupCountry(['Italy'], ['HQ Clark', 'ME 1', 'AT 1', '[Div]',
'MT 1']);
AddGroupCountry(['United Kingdom'], ['HQ Eisenhower', 'HQ Bradley',
'ME 1', 'MO 2', 'PA 1', 'AT 3', '[Div]', 'EN 1', 'MO 1', 'SP 1']);
AddGroupSimple(lEuropeUSAEastCoast, ['F2 7/8', 'F3 1/2', 'L3 4/4',
'L4 3/4', 'N3 1/2', 'A3 1/1', 'PI 17', '[Div]', 'AT 1', 'EN 1',
'IN 1', 'ASW 9',
'CS Franklin', 'CS Hancock', 'CS Hornet II', 'CS Ranger',
'CS Ticonderoga', 'CS San Jacinto', 'CS Alaska', 'CS Iowa',
'CS Texas', 'CS Wisconsin', 'CS Arkansas', 'CS Missouri',
'CS Nevada', 'CS New Jersey', 'CS Augusta', 'CS Tuscaloosa',
'CL Trenton', 'CL Astoria II', 'CL Concord', 'CL Memphis',
'CL Milwaukee', 'CL Pasadena', 'CL Philadelphia', 'CL Savannah']);
AddGroupSimple(lPacific, ['HQ MacArthur', 'HQ Nimitz', 'IN 2',
'GA 1', 'MA 2', '[Div]', 'AT 1', 'MA 1', 'ASW 3',
'F2 3/1', 'L3 2/1', 'N2 3/2', 'N3 1/1', 'A3 1', 'PI 10',
'CS Bunker Hill', 'CS Enterprise', 'CS Essex', 'CS Intrepid',
'CS Saratoga', 'CS Wasp II', 'CS Yorktown II', 'CS Bataan',
'CS Belleau Wood', 'CS Cabot', 'CS Cowpens', 'CS Langley II',
'CS Monterey', 'CS Princeton', 'CS Maryland', 'CS Massachusetts',
'CS Mississippi', 'CS Pennsylvania', 'CS South Dakota',
'CS Tennessee', 'CS Washington', 'CS Alabama', 'CS California',
'CS Colorado', 'CS Idaho', 'CS Indiana', 'CS New Mexico',
'CS New York', 'CS North Carolina', 'CS Baltimore',
'CS New Orleans', 'CS Pensacola', 'CS Portland', 'CS Boston',
'CS Canberra', 'CS Chester', 'CS Indianapolis', 'CS Louisville',
'CS Minneapolis', 'CS Quincy II', 'CS Salt Lake City',
'CS San Francisco', 'CS Wichita', 'CL Brooklyn', 'CL Omaha',
'CL San Diego', 'CL St. Louis', 'CL Biloxi', 'CL Birmingham',
'CL Boise', 'CL Columbia', 'CL Detroit', 'CL Denver',
'CL Honolulu', 'CL Houston II', 'CL Juneau', 'CL Marblehead',
'CL Montpellier', 'CL Nashville', 'CL Oakland', 'CL Phoenix',
'CL Raleigh', 'CL Reno', 'CL Richmond', 'CL San Juan',
'CL Santa Fe', 'CL Vincennes II', 'NS 1']);
// ****************************************************************************
// Chinese or US controlled hexes on Pacfic map
// ****************************************************************************
AddGroupSimple(lPacificUSAChina, ['L4 1', 'PI 1', '[Div]', 'AR 1']);
AddGroupCountry(['United States'], [
'AR 4', 'ME 2', 'MO 4', 'MI 2', 'PA 1', '[Div]', 'AT 2', 'AR 1',
'SP 1', 'NS 1', 'F2 2', 'L4 1', 'PI 3']);
AddGroupCountry(['Brazil'], ['[Brazil]', 'ME 1', 'MO 1', 'IN 1',
'MI 1', 'CA 1', 'F2 1', 'CS Minas Gerais', 'CL Bahia',
'CS Sao Paulo', 'CS Floriano', 'CL Rio Grande',
'[United States]', 'PI 1']);
AddGroupSimple(lUSAEuropePacific, ['[Div]', 'PA 1', 'EN 1', 'ASW 3',
'OF 1', 'OI 9', 'NT 5', 'AM 3', 'SU 8', 'CN 94', 'CP 27/22']);
AddGroupConstructionPool(['CS Lake Champlain', 'CS Wyoming',
'CS Bremerton', 'ASW 1']);
AddGroupRepairPool(['CS Béarn', 'CS Lexington II','CL Cincinnati',
'CS Independence']);
AddGroupProduction(tJulAug, 1944, True, ['F2 1', 'L3 1', 'PI 2',
'CS Los Angeles', 'CS Columbus', 'CS Fall River',
'[Up]', 'CS Bennington', 'CL Flint', 'CL Wilkes-Barre', 'ASW 1',
'CP 1/1', 'CN 7']);
AddGroupProduction(tSepOct, 1944, False, ['MA 1', 'L4 1', 'PI 1',
'AT 1', 'CS Randolph', 'CS Shangri La', 'CS Guam',
'CS Pittsburgh', 'CL Duluth', 'CL Springfield', 'SU 1',
'[Down]', 'CS Franklin Delano Roosevelt', 'CS Midway', 'CS Macon',
'CL Little Rock', 'CL Portsmouth', 'CN 7', 'CP 2/2']);
AddGroupProduction(tNovDec, 1944, False, ['CS Bon Homme Richard',
'CL Atlanta II', 'CL Oklahome City',
'[Down]', 'CS Princeton II', 'CS Tarawa', 'CS Helena II',
'CN 6', 'CP 1/1']);
AddGroupProduction(tJanFeb, 1945, False, ['CS Antietam',
'CS St. Paul', 'CL Tucson', 'CS Chicago II', 'CL Dayton',
'CL Amsterdam', '[Down]', 'CL Fargo']);
AddGroupProduction(tMarApr, 1945, False, ['CS Boxer', '[Down]',
'CS Kearsage', 'CS Leyte', 'CS Hawaii']);
end;
end;
end;