Modul:Homokozó/Tomcsy/NOBadatok

Homokozó/Tomcsy/NOBadatok[mi ez?] • [dokumentáció: mutat, szerkeszt] • [tesztek: létrehozás]

 
local adatok = {}

--NÉVELŐK LISTA
nevelo = {
--AFRIKA
['COM'] = 'A', --Comore-szigetek
['COD'] = 'A', --Kongói Demokratikus Köztársaság
['RAU'] = 'Az', --Egyesült Arab Köztársaság
['CGO'] = 'A', --Kongói Köztársaság
['CAF'] = 'A', --Közép-afrikai Köztársaság
['SEY'] = 'A', --Seychelle-szigetek
['CPV'] = 'A', --Zöld-foki Köztársaság
--AMERIKA
['USA'] = 'Az Amerikai', --Egyesült Államok
['ISV'] = 'Az', --Amerikai Virgin-szigetek
['BAH'] = 'A', --Bahama-szigetek
['IVB'] = 'A', --Brit Virgin-szigetek
['DMA'] = 'A', --Dominikai Közösség
['DOM'] = 'A', --Dominikai Köztársaság
['AHO'] = 'A', --Holland Antillák
['CAY'] = 'A', --Kajmán-szigetek
--ÁZSIA
['UAE'] = 'Az', --Egyesült Arab Emírségek
['PHI'] = 'A', --Fülöp-szigetek
['MDV'] = 'A', --Maldív-szigetek
--EURÓPA
['EUA'] = 'Az', --Egyesült Német Csapat
['GDR'] = 'Az', --NDK
['FRG'] = 'Az', --NSZK
['SAA'] = 'A', --Saar-vidék
['URS'] = 'A', --Szovjetunió
--ÓCEÁNIA
['COK'] = 'A', --Cook-szigetek
['FIJ'] = 'A', --Fidzsi-szigetek
['MHL'] = 'A', --Marshall-szigetek
['SOL'] = 'A', --Salamon-szigetek
--EGYÉB
['EUN'] = 'Az', --Egyesített Csapat
['ZZX'] = 'A' --Nemzetközi Csapat
}
if nevelo[NOBkod] == nil then 
    nevelo =''
else
    nevelo = nevelo[NOBkod] .. ' '
end
if NOBkod == 'RSA' then if ev == 1904 or ev == 1908 then nevelo = '' -- Fokföld
    else nevelo='A ' end end -- Dél-afirkai Köztársaság
if NOBkod == 'ROC' then if ev == 1964 or ev == 1968 then nevelo = '' -- Tajvan
else nevelo='A ' end end -- Kínai Köztársaság

--TÍPUSOK
if tipuskod == 'nyári' then
    tipus = 'nyári olimpiai játékokon'
    elseif tipuskod == 'téli' then
    tipus = 'téli olimpiai játékokon'
    elseif tipuskod == 'nyári ifjúsági' then
    tipus = 'nyári ifjúsági olimpiai játékokon'
    elseif tipuskod == 'téli ifjúsági' then
    tipus = 'téli ifjúsági olimpiai játékokon'
    elseif tipuskod == 'nyári paralimpiai' then
    tipus = 'nyári paralimpiai játékokon'
    elseif tipuskod == 'téli paralimpiai' then
    tipus = 'téli paralimpiai játékokon'
    else
    tipus = 'nyári olimpiai játékokon'
end
if tipuskod == 'nyári' or tipuskod == 'téli' then
    tipus2 = 'az olimpiai játékokon'
    elseif tipuskod == 'nyári ifjúsági' or tipuskod == 'téli ifjúsági' then
    tipus2 = 'az ifjúsági olimpiai játékokon'
    elseif tipuskod == 'nyári paralimpiai' or tipuskod == 'téli paralimpiai' then
    tipus2 = 'a paralimpiai játékokon'
    else
    tipus2 = 'az olimpiai játékokon'
end

