home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 59 / Tiger_Disk_059_19xx_Tiger-Crew-Disk_de_Side_B.d64 / schreibtempotest (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  2KB  |  57 lines
  1. 10 poke53280,.:poke53281,.:poke646,15
  2. 20 dim a$(25):forx=1to21:reada$(x):next
  3. 30 print"[147][159]     schreibgeschwindigkeitstest":poke198,0:wait198,1:poke198,0:print"[147]";
  4. 40 print"[155]"
  5. 50 print" schreibe bitte:
  6. 60 [153]"print"
  7. 70 x[178][181]([187](1)[172]21)[170]1
  8. 80 [153]a$(x)
  9. 90 [153]""
  10. 100 a[178][195](a$(x))
  11. 110 [153]"listich nehme die zeit und pruefe auf fehler"
  12. 120 [153]"return zum start und am ende!"
  13. 130 [161]x$:[139]x$[179][177][199](13)[167]130
  14. 140 t[178]ti
  15. 150 [133]"";b$
  16. 160 t1[178]ti
  17. 170 [139]b$[179][177]a$(x)[167]250
  18. 180 sp[178][181](8.6[172]3600[173](t1[171]t))
  19. 190 [153]"clrdein tempo:";sp;"worte clrpro minute"
  20. 200 [153]"sysnoch ein versuch ?"
  21. 210 [161]z$:[139]z$[178]""[167]210
  22. 220 [139]z$[178]"j"[167][153]"load";:[137]40
  23. 230 [139]z$[178]"n"[167][153]"load":[128]
  24. 240 [137]210
  25. 250 [143]
  26. 260 e[178]0
  27. 270 [153]"fehlersuche..."
  28. 280 [129]i[178]1[164]a
  29. 290 k$[178][202](b$,i,1):[153]k$;
  30. 300 l$[178][202](a$(x),i,1):[153]l$;
  31. 310 [139][202](a$(x),i,1)[178][202](b$,i,1)[167]330
  32. 320 e[178]e[170]1
  33. 330 [130]i
  34. 340 [153]:[153]"errors=";e
  35. 350 [137]180
  36. 360 [131]"der schnelle fuchs sprang ueber die rote kuh"
  37. 370 [131]"das weisse pferd warf den reiter ab"
  38. 380 [131]"der himmel ist heute grau in grau"
  39. 390 [131]"wer weiss schon das wetter von morgen"
  40. 400 [131]"ein bier ist besser als kein alkohol"
  41. 410 [131]"der sommer mal mal wieder am mittwoch"
  42. 420 [131]"beim lesen bin ich gestern eingeschlafen"
  43. 430 [131]"fernsehen loest bei mir muedigkeit aus"
  44. 440 [131]"das tippen macht mir richtig spass"
  45. 450 [131]"mein compi macht alles - ich liebe ihn"
  46. 460 [131]"ich hasse diese vielen syntax-errors!"
  47. 470 [131]"ein graues haus finde ich langweilig"
  48. 480 [131]"die gruene wiese steht voller blumen"
  49. 490 [131]"in der schule war es stinklangweilig"
  50. 500 [131]"mein beruf macht mir immer mehr spass"
  51. 510 [131]"ich hasse das lange arbeiten am samstag"
  52. 520 [131]"wenn ich froehlich bin, singe ich"
  53. 530 [131]"beim duschen klingelt immer das telefon"
  54. 540 [131]"diese tiger-disk ist wieder ganz super!"
  55. 550 [131]"ohne tiger-disk ist das leben langweilig"
  56. 560 [131]"ich muss mein tiger-disk-abo verlaengern"
  57.