STAV start: CALL reload PRINT "Hrozné probuzení a ještě horší den..." PRINT "Musíš totiž do školy :-) a venku sněží, prší. Je tam ještě tma a také hrozná" PRINT "zima." PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Zůstaneš ležet PRECHOD_TEXT 2 - Půjdeš do školy VSTUP PRECHOD_SECRET zima - sneholi PRECHOD_SECRET ZIMA - sneholi PRECHOD_SECRET Zima - sneholi PRECHOD 1 - lezet PRECHOD 2 - skola GOTO start STAV sneholi: CALL reload PRINT "Sněholí" PRINT "Sněží, sněží, sněží a čas běží. A jak běží? Pomalu. A proč běží pomalu? Pro-" PRINT "tože je leden. Leden? Krutá zima. A co je to leden? Mražená voda padá na zem," PRINT "aby si odpočinula od dlouhého putování oblohou a aby oddálila přichod krásné-" PRINT "ho a očekávaného jara, které bude vystřídáno létem. To je ta zima tak hrozná?" PRINT "Ano je. A proč? Bílá, pesimisticka, smutná, povánoční doba, která se na nás" PRINT "mračí ze všech stran. Drží se zuby nehty za okraje silnice, za střechy domů" PRINT "a za kapoty všech jezdítek. Člověk se těší na teplé počasí, plánuje co všech-" PRINT "no bude dělat. Bude chodit ven, do školy půjde ráno v tričku, a ne v zimní" PRINT "bundě, svetru a čepici, nuceně naražené na kebuli. Bude potkávat spousty" PRINT "krásných dívek, oblečených do toho, v čem se líbí příslušníkům pohlaví s opač-" PRINT "nými chromozony a bude na ně volat ádie a helou. A ony s úsměvem neodpoví," PRINT "protože jim to přidá na sebevědomí. I když pravda, ubere na oblíbennosti." PRINT "A bude potkávat lidi, které dlouho neviděl. A nepozdraví je. Protože jsou to ¨" PRINT "lidi, které moc nezná. Potká lidi, které chce potkat, těm řekne, zdar kamarádi," PRINT "co jste tak dlohou dělali a jak se máte? Zapomene se jich zeptat, zda by neš-" PRINT "li na skleničku do klubu. A oni mu proto nebudou moci odpovědět, že nemají" PRINT "čas a že o něj nestojí, nebudou mu moct říct, že jsou pokrytečtí sobci, že" PRINT "jsou přetvařujícími se egoisty s dvojí tváří. Ale takovej svět už je. Ve ško-" PRINT "le říkali, nic není jenom černé a nic není jenom bílé. A doma povídali, že" PRINT "jednou si dole a jednou nahoře. A v jedné pisničce se zpívá, že žádná bouřka" PRINT PAUSE CALL reload PRINT "věčně netrvá. A i já přiznám, že jsem chvilkový egoista." PRINT "Ale, to je asi každý člověk. Většina populace světa. Každý dokáže, lhát," PRINT "nenávidět i ublížit. A každý člověk dokáže pocítit bolest, strach a úzkost." PRINT "Můžou být vyjímky, ale nikoho takového jsem nepotkal. Proč je zima tak dlou-" PRINT "há? Protože je nudná. A co je nudné, to se táhne. Táhne se to jako štrůdl," PRINT "jako hadice, bez konce, která čeká na zásah, něčeho co jí přeruší. To něco" PRINT "je jaro. A kde je jaro? Jaro se ukrývá v nám nepřístupné krajině. Kde si v" PRINT "klidu užívá, léta. Jenže pak přijde podzim a zima. A jaro v zimě odlétá do" PRINT "našich krajin, aby nás obšťastnilo. A vystřídalo, zlou hnusnou a zkaženou" PRINT "zimu. Může být zima krásná? Ano zima krásná byla, když jsem byl malý a když" PRINT "si se mnou hrála a já si hrál s ní. Když jsem jí nabíral do dlaní a házel po" PRINT "kamarádech. Kdy jsem na saních sjížděl díky ní zmrzlé schody. Ale teď jí" PRINT "nesnáším. Lásky minulého roku v ní odchází pryč a já čekám na nové. Které se" PRINT "zaručeně objeví. Jak si seš tak jistý? Odpovím ti takhle, mé vědomí a svědomí" PRINT "- jistý si nejsi, ale doufám. A čekám. Uplynulý rok je pryč? A já vyhazuji" PRINT "klíč od dávna a minulosti. Co bylo, bylo.. Co bude, na to se těším." PRINT "" PRINT "David Havlíček (dhm@centrum.cz)" PRINT PAUSE GOTO start STAV lezet: CALL reload PRINT "To přece nejde, ležet takhle v posteli. Když je venku tak krásné počasí..." PRINT "Navíc dneska je to úplně pohodový den - čtvrtletka z matiky, diktát a ještě" PRINT "nějaké písemky. Měl by si jít..." PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Zůstaneš ležet PRECHOD_TEXT 2 - Půjdeš do školy VSTUP PRECHOD 1 - lezet PRECHOD 2 - skola GOTO lezet STAV skola: CALL reload PRINT "Vylezl si z vyhřáté postele. Je ti trochu zima, protože v pokoji si netopil." PRINT "Ale není to tak zlé, pokojový teploměr ukazuje necelých -15°" PRINT "Raději si se oblékl, vyčistil si zuby pilníkem a vydal ses k autobusové" PRINT "zastávce s aktovkou, která připomínala parní kotel." PRINT PAUSE STAV zastavka: CALL reload PRINT "Stojíš na zastávce, kolem tebe mnoho lidí, ale skoro nikoho z nich neznáš." PRINT "Autobus nejede a nejede. Nejspíše uvízl někde na cestě, to se tu občas stá-" PRINT "vá." IFNOTVISITED skocka PRINT " Na silnici leží přejetá kočka s vyteklým mozkem a vesele se na tebe usmívá." PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Jít do školy pěšky IFNONEVISITED ahojjakarel zdartebenevidel jezisjakzijes PRECHOD_TEXT 2 - Oslovit dívku stojící vedle tebe PRECHOD_TEXT_SMAZAT 3 - Sebrat přejetou kočku VSTUP PRECHOD 1 - pesky PRECHOD 2 - divka1 PRECHOD 3 - skocka GOTO zastavka STAV skocka: CALL reload PRINT "Sebral si přejetou kočku + vyteklý mozek a vložil si jí do postraní kapsy" PRINT "svojí bundy." PRINT PAUSE GOTO zastavka STAV divka1: CALL reload PRINT "Vedle tebe stojí krásná, i když mrazem obtěžovaná dívka, ještě si jí tu nikdy" PRINT "neviděl." PRINT "" PRINT "Jak ji oslovíš?" PRECHOD_TEXT 1 - Ahoj, já jsem Čeněk.. ♥ PRECHOD_TEXT 2 - Zdar, tebe sem tu ještě neviděl ♥ PRECHOD_TEXT 3 - Jéžiš nazdar, jak žijéš ??? :-) ♥ PRECHOD_TEXT 4 - Seru na ňu VSTUP PRECHOD 1 - ahojjakarel PRECHOD 2 - zdartebenevidel PRECHOD 3 - jezisjakzijes PRECHOD 4 - zastavka GOTO divka1 STAV ahojjakarel: CALL reload PRINT "- Ahoj, já jsem Čeněk... začal si." PRINT "A ona na to: Co chceš ty debile, já jsem Božena a taky to všude nežvejkám.." PRINT "Pak se otočila na podpadku a odkráčela k přijíždějícímu taxíku." PRINT PAUSE GOTO zastavka STAV zdartebenevidel: CALL reload PRINT "- Zdar, tebe sem tu ještě neviděl... začal si." PRINT "To bude tim, že nejsem zdejší domorodec. Já sem tady byla jen u kámošky.." PRINT "Pak se otočila na podpadku a odkráčela k přijíždějícímu taxíku." PRINT PAUSE GOTO zastavka STAV jezisjakzijes: CALL reload PRINT "- Jéžiš, nazdar jak žijéš? začal si" PRINT "Otočila se (_)(_) , prohlédla si tě a pravila: Ale já tě neznám ?!?" PRINT "- Já tě taky ne, to je můj způsob balení. " PRINT "Tak si běž balit svojí mámu.." PRINT PRINT "Pak se otočila na podpadku a odkráčela k přijíždějícímu taxíku." PRINT PAUSE GOTO zastavka STAV pesky: CALL reload PRINT "Vydal si se přes pole do školy..." PRINT "Jdeš, studený vítr ti fouká do obličeje a sníh tě nemilosrdně bičuje, aby" PRINT "ti stížil už tak dost hnusnou cestu do školy. Jdeš, ničeho si nevšímáš. Z" PRINT "míry tě nevyvedl ani vodník sedící na vrbě.. Ba dokonce ani ufo odléta- " PRINT "jící z nedalekého lesa. Nebo Pamela Anderson, která kolem tebe prošla a " PRINT "pozdravila tě tvým křestním jménem." PRINT PAUSE CALL reload STAV pesky2: CALL reload PRINT "Stojíš před 200let starou školou. Vyučování už začalo, přišel si pozdě." PRINT "" PRINT "Co uděláš?" PRECHOD_TEXT 1 - Půjdeš do školy PRECHOD_TEXT 2 - Půjdeš za školu VSTUP PRECHOD 1 - doskoly PRECHOD 2 - zaskolu GOTO pesky2 STAV zaskolu: CALL reload PRINT "To přece nejde, nejít do školy. Dneska je to úplně pohodový den - čtvrtletka " PRINT "z matiky, diktát a ještě nějaké písemky. Měl by si jít..." PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Půjdeš do školy PRECHOD_TEXT 2 - Půjdeš do školyNEWLINENEWLINEA nebo, pokud chceš něco extra: PRECHOD_TEXT 3 - Půjdeš do školy VSTUP PRECHOD 1 - doskoly PRECHOD 2 - doskoly PRECHOD 3 - doskoly GOTO zaskolu STAV doskoly: CALL reload PRINT "Vešel si do školy. Mráz proběhl celým tvým tělem, začalo tě bolet břicho" PRINT "a trochu hlava. Není to nic neobvyklého - je to klasický pocit žáka této" PRINT "základní školy, řekl sis, a vydal si se do své třídy." PRINT PAUSE STAV trida: CALL reload PRINT "Přišel si do třídy. U katedry sedí asi 250letá čarodějnice vyučující příroďák." PRINT "Vypadá jak čejen ve výslužbě a má na tebe dost záludnou otázku. Ta otázka zní:" PRINT " Proč jdeš pozdě ?!?" PRINT PRINT "Co odpovíš ?" PRECHOD_TEXT 1 - Unesli mě ufouni a chtěli po mě, abych řekl svému vládci, že... PRECHOD_TEXT 2 - Potkal jsem Pamelu Andersonovou a ona mi.. PRECHOD_TEXT 3 - Egh, ups, kde to jsem ? Jak se jmenuju? Pomoc, jsou všude kolem nás! VSTUP PRECHOD 1 - ufouni PRECHOD 2 - pamela PRECHOD 3 - eghkde GOTO trida STAV ufouni: CALL reload PRINT "- Já jdu pozdě, protože mě unesli ufouni.. pravil si" PRINT "Jó? zeptala se nedůveřivě paní učitelka" PRINT "- Řekli mi, že mám sdělit našemu vládci, že jsme ve velkém nebezpečí." PRINT PRINT "Přestaň si vymejšlet, máš neomluvenou hodinu. Všichni přece víme, že" PRINT "ufouni neumí mluvit.. " PRINT PAUSE GOTO cekat STAV cekat: CALL reload PRINT "Snažil ses bránit.. ale učitelka byla neoblomná. Tak sis sedl a čekal na" PRINT "přestávku." PRINT PAUSE CALL reload GOTO prestavka STAV pamela: CALL reload PRINT "- Já jdu pozdě, protože jsem potkal Pamelu Andersonovou a ona mě uhranula.." PRINT "Jó? A nepotal si náhodou Michaela Jacksona? zeptala se mě učitelka, která" PRINT "měla značnou nedůvěru k mým výmluvám." PRINT "- Nó, taky.. řekl jsem." PRINT PRINT "Přestaň si vymejšlet, máš neomluvenou hodinu. Navíc ti píšu poznámku," PRINT "protože seš drzej jak lázeňská veverka. Parchante!" PRINT PAUSE GOTO cekat STAV eghkde: CALL reload PRINT "Egh, ups, kde to jsem ? Jak se jmenuju? Pomoc, jsou všude kolem nás!" PRINT "..." PRINT "Učitelka si chvilku myslela, že si se zbláznil." PRINT "Pak se ale vzpamatovala, poznala totiž tvůj pokus o únik před poznámkou." PRINT "Napsala ti do třídnice pozdní příchod a seřvala tě tak, že si přestal " PRINT "slyšet na pravé ucho." PRINT PAUSE GOTO cekat STAV prestavka: CALL reload BEEP PRINT "Zazvonilo na přestávku.." PRINT "" PRINT "Učitelka nastartovala své koště a odlétla ze třídy." PRINT "Konečně pohoda a úleva." PRINT PAUSE STAV prestavka2: CALL reload PRINT "Ve třídě začala přestávka, vzadu spolužáci hrají fotbal, spolužačky" PRINT "si povídají o tom, co včera zažily v klubu a kolik tam zbalily kluků." PRINT "Joini sprejem kreslí na zeď a Honza vystrčil hlavu ven z okna, aby si" PRINT "zakouřil. Protože na školním pozemku se kouřit nesmí a když vystrčí" PRINT "hlavu ven, nachází se mimo školní pozemek." PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Půjdeš okouknout záchody PRECHOD_TEXT 2 - Zahraješ si sirky s Putovákem IFVISITED skocka PRECHOD_TEXT_SMAZAT 3 - Daruješ přejetou kočku své neoblíbené spolužačce Lence VSTUP PRECHOD 1 - hajzly PRECHOD 2 - hodina2 PRECHOD 3 - datkocku GOTO prestavka2 STAV hajzly: CALL reload PRINT "Nacházíš se na WC, cítíš vůni moči a zápach osvěžovače vzduchu nacházejícího se" PRINT "na okně. Nikdo tu není. Pokud nepočítaš feťaky v kabince, krysu v mušli a" PRINT "slupku od banánu na podlaze. " PRINT PRINT "Co uděláš?" PRECHOD_TEXT_SMAZAT 1 - Vymočíš se PRECHOD_TEXT_SMAZAT 2 - Zapálíš si cigáro PRECHOD_TEXT 3 - Půjdeš zpět do třídy VSTUP PRECHOD 1 - mocit PRECHOD 2 - cigo PRECHOD 3 - hodina2 GOTO hajzly STAV mocit: CALL reload PRINT "Vymočil si se.. to je úleva." PRINT PAUSE GOTO hajzly STAV cigo: CALL reload PRINT "Zapálil sis cigaretu.. přestala se ti klepat ruka a přestal tě bolet žaludek." PRINT "" PAUSE CALL reload PRINT PRINT PRINT "Hotovo, dokouřil si cigáro a vajgl si típl o přicházejícího prvňáčka.." PRINT "" PAUSE GOTO hajzly STAV datkocku: CALL reload PRINT "Lenko, mám pro tebe dárek..." PRINT "- Joóó? " PRINT "Tady, natrhal jsem ti kočičky.." PRINT "- Ááááááááá, ty si hnúsnej!!" PRINT "" PRINT PAUSE GOTO prestavka2 STAV hodina2: CALL reload BEEP PRINT "Zazvonilo na hodinu..." PRINT "A ne tak na ledajakou, zazvonilo na hodinu matematiky.." PRINT "Místo vašeho učitele však vkročila do třídy krásná mladá slečna, která vám" PRINT "sdělila, že jí máte na supl a že čtvrtletku budete psát až příští týden." PRINT "" PRINT "Co uděláš?" PRECHOD_TEXT_SMAZAT 1 - Budeš svlékat slečnu učitelnici pohledem PRECHOD_TEXT 2 - Pokusíš se spát PRECHOD_TEXT 3 - Budeš dělat, že něco děláš VSTUP PRECHOD 1 - svlekat PRECHOD 2 - spat PRECHOD 3 - delat GOTO hodina2 STAV svlekat: CALL reload PRINT "Podíval si se na učitelku a začal ji svlékat pohledem. Je fakt dost pěkná." PRINT "Všimla si toho a zeptala se tě proč se na ní tak díváš." PRINT PRINT "Co jí odpovíš" PRECHOD_TEXT 1 - Ale dívám se, jakou máme krásnou tabuli, nedívám se na vás... PRECHOD_TEXT 2 - Já jenom, že už sem Vás někde viděl PRECHOD_TEXT 3 - Hrozně se mi líbíte, tak se na vás dívám (to se může, né?) VSTUP PRECHOD 1 - divamnatab PRECHOD 2 - javidel PRECHOD 3 - hroznesemilibite GOTO svlekat STAV divamnatab: CALL reload PRINT "Ale dívám se, jakou máme krásnou tabuli, nedívám se na vás... pravil si" PRINT "- No, to si mě teda moc nepotěšil. Já myslela, že se díváš na mě, ale" PRINT " nic proti gustu, někomu se líbí holky, někomu kluci.. a někomu tabule." PRINT PRINT "Grr, takhle se ztrapnit před spolužáky. " PRINT PAUSE GOTO hodina22 STAV javidel: CALL reload PRINT "Já jenom, že už sem Vás někde viděl.." PRINT "- No určitě, já tě taky - když si mě polil Spritem u MC Donalda.." PRINT PRINT "Grr, takhle se ztrapnit před spolužáky. " PRINT PAUSE GOTO hodina22 STAV hroznesemilibite: CALL reload PRINT "Hrozně se mi líbíte, tak se na vás dívám (to se může, né?)..." PRINT "- Může, ale nečum na mě jak na svatej obrázek a raději něco dělej." PRINT PAUSE GOTO hodina22 STAV hodina22: CALL reload PRINT "U katedry sedí krásná mladá slečna suplující matematiku.." PRINT "" PRINT "Co uděláš?" PRECHOD_TEXT_SMAZAT 1 - Budeš svlékat slečnu učitelnici pohledem PRECHOD_TEXT 2 - Pokusíš se spát PRECHOD_TEXT 3 - Budeš dělat, že něco děláš VSTUP PRECHOD 1 - svlekat PRECHOD 2 - spat PRECHOD 3 - delat GOTO hodina22 STAV spat: CALL reload PRINT "Lehl si, usnul si.." PRINT PAUSE GOTO vprestavka STAV delat: CALL reload PRINT "Dělal si, že něco děláš a při tom si usnul." PRINT PAUSE GOTO vprestavka STAV vprestavka: CALL reload BEEP PRINT "Zazvonilo a začala druhá - velká přestávka. Zvonek tě probudil ze spánku" PRINT "a ty si se probral v náručí jedné ze svých spolužaček. Lépe řečeno, v ná-" PRINT "ručí jedné krásné spolužačky, která udivovala celou školu svými nádhernými" PRINT "tvary. " PRINT PRINT "Co řekneš?" PRECHOD_TEXT 1 - Egh, sorry! PRECHOD_TEXT 2 - V tvém náručí se dost dobře spí PRECHOD_TEXT 3 - Tak to je fakt krásnej sen PRECHOD_TEXT 4 - Promiň, já jsem myslel, že spim na lavici.. VSTUP PRECHOD 1 - eghsory PRECHOD 2 - vtvemnaruci PRECHOD 3 - taktojefakt PRECHOD 4 - prkno GOTO vprestavka STAV eghsory: CALL reload PRINT "Egh, sorry! vyřkl si" PRINT "- Neomlouvej se, bylo mi blbý nechat tě ležet na lavici.. tak jsem.. tě to.." PRINT " a ty ses probral." PRINT "No, jasně.. mě to nevadí, celkem se mi to líbilo. Řekl si s usměvem" PRINT PAUSE GOTO pozvat STAV vtvemnaruci: CALL reload PRINT "V tvém náručí se dost dobře spí.. vyřkl si" PRINT "- Tak si to můžeme někdy zopakovat.. pravila kráska" PRINT "To bych rád.. řekl si s usměvem a ona tě políbila." PRINT PRINT "Evidentně ses jí zalíbil. ♥" PRINT "Holky přece nelíbaj kluky jenom tak." PRINT "A zvlášť ne ve škole... všem na očích." PRINT PAUSE GOTO pozvat STAV taktojefakt: CALL reload PRINT "Tak to je fakt krásnej sen.. vyřkl si" PRINT "- Políbila tě a řekla: ¨To neni sen. Bylo mi blbý nechat tě" PRINT " ležet na lavici.. tak jsem.. tě to.. a ty ses probral.¨" PRINT "No, jasně.. mě to nevadí, celkem se mi to líbilo. Řekl si s usměvem" PRINT PRINT "Evidentně ses jí zalíbil. ♥" PRINT "Holky přece nelíbaj kluky jenom tak." PRINT "A zvlášť ne ve škole... všem na očích." PRINT PAUSE GOTO pozvat STAV prkno: CALL reload PRINT "Promiň, já jsem myslel, že spim na lavici.. vyřkl si" PRINT "- To jako, že jsem ti připomínala lavici, jo? řekla dívka lehce rozladěným tónem" PRINT "Samozřejmě že ne, dělal sem si srandu, byla si dost příjemná:-) řekl si jí" PRINT "- Tak si to můžeme někdy zopakovat.. pravila kráska" PRINT "To bych rád.. řekl si s usměvem a ona tě políbila." PRINT PRINT "Evidentně ses jí zalíbil. ♥" PRINT "Holky přece nelíbaj kluky jenom tak." PRINT "A zvlášť ne ve škole... všem na očích." PRINT PAUSE GOTO pozvat STAV pozvat: CALL reload BEZODPOVEDI l PRINT "Krásná dívka sedí naproti tobě a evidentně si chce povídat.." GOTO v STAV l: PRINT "Protože nastal čas, říct něco pořádného, je tu jen jedna možnost..." STAV v: PRINT PRINT "Co jí řekneš?" PRECHOD_TEXT_SMAZAT 1 - Už jsem ti řekl, že mi připomínáš meloun PRECHOD_TEXT_SMAZAT 2 - Máš dneska odpoledne čas ? PRECHOD_TEXT_SMAZAT 3 - Víš, že seš nejhezčí holka na škole PRECHOD_TEXT_SMAZAT 4 - Víš, že hexadekan je uhlovodík? PRECHOD_TEXT_SMAZAT 5 - Dneska ráno mě unesli ufouni PRECHOD_TEXT_SMAZAT 6 - Víš, že naše učitelka biologie znásilnila školníka.. VSTUP PRECHOD 1 - meloun PRECHOD 2 - mascas PRECHOD 3 - nejh PRECHOD 4 - hexadek PRECHOD 5 - ufouni2 PRECHOD 6 - zemskol GOTO pozvat STAV meloun: CALL reload PRINT "¨Víš, že mi připomínáš meloun...¨ vyhrkl si ze sebe." PRINT " - Cože, meloun? zeptala se udiveně." PRINT "¨No jasně, seš tak sladká..¨ pravil si" PRINT "- Díky, ale na to mě fakt nesbalíš.. řekla " PRINT "Připadal sis trapně, proč si s tim jen začínal? A tak si dodal:" PRINT "Ale ne, fakt seš dost perfektní holka, vem si, která jiná by mě tady" PRINT "ve třídě zařídila takové krásné probuzení v náručí." PRINT "- Říkám, klidně si to můžem zopakovat.. řekla a pousmála se." PRINT PAUSE GOTO pozvat STAV ufouni2: CALL reload PRINT " ¨Dneska ráno mě unesli ufouni... proto jsem přišel pozdě.¨ řekl si" PRINT "- Já ti věřim, mě taky unesli ufouni, před tejdnem... řekla na to dívka." PRINT " ¨Pitvali mě a dávali mi elektrošuky.¨ dodal si" PRINT "- No, předemnou se jeden dokonce svlíkl.. pravila ta kráska" PRINT " ¨Dělám si srandu - zvolíme jiný téma.¨" PRINT "- Hm.." PRINT PAUSE GOTO pozvat STAV nejh: CALL reload PRINT " ¨Víš, že seš nejhezčí na škole.¨ položil si otázku" PRINT " - ¨No vim... ale stejně díky.¨ odpověděla ti" PRINT PAUSE GOTO pozvat STAV hexadek: CALL reload PRINT " ¨Víš, že hexadekan je uhlovodík?¨ řekl si" PRINT " - Taky si myslim, že je ta učitelka chemie divná.. odpověděla ti" PRINT PAUSE GOTO pozvat STAV zemskol: CALL reload PRINT " ¨Víš, že naše učitelka biologie znásilnila školníka ?¨ řekl si" PRINT " - ¨Chudák, takovou smrt si nezasloužil...¨ namítla" PRINT PRINT PAUSE GOTO pozvat STAV mascas: CALL reload PRINT " ¨Máš dneska odpoledne čas?¨ pravil si" PRINT "- ¨Mám takovej pocit, že mě chceš pozvat na rande.¨ řekla dívka, která prokoukla" PRINT " tvůj záměr" PRINT " ¨Tak já se v pět stavim.¨" PRINT "- ¨A co chceš jako dělat?¨ zeptala se" PRINT " ¨Co třeba diskotéka v klubu? namítl si" PRINT "- ¨Hm, tak já ti zavolám.¨ " PRINT PRINT "Potom vytáhla mobil a zeptala se na tvé číslo a ty si jí ho samozřejmě dal." PRINT PAUSE CALL reload PRINT "Podívala se na hodinky a řekla že teď jde za doktorem." PRINT "Poté odešla a ty si se rozhodl dobře strávit zbytek přestávky." PRINT PAUSE STAV vprestavka2: CALL reload PRINT "Velká přestávka je v plném proudu a hladoví spolužáci se cpou svými svačinami." PRINT "" PRINT "Co uděláš?" PRECHOD_TEXT 1 - Půjdeš se podívat na nástěnku PRECHOD_TEXT 2 - Půjdeš pokecat s kamarády PRECHOD_TEXT 3 - Podíváš se na svůj mobil PRECHOD_TEXT 4 - Půjdeš se projít po chodbě VSTUP PRECHOD 1 - nastenka PRECHOD 2 - kamaradi PRECHOD 3 - mobil PRECHOD 4 - chodba GOTO vprestavka2 STAV nastenka: CALL reload PRINT "Stojíš před červenou nástěnkou, která pochází z dob hluboké totality.." PRINT "Na nástěnce je několik plakátů a nápis Škola vola." PRINT PAUSE GOTO hodina3 STAV kamaradi: CALL reload PRINT "Přišel sis pokecat za svými kamarády.." PRINT "A jeden z nich na to.. zdar vole, jak žiješ.." PRINT PRINT "Co řekneš?" PRECHOD_TEXT 1 - Ty vado, perfektní, lepší už to ani nemůže být. PRECHOD_TEXT 2 - Píčo, docela dobře.. PRECHOD_TEXT 3 - Ale, ujde to.. PRECHOD_TEXT 4 - Ach jo, hrůza.. radši se neptej VSTUP PRECHOD 1 - vado PRECHOD 2 - pico PRECHOD 3 - ujde PRECHOD 4 - achjo GOTO kamaradi STAV vado: CALL reload PRINT "¨Ty vado, perfektní, lepší už to ani nemůže být.¨ řekl si" PRINT "- ¨To máš dobrý.¨ řekl jeden z nich, ty ses usmál a odešel si." PRINT "" PAUSE GOTO hodina3 STAV pico: CALL reload PRINT "¨Píčo, docela dobře..¨ řekl si" PRINT "- ¨To máš dobrý.¨ řekl jeden z nich, ty ses usmál a odešel si." PRINT "" PAUSE GOTO hodina3 STAV ujde: CALL reload PRINT "¨Ale, ujde to....¨ řekl si" PRINT "- ¨To máš dobrý.¨ řekl jeden z nich, ty ses usmál a odešel si." PRINT "" PAUSE GOTO hodina3 STAV achjo: CALL reload PRINT "¨Ach jo, hrůza.. radši se neptej....¨ řekl si (aby je to potěšilo)" PRINT "- ¨To máš blbý.¨ řekl jeden z nich. Ty ses usmál a odešel si." PRINT "" PAUSE GOTO hodina3 STAV mobil: CALL reload PRINT "Podíval si se na mobil, kde blikal nápis že ti přišla SMSka" PRINT "" PRINT "Otevřel si zprávu a zjistil, že Ti píše dívka, kterou si před chvílí pozval na" PRINT "rande. Stálo tam.. Ahoj, těším se na večer :-)" PRINT "" PAUSE GOTO hodina3 STAV chodba: CALL reload PRINT "Šel si se projít po chodbě.. nic zvláštního se tam ale neděje." PRINT "Děcka tam kouří, honí se, prodávají si taháky.. před sborovnou se objímá něja-" PRINT "ký kluk se svojí dívkou a za oknem letí kosmický koráb. Fakt nic zvláštního." PRINT "" PAUSE GOTO hodina3 STAV hodina3: CALL reload PRINT "Blíží se 3.hodina - informatika.. měl by ses přestěhovat do učebny." PRINT "" PRINT "Co uděláš?" PRECHOD_TEXT 1 - Půjdeš do učebny informatiky PRECHOD_TEXT 2 - Zůstaneš ve třídě a schrupneš si VSTUP PRECHOD 1 - informa PRECHOD 2 - lezetvrt GOTO hodina3 STAV lezetvrt: CALL reload PRINT "Všichni se přestěhovali do učebny, jen ty si zůstal ležet ve třídě." PRINT "Skoro by se ti povedlo usnout, kdyby si pro tebe nepřišel učitel informatiky" PRINT "a neodtáhl tě na svojí hodinu. Nadával si, bránil ses, ale marně... diktátor" PRINT "byl silnější." PRINT "" PAUSE STAV informa: CALL reload PRINT "Sedíš na hodině informatiky a máš dělat nějakou tabulku. Logicky tě to ale" PRINT "nebaví, nudíš se." PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Zformátuješ harddisk PRECHOD_TEXT 2 - Zahraješ si Dooma PRECHOD_TEXT 3 - Zablokuješ BIOS VSTUP PRECHOD 1 - hard PRECHOD 2 - doom PRECHOD 3 - biso GOTO informa STAV doom: CALL reload PRINT "Rozhodl ses, že si zahraješ Dooma.. a spustil sis ho. " PRINT "" PAUSE CALL reload PRINT "================= =============== =============== ======== ========" PRINT "\\ . . . . . . .\\ //. . . . . . .\\ //. . . . . . .\\ \\. . .\\// . . //" PRINT "||. . ._____. . .|| ||. . ._____. . .|| ||. . ._____. . .|| || . . .\/ . . .||" PRINT "|| . .|| ||. . || || . .|| ||. . || || . .|| ||. . || ||. . . . . . . ||" PRINT "||. . || || . .|| ||. . || || . .|| ||. . || || . .|| || . | . . . . .||" PRINT "|| . .|| ||. _-|| ||-_ .|| ||. . || || . .|| ||. _-|| ||-_.|\ . . . . ||" PRINT "||. . || ||-` || || `-|| || . .|| ||. . || ||-` || || `|\_ . .|. .||" PRINT "|| . _|| || || || || ||_ . || || . _|| || || || |\ `-_/| . ||" PRINT "||_-` || .|/ || || \|. || `-_|| ||_-` || .|/ || || | \ / |-_.||" PRINT "|| ||_-` || || `-_|| || || ||_-` || || | \ / | `||" PRINT "|| `` || || `` || || `` || || | \ / | ||" PRINT "|| .===` `===. .===`.`===. .===` /==. | \/ | ||" PRINT "|| .==` \_|-_ `===. .===` _|_ `===. .===` _-|/ `== \/ | ||" PRINT "|| .==` _-` `-_ `=` _-` `-_ `=` _-` `-_ /| \/ | ||" PRINT "|| .==` _-` `-__\._-` `-_./__-` `` |. /| | ||" PRINT "||.==` _-` `` | /==.||" PRINT "==` _-` \/ `==" PRINT "\ _-` `-_ /" PRINT " ``` ```" PRINT " Pokračuj libovolnou klávesou" PRINT PRINT PRINT PAUSE CALL reload PRINT "Doom tě přestal bavit, tak si ho vypnul." GOTO informa STAV hard: CALL reload PRINT "Napsal si Format C a stlačil ENTER." PRINT "Netrvalo dlouho a počítač byl bez potřebného softwaru." PRINT "Přihlásil si se, že ti nejde počítač. Učitel přišel, chvilku zkoumal co se" PRINT "stalo a když to zjistil, div to s nim neseklo." PRINT "Řekl, ať už raději nic neděláš.." PRINT "" PAUSE GOTO cekprestavka STAV biso: CALL reload PRINT "Zablokoval si vstup do Biosu." PRINT "Heslo znáš jen ty, tudíž je počítač nepoužitelný." PRINT "Teď už jen počkat na přestávku.." PRINT "" PAUSE GOTO cekprestavka STAV cekprestavka: CALL reload PRINT "Sedíš a čekáš na přestávku - hrozná nuda, ale už se blíží konec hodiny." PRINT "" PAUSE GOTO prestavka3 STAV prestavka3: CALL reload BEEP PRINT "Konečně zazvonilo na přestávku a ty si se přestěhoval do třídy." PRINT PAUSE STAV prestavka31: CALL reload PRINT "Ve třídě je zase živo.." PRINT "Ale blíží se 4.hodina s diktátem v čele. Měl by si něco udělat, aby ses zach-" PRINT "ránil a neztroskotal jako Titanic. Musíš nějak vypadnout." PRINT "" PRINT "Co uděláš?" PRECHOD_TEXT_SMAZAT 1 - Spolkneš gumu PRECHOD_TEXT 2 - Sehraješ srdeční záchvat VSTUP PRECHOD 1 - guma PRECHOD 2 - zachvat GOTO prestavka31 STAV guma: CALL reload PRINT "Spolkl si gumu a začal si se dusit. Spolužákům se ovšem povedlo z tebe gumu" PRINT "vymlátit. Spokl si jí tedy znovu, ovšem opět ji z tebe vymlátili." PRINT "Tak si to vzdal, takhle to nepůjde." PRINT "" PAUSE GOTO prestavka31 STAV zachvat: CALL reload PRINT "Rozhodl si se sehrát srdeční záchvat. Padl si na zem a začal si zmítat v " PRINT "křečích. Přivolaný učitel zavolal záchranku a ty si simuloval strašné" PRINT "bolesti břicha celou cestu až do nemocnice. Kde si se záhadně uzdravil." PRINT PAUSE STAV nemocnice: CALL reload PRINT "Ležíš v nemocnici a snažíš se přesvědčit doktory, že už Ti nic není, že si" PRINT "zdráv a že chceš domů (vždyť máš domluvené rande)." PRINT "" PRINT "Co řekneš?" PRECHOD_TEXT 1 - Jsem zdráv jako ryba, pusťte mě PRECHOD_TEXT 2 - Nic mi není, to bylo tim, jak jsem spolkl tu gumu.. PRECHOD_TEXT 3 - Umírám a moje poslední přání je, aby jste mě pustili VSTUP PRECHOD 1 - jakorybicka PRECHOD 2 - nicmineni PRECHOD 3 - umiram GOTO nemocnice STAV jakorybicka: CALL reload PRINT "Jsem zdráv jako ryba, pusťte mě, pravil si.." PRINT "Sestřička si toho ale nevšímala a dál si drbala špachtlí na nosní výtěry" PRINT "svoje stará záda." PRINT PAUSE GOTO nemocnice STAV nicmineni: CALL reload PRINT "Nic mi není, to bylo tim, jak jsem spolkl tu gumu.. pravil si rozhořčeně." PRINT "To ti nespolknu, pravil jeden z doktorů. To je stoprocentně srdcozáchvatofóbie." PRINT "A člověka, který má srdcozáchvatofóbii prostě nepůstíme, ať už se vymlouvá na " PRINT "na jakékoliv gumy." PRINT PAUSE GOTO nemocnice STAV umiram: CALL reload PRINT "Umírám a moje poslední přání je, aby jste mě pustili.. pravil si." PRINT "To nepůjde pravil jeden z doktorů.. ale pokud chceš máme tu eutanázii a bude" PRINT "to bezbolestné.. dodal ještě." PRINT "Eutanázii si odmítl, umřít se ti nechtělo.." PRINT PAUSE GOTO nemocny STAV nemocny: CALL reload IFNOTVISITED zuslez PRINT "Ležíš v posteli.. je dvanáct hodin odpoledne. Pan doktor se sestřičkou odešli" IFNOTVISITED zuslez PRINT "na oběd. Máš jedinečnou příležitost zmizet.." IFVISITED zuslez PRINT "Ležíš v posteli.. je třináct hodin odpoledne. Pan doktor se sestřičkou odešli" IFVISITED zuslez PRINT "dělat bůhvíco. Máš jedinečnou příležitost zmizet.." PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Utečeš PRECHOD_TEXT_SMAZAT 2 - Zůstaneš ležet VSTUP PRECHOD 1 - domu PRECHOD 2 - zuslez STAV zuslez: CALL reload PRINT "Ležíš, ležíš.. přišel doktor se sestřičkou a tvoje šance na únik z nemocnice" PRINT "jsou minimální." PRINT PAUSE GOTO nemocnice STAV domu: CALL reload PRINT "Sbalil sis věci a na doktorově stole si nechal dopis o tom, že Ti ve skuteč-" PRINT "nosti nic není, že sis všechno jenom vymyslel." PRINT "Pak ses vydal ven z nemocnice.." PRINT PAUSE GOTO prednemoc STAV prednemoc: CALL reload PRINT "Stojíš před nemocnicí.. je zde mnoho lidí zdravých i nemocných. A mezi nima" PRINT "tvoje oblíbená sestřenice Karel." PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Jít na autobus PRECHOD_TEXT 2 - Pozdravit sestřenici VSTUP PRECHOD 1 - autobus PRECHOD 2 - karel GOTO prednemoc STAV karel: CALL reload PRINT "Šel si ke své sestřenici Karolíně.. je o rok mladší než ty, ale celkem" PRINT "ujde. Stojí tam se svými kamarádkami.. některé jsou pěkné, no a ty ostatní" PRINT "nebudu komentovat, nerad bych někoho urazil." PRINT "" PRINT "Jak začneš rozhovor" PRECHOD_TEXT 1 - Čau Kery, jak šlapeš? PRECHOD_TEXT 2 - Ahoj Kery, co tu děláš? PRECHOD_TEXT 3 - Čau Kery.. (a počkáš jak zareaguje) VSTUP PRECHOD 1 - caukery PRECHOD 2 - ahojkery1 PRECHOD 3 - ahojkery2 GOTO karel STAV caukery: CALL reload PRINT "Čau Kery, jak šlapeš? zeptal ses a ona na to.." PRINT "Dej si odchod Čendo, nemám na tebe náladu. " PRINT "Tak si šel dál.. směrem k autobusáku. Po několika metrech se ozvalo.." PRINT "A viřiď ségře, že se stavim." PRINT PAUSE GOTO autobus STAV ahojkery1: CALL reload PRINT "Ahoj Kery, co tu děláš? zeptal ses" GOTO ahojkery STAV ahojkery2: CALL reload PRINT "Čau Kery.. pravil si." STAV ahojkery: PRINT "- Co ty tu děláš? řekla" PRINT "No, já jsem byl zrovna darovat nějakou krev na pokusné účely.." PRINT "- Jo, a kolik platěj, 10,- Kč za šimpanze?" PRINT "Tak nějak, ale krávy jsou líp placený, měla bys to tam jít taky zkusit." PRINT "- Vole!" PRINT "Usmál ses a pravil si:" PRINT "Už musim.." PRINT "- Hmm, tak ahoj!" PRINT "Zdar" PRINT PRINT "Otočil ses a vydal si se směrem k autobusáku. Její kamarádky se sborově ozva-" PRINT "ly hlasitým Áááhójj, ale ty už sis jich nevšímal a kráčel si cestou domů. Snil" PRINT "si o dnešním rande a doufal si, že ti to vyjde." PRINT PAUSE GOTO autobus STAV autobus: CHOOSE autob autobus2 STAV autob: CALL reload PRINT "Stojíš na malém autobusovén nádraží. Je strašná zima. Mrzne, a na zemi je sně-" PRINT "hová pokrývka. Naproti vidíš jít jednoho člověka, který tě kdysi hodně naštval" PRINT "a ty si mu slíbil, že mu rozbiješ držku. Od té doby se ti vyhýbal, takže si " PRINT "k tomu neměl příležitost. Ovšem nyní si to můžeš užít.. " PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Rozbiješ mu držku PRECHOD_TEXT 2 - Pečeš na něj VSTUP PRECHOD 1 - rozbijes PRECHOD 2 - autobus2 GOTO autob STAV rozbijes: CALL reload PRINT "Stojíš nedaleko od člověka, kterého chceš zmlátit. Říkají mu SHIT a přezdívka" PRINT "přesně odpovídá jeho povaze. Hodně machruje, provokuje a pomlouvá, ovšem pouze" PRINT "za tvými zády, jinak je to hrozná sračka (anglicky SHIT)." PRINT "Důvodů k jeho zmlácení máš hodně, tak do toho.." PRINT PRINT "Co mu uděláš?" PRECHOD_TEXT 1 - Shodíš ho na zem a vyválíš ho ve sněhové břečce.. PRECHOD_TEXT 2 - Vypálíš mu rovnou do obličeje.. PRECHOD_TEXT 3 - Shodíš ho, začneš ho škrtit a párkrát do něj kopneš.. VSTUP PRECHOD 1 - brecka PRECHOD 2 - vypalis PRECHOD 3 - shodis GOTO rozbijes STAV brecka: CALL reload PRINT "Shodil si ho na zem, bránil se, ale neměl šanci..." PRINT "Vyválen ve sněhové břečce se vydal domů." PRINT PAUSE GOTO autobus2 STAV vypalis: CALL reload PRINT "Vypálil si mu rovnou do obličeje... pokusil se Ti to vrátit, ale shodil" PRINT "si ho na zem.. za malou chvilku se zvedl a odebral se s brekem pryč." PRINT PAUSE GOTO autobus2 STAV shodis: CALL reload PRINT "Shodils ho, začal si ho škrtit a párkrát do něj kopnul.." PRINT "Za malou chvilku se zvedl a odebral se s brekem pryč." PRINT PAUSE GOTO autobus2 STAV autobus2: CALL reload PRINT "Stojíš na malém autobusovén nádraží. Je strašná zima. Mrzne, a na zemi je sněhová pokrývka." IFNOTVISITED sebrat PRINT "Na zemi vidíš papírovou padesátikorunu.." PRINT PRINT "Co uděláš?" PRECHOD_TEXT_SMAZAT 1 - Sebrat padesátikorunu PRECHOD_TEXT 2 - Čekat na autobus VSTUP PRECHOD 1 - sebrat PRECHOD 2 - cekam GOTO autobus2 STAV sebrat: CHOOSE sebrat1 sebrat2 sebrat3 STAV sebrat1: CALL reload PRINT "Sebral si padesátikorunu, ale byla falešná, protože měla na konci dvě nuly," PRINT "tak si ji raději roztrhal." PRINT PAUSE GOTO autobus2 STAV sebrat2: CALL reload PRINT "Sebral si padesátikorunu... (to seš ale bohatej ?!?)" PRINT "" PAUSE GOTO autobus2 STAV sebrat3: CALL reload PRINT "Sebral si padesátikorunu... otázkou zůstává, co s tolika pěnezi budeš dělat?" PRINT "" PAUSE GOTO autobus2 STAV cekam: CALL reload PRINT "Čekáš a čekáš na autobus.. Lidí na nástupišti přibývá, všichni už se těší do-" PRINT "mů, vždyť je pátek. Čas běží, autobus však nikde, má několik minut zpoždění," PRINT "nakonec však přijíždí a ty si oddechuješ. Hurá, sláva, jede se domů." PRINT "" PAUSE GOTO bus STAV bus: CALL reload PRINT "Sedíš v autobuse, který se vesele kymací ze strany na stranu.." PRINT "Na jedné zastávce stojí dvě osoby - mladá, celkem krásná holka (asi 17 let) " PRINT "a nějaká stará socoš ježibaba s bradavicí na nose, která vypadá jak" PRINT "hajzlbába z autobusáku (nebo vaše učitelka příroďáku..)" PRINT "Těšíš se, že si k tobě přisedne ona krásná sedmnáctka, jenže ji předběhla ta" PRINT "stará čarodějnice. To je smůla!" PRINT "" PAUSE GOTO bus2 STAV bus2: CALL reload PRINT "Naštěstí cesta netrvá dlouho a ty vystupuješ.." PRINT "" PAUSE STAV doma: BEZODPOVEDI uzjecas CALL reload PRINT "Jsi ve svém pokoji.. je tu hroznej bordel." PRINT PRINT "Co uděláš?" PRECHOD_SECRET Renata - renata PRECHOD_SECRET renata - renata PRECHOD_SECRET RENATA - renata PRECHOD_TEXT_SMAZAT 1 - Uklidíš si pokoj PRECHOD_TEXT_SMAZAT 2 - Nakrmíš svoje potkany - Géniuse a Jerryho PRECHOD_TEXT_SMAZAT 3 - Uklidíš svému pavoukovy Renatě akvárium PRECHOD_TEXT_SMAZAT 4 - Pustíš počítač a zahraješ si nějakou pařbu, třeba piškvorky PRECHOD_TEXT_SMAZAT 5 - Dáš mobil do nabíječky VSTUP PRECHOD 1 - uklidit PRECHOD 2 - genius PRECHOD 3 - renatka PRECHOD 4 - komp PRECHOD 5 - mobils GOTO doma STAV genius: CALL reload PRINT "Vzal si trochu zrní a nasypal ho svým malým potkanům..." PRINT "Byli celí šťastní (vždyť čtyři týdny nežrali)" PRINT "A tak chroustali slunečnice a div Ti při tom nesežrali prst." PRINT "" PAUSE GOTO doma STAV renatka: CALL reload PRINT "Pavouk se zrovna svléká, nedoporučuji ho nějak moc otravovat.. je jedovatej." PRINT PAUSE GOTO doma STAV renata: CALL reload PRINT "Proč se tvůj pavouk jmenuje Renata?" PRINT "To je dlouhá historie - to si byl vloni u babičky na prázdninách a hrozně si" PRINT "se nudil a tak ses vydal mezi místní mládež - do hospody. No a tam ses sez-" PRINT "námil s dívkou, která se jmenovala Renata.. byla krásná, milá atd. - jak jinak." PRINT "Byli to krásné prázdniny a krásné chvíle, které si s touto dívkou strávil. " PRINT "A právě tahle dívka Ti darovala onoho pavouka.. Zřejmě na památku a pro štěs-" PRINT "tí. Když si přijel další rok, po dívce ani vidu, ani slechu, odstěhovala se a " PRINT "nikdo nevěděl kam.. ale tak to v životě chodí. Kamarádi přicházejí a odcházejí." PRINT "No a tak si (možná ze stesku) začal pavoukovy říkat Renata.." PRINT PRINT "Stěhovaví lidi ulítaj, panenku bodni jí to nebolí, svět je mami prapodivnej " PRINT "kraj.. (Citát z jedné písničky od Wanastovek - Wanastowky = dost skvělá muzika)" PRINT "" PAUSE GOTO doma STAV uklidit: CALL reload PRINT "Při tomto strašném a nezábavném procesu se řídíš pravidlem, co můžeš odložit" PRINT "hned, tak odlož ihned... " PRINT PAUSE GOTO doma STAV mobils: CALL reload PRINT "Dal si svůj chcíplej mobil do nabíječky... snad se probere." PRINT PRINT "Netrvalo dlouho a naskočil. Blikal na něm nápis SMSka" PRINT PRINT "Rychle si otevřel archív, aby sis jí přečetl.. čekal si, že bude od dívky," PRINT "kterou si dneska pozval do klubu. Ovšem tvá představa byla mylná. Byla to SMSka " PRINT "od tvé sestry a stálo v ní, že máš dojít nakoupit, protože ona nemůže. " PRINT "S" PRINT "A" PRINT "K" PRINT "R" PRINT "A" PRINT PAUSE CALL reload PRINT "Tak co uděláš?" PRINT "" PRECHOD_TEXT 1 - Dojdeš nakoupit i když se Ti nechce PRECHOD_TEXT 2 - Budeš dělat, že o ničem nevíš (peču na to) VSTUP PRECHOD 1 - nanakup PRECHOD 2 - doma STAV nanakup: CALL reload PRINT "Sbalil si nákupní tašku, peněženku a vydal si se na nákup.." PRINT "Když si přišel do obchodu, zjistil si, že skoro nic nemají. Koupil si tedy" PRINT "jen několik rohlíků a balení matonek. Cestou domů tě ovšem přepadla místní" PRINT "drbna, paní Kokodlačová.." PRINT PAUSE STAV nekup: CALL reload PRINT "Tentokrát její dotaz zní ¨A jak se máte?¨" PRINT PRINT "Co odpovíš?" PRECHOD_TEXT 1 - Dobře, zrovna jsme si koupili nové auto a vilu na Floridě.. PRECHOD_TEXT 2 - Špatně, nemáme co na sebe a už jsme týden nejedli.. PRECHOD_TEXT 3 - Co je ti do toho babo, seru já se ti do tvýho důchodu? VSTUP PRECHOD 1 - dobremame PRECHOD 2 - spatnemame PRECHOD 3 - cojeti GOTO nekup STAV dobremame: CALL reload PRINT "Dobře, zrovna jsme si koupili nové auto a vilu na Floridě.. odpověděl si jí" PRINT "na otázku." PRINT "Baba trošku zbledla závistí, ovšem zbavil ses jí, šla totiž vyprávět " PRINT "onu novinu po celém okolí." PRINT PAUSE GOTO doma STAV spatnemame: CALL reload PRINT "Špatně se máme, nemáme co na sebe a už jsme týden nejedli.. pravil si." PRINT "Babice se rozzářila, až se jí pohl knír a povídá:" PRINT "To ráááááda slyším.. vlastně chci říct nerada, nerada.. snad to bude lepší," PRINT "to je asi tou krizíí, já to věděla." PRINT "Pak se omluvila a vydala se cestou na hřbitov.. kde už na ní ostatní zdech-" PRINT "liny čekaly.." PRINT PAUSE GOTO doma STAV cojeti: CALL reload PRINT "Co je ti do toho babo, seru já se ti do tvýho důchodu? pravil si" PRINT "Baba zčervenala a povídá, takhle nevychovanýho parchanta jsem ještě neviděla..." PRINT "Ty nemáš úctu ke starým lidem!!!" PRINT "To Pepík Nováků, to je hodnej chlapec, ten mi vždycky všechno poví.." PRINT "Pak se odebrala cestou ke kravčí hoře.. a něco si pro sebe žvatlala." PRINT PAUSE GOTO doma STAV komp: STAV kompe: CALL reload PRINT "Počítač se nepovedlo spustit - je to starej křáp. V muzeu by za něj zaplatili" PRINT "pěkný peníze.. " PRINT PRINT "Co budeš dělat?" PRECHOD_TEXT 1 - Pokusíš se spustit počítač znovu PRECHOD_TEXT 2 - Necháš počítač na pokoji - ať si dál rezne VSTUP PRECHOD 1 - komp PRECHOD 2 - doma GOTO kompe STAV komp1: CALL reload PRINT "Pustil si svého Robotrona 1715 (rok výroby 1985) a nabootoval si systém z " PRINT "pětačtvrtkové diskety.. " PRINT PAUSE STAV menu: PRINT "Nedodělávka..." GOTO doma STAV uzjecas: CALL reload PRINT "Tvůj mobil zazvonil - přišla SMSka.. " PRINT "chvíle napětí" PRINT PRINT "Sláva - byla to ta dívka s níž sis domluvil rande.. " PRINT "Máš se u ní (pro ní) stavit o půl šestý." PRINT PAUSE CALL reload PRINT PRINT "A tak nastal čas příprav, naplácal si na sebe snad všechny voňavky které si na-" PRINT "šel a ve skříni si vyhrabal nějaký stylový ohoz.." PRINT PAUSE STAV i: CALL reload PRINT "A pak ses se třemi stovkami vydal, dnes už po druhý, na autobusovou zastávku." PRINT "Stojíš a čekáš na autobus do města. Naproti vidíš hospodu, kterou před nedáv-" PRINT "nem otevřel jeden místní podnikatel." PRINT PRINT "Co uděláš?" IFNOTVISITED cipi PRECHOD_TEXT 1 - Jít do hospody PRECHOD_TEXT 2 - Přepočítat své peníze PRECHOD_TEXT 3 - Čekat, čekat, čekat.. IFVISITED cipi PRECHOD_TEXT 4 - Jít do hospody VSTUP PRECHOD 1 - hospoda PRECHOD 2 - penize PRECHOD 3 - cekatel PRECHOD 4 - cipi2 GOTO i STAV hospoda: CALL reload PRINT "Stojíš v přeplněné vesnické hospodě a hospodskej vyslovil dotaz, na který by" PRINT "si měl odpovědět. Ten dotaz zní: ¨Co to bude mladej?¨" PRINT PRINT "Co odpovíš?" PRECHOD_TEXT 1 - Jedny cigarety a jedno pivo PRECHOD_TEXT_SMAZAT 2 - Balíček žvejkaček VSTUP PRECHOD 1 - cipi PRECHOD 2 - zvejky GOTO hospoda STAV cipi: CALL reload PRINT "Řekl si že chceš cigarety + jedno točený pivo a hospodský tě vyrazil s tím," PRINT "že nechce mít prů..švih." PRINT PAUSE GOTO i STAV cipi2: CALL reload PRINT "Raději bych hospodského moc neprovokoval, vypadal totiž dost nervózně.." PRINT PAUSE GOTO i STAV zvejky: CALL reload PRINT "Hospodskej ti podal žvejkačky MoRbIt s příchutí kakaa. A chtěl po tobě něja-" PRINT "ký prachy, vydřiduch, nakonec si mu ale zaplatil." PRINT "" PAUSE GOTO hospoda STAV penize: CALL reload PRINT "Přepočítal si své peníze s výsledkem:" PRINT "+/- 300 Korun." PRINT "Slovy asi pět set." PRINT "" PAUSE GOTO i STAV cekatel: CALL reload PRINT "Sláva, přijel autobus. Lépe řečeno mikrobus s přibližným rokem výroby 1950." PRINT PRINT "" PAUSE STAV cekatel2: CALL reload PRINT "Sedíš v autobuse a vezeš se do města.. autobus se tento zimní večer kymácí ze" PRINT "strany na stranu, jako loď sužovaná bouří. Je skoro prázdnej, si tu pouze ty," PRINT "nějakej houmles a řidič." PRINT PAUSE STAV vemeste: CALL reload PRINT "Víš co je zajímavé, že jsem ještě nezmínil jméno dívky, kterou si pozval na ran-" PRINT "de. Je to proto, že jméno není v této hře podstatné - ovšem abych dodal hře" PRINT "na realičnosti, jméno zmíním, jmenuje se Nikol, ale říkají ji Niki. (NIKITA)" PRINT PAUSE STAV incity: CALL reload PRINT "Přijel si do města." PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Půjdeš k Niki PRECHOD_TEXT 2 - Půjdeš k Niki PRECHOD_TEXT 3 - Půjdeš k Niki PRECHOD_TEXT 4 - Půjdeš k Niki PRECHOD_TEXT 5 - Půjdeš k Niki PRECHOD_TEXT 6 - Půjdeš k Niki PRECHOD_TEXT 7 - Půjdeš k Niki PRECHOD_TEXT 8 - Půjdeš k Niki PRECHOD_TEXT 9 - Půjdeš k Niki VSTUP PRECHOD 1 - knikite PRECHOD 2 - knikite PRECHOD 3 - knikite PRECHOD 4 - knikite PRECHOD 5 - knikite PRECHOD 6 - knikite PRECHOD 7 - knikite PRECHOD 8 - knikite PRECHOD 9 - knikite GOTO incity STAV knikite: CALL reload PRINT "A tak jdeš cestou k Nikitě.. " PRINT PAUSE STAV otec: CALL reload PRINT "Míjíš Nikitina otce.." PRINT PRINT "Pozdravíš ho?" PRECHOD_TEXT 1 - Ano PRECHOD_TEXT 2 - Ne VSTUP PRECHOD 1 - an PRECHOD 2 - ne GOTO otec STAV an: CALL reload PRINT "Pozdravil si ho, tvářil se jako tajnej agent, ale odpověděl Ti." PRINT PAUSE GOTO nac STAV ne: CALL reload PRINT "Nepozdravil si ho.. . . . . . " PRINT "Vypadal dost naštvaně, zdá se, že kamarády její dcery nemá vůbec v oblibě." PRINT PAUSE GOTO nac STAV nac: CALL reload PRINT "Stojíš před domem, kde bydlí Niki... ups. Podivnej pocit." PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Zazvoníš PRECHOD_TEXT 2 - Zapískáš na prsty VSTUP PRECHOD 1 - zazvonit PRECHOD 2 - zapiskas GOTO nac STAV zazvonit: CALL reload PRINT "Na chodbě se rozsvítilo.." PRINT "Netrvalo dlouho, otevřeli se dveře a v nich stála nádherná dívka. Ano, hádáš" PRINT "správně, byla to Niki. Vypadala ještě líp než ve škole, div by si jí" PRINT "nepoznal." PRINT "A s touhle kráskou máš jít na diskotéku.. (pozn.autor)" PRINT PRINT "Zde je možnost doplnení informací:" PRECHOD_TEXT 1 - Jak Niki vlastně vypadá? PRECHOD_TEXT 2 - Pokračovat ve hře VSTUP PRECHOD 1 - vypada PRECHOD 2 - ahoj GOTO zazvonit STAV vypada: CALL reload PRINT "Vyberte si druh popisu:" PRECHOD_TEXT 1 - Základní popis PRECHOD_TEXT 2 - Základní popis + asi tři další přidané údaje. VSTUP PRECHOD 1 - minipopis PRECHOD 2 - uncensured GOTO vypada STAV minipopis: CALL reload PRINT "Pohledná brunetka s geniálně propracovanými tvary. S příjemným úsměvem." PRINT "THE NEXT TEXT (CENSURED)" PRINT PAUSE GOTO ahoj STAV zapiskas: CALL reload PRINT "Pískl si, otevřelo se okno a z něj vykoukl Nikitin mladší brácha." PRINT "¨Čau, řekni ségře, že jsem tady¨ pravil si" PRINT "¨Ségra, je tady nějakej kluk!¨ Ozvalo se." PRINT "Pak se její brácha vrátil a řekl ti, že Niki už jde.." PRINT "" PAUSE GOTO zazvonit STAV uncensured: CALL reload PRINT "Pohledná brunetka s vlasy dlouhými do půli zad, s velkými ňadry, krásnými " PRINT "boky, perfektní postavou, milým usměvem a silným ¨sexepílem¨ Míry 92-61-89" PRINT PAUSE GOTO ahoj STAV ahoj: CALL reload PRINT "Řekla ti: ¨Tak jdem!?!¨ a vyšla ven, do zimního večera, který hodlala " PRINT "strávit s tebou a ty (pokud se správně domnívám) s ní." PRINT PAUSE GOTO ahojtwo STAV ahojtwo: CALL reload PRINT "Jdete temným chladným večerem.. krásná dívka stojí vedle tebe, hvězdy svítí" PRINT "na obloze. Nevnímáš projíždějící auta, procházející lidi, ba ani ufouny" PRINT "neustále kroužící nad městem.. Tvůj rozum Ti velí něco udělat." PRINT PRINT "Co uděláš?" PRECHOD_TEXT 1 - Začneš nějaký rozumný/nerozumný dialog PRECHOD_TEXT_SMAZAT 2 - Obejmeš dívku VSTUP PRECHOD 1 - dialog PRECHOD 2 - boky GOTO ahojtwo STAV boky: CALL reload PRINT "Objal si Niki kolem pasu a pomalu si rukou sjížděl dolů." PRINT "Dívce se to zřejmě líbilo, ale když ses blížil k cíli svého snažení," PRINT "chytila její ruka tu tvojí a vyzvedla jí do původní úrovně." PRINT "Tvoje ruka opět pomalu sjížděla.. tentokrát se jí povedlo dorazit k" PRINT "cíli. Dívka nic neříkala, usmála se a vesele zakroutila hlavou." PRINT PAUSE GOTO ahojtwo STAV dialog: BEZODPOVEDI dil2 CALL reload PRINT "Rozhodl si se něco říct.." PRINT PRINT "Co to bude?" PRECHOD_TEXT_SMAZAT 1 - Doufám, že v klubu nebude moc lidí.. PRECHOD_TEXT_SMAZAT 2 - Moje ségra je hrozná potvora.. PRECHOD_TEXT_SMAZAT 3 - Nesnáším naší přírodopišářku, je to hroznej kus hovězího.. PRECHOD_TEXT_SMAZAT 4 - Mě už ta škola fakt nebaví PRECHOD_TEXT_SMAZAT 5 - Včera jsem si koupil nové CéDé od Bomfunk MC`S.. VSTUP PRECHOD 1 - doufam PRECHOD 2 - segra PRECHOD 3 - krava PRECHOD 4 - skolane PRECHOD 5 - bom GOTO dialog STAV doufam: CALL reload PRINT "Doufám, že v klubu nebude moc lidí.. řekl si." PRINT "Dívka zakroutila hlavou, řekla že určitě ne a vesele se usmála." PRINT "Ty sis znovu uvědomil, že se ti ta dívka opravdu moc líbí." PRINT "(snad se líbíš i ty jí)" PRINT PAUSE GOTO dialog STAV segra: CALL reload PRINT "Moje ségra je hrozná potvora, nic nemusí dělat a všechno má!!" PRINT "- Já jsem taky taková :-)" PRINT "Jenže ty nejseš moje ségra." PRINT "- Hmm, hih :-)" PRINT PAUSE GOTO dialog STAV krava: CALL reload PRINT "Nesnáším naší přírodopisářku, fakt jí nesnáším!!! pravil si." PRINT "- Já taky, ta kráva mi dala trojku na výzo a přitom jsem poslední písemku" PRINT " napsala za jedna." PRINT "Pí.. jedna zk...... (další slova jsou cenzurována - SORRY)" PRINT "" PAUSE GOTO dialog STAV skolane: CALL reload PRINT "Mě už ta škola fakt nebaví.. pravil si" PRINT "- Mě taky ne. " PRINT "Příští tejden si hodim maroda. řekl si a ona řekla" PRINT "- Já na školu fuckám, se už neučím, odpoledne chodim pařit do SCORPiona. " PRINT "Už abych byl na středce, ta základka je už dost nudná, ale ten rok už to " PRINT "vydržim." PRINT PAUSE GOTO dialog STAV bom: CALL reload PRINT "Včera jsem si koupil nové CéDé od Bomfunk MC`S.." PRINT "- To už mám.. co vůbec posloucháš? zeptala se" PRINT "Já? RUN DMC, FATBOY SLIM, PRODIGY, BEASTIE BOYS, 2 MASTERS, MUMA FUCKTORY," PRINT "FM FACTORY.. všechno, bigbít, hiphop, techno, dance, pop, housík :-)" PRINT PAUSE GOTO dialog STAV dil2: STAV pred: CALL reload PRINT "Pomalu jste došli před diskoklub. Kdo zaplatí vstupné?" PRINT "" PRECHOD_TEXT 1 - Já sobě, ona sobě PRECHOD_TEXT 2 - Všechno platim já, ať vidí, že na to mám :-) VSTUP PRECHOD 1 - jasobe PRECHOD 2 - platim GOTO pred STAV jasobe: CALL reload PRINT "Ty jsi ale držgrešle. Na co šetříš, na novou plastiku? Taková hezká holka," PRINT "proč jí to nezaplatíš (stejně je to jenom hra a platí to počítač)." PRINT PRINT "Pokračuj liboovolnou klávesou" PAUSE GOTO vstup STAV platim: CALL reload PRINT "Zaplatil si sobě i Niki vstup, tvoje obliba u ní zřejmě stoupla. Připadal sis " PRINT "skoro jako Casanova.." PRINT PAUSE GOTO vstup STAV vstup: CALL reload PRINT "Sešli jste do podzemních prostorů, kde se diskotéka konala. Nasadil sis černé" PRINT "brýle, aby si nebyl tak nápadný svým fanouškům." PRINT PAUSE STAV nexte: BEZODPOVEDI qnavec CALL reload PRINT "Stojíte ve sklepních prostorech diskotéky, je slyšet podmanivá hudba a" PRINT "jsou vidět všude přítomná diskotéková světla, lasery i stroboskop." PRINT PRINT "Co dělat?" PRECHOD_TEXT_SMAZAT 1 - Sednout ke stolu PRECHOD_TEXT_SMAZAT 2 - Jít za svými kamarády PRECHOD_TEXT_SMAZAT 3 - Jít si zahrát kulečník nebo něco podobného PRECHOD_TEXT_SMAZAT 4 - Jít si zatancovat VSTUP PRECHOD 1 - kestolu PRECHOD 2 - kamaradi2 PRECHOD 3 - zahrat PRECHOD 4 - zatancovat GOTO nexte STAV kestolu: BEZODPOVEDI nexte CALL reload PRINT "Sedíte s Niki u stolu v setmělém blikajícím prostředí diskotéky.." PRINT PRECHOD_TEXT_SMAZAT 1 - Něco řekneš.. PRECHOD_TEXT_SMAZAT 2 - Necháš jí, ať začne hovor.. PRECHOD_TEXT_SMAZAT 3 - Ukážeš jí svůj nový mobil (nikdo ve škole nemá lepší) VSTUP PRECHOD 1 - rikat PRECHOD 2 - atzacne PRECHOD 3 - mobil2 GOTO kestolu STAV rikat: BEZODPOVEDI nexte CALL reload PRINT "Že bys taky něco řekl.. :-)" PRINT PRINT "Tak co to bude?" PRECHOD_TEXT_SMAZAT 1 - Znáš ten vtip.. PRECHOD_TEXT_SMAZAT 2 - Koukni se támhle na tu holku, vypadá jak lochneska PRECHOD_TEXT_SMAZAT 3 - Tuhle se kámoš zkouřil na záchodech a... PRECHOD_TEXT_SMAZAT 4 - A co tvůj brácha?? VSTUP PRECHOD 1 - vtip PRECHOD 2 - loch PRECHOD 3 - kz PRECHOD 4 - bracha GOTO rikat STAV bracha: CALL reload PRINT "A co tvůj brácha? Zeptal si se.." PRINT "¨Pořád provokuje, hajzlík jeden malej :-)¨, odpověděla Ti" PRINT "" PAUSE GOTO rikat STAV kz: CALL reload PRINT "Začal si vyprávět STORY:" PRINT "Tuhle se kámoš zkouřil na záchodech a nepřišel na hodinu." PRINT "Když ho našli učitelé a zkoušeli ho zkřísit vodou, tak je pozvracel a teď" PRINT "mu hrozí trojka z chování, nebo vyražení ze školy - protože to není první" PRINT "průser. Minulej rok napsal na sborovnu KOKOTI ZDE." PRINT "Co řekla na tvojí STORY Niki? Přece toto:" PRINT "Takového kosíka by jsme potřebovali u nás ve škole." PRINT PAUSE GOTO rikat STAV mobil2: CALL reload PRINT "Vytáhl si svůj megamaximálně geniální mobil Nokia s wapem, MP3 přehrávačem," PRINT "deseti hrama a se seznamem na 2500 jmen a archívem na 100 zpráv. Ukázal si ho" PRINT "Niki a vysvětlil, co to všechno umí. Vypadalo to, že jí to zaujalo :-)" PRINT "Bohužel mobil po malé chvilce přestal fungovat tak jak má, zřejmě se ta tvá" PRINT "Niki Nokii moc nelíbila a toto byl její způsob tichého protestu. " PRINT PAUSE GOTO kestolu STAV zatancovat: PRINT gigi = INT(RND * 114 + 1) IF gigi = 1 THEN tex$ = "Gigi´d´Agostina" IF gigi = 2 THEN tex$ = "BomfunkMC´s" IF gigi = 3 THEN tex$ = "Apollo 440" IF gigi = 4 THEN tex$ = "MumA Fucktory" IF gigi = 5 THEN tex$ = "FM Factory" IF gigi = 6 THEN tex$ = "Prodigy" IF gigi = 7 THEN tex$ = "Fatboye Slima" IF gigi = 8 THEN tex$ = "Michala Davida" IF gigi = 9 THEN tex$ = "Lenku Filipovou" IF gigi = 10 THEN tex$ = "znělku z Kačera Donalda" IF gigi = 11 THEN tex$ = "Kristýnu" IF gigi = 12 THEN tex$ = "Zoombie" IF gigi = 13 THEN tex$ = "Holki" IF gigi = 14 THEN tex$ = "Mámu od Luneticu (fuj)" IF gigi = 15 THEN tex$ = "VIP" IF gigi = 16 THEN tex$ = "Arakainy" IF gigi = 17 THEN tex$ = "Haberův team" IF gigi = 18 THEN tex$ = "bratry chemiky" IF gigi = 19 THEN tex$ = "Lenku Filipovou" IF gigi = 20 THEN tex$ = "Rammsteiny" IF gigi = 21 THEN tex$ = "Fun Factory" IF gigi = 22 THEN tex$ = "Mr. Presidenta" IF gigi = 23 THEN tex$ = "Zvlášňý školu" IF gigi = 24 THEN tex$ = "Chinaski" IF gigi = 25 THEN tex$ = "Žlutýho psa" IF gigi = 26 THEN tex$ = "Turbo" IF gigi = 27 THEN tex$ = "Lucii" IF gigi = 28 THEN tex$ = "tvoje oblíbený Wanastovky" IF gigi = 29 THEN tex$ = "Ha-ha" IF gigi = 30 THEN tex$ = "soundtrack ze Samotářů" IF gigi = 31 THEN tex$ = "Olympicy" IF gigi = 32 THEN tex$ = "Petra Jandu a jeho Olympicy" IF gigi = 33 THEN tex$ = "Mňága a Žďorp" IF gigi = 34 THEN tex$ = "Maxim Turbulence" IF gigi = 35 THEN tex$ = "Toyboxáckej Best Friend" IF gigi = 36 THEN tex$ = "Aqu" IF gigi = 37 THEN tex$ = "MY HEART WILL GO ON z Titanicu" IF gigi = 38 THEN tex$ = "HEART OF THE OCEAN (dancing remix)" IF gigi = 39 THEN tex$ = "Těžkýho Pokondra" IF gigi = 40 THEN tex$ = "Daniela Landu" IF gigi = 41 THEN tex$ = "Lenku Dusilovou" IF gigi = 42 THEN tex$ = "Elán" IF gigi = 43 THEN tex$ = "TicTacToe" IF gigi = 44 THEN tex$ = "Boney M" IF gigi = 45 THEN tex$ = "Eurythmics a jejich 17again" IF gigi = 46 THEN tex$ = "Dunu" IF gigi = 47 THEN tex$ = "Toyboxáckej Best Friend" IF gigi = 48 THEN tex$ = "Vanesumej" IF gigi = 49 THEN tex$ = "Davida Baywotš Ha(j)selhofa" IF gigi = 50 THEN tex$ = "Honzu Hemra" IF gigi = 51 THEN tex$ = "Pavla Piče a Jiřího Kunděru" IF gigi = 52 THEN tex$ = "novou Madonnu" IF gigi = 53 THEN tex$ = "SpiceGirls" IF gigi = 54 THEN tex$ = "SpaceGays" IF gigi = 55 THEN tex$ = "Vengaboys" IF gigi = 56 THEN tex$ = "ZZTop" IF gigi = 57 THEN tex$ = "soundtrack z TopGunu" IF gigi = 58 THEN tex$ = "Fotbal od Zvlášňý školy" IF gigi = 59 THEN tex$ = "OKBand (Snad za to může láska)" IF gigi = 60 THEN tex$ = "Lenku Dusilovou a Čechomor (fuj)" IF gigi = 61 THEN tex$ = "Ilonu Cáklovou" IF gigi = 62 THEN tex$ = "Modern Talking" IF gigi = 63 THEN tex$ = "Liquido" IF gigi = 64 THEN tex$ = "LouBegu a dívku č.5" IF gigi = 65 THEN tex$ = "Richarda Műlera" IF gigi = 66 THEN tex$ = "Františka od Buty" IF gigi = 67 THEN tex$ = "Jona Bon Joviho" IF gigi = 68 THEN tex$ = "Lennyho Kravitze" IF gigi = 69 THEN tex$ = "Dědu Mládka" IF gigi = 70 THEN tex$ = "Vangelis" IF gigi = 71 THEN tex$ = "Enyu" IF gigi = 72 THEN tex$ = "Eru" IF gigi = 73 THEN tex$ = "A-Teens" IF gigi = 74 THEN tex$ = "Abbu" IF gigi = 75 THEN tex$ = "ACDC (acadaca australia)" IF gigi = 76 THEN tex$ = "horký rudý papriky" IF gigi = 77 THEN tex$ = "Ace of Base" IF gigi = 78 THEN tex$ = "Roxette" IF gigi = 79 THEN tex$ = "Britney Spears" IF gigi = 80 THEN tex$ = "Leonu Machálkovou" IF gigi = 81 THEN tex$ = "Boba a Toma" IF gigi = 82 THEN tex$ = "Šmouly" IF gigi = 83 THEN tex$ = "Kopytovce a jeich hit Dojit" IF gigi = 84 THEN tex$ = "Maduar" IF gigi = 85 THEN tex$ = "Harleje" IF gigi = 86 THEN tex$ = "Alkehol" IF gigi = 87 THEN tex$ = "Tři sestry" IF gigi = 88 THEN tex$ = "Backstreet Boys" IF gigi = 89 THEN tex$ = "Five" IF gigi = 90 THEN tex$ = "Queen" IF gigi = 91 THEN tex$ = "Guano Apes" IF gigi = 92 THEN tex$ = "Chaozz" IF gigi = 93 THEN tex$ = "Pet Shop Boys" IF gigi = 94 THEN tex$ = "Scooter" IF gigi = 95 THEN tex$ = "Rednex" IF gigi = 96 THEN tex$ = "Mel C" IF gigi = 97 THEN tex$ = "Gerri Halliwel" IF gigi = 98 THEN tex$ = "666" IF gigi = 99 THEN tex$ = "Stinga" IF gigi = 100 THEN tex$ = "DSGHINGHS KHANA" IF gigi = 101 THEN tex$ = "Offspringy" IF gigi = 102 THEN tex$ = "DJ Patrika" IF gigi = 103 THEN tex$ = "DJ Visage" IF gigi = 104 THEN tex$ = "DJ Lucifera" IF gigi = 105 THEN tex$ = "Squeezery" IF gigi = 106 THEN tex$ = "E-Rotic" IF gigi = 107 THEN tex$ = "DJ Boba" IF gigi = 108 THEN tex$ = "Toma Jonese" IF gigi = 109 THEN tex$ = "ŠukŠukDancers" IF gigi = 110 THEN tex$ = "Vannesu Mae" IF gigi = 111 THEN tex$ = "Toybox" IF gigi = 112 THEN text$ = "Maxu" IF gigi = 113 THEN text$ = "Premiery" IF gigi = 114 THEN text$ = "Hrobaře od Premiérů" CHOOSE zat1 zat2 STAV zat1: CALL reload PRINT "Šli jste si zatancovat, zrovna hráli "; tex$; "." PRINT "Docela Vám to tancování šlo, to musím uznat. Vždyť jsem se na Vás taky celou" PRINT "tu dobu díval a tak jsem si ani nestihl vypít svojí Colu s příchutí bylin-" PRINT "kového čaje a dojíst rohlík, co jsem si přinesl z domova." PRINT PAUSE GOTO nexte STAV zat2: CALL reload PRINT "Šli jste si zatancovat, zrovna hráli "; tex$; "." PRINT "Při tancování si omylem vrazil do jedné holky. Její kluk, který vypadal jako" PRINT "vyhazovač z místního bordelu, se naštval a po jedné pěsti tě shodil na zem. " IFVISITED platim PRINT "Niki ti pomohla se zvednout a sednout si." IFNOTVISITED platim PRINT "Zvedl si se a společně s Niki jste se usadili u jednoho z několika přítomných stolů." PRINT PAUSE STAV ZNAS: CALL reload PRINT "¨Znáš toho debila?¨ zeptala se" PRINT "-¨Teď už jo.¨ řekl si (seš asi velkej drsňák)" PRINT PAUSE GOTO kestolu STAV zahrat: CALL reload PRINT "Tenhle diskotékovej pajzlík dovoluje vybrat si z několika různých her.." PRINT PRINT "Tak co si zahrajete?" PRECHOD_TEXT_SMAZAT 1 - Kulečník PRECHOD_TEXT 2 - PinBall PRECHOD_TEXT 3 - Člověče nezlob si PRECHOD_TEXT_SMAZAT 4 - Šipky PRINT PRECHOD_TEXT_SMAZAT 5 - Nebo si můžete zaskákat v oblečení ze suchého zipu na stěnu ze suchého zipu PRECHOD_TEXT_SMAZAT 6 - A nebo ukážeš Niki, jak umíš rajtovat na elektrickym bejkovi VSTUP PRECHOD 1 - kulecnik PRECHOD 2 - pinbil PRECHOD 3 - clovecene PRECHOD 4 - sipky PRECHOD 5 - OBLSUCH PRECHOD 6 - bejk GOTO zahrat STAV kulecnik: CALL reload PRINT "Začali jste hrát, ale Niki to moc nejde. Zdá se, že zase tak moc často kuleč-" PRINT "ník nehraje." PRINT PRECHOD_TEXT 1 - Necháš jí vyhrát PRECHOD_TEXT 2 - Porazíš jí co nejrychleji, aby si to měl z krku VSTUP PRECHOD 1 - vyhrat PRECHOD 2 - porazit GOTO kulecnik STAV vyhrat: CALL reload PRINT "Chvíli si machroval, ale pak si začal dělat, že ti to nejde." PRINT "Niki tě porazila, s úsměvěm tě políbila a řekla:"; PRINT " Třeba se to někdy naučíš." PRINT PAUSE GOTO zahrat STAV porazit: CALL reload PRINT "Několika šťouchy si Niki porazil, radost v jejím obličeji zrovna nezářila," PRINT "nerada prohrává a je vášnivá :-) mohl si jí alespoň nechat vyhrát." PRINT PAUSE GOTO zahrat STAV sipky: CALL reload CALL reload CALL reload CALL reload CALL reload STAV sipky2: PRINT "Šli jste si zahrát elektronické šipky.. " PRINT "Omylem si hodil šipku jednomu chlapovi do zadku." PRINT "Trochu ho to naštvalo, tak tě prohodil skleněnou reklamní tabulí." PRINT "Naštěstí se ti nic nestalo - až na pořezanou ruku, tři zuby a páteř. " PRINT "Onen chlap byl vyhozen z diskotéky - stejně je to diskotéka pro teenagery." PRINT "Odešli jste se s Niki posadit k jednomu ze stolů. " STAV opera: GOTO kestolu STAV netanec: CALL reload PRINT "Tancování už bylo dost.." PRINT PAUSE GOTO nexte STAV pinbil: CALL reload PRINT "A jakej PinBall (PinBill) si zahrajete?" PRINT PRECHOD_TEXT 1 - BeverlyHils 90210 PRECHOD_TEXT_SMAZAT 2 - Simpsons PinBall PRECHOD_TEXT 3 - Nechceme hrát PinBall VSTUP PRECHOD 1 - flinstones PRECHOD 2 - dsp PRECHOD 3 - zahrat GOTO pinbil STAV flinstones: CALL reload PRINT "Tak jste si zahráli dvojhru na BeverlyHils 90210 - projeli jste se po L.A.," PRINT "znásilnili Brendu a Valerii, dostali jste Dylena z průšvihu a Brendona do " PRINT "průšvihu. Vydělali milion u Nata, odradili Steva od sebevraždy a zachránili" PRINT "děti před úchylem." PRINT "Pak Vám ale došli kredity.." PRINT PAUSE GOTO nexte STAV dsp: CALL reload PRINT "Tak jste si zahráli dvojhru na The Simpsons PinBallu a v něm jste se vymlá-" PRINT "tili s Houmerem v autě, s Marge upekli koláč, s Bartem znásilnili Milhouse " PRINT "a u Očka jste se tak (v)ožrali, že jste poblili Barneyho." PRINT "Pak Vám ale došli kredity." PRINT PAUSE GOTO nexte STAV clovecene: CALL reload PRINT "Jaxi přišel na to, že by se dalo na diskotéce hrát Člověče nezlob se???" PRINT "Na diskotéce jdou hrát šachy, domino (i s dominou), vyherní automaty, ruská" PRINT "ruleta, ale člověče nezlob se, to tedy opravdu nejde, leda snad, že by si ho" PRINT "vytáhl z ledničky, posypal cukrem a daroval ho svému psovi Žofii." PRINT PAUSE GOTO zahrat STAV OBLSUCH: CALL reload PRINT "Tak jste si šli zaskákat na suchou stěnu.." PRINT "Oblékli jste si speciální oděv a blbnuli jste jak malé děti :-)" PRINT PAUSE GOTO zahrat STAV kamaradi2: CALL reload PRINT "V jednom zapadlém rohu, v koutě, kam nedopoadá žádné světlo, sedí tví přáte-" PRINT "lé. Jsou to samí exoti - skoro jako ty.. rozhodl si se, že je ukážeš Niki," PRINT "aby věděla že tví kamarádi jsou opravdu vyjímeční." PRINT "A tak jste se za nimi vydali, aby na ně bylo vidět, musel sis na ně posvítit" PRINT "zapalovačem." PRINT PAUSE CALL reload PRINT "Zrovna nadšení nebyli, všichni měli nějaký divný výraz v obličeji a slastně" PRINT "kouřili cigarety." PRINT PAUSE STAV e: CALL reload PRINT "Jeden z nich najednou začal: Tys tu už dlouho nebyl, cos dělal?" PRINT PRINT "Co řekneš?" PRECHOD_TEXT 1 - Učil se PRECHOD_TEXT 2 - Byl jsem nemocnej PRECHOD_TEXT 3 - Jsem chodil jinam VSTUP PRECHOD 1 - e2 PRECHOD 2 - e2 PRECHOD 3 - e2 GOTO e STAV e2: CALL reload PRINT "Aha..": PRINT PAUSE GOTO nexte STAV bejk: CALL reload PRINT "Warowání!" PRINT "Tato volba může (ale také nemusí) znamenat absolutní zlom ve hře.." PRINT PRINT "Opravdu chceš pokračovat?" PRECHOD_TEXT 1 - Ano PRECHOD_TEXT 2 - Ne VSTUP PRECHOD 1 - uve PRECHOD 2 - zahrat GOTO bejk STAV uve: CALL reload PRINT "Přišel si do místnosti s elektrobejkem a podepsal nějaké papíry." PRINT "Jaké však bylo tvoje zděšení, když si zjistil, že se jim elektrickej bejk" PRINT "rozbil a že tu maj živýho. Ale už se nedalo couvnout, papíry byly podepsaný." PRINT "Bejk tě nabral na rohy a omlátil s tebou omítku, poté tě švihnul do bahna a" PRINT "otřel si o tebe svoje zadní partie, lépe řečeno tě posral." PRINT PAUSE STAV statec: CALL reload PRINT "Ale byls dobrej, pravila Niki, když si se zvedl z bahna. Aby si v té potupě" PRINT "nezůstal sám, přihlásím se na dívčí zápas v bahně. " PRINT PRINT "Co na to řekneš?" PRECHOD_TEXT 1 - Rozmluvíš jí to PRECHOD_TEXT 2 - Super, budu ti držet palce VSTUP PRECHOD 1 - rozmluvit PRECHOD 2 - palce GOTO statec STAV rozmluvit: CALL reload PRINT "Pokusil ses jí to rozmluvit normálním způsobem, ale nějak to nešlo." PRINT "Vysvětloval si jí, že jejím protivníkem bude ARGo, místní dívka s mírami" PRINT "197-140-220 a s váhou 157 kilo, dosud nepřekonaná obluda z místního" PRINT "ústavu pro chorobomyslné. Každý zápas končí její výhrou, a odvezením" PRINT "soupeřky do nemocnice s pohmožděním páteře." PRINT "Niki však chce stále zápasit.." PRINT PRINT "Co dělat?" PRECHOD_TEXT 1 - Nechat soupeřit PRECHOD_TEXT 2 - Vysvětlit Niki, že je moc krásná a že by jí byla škoda VSTUP PRECHOD 1 - palce PRECHOD 2 - krasna GOTO rozmluvit STAV krasna: CALL reload PRINT "Vzal si Niki za ruku a odtáhl si jí do prázdné místnosti, v níž kdysi sí-" PRINT "dlil DJ. Ona se k tobě přitiskla a zeptala se co je?" PRINT "A ty (lišáku jeden) si spustil:" PRINT "Jsi moc krásná, moc se mi líbíš, vždycky jsem chtěl chodit s ňákou pěknou" PRINT "holkou, nerad bych aby se ti něco stalo. Seš lepší pohromadě, než rozkous-" PRINT "kovaná. Chtěl bych, abys byla moje holka :-)" PRINT PAUSE CALL reload PRINT "Celou dobu jsem čekala kdy to řekneš.." PRINT "" PAUSE CALL reload PRINT "Už ani nevím jak se to stalo, možná, že jsem se na vás zapoměl dívat, ale" PRINT "začali jste se tam navzájem svlékat, jako by Vám nevadilo, že by mohl" PRINT "někdo přijít. Niki však po chvilce ucukla a povídá: To nemůžem, tady ne!" PRINT "Proč ne? zeptal si se" PRINT "Dala ti pusu a pokrčila rameny, poté řekla, že už bude muset." PRINT PAUSE GOTO doprovodit STAV palce: CALL reload PRINT "Sláva, držim ti palce, pravil si a Niki se zapsala do hry." PRINT PAUSE CALL reload PRINT "Souboj Niki-Argo začal, dívky se začali válet v bahně a škubaly ze " PRINT "sebe oblečení i vlasy. Zajímavá podívaná, ovšem Niki odvezli do nemocni-" PRINT "ce, chudák holka (měl si jí to rozmluvit!!!!)" PRINT PAUSE CALL reload PRINT "Vzhledem k tomu, že jednou z hlavních postav je Niki a ta teď zrovna leží v " PRINT "nemocnici s ukosnutým ramenem, přeraženým nosem a zlomeninou pravé stehení" PRINT "kosti, je nezbytné hru ukončit." PRINT "Proto se omlouváme, prosím spuste hru znovu a neopakujte své staré chyby." PRINT "" PRINT "Pokračuj libovolnou klávesou - pařane." PAUSE STAV pp: CALL reload PRINT "Ale, protože si byl celkem dobrým hráčem, je tu volba - poslední přání:" PRINT PRINT "Vyber své poslední přání:" PRECHOD_TEXT 1 - Smilování PRECHOD_TEXT 2 - Konéc (vzhůru do svého oblíbeného operačního systému) VSTUP PRECHOD 1 - smilovani PRECHOD 2 - os GOTO pp STAV os: CALL reload PRINT "Tak ahoj.." PRINT PAUSE STAV smilovani: CALL reload PRINT "Možná se smiluju, ale musíš hezky poprosit.." PRINT PRINT "Co dělat?" PRECHOD_TEXT 1 - Poprosit VSTUP PRECHOD 1 - ok GOTO smilovani STAV ok: CALL reload PRINT "Dobře, že jsi to ty, smiluji se, pokračuješ..." PRINT PAUSE GOTO nexte STAV atzacne: CALL reload PRINT "Sedíte u stolu, nic neříkáš a čekáš až Niki něco řekne.." PRINT "" PAUSE STAV azu: CALL reload PRINT "Pak najednou Niki spustila: Rozvádějí se mi rodiče, tak mě napadá, jestli vů-" PRINT "bec může bejt bezchybnej vztah." PRINT PRINT "Co na to řekneš?" PRECHOD_TEXT 1 - Já si myslím, že je to problém intenzity bazýrování na základě humálního PRINT " komplexu." PRECHOD_TEXT 2 - Nemůže, u našich to taky neklape PRECHOD_TEXT 3 - Může, pokud se z lásky a milování nestane nezábavná rutina PRECHOD_TEXT 4 - Nevim, a co si ty myslíš o polaritě duokompletizace? VSTUP PRECHOD 1 - inten PRECHOD 2 - nemuze PRECHOD 3 - rutina PRECHOD 4 - duo GOTO azu STAV inten: CALL reload PRINT "Zatvářil si se chápavě a pravil si:" PRINT "¨Já si myslím, že je to problém bazýrování na základě humálního komplexu.¨" PRINT "Nechápavě se na tebe obrátila s otázkou, co to znamená a ty si řekl že " PRINT "taky nevíš. Usmála se." PRINT PAUSE GOTO rikat STAV nemuze: CALL reload PRINT "Zatvářil si se chápavě a pravil si:" PRINT "Nemůže, u našich to taky neklape." PRINT PAUSE GOTO rikat STAV rutina: CALL reload PRINT "Zatvářil si se chápavě a pravil si:" PRINT "Může, pokud se z lásky a milování nestane nezábavná rutina." PRINT PAUSE GOTO rikat STAV duo: CALL reload PRINT "Chvilku si přemýšlel a pak si pravil:" PRINT "¨Nevim, a co si ty myslíš o polaritě duokompletizace?¨" PRINT "¨No, já si myslím, že je to problém singularity.¨, řekla" PRINT PAUSE GOTO rikat STAV doprovodit: CALL reload PRINT "¨Já tě doprovodím.¨ řekl si" PRINT "¨Hmm, tak jo.¨ přikývla" PRINT PAUSE GOTO qnavec STAV vtip: PRINT "Rozhodl si se říci vtip a tak si také učinil..." PRINT GOTO nevtip PAUSE GOTO rikat STAV nevtip: CALL reload CALL reload CALL reload CALL reload CALL reload PRINT "Dost, bylo srandy... zkus něco jinýho." PRINT PAUSE GOTO rikat STAV loch: CALL reload PRINT "Vysmátě si pravil: ¨Podívej se támhle na tu holku, vypadá jako lochneska.¨" PRINT "-¨Hele nech jí, to je moje sestřenice.¨" PRINT "Omluvil si se: ¨Jéžiš promiň.¨" PRINT "¨To nic, vypadá jako lochneska a navíc je to pěkná kráva¨, řekla Niki" PRINT PAUSE GOTO rikat STAV qn2: CALL reload PRINT "Niki se zastavila a po malé chvilce povídá:" PRINT "¨Víš jak si říkal, že bys se mnou chtěl chodit.." PRINT "Seš správnej kluk, líbíš se mi, jenže já..." PRINT "já se zítra stěhuju na druhý konec republiky," PRINT "takže jestli se někdy ještě uvidíme :((¨" PRINT "Chodila bych s tebou, ale nejde to..¨" PRINT "(Blížence dálka rozdělí - pozn. autor - vypůjčeno od Olympicu)" PRINT "" PAUSE GOTO nt2 STAV qnavec: CALL reload PRINT "Čas ubíhal jako rychle tekoucí voda a tak nastal čas vypadnout." PRINT "" PAUSE CALL reload PRINT "Jdete temnou ulicí. Auta už jezdí jen občasně, spíše teď šerem prosviští ně-" PRINT "jaký ten taxikář." PRINT PAUSE IFVISITED krasna PRINT "Niki se zastavila a po malé chvilce povídá:" IFVISITED krasna PRINT "¨Víš jak si říkal, že bys se mnou chtěl chodit.." IFNOTVISITED krasna PRINT "Najednou si se zastavil a povídáš:" IFNOTVISITED krasna PRINT "¨Chtěl bych s tebou chodit.¨" IFNOTVISITED krasna PRINT IFNOTVISITED krasna PRINT "Niki se odmlčela a po malé chvilce povídá:" PRINT "¨Seš správnej kluk, líbíš se mi, jenže já..." PRINT "já se zítra stěhuju na druhý konec republiky," PRINT "takže jestli se někdy ještě uvidíme :((¨" PRINT "Chodila bych s tebou, ale nejde to..¨" PRINT "(Blížence dálka rozdělí - pozn. autor - vypůjčeno od Olympicu)" PRINT PAUSE STAV nt2: CALL reload PRINT "Došli jste až k Nikitině domu. Že by konec??? (jako autor už byh to mohl" PRINT "ukončit, jenže to bych měl moc jednoduché)" PRINT "¨Pojď dál,¨ pravila, ¨naši přijdou až o půl noci, brácha spí..¨" PRINT "Zatáhla tě do svého pokoje. Stáhla tě na postel.. a zbytek si domysli, podle" PRINT "vlastní fantazie, přání a představ. Chvilku zavřete oči, přemýšlejte o tom " PRINT "jak to mohlo probíhat. Bylo to poprvé..¨" PRINT PAUSE CALL reload CALL reload CALL reload CALL reload CALL reload CALL reload CALL reload CALL reload CALL reload CALL reload CALL reload CALL reload CALL reload CALL reload CALL reload CALL reload PRINT "Nastalo rozloučení, poslední polibek a slůvko nezapomeň." PRINT "" PAUSE CALL reload PRINT "Když si se šel podívat k jejímu domu dalšího dne, bylo na něm jen NA PRODEJ." PRINT "A okolím znělo ¨NEZAPOMEŇ!¨. " PRINT "" PAUSE PRINT "Netrvalo dlouho, za několik měsíců nastalo jaro. Ta podivná zima zmizela." PRINT "S ní se však vytratilo i její podělané kouzlo, snad to byla poslední krásná" PRINT "zima na dlouhou dobu. Kam si se vytratili i ufouni i vodník sedící na vrbě." PRINT "To, že se do těhle nehostiných krajů, kdesi v Česku jako autor někdy vrátím" PRINT "je i pro mě nenávratně pryč. Krásné období vývoje hry s pesimistickými" PRINT "okamžiky a veselými zážitky je za mnou. Tak sbohem přátelé u další textovky." PRINT PRINT "Autor" PRINT PAUSE STAV v2: PRINT "Koňéc gry." PAUSE GOTO KONEC