void InitRandomShipsNames()
{
	// Spain names
	int n = 0;
	n = AddStr2Array(&sRndShpSpName, n, "Adventoria,Africa,Aguila,Amazona,Ambrosia,Amfitrite,Angel de la Guarda,Annunciacion");
	n = AddStr2Array(&sRndShpSpName, n, "Argonauta,Arrogante,Asia,Astrea,Astuto,Asuncion,Atalante,Atrevido,Bahama,Barbara");
	n = AddStr2Array(&sRndShpSpName, n, "Bolodor,Brave,Cantabro,Carlotta,Carmelita,Cazodore,Ceres,Chicla,Cierva,Clara,Colon");
	n = AddStr2Array(&sRndShpSpName, n, "Concepcion,Conquistador,Contabro,Corso,Cubas,Cuervo,Defenduetra,Diana,Diligencia");
	n = AddStr2Array(&sRndShpSpName, n, "Elizabeth,Esmeralda,Espaffa,Esperanza,Europa,Fama,Feliz,Fenix,Firme,Flecha,Formidable");
	n = AddStr2Array(&sRndShpSpName, n, "Fuerta,Gaillardo,Galgo,Galicia,Gamo,Gertrudis,Gloria,Glorioso,Guerrero,Guipuzcano");
	n = AddStr2Array(&sRndShpSpName, n, "Hasta,Hermangildo,Hermione,Infanta,Intrepido,Isabella,Juno,Liebra,Liguero,Ligura");
	n = AddStr2Array(&sRndShpSpName, n, "Limeno,Magnanimo,Mahonesa,Maria Dela,Matilda,Medea,Mercedes,Mexicano,Minerva,Minho");
	n = AddStr2Array(&sRndShpSpName, n, "Momarca,Montanez,Murciano,Natividad,Neptuno,Ninfa,Oriente,Orquijo,Pallas,Paxaro,Paz");
	n = AddStr2Array(&sRndShpSpName, n, "Periviano,Perla,Pinta,Poli,Princesa,Raposa,Rayo,Real Familia,Reina Luisa,Resolucion");
	n = AddStr2Array(&sRndShpSpName, n, "Rosario,Sabina,San Antonio,San Augustine,San Barbara,San Batista,San Blas,San Bruno");
	n = AddStr2Array(&sRndShpSpName, n, "San Carlos,San Damaso,San Eugenio,San Felipe,San Fermin,San Fiorenzo,San Francisco");
	n = AddStr2Array(&sRndShpSpName, n, "San Fulgencio,San Gabriel,San Genaro,San Gil,San Ildefonso,San Isidro,San Joachim");
	n = AddStr2Array(&sRndShpSpName, n, "San Josef,San Juan Batista,San Juan Bautista,San Juan Nepomuceno,San Julien,San Justo");
	n = AddStr2Array(&sRndShpSpName, n, "San Leandro,San Leandro,San Leon,San Lino,San Lorenzo,San Nicholas,San Pablo,San Pasqual");
	n = AddStr2Array(&sRndShpSpName, n, "San Pedro Alacantara,San Pedro Apostal,San Pio,San Rafael,San Romon,San Sebastiano");
	n = AddStr2Array(&sRndShpSpName, n, "San Vincente,San Ysidro,Sant Felipe,Santa Agueda,Santa Ana,Santa Brigida,Santa Catalina");
	n = AddStr2Array(&sRndShpSpName, n, "Santa Cazilda,Santa Cecilia,Santa Clara,Santa Dorotea,Santa Elena,Santa Escolostica");
	n = AddStr2Array(&sRndShpSpName, n, "Santa Florentina,Santa Gertrudis,Santa Isabella,Santa Leoncadia,Santa Lucia,Santa Margaretta");
	n = AddStr2Array(&sRndShpSpName, n, "Santa Maria,Santa Maria Magdalena,Santa Matilda,Santa Perpetua,Santa Raquel,Santa Rita");
	n = AddStr2Array(&sRndShpSpName, n, "Santa Rosa,Santa Rosolia,Santa Rufinia,Santa Sabina,Santa Sulalia,Santa Teresa,Santelmo");
	n = AddStr2Array(&sRndShpSpName, n, "Secta,Serio,Sirena,Soberano,Tartar,Terrible,Thetis,Triofante,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,Adventure,Advice,Aeolus,Africa,Africaine,Agamemnon,Agressor,Aigle");
	n = AddStr2Array(&sRndShpEnName, n, "Aildreda,Ajax,Alacrity,Alarm,Alban,Albicore,Albion,Alceste,Alcide,Alcmene,Alexander,Alfred,Algerian,Allemaar,Alligator,Alonso,Amaranthe");
	n = AddStr2Array(&sRndShpEnName, n, "Amazon,Amelia,Amethyst,Amphion,Amphitrite,Anacreon,Andromeda,Angel,Anson,Antelope,Apelles,Apollo,Aquilon,Arab,Ardent,Argo,Argonaute,Ariadne");
	n = AddStr2Array(&sRndShpEnName, n, "Ariel,Armada,Arrogant,Arrow,Artoise,Asia,Assistance,Assurance,Astrea,Atalanta,Athenienne,Atlas,Audacious,Aurora,Avenger,Avon,Bacchante,Bacchus");
	n = AddStr2Array(&sRndShpEnName, n, "Badger,Barfleur,Barossa,Basilisk,Beagle,Bedford,Belleisle,Bellerophon,Bellona,Benbow,Berkeley,Berwick,Black Prince,Blake,Blanche,Blenheim,Bold");
	n = AddStr2Array(&sRndShpEnName, n, "Bonneta,Boxer,Brave,Brazen,Brilliant,Brisk,Bristol,Britannia,Briton,Brothers,Bruizer,Bucephalus,Bulldog,Bustard,Butler,Caesar,Caledonia,Calypso");
	n = AddStr2Array(&sRndShpEnName, n, "Cambridge,Camilla,Canopus,Carnatic,Caroline,Castor,Catherine,Censor,Centaur,Centurion,Cerberus,Ceres,Champion,Charger,Charlotte,Charon,Cherokee");
	n = AddStr2Array(&sRndShpEnName, n, "Cherub,Circe,Clementine,Cleopatra,Cockatrice,Colossus,Comet,Confounder,Conqueror,Conquest,Cordelia,Cornelia,Cornwallis,Cossack,Courier,Cracker");
	n = AddStr2Array(&sRndShpEnName, n, "Creole,Crescent,Cressy,Crocodile,Crown,Cyane,Cyclop,Cygnet,Daedalus,Danae,Dannemark,Daphne,Daring,Dashe,Dashield,Decoy,Defence,Defiance,Desiree");
	n = AddStr2Array(&sRndShpEnName, n, "Desperate,Diadem,Diamond,Diana,Dictator,Dido,Diligente,Diomede,Director,Discovery,Dolphin,Doris,Dragon,Drake,Dreadnaught,Driver,Dromedary,Druid");
	n = AddStr2Array(&sRndShpEnName, n, "Dryad,Dublin,Duke,Duncan,Eagle,Echo,Eclipse,Edgar,Egmont,Egyptienne,Elephant,Elizabeth,Emerald,Enchantress,Endymion,Enterprise,Entreprenant");
	n = AddStr2Array(&sRndShpEnName, n, "Escort,Ethalion,Europa,Eurotas,Euryalus,Eurydice,Excellent,Expedition,Experiment,Fairy,Falcon,Fame,Favorite,Fawn,Ferret,Firm,Flirt,Flora,Fly,Formidable");
	n = AddStr2Array(&sRndShpEnName, n, "Fortitude,Fortune,Fox,Foxhound,Frolic,Fury,Galatea,Gallant,Gannet,Ganymede,Garland,General Monk,Gipsy,Gladiator,Glasgow,Glory,Goldfinch,Goliath");
	n = AddStr2Array(&sRndShpEnName, n, "Goodly,Grampus,Grasshopper,Greyhound,Halifax,Hannah-Rose,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,Illustrious,Implacable,Impregnable,Inconstant,Inflexible,Intrepid,Invincible");
	n = AddStr2Array(&sRndShpEnName, n, "Iphigenia,Iris,Irresistible,Isis,Jason,Juno,Jupiter,Juste,Kangaroo,Katherine,Kent,Kite,Lapwing,Latona,Lavinia,Leda,Leonidas,Leopard,Levant,Leviathan");
	n = AddStr2Array(&sRndShpEnName, n, "Liberty,Lightning,Lion,Little Sally,Lively,Lizard,London,Lydia,Lynx,Lyra,Macedonian,Magnanime,Magnificent,Majestic,Mariner,Marital,Mars,Martin,Mary");
	n = AddStr2Array(&sRndShpEnName, n, "Medina,Medusa,Medway,Melampus,Meleoger,Melpomene,Mercury,Merlin,Mermaid,Meteor,Minerva,Minotaur,Minstrel,Monarch,Myrmidon,Mullet,Mutine,Naid,Narcissus");
	n = AddStr2Array(&sRndShpEnName, n, "Nautilus,Nemesis,Neptune,Nereus,Nimble,Nimrod,Nonsuch,Nymphe,Ocean,Olympia,Opossum,Orestes,Orion,Otter,Pallas,Pandora,Partridge,Paulette,Peacock,Pearl");
	n = AddStr2Array(&sRndShpEnName, n, "Pegasus,Pelican,Penelope,Perseus,Perseverance,Phoebe,Phoenix,Phoeton,Piercer,Pilot,Pincher,Pioneer,Plover,Plumper,Pluto,Polyphemus,Powerful,Prince,Princess");
	n = AddStr2Array(&sRndShpEnName, n, "Prompt,Proserpine,Protector,Prothee,Prudent,Psyche,Pygmy,Pyramus,Queen,Racehorse,Rainbow,Reason,Reasonnable,Ranger,Rattlesnake,Ready,Rebuff,Recovery,Redbreast");
	n = AddStr2Array(&sRndShpEnName, n, "Redpole,Regulus,Reindeer,Renown,Repulse,Resistance,Resource,Retaliation,Retribution,Reunion,Revenge,Revolutionnaire,Rodney,Romney,Romulus,Rose,Rover,Royalist");
	n = AddStr2Array(&sRndShpEnName, n, "Ruby,Sabrina,Sandwich,Saturn,Savage,Scamander,Sceptre,Scipio,Scorpion,Scourge,Scout,Seahorse,Semiramis,Serapis,Serpent,Shark,Shearwater,Sir Francis Drake");
	n = AddStr2Array(&sRndShpEnName, n, "Sirius,Snake,Solitaire,Spartan,Speedwell,Speedy,Spencer,Sphynx,Spider,Spitfire,Sprightly,Spy,Squirrel,Stag,Standard,Starling,Success,Sultan,Surprise,Susan");
	n = AddStr2Array(&sRndShpEnName, n, "Swaggerer,Swallow,Swan,Swift,Swiftsure,Sybille,Sylph,Syren,Tartarus,Teaser,Telemachus,Terpsichore,Terrible,Thais,Thames,Theseus,Thetis,Thisbe,Thorn,Thunderer");
	n = AddStr2Array(&sRndShpEnName, n, "Tickler,Tigress,Tremendous,Trepassy,Trial,Tribune,Trident,Trimmer,Triton,Triumph,Trusty,Ulysses,Undaunted,Unicorn,Union,Unite,Urgent,Valiant,Vanguard,Venerable");
	n = AddStr2Array(&sRndShpEnName, n, "Vengenance,Venus,Vesta,Vestal,Veteran,Victor,Victory,Vigilant,Vindictive,Viper,Vixen,Vulture,Warrior,Warspite,Wasp,William & Mary,Wolverine,Wrangler,Yarmouth,Zealous,Zebra");

	// France names
	n = 0;
	n = AddStr2Array(&sRndShpFrName, n, "Abeille,Achates,Achille,Actif,Aelcon,Africainne,Agricole,Aigle,Ajax,Alceste,Alcide,Alerte,Alexandre,Algeciras,Alouette,Amaranthe,Amazone,Ambuscade,Amerique,Andromaque,Annibal");
	n = AddStr2Array(&sRndShpFrName, n, "Antelope,Apollon,Aquilon,Ardent,Arethuse,Argonaute,Ariel,Artemise,Artesien,Astree,Atalante,Atlas,Audocieux,Auguste,Aurore,Babet,Badine,Baionnaise,Belette,Belleisle,Bellone");
	n = AddStr2Array(&sRndShpFrName, n, "Berceau,Berwick,Bestale,Betsey,Bizarre,Blanche,Blenvenue,Blonde,Bolontaire,Bonne Citoyenne,Boree,Boudeuse,Boudissant,Bourbonnaise,Bourgogne,Brave,Bravoure,Breslaw,Brilliant");
	n = AddStr2Array(&sRndShpFrName, n, "Brune,Brutus,Bucentaure,CaIra,Calliopa,Calliope,Calypso,Capricieuse,Carmagnole,Caroline,Cartagenoise,Cassard,Castor,Censeur,Centaure,Ceres,Chameau,Charente,Cheri,Chiffone");
	n = AddStr2Array(&sRndShpFrName, n, "Cisalpin,Citoyen,Cleopatre,Clorinde,Cocade,Commerce de Bordeaux,Commerce de Marseilles,Concorde,Confiance,Confiante,Conquerant,Consolante,Constance,Constitution,Convention");
	n = AddStr2Array(&sRndShpFrName, n, "Coquille,Cormagnole,Cornelie,Cornette,Correre,Cote d'Or,Courageuse,Courier,Couronne,Creten,Curleuse,Cybele,Danae,Dasaix,Dauphin Royal,Decade,Decius,Decuis,Dedaigneuse,Desire");
	n = AddStr2Array(&sRndShpFrName, n, "Desiree,Destin,Diademe,Diane,Didon,Diligent,Dix Aout,Droits de l'homme,Droits de Peuple,Dryade,Duc de Bourgogne,Duguai Trouin,Dulyce,Duquesne,Durance,Duras,Echaue,Eclaire,Egytienne");
	n = AddStr2Array(&sRndShpFrName, n, "Electra,Elisabeth,Eliza,Embroye,Emeraude,Emulous,Enchantress,Engageante,Entreprenant,Eole,Epervier,Esperance,Espion,Etoile,Eveille,Fantome,Fauvette,Fee,Felicite,Fendant,Fidele,Filibustier");
	n = AddStr2Array(&sRndShpFrName, n, "Fine,Flamand,Fleche,Fleuron,Flore,Formidable,Forte,Fortunee,Foudrayant,Fougueux,Franklin,Fraternite,Friponne,Furet,Furieuse,Galathee,Gasparin,Genereux,Gentille,Gloire,Glorieux,Gracieuse");
	n = AddStr2Array(&sRndShpFrName, n, "Granne,Guadalope,Guerrier,Guillaume Tell,Hannibal,Hardi,Hassard,Hector,Hehe,Helene,Hercule,Hermione,Heros,Heureux,Hirondelle,Hoche,Hormonie,Hureuse,Illustre,Imatiente,Immortalite,Imperial");
	n = AddStr2Array(&sRndShpFrName, n, "Imperieuse,Impetueux,Inconnue,Inconstante,Incorruptible,Indien,Indivisible,Indomptable,Insolant,Insurgent,Intrepide,Invincible,Iphigenie,Iriste,Jacobin,Jena,Junon,Jupiter,Juste,Justice");
	n = AddStr2Array(&sRndShpFrName, n, "Justine,Latone,Legere,Leopard,Levriere,Liberte,Libre,Lion,Loire,L'Orient,Lutine,Magnanime,Magnifique,Maida,Majesteau,Malicieuse,Marat,Marengo,Marseillais,Marte,Medee,Meduse,Melpomene,Mercure");
	n = AddStr2Array(&sRndShpFrName, n, "Mignonne,Minerve,Minotaure,Modeste,Mont Blanc,Montagne,Montreal,Moselle,Mucius,Mulet,Musette,Mutine,Nemesis,Neptune,Nereide,Neuf Thermidor,Nieman,Nymphe,Ocean,Orient,Orion,Pallas,Palmier");
	n = AddStr2Array(&sRndShpFrName, n, "Papillon,Patriote,Paulette,Pegase,Pelletier,Pensee,Perdrix,Perle,Perte,Petite Aurore,Phocion,Pique,Pluton,Pomone,Pompee,Poulette,Precieuse,Preneuse,Prevoyante,Prompte,Proselyte,Proserpine");
	n = AddStr2Array(&sRndShpFrName, n, "Protecteur,Prudente,Puissant,Railleur,Railleuse,Rapide,Rebecca,Recluse,Redoutable,Reflechi,Regeneraee,Renommee,Reprisal,Requin,Resistance,Resolue,Resolution,Reunion,Revanche,Revenge,Rivoli");
	n = AddStr2Array(&sRndShpFrName, n, "Robuste,Romaine,Rousseau,Royal Cesar,Ruse,Sagesse,Sainte Athoine,Salamine,Sardine,Scaevala,Sceptre,Scipion,Seduisant,Seine,Semillante,Sensible,Serpente,Severe,Sincere,Singe,Spartiate,Sphynx");
	n = AddStr2Array(&sRndShpFrName, n, "St. Esprit,St. Micheal,Suffisant,Suffren,Suitane,Sultana,Superbe,Superieure,Surveillante,Swiftsure,Sybille,Syrene,Tactique,Tamise,Tapageuse,Tapaze,Tartouffe,Terrible,Thetis,Tigress,Timoleon");
	n = AddStr2Array(&sRndShpFrName, n, "Tonnant,Tonnere,Tortue,Tourtourelle,Tourville,Trajan,Trampeuse,Trente et Un Mai,Tribune,Tricoleur,Trident,Triomphant,Tyrannicide,Unite,Uranie,Vaillante,Varsovie,Vendee,Vengeance,Vengeur,Venturer");
	n = AddStr2Array(&sRndShpFrName, n, "Venus,Vertu,Vestale,Vesuve,Victoire,Victorieuse,Vimeria,Virginie,Virtu,Volcan,Wagram,Wattignies,Zephyr");

	// Pirate names
	n = 0;
	n = AddStr2Array(&sRndShpPiName, n, "Ostergo,Overijssell,Pluto,Prins Frederik,Prins Maurits,Revolutie,Rotterdam,Schrickverwekker,Utrecht,Verwachting,Wassenaar,Westergo,Westfriesland,Zeeland,Zevenwalder,Zevenwolder,Zuid Beveland,Nassau,Prinsesse Louisa");
	n = AddStr2Array(&sRndShpPiName, n, "Papillon,Patriote,Paulette,Pegase,Pelletier,Pensee,Perdrix,Perle,Perte,Petite Aurore,Phocion,Pique,Pluton,Pomone,Pompee,Poulette,Precieuse,Preneuse,Prevoyante,Prompte,Proselyte,Proserpine");
	n = AddStr2Array(&sRndShpPiName, n, "Sirius,Snake,Solitaire,Spartan,Speedwell,Speedy,Spencer,Sphynx,Spider,Spitfire,Sprightly,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, "Admiraal Generaal,Amsterdam,Birg Van Leijden,Brutus,Cato,Friesland,Jupiter,Maas,Nepunus,Prines Mauritz,Prins Willen,Stad en Land,Staten Generaal,Vrijheid,Waakzaamheid,Washington,Willen I,Williem de Eerste");
	n = AddStr2Array(&sRndShpHoName, n, "Wreker,Zeven Provincies,Admiraal de Ruijter,Admiraal Tjerk Hiddes de Vries,Amsterdam,Bato,Cerberus,Devries,Dordrecht,Gelderland,Gelijkheid,Haarlem,Hercules,Hersteller,Hollandia,Hoop,Kartenaer,Leijden,Noard Holland");
	n = AddStr2Array(&sRndShpHoName, n, "Ostergo,Overijssell,Pluto,Prins Frederik,Prins Maurits,Revolutie,Rotterdam,Schrickverwekker,Utrecht,Verwachting,Wassenaar,Westergo,Westfriesland,Zeeland,Zevenwalder,Zevenwolder,Zuid Beveland,Nassau,Prinsesse Louisa");
	n = AddStr2Array(&sRndShpHoName, n, "Prinsesse Maria Louisa,Admiraal MH Tromp,Admiraal Piet Hein,Alkmaar,Arveprias,Batavier,Beschermer,Brakel,Broederschap,Delft,Erfprins,Glenthorst,Goes,Kronprins Willen,Nassau Weilberg,Alkmaar,Belft,Beschermer,Brakel");
	n = AddStr2Array(&sRndShpHoName, n, "Centaurus,Rotterdam,Schiedam,Admiraal Van Tromp,Arveprias,Glenthorst,Kronprins Willen,Nassau Weilberg,Rijuland,Van Goes,Mars,Amphitrite,Argo,Belle Antoinette,Bloys,Castor,Constituie,Duif,Expeditie,Femiks,Hector,Landiskroon");
	n = AddStr2Array(&sRndShpHoName, n, "Munniskkendam,Urie,Zuiderveld,Zwieten,Amfitrite,Braave,Castor,Eendracht,Harlingen,Medea,Monnikendam,Pallux,Thalen,Vikter,Alliante,Amazon,Amfitrite,Andromache,Aremd,Argo,Assemde;ft,Bellona,Beverwijk,Castor,Ceres,Eensgezinheid");
	n = AddStr2Array(&sRndShpHoName, n, "Erfprins van Brunswijk,Fenix,Furie,Geengezinheid,Jager,Jason,Juno,Mars,Medemblick,Middelburg,Phoenix,Zefir,Ambuscade,Helden,Proserpine,Alarme,Alethea,Bellona,Brielle,Dieren,Dolfijn,Drack,Enkhuizen,Havik,Kuris,Leopard,Minerva");
	n = AddStr2Array(&sRndShpHoName, n, "Nehallenia,Pallas,Scipio,Syrena,Thetis,Triton,Valk,Venus,Waakzaamheid,Walcheren,Zeepaard,Hoora,Oranjezaal,Ajax,Atalante,Avonturier,Comeet,Daphne,Echo,Galathea,Hippomenes,Kemphaan,Mercur,Pylades,Sambrang,Snieuwbeeld,Surinam,Alliantie");
	n = AddStr2Array(&sRndShpHoName, n, "Espion,Galatie,Maassnijmph,Meermin,Pijl,Zeehana,Zulvelaar,Braak,Hoop,Maria Louise,Panther,Star,Zeerob,Ajax,Harlingen,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,Pieterszoon,Galathea,Ravesteyn,Belle,Echo,Vera,Cameo,Diana,Dijk,Hellwig,Knol,Vlugheid,Maria,Ajax,Gel,Lisa,Mug,Opal,Salhi,Venus,Sybill,Cremers,LexiaDaphne");

	// Portugal names
	n = 0;
	n = AddStr2Array(&sRndShpPoName, n, "Na Sa de Conceicao,Principe Real,Conde Dom Henrique,Maria I,Medusa,Princessa de Beira,Principe Regente,Reinha da Portugal,San Antonio e San Jose,Vasco da Gama,Alfonso de Albuquerque,Don Joao de Castro");
	n = AddStr2Array(&sRndShpPoName, n, "Infante Dom Pedro,Na Sa de Belem,Na Sa de Bom Succeso,Martin de Freitas,San Sebastao,Fenix,Graca,Amazana,Minerva,Princessa Carlotta,Perola,Principe de Brazil,Tritao,Bolfinho,Ulisses,Urania,Cisne");
	n = AddStr2Array(&sRndShpPoName, n, "Princessa de Brazil,Thetis,Torta,Venus,Josefa,San Antonio e Asia Felis,Benjamin,Princessa Real,San Joao Magnanimo,Condessa de Resonde,San Antonio,Aquia,Gloria,Neptuno,Polifemo,Falcao,Giavota,Lebre");
	n = AddStr2Array(&sRndShpPoName, n, "Sem Nome,Serpente de Mar,Voador,Galgo,Vinganca,Amorale,Curiosa,Coroa,Princessa,Principe,Issabell,Costanca,Laocadia,Tareyja,Tina-Maria,Helenice,Marta-Alexandra,Dores,Aldonca,Josefa,Violante,Luciana");
	n = AddStr2Array(&sRndShpPoName, n, "Betriz,Etelvina,Maria-Augusta,Sonia,Bella,Fernanda,Guiomar,Meiguinha,Teresa");
}