home *** CD-ROM | disk | FTP | other *** search
/ B Soft 4 / B-Soft_4_19xx_Maik__Mike_de_Side_A.d64 / kotknagger (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  655b  |  21 lines
  1. 0 rem nicht ins listing schaun', du       spielverderber, du...!
  2. 1 poke53280,14:poke53281,6:printchr$(142)"[147][154]kotknagger by [158]jtr [154]!":print"[154]finde die sechs heiligen zeichen...":print"written in 1996 ! druecke schnellstens":print">>space<< und treff' dann deine wahl."
  3. 2 gett$:ift$=""then2
  4. 3 ift$<>" "then2
  5. 4 print"[147]":geta$:ifa$=""then4
  6. 5 print"[147]"a$
  7. 6 getb$:ifb$=""then6
  8. 7 print""b$
  9. 8 getc$:ifc$=""then8
  10. 9 print""c$
  11. 10 getd$:ifd$=""then10
  12. 11 print""d$
  13. 12 getf$:iff$=""then12
  14. 13 print""f$
  15. 14 getg$:ifg$=""then14
  16. 15 print""g$:gosub17:e$=a$+b$+c$+d$+f$+g$:ife$<>"b-soft"thenprint"falsch!":gosub17:goto4
  17. 16 print"richtig!":gosub17:new
  18. 17 fors=1to500:nexts:return
  19. 18 rem b-soft, mike witschi,
  20. 19 rem henningstr. 13, 21337 lueneburg
  21.