peta.nek
peta.nek@email.cz

400 ? :TXT$="Můžeš jít na "
401 IF S=1 THEN TXT$(LEN(TXT$)+1)="sever, "
402 IF J=1 THEN TXT$(LEN(TXT$)+1)="jih, "
403 IF V=1 THEN TXT$(LEN(TXT$)+1)="východ, "
404 IF Z=1 THEN TXT$(LEN(TXT$)+1)="západ, "
406 IF N=1 THEN TXT$(LEN(TXT$)+1)="nahoru, "
408 IF D=1 THEN TXT$(LEN(TXT$)+1)="dolů, "


550 TXT$="":REM INFO O HOTOVOSTI
552 IF P(14)=1000 AND P(11)<>1000 THEN TXT$="Tvá hotovost činí ":TXT$(LEN(TXT$)+1)=STR$(HOTOVOST)
554 IF P(14)=1000 AND P(11)<>1000 THEN TXT$(LEN(TXT$)+1)=" korun.":GOSUB 100:RETURN 
558 IF P(11)=1000 AND P(14)<>1000 THEN TXT$="Tvá hotovost činí ":TXT$(LEN(TXT$)+1)=STR$(HOTOVOST)
560 IF P(11)=1000 AND P(14)<>1000 THEN TXT$(LEN(TXT$)+1)=" korun.":GOSUB 100:RETURN 
590 RETURN 
600 REM 
601 IF A$="i" OR A$="inv" THEN TXT$="Neseš ":RESTORE 660
602 IF A$="" THEN TXT$="Na zemi leží ":RESTORE 650

650 DATA kronika,baterka,míč,lopatka,papírek,špendlíky,lano,nůž,deska,zápalky,padesátikoruna,klíče,ježek,peníze
651 DATA deník,žluté špendlíky,kostelník
660 DATA kroniku,baterku,míč,lopatku,papírek,špendlíky,lano,nůž,desku,zápalky,padesátikorunu,klíče,ježka,peníze
661 DATA deník,žluté špendlíky,kostelníka

699 IF (A$="i" OR A$="inv") AND LEN(TXT$)=6 THEN TXT$="Nemáš u sebe nic.":GOSUB 100:GOTO 1000
700 GOTO 400
800 DELKA=LEN(B$)
801 IF B$="" THEN ? "Co chceš sbírat?":GOTO 1000

821 IF PR$(1,DELKA)=B$ AND MA=P(R) THEN P(R)=1000:? "Sebral jsi ";PR$;".":GOSUB 900:GOTO 1000
822 IF PR1$(1,DELKA)=B$ AND MA=P(R) THEN P(R)=1000:? "Sebral jsi ";PR$;".":GOSUB 900:GOTO 1000
824 IF PR$(1,DELKA)=B$ AND MA<>P(R) THEN ? "Nikde tu nevidím ";PR$;".":GOTO 1000
826 IF PR1$(1,DELKA)=B$ AND MA<>P(R) THEN ? "Nikde tu nevidím ";PR$;".":GOTO 1000
828 NEXT R
840 ? "Takovou věc tu nikde nevidím.":GOTO 1000
850 DELKA=LEN(B$)
851 IF B$="" THEN ? "Co chceš pokládat?":GOTO 1000

874 IF PR$(1,DELKA)=B$ AND P(R)=1000 THEN GOSUB 950:P(R)=MA:? "Položil jsi ";PR$;".":GOTO 1000
875 IF PR1$(1,DELKA)=B$ AND P(R)=1000 THEN GOSUB 950:P(R)=MA:? "Položil jsi ";PR$;".":GOTO 1000
876 IF PR$(1,DELKA)=B$ AND P(R)<>1000 THEN ? "Opravdu u sebe nemáš ";PR$;".":GOTO 1000
877 IF PR1$(1,DELKA)=B$ AND P(R)<>1000 THEN ? "Opravdu u sebe nemáš ";PR$;".":GOTO 1000
880 NEXT R
890 ? "Takovou věc u sebe nemáš.":GOTO 1000


