rules={"Amharic"->"Ethiopic (Ge?ez)_","Romansh"->"Latin_","Irish"->"Latin_","Occitan (post 1500)"->"Latin_","Sinhala; Sinhalese"->"Sinhala_","Kazakh"->"Cyrillic_","Sindhi"->"Arabic_","Chinese"->"Han (Hanzi, Kanji, Hanja)_","Tigrinya"->"Ethiopic (Ge?ez)_","Greek, Modern (1453-)"->"Greek_","Croatian"->"Latin_","Estonian"->"Latin_","Haitian; Haitian Creole"->"Latin_","Panjabi; Punjabi"->"Gurmukhi_","Persian"->"Arabic_","Igbo"->"Latin_","Latin"->"Latin_","Aymara"->"Latin_","Xhosa"->"Latin_","German"->"Latin_","Tajik"->"Cyrillic_","Central Khmer"->"Khmer_","Tatar"->"Latin_","Mongolian"->"Cyrillic_","Russian"->"Cyrillic_","Slovenian"->"Latin_","Inupiaq"->"Latin_","Syriac"->"Syriac_","Breton"->"Latin_","Latvian"->"Latin_","Divehi; Dhivehi; Maldivian"->"Thaana_","Vietnamese"->"Latin_","Icelandic"->"Latin_","Swahili"->"Latin_","Portuguese"->"Latin_","Afar"->"Latin_","Telugu"->"Telugu_","Korean"->"Han (Hanzi, Kanji, Hanja)_","Volap?k"->"Latin_","Swedish"->"Latin_","Danish"->"Latin_","Gaelic; Scottish Gaelic"->"Latin_","Assamese"->"Bengali_","Hindi"->"Devanagari (Nagari)_","Marathi"->"Devanagari (Nagari)_","Polish"->"Latin_","Oriya"->"Oriya_","Welsh"->"Latin_","Wolof"->"Latin_","Guarani"->"Latin_","Samoan"->"Latin_","Ganda"->"Latin_","Norwegian"->"Latin_","Interlingua (International Auxiliary Language Association)"->"Latin_","Nauru"->"Latin_","Esperanto"->"Latin_","Khasi"->"Latin_","Somali"->"Latin_","mfe"->"Latin_","Urdu"->"Arabic_","Lingala"->"Latin_","Hausa"->"Arabic_","Interlingue; Occidental"->"Latin_","Sanskrit"->"Devanagari (Nagari)_","Faroese"->"Latin_","Rundi"->"Latin_","Ukrainian"->"Cyrillic_","Japanese"->"Han (Hanzi, Kanji, Hanja)_","mo"->"Cyrillic_","Maori"->"Latin_","Italian"->"Latin_","Zulu"->"Latin_","Uighur; Uyghur"->"Arabic_","Finnish"->"Latin_","Macedonian"->"Cyrillic_","Gujarati"->"Gujarati_","crs"->"Latin_","Tonga (Tonga Islands)"->"Latin_","Cherokee"->"Cherokee_","Shona"->"Latin_","Swati"->"Latin_","Abkhazian"->"Cyrillic_","Western Frisian"->"Latin_","Norwegian Nynorsk; Nynorsk, Norwegian"->"Latin_","Dutch; Flemish"->"Latin_","Sotho, Southern"->"Latin_","Belarusian"->"Cyrillic_","Thai"->"Thai_","Lao"->"Lao_","Bashkir"->"Cyrillic_","zhT"->"Han (Hanzi, Kanji, Hanja)_","Malay"->"Latin_","Spanish; Castilian"->"Latin_","Czech"->"Latin_","Tsonga"->"Latin_","Tibetan"->"Tibetan_","Arabic"->"Arabic_","Dzongkha"->"Tibetan_","Turkish"->"Latin_","Slovak"->"Latin_","Galician"->"Latin_","Scots"->"Latin_","Malagasy"->"Latin_","iw"->"Hebrew_","Nepali"->"Devanagari (Nagari)_","English"->"Latin_","Quechua"->"Latin_","Serbian"->"Latin_","French"->"Latin_","Hungarian"->"Latin_","Chichewa; Chewa; Nyanja"->"Latin_","Albanian"->"Latin_","Armenian"->"Armenian_","Sundanese"->"Latin_","Kirghiz; Kyrgyz"->"Cyrillic_","Bengali"->"Bengali_","Venda"->"Latin_","xxx"->"Latin_","g?orgien"->"Georgian (Mkhedruli)_","Bulgarian"->"Cyrillic_","Bislama"->"Latin_","Uzbek"->"Cyrillic_","Hawaiian"->"Latin_","Lithuanian"->"Latin_","Romanian; Moldavian; Moldovan"->"Latin_","Fijian"->"Latin_","Luxembourgish; Letzeburgesch"->"Latin_","Basque"->"Latin_","jw"->"Latin_","Bihari languages"->"Devanagari (Nagari)_","Maltese"->"Latin_","Yiddish"->"Hebrew_","Turkmen"->"Latin_","Tswana"->"Latin_","Yoruba"->"Latin_","Azerbaijani"->"Latin_","Tamil"->"Tamil_","Manx"->"Latin_","Kinyarwanda"->"Latin_","Corsican"->"Latin_","Afrikaans"->"Latin_","Oromo"->"Latin_","Zhuang; Chuang"->"Latin_","Kannada"->"Kannada_","Kalaallisut; Greenlandic"->"Latin_","Catalan; Valencian"->"Latin_","Tagalog"->"Latin_","Inuktitut"->"Unified Canadian Aboriginal Syllabics_","Kurdish"->"Arabic_","Burmese"->"Latin_","Indonesian"->"Latin_","Malayalam"->"Malayalam_","Pushto; Pashto"->"Arabic_"};
scripts={"Ethiopic (Ge?ez)_","Latin_","Latin_","Latin_","Sinhala_","Cyrillic_","Arabic_","Han (Hanzi, Kanji, Hanja)_","Ethiopic (Ge?ez)_","Greek_","Latin_","Latin_","Latin_","Gurmukhi_","Arabic_","Latin_","Latin_","Latin_","Latin_","Latin_","Cyrillic_","Khmer_","Latin_","Cyrillic_","Cyrillic_","Latin_","Latin_","Syriac_","Latin_","Latin_","Thaana_","Latin_","Latin_","Latin_","Latin_","Latin_","Telugu_","Han (Hanzi, Kanji, Hanja)_","Latin_","Latin_","Latin_","Latin_","Bengali_","Devanagari (Nagari)_","Devanagari (Nagari)_","Latin_","Oriya_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Arabic_","Latin_","Arabic_","Latin_","Devanagari (Nagari)_","Latin_","Latin_","Cyrillic_","Han (Hanzi, Kanji, Hanja)_","Cyrillic_","Latin_","Latin_","Latin_","Arabic_","Latin_","Cyrillic_","Gujarati_","Latin_","Latin_","Cherokee_","Latin_","Latin_","Cyrillic_","Latin_","Latin_","Latin_","Latin_","Cyrillic_","Thai_","Lao_","Cyrillic_","Han (Hanzi, Kanji, Hanja)_","Latin_","Latin_","Latin_","Latin_","Tibetan_","Arabic_","Tibetan_","Latin_","Latin_","Latin_","Latin_","Latin_","Hebrew_","Devanagari (Nagari)_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Armenian_","Latin_","Cyrillic_","Bengali_","Latin_","Latin_","Georgian (Mkhedruli)_","Cyrillic_","Latin_","Cyrillic_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Devanagari (Nagari)_","Latin_","Hebrew_","Latin_","Latin_","Latin_","Latin_","Tamil_","Latin_","Latin_","Latin_","Latin_","Latin_","Latin_","Kannada_","Latin_","Latin_","Latin_","Unified Canadian Aboriginal Syllabics_","Arabic_","Latin_","Latin_","Malayalam_","Arabic_"};
langs={"Amharic","Romansh","Irish","Occitan (post 1500)","Sinhala; Sinhalese","Kazakh","Sindhi","Chinese","Tigrinya","Greek, Modern (1453-)","Croatian","Estonian","Haitian; Haitian Creole","Panjabi; Punjabi","Persian","Igbo","Latin","Aymara","Xhosa","German","Tajik","Central Khmer","Tatar","Mongolian","Russian","Slovenian","Inupiaq","Syriac","Breton","Latvian","Divehi; Dhivehi; Maldivian","Vietnamese","Icelandic","Swahili","Portuguese","Afar","Telugu","Korean","Volap?k","Swedish","Danish","Gaelic; Scottish Gaelic","Assamese","Hindi","Marathi","Polish","Oriya","Welsh","Wolof","Guarani","Samoan","Ganda","Norwegian","Interlingua (International Auxiliary Language Association)","Nauru","Esperanto","Khasi","Somali","mfe","Urdu","Lingala","Hausa","Interlingue; Occidental","Sanskrit","Faroese","Rundi","Ukrainian","Japanese","mo","Maori","Italian","Zulu","Uighur; Uyghur","Finnish","Macedonian","Gujarati","crs","Tonga (Tonga Islands)","Cherokee","Shona","Swati","Abkhazian","Western Frisian","Norwegian Nynorsk; Nynorsk, Norwegian","Dutch; Flemish","Sotho, Southern","Belarusian","Thai","Lao","Bashkir","zhT","Malay","Spanish; Castilian","Czech","Tsonga","Tibetan","Arabic","Dzongkha","Turkish","Slovak","Galician","Scots","Malagasy","iw","Nepali","English","Quechua","Serbian","French","Hungarian","Chichewa; Chewa; Nyanja","Albanian","Armenian","Sundanese","Kirghiz; Kyrgyz","Bengali","Venda","xxx","g?orgien","Bulgarian","Bislama","Uzbek","Hawaiian","Lithuanian","Romanian; Moldavian; Moldovan","Fijian","Luxembourgish; Letzeburgesch","Basque","jw","Bihari languages","Maltese","Yiddish","Turkmen","Tswana","Yoruba","Azerbaijani","Tamil","Manx","Kinyarwanda","Corsican","Afrikaans","Oromo","Zhuang; Chuang","Kannada","Kalaallisut; Greenlandic","Catalan; Valencian","Tagalog","Inuktitut","Kurdish","Burmese","Indonesian","Malayalam","Pushto; Pashto"};
nodes=Join[scripts,langs];

Graph[rules,VertexShapeFunction->(#->If[MemberQ[scripts,#],"Circle","Square"]&/@nodes),VertexLabels->"Name"]