Abbreviations, automatic: Difference between revisions

Line 1,580:
 
=={{header|Yabasic}}==
<lang Yabasic>
<lang Yabasic>data "Sunday Monday Tuesday Wednesday Thursday Friday Saturday"
a = open("days_of_week.txt", "r")
data "Sondag Maandag Dinsdag Woensdag Donderdag Vrydag Saterdag"
data "Ehud Segno Maksegno Erob Hamus Arbe Kedame"
data "Al_Ahad Al_Ithinin Al_Tholatha'a Al_Arbia'a Al_Kamis Al_Gomia'a Al_Sabit"
data "Guiragui Yergou_shapti Yerek_shapti Tchorek_shapti Hink_shapti Ourpat Shapat"
data "domingu llunes martes mi‚rcoles xueves vienres s badu"
data "Igande Astelehen Astearte Asteazken Ostegun Ostiral Larunbat"
data "Robi_bar Shom_bar Mongal_bar Budhh_bar BRihashpati_bar Shukro_bar Shoni_bar"
data "Nedjelja Ponedeljak Utorak Srijeda Cxetvrtak Petak Subota"
data "Disul Dilun Dimeurzh Dimerc'her Diriaou Digwener Disadorn"
data "nedelia ponedelnik vtornik sriada chetvartak petak sabota"
data "sing_kei_yaht sing_kei_yat sing_kei_yee sing_kei_saam sing_kei_sie sing_kei_ng sing_kei_luk"
data "Diumenge Dilluns Dimarts Dimecres Dijous Divendres Dissabte"
data "Dzeenkk-eh Dzeehn_kk-ehreh Dzeehn_kk-ehreh_nah_kay_dzeeneh Tah_neesee_dzeehn_neh Deehn_ghee_dzee-neh Tl-oowey_tts-el_dehlee Dzeentt-ahzee"
data "dy_Sul dy_Lun dy_Meurth dy_Mergher dy_You dy_Gwener dy_Sadorn"
data "Dimanch Lendi Madi MŠkredi Jedi Vandredi Samdi"
data "nedjelja ponedjeljak utorak srijeda cxetvrtak petak subota"
data "Sondee Mondee Tiisiday Walansedee TOOsedee Feraadee Satadee"
data "s0ndag mandag tirsdag onsdag torsdag fredag l0rdag"
data "zondag maandag dinsdag woensdag donderdag vrijdag zaterdag"
data "Diman^co Lundo Mardo Merkredo ^Ja—do Vendredo Sabato"
data "Diu_prima Diu_sequima Diu_tritima Diu_quartima Diu_quintima Diu_sextima Diu_sabbata"
data "sunnudagur m nadagur t˜sdaguy mikudagur h¢sdagur friggjadagur leygardagur"
data "Yek_Sham'beh Do_Sham'beh Seh_Sham'beh Cha'har_Sham'beh Panj_Sham'beh Jom'eh Sham'beh"
data "sunnuntai maanantai tiistai keskiviiko torsktai perjantai lauantai"
data "dimanche lundi mardi mercredi jeudi vendredi samedi"
data "Snein Moandei Tiisdei Woansdei Tonersdei Freed Sneon"
data "Domingo Segunda_feira Martes M‚rcores Joves Venres S bado"
data "k'vira orshabati samshabati otkhshabati khutshabati p'arask'evi shabati"
data "Sonntag Montag Dienstag Mittwoch Donnerstag Freitag Samstag"
data "Kiriaki' Defte'ra Tri'ti Teta'rti Pe'mpti Paraskebi' Sa'bato"
data "ravivaar somvaar mangalvaar budhvaar guruvaar shukravaar shanivaar"
data "Yom_rishon Yom_sheni Yom_shlishi Yom_revi'i Yom_chamishi Yom_shishi Shabat"
data "ravivara somavar mangalavar budhavara brahaspativar shukravara shanivar"
data "sundio lundio mardio merkurdio jovdio venerdio saturdio"
data "Minggu Senin Selasa Rabu Kamis Jumat Sabtu"
data "Dominica Lunedi Martedi Mercuridi Jovedi Venerdi Sabbato"
data "D‚_Domhnaigh D‚_Luain D‚_M irt D‚_Ceadaoin D‚_ardaoin D‚_hAoine D‚_Sathairn"
data "Nichiyou_bi Getzuyou_bi Kayou_bi Suiyou_bi Mokuyou_bi Kin'you_bi Doyou_bi"
data "Il-yo-il Wol-yo-il Hwa-yo-il Su-yo-il Mok-yo-il Kum-yo-il To-yo-il"
data "Dies_Dominica Dies_Lun‘ Dies_Martis Dies_Mercurii Dies_Iovis Dies_Veneris Dies_Saturni"
data "sve-tdien pirmdien otrdien tresvdien ceturtdien piektdien sestdien"
data "Wangu Kazooba Walumbe Mukasa Kiwanuka Nnagawonye Wamunyi"
data "Jedoonee Jelune Jemayrt Jecrean Jardaim Jeheiney Jesam"
data "Jabot Manre Juje Wonje Taije Balaire Jarere"
data "Ahad Isnin Selasa Rabu Khamis Jumaat Sabtu"
data "síndag mandag tirsdag onsdag torsdag fredag lírdag"
data "djadomingo djaluna djamars djarason djaweps djabiŠrna djasabra"
data "Niedziela Poniedzial/ek Wtorek S,roda Czwartek Pia,tek Sobota"
data "Domingo Lunes Martes Miercoles Jueves Viernes Sabado"
data "voskresenie ponedelnik vtornik sreda chetverg pyatnitsa subbota"
data "nedjelja ponedjeljak utorak sreda cxetvrtak petak subota"
data "Sontaha Mmantaha Labobedi Laboraro Labone Labohlano Moqebelo"
data "Iridha- Sandhudha- Anga.haruwa-dha- Badha-dha- Brahaspa.thindha- Sikura-dha- Sena.sura-dha-"
data "nedel^a pondelok utorok streda s^tvrtok piatok sobota"
data "Nedelja Ponedeljek Torek Sreda Cxetrtek Petek Sobota"
data "domingo lunes martes miercoles jueves viernes sabado"
data "sonde mundey tude-wroko dride-wroko fode-wroko freyda Saturday"
data "Jumapili Jumatatu Jumanne Jumatano Alhamisi Ijumaa Jumamosi"
data "Linggo Lunes Martes Miyerkoles Huwebes Biyernes Sabado"
data "wan-ar-tit wan-tjan wan-ang-kaan wan-phoet wan-pha-ru-hat-sa-boh-die wan-sook wan-sao"
data "Tshipi Mosupologo Labobedi Laboraro Labone Labotlhano Matlhatso"
data "Pazar Pazartesi Sali €ar,samba Per,sembe Cuma Cumartesi"
data "nedilya ponedilok vivtorok sereda chetver pyatnytsya subota"
data "dydd_Sul dyds_Llun dydd_Mawrth dyds_Mercher dydd_Iau dydd_Gwener dyds_Sadwrn"
data "Dibeer Altine Talaata Allarba Al_xebes Aljuma Gaaw"
data "iCawa uMvulo uLwesibini uLwesithathu uLuwesine uLwesihlanu uMgqibelo"
data "zuntik montik dinstik mitvokh donershtik fraytik shabes"
data "iSonto uMsombuluko uLwesibili uLwesithathu uLwesine uLwesihlanu uMgqibelo"
data "Dies_Dominica Dies_Lun‘ Dies_Martis Dies_Mercurii Dies_Iovis Dies_Veneris Dies_Saturni"
data "Sun Moon Mars Mercury Jove Venus Saturn"
data "zondag maandag dinsdag woensdag donderdag vrijdag zaterdag"
data "KoseEraa GyoOraa BenEraa Kuoraa YOwaaraa FeEraa Memenaa"
data "Sonntag Montag Dienstag Mittwoch Donnerstag Freitag Sonnabend"
data "Domingo Luns Terza_feira Corta_feira Xoves Venres S bado"
data "Dies_Solis Dies_Lunae Dies_Martis Dies_Mercurii Dies_Iovis Dies_Veneris Dies_Sabbatum"
data "Killachau Atichau Quoyllurchau Illapachau Chaskachau Kuychichau Intichau"
data ""
 
while(not eof(#a))
line input #a s$
if s$ <> "" then print buscar(s$), " ", s$ else break end if
wend
 
close #a
do
read s$
if s$ <> "" then print buscar(s$), " ", s$ else break end if
loop
 
sub buscar(s$)
672

edits