908 IF R=13 THEN TXT$="A teď rychle do klubovny.":GOSUB 100:RETURN 
949 RETURN 
950 REM POKLADANI HOTOVOSTI
952 REM IF R=11 THEN HOTOVOST=HOTOVOST-50:RETURN
954 REM IF R=14 THEN HOTOVOST=HOTOVOST-200:RETURN
955 IF R=11 THEN TXT$="Zbláznil ses, pokládat peníze.":GOSUB 100:P(11)=1000:GOTO 1000
956 IF R=14 THEN TXT$="Zbláznil ses, pokládat peníze.":GOSUB 100:P(14)=1000:GOTO 1000

1017 IF (A$="s" AND S=0) OR (A$="sev" AND S=0) THEN ? "Bohužel na sever cesta nevede.":GOTO 1000
1
1019 IF (A$="j" AND J=0) OR (A$="jih" AND J=0) THEN ? "Bohužel na jih cesta nevede.":GOTO 1000

1021 IF (A$="v" AND V=0) OR (A$="vyc" AND V=0) THEN ? "Bohužel na východ cesta nevede.":GOTO 1000

1023 IF (A$="z" AND Z=0) OR (A$="zap" AND Z=0) THEN ? "Bohužel na západ cesta nevede.":GOTO 1000

1036 IF (A$="n" AND N=0) OR (A$="nah" AND N=0) THEN ? "Bohužel nahoru cesta nevede.":GOTO 1000

1040 IF (A$="d" AND D=0) OR (A$="dol" AND D=0) THEN ? "Bohužel dolů cesta nevede.":GOTO 1000
1042 IF A$="kup" THEN 13000
1100 ? "Koukám, že meleš samé nesmysly, co?":GOTO 1000
 

2005 IF PR$="-1" AND SKOC=0 AND TXT$="-1" THEN ? "Nikde v okolí podobný předmět nevidím.":GOTO 1000


2220 ? "Tak tedy ";PR$;" tu nikde nevidím.":GOTO 1000
2499 REM 
2500 DATA vlajka,1,Krásná vlajka Rychlých šípů. Je červená se žlutým kruhovým polem a uprostřed jsou tři šípy.
2501 DATA baterka,1500,
2502 DATA míč,0,Je velmi okopaný od každodenního zápolení na plácku.
2504 DATA lopatku,0,Je z kvalitního materiálu a proto je velmi ostrá.
2506 DATA papírek,0,Je to útržek reklamního letáku: Lopatky od Roubíka - to nejlepší pro Vás !
2508 DATA špendlíky,0,Není na nich nic zajímavého.
2509 DATA žluté špendlíky,0,Obyčejné špendlíky se žlutými hlavičkami.
2510 DATA lano,0,Je dost pevné a je dlouhé 20 metrů.
2514 DATA nůž,0,Obyčejný zavírací nožík.
2516 DATA deska,0,Je ze dřeva o velikosti přibližně 80 x 80 centimetrů.
2520 DATA zápalky,0,Vypadají* že by se daly použít.
2522 DATA padesátikoruna,0,Je na ní zobrazený T. G. Masaryk.
2558 DATA klíče,0,Krásná ruční práce. Bude asi od zámku v historické budově.
2598 DATA kroniku,1000,
2600 DATA deník,1004,
2601 DATA kostelník,1006,
2602 DATA vývěska,1007,
2604 DATA ježka,1100,
5000 DATA -1,0,-1

