Jsem něco našel, co to asi je?

Kousek kódu, opisuju:

1045 GO SUB 1060
1050 GO TO 1000
1060 PRINT AT 20,10; "DALSI(A/N)?"
1070 IF INKEY$="" OR INKEY$=CHR$ 13 THEN GO TO 1070
1080 IF INKEY$="N" OR INKEY$="n" THEN GO TO 100
1090 RETURN
2000 CLS
2010 PRINT AT 3,20; "C)ESKY"
2020 PRINT AT 4,20; "N)EMECKY"

Kdo je tady pamětník, co to je?

Jsou zobrazeny jen nové odpovědi. Zobrazit všechny

Předmět	Autor	Datum
Hehe, samozřejmě, že je to jen kousek, při představě, že bych těch asi šedesát(?) řádků opisoval na… Zarniwúp 14.12.2014 21:19	Zarniwúp	14.12.2014 21:19
To je ještě prd. Jednou jsme opisovali program, kde většina jeho kódu byla tvořena souřadnicemi mapy… Wikan 14.12.2014 21:28	Wikan	14.12.2014 21:28
To byl stroják ne? Ten jsem nikdy nepochopil:.( jezekhifi 14.12.2014 21:41	jezekhifi	14.12.2014 21:41
Ne ne, normální kód v Basicu, ale byla tam spousta řádků "DATA". Wikan 14.12.2014 21:45	Wikan	14.12.2014 21:45
Aha.:-D jezekhifi 14.12.2014 21:46	jezekhifi	14.12.2014 21:46
Ale pokud jde o stroják, tak v tom jsem taky nedělal, ale k Assembleru jsem přičichnul. I když jenom… poslední Wikan 14.12.2014 22:04	Wikan	14.12.2014 22:04

Hehe, samozřejmě, že je to jen kousek, při představě, že bych těch asi šedesát(?) řádků opisoval na mě jdou mrákoty.
Jestli v Abc mladých techniků č.19 z roku 1989 nekecaj, tak je to "Program pro učení cizích slovíček" a dóle na stránce je napsáno Sinclair ZX Spectrum.

To je ještě prd. Jednou jsme opisovali program, kde většina jeho kódu byla tvořena souřadnicemi mapy Československa. Takže většina kódu byla pouze čísla.