void InitRandomShipsNames()
{
	// Spain names
	int n = 0;
	n = AddStr2Array(&sRndShpSpName, n, "Africa,Aguila,Amazona,Ambrosia");
	n = AddStr2Array(&sRndShpSpName, n, "Asia,Astrea,Astuto,Asuncion,Atalante,Atrevido,Bahama,Barbara");
	n = AddStr2Array(&sRndShpSpName, n, "Bolodor,Brave,Cantabro,Carlotta,Cazodore,Ceres,Chicla,Cierva,Clara,Colon");
	n = AddStr2Array(&sRndShpSpName, n, "Contabro,Corso,Cubas,Cuervo,Diana");
	n = AddStr2Array(&sRndShpSpName, n, "Espaffa,Europa,Fama,Feliz,Fenix,Firme,Flecha");
	n = AddStr2Array(&sRndShpSpName, n, "Fuerta,Galgo,Galicia,Gamo,Gloria,Glorioso,Guerrero");
	n = AddStr2Array(&sRndShpSpName, n, "Hasta,Hermione,Infanta,Isabella,Juno,Liebra,Liguero,Ligura");
	n = AddStr2Array(&sRndShpSpName, n, "Limeno,Mahonesa,Matilda,Medea,Mercedes,Mexicano,Minerva,Minho");
	n = AddStr2Array(&sRndShpSpName, n, "Momarca,Montanez,Murciano,Neptuno,Ninfa,Oriente,Orquijo,Pallas,Paxaro,Paz");
	n = AddStr2Array(&sRndShpSpName, n, "Perla,Pinta,Poli,Princesa,Raposa,Rayo");
	n = AddStr2Array(&sRndShpSpName, n, "Rosario,Sabina,San Blas");
	n = AddStr2Array(&sRndShpSpName, n, "San Gil");
	n = AddStr2Array(&sRndShpSpName, n, "San Leon,San Lino");
	n = AddStr2Array(&sRndShpSpName, n, "San Pio");
	n = AddStr2Array(&sRndShpSpName, n, "Santelmo");
	n = AddStr2Array(&sRndShpSpName, n, "Secta,Serio,Sirena,Soberano,Tartar,Terrible,Thetis,Trucha,Valiente,Valorosa");
	n = AddStr2Array(&sRndShpSpName, n, "Velasco,Velosa,Vencedor,Venganza,Venus,Vincejo,Vivo,Voader");

	// England names
	n = 0;
	n = AddStr2Array(&sRndShpEnName, n, "Aboukir,Acasta,Achar,Achille,Acorn,Active,Actoeon,Acute,Adamant,Adonis,Advice,Aeolus,Africa,Agressor,Aigle");
	n = AddStr2Array(&sRndShpEnName, n, "Aildreda,Ajax,Alacrity,Alarm,Alban,Albicore,Albion,Alceste,Alcide,Alcmene,Alfred,Algerian,Allemaar,Alonso");
	n = AddStr2Array(&sRndShpEnName, n, "Amazon,Amelia,Amethyst,Amphion,Anacreon,Angel,Anson,Antelope,Apelles,Apollo,Aquilon,Arab,Ardent,Argo,Ariadne");
	n = AddStr2Array(&sRndShpEnName, n, "Ariel,Armada,Arrogant,Arrow,Artoise,Asia,Astrea,Atalanta,Atlas,Aurora,Avenger,Avon,Bacchus");
	n = AddStr2Array(&sRndShpEnName, n, "Badger,Barfleur,Barossa,Basilisk,Beagle,Bedford,Bellona,Benbow,Berkeley,Berwick,Blake,Blanche,Blenheim,Bold");
	n = AddStr2Array(&sRndShpEnName, n, "Bonneta,Boxer,Brave,Brazen,Brisk,Bristol,Briton,Brothers,Bruizer,Bulldog,Bustard,Butler,Caesar,Calypso");
	n = AddStr2Array(&sRndShpEnName, n, "Camilla,Canopus,Carnatic,Caroline,Castor,Censor,Centaur,Cerberus,Ceres,Champion,Charger,Charon,Cherokee");
	n = AddStr2Array(&sRndShpEnName, n, "Cherub,Circe,Colossus,Comet,Conquest,Cordelia,Cornelia,Cossack,Courier,Cracker");
	n = AddStr2Array(&sRndShpEnName, n, "Creole,Crescent,Cressy,Crown,Cyane,Cyclop,Cygnet,Daedalus,Danae,Daphne,Daring,Dashe,Dashield,Decoy,Defence,Defiance,Desiree");
	n = AddStr2Array(&sRndShpEnName, n, "Diadem,Diamond,Diana,Dictator,Dido,Diomede,Director,Dolphin,Doris,Dragon,Drake,Driver,Druid");
	n = AddStr2Array(&sRndShpEnName, n, "Dryad,Dublin,Duke,Duncan,Eagle,Echo,Eclipse,Edgar,Egmont,Elephant,Emerald,Endymion");
	n = AddStr2Array(&sRndShpEnName, n, "Escort,Ethalion,Europa,Eurotas,Euryalus,Eurydice,Fairy,Falcon,Fame,Favorite,Fawn,Ferret,Firm,Flirt,Flora,Fly");
	n = AddStr2Array(&sRndShpEnName, n, "Fortune,Fox,Foxhound,Frolic,Fury,Galatea,Gallant,Gannet,Ganymede,Garland,Gipsy,Glasgow,Glory,Goliath");
	n = AddStr2Array(&sRndShpEnName, n, "Goodly,Grampus,Halifax,Hannibal,Harpy,Hasty,Haughty,Havoc,Hawk,Hazard,Hebe,Hector,Helena,Hercules,Hermes,Hermione");
	n = AddStr2Array(&sRndShpEnName, n, "Hero,Heroine,Heron,Hibernia,Hind,Horatio,Hound,Hussar,Hyaena,Hydra,Hyperion,Intrepid");
	n = AddStr2Array(&sRndShpEnName, n, "Iris,Isis,Jason,Juno,Jupiter,Juste,Kangaroo,Kent,Kite,Lapwing,Latona,Lavinia,Leda,Leonidas,Leopard,Levant");
	n = AddStr2Array(&sRndShpEnName, n, "Liberty,Lion,Lively,Lizard,London,Lydia,Lynx,Lyra,Majestic,Mariner,Marital,Mars,Martin,Mary");
	n = AddStr2Array(&sRndShpEnName, n, "Medina,Medusa,Medway,Melampus,Meleoger,Mercury,Merlin,Mermaid,Meteor,Minerva,Minotaur,Minstrel,Monarch,Myrmidon,Mullet,Mutine,Naid");
	n = AddStr2Array(&sRndShpEnName, n, "Nautilus,Nemesis,Neptune,Nereus,Nimble,Nimrod,Nonsuch,Nymphe,Ocean,Olympia,Opossum,Orestes,Orion,Otter,Pallas,Pandora,Paulette,Peacock,Pearl");
	n = AddStr2Array(&sRndShpEnName, n, "Pegasus,Pelican,Penelope,Perseus,Phoebe,Phoenix,Phoeton,Piercer,Pilot,Pincher,Pioneer,Plover,Plumper,Pluto,Powerful,Prince,Princess");
	n = AddStr2Array(&sRndShpEnName, n, "Prompt,Prothee,Prudent,Psyche,Pygmy,Pyramus,Queen,Rainbow,Reason,Ranger,Ready,Rebuff,Recovery");
	n = AddStr2Array(&sRndShpEnName, n, "Redpole,Regulus,Reindeer,Renown,Repulse,Resource,Reunion,Revenge,Rodney,Romney,Romulus,Rose,Rover,Royalist");
	n = AddStr2Array(&sRndShpEnName, n, "Ruby,Sabrina,Sandwich,Saturn,Savage,Sceptre,Scipio,Scorpion,Scourge,Scout,Seahorse,Serapis,Serpent,Shark");
	n = AddStr2Array(&sRndShpEnName, n, "Sirius,Snake,Spartan,Speedy,Spencer,Sphynx,Spider,Spitfire,Spy,Squirrel,Stag,Standard,Starling,Success,Sultan,Surprise,Susan");
	n = AddStr2Array(&sRndShpEnName, n, "Swallow,Swan,Swift,Sybille,Sylph,Syren,Tartarus,Teaser,Terrible,Thais,Thames,Theseus,Thetis,Thisbe,Thorn");
	n = AddStr2Array(&sRndShpEnName, n, "Tickler,Tigress,Trepassy,Trial,Tribune,Trident,Trimmer,Triton,Triumph,Trusty,Ulysses,Unicorn,Union,Unite,Urgent,Valiant,Vanguard");
	n = AddStr2Array(&sRndShpEnName, n, "Venus,Vesta,Vestal,Veteran,Victor,Victory,Vigilant,Viper,Vixen,Vulture,Warrior,Warspite,Wasp,Wrangler,Yarmouth,Zealous,Zebra");

	// France names
	n = 0;
	n = AddStr2Array(&sRndShpFrName, n, "Abeille,Achates,Achille,Actif,Aelcon,Agricole,Aigle,Ajax,Alceste,Alcide,Alerte,Alouette,Amazone,Amerique,Annibal");
	n = AddStr2Array(&sRndShpFrName, n, "Antelope,Apollon,Aquilon,Ardent,Arethuse,Ariel,Artemise,Artesien,Astree,Atalante,Atlas,Auguste,Aurore,Babet,Badine,Belette,Bellone");
	n = AddStr2Array(&sRndShpFrName, n, "Berceau,Berwick,Bestale,Betsey,Bizarre,Blanche,Blonde,Boree,Boudeuse,Brave,Bravoure,Breslaw");
	n = AddStr2Array(&sRndShpFrName, n, "Brune,Brutus,CaIra,Calliopa,Calliope,Calypso,Caroline,Cassard,Castor,Censeur,Centaure,Ceres,Chameau,Charente,Cheri,Chiffone");
	n = AddStr2Array(&sRndShpFrName, n, "Cisalpin,Citoyen,Clorinde,Cocade,Concorde");
	n = AddStr2Array(&sRndShpFrName, n, "Coquille,Cornelie,Cornette,Correre,Courier,Couronne,Creten,Curleuse,Cybele,Danae,Dasaix,Decade,Decius,Decuis,Desire");
	n = AddStr2Array(&sRndShpFrName, n, "Desiree,Destin,Diademe,Diane,Didon,Diligent,Dix Aout,Dryade,Dulyce,Duquesne,Durance,Duras,Echaue,Eclaire");
	n = AddStr2Array(&sRndShpFrName, n, "Electra,Eliza,Embroye,Emeraude,Emulous,Eole,Epervier,Espion,Etoile,Eveille,Fantome,Fauvette,Fee,Felicite,Fendant,Fidele");
	n = AddStr2Array(&sRndShpFrName, n, "Fine,Flamand,Fleche,Fleuron,Flore,Forte,Fortunee,Fougueux,Franklin,Friponne,Furet,Furieuse,Galathee,Gasparin,Genereux,Gentille,Gloire,Glorieux");
	n = AddStr2Array(&sRndShpFrName, n, "Granne,Guerrier,Hannibal,Hardi,Hassard,Hector,Hehe,Helene,Hercule,Hermione,Heros,Heureux,Hoche,Hormonie,Hureuse,Illustre,Imperial");
	n = AddStr2Array(&sRndShpFrName, n, "Inconnue,Indien,Insolant,Iriste,Jacobin,Jena,Junon,Jupiter,Juste,Justice");
	n = AddStr2Array(&sRndShpFrName, n, "Justine,Latone,Legere,Leopard,Levriere,Liberte,Libre,Lion,Loire,L'Orient,Lutine,Maida,Marat,Marengo,Marte,Medee,Meduse,Mercure");
	n = AddStr2Array(&sRndShpFrName, n, "Mignonne,Minerve,Modeste,Montagne,Montreal,Moselle,Mucius,Mulet,Musette,Mutine,Nemesis,Neptune,Nereide,Nieman,Nymphe,Ocean,Orient,Orion,Pallas,Palmier");
	n = AddStr2Array(&sRndShpFrName, n, "Papillon,Patriote,Paulette,Pegase,Pensee,Perdrix,Perle,Perte,Phocion,Pique,Pluton,Pomone,Pompee,Poulette,Preneuse,Prompte");
	n = AddStr2Array(&sRndShpFrName, n, "Prudente,Puissant,Railleur,Rapide,Rebecca,Recluse,Reflechi,Renommee,Reprisal,Requin,Resolue,Reunion,Revanche,Revenge,Rivoli");
	n = AddStr2Array(&sRndShpFrName, n, "Robuste,Romaine,Rousseau,Ruse,Sagesse,Salamine,Sardine,Scaevala,Sceptre,Scipion,Seine,Sensible,Serpente,Severe,Sincere,Singe,Sphynx");
	n = AddStr2Array(&sRndShpFrName, n, "Suffren,Suitane,Sultana,Superbe,Sybille,Syrene,Tactique,Tamise,Tapaze,Terrible,Thetis,Tigress,Timoleon");
	n = AddStr2Array(&sRndShpFrName, n, "Tonnant,Tonnere,Tortue,Trajan,Tribune,Trident,Unite,Uranie,Varsovie,Vendee,Vengeur,Venturer");
	n = AddStr2Array(&sRndShpFrName, n, "Venus,Vertu,Vestale,Vesuve,Victoire,Vimeria,Virginie,Virtu,Volcan,Wagram,Zephyr");

	// Pirate names
	n = 0;
	n = AddStr2Array(&sRndShpPiName, n, "Ostergo,Pluto,Utrecht,Westergo,Zeeland,Nassau");
	n = AddStr2Array(&sRndShpPiName, n, "Papillon,Patriote,Paulette,Pegase,Pensee,Perdrix,Perle,Perte,Phocion,Pique,Pluton,Pomone,Pompee,Poulette,Preneuse,Prompte");
	n = AddStr2Array(&sRndShpPiName, n, "Sirius,Snake,Spartan,Speedy,Spencer,Sphynx,Spider,Spitfire,Spy,Squirrel,Stag,Standard,Starling,Success,Sultan,Surprise,Susan");
	n = AddStr2Array(&sRndShpPiName, n, "Velasco,Velosa,Vencedor,Venganza,Venus,Vincejo,Vivo,Voader");

	// Holland names
	n = 0;
	n = AddStr2Array(&sRndShpHoName, n, "Brutus,Cato,Jupiter,Maas,Nepunus,Vrijheid,Willen I");
	n = AddStr2Array(&sRndShpHoName, n, "Wreker,Bato,Cerberus,Devries,Haarlem,Hercules,Hoop,Leijden");
	n = AddStr2Array(&sRndShpHoName, n, "Ostergo,Pluto,Utrecht,Westergo,Zeeland,Nassau");
	n = AddStr2Array(&sRndShpHoName, n, "Alkmaar,Batavier,Brakel,Delft,Erfprins,Goes,Alkmaar,Belft,Brakel");
	n = AddStr2Array(&sRndShpHoName, n, "Schiedam,Rijuland,Van Goes,Mars,Argo,Bloys,Castor,Duif,Femiks,Hector");
	n = AddStr2Array(&sRndShpHoName, n, "Urie,Zwieten,Braave,Castor,Medea,Pallux,Thalen,Vikter,Alliante,Amazon,Aremd,Argo,Bellona,Castor,Ceres");
	n = AddStr2Array(&sRndShpHoName, n, "Fenix,Furie,Jager,Jason,Juno,Mars,Phoenix,Zefir,Helden,Alarme,Alethea,Bellona,Brielle,Dieren,Dolfijn,Drack,Havik,Kuris,Leopard,Minerva");
	n = AddStr2Array(&sRndShpHoName, n, "Pallas,Scipio,Syrena,Thetis,Triton,Valk,Venus,Zeepaard,Hoora,Ajax,Atalante,Comeet,Daphne,Echo,Galathea,Kemphaan,Mercur,Pylades,Sambrang,Surinam");
	n = AddStr2Array(&sRndShpHoName, n, "Espion,Galatie,Meermin,Pijl,Zeehana,Braak,Hoop,Panther,Star,Zeerob,Ajax,Jager,Snelheid,Gier,Bataaf,Belgica,Lijnk,Vlugheid,Zeemeeuw,Dieren,Marapin,Alpha,Doris,Anabel,Cesira,Elise,Naida");
	n = AddStr2Array(&sRndShpHoName, n, "Belle,Esme,Alethea,Mulder,Ava,Galathea,Belle,Echo,Vera,Cameo,Diana,Dijk,Hellwig,Knol,Vlugheid,Maria,Ajax,Gel,Lisa,Mug,Opal,Salhi,Venus,Sybill,Cremers");
}