8100 IF P(13)=MA OR P(13)=1000 THEN TXT$="Tajemný hlavolam. V kovové válcové kleci s podélnými otvory."
8101 IF P(13)=MA OR P(13)=1000 THEN TXT$(LEN(TXT$)+1)="je umístěna koule s různě dlouhými hroty."
8102 IF P(13)=MA OR P(13)=1000 THEN TXT$(LEN(TXT$)+1)=" Když správným postupem nakláníš a točíš ježkem, je"
8103 IF P(13)=MA OR P(13)=1000 THEN TXT$(LEN(TXT$)+1)="možno ho vyjmout z klece ven. Dokázal to jedině Jan"
8104 IF P(13)=MA OR P(13)=1000 THEN TXT$(LEN(TXT$)+1)=" Tleskač. Po Tleskačově smrti se stal hlavolam symbolem"
8105 IF P(13)=MA OR P(13)=1000 THEN TXT$(LEN(TXT$)+1)=" Velkého Vontství.":RETURN 
8500 IF P(2)=1000 OR P(2)=MA THEN TXT$="Tato elektrická svítilna dlouho vydrží.":RETURN 
9000 ? "Nikde tu ";PR$;" není.":GOTO 1000
9001 REM 
9002 TXT$="Náhodně se otevřela a Ty čteš: Vontové jsou silná* organizovaná skupina chlapců ze stínadel. Tuto "
9003 TXT$(LEN(TXT$)+1)="organizaci založil Vojtěch Vont. Na jeho počest se chlapci nazývají Vontové. V čele stojí "
9004 TXT$(LEN(TXT$)+1)="volený Velký Vont a šestičlená Vontská rada. Symbolem příslušnosti jest žlutý špendlík "
9005 TXT$(LEN(TXT$)+1)="připíchnutý do klopy kabátu.":RETURN 
9010 TXT$="Náhodně se otevřela a Ty čteš: Náš klub byl založen na památném místě u mejkalovy ohrady. Mirek Dušín* "
9011 TXT$(LEN(TXT$)+1)="Jarka Metelka* Jindra Hojer* Červenáček a Rychlonožka - to jsme my - Rychlé ípy.":RETURN 
9015 TXT$="Náhodně se otevřela a Ty čteš: Na našem památném místě jsme na návrh Mirka uschovali klubovní pokladničku"
9016 TXT$(LEN(TXT$)+1)=" s našimi penězi. Až budeme potřebovat peníze* tak si je tam najdeme. ":RETURN 
9020 TXT$(LEN(TXT$)+1)="v Čechách nabízel za pouhých 36 Korun.":RETURN 
9030 TXT$="Je velmi nečitelný* jak zde ležel několik let v prachu. Část se dá však přečíst."
9031 TXT$(LEN(TXT$)+1)="...dnes večer jsem opět pracoval na svém vynálezu. Bude to skvělé* až budou všichni moci lé..."
9032 TXT$(LEN(TXT$)+1)="...sedím ve své kůlničce a dívám se průjezdem na hokynářský krámek v zámečnické ulici. "
9033 TXT$(LEN(TXT$)+1)="Hlavní plán je už v jež...":RETURN 
9040 TXT$="Je naní napsána tato zpráva: V sobotu se uskuteční volba Velkého Vonta. Náčelníci okolních ulic 9*23*47 "
9041 TXT$(LEN(TXT$)+1)="zajistí pořádek. Vontská rada.":RETURN 
9500 TXT$="To víte, že si na hlavolam pamatuji. Chlapec, kterému hlavolam patřil, totiž zvonil u svatého Jakuba, dole"
9501 TXT$(LEN(TXT$)+1)=" ve stínadlech. Často si s ním hrál a často si něco psal do deníku. Jednou se však při zvonění"
9502 TXT$(LEN(TXT$)+1)=" houpal na provaze, neudržel se a spadl z věže na zem. Byl na místě mrtev. Pamatuji si, že šel"
9503 TXT$(LEN(TXT$)+1)=" tenkrát na zvonici i s deníkem.":RETURN 

13000 IF HOTOVOST<1 THEN TXT$="Nemáš peníze!":GOSUB 100:GOTO 1000

13004 IF B$="" THEN TXT$="Tohle si nekoupíš.":GOSUB 100:GOTO 1000

13022 READ PR$,VEC,LOKACE,CENA,TXT$
13023 IF PR$="-1" THEN TXT$="To si nekoupíš!":GOSUB 100:GOTO 1000

