Shannon V. OKeets
Posts: 22095
Joined: 5/19/2005 From: Honolulu, Hawaii Status: offline
|
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;
_____________________________
Steve Perfection is an elusive goal.
|