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