--RÉGI NOB-KÓDOK
--Holland Antillák
if NOBkod  == 'AHO' then
    if ev == 1960 then NOBkod = 'ATO' end
    if ev == 1964 then NOBkod = 'NAN' end end
--Algéria
if NOBkod  == 'ALG' then
    if ev == 1964 then NOBkod = 'AGR' end
    if ev == 1968 and tipuskod == 'nyári' then NOBkod = 'AGL' end end
--Bosznia-Hercegovina
if NOBkod  == 'BIH' and ev == 1992 then NOBkod = 'BSH' end
--Belize
if NOBkod  == 'BIZ' and (ev >= 1968 and ev <=1972) then NOBkod = 'HBR' end
--Közép-Afrikai Köztársaság
if NOBkod  == 'CAF' and ev == 1968 then NOBkod = 'AFC' end
--Kambodzsa
if NOBkod  == 'CAM' then
    if ev == 1964 then NOBkod = 'CAB' end
    if (ev >= 1972 and ev <=1976) then NOBkod = 'KHM' end end
--Csád
if NOBkod  == 'CHA' then
    if ev == 1964 then NOBkod = 'CHD' end
    if ev == 1968 then NOBkod = 'TCH' end end
--Chile
if NOBkod  == 'CHI' and ((ev == 1956 and tipuskod == 'téli')
                        or (ev == 1960 and tipuskod == 'nyári')) then NOBkod = 'CIL' end
--Elefántcsontpart
if NOBkod  == 'CIV' then
    if ev == 1964 then NOBkod = 'IVC' end
    if ev == 1968 then NOBkod = 'CML' end end
--Kongói Demokratikus Köztársaság 
if NOBkod  == 'COD' and ev == 1968 then NOBkod = 'COK' end
--Costa Rica
if NOBkod  == 'CRC' then
    if ev == 1964 then NOBkod = 'COS' end
    if ev == 1984 and tipuskod == 'téli' then NOBkod = 'CTC' end end
--Dánia
if NOBkod  == 'DEN' then
    if ((ev == 1960 and tipuskod == 'nyári')
        or (ev == 1968 and tipuskod == 'téli')) then NOBkod = 'DAN' end
    if ev == 1968 and tipuskod == 'nyári' then NOBkod = 'DIN' end end
--Salvador
if NOBkod  == 'ESA' and (ev >= 1968 and ev <=1972) then NOBkod = 'SAL' end
--Egyesült Arab Köztársaság
if NOBkod  == 'RAU' and ev == 1964 then NOBkod = 'UAR' end
--Spanyolország
if NOBkod  == 'ESP' and ((ev >= 1956 and ev <=1964)
                        or (ev == 1968 and tipuskod == 'téli')) then NOBkod = 'SPA' end
--Etiópia
if NOBkod  == 'ETH' and (ev >= 1960 or ev <=1968) then NOBkod = 'ETI' end
--Fidzsi-szigetek
if NOBkod  == 'FIJ' and ev == 1960 then NOBkod = 'FIG' end
--Nagy-Britannia
if NOBkod  == 'GBR' then
    if ((ev == 1956 and tipuskod == 'téli') or ev == 1960) then NOBkod = 'GRB' end
    if ev == 1964 then NOBkod = 'GBI' end end
--Guyana
if NOBkod  == 'GUY' then
                    if ev == 1960 then NOBkod = 'GUA' end
                    if ev == 1964 then NOBkod = 'GUI' end end
--Hongkong
if NOBkod  == 'HKG' and (ev >= 1960 and ev <=1968) then NOBkod = 'HOK' end
--Magyarország
if NOBkod  == 'HUN' and ((ev == 1956 and tipuskod == 'téli')
                            or ev == 1960) then NOBkod = 'UNG' end
--Indonézia
if NOBkod  == 'INA' and ev == 1960 then NOBkod = 'INS' end
--Irán
if NOBkod  == 'IRI' then
    if ev == 1968 and tipuskod == 'téli' then NOBkod = 'IRA' end
    if (ev == 1968 and tipuskod == 'nyári') or ev == 1976 or ev == 1988 then NOBkod = 'IRN' end end
