Ejemplo n.º 1
0
        public Plate CE1788to1865()
        {
            var rule = new Rule {
                StartValue = 1785, EndValue = 1868, RuleLineSpacing = 7
            };
            var plate = new Plate {
                Ruler = rule, Name = "The Industrial Revolution"
            };

            var usa = new Block {
                Ruler = rule, Title = "United States"
            };

            usa.AddEntry(new TerritoryEntry("DE,PA,NJ", 1787)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new TerritoryEntry("GA,CT,MA,MD,SC,NH,VA,NY", 1788)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new LeaderEntry("Washington", new int?[, ] {
                { 1789, 1797 }
            })
            {
                StartValue = 1789
            });
            usa.AddEntry(new TerritoryEntry("NC", 1789)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new TerritoryEntry("RI", 1790)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new TerritoryEntry("VT", 1791)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new TerritoryEntry("KY", 1792)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new ScienceAdvEntry("cottin gin(d.)", "E.Whitney", 1793));
            usa.AddEntry(new TerritoryEntry("TN", 1796)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new LeaderEntry("John Adams", new int?[, ] {
                { 1797, 1801 }
            })
            {
                StartValue = 1797
            });
            usa.AddEntry(new LeaderEntry("T.Jefferson", new int?[, ] {
                { 1801, 1809 }
            })
            {
                StartValue = 1801
            });
            usa.AddEntry(1802, "West Point founded(1802)");
            usa.AddEntry(1803, "Louisiana Purchase(1803)");
            usa.AddEntry(new TerritoryEntry("OH", 1803)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new ExplorerEntry("Lewis & Clark", "Expedition", 1804)
            {
                Location = PrintLocation.Center
            });
            usa.AddEntry(new LeaderEntry("[James Madison", new int?[, ] {
                { 1809, 1817 }
            })
            {
                StartValue = 1809
            });
            usa.AddEntry(1811, "B.of Tippecanoe(1811)(h.)");
            usa.AddEntry(new TerritoryEntry("LA", 1812)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(1815, "failed Canadian conquest");
            usa.AddEntry(new TerritoryEntry("IN", 1816)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(1816, "First Seminole War(1816-1819)");
            usa.AddEntry(new LeaderEntry("James Monroe", new int?[, ] {
                { 1817, 1825 }
            })
            {
                StartValue = 1817
            });
            usa.AddEntry(new TerritoryEntry("MS", 1817)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new TerritoryEntry("IL", 1818)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new TerritoryEntry("AL", 1819)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new TerritoryEntry("ME", 1820)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new TerritoryEntry("MO", 1821)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new LeaderEntry("John Quincy Adams", new int?[, ] {
                { 1825, 1829 }
            })
            {
                StartValue = 1825
            });
            usa.AddEntry(new LiteraryWorkEntry("Last of the Mohicans", "J.F.Cooper", 1826));
            usa.AddEntry(new LeaderEntry("Andrew Jackson", new int?[, ] {
                { 1829, 1837 }
            })
            {
                StartValue = 1829
            });
            usa.AddEntry(1835, "Second Seminole War(1835-1842)");
            usa.AddEntry(new TerritoryEntry("AR", 1836)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new LeaderEntry("Martin Van Buren", new int?[, ] {
                { 1837, 1841 }
            })
            {
                StartValue = 1837
            });
            usa.AddEntry(new ScienceAdvEntry("telegraph", "Morse", 1837)
            {
                StartValue = 1839
            });
            usa.AddEntry(new TerritoryEntry("MI", 1837)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new LeaderEntry("William H Harrison", new int?[, ] {
                { null, 1841 }
            })
            {
                StartValue = 1841
            });
            usa.AddEntry(new LeaderEntry("John Tyler", new int?[, ] {
                { 1842, 1845 }
            })
            {
                StartValue = 1842
            });
            usa.AddEntry(new LeaderEntry("James K Polk", new int?[, ] {
                { 1845, 1849 }
            })
            {
                StartValue = 1845
            });
            usa.AddEntry(new TerritoryEntry("FL,TX", 1845)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new TerritoryEntry("IA", 1846)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new ScienceAdvEntry("anesthesia", "W.Morton", 1846)
            {
                StartValue = 1844
            });
            usa.AddEntry(1847, "U.S.-Mexican War(1846-1848)");
            usa.AddEntry(new TerritoryEntry("WI", 1848)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new LeaderEntry("Zachary Taylor", new int?[, ] {
                { 1849, 1850 }
            })
            {
                StartValue = 1849
            });
            usa.AddEntry(new LiteraryWorkEntry("The Scarlet Letter", "N.Hawthorne", 1849)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new LeaderEntry("Millard Fillmore", new int?[, ] {
                { 1850, 1853 }
            })
            {
                StartValue = 1850
            });
            usa.AddEntry(new TerritoryEntry("CA", 1850)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new LiteraryWorkEntry("Moby-Dick", "H.Melville", 1851)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new LiteraryWorkEntry("Uncle Tom's Cabin", "H.B.Stowe", 1852)
            {
                StartValue = 1851, Location = PrintLocation.Right
            });
            usa.AddEntry(1852, "Perry Expedition to Japan(1852-54)");
            usa.AddEntry(new LeaderEntry("Franklin Pierce", new int?[, ] {
                { 1853, 1857 }
            })
            {
                StartValue = 1853
            });
            usa.AddEntry(1855, "Third Seminole War(1855-1858)");
            usa.AddEntry(new LeaderEntry("James Buchanan", new int?[, ] {
                { 1857, 1861 }
            })
            {
                StartValue = 1857
            });
            usa.AddEntry(new TerritoryEntry("MN", 1858)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new TerritoryEntry("OR", 1859)
            {
                Location = PrintLocation.Right
            });
            usa.AddEntry(new LeaderEntry("Abraham Lincoln", new int?[, ] {
                { 1861, 1865 }
            })
            {
                StartValue = 1860
            });
            usa.AddEntry(new TerritoryEntry("KS", 1861)
            {
                Location = PrintLocation.Left
            });
            usa.AddEntry(new TerritoryEntry("WV", 1863)
            {
                Location = PrintLocation.Left
            });
            usa.AddEntry(new TerritoryEntry("NV", 1864)
            {
                Location = PrintLocation.Left
            });

            var csa = new Block {
                Ruler = rule, Title = "Confederate States", StartValue = 1860, EndValue = 1866, Width = 48
            };

            csa.AddEntry(1861, "New Orleans captured");
            csa.AddEntry(1863, "Vicksburg\\Petersburg under seige");
            csa.AddEntry(1864, "Atlanta razed(1864)", PrintLocation.Right);
            csa.AddEntry(1865, "fall of Richmond", PrintLocation.Left);
            csa.AddEntry(1865, "surrender @ Appomattox(1865)(f.)", PrintLocation.Right);
            plate.Arrows.Add(new Arrow(csa, usa)
            {
                StartValue = 1861, Text = "Ft.Sumter fired on(e.)", MoveArrowHeadToCenterOfBlock = true
            });
            plate.Arrows.Add(new Arrow(csa, usa)
            {
                StartValue = 1863, Text = "Lee's invasion of PA", MoveArrowHeadToCenterOfBlock = true
            });
            plate.Arrows.Add(new Arrow(usa, csa)
            {
                StartValue = 1864, Text = "Sherman's March"
            });
            usa.AddEntry(1866, "Lincoln assassinated(1865)");

            usa.AddEntry(new ScienceAdvEntry("rotary press", "R.M.Hoe")
            {
                StartValue = 1843
            });
            usa.AddEntry(1836, 1845, "Republic of Texas");

            var engd = new Block {
                Ruler = rule, Title = "United Kingdom"
            };

            engd.AddEntry(new ScienceAdvEntry("vaccination", "Jenner", 1798)
            {
                Location = PrintLocation.Left
            });
            engd.AddEntry(new ScienceAdvEntry("battery", "Volta", 1800)
            {
                Location = PrintLocation.Left
            });
            engd.AddEntry(new LeaderEntry("William Pitt", new int?[, ] {
                { 1783, 1801 }, { 1804, 1806 }
            })
            {
                StartValue = 1786
            });
            engd.AddEntry(new ScienceAdvEntry("atomic theory", "Dalton", 1803));
            engd.AddEntry(new LeaderEntry("Henry Addington", new int?[, ] {
                { 1801, 1804 }
            }));
            engd.AddEntry(new LeaderEntry("Baron Grenville", new int?[, ] {
                { 1804, 1807 }
            }));
            engd.AddEntry(new LeaderEntry("W. Cavendish-Bentinck", new int?[, ] {
                { 1807, 1809 }
            }));
            engd.AddEntry(new LeaderEntry("Spencer Perceval", new int?[, ] {
                { 1809, 1812 }
            }));
            engd.AddEntry(new LeaderEntry("R.B Jenkinson", new int?[, ] {
                { 1812, 1827 }
            }));
            engd.AddEntry(new LiteraryWorkEntry("Pride & Prejudice", "J.Austen", 1813)
            {
                StartValue = 1815, Location = PrintLocation.Left
            });
            engd.AddEntry(new LeaderEntry("G. Canning", new int?[, ] {
                { 1826, 1827 }
            }));
            engd.AddEntry(new LeaderEntry("Viscount Goderich", new int?[, ] {
                { 1827, 1828 }
            }));
            engd.AddEntry(new LeaderEntry("Arthur Wellesley", new int?[, ] {
                { 1828, 1830 }
            }));
            engd.AddEntry(new LeaderEntry("Charles Grey", new int?[, ] {
                { 1830, 1834 }
            }));
            engd.AddEntry(new ScienceAdvEntry("law of induction", "Faraday", 1831));
            engd.AddEntry(new LeaderEntry("R.Peel & W.Lamb(a.)", new int?[, ] {
                { 1836, 1846 }
            }));
            engd.AddEntry(new ScienceAdvEntry("1st law thermodyn", "J.P.Joule", 1843));
            engd.AddEntry(new ExplorerEntry("Franklin", "lost expedition", 1845)
            {
                StartValue = 1844
            });
            engd.AddEntry(new LeaderEntry("John Russel", new int?[, ] {
                { 1846, 1852 }
            }));
            engd.AddEntry(new ScienceAdvEntry("Kelvin", "absolute zero", 1848)
            {
                Location = PrintLocation.Left
            });
            engd.AddEntry(new LiteraryWorkEntry("Communist Manifesto", "", 1848)
            {
                Location = PrintLocation.Right
            });
            engd.AddEntry(new LeaderEntry("G. Hamilton-Gordon", new int?[, ] {
                { 1852, 1855 }
            })
            {
                StartValue = 0
            });
            engd.AddEntry(new LeaderEntry("E. Smith-Stanley", new int?[, ] {
                { 1858, 1859 }
            })
            {
                StartValue = 0
            });
            engd.AddEntry(new LeaderEntry("H. John Temple", new int?[, ] {
                { 1855, 1858 }, { 1859, 1865 }
            })
            {
                StartValue = 1860
            });
            engd.AddEntry(new LiteraryWorkEntry("Principles of Geology", "Lyell", 1833)
            {
                Location = PrintLocation.Right
            });
            engd.AddEntry(1834, "Abolition Act(1833)", PrintLocation.Right);
            engd.AddEntry(new LiteraryWorkEntry("Oliver Twist", "Dickens", 1838));
            engd.AddEntry(new LiteraryWorkEntry("Origin of Species", "Darwin", 1859)
            {
                Location = PrintLocation.Right
            });
            engd.AddEntry(new LiteraryWorkEntry("Great Expectations", "Dickens", 1861));
            engd.AddEntry(new ScienceAdvEntry("electromag.", "Maxwell")
            {
                StartValue = 1864
            });
            engd.AddEntry(1865, "First Subway(1864)");
            engd.AddEntry(1840, 1860, "Industrial Revolution", PrintLocation.Right);
            engd.AddEntry(1839, 1866, "Queen Victoria (1837-1901)", PrintLocation.Left);

            var fr = new Block {
                Ruler = rule, Title = "France"
            };

            fr.AddEntry(1789, "Estates-General meets(1789)(b.)", PrintLocation.Left);
            fr.AddEntry(1791, "Storming of the Bastille(1789)", PrintLocation.Left);
            fr.AddEntry(1792, "Louis XVI executed(1793)", PrintLocation.Left);
            fr.AddEntry(1793, "Reign of Terror(1793\\94)", PrintLocation.Left);
            fr.AddEntry(1794, "Robespierre executed(1794)", PrintLocation.Left);
            fr.AddEntry(1795, "Napolean quells insurrection(1795)", PrintLocation.Left);
            fr.AddEntry(new ScienceAdvEntry("extinction", "Cuvier", 1796));
            fr.AddEntry(new ScienceAdvEntry("heat engine", "Carnot", 1824));
            fr.AddEntry(new ScienceAdvEntry("enzymes", "A.Payen", 1833));
            fr.AddEntry(new LiteraryWorkEntry("Count of Monte Cristo", "A.Dumas", 1845));
            fr.AddEntry(1848, "revolution of 1848 & 2nd Republic ");
            fr.AddEntry(new ScienceAdvEntry("germ theory", "Pasteur", 1861));
            fr.AddEntry(new LiteraryWorkEntry("Les Miserables", "V.Hugo", 1862));
            fr.AddEntry(1787, 1792, "French Revolution", PrintLocation.Right);
            fr.AddEntry(1793, 1804, "1st Republic", PrintLocation.Right);
            fr.AddEntry(new LeaderEntry("Napolean", new int?[, ] {
                { 1804, 1814 }
            })
            {
                Location = PrintLocation.Left
            });
            fr.AddEntry(1804, 1814, "(French Empire)", PrintLocation.Right);
            fr.AddEntry(1815, 1830, "Bourbon Restoration", PrintLocation.Right);
            fr.AddEntry(1831, 1848, "July Monarchy", PrintLocation.Right);
            fr.AddEntry(1852, 1866, "2nd French Empire", PrintLocation.Right);

            var de = new Block {
                Ruler = rule, Title = "Prussia"
            };

            de.AddEntry(1848, "revolution of 1848");
            de.AddEntry(new LeaderEntry("Frederick William II", new int?[, ] {
                { 1786, 1797 }
            })
            {
                StartValue = 1789
            });
            de.AddEntry(new LeaderEntry("Frederick William III", new int?[, ] {
                { 1797, 1840 }
            })
            {
                StartValue = 1795
            });
            de.AddEntry(new LiteraryWorkEntry("Faust", "Goethe", 1808)
            {
                StartValue = 1809
            });
            de.AddEntry(new ScienceAdvEntry("electromagnetism", "H.C.Orsted", 1820));
            de.AddEntry(new ScienceAdvEntry("Ohm's law", "Ohm", 1827));
            de.AddEntry(1834, "German free-trade zone(1834)");
            de.AddEntry(new ScienceAdvEntry("plant cells", "M.Schleiden", 1838));
            de.AddEntry(new LeaderEntry("Frederick William IV", new int?[, ] {
                { 1840, 1861 }
            }));
            de.AddEntry(new ScienceAdvEntry("Neptune discovered", "", 1846));
            de.AddEntry(new LeaderEntry("Otto V.Bismarck(PM)", new int?[, ] {
                { 1862, 1890 }
            }));
            de.AddEntry(new LiteraryWorkEntry("Capital", "Marx", 1867)
            {
                StartValue = 1866
            });
            de.AddEntry(new ScienceAdvEntry("inheritance", "Mendel", 1865));


            var aus = new Block {
                Ruler = rule, Title = "Austrian Empire", Width = 30
            };

            aus.AddEntry(new LeaderEntry("Joseph II", new int?[, ] {
                { 1765, 1790 }
            })
            {
                StartValue = 1788
            });
            aus.AddEntry(new LeaderEntry("Leopold VII", new int?[, ] {
                { 1790, 1792 }
            }));
            aus.AddEntry(new LeaderEntry("Francis II", new int?[, ] {
                { 1792, 1804 }
            })
            {
                Location = PrintLocation.Right
            });
            aus.AddEntry(new LeaderEntry("Francis I", new int?[, ] {
                { 1804, 1835 }
            }));
            aus.AddEntry(new LeaderEntry("K.V.Metternich(PM)", new int?[, ] {
                { 1821, 1848 }
            }));
            aus.AddEntry(new LeaderEntry("Ferdinand I", new int?[, ] {
                { 1835, 1848 }
            }));
            aus.AddEntry(new LeaderEntry("Francis Joseph", new int?[, ] {
                { 1848, 1916 }
            })
            {
                StartValue = 1846
            });
            aus.AddEntry(1815, "Congress of Vienna(1815)");
            aus.AddEntry(new ScienceAdvEntry("Doppler efct", "Doppler", 1842));
            aus.AddEntry(1848, "revolution of 1848");

            var ott = new Block {
                Ruler = rule, Title = "Ottoman Empire"
            };

            ott.AddEntry(new LeaderEntry("Selim III", new int?[, ] {
                { 1789, 1807 }
            }));
            ott.AddEntry(new LeaderEntry("Mustafa IV", new int?[, ] {
                { 1807, 1808 }
            }));
            ott.AddEntry(new LeaderEntry("Mahmud II", new int?[, ] {
                { 1808, 1839 }
            })
            {
                StartValue = 1809
            });
            ott.AddEntry(new LeaderEntry("Abdulmecid I", new int?[, ] {
                { 1839, 1861 }
            }));
            ott.AddEntry(1852, "Epirus Revolt(1854)");
            ott.AddEntry(new LeaderEntry("Abdulaziz I", new int?[, ] {
                { 1861, 1876 }
            }));
            ott.AddEntry(1821, 1832, "Greek War of Independence");

            var rus = new Block {
                Ruler = rule, Title = "Imperial Russia"
            };

            rus.AddEntry(new LeaderEntry("Paul I", new int?[, ] {
                { 1796, 1801 }
            }));
            rus.AddEntry(new LeaderEntry("Alexander I", new int?[, ] {
                { 1801, 1825 }
            }));
            rus.AddEntry(1825, "Decembrist revolt(1825)");
            rus.AddEntry(new LeaderEntry("Nicholas I", new int?[, ] {
                { 1825, 1855 }
            })
            {
                StartValue = 1824
            });
            rus.AddEntry(new ScienceAdvEntry("Non-Euclidean geo", "Lobachevsky", 1830));
            rus.AddEntry(new LiteraryWorkEntry("A Sportsman Sketches", "I.Turgenev", 1852)
            {
                Location = PrintLocation.Left
            });
            rus.AddEntry(new LeaderEntry("Alexander II", new int?[, ] {
                { 1855, 1881 }
            }));
            rus.AddEntry(1860, "Vladivostok founded(1860)");
            rus.AddEntry(1861, "serfs freed(1861)");
            rus.AddEntry(1854, 1856, "Crimean War", PrintLocation.Right);


            plate.AddBlock(usa);
            plate.AddBlock(csa);
            plate.AddBlock(engd);
            plate.AddBlock(fr);
            plate.AddBlock(de);
            plate.AddBlock(aus);
            plate.AddBlock(ott);
            plate.AddBlock(rus);
            plate.FileName = "17_CE1788_1865";

            plate.AddArrow(new Arrow(aus, ott)
            {
                Text = "B.of Focsani(1789)", StartValue = 1789
            });
            plate.AddArrow(new Arrow(rus, ott)
            {
                StartValue = 1789, FromRightToLeftArrowHead = "<......"
            });
            plate.AddArrow(new Arrow(aus, fr)
            {
                StartValue = 1792
            });
            plate.AddArrow(new Arrow(de, fr)
            {
                StartValue = 1793
            });
            plate.AddArrow(new Arrow(fr, aus)
            {
                StartValue = 1796, Text = "B.of Rivoli(1797)"
            });
            plate.AddArrow(new Arrow(fr, ott)
            {
                Text = "B.of the Pryamids(1798)(c.)", StartValue = 1797
            });
            plate.AddArrow(new Arrow(engd, fr)
            {
                Text = "B.of the Nile(1798)(g.)", StartValue = 1798
            });
            plate.AddArrow(new Arrow(fr, aus)
            {
                Text = "B.of Marengo(1800)", StartValue = 1800
            });
            plate.AddArrow(new Arrow(rus, fr)
            {
                Text = "B.of Leipzig(1813)", StartValue = 1813
            });
            plate.AddArrow(new Arrow(engd, usa)
            {
                Text       = "DC sacked(1814)",
                StartValue = 1814,
                ArrowTail  = ".",
                FromRightToLeftArrowHead = "<...."
            });
            plate.AddArrow(new Arrow(engd, fr)
            {
                Text = "Waterloo(1815)", StartValue = 1815
            });
            plate.AddArrow(new Arrow(fr, rus)
            {
                StartValue = 1812
            });
            plate.AddArrow(new Arrow(rus, ott)
            {
                StartValue = 1853, Text = "B.of Sinop(1853)"
            });
            plate.AddArrow(new Arrow(engd, rus)
            {
                StartValue = 1854, Text = "B.of Balaclava(1854)", FromLeftToRightArrowHead = "..>"
            });

            plate.Notes.Add("(a.)  last Prime Minister dismissed by a king,  (b.) last met in 1614");
            plate.Notes.Add(
                "(c.)  intended to cut England off from India, (d.) pop. of black slaves goes from 700 thousand to 3 million");
            plate.Notes.Add("(e.)  April 12, 1861, (f.) April 9, 1865 (est. 620,000 killed)");
            plate.Notes.Add(
                "(g.)  Napolean's Navy destroyed,  (h.) Gen. Harrison defeats confederacy of Native Americans");

            return(plate);
        }
Ejemplo n.º 2
0
        public void PlateComposeArrowTest()
        {
            var ruler = new Rule { StartValue = 950, EndValue = 775 };
            var egypt = new Block { Ruler = ruler, Title = "Egypt" };
            var israel = new Block { Ruler = ruler, Title = "Israel" };
            var damascus = new Block { Ruler = ruler, Title = "Damascus" };
            var assyria = new Block { Ruler = ruler, Title = "Assyria" };

            var northKingdom = new Block { StartValue = 922, EndValue = 775, Ruler = ruler, Title = "Israel" };
            var southKingdom = new Block { StartValue = 922, EndValue = 775, Ruler = ruler, Title = "Judea" };

            egypt.AddEntry(new Entry { StartValue = 935, Text = "XXII Dyn. 935-725", Location = PrintLocation.Left });
            egypt.AddEntry(new Entry { StartValue = 935, EndValue = 914, Text = "Shishak 935-914", Location = PrintLocation.Right });
            egypt.AddEntry(new Entry { StartValue = 914, EndValue = 874, Text = "Osorkon I 914-874" });

            israel.AddEntry(new Entry { StartValue = 940, Text = "Solomon 961-922" });

            southKingdom.AddEntry(new Entry { StartValue = 922, Text = "Rehoboam 922-915" });
            southKingdom.AddEntry(new Entry { StartValue = 915, Text = "Abijah 915-913" });

            northKingdom.AddEntry(new Entry { StartValue = 922, Text = "Jeroboam I 922-901" });

            israel.AddInnerBlock(southKingdom);
            israel.AddInnerBlock(northKingdom);

            damascus.AddEntry(new Entry { StartValue = 930, Text = "Rezon" });

            assyria.AddEntry(new Entry { StartValue = 935, Text = "Asshur-dan II 935-913" });

            var testPlate = new Plate() { Name = "Near East 950-775", Ruler = ruler };
            testPlate.AddBlock(egypt);
            testPlate.AddBlock(israel);
            testPlate.AddBlock(damascus);
            testPlate.AddBlock(assyria);

            testPlate.AddArrow(new Arrow(assyria, egypt) {StartValue = 888, Text = "Thebes sacked"});

            testPlate.AddArrow(new Arrow(egypt, assyria) {Text = "Niniviah sacked", StartValue = 790});

            var testResult = testPlate.ToString();

            Assert.IsNotNull(testResult);

            System.Diagnostics.Debug.WriteLine(testResult);
        }
Ejemplo n.º 3
0
        public Plate CE1945to1992()
        {
            var rule = new Rule {
                StartValue = 1945, EndValue = 1992, RuleLineSpacing = 7
            };
            var plate = new Plate {
                Ruler = rule, Name = "The Cold War"
            };


            var usa = new Block {
                Ruler = rule, Title = "United States"
            };
            var engd = new Block {
                Ruler = rule, Title = "United Kingdom"
            };
            var fr = new Block {
                Ruler = rule, Title = "France"
            };
            var de = new Block {
                Ruler = rule, Title = "Germany"
            };
            var ussr = new Block {
                Ruler = rule, Title = "Soviet Union", EndValue = 1991
            };
            var zho = new Block {
                Ruler = rule, Title = "China"
            };
            var jpn = new Block {
                Ruler = rule, Title = "Japan"
            };
            var israel = new Block {
                Ruler = rule, Title = "Israel", StartValue = 1948
            };

            plate.AddBlock(jpn);
            plate.AddBlock(usa);
            plate.AddBlock(engd);
            plate.AddBlock(fr);
            plate.AddBlock(de);
            plate.AddBlock(israel);
            plate.AddBlock(ussr);
            plate.AddBlock(zho);
            plate.FileName = "20_CE1945_1992";

            zho.AddEntry(1946, 1949, "Civil War", PrintLocation.Right);
            zho.AddEntry(1949, "KMT flees to Taiwan");
            zho.AddEntry(new LeaderEntry("Mao Zedong", new int?[, ] {
                { 1946, 1976 }
            }));
            zho.AddEntry(new LeaderEntry("Hua Guofeng", new int?[, ] {
                { 1976, 1978 }
            }));
            zho.AddEntry(new LeaderEntry("Deng Xiaoping", new int?[, ] {
                { 1978, 1989 }
            }));
            zho.AddEntry(new LeaderEntry("Chen Yun", new int?[, ] {
                { 1987, 1992 }
            }));
            zho.AddEntry(1958, 1962, "'Great Leap Foward'[1]");
            zho.AddEntry(1964, "test atomic bomb(1964)");
            zho.AddEntry(1966, 1976, "'Cultural Revolution'[2]");
            zho.AddEntry(1972, "Nixon's visit(1972)");
            zho.AddEntry(1979, "economic reform");

            jpn.AddEntry(1946, "Tokyo Trials(warcrimes)");
            jpn.AddEntry(new LiteraryWorkEntry("Constitution.Japan", "", 1947));
            jpn.AddEntry(1947.8, "Fundamental Law of Edu(1947)");
            jpn.AddEntry(new LeaderEntry("Shigeru Yoshida", new int?[, ] {
                { 1948, 1954 }
            })
            {
                StartValue = 1949
            });
            jpn.AddEntry(new LeaderEntry("Ichiro Hatoyama", new int?[, ] {
                { 1954, 1956 }
            }));
            jpn.AddEntry(new LeaderEntry("Tanzan Ishibashi", new int?[, ] {
                { 1956, 1957 }
            }));
            jpn.AddEntry(new LeaderEntry("Nobusuke Kishi", new int?[, ] {
                { 1957, 1960 }
            }));
            jpn.AddEntry(new LeaderEntry("Hayato Ikeda", new int?[, ] {
                { 1960, 1964 }
            }));
            jpn.AddEntry(new ScienceAdvEntry("high-speed rail", "", 1964)
            {
                StartValue = 1965.6
            });
            jpn.AddEntry(new LeaderEntry("Eisaku Sato", new int?[, ] {
                { 1964, 1972 }
            }));
            jpn.AddEntry(new ScienceAdvEntry("pocket calc", "", 1970));
            jpn.AddEntry(new LeaderEntry("Kakuei Tanaka", new int?[, ] {
                { 1972, 1974 }
            }));
            jpn.AddEntry(new LeaderEntry("Takeo Miki", new int?[, ] {
                { 1974, 1976 }
            }));
            jpn.AddEntry(new LeaderEntry("Takeo Fukuda", new int?[, ] {
                { 1976, 1978 }
            }));
            jpn.AddEntry(new LeaderEntry("Masayoshi Ohira", new int?[, ] {
                { 1978, 1980 }
            }));
            jpn.AddEntry(new LeaderEntry("Zenko Suzuki", new int?[, ] {
                { 1980, 1982 }
            }));
            jpn.AddEntry(new LeaderEntry("Yasuhiro Nakasone", new int?[, ] {
                { 1982, 1987 }
            }));
            jpn.AddEntry(new LeaderEntry("Noboru Takeshita", new int?[, ] {
                { 1987, 1989 }
            }));
            jpn.AddEntry(new LeaderEntry("Toshiki Kaifu", new int?[, ] {
                { 1989, 1991 }
            }));
            jpn.AddEntry(1945.6, 1952, "Allied occupation");
            jpn.AddEntry(1965, 1980, "rapid econ. expansion", PrintLocation.Right);
            jpn.AddEntry(1980.6, "becomes 2nd largest econ.");

            usa.AddEntry(1945.5, "United Nations formed");
            usa.AddEntry(new LeaderEntry("Truman", new int?[, ] {
                { 1945, 1953 }
            })
            {
                StartValue = 1946
            });
            usa.AddEntry(1947, "Truman Doctrine[4]");
            usa.AddEntry(new ScienceAdvEntry("transistor", "", 1947)
            {
                StartValue = 1947.6
            });
            usa.AddEntry(1948, "Marshall Plan");
            usa.AddEntry(1948.6, "NATO formed");
            usa.AddEntry(1952.6, "hydrogen bomb tested");
            usa.AddEntry(new LeaderEntry("Eisenhower", new int?[, ] {
                { 1953, 1961 }
            }));
            usa.AddEntry(1950, 1953, "Korean War", PrintLocation.Right);
            usa.AddEntry(1953.5, "support Iran coup");
            usa.AddEntry(1954, "Domino Theory");
            usa.AddEntry(1956.6, "military assist Vietnam");
            usa.AddEntry(new LeaderEntry("J.F.Kennedy", new int?[, ] {
                { 1961, 1963 }
            }));
            usa.AddEntry(new ScienceAdvEntry("integrated circuit", "", 1958));
            usa.AddEntry(1959, "Communist Cuba");
            usa.AddEntry(1962, "Cuban Missile Crisis[5]");
            usa.AddEntry(new LeaderEntry("L.B.Johnson", new int?[, ] {
                { 1963, 1969 }
            }));
            usa.AddEntry(1964, 1972, "Vietnam War", PrintLocation.Right);
            usa.AddEntry(new ScienceAdvEntry("moon landing", "", 1969)
            {
                StartValue = 1969
            });
            usa.AddEntry(1969.9, 1973, "draft lottery", PrintLocation.Left);
            usa.AddEntry(new LeaderEntry("Nixon", new int?[, ] {
                { 1969, 1974 }
            })
            {
                StartValue = 1969.6
            });
            usa.AddEntry(1972, "Watergate incident");
            usa.AddEntry(1973, "oil crisis");
            usa.AddEntry(1973.6, "support Chilean coup");
            usa.AddEntry(new LeaderEntry("G.Ford", new int?[, ] {
                { 1974, 1977 }
            }));
            usa.AddEntry(new LeaderEntry("J.Cater", new int?[, ] {
                { 1977, 1981 }
            }));
            usa.AddEntry(1979, "Iran hostage crisis");
            usa.AddEntry(1979.6, "oil crisis");
            usa.AddEntry(new LeaderEntry("Reagan", new int?[, ] {
                { 1981, 1989 }
            }));
            usa.AddEntry(1983, "invade Grenada");
            usa.AddEntry(new LeaderEntry("Bush", new int?[, ] {
                { 1989, 1992 }
            }));
            usa.AddEntry(1990, "first Gulf War");

            engd.AddEntry(1947, "India independent");
            engd.AddEntry(1945.5, 1954, "rationing", PrintLocation.Right);
            engd.AddEntry(1952, "test atomic bomb(1952)");
            engd.AddEntry(1948, "National Health Serv.");
            engd.AddEntry(1949, "withdraw from Palestine");
            engd.AddEntry(new ScienceAdvEntry("DNA", "", 1953));
            engd.AddEntry(1956, "Suez Crisis[8]");
            engd.AddEntry(1955.4, 1965, "econ. recovery", PrintLocation.Right);
            engd.AddEntry(1978.6, "'Winter of Discontent'[9]");
            engd.AddEntry(new LeaderEntry("Clement Attlee", new int?[, ] {
                { 1945, 1951 }
            }));
            engd.AddEntry(new LeaderEntry("Churchill", new int?[, ] {
                { 1940, 1945 }, { 1951, 1955 }
            }));
            engd.AddEntry(new LeaderEntry("Anthony Eden", new int?[, ] {
                { 1955, 1957 }
            }));
            engd.AddEntry(new LeaderEntry("Harold Macmillan", new int?[, ] {
                { 1957, 1963 }
            }));
            engd.AddEntry(new LeaderEntry("A.Douglas-Home", new int?[, ] {
                { 1963, 1964 }
            }));
            engd.AddEntry(new LeaderEntry("Harold Wilson", new int?[, ] {
                { 1964, 1970 }, { 1974, 1976 }
            }));
            engd.AddEntry(new LeaderEntry("Edward Heath", new int?[, ] {
                { 1970, 1974 }
            }));
            engd.AddEntry(new LeaderEntry("James Callaghan", new int?[, ] {
                { 1976, 1979 }
            }));
            engd.AddEntry(new LeaderEntry("M.Thatcher", new int?[, ] {
                { 1977, 1990 }
            }));
            engd.AddEntry(1982, "Falkland War");
            engd.AddEntry(1984, "miners' strike");
            engd.AddEntry(new LeaderEntry("John Major", new int?[, ] {
                { 1990, 1997 }
            }));

            israel.AddEntry(1948.6, "Arab-Israeli War");
            israel.AddEntry(1949, "armistice w\\ arabs");
            israel.AddEntry(new LeaderEntry("D.Ben-Gurion", new int?[, ] {
                { 1949, 1954 }, { 1955, 1963 }
            })
            {
                StartValue = 1949.6
            });
            israel.AddEntry(1950, "Law of Return");
            israel.AddEntry(1952, "rel. W Germany");
            israel.AddEntry(new LeaderEntry("M.Sharett", new int?[, ] {
                { 1954, 1955 }
            }));
            israel.AddEntry(1961, "Eichmann trail");
            israel.AddEntry(new LeaderEntry("Levi Eshkol", new int?[, ] {
                { 1963, 1969 }
            }));
            israel.AddEntry(1966, "US military support");
            israel.AddEntry(1967, "six-day war[10]");
            israel.AddEntry(new LeaderEntry("Golda Meir", new int?[, ] {
                { 1969, 1974 }
            }));
            israel.AddEntry(1973, "Yom Kippur War[11]");
            israel.AddEntry(new LeaderEntry("Y.Rabin", new int?[, ] {
                { 1974, 1977 }, { 1992, 1995 }
            }));
            israel.AddEntry(1975, "efforts settle West Bank ");
            israel.AddEntry(new LeaderEntry("M.Begin", new int?[, ] {
                { 1977, 1983 }
            }));
            israel.AddEntry(1978, "Egypt-Israel peace");
            israel.AddEntry(1982, "Lebanon War[12]");
            israel.AddEntry(new LeaderEntry("Y.Shamir", new int?[, ] {
                { 1983, 1984 }, { 1986, 1992 }
            }));
            israel.AddEntry(1987, 1997, "First Intifada", PrintLocation.Right);
            israel.AddEntry(1988, "launch spy satallite");
            israel.AddEntry(new LeaderEntry("S.Peres", new int?[, ] {
                { 1984, 1986 }, { 1995, 1996 }
            }));
            israel.AddEntry(1990, "Soviet Jews free migration");


            de.AddEntry(1955.6, "total econ. recovery[W]");
            de.AddEntry(new LeaderEntry("Konrad Adenauer", new int?[, ] {
                { 1949, 1963 }
            })
            {
                StartValue = 1950
            });
            de.AddEntry(1951, "industrial limits lifted");
            de.AddEntry(1955, "sovereign W.Germany ");
            de.AddEntry(new LeaderEntry("Ludwig Erhard", new int?[, ] {
                { 1963, 1966 }
            }));
            de.AddEntry(new LeaderEntry("K.G.Kiesinger", new int?[, ] {
                { 1966, 1969 }
            }));
            de.AddEntry(new LeaderEntry("Willy Brandt", new int?[, ] {
                { 1969, 1974 }
            }));
            de.AddEntry(new LeaderEntry("Helmut Schmidt", new int?[, ] {
                { 1974, 1982 }
            }));
            de.AddEntry(new LeaderEntry("Helmut Kohl", new int?[, ] {
                { 1982, 1998 }
            }));
            de.AddEntry(1961, "ctor Berlin Wall(1961)");
            de.AddEntry(new LiteraryWorkEntry("Holcaust[6]", "TV-series", 1979));
            de.AddEntry(1989, "Berlin Wall comes down");
            de.AddEntry(1990, "German re-unification");
            de.AddEntry(1948, 1949, "Berlin blockade", PrintLocation.Right);
            de.AddEntry(1945.6, 1949, "Allied occupation");

            fr.AddEntry(1956.6, "French leave Vietnam");
            fr.AddEntry(new LeaderEntry("DeGaulle", new int?[, ] {
                { 1946, 1947 }, { 1959, 1969 }
            })
            {
                StartValue = 1945.5
            });
            fr.AddEntry(1951, "ECSC formed[7]");
            fr.AddEntry(new LeaderEntry("V.Auriol", new int?[, ] {
                { 1947, 1954 }
            }));
            fr.AddEntry(new LeaderEntry("Rene Coty", new int?[, ] {
                { 1954, 1959 }
            }));
            fr.AddEntry(1957, "EEC superseds ECSC");
            fr.AddEntry(new LeaderEntry("G.Pompidou", new int?[, ] {
                { 1969, 1974 }
            }));
            fr.AddEntry(new LeaderEntry("V.G.d'Estaing", new int?[, ] {
                { 1974, 1981 }
            }));
            fr.AddEntry(new LeaderEntry("F.Mitterrand", new int?[, ] {
                { 1981, 1995 }
            }));
            fr.AddEntry(1958, "Algerian crisis");
            fr.AddEntry(1946, 1956, "Indochina War(Vietnam)", PrintLocation.Left);
            fr.AddEntry(1949, 1958, "Fourth Republic", PrintLocation.Right);
            fr.AddEntry(1958.6, 1992, "Fifth Republic", PrintLocation.Right);

            ussr.AddEntry(1949, "test atomic bomb(1949)");
            ussr.AddEntry(1955.4, "Warsaw Pact formed");
            ussr.AddEntry(1956, "Hungarian Revolt crushed(1956)");
            ussr.AddEntry(new ScienceAdvEntry("satallite(Sputnik)", "", 1957));
            ussr.AddEntry(1968, "Czech revolt crushed(1968)");
            ussr.AddEntry(1979, 1987, "Soviet-Afghan war", PrintLocation.Right);
            ussr.AddEntry(1990, "Soviet Union abolished");
            ussr.AddEntry(new LeaderEntry("Stalin", new int?[, ] {
                { 1924, 1953 }
            })
            {
                StartValue = 1946
            });
            ussr.AddEntry(new LeaderEntry("G.Malenkov", new int?[, ] {
                { 1953, 1955 }
            }));
            ussr.AddEntry(new LeaderEntry("Khrushchev", new int?[, ] {
                { 1955, 1964 }
            }));
            ussr.AddEntry(new LeaderEntry("L.Brezhnev", new int?[, ] {
                { 1964, 1982 }
            }));
            ussr.AddEntry(new LeaderEntry("Y.Andropov", new int?[, ] {
                { 1982, 1984 }
            }));
            ussr.AddEntry(new LeaderEntry("K.Chernenko", new int?[, ] {
                { 1984, 1985 }
            }));
            ussr.AddEntry(new LeaderEntry("M.Gorbachev", new int?[, ] {
                { 1985, 1991 }
            }));

            plate.AddArrow(new Arrow(usa, jpn)
            {
                StartValue = 1952,
                Text       = "San Franciso Treaty (1952)",
                FromRightToLeftArrowHead = "+``",
                ArrowShaft = '`',
                ArrowTail  = "``+"
            });
            plate.AddArrow(new Arrow(zho, ussr)
            {
                StartValue = 1969, Text = "border conflict"
            });
            plate.Notes.Add(" [1] An economic disaster resulting in millions of deaths.  [2] brought serious disaster and turmoil to the Communist Party and the Chinese people.");
            plate.Notes.Add(" [3] China & USSR nearly come to nuclear war.");
            plate.Notes.Add(" [4] Policy to contain spread of Soviet influence.  [5] Closest to point WWIII.");
            plate.Notes.Add(" [6] When term was first coined, brought Nazi attrocities to W.German public");
            plate.Notes.Add(" [7] ECSC: European Coal and Steel Community, EEC: European Economic Community");
            plate.Notes.Add(" [8] loss of superpower status, leads to further decolonization");
            plate.Notes.Add(" [9] Political crisis with wide-spread strikes.");
            plate.Notes.Add(" [10] territory gains and access to Jerusalem's old city.  [11] US support led Saudi gov't to initate oil embargo (1973 oil crisis).");
            plate.Notes.Add(" [11] S.Lebanon controlled by islamic radicals - invasion success all the way to Beirut.");

            return(plate);
        }
Ejemplo n.º 4
0
        public Plate CE1788to1865()
        {
            var rule = new Rule {StartValue = 1785, EndValue = 1867, RuleLineSpacing = 7};

            var usa = new Block {Ruler = rule, Title = "United States"};
            usa.AddEntry(1787, "+DE,PA,NJ(1787)", PrintLocation.Right);
            usa.AddEntry(1788, "+GA,CT,MA,MD,SC,NH,VA,NY(1788)", PrintLocation.Right);
            usa.AddEntry(1789, "[Washington 1789-1797]", PrintLocation.Left);
            usa.AddEntry(1789, "+NC(1789)", PrintLocation.Right);
            usa.AddEntry(1790, "+RI(1790)", PrintLocation.Right);
            usa.AddEntry(1791, "+VT(1791)", PrintLocation.Right);
            usa.AddEntry(1792, "+KY(1792)", PrintLocation.Right);
            usa.AddEntry(1793, "E.Whitney[cottin gin](1793)(d.)");
            usa.AddEntry(1796, "+TN(1796)", PrintLocation.Right);
            usa.AddEntry(1797, "[John Adams -1801]", PrintLocation.Left);
            usa.AddEntry(1801, "[T.Jefferson -1809]", PrintLocation.Left);
            usa.AddEntry(1802, "West Point founded(1802)");
            usa.AddEntry(1803, "Louisiana Purchase(1803)");
            usa.AddEntry(1803, "+OH(1803)", PrintLocation.Right);
            usa.AddEntry(1804, "Lewis & Clark Expedition(1804)");
            usa.AddEntry(1809, "[James Madison -1817]", PrintLocation.Left);
            usa.AddEntry(1811, "B.of Tippecanoe(1811)(h.)");
            usa.AddEntry(1812, "+LA(1812)", PrintLocation.Right);
            usa.AddEntry(1815, "failed Canadian conquest");
            usa.AddEntry(1816, "+IN(1816)", PrintLocation.Right);
            usa.AddEntry(1816, "First Seminole War(1816-1819)");
            usa.AddEntry(1817, "[James Monroe -1825]", PrintLocation.Left);
            usa.AddEntry(1817, "+MS(1817)", PrintLocation.Right);
            usa.AddEntry(1818, "+IL(1818)", PrintLocation.Right);
            usa.AddEntry(1819, "+AL(1819)", PrintLocation.Right);
            usa.AddEntry(1820, "+ME(1820)", PrintLocation.Right);
            usa.AddEntry(1821, "+MO(1821)", PrintLocation.Right);
            usa.AddEntry(1825, "[John Quincy Adams -1829]", PrintLocation.Left);
            usa.AddEntry(1826, "'Last of the Mohicans'J.F.Cooper(1826)");
            usa.AddEntry(1829, "[Andrew Jackson -1837]", PrintLocation.Left);
            usa.AddEntry(1835, "Second Seminole War(1835-1842)");
            usa.AddEntry(1836, "+AR(1836)", PrintLocation.Right);
            usa.AddEntry(1837, "[Martin Van Buren -1841]", PrintLocation.Left);
            usa.AddEntry(1839, "Morse[telegraph](1837)");
            usa.AddEntry(1837, "+MI(1837)", PrintLocation.Right);
            usa.AddEntry(1841, "[William H Harrison -1841]", PrintLocation.Left);
            usa.AddEntry(1842, "[John Tyler -1845]", PrintLocation.Left);
            usa.AddEntry(1845, "[James K Polk -1849]", PrintLocation.Left);
            usa.AddEntry(1845, "+FL,TX(1845)", PrintLocation.Right);
            usa.AddEntry(1846, "+IA(1846)", PrintLocation.Right);
            usa.AddEntry(1844, "W.Morton[anesthesia](1846)");
            usa.AddEntry(1847, "U.S.-Mexican War(1846-1848)");
            usa.AddEntry(1848, "+WI(1848)", PrintLocation.Right);
            usa.AddEntry(1849, "[Zachary Taylor -1850]", PrintLocation.Left);
            usa.AddEntry(1849, "'The Scarlet Letter'N.Hawthorne'", PrintLocation.Right);
            usa.AddEntry(1850, "[Millard Fillmore -1853]", PrintLocation.Left);
            usa.AddEntry(1850, "+CA(1850)", PrintLocation.Right);
            usa.AddEntry(1851, "'Moby-Dick'H.Melville(1851)", PrintLocation.Left);
            usa.AddEntry(1851, "'Uncle Tom's Cabin'H.B.Stowe(1852)", PrintLocation.Right);
            usa.AddEntry(1852, "Perry Expedition to Japan(1852-54)");
            usa.AddEntry(1853, "[Franklin Pierce -1857]", PrintLocation.Left);
            usa.AddEntry(1855, "Third Seminole War(1855-1858)");
            usa.AddEntry(1857, "[James Buchanan -1861]", PrintLocation.Left);
            usa.AddEntry(1858, "+MN(1858)", PrintLocation.Right);
            usa.AddEntry(1859, "+OR(1859)", PrintLocation.Right);
            usa.AddEntry(1860, "[Abraham Lincoln -1865]", PrintLocation.Left);
            usa.AddEntry(1861, "+KS(1861)", PrintLocation.Right);

            usa.AddEntry(1861, "Ft.Sumter fired on(e.)", PrintLocation.Left);
            usa.AddEntry(1863, "Lee's invasion of PA,", PrintLocation.Left);
            usa.AddEntry(1863, "Siege of Vicksburg, +WV(1863)", PrintLocation.Right);
            usa.AddEntry(1864, "Siege of Petersburg,", PrintLocation.Left);
            usa.AddEntry(1864, "Atlanta falls, +NV(1864)", PrintLocation.Right);
            usa.AddEntry(1865, "Richmond falls,", PrintLocation.Left);
            usa.AddEntry(1865, "surrender @ Appomattox(1865)(f.)", PrintLocation.Right);
            usa.AddEntry(1866, "Lincoln assassinated(1865)");

            usa.AddEntry(new ScienceAdvEntry("rotary press", "R.M.Hoe") {StartValue = 1843});

            var engd = new Block {Ruler = rule, Title = "United Kingdom"};
            engd.AddEntry(1798, "Jenner[vaccination](1798)", PrintLocation.Left);
            engd.AddEntry(1800, "Volta[battery](1800)");
            engd.AddEntry(1801, "[William Pitt -1801\\-1806]", PrintLocation.Left);
            engd.AddEntry(1803, "Dalton[atomic theory](1803)");
            engd.AddEntry(1804, "[Henry Addington -1804]", PrintLocation.Left);
            engd.AddEntry(1806, "[Baron Grenville -1807]", PrintLocation.Left);
            engd.AddEntry(1807, "[W. Cavendish-Bentinck -1809]", PrintLocation.Left);
            engd.AddEntry(1809, "[Spencer Perceval -1812]", PrintLocation.Left);
            engd.AddEntry(1812, "[R.B Jenkinson -1827]", PrintLocation.Left);
            engd.AddEntry(1813, "'Pride & Prejudice'J.Austen(1813)", PrintLocation.Right);
            engd.AddEntry(1826, "[G. Canning -1827]", PrintLocation.Left);
            engd.AddEntry(1827, "[Viscount Goderich -1828]", PrintLocation.Left);
            engd.AddEntry(1828, "[Arthur Wellesley -1830]", PrintLocation.Left);
            engd.AddEntry(1830, "[Charles Grey -1834]", PrintLocation.Left);
            engd.AddEntry(1831, "Faraday[law of induction](1831)");
            engd.AddEntry(1836, "[R.Peel & W.Lamb(a.) -1846]", PrintLocation.Left);
            engd.AddEntry(1843, "J.P.Joule[1st law thermodyn](1843)");
            engd.AddEntry(1844, "Franklin's lost expedition(1845)");
            engd.AddEntry(1846, "[John Russel -1852]", PrintLocation.Left);
            engd.AddEntry(1847, "Kelvin[absolute zero](1848)");
            engd.AddEntry(1848, "'Communist Manifesto'(1848)");
            engd.AddEntry(1855, "[G. Hamilton-Gordon -1852-55]", PrintLocation.Left);
            engd.AddEntry(1858, "[E. Smith-Stanley -1852\\1858-59]", PrintLocation.Left);
            engd.AddEntry(1860, "[H. John Temple 1855-58\\59-65]", PrintLocation.Left);
            engd.AddEntry(1833, "'Principles of Geology' Lyell(1833)", PrintLocation.Right);
            engd.AddEntry(1834, "Abolition Act(1833)", PrintLocation.Right);
            engd.AddEntry(1838, "'Oliver Twist'Dickens(1838)");
            engd.AddEntry(1859, "'Origin of Species' Darwin(1859)", PrintLocation.Right);
            engd.AddEntry(1861, "'Great Expectations'Dickens(1861)");
            engd.AddEntry(new ScienceAdvEntry("electromag.", "Maxwell") {StartValue = 1864});
            engd.AddEntry(1865, "First Subway(1864)");
            engd.AddEntry(1840, 1860, "Industrial Revolution", PrintLocation.Right);
            engd.AddEntry(1839, 1866, "Queen Victoria (1837-1901)", PrintLocation.Left);

            var fr = new Block {Ruler = rule, Title = "France"};
            fr.AddEntry(1789, "Estates-General meets(1789)(b.)", PrintLocation.Left);
            fr.AddEntry(1791, "Storming of the Bastille(1789)", PrintLocation.Left);
            fr.AddEntry(1792, "Louis XVI executed(1793)", PrintLocation.Left);
            fr.AddEntry(1793, "Reign of Terror(1793\\94)", PrintLocation.Left);
            fr.AddEntry(1794, "Robespierre executed(1794)", PrintLocation.Left);
            fr.AddEntry(1795, "Napolean quells insurrection(1795)", PrintLocation.Left);
            fr.AddEntry(1796, "Cuvier[extinction](1796)");
            fr.AddEntry(1824, "Carnot[heat engine](1824)");
            fr.AddEntry(1833, "A.Payen[enzymes](1833)");
            fr.AddEntry(1845, "'Count of Monte Cristo'A.Dumas(1845)");
            fr.AddEntry(1848, "revolution of 1848 & 2nd Republic ");
            fr.AddEntry(1861, "Pasteur[germ theory](1861)");
            fr.AddEntry(1863, "'Les Miserables'V.Hugo(1862)");
            fr.AddEntry(1787, 1792, "French Revolution", PrintLocation.Right);
            fr.AddEntry(1793, 1804, "1st Republic", PrintLocation.Right);
            fr.AddEntry(1804, 1814, "Napolean(French Empire)");
            fr.AddEntry(1815, 1830, "Bourbon Restoration", PrintLocation.Right);
            fr.AddEntry(1831, 1848, "July Monarchy", PrintLocation.Right);
            fr.AddEntry(1852, 1866, "2nd French Empire", PrintLocation.Right);

            var de = new Block {Ruler = rule, Title = "Prussia"};
            de.AddEntry(1848, "revolution of 1848");
            de.AddEntry(1789, "[Frederick William II 1786-1797]", PrintLocation.Left);
            de.AddEntry(1795, "[Frederick William III 1797-1840]", PrintLocation.Left);
            de.AddEntry(1809, "'Faust'Goethe(1808)");
            de.AddEntry(1820, "H.C.Orsted[electromagnetism](1820)");
            de.AddEntry(1827, "Ohm[Ohm's law](1827)");
            de.AddEntry(1834, "German free-trade zone(1834)");
            de.AddEntry(1838, "M.Schleiden[plant cells](1838)");
            de.AddEntry(1840, "[Frederick William IV 1840-1861]", PrintLocation.Left);
            de.AddEntry(1846, "Neptune discovered(1846)");
            de.AddEntry(1862, "Otto V.Bismarck as PM(1862)");
            de.AddEntry(1866, "'Capital' Marx(1867)");
            de.AddEntry(1865, "Mendel[inheritance](1865)");

            var aus = new Block {Ruler = rule, Title = "Austrian Empire", Width = 30};
            aus.AddEntry(1788, "[Joseph II 1765-1790]", PrintLocation.Left);
            aus.AddEntry(1790, "[Leopold VII 1790-1792]", PrintLocation.Left);
            aus.AddEntry(1791, "[Francis II 1792-1804]", PrintLocation.Left);
            aus.AddEntry(1804, "[Francis I 1804-1835]", PrintLocation.Left);
            aus.AddEntry(1821, "K.V.Metternich PM(1821-1848)", PrintLocation.Left);
            aus.AddEntry(1835, "[Ferdinand I 1835-1848]", PrintLocation.Left);
            aus.AddEntry(1847, "[Francis Joseph 1848-1916]", PrintLocation.Left);
            aus.AddEntry(1815, "Congress of Vienna(1815)");

            aus.AddEntry(1842, "Doppler[Doppler efct](1842)");
            aus.AddEntry(1848, "revolution of 1848");

            var ott = new Block {Ruler = rule, Title = "Ottoman Empire"};
            ott.AddEntry(1789, "[Selim III 1789-1807]", PrintLocation.Left);
            ott.AddEntry(1807, "[Mustafa IV 1807/8]", PrintLocation.Left);
            ott.AddEntry(1809, "[Mahmud II 1808-1839]", PrintLocation.Left);
            ott.AddEntry(1839, "[Abdulmecid I 1839-1861]", PrintLocation.Left);
            ott.AddEntry(1852, "Epirus Revolt(1854)");
            ott.AddEntry(1861, "[Abdulaziz I 1861-1876]", PrintLocation.Left);

            ott.AddEntry(1821, 1832, "Greek War of Independence");

            var rus = new Block {Ruler = rule, Title = "Imperial Russia"};
            rus.AddEntry(1796, "[Paul I 1796-1801]", PrintLocation.Left);
            rus.AddEntry(1801, "[Alexander I 1801-1825]", PrintLocation.Left);
            rus.AddEntry(1825, "Decembrist revolt(1825)");
            rus.AddEntry(1824, "[Nicholas I 1825-1855]", PrintLocation.Left);
            rus.AddEntry(1830, "Lobachevsky[Non-Euclidean geo](1830)");
            rus.AddEntry(1855, "[Alexander II 1855-1881]", PrintLocation.Left);

            rus.AddEntry(1860, "Vladivostok founded(1860)");
            rus.AddEntry(1861, "serfs freed(1861)");

            rus.AddEntry(1852, 1856, "Crimean War");

            var plate = new Plate {Ruler = rule, Name = "Modern Age(1)"};
            plate.AddBlock(usa);
            plate.AddBlock(engd);
            plate.AddBlock(fr);
            plate.AddBlock(de);
            plate.AddBlock(aus);
            plate.AddBlock(ott);
            plate.AddBlock(rus);

            plate.AddArrow(new Arrow(aus, ott) {Text = "B.of Focsani(1789)", StartValue = 1789});
            plate.AddArrow(new Arrow(rus, ott) {StartValue = 1789, FromRightToLeftArrowHead = "<......"});
            plate.AddArrow(new Arrow(aus, fr) {StartValue = 1792});
            plate.AddArrow(new Arrow(de, fr) {StartValue = 1793});
            plate.AddArrow(new Arrow(fr, aus) {StartValue = 1796, Text = "B.of Rivoli(1797)"});
            plate.AddArrow(new Arrow(fr, ott) {Text = "B.of the Pryamids(1798)(c.)", StartValue = 1797});
            plate.AddArrow(new Arrow(engd, fr) {Text = "B.of the Nile(1798)(g.)", StartValue = 1798});
            plate.AddArrow(new Arrow(fr, aus) {Text = "B.of Marengo(1800)", StartValue = 1800});
            plate.AddArrow(new Arrow(rus, fr) {Text = "B.of Leipzig(1813)", StartValue = 1813});
            plate.AddArrow(new Arrow(engd, usa)
            {
                Text = "DC sacked(1814)",
                StartValue = 1814,
                ArrowTail = ".",
                FromRightToLeftArrowHead = "<...."
            });
            plate.AddArrow(new Arrow(engd, fr) {Text = "Waterloo(1815)", StartValue = 1815});
            plate.AddArrow(new Arrow(fr, rus) {StartValue = 1812});
            plate.AddArrow(new Arrow(rus, ott) {StartValue = 1853, Text = "B.of Sinop(1853)"});
            plate.AddArrow(new Arrow(engd, rus) {StartValue = 1854, Text = "B.of Balaclava(1854)"});

            plate.Notes.Add("(a.)  last Prime Minister dismissed by a king,  (b.) last met in 1614");
            plate.Notes.Add(
                "(c.)  intended to cut England off from India, (d.) pop. of black slaves goes from 700 thousand to 3 million");
            plate.Notes.Add("(e.)  April 12, 1861, (f.) April 9, 1865 (est. 620,000 killed)");
            plate.Notes.Add(
                "(g.)  Napolean's Navy destroyed,  (h.) Gen. Harrison defeats confederacy of Native Americans");

            return plate;
        }
Ejemplo n.º 5
0
        public Plate CE1700to1788()
        {
            var rule = new Rule {StartValue = 1700, EndValue = 1790, RuleLineSpacing = 7};
            var amer = new Block {Ruler = rule, Title = "Americas"};

            var col = new Block {StartValue = 1703, EndValue = 1783, Title = "Colonies", Ruler = rule};
            col.AddEntry(1771, "Boston Massacre(1770)", PrintLocation.Left);
            col.AddEntry(1703, "Yale College (1700)");
            col.AddEntry(1727, "[Bering] Bering straight(1728)");
            col.AddEntry(1739, "Stono Rebellion(1739)");
            col.AddEntry(1730, "Baltimore MA(1730)");
            col.AddEntry(1764, "Mason Dixon survey(1764)");
            col.AddEntry(1769, "[D.Boone]-Kentucky(1769)");
            col.AddEntry(1773, "Boston Tea Party(1773)");

            col.AddEntry(1704, 1713, "Queen Anne's War");
            col.AddEntry(1754, 1763, "French Indian War");
            col.AddEntry(1775, 1783, "American Rev.(1775-1783)", PrintLocation.Left);
            col.AddEntry(1777, "NY occupied(1776)");
            col.AddEntry(1778, "Savannah occupied(1778)");
            col.AddEntry(1780, "Charleston occupied(1780)");

            var que = new Block {StartValue = 1703, EndValue = 1763, Title = "New France", Ruler = rule, Width = 22};
            que.AddEntry(1703, "Fr.settle Mobile AL");
            que.AddEntry(1718, "New Orleans LA(1718)");

            var usa = new Block {StartValue = 1775, Title = "United States", Ruler = rule};
            usa.AddEntry(1776, "Lafayette in PA(1777)");
            usa.AddEntry(1781, "Cornwallis surrender(1781)");
            usa.AddEntry(1783, "Peace of Paris(1783)");
            usa.AddEntry(1787, "U.S.Constitution(1787)");
            amer.AddInnerBlock(col);
            amer.AddInnerBlock(usa);
            amer.AddInnerBlock(que);
            amer.AddArrow(new Arrow(que, col) {StartValue = 1706, ArrowTail = "."});
            amer.AddArrow(new Arrow(col, que) {StartValue = 1755, Text = "B. of the Monongahela"});
            amer.AddArrow(new Arrow(que, col) {StartValue = 1757, Text = "massacre @ F.William Henry"});

            var engd = new Block {Ruler = rule, Title = "United Kingdom"};
            engd.AddEntry(1704, "[Anne 1702-1714]", PrintLocation.Left);
            engd.AddEntry(1720, "[George I 1714-1727]", PrintLocation.Left);
            engd.AddEntry(1727, "[George II 1727-1760]", PrintLocation.Left);
            engd.AddEntry(1730, "first railroad(1730)");
            engd.AddEntry(1739, "Wesley/Whitefield[Methodism]");
            engd.AddEntry(1745, "Jacobite Rebellion(1745)");
            engd.AddEntry(1760, "[George III 1760-1820]", PrintLocation.Left);
            engd.AddEntry(1766, "H.Cavendish[hydrogen](1766)", PrintLocation.Right);
            engd.AddEntry(1776, "'Wealth of Nations' A.Smith(1776)", PrintLocation.Right);
            engd.AddEntry(1777, " 'Rise & Fall..Roman Empire'Gibbon(1777)", PrintLocation.Right);
            engd.AddEntry(1781, "1st Sunday-school(R.Raikes)(1781)", PrintLocation.Right);
            engd.AddEntry(1769, "J.Watt[steam engine](1769)", PrintLocation.Right);
            engd.AddEntry(1764, "J.Hargreaves[spinning jenny](1764)", PrintLocation.Right);
            engd.AddEntry(1782, "Lord North resigns as PM(1782)");
            engd.AddEntry(1787, "Australia penal settlement(1788)");
            engd.AddEntry(1789, "[Cook]Hawaiian Islands(1788)");
            engd.AddEntry(1702, 1714, "Stuart(restored)", PrintLocation.Left);
            engd.AddEntry(1715, 1800, "Hanover", PrintLocation.Left);

            var fr = new Block {Ruler = rule, Title = "France"};
            fr.AddEntry(1601, "[Louis XIV 1643-1715]", PrintLocation.Left);
            fr.AddEntry(1715, "[Louis XV 1715-1774]", PrintLocation.Left);
            fr.AddEntry(1774, "[Louis XVI 1774-1792]", PrintLocation.Left);
            fr.AddEntry(1720, "France bankrupt(1721)");
            fr.AddEntry(1748, "'The Spirit of Laws' Montesquieu(1748)", PrintLocation.Right);
            fr.AddEntry(1761, "'Social Contract' Rousseau(1761)", PrintLocation.Right);
            fr.AddEntry(1756, "Diplomatic Revolution(1756)(c.)");
            fr.AddEntry(1783, "1st hot-air ballon(1783)", PrintLocation.Right);
            fr.AddEntry(1702, 1790, "Capetian[Bourbon]", PrintLocation.Left);
            fr.AddEntry(1701, 1714, "War of Spanish Succ.(1701-1714)");

            var de = new Block {Ruler = rule, Title = "Prussia"};
            de.AddEntry(1702, "[Fredrick I 1701-1713]", PrintLocation.Left);
            de.AddEntry(1713, "[Fredrick William I 1713-1740]", PrintLocation.Left);
            de.AddEntry(1740, "[Fredrick the Great 1740-1786]", PrintLocation.Left);
            de.AddEntry(1786, "[Fredrick William II 1786-1797]", PrintLocation.Left);
            de.AddEntry(1781, "'Critique of Pure Reason' E.Kant(1781)", PrintLocation.Right);
            de.AddEntry(1715, "Fahrenheit[thermometer](1714)");
            de.AddEntry(1730, "'Toccata Fugue' Bach(~1730s)");
            de.AddEntry(1754, 1763, "Seven's Year War");

            var aus = new Block {Ruler = rule, Title = "Austrian Empire"};
            aus.AddEntry(1701, "[Leopold I 1640-1705]", PrintLocation.Left);
            aus.AddEntry(1705, "[Joseph I 1705-1711]", PrintLocation.Left);
            aus.AddEntry(1711, "[Charles III 1711-1740]", PrintLocation.Left);
            aus.AddEntry(1739, "[Maria Theresa 1740-1780]", PrintLocation.Left);
            aus.AddEntry(1780, "[Joseph II 1780-1790]", PrintLocation.Left);
            aus.AddEntry(1783, "Mozart in Vienna", PrintLocation.Right);
            aus.AddEntry(1741, 1748, "War of Austrian Succ.(1740-1748)");

            var ott = new Block {Ruler = rule, Title = "Ottoman Empire"};
            ott.AddEntry(1710, "[Ahmed III 1703-1730]", PrintLocation.Left);
            ott.AddEntry(1730, "[Mahmud I 1730-1754]", PrintLocation.Left);
            ott.AddEntry(1754, "[Osman III 1754-1757]", PrintLocation.Left);
            ott.AddEntry(1757, "[Mustafa III 1757-1774]", PrintLocation.Left);
            ott.AddEntry(1774, "[Abdulhamid I 1774-1789]", PrintLocation.Left);
            ott.AddEntry(1789, "[Selim III 1789-1807]", PrintLocation.Left);

            var rus = new Block {Ruler = rule, Title = "Imperial Russia", StartValue = 1721};
            rus.AddEntry(1725, "[Peter the Great 1695-1725]");
            rus.AddEntry(1727, 1760, "[internal intrigue]");
            rus.AddEntry(1762, "[Catherine theGreat 1762-1796]");
            rus.AddEntry(1783, "(+)Crimea(1783)");
            rus.AddEntry(1768, 1774, "1st Russio-Turkish War", PrintLocation.Right);

            var plate = new Plate {Ruler = rule, Name = "Early Modern Age(2)"};
            plate.AddBlock(amer);
            plate.AddBlock(engd);
            plate.AddBlock(fr);
            plate.AddBlock(de);
            plate.AddBlock(aus);
            plate.AddBlock(ott);
            plate.AddBlock(rus);

            plate.AddArrow(new Arrow(aus, fr) {StartValue = 1704, Text = "B. of Blenheim(1704)"});
            plate.AddArrow(new Arrow(fr, de) {StartValue = 1706, Text = "B. of Ramilies(1706)"});
            plate.AddArrow(new Arrow(fr, de) {StartValue = 1708, Text = "B. of Oudenarde(1708)"});
            plate.AddArrow(new Arrow(engd, fr) {StartValue = 1709, Text = "B. of Malpaquet(1709)"});
            plate.AddArrow(new Arrow(aus, ott) {StartValue = 1717, Text = "B. of Belgrad(1717)"});
            plate.AddArrow(new Arrow(de, aus) {StartValue = 1740, Text = "invasion of Silesia(1740)"});
            plate.AddArrow(new Arrow(engd, fr) {StartValue = 1743, Text = "B. of Dettingen(1743)(e.)"});
            plate.AddArrow(new Arrow(de, aus) {StartValue = 1757, Text = "B. of Prague(1757)"});
            plate.AddArrow(new Arrow(rus, ott) {StartValue = 1770, Text = "B.of Chesma & Kagus(1770)"});

            plate.AddArrow(new Arrow(engd, aus)
            {
                StartValue = 1714,
                Text = "Peace of Ulrecht(1714)(a.)",
                ArrowTail = "[..........",
                FromLeftToRightArrowHead = "......]",
            });
            plate.AddArrow(new Arrow(aus, de)
            {
                StartValue = 1748,
                Text = "Treaty of Aix-la-Chapelle(1748)",
                ArrowTail = "........]",
                FromRightToLeftArrowHead = "[.....",
            });

            plate.AddArrow(new Arrow(engd, fr)
            {
                StartValue = 1763,
                Text = "Treaty of Paris(1763)(b.)",
                ArrowTail = "[..........",
                FromLeftToRightArrowHead = "......]",
            });

            plate.AddArrow(new Arrow(de, aus)
            {
                StartValue = 1788,
                Text = "War of Bavarian Succ.(1778\\79)",
                ArrowTail = "[.........",
                FromLeftToRightArrowHead = "]",
            });

            plate.AddArrow(new Arrow(engd, amer)
            {
                StartValue = 1771,
                Text = "B. of the Alamance(1771)",
                FromRightToLeftArrowHead = "<..............................."
            });
            plate.AddArrow(new Arrow(engd, amer)
            {
                StartValue = 1775,
                Text = "B. of Lexington(1775)",
                FromRightToLeftArrowHead = "<........................",
                ArrowTail = "."
            });
            plate.AddArrow(new Arrow(engd, amer)
            {
                StartValue = 1777,
                Text = "B. at Trenton(1777)",
                FromRightToLeftArrowHead = "<........................",
                ArrowTail = "."
            });

            plate.Notes.Add("(a.)marks the end of Wars of Spanish Succession");
            plate.Notes.Add("(b.)British supremacy in Canada and India");
            plate.Notes.Add("(c.)England allies with Prussia - Austria with France.");
            plate.Notes.Add("(d.)start of Wars of Austrian Succ.");
            plate.Notes.Add("(e.)fought on German soil");

            return plate;
        }
Ejemplo n.º 6
0
        public Plate CE1700to1788()
        {
            var rule = new Rule {
                StartValue = 1700, EndValue = 1790, RuleLineSpacing = 7
            };
            var amer = new Block {
                Ruler = rule, Title = "Americas"
            };

            var col = new Block {
                StartValue = 1703, EndValue = 1783, Title = "Colonies", Ruler = rule
            };

            col.AddEntry(1771, "Boston Massacre(1770)", PrintLocation.Left);
            col.AddEntry(1703, "Yale College (1700)");
            col.AddEntry(new ExplorerEntry("Bering", "Bering straight", 1728)
            {
                StartValue = 1727
            });
            col.AddEntry(1739, "Stono Rebellion(1739)");
            col.AddEntry(1730, "Baltimore MA(1730)");
            col.AddEntry(1764, "Mason Dixon survey(1764)");
            col.AddEntry(new ExplorerEntry("D.Boone", "Kentucky", 1769));
            col.AddEntry(1773, "Boston Tea Party(1773)");

            col.AddEntry(1704, 1713, "Queen Anne's War");
            col.AddEntry(1754, 1763, "French Indian War");
            col.AddEntry(1775, 1783, "American Rev.(1775-1783)", PrintLocation.Left);
            col.AddEntry(1777, "NY occupied(1776)");
            col.AddEntry(1778, "Savannah occupied(1778)");
            col.AddEntry(1780, "Charleston occupied(1780)");

            var que = new Block {
                StartValue = 1703, EndValue = 1763, Title = "New France", Ruler = rule, Width = 22
            };

            que.AddEntry(1703, "Fr.settle Mobile AL");
            que.AddEntry(1718, "New Orleans LA(1718)");

            var usa = new Block {
                StartValue = 1775, Title = "United States", Ruler = rule
            };

            usa.AddEntry(1776, "Lafayette in PA(1777)");
            usa.AddEntry(1781, "Cornwallis surrender(1781)");
            usa.AddEntry(1783, "Peace of Paris(1783)");
            usa.AddEntry(new LiteraryWorkEntry("U.S.Constitution", "", 1789)
            {
                StartValue = 1787
            });

            var engd = new Block {
                Ruler = rule, Title = "United Kingdom"
            };

            engd.AddEntry(new LeaderEntry("Anne", new int?[, ] {
                { 1702, 1714 }
            })
            {
                StartValue = 1704
            });
            engd.AddEntry(new LeaderEntry("George I", new int?[, ] {
                { 1714, 1727 }
            })
            {
                StartValue = 1720
            });
            engd.AddEntry(new LeaderEntry("George II", new int?[, ] {
                { 1727, 1760 }
            }));
            engd.AddEntry(new ScienceAdvEntry("railroad", "", 1730));
            engd.AddEntry(1739, "Wesley/Whitefield[Methodism]");
            engd.AddEntry(1745, "Jacobite Rebellion(1745)");
            engd.AddEntry(new LeaderEntry("George III", new int?[, ] {
                { 1760, 1820 }
            }));
            engd.AddEntry(new ScienceAdvEntry("hydrogen", "H.Cavendish", 1766));
            engd.AddEntry(new LiteraryWorkEntry("Wealth of Nations", "A.Smith", 1776)
            {
                Location = PrintLocation.Right
            });
            engd.AddEntry(new LiteraryWorkEntry("Rise & Fall..Roman Empire", "Gibbon", 1777)
            {
                Location = PrintLocation.Right
            });
            engd.AddEntry(1781, "1st Sunday-school(R.Raikes)(1781)", PrintLocation.Right);
            engd.AddEntry(new ScienceAdvEntry("steam engine", "J.Watt", 1769));
            engd.AddEntry(new ScienceAdvEntry("spinning jenny", "J.Hargreaves", 1764)
            {
                Location = PrintLocation.Right
            });
            engd.AddEntry(1782, "Lord North resigns as PM(1782)");
            engd.AddEntry(1787, "Australia penal settlement(1788)");
            engd.AddEntry(new ExplorerEntry("Cook", "Hawaiian Islands", 1788)
            {
                StartValue = 1789
            });
            engd.AddEntry(1702, 1714, "Stuart(restored)", PrintLocation.Left);
            engd.AddEntry(1715, 1800, "Hanover", PrintLocation.Left);

            var fr = new Block {
                Ruler = rule, Title = "France"
            };

            fr.AddEntry(new LeaderEntry("Louis XIV", new int?[, ] {
                { null, 1715 }
            })
            {
                StartValue = 1704
            });
            fr.AddEntry(new LeaderEntry("Louis XV", new int?[, ] {
                { 1715, 1774 }
            })
            {
                StartValue = 1715
            });
            fr.AddEntry(new LeaderEntry("Louis XVI", new int?[, ] {
                { 1774, 1792 }
            })
            {
                StartValue = 1774
            });
            fr.AddEntry(1720, "France bankrupt(1721)");
            fr.AddEntry(new LiteraryWorkEntry("The Spirit of Laws", "Montesquieu", 1748)
            {
                Location = PrintLocation.Right
            });
            fr.AddEntry(new LiteraryWorkEntry("Social Contract", "Rousseau", 1761)
            {
                Location = PrintLocation.Right
            });
            fr.AddEntry(1756, "Diplomatic Revolution(1756)(c.)");
            fr.AddEntry(new ScienceAdvEntry("hot-air ballon", "", 1783)
            {
                Location = PrintLocation.Right
            });
            fr.AddEntry(1702, 1790, "Capetian[Bourbon]", PrintLocation.Left);
            fr.AddEntry(1701, 1714, "War of Spanish Succ.(1701-1714)");

            var de = new Block {
                Ruler = rule, Title = "Prussia"
            };

            de.AddEntry(new LeaderEntry("Fredrick I", new int?[, ] {
                { 1701, 1713 }
            })
            {
                StartValue = 1702
            });
            de.AddEntry(new LeaderEntry("Fredrick William I", new int?[, ] {
                { 1713, 1740 }
            }));
            de.AddEntry(new LeaderEntry("Fredrick the Great", new int?[, ] {
                { 1740, 1786 }
            }));
            de.AddEntry(new LeaderEntry("Fredrick William II", new int?[, ] {
                { 1786, 1797 }
            }));
            de.AddEntry(new LiteraryWorkEntry("Critique Pure Reason", "E.Kant", 1781));
            de.AddEntry(new ScienceAdvEntry("thermometer", "Fahrenheit", 1714)
            {
                StartValue = 1715
            });
            de.AddEntry(1730, "'Toccata Fugue' Bach(~1730s)");
            de.AddEntry(1754, 1763, "Seven's Year War");

            var aus = new Block {
                Ruler = rule, Title = "Austrian Empire"
            };

            aus.AddEntry(new LeaderEntry("Leopold I", new int?[, ] {
                { 1640, 1705 }
            })
            {
                StartValue = 1701
            });
            aus.AddEntry(new LeaderEntry("Joseph I", new int?[, ] {
                { 1705, 1711 }
            }));
            aus.AddEntry(new LeaderEntry("Charles III", new int?[, ] {
                { 1711, 1740 }
            }));
            aus.AddEntry(new LeaderEntry("Maria Theresa", new int?[, ] {
                { 1740, 1780 }
            })
            {
                StartValue = 1739
            });
            aus.AddEntry(new LeaderEntry("Joseph II", new int?[, ] {
                { 1780, 1790 }
            }));
            aus.AddEntry(1783, "Mozart in Vienna", PrintLocation.Right);
            aus.AddEntry(1741, 1748, "War of Austrian Succ.(1740-1748)");

            var ott = new Block {
                Ruler = rule, Title = "Ottoman Empire"
            };

            ott.AddEntry(new LeaderEntry("Ahmed III", new int?[, ] {
                { 1703, 1730 }
            })
            {
                StartValue = 1710
            });
            ott.AddEntry(new LeaderEntry("Mahmud I", new int?[, ] {
                { 1730, 1754 }
            }));
            ott.AddEntry(new LeaderEntry("Osman III", new int?[, ] {
                { 1754, 1757 }
            }));
            ott.AddEntry(new LeaderEntry("Mustafa III", new int?[, ] {
                { 1757, 1774 }
            }));
            ott.AddEntry(new LeaderEntry("Abdulhamid I", new int?[, ] {
                { 1774, 1789 }
            }));
            ott.AddEntry(new LeaderEntry("Selim III", new int?[, ] {
                { 1789, 1807 }
            }));

            var rus = new Block {
                Ruler = rule, Title = "Imperial Russia", StartValue = 1721
            };

            rus.AddEntry(new LeaderEntry("Peter the Great", new int?[, ] {
                { 1695, 1725 }
            })
            {
                StartValue = 1725
            });
            rus.AddEntry(1727, 1760, "[internal intrigue]");
            rus.AddEntry(new LeaderEntry("[Catherine the Great", new int?[, ] {
                { 1762, 1796 }
            }));
            rus.AddEntry(new TerritoryEntry("Crimea")
            {
                StartValue = 1783
            });
            rus.AddEntry(1768, 1774, "1st Russio-Turkish War", PrintLocation.Right);

            amer.AddInnerBlock(col);
            amer.AddInnerBlock(usa);
            amer.AddInnerBlock(que);

            amer.AddArrow(new Arrow(que, col)
            {
                StartValue = 1706, ArrowTail = ".."
            });
            amer.AddArrow(new Arrow(col, que)
            {
                StartValue = 1755, Text = "B. of the Monongahela", ArrowTail = ".."
            });
            amer.AddArrow(new Arrow(que, col)
            {
                StartValue = 1757, Text = "massacre @ F.William Henry", ArrowTail = ".."
            });

            var plate = new Plate {
                Ruler = rule, Name = "Early Modern Age"
            };

            plate.AddBlock(amer);
            plate.AddBlock(engd);
            plate.AddBlock(fr);
            plate.AddBlock(de);
            plate.AddBlock(aus);
            plate.AddBlock(ott);
            plate.AddBlock(rus);
            plate.FileName = "16_CE1700_1788";

            plate.AddArrow(new Arrow(aus, fr)
            {
                StartValue = 1704, Text = "B. of Blenheim(1704)"
            });
            plate.AddArrow(new Arrow(fr, de)
            {
                StartValue = 1706, Text = "B. of Ramilies(1706)"
            });
            plate.AddArrow(new Arrow(fr, de)
            {
                StartValue = 1708, Text = "B. of Oudenarde(1708)"
            });
            plate.AddArrow(new Arrow(engd, fr)
            {
                StartValue = 1709, Text = "B. of Malpaquet(1709)"
            });
            plate.AddArrow(new Arrow(aus, ott)
            {
                StartValue = 1717, Text = "B. of Belgrad(1717)"
            });
            plate.AddArrow(new Arrow(de, aus)
            {
                StartValue = 1740, Text = "invasion of Silesia(1740)"
            });
            plate.AddArrow(new Arrow(engd, fr)
            {
                StartValue = 1743, Text = "B. of Dettingen(1743)(e.)"
            });
            plate.AddArrow(new Arrow(de, aus)
            {
                StartValue = 1757, Text = "B. of Prague(1757)"
            });
            plate.AddArrow(new Arrow(rus, ott)
            {
                StartValue = 1770, Text = "B.of Chesma & Kagus(1770)"
            });

            plate.AddArrow(new Arrow(engd, aus)
            {
                StartValue = 1714,
                Text       = "Peace of Ulrecht(1714)(a.)",
                ArrowTail  = "[..",
                FromLeftToRightArrowHead = "..]",
            });
            plate.AddArrow(new Arrow(aus, de)
            {
                StartValue = 1748,
                Text       = "Treaty of Aix-la-Chapelle(1748)",
                ArrowTail  = "..]",
                FromRightToLeftArrowHead = "[..",
            });

            plate.AddArrow(new Arrow(engd, fr)
            {
                StartValue = 1763,
                Text       = "Treaty of Paris(1763)(b.)",
                ArrowTail  = "[..",
                FromLeftToRightArrowHead = "..]",
            });

            plate.AddArrow(new Arrow(de, aus)
            {
                StartValue = 1788,
                Text       = "War of Bavarian Succ.(1778\\79)",
                ArrowTail  = "[..",
                FromLeftToRightArrowHead = "..]",
            });

            plate.AddArrow(new Arrow(engd, usa)
            {
                StartValue = 1771,
                Text       = "B. of the Alamance(1771)"
            });
            plate.AddArrow(new Arrow(engd, usa)
            {
                StartValue = 1775,
                Text       = "B. of Lexington(1775)",
            });
            plate.AddArrow(new Arrow(engd, usa)
            {
                StartValue = 1777,
                Text       = "B. at Trenton(1777)",
            });

            plate.Notes.Add("(a.)marks the end of Wars of Spanish Succession");
            plate.Notes.Add("(b.)British supremacy in Canada and India");
            plate.Notes.Add("(c.)England allies with Prussia - Austria with France.");
            plate.Notes.Add("(d.)start of Wars of Austrian Succ.");
            plate.Notes.Add("(e.)fought on German soil");


            return(plate);
        }