home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1990 December / 64er_Magazin_90-12_1990_Markt__Technik_de_Side_A.d64 / repeat (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  1KB  |  21 lines
  1. 1 datahikjaainbcnaknbbnacjhpinbbnakjibinbknakjcmkcmbinbeadiobfadknaonmcjpoin
  2. 2 dataaonmfigakjaainojahkjapinbinekjpainagnekjaainokahkookahmkomojahpacooiln
  3. 3 datadmadinoiahoookahkcfbioaenebickckckinabnekjmiinaanecacbmbkjcainaenekjaf
  4. 4 datainoiahcacbmbemdlmaknbcnacjadooojahkoojahjndmadinoiahkcfbioaenebickckck
  5. 5 datainabnekjmiinaanecacbmbkjcainaenekjafinoiahkjaainokahcaoepppaplojiekook
  6. 6 dataahnndmadnaelinoiahoookahkcfbioaenebickckckinabnekjmiinaanecacbmbkjcain
  7. 7 dataaenekjafinoiahkookahmkomojahpaaeoiemkgmabikabekcbhcapappkoojahoikjaaca
  8. 8 datamnlncacbmbcacbmbemdgmakcfbioaenekjabinabnekjbeinaanecacbmbcacbmbcacbmb
  9. 9 datacacbmbkjcainaenegakappkcppmknapniinapkgaknbcnakobjnaiobjnamjaapablmjek
  10. 10 datapadgmjenpafimjjepahdmjjhpahpmjnppadgmjocpadnemdbokkjaoincanaincbnaknoi
  11. 11 dataahmjaanaaikjagincanaincbnakjekinbcnaemdbokkjaaincanaincbnakjeninbcnaem
  12. 12 dataibokkjaaincanaincbnaemohmbkjaoincanaincbnaemopmbkjaoincanaincbnaknoiah
  13. 13 datamjabnaaikjacincanaincbnakjjeinbcnaemibokkjaaincanaincbnakjjhinbcnaemib
  14. 14 dataokkjaoincanaincbnaknoiahmjacnaaikjanincanaincbnakjnpinbcnaemibokkjocin
  15. 15 databcnaemibokknoiahmjadnaaikjahincanaincbnakjaainbcnaemibokfp__:d=49152
  16. 16 reada$:fora=0tolen(a$)-1step2:h$=mid$(a$,a+1,1):l$=mid$(a$,a+2,1)
  17. 17 poked,(asc(h$)-65)*16+asc(l$)-65:d=d+1:ifmid$(a$,a+3,1)<>"_"thennext:goto16
  18. 18 sys49152:print"[159][147]";tab(12)"score : 0   "
  19. 19 geta$:ifa$=""then19
  20. 20 sys49191:goto18
  21.