--Irak
if NOBkod  == 'IRQ' and (ev == 1960 or ev ==1968) then NOBkod = 'IRK' end
--Izland
if NOBkod  == 'ISL' and ((ev == 1960 or ev ==1964) and tipuskod == 'téli') then NOBkod = 'ICE' end
--Japán
if NOBkod  == 'JPN' then
    if ((ev == 1956 and tipuskod == 'téli') or (ev == 1960 and tipuskod == 'nyári')) then NOBkod = 'GIA' end
    if ev == 1960 and tipuskod == 'nyári' then NOBkod = 'JAP' end end
--Dél-Korea
--Szaúd-Arábia
if NOBkod  == 'KSA' then
    if (ev == 1972 or ev == 1976) then NOBkod = 'ARS' end
    if ev == 1984 then NOBkod = 'SAU' end end
--Libanon
if NOBkod  == 'LIB' and ((ev == 1960 and tipuskod == 'téli')
                        or (ev == 1964 and tipuskod == 'nyári')) then NOBkod = 'LEB' end
--Litvánia
if NOBkod  == 'LTU' and ev == 1992 then NOBkod = 'LIT' end
--Malajzia
if NOBkod  == 'MAS' and (ev >= 1956 and ev <=1988) then NOBkod = 'MAL' end
--Mongólia
if NOBkod  == 'MGL' and ev == 1968 and tipuskod == 'téli' then NOBkod = 'MON' end
--Mianmar
if NOBkod  == 'MYA' then
    if ev >= 1948 and ev <=1988 then NOBkod = 'BIR' end -- 1964 esetén az alsó felülírja
    if ev == 1964 then NOBkod = 'BUR' end end
--Nicaragua
if NOBkod  == 'NCA' then
    if ev == 1964 then NOBkod = 'NCG' end
    if ev == 1968 then NOBkod = 'NIC' end end
--Hollandia
if NOBkod  == 'NED' and (ev >= 1900 and ev <=1988) then NOBkod = 'HOL' end
--Fülöp-szigetek
if NOBkod  == 'PHI' and (ev == 1964 or ev ==1968) then NOBkod = 'FIL' end
--Pápua Új-Guinea
if NOBkod  == 'PNG' then
    if ev == 1976 then NOBkod = 'NGY' end
    if (ev == 1980 or ev ==1984) then NOBkod = 'NGU' end end
--Puerto Rico
if NOBkod  == 'PUR' then
    if ev == 1960 then NOBkod = 'PRI' end
    if ev == 1968 then NOBkod = 'PRO' end end
--Románia
if NOBkod  == 'ROU' then
    if (ev >= 1960 and ev <=2006) then NOBkod = 'ROM' end
    if (ev == 1964 or ev ==1968) then NOBkod = 'RUM' end
end
--Dél-Afrika
if NOBkod  == 'RSA' and (ev >= 1900 and ev <=1960) then NOBkod = 'SAF' end
--Srí Lanka
if NOBkod  == 'SRI' and (ev >= 1948 and ev <=1972) then NOBkod = 'CEY' end
--Szerbia és Montenegró-->
if NOBkod  == 'SCG' and (ev == 1996 or ev ==2000) then NOBkod = 'YUG' end
--Szíria
if NOBkod  == 'SYR' and ev == 1968 then NOBkod = 'SIR' end
--Thaiföld
if NOBkod  == 'THA' and (ev == 1960 or ev ==1968) then NOBkod = 'TAI' end
--Uruguay
if NOBkod  == 'URU' and ev == 1968 then NOBkod = 'URG' end
--Vietnam
if NOBkod  == 'VIE' then
    if ev == 1964 then NOBkod = 'VET' end
    if ev >= 1968 and ev <=1976 then NOBkod = 'VNM' end end
--NOB-KÓDOK VÉGE

return adatok