home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 63 / 64er_Magazin_Sonderheft_63_19xx_Markt__Technik_de_Side_A.d64 / smacher (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  3KB  |  81 lines
  1. 10 rem ********************************
  2. 20 rem * funktionenhilfe fuer den c64 *
  3. 30 rem * michael suhr                 *
  4. 40 rem * 5160 dueren wernerstr. 10    *
  5. 50 rem * tel: 02421/14666             *
  6. 70 rem ********************************
  7. 80 :
  8. 100 rem ** strings  ***
  9. 110 :
  10. 120 dimf$(62)
  11. 130 f$(1)="[197]in [198]ehler bei den runden[146] [203]lammern!"
  12. 140 f$(2)="[197]in [198]ehler bei den eckigen[146] [203]lammern!"
  13. 150 f$(3)="[197]in [198]ehler in der [208]otenzschreibweise![146]"
  14. 160 f$(4)="[201]ch fand ein unuebersetzbares[146] [218]eichen!"
  15. 170 f$(5)="[218]ehnerlogarithmus[146] muss durch (lnx/ln10) dargestellt werden!"
  16. 180 f$(6)="[198]ehler durch falsche [211]chreibweise![146]"
  17. 190 f$(7)="[210]echenvorschrift[146] nicht eindeutig!"
  18. 200 f$(8)="[197]ine [198]unktion braucht ein [193]rgument![146]"
  19. 210 f$(9)="[196]ie [198]unktionsvorschrift ist zu lang![146]"
  20. 220 f$(10)="[210]echenvorschrift[146] nicht eindeutig!"
  21. 230 f$(11)="[197]in [198]ehler in den [194]etragsstrichen![146]"
  22. 240 f$(12)="[194]itte klammere[146] [218]aehler und [206]enner ein![146]"
  23. 250 f$(13)="[211]yntaxfehler[146] allgemeiner [193]rt!"
  24. 260 f$(14)="[196]ie [214]ariable 'x'[146] fehlt!"
  25. 270 f$(15)="[197]in [212]astendruck[146] bitte..."
  26. 280 f$(16)="[147][196]ef'lueckensuche..."
  27. 290 f$(17)="[201]ch pruefe den [206]enner..."
  28. 300 f$(18)="[201]ch suche [198]unktionsbedingte [204]uecken..."
  29. 310 f$(19)="[201]ch suche [208]otenzbedingte [204]uecken..."
  30. 320 f$(20)="[201]ch klaere die [194]ereiche ab..."
  31. 330 f$(21)="[201]ch vereinfache die [215]erte..."
  32. 340 f$(22)="[147][206]ullstellensuche..."
  33. 350 f$(23)="[147]  [194]itte geben [211]ie die [198]unktion ein:"+chr$(141)
  34. 360 f$(23)=f$(23)+"([200][146] fuer [200]ilfe)"
  35. 370 f$(24)=" [198]unktion berechnen?"
  36. 380 f$(25)="[211]yntax [201]      "
  37. 390 f$(26)="[145][211]yntax [201][201]     "
  38. 400 f$(27)="[145][208]otenzen      "
  39. 410 f$(28)="[145][205]alzeichen    "
  40. 420 f$(29)="[145][203]lammern [201]    "
  41. 430 f$(30)="[145][203]lammern [201][201]   "
  42. 440 f$(31)="[145][203]lammern [201][201][201]  "
  43. 450 f$(32)="[145][204]og,[204]n,e      "
  44. 460 f$(33)="[145][203]lammern [201][214]   "
  45. 470 f$(34)="[145][212]okens        "
  46. 480 f$(35)="[145]'[208][201]'          "
  47. 490 f$(36)="[145][194]etraege      "
  48. 500 f$(37)="[145][212]angens       "
  49. 510 f$(38)="[145] [193]lles klar? [196]rucker eingeschaltet?"
  50. 520 f$(39)="[147] [194]itte haben [211]ie 9 [205]inuten [199]eduld..."
  51. 530 f$(40)="[147] [215]as soll geschehen?"
  52. 540 f$(41)=" [197]ine neue [198]unktion  ----[198]1[146]"
  53. 550 f$(42)=" [199]raphik ansehen     ----[198]3[146]"
  54. 560 f$(43)=" [199]raphik drucken     ----[198]5[146]"
  55. 570 f$(44)=" [198]ehlendes berechnen ----[198]7[146]"
  56. 580 f$(45)=" [206]eues [201]ntervall     ----[198]2[146]"
  57. 590 f$(46)=" [208]rogramm verlassen  ----[198]8[146]"
  58. 600 f$(47)="[145][193]lles klar!   "
  59. 610 f$(48)=" [206]ein  ([218]urueck)  --[198]1[146]"
  60. 620 f$(49)=" [202]a    ([215]eiter )  --[198]7[146]"
  61. 630 f$(50)=" [215]elches [201]ntervall?"
  62. 640 f$(51)=" [- 4; 4]   ---[198]1[146]"
  63. 650 f$(52)=" [- 8; 8]   ---[198]3[146]"
  64. 660 f$(53)=" [-16;16]   ---[198]5[146]"
  65. 670 f$(54)=" [-32;32]   ---[198]7[146]"
  66. 680 f$(55)=" [198]unktion zeichnen?"
  67. 690 f$(56)=" [196]ef'luecken berechnen?"
  68. 700 f$(57)=" [206]ullstellen berechnen?"
  69. 710 f$(58)=" [197]xtremwerte berechnen?"
  70. 720 f$(59)="[147][197]xtremwertsuche..."
  71. 730 f$(60)=" [201]st das [201]ntervall gut gewaehlt?"
  72. 740 f$(61)="[201]ch pruefe die [199]ueltigkeit..."
  73. 750 f$(62)="[145]                                       [145][145]"
  74. 760 open15,8,15,"s:strings":close15:open1,8,1,"strings"
  75. 770 forf=1to 62:print#1,chr$(34)+f$(f)+chr$(34):next
  76. 780 close1
  77. 790 :
  78. 800 end
  79. 810 :
  80. 10000 open15,8,15,"s:smacher":close15:save"smacher",8:verify"smacher",8
  81.