13099 PRINT "Tohle si nekoupíš!":GOTO 1000
13100 P(VEC)=1000:HOTOVOST=HOTOVOST-CENA
13102 IF HOTOVOST<=50 AND P(14)=1000 THEN P(14)=2000
13104 IF HOTOVOST=0 AND P(11)=1000 THEN P(11)=2000
13112 GOSUB 100:GOTO 1000
13400 DATA baterku,2,8,50,Stála tě 50 korun.
13402 DATA lopatku,4,18,50,Stála tě 50 korun.
13404 DATA špendlíky,6,47,5,Stály tě 5 korun.
13405 DATA žluté špendlíky,16,47,5,Stály tě 5 korun.
13408 DATA lano,7,48,100,Stálo tě 100 korun.
13499 DATA -1,0,0,0,KONEC
13500 GOTO 1000
14000 REM HLEDEJ
14001 DELKA=LEN(B$)
14002 IF B$="" THEN TXT$="Nic tu není.":GOSUB 100:GOTO 1000
14003 RESTORE 14100
14004 READ PR$,SKOC
14006 IF PR$="-1" THEN TXT$="To tu není!":GOSUB 100:GOTO 1000
14008 IF DELKA>LEN(B$) THEN 14004
14010 IF PR$(1,DELKA)=B$ THEN GOSUB SKOC+14400:GOSUB 100:GOTO 1000
14099 GOTO 14004
14100 DATA peníze,0
14102 DATA kůlnu,10
14104 DATA deník,20
14200 DATA -1,0
14400 IF P(14)=0 AND MA=11 THEN P(14)=MA:TXT$="Po krátkém hledání jsi našel schované peníze.":RETURN 
14402 IF P(14)<>0 AND MA=11 THEN TXT$="Další peníze jsi už nenašel.":RETURN 
14410 IF MA=64 AND KULNA=0 THEN KULNA=1:V=1:TXT$="Po krátkém hledání jsi objevil kůlnu.":RETURN 
14420 IF MA=92 AND P(15)=0 THEN P(15)=MA:TXT$="Po krátkém hledání jsi objevil deník.":RETURN 
14424 IF MA=92 AND P(15)<>0 THEN TXT$="Tady už žádný deník není.":RETURN 
14425 IF MA<>92 AND P(15)=0 THEN TXT$="Samá voda...":RETURN 
14998 TXT$="Nic jsi nenašel..."
14999 RETURN 
15000 DELKA=LEN(B$):REM POUZIJ
15001 IF B$="" THEN ? "Co chceš jako použít?":GOTO 1000

15020 IF PR$(1,DELKA)=B$ AND P(R)=1000 THEN ? "Použil jsi ";PR$;".":? :GOTO 15500
15021 IF PR1$(1,DELKA)=B$ AND P(R)=1000 THEN ? "Použil jsi ";PR$;".":? :GOTO 15500
15050 NEXT R
15200 ? "Tohle nejde použít na nic v okolí.":GOTO 1000
15500 REM 
15501 TXT$="Ale nemělo to valný úspěch..."


