10 REM . Info om Z80JAKT.GAM 15 REM 20 REM . Av Erik ]str|m >1423< 30 REM . ver 1.0 840426 40 REM 50 REM ------------------------- 60 POKE 65013,0 100 ; CHR$(12%) : ; '>>> Jakten p} den f|rsvunna Z80:n <<<' 110 ; : ; '[nnu ett dumt adventure-spel f|r ABC80' 120 ; : ; 'Bakgrund:' : ; : ; 'En mikroprocessor av den fantastiska typen Z80 har f|rsvunnit.' 130 ; 'Ingen vet var, men envisa rykten g|r g{llande att den finns i en underlig byggnad.' 140 ; : ; 'Ditt uppdrag blir allts} att finna den, samt att f} ut den ur huset.' 145 ; : ; 'De som har f|rs|kt f|rut har aldrig kommit ut ur byggnaden!!' 150 ; : ; 'Du kommer att m|ta en del problem som kan bli sv}ra att l|sa.' 200 ; CUR(22,0)''; : GET A$ 210 ; CHR$(12) 220 ; 'Kommandon:' 230 ; : ; 'N,S,... Styr i respektive riktning' 240 ; : ; 'Var Skriver ut var du {r.' 250 ; : ; 'Nav Skriver ut m|jliga riktningar.' 260 ; : ; 'Inv Inventerar' 270 ; : ; 'SLUT Avbryter spelet.' 280 ; : ; 'Sedan finns det en rad ord som jag f|r- st}r, men vilka de {r talar jag inte om.' 290 ; 'I spelet finns en del f{llor som du kanske aldrig kommer ur. Bryt med SLUT om du fastnar i en s}dan!' 300 ; CUR(22,0)''; : GET A$ 310 ; CHR$(12) : ; 'OBS! Programmet {r f|sett med destruk- tivt listskydd. (datorn g}r vilse!)' 314 ; 'Avsikten {r att g|ra det sv}rare att fuska genom att titta i programmet.' 316 ; 'Jag talar om hur det tas bort f|r den som vill veta!' 318 ; : ; 'Kontakta mig g{rna om problem uppst}r!' 320 ; : ; 'Erik ]str|m' : ; 'K|pmang. 7' : ; '960 40 Jokkmokk' 330 ; : ; 'Tel. 0971/103 74 el. 0920/94544' 340 ; : ; : ; 'Klart att starta????' 350 ; : ; 'Ladda och k|r Z80JAKT.BAC'