Open (programovací jazyk)

Z Necyklopedie
Skočit na navigaci Skočit na vyhledávání

Open je programovací jazyk vyvinutý výzkumnou společností pro jednodušší úpravu zdrojového kódu Necyklopedie. Později se bohužel ukázalo, že tento programovací jazyk je pro Necyklopedii nepoužitelný a tak byl zveřejněn pro širší použití. Dnes se používá především pro vytváření interaktivních toalet v Číně.

Historie[editovat | editovat zdroj]

Rok 1997[editovat | editovat zdroj]

V roce 1997 bylo vedením Necykloverzity rozhodnuto, že Necyklopedie bude znovuvytvořena a budou odstraněny všechny nekvalitní články. Pro tento účel byl vyvinut jazyk Open.

Rok 1998[editovat | editovat zdroj]

Probíhá přepisování Necyklopedie...

Rok 1999[editovat | editovat zdroj]

Probíhá přepisování Necyklopedie...

Rok 2000[editovat | editovat zdroj]

Probíhá přepisování Necyklopedie...
Vedení Necykloverzity přemýšlí, jestli se na to nevysrat.

Rok 2001[editovat | editovat zdroj]

Probíhá přepisování Necyklopedie...
Vedení Necykloverzity přemýšlí, jestli se na to nevysrat.

Rok 2002[editovat | editovat zdroj]

Vedení Necykloverzity se na to vysralo.
Byl zveřejněn programovací jazyk Open.

Příklady[editovat | editovat zdroj]

Zde jsou příklady pár programů v jazyce Open:

Hello, World![editovat | editovat zdroj]

Program vypisující "Hello, World!":

class:Console = load('IO.Stdout');
Console.Print("Hello, World!");
Console.WaitChar();

Mocninátor[editovat | editovat zdroj]

Program počítací mocniny:

class:Console = load('IO.Stdout');
string:s1 = Console.Input("Zadejte základ mocniny: ");
num:a = num(s1);
string:s2 = Console.Input("Zadejte exponent: ");
num:b = num(s2);
num:c = 1;
repeat(b, {
c = c * a;
});
Console.PrintVar("Výsledek je: $$$", c);

Zdrojový kód Necyklopedie[editovat | editovat zdroj]

Probíhá kompletní přepis zdrojového kódu Necyklopedie z roku 2001.

classpack:null = load('Experimental.Webutils');
classpack:null = load('Expreimental.MySQL');
WebRedirector:redir = WebRedirector();
RedirectionDump:rdump = RedirectionDump:PasswordAuthorizationRedirectionDump();
rdump.AuthenticationUsername = 'admin';
rdump.AuthenticationPassword = 'pass123';
redir.NewRedirection(URLRedirection("$/Speciální/"), rdump);
RedirectionDump:userdump = RedirectionDump:PasswordAuthorizationRedirectionDump();
!(userdump.AuthorizationEvent){
 SQLAuthenticator:sqla = SQLAuthenticator(SQLTable("users"),SQLCommand(SQLPreparedCommand("SELECT FROM users ALL"), SQLCondition(SQLData("user") == userdump.AuthorizationUsername, SQLData("password") == userdump.AuthorizationPassword))));
 if (sqla.Valid) return true;
 return false;
}
redir.NewRedirection(URLRedirection("$/*/*?action=edit", "$/user/*"), userdump);
Počítače
Ělěktronika 666

Počítače: AcerAppleBarbie PCCMEUDellDetektor lžiElektronika 666HPIntelKlapkobřinkostrojLenovoNový JeruzalémRačunik-RTuringův strojUral 2
Hardware: Caps LockCD-RWDěrná páskaF13iPrdKompresorPaměť ROOMScroll lockŠkoda 1000MBŠkvorPaměť WOM
Software: BSODEmacsKVGRESETЛинуксMicrosoft WordMooreův zákonPoznámkový blokPřekladSvatý TučňákVálka s švábyWindowsVista
Programování: BrainfuckC SharpC++DebuggerJavaLispnOTHINGOpenOSTRAJavaPočítačová lingvistikaProgramátor obecnýVánočková architektura
Aplikace: AhE-mailEndInternetKomprese datRodné čísloTrabant AussichtDOSBoxDvě minuty nenávisti