15520 GOTO 15504
15999 GOSUB 100:GOTO 1000
16000 DATA žlutý špendlík,10
16002 DATA lopatku,20
16004 DATA lano,40
16005 DATA klíč,60
16006 DATA baterku,120
16999 DATA -1,0
17000 REM POUZITI
17010 IF P(16)=1000 THEN TXT$="Připíchnul jsi je do klopy svého kabátu. Snad Vonty oklamou."
17012 IF P(16)=1000 THEN P(16)=2000:GOSUB 100:GOTO 1000
17020 IF MA=98 AND P(4)=1000 AND LOPATA=0 THEN LOPATA=1:TXT$="Prokopals zával.":J=1:P(13)=100:GOSUB 100:GOTO 1000
17024 IF MA=99 AND P(4)=1000 AND LOPATA=-1 AND P(12)=0 THEN TXT$="Překopal jsi celou"
17026 IF MA=99 AND P(4)=1000 AND LOPATA=-1 AND P(12)=0 THEN TXT$(LEN(TXT$)+1)=" podlahu kůlny."
17028 IF MA=99 AND P(4)=1000 AND LOPATA=-1 AND P(12)=0 THEN TXT$(LEN(TXT$)+1)=" Objevil jsi klíč."
17030 IF MA=99 AND P(4)=1000 AND LOPATA=-1 AND P(12)=0 THEN LOPATA=0:P(12)=MA:GOSUB 100:GOTO 1000
17040 IF MA=68 AND P(7)=1000 THEN N=1:P(7)=2000:TXT$="Přivázal jsi lano k oknu.":GOSUB 100:GOTO 1000
17060 IF MA=86 AND P(12)=1000 THEN TXT$="Otevřel jsi malá dvířka.":N=1:P(12)=2000:GOSUB 100:GOTO 1000
17120 IF P(2)=1000 THEN P(18)=2000:TXT$="Rozsvítil jsi baterku.":GOSUB 100:GOTO 1000
17999 TXT$="Nic se však nestalo* takže to budeš muset zkusit nějak jinak.":GOSUB 100:GOTO 1000
18000 REM 
18003 TXT$(LEN(TXT$)+1)="poslední králík rozlétl na náhradní díly* byli to totiž hračky. Tak ten velký maskovaný "
19000 IF MA=40 AND P(16)<>2000 THEN TXT$="Vontové ihned poznali* že nejsi ze Stínadel a po krátké honičce "
19001 IF MA=40 AND P(16)<>2000 THEN TXT$(LEN(TXT$)+1)="Tě chytili."

19004 IF MA=49 AND P(16)<>2000 THEN TXT$="Vontové ihned poznali* že nejsi ze Stínadel a po krátké honičce "
19005 IF MA=49 AND P(16)<>2000 THEN TXT$(LEN(TXT$)+1)="Tě chytili."

19500 RETURN 
20000 REM 
20100 TXT$="Jsi v klubovně Rychlých šípů. Na zdi je klubová vlajka.":RETURN 
20110 TXT$="Jsi v dlouhé ulici. Na severu vidíš nízký dřevěný domek, klubovnu Rychlých ípů.":RETURN 
20120 TXT$="Jsi v dlouhé ulici. Dýchá na Tebe klid Druhé Strany.":RETURN 
20130 TXT$="Jsi na křižovatce ulice Dlouhé a Spojovací.":RETURN 
20140 TXT$="Jsi ve Spojovací ulici. Slyšíš zde hluk z nedalekých Hornových strojíren.":RETURN 
20150 TXT$="Jsi na křižovatce ulice Závětrné a Spojovací.":RETURN 
20160 TXT$="Jsi v Závětrné ulici. Vidíš obchod* ve kterém nabízejí skautské potřeby.":RETURN 
20170 TXT$="Jsi v obchodě se skautskými potřebami. Usměvavý prodavač vítá své zákazníky.":RETURN 
20180 TXT$="Jsi v Závětrné ulici. Nepříjemný zápach pochází z blízké Kšírovy chemičky.":RETURN 
20190 TXT$="Jsi na památném místě* u mejkalovy ohrady* kde byl založen klub Rychlých ípů.":RETURN 
20200 TXT$="Jsi na plácku mezi činžovními domy.":RETURN 
20210 TXT$="Jsi na křižovatce ulice Moravské a Dlouhé.":RETURN 
20220 TXT$="Jsi na Moravské ulici. Název pochází od několika vinárníček s výborným jihomoravským vínem. Nevidíš nic "
20221 TXT$(LEN(TXT$)+1)="zajímavého.":RETURN 
20230 TXT$="Jsi na Moravské ulici. Kousek od Tebe je železářství u Roubíka.":RETURN 
20240 TXT$="Jsi v železářství U Roubíka. Zde mají určitě něco* co budeš potřebovat.":RETURN 
20250 TXT$="Jsi na křižovatce ulice Moravské a Drobílkovy.":RETURN 
20260 TXT$="Jsi na křižovatce ulice Drobílkovy a Černošínské.":RETURN 
20270 TXT$="Jsi v Černošínské ulici. Cítíš vůní z nedalekého hokynářského krámku.":RETURN 
20280 TXT$="Jsi v hokynářském krámku. Na pultech leží lákavé zboží.":RETURN 
20290 TXT$="Jsi v Černošínské ulici. Je to typická ulice Druhé Strany s moderními činžovními domy.":RETURN 
20300 TXT$="Přecházíš přes úzký dřevěný mostek. Pod tebou teče nepříliš vábná říčka.":RETURN 
20310 TXT$="Jsi v úzkém průchodu mezi domy. Průchod ústí na malé náměstíčko. Jmenuje se to tu Kociánka.":RETURN 
20320 TXT$="Jsi v malém náměstíčku. U vchodu do kaple sedí starý kostelník. Vypadá* že by mohl něco vědět.":RETURN 
20330 TXT$="Jsi na ulici Drobílkova.":RETURN 
20340 TXT$="Jsi na křižovatce ulice Drobílkova a Svatoplukovy.":RETURN 
20350 TXT$="Jsi ve Svatoplukově ulici. Je to malá úzká ulička.":RETURN 
20360 TXT$="Stojíš u zdi. Je na ni cosi nakresleného křídou. Obraz připomíná hlavolam* který je známý pod názvem "
20361 TXT$(LEN(TXT$)+1)="ježek v kleci. Snad bude poblíž někdo* kdo bude vědět více.":RETURN 
20370 TXT$="Jsi na křižovatce Rozdělovací třídy a Drobílkovy ulice.":RETURN 
20380 TXT$="Jsi na Rozdělovací třídě. Tady končí Druhá Strana a začínají tu Stínadla. Po kolejích jede vůz městské "
20381 TXT$(LEN(TXT$)+1)="pouliční dráhy.":RETURN 
20390 TXT$="Jsi na křižovatce Rozdělovací třídy a ulice Na nosálku.":RETURN 
20400 TXT$="Jsi v ulici Na nosálku. V dálce vidíš elektrické vozy pouliční dráhy.":RETURN 
20410 TXT$="Jsi na Rozdělovací třídě. V jednom z historických domů je obchod s potřebami pro švadlenky.":RETURN 
20420 TXT$="Jsi na křižovatce Rozdělovací třídy a  Maternovy ulice.":RETURN 
20430 TXT$="Jsi v obchodě s potřebami pro švadlenky.":RETURN 
20440 TXT$="Jsi v obchodě s horolezeckými potřebami.":RETURN 
20450 REM TXT$="Vontové ihned poznali* že nejsi ze Stínadel a po krátké honičce Tě chytili.":GOTO KONEC
20451 TXT$="Jsi v Maternově ulici. Přestože jsi jen kousek od Druhé Strany* cítíš dech Stínadel.":RETURN 
20460 TXT$="Jsi v kostelní ulici* jenž vede od svatého Jakuba ke svaté Magdaleně.":RETURN 
20470 TXT$="Jsi na náměstíčku* kterému dal jméno kostel sv. Magdalény.":RETURN 
20480 TXT$="Jsi na velkém náměstí sv. Jakuba. Monumentální kostel stojí přesně uprostřed náměstí.":RETURN 
20490 TXT$="Jsi ve dvorcích stínadelských domů.":RETURN 
20500 TXT$="Jsi v Zámečnické ulici. Tudy chodil do učení Jan Tleskač.":RETURN 
20510 TXT$="Jsi na dvorku. Průjezdem vidíš krámek hokynáře.":RETURN 
20520 TXT$="Jsi na dvorku činžovního domu. Průjezdem vidíš krámek řezníka.":RETURN 
20530 TXT$="Jsi na dvorku činžovního domu. Průjezdem vidíš nějaký zrušený krámek.":RETURN 
20540 TXT$="Jsi na dvorku stínadelského domu. Průchodem vidíš protější dům v Zámečnické ulici.":RETURN 
20550 TXT$="Jsi na velkém náměstí sv. Jakuba. V jižní zdi je velké chrámové okno ve výši čtyř metrů.":RETURN 
20560 TXT$="Jsi v ponuré stínadelské uličce s tajuplným názvem Ve svíčkách.":RETURN 
20570 TXT$="Jsi v uličce Ve svíčkách. Sem ústí Slepá ulička.":RETURN 
20580 TXT$="Jsi na křižovatce ulice Ve svíčkách a Na nosálku.":RETURN 
20590 TXT$="Jsi na křižovatce ulice Ve svíčkách a Na zábradlí.":RETURN 
20600 TXT$="Jdeš po mostě v ulici Na nosálku. Po obou stranách mostu stojí krásné sochy.":RETURN 
20610 TXT$="Jsi v uličce Na zábradlí. Ulička příkře stoupá a zábradlí je tu opravdu třeba.":RETURN 
20620 TXT$="Jsi na křižovatce Maternovy ulice a uličky Na zábradlí.":RETURN 
20630 TXT$="Jsi v domě č.p. 20 Maternovy ulice. Je zde cítit ztuchlý zápach* který vychází ze sklepa.":RETURN 
20640 TXT$="Jsi ve sklepě činžovního domu.":RETURN 
20650 TXT$="Jsi ve výklenku svatojakubského náměstí. Kostel je odtud velmi krásný.":RETURN 
20660 TXT$="Jsi bve Slepé uličce. Opravdu má jen jeden východ.":RETURN 
20670 TXT$="Jsi v okně. Vedle tebe jo ochoz* vedoucí kolem chrámové lodi svatojakubského kostela.":RETURN 
20680 TXT$="Jsi na ochozu nad chrámovou lodí kostelu sv. Jakuba. Za tebou jsou dvířka.":RETURN 
20690 TXT$="Jsi v hlavní svatojakubské věži. Schody vedou nahoru ke zvonici.":RETURN 
20700 TXT$="Jsi ve spodní části svatojakubské věže. Hlavní brána od kostela je uzavřena.":RETURN 
20710 TXT$="Jsi ve sklepení sv. Jakuba. Začíná tu rozsáhlý systém chodeb.":RETURN 
20720 TXT$="Jsi v hlavní svatojakubské věži. Schody vedou nahoru ke zvonici.":RETURN 
20730 TXT$="Jsi ve zvonici sv. Jakuba. Starý zvon připomíná* že zde skončil život Jan Tleskač a s ním odešlo i jeho "
20731 TXT$(LEN(TXT$)+1)="tajemství.":RETURN 
20740 TXT$="Jsi v podzemní chodbě. Je zde zatuchlý vzduch.":RETURN 
20750 TXT$="Zabloudil jsi v podzemním systému chodeb...":RETURN 
20760 TXT$="Jsi v hřbitovní chodbě. Po stranách jsou hroby mnichů z dob* kdy zde býval klášter. Letopočty začínají "
20761 TXT$(LEN(TXT$)+1)="šestnáctkou a sedmnáctkou."
20762 REM TXT$(LEN(TXT$)+1)="Chodba je před Tebou zavalena.":RETURN
20763 RETURN 
20770 TXT$="Jsi v Tleskačově kůlně* kde pracoval Jan Tleskač na svém záhadném vynálezu.":RETURN 

20782 TXT$="Jsi uprostřed chrámu. Rozsáhlý prostor a nádherná výzdoba působí na Tvou duši."
20783 TXT$(LEN(TXT$)+1)=" Na zdi vidíš vývěsku.":RETURN 
20784 TXT$="Právě končí volba Velkého Vonta. Vontská rada v čele s nově zvoleným Velkým Vontem vychází před"
20786 TXT$(LEN(TXT$)+1)=" kostel Svatého Jakuba, aby oznámila nedočkavým Vontům výsledky voleb."
20788 TXT$(LEN(TXT$)+1)=" Uprostřed chrámu jest stůl pokrytý temn rudým plátnem. Vidíš vývěsku.":RETURN 
22000 TXT$="V chodbě je tma a není tu vidět. Zakopl jsi, upadl a těžce se zranil.":GOSUB 100:GOSUB 25006:RUN 
22100 RETURN 
25000 TXT$="Gratuluji, dokázal jsi to...":GOSUB 100
25002 TXT$="Hlavolam byl dopraven do bezpečí klubovny Rychlích šípů. ":? :GOSUB 100:GOSUB 25006:RUN 

