:œLEXIKON,èŒ45000:Œ6000:™:Ý4,22,4,36sòž"Im LEXIKON sind die wichtigsten KC-Kommandos und BASIC-Befehle¤üž:žâ7,0;"alphabetisch";:ž" beziehungsweiseØž:žâ7,0;"logisch-zusammenh{ngend";:ž" geordnet ž"mit Hilfe der ";â7,0;"Men}";:ž" - Technik er- kl{rt.Tž:ž:ž"F}r Parameter, die wahlweise auf-treten k|nnen, werdenŒ$ž:ž"  ¡ benutzt;":ž:ž"< > kennzeichnet Taste.³.Ý0,31,0,39:é30,29:ž"":Œ6500Î8Š Å(509)µ³13 ©1080:Ô ÜÿBÝ0,31,0,39:™:žá(3,12);â7,0;"BASIC - LEXIKON"HLZ$´"Zeichen":ST$´"String":P$´"Programm":F$´"Funktion":L$´" "VA$´"Anweisung":C$´Ì(34):LF$´"liefert ":H$´"Handbuch":V$´"Variable"Ø`BW$´"Bitte w{hlen(0-":E$´" erforderlich":I$´" ":ZU$´"Zufalls"#jS$´"siehe ":G$´"(Standard: ":P1$´"programm":T$´"generator":R$´"Fehler"\tW$´"Fenster":Ý8,30,3,38:ž"1 - KC-BASIC (Allgemeines)š~ž:ž"2 - Kommandos des Interpreters":ž:ž"3 - BASIC-BefehleÖˆž:ž"4 - Mathematische "F$"en":ž:ž"5 - "Z$"ketten-"F$"en’ž:ž"6 - Sonstige "F$"en":ž:ž"7 - Operatoren (Rangfolge)Lœž:ž"8 - "R$"meldungen":ž:ž"0 - Verlassen des Lexikonsn¦ž:ž:ž:ž:žâ7,0;BW$;"8):":Œ6500”°E´Å(509):I´E­48:ŠIµ0²I³8©1200:Ô Ü£ºÝ0,31,0,39ÛÄ™:‘I¬1ˆ5510,1230,1380,1880,2870,2980,3120,3360,3500 ÎÝ3,31,2,38:žá(1,8);â6,0;"KC-BASIC (Allgemeines):O Øž"Der BASIC-Interpreter unterscheidet zwischen Zahlen ";s âž"und "Z$"ketten ("ST$"s).":žµ ìž"Der Interpreter verarbeitet Zahlen mit einem Betrag von";ò öž" 9.40396E-39 bis 1.70141E+38 einschlie~lich der Null. # žST$"s d}rfen bis 255 "Z$" lang sein. "ST$;_ ž"-Konstante sind in Anf}h-rungszeichen einzuschlie~en. ž:žV$"nnamen m}ssen mit einem Buch-staben ";Ì ž"beginnen und k|nnen beliebig lang sein. Es werden "; (ž"aber NUR die 2 ersten "Z$" des Namens verarbei- tet. Der ";L 2žV$"nname darf kein BA- SIC-Schl}sselwort enthalten. ";„ <ž"Ein $- "Z$" am Ende des "V$"nnamens weist sie";» Fž" als "ST$"-"V$" aus.":ž:ž"Feldvariable k|nnen "; Pž"so viele Indizes haben, wie eine Eingabezeile aufneh- men kann.@ Zž:ž"Eine BASIC-Zeile ist maximal 72 Zei- chen lang.":ˆ1070 dK$´"Kassette":žá(1,10);â7,0;"Interpreter-Kommandos:":Œ6500¹ nÝ6,25,10,35:ž"1 - AUTO....CLOAD":ž:ž"2 - CLS.....EDIT÷ xO$´"orrektur":ž:ž"3 - KEY.....LOAD":ž:ž"4 - NEW.....WIDTH! ‚ž:ž"0 - Hauptmen}":ž:ž:žâ7,0;BW$;"4):F ŒE´Å(509):I´E­47:ŠIµ1²I³5©1420:ÔÜs –™:Ý3,31,2,38:‘Iˆ1090,1440,1540,1650,1760º  ž"AUTO zeile ,abstand¡¡":žI$"Automatische Zeilennumerie- "I$"rung𠪞I$G$"zeile=abstand=10)":žI$"-Verlassen mit 6´ž:ž"BLOAD Laden eines Maschinenpro- "I$"gramms vom BASIC ausd¾ž:ž"BYE R}cksprung ins Betriebssystem“Èž"CLEAR a1 ,a2¡¡":žI$"L|scht "V$"nspeicherÌÒžI$"a1: definiert "ST$"speicher-"¨12)"l{nge "G$"256) ÜžI$"a2: bestimmt obere RAM-Grenze"¨12)"neu "G$"RAM-Ende)":žDæž"CLOAD"C$"name"C$:žI$"L{dt BASIC-"P$" von":žI$K$:ž…ðž"CLOAD*"C$"name"C$";feldname":žI$"L{dt angegebenes Feld von¢úžI$K$:žI$"-DIM "E$:ˆ1870Éž:ž"CLS L|scht aktuelles "W$:ž ž"CONT Setzt mit oder STOP un-"I$"terbrochenes "P$" an*žI$"gleicher Stelle fort`"ž:ž"CSAVE"C$"name"C$:žI$"Abspeichern eines BASIC-”,žI$P$"s auf "K$:ž:ž"CSAVE*"C$"name"C$";feldnameÆ6žI$"Speichert angegebenes Feld":žI$"auf "K$:ž @ž"DELETE z1 ,z2¡":žI$"BASIC-Zeile(n) z1 (bis z2) "I$"l|schen1Jž:ž"EDIT z ":žI$P$"k"O$" ab Zeile zXTžI$"<"Ì(141)"> - K"O$" abspeichern~^žI$"<"Ì(138)"> - K"O$" ignorieren¢hžI$" - EDIT beenden":ˆ1870îrž"KEY n "F$"stastenbelegung mit":žI$Z$"folge, auch Steuerzei-"I$"chen1|žI$"-Beenden mit ":žI$"-K"O$" mit ":žI$" (1<=n<=12)g†ž:ž"KEYLIST Listet "F$"stastenbele-":žI$"gung auf©ž:ž"LINES n Festlegen der Zeilenanzahl "I$"bei LIST "G$"10)Òšž:ž"LIST z¡ Listet "P$" (ab Zeile z) ¤ž:ž"LIST#n"C$"name"C$:žI$"Ausgabe des "P$"listings>®žI$"auf ein mit n w{hlbares Peri-"I$"pherieger{tp¸ž:ž"LOAD#n"C$"name"C$:žI$"Einlesen mit LIST#n‹ÂžI$"ausgegebener "P$"eÇÌžI$"n: 0-Bildschirm und Tastatur":žL$" 1-"K$"nrecorderôÖžI$" 2-Drucker, Plotter, Floppy":ˆ1870+àž"NEW L|scht "P$"- und Variab- "I$"lenspeicherhêž:ž"RENUMBER  z1,z2 ,z3,s¡":žI$"Neunumerierung der "P$"-«ôžI$"zeilen z1 bis z2, beginnend":žI$"mit z3 und Schrittweite sèþžI$G$"z3=z1, s=10)":ž:ž"RUN z¡ L|scht "V$"nspeicher undžI$"startet BASIC-"P$" (ab "I$"Zeile z)":žbž"TRON Kontroll-Modus (Anzeige abge-"I$"arbeiteter Zeilennummern)œžI$"einschalten":ž"TROFF Kontroll-Modus ausschaltenÅ&ž:ž"SWITCH m ,c¡":žI$"Modulschaltungó0žI$"m-Steckplatzadresse":žI$"c-Steuerbyte/:ž:ž"WIDTH n Festlegen der L{nge n der":žI$"AusgabezeileYDžI$G$"n=255)":žI$"(auch f}r Drucker!)iNŒ5010:ˆ1380œXžá(1,10);â7,0;"BASIC-Befehle":Ý6,29,6,30:Œ6500Íbž:ž"1 - BEEP.....COLOR":ž:ž"2 - DATA.....FORlž:ž"3 - GOSUB....LOCATE":ž:ž"4 - ON.......POKE7vž:ž"5 - PRINT....PRINTAT":ž:ž"6 - PRESET...RESTORER€ž:ž"7 - REM......VPOKEŠž:ž"8 - WAIT.....WINDOW":ž:ž"0 - Hauptmen}œ”žá(27,6);â7,0;BW$;"8):ÁžE´Å(509):N´E­47:ŠNµ1²N³9©1950:ÔܨÝ3,31,1,38:™:‘Nˆ1090,1970,2090,2200,2320,2430,2580,2680,2790=²ž"BEEP n¡ Erzeugt n Piep-T|ne":žL$"n=1..255 "G$"n=1)…¼ž:ž"CALL i Ruft ein Maschinen"P1$:žL$"mit der Startadresse i auf.™ÆžL$"(i-dezimal)ÆО:ž"CALL*i wie CALL i ,(i-hexadezimal)Úž:ž"CIRCLE x,y,r ,f¡":žL$"Zeichnet Kreis um den Punkt5äžL$"(x,y) mit Radius r":žL$"(f=0..31 - Farbe)":ž‚îž"COLOR v,h":žL$"Einstellen Vorder- u.Hinter- "L$"grundfarbe v=0..15 ;";ºøž"h=0..7":žL$"(blinkend: v=v+16)":žL$"Farbcodes: ";ìž"0-schwarz 1-blau "L$"2-rot 3-purpur 4-gr}n$ žL$"5-t}rkis 6-gelb 7-wei~":žL$"(v=8..15 "S$H$")":žOž"INK v Einstellen Vordergrundfarbe ž"PAPER h Einstellen Hintergrundfarbe":ˆ2420¡*ž:ž"DATA w1,w2,.. "S$"READÜ4ž:ž"DEF FNname(argument)=ausdruck":žL$"Definiert "F$".ý>žL$"Aufruf: FNname(argument)<Hž:ž"DIM var1(index1,index2,...),var2...":žL$"Vereinbart ";jRžV$"nfelder":žL$"und setzt diese gleich 0 \žL$"bzw. "C$C$:žL$"(f}r indexi>10 notwendig !)":žäfž"DOKE i,w Schreibt Wert w in die":žL$"Speicherpl{tze i und i+1 pž:ž:ž"END Beendet ein "P$:žDzž:ž"FOR var=a TO e  STEP s¡":ž".... "L$P$"schleife:ƒ„ž"...."L$"a,e-Schleifenanfangs- ...."¨13)"bzw. -endwertÂŽž"...."L$"s -Schrittweite":ž"NEXT  var¡"¨7)G$"s=1)":ˆ2420˜ž"GOSUB z Ruft ein in Zeile z begin-":žL$"nendes Unter"P1$;E¢ž" (UP)":žL$"auf. UP mu~ mit RETURN abge-"L$" schlossen sein.h¬ž:ž"GOTO z Sprung zu Zeile z˜¶ž:ž"IF a THEN b  :ELSE c¡":žL$"Bedingte "A$ÇÀžL$"a -logischer Ausdruck":žL$"b,c-"A$"enâÊž:ž"INK v "S$"COLORÔž:ž"LINE x1,y1, x2,y2  ,f¡":žL$"Zeichnet Linie zwischenUÞžL$"Punkten (x1,y1) und (x2,y2)":žL$"(mit Farbe f)èžL$"xi=0..319; yi=0..255;"¨17)"f =0..31 ("S$"COLOR)":žÌòž"LOCATE z,s":žL$"Positioniert Cursor im Fen- "L$"ster üžL$"z=0..ze-za; s=0..se-sa":žL$"za,ze,sa,se-"W$"parameter& žL$"("S$"WINDOW)":ˆ2420W ž:ž"ON ausdr GOTO z1,z2,.. ,zn":žL$"oder":žy ž"ON ausdr GOSUB z1,z2,.. ,zn¼$ ž:žL$"Mehrfache "P$"verzweigung"L$"ausdr=1 => Sprung Zeile z1û. žL$"ausdr=2 - '' - z2 usw. ":žL$"ausdr<0 => FC ERROR 8 žL$"ausdr>n => n{chste ZeileL B ž:ž:ž"OUT i,b Gibt Byte b }ber Port i ausg L ž:ž"PAPER h "S$"COLORš V ž:ž:ž"PAUSE Unterbricht "P$:žL$"(= !)Ñ ` ž"PAUSE t Unterbricht "P$" t*0.1sec"L$"(t=1..255)!j ž:ž:ž"POKE i,b Schreibt Byte b in die Spei- "L$"cherzelle i!!t Œ5010:ˆ1880A!~ AS$´"Ausgabe":Z1$´"zeichen"d!ˆ ž"PRINT  ausdr¡ Trenn"Z1$"¡...—!’ ž:ž" ";â4,0;"Trenn"Z1$" bewirken Formatierung:Ð!œ ž:ž" ";â6,0;",";:ž" Tabellierte "AS$" (3 Berei-ì!¦ žI$"che mit je 13 "Z$")$"° ž:ž" ";â6,0;";";:ž" bei numerischen Ausdr}ckenS"º žI$AS$" mit je 1 Leer"Z1$L$" nach der Zahl"Ä ž:ž" ";â6,0;";";:ž" bei STRINGs erfolgt die Aus-­"Î žI$"gabe ohne Zwischenr{umeã"Ø ž:ž" ";â6,0;"SPC(n)";:ž" Erzeugt n Leer"Z1$" zwi-ø"â žI$"schen "AS$"n0#ì ž:ž" ";â6,0;"TAB(n)";:ž" Plaziert "AS$" ab Spalte na#ö ž:ž:ž:ž"PRINTAT(z,s) ;COLOR-anw¡;Print-Liste¤# ž:žI$"Plaziert "AS$" ab Zeile z "L$"und Spalte s. Statt COLORÙ# žI$"kann auch INK oder PAPER":žI$"stehen.":ˆ2420$ ž"PRESET x,y L|scht Bildpunkt (x,y)C$ ž:ž"PSET x,y ,f¡ Setzt Bildpunkt (x,y)"I$L$"(mit Farbe f)~$( žL$"x=0..319, y=0..255, f=0..31 "L$"(0,0)-links unten»$2 ž:ž:ž"RANDOMIZE":žI$" Initialisierung des "ZU$"- "L$T$"sñ$< ž:ž:ž"READ v1,v2,..":žL$"Ordnet "V$"n v1,v2,..die%F žL$"DATA-Werte ab DATA-Zeiger zu L%P ž"DATA w1,w2,..":žL$"Liste der durch READ zu le-€%Z žL$"senden Werte":žL$"w1,w2,.. -Konstantenliste³%d ž:ž"RESTORE  z¡":žL$"Setzt DATA-Zeiger auf denô%n žL$"Anfang der (in Zeile z":žL$"stehenden) DATA-Liste":ˆ2420&x ž:ž"REM  Kommentar¡":žL$"Kommentar-"A$I&‚ ž:ž"RETURN R}cksprung aus Unter"P1$ƒ&Œ ž:ž:ž"SOUND z1,v1,z2,v2 ,ls¡ ,td¡":ž:žL$"Erzeugt T|ne´&– žL$"zi=1..255 -Tonh|he"¨31)"(zi=0: kein Ton)ï&  žL$"vi=0,1 -Vorteiler f}r Ton-"¨20)"kan{le 1 bzw. 2'ª ž¥20)"("S$H$")9'´ žL$"ls=0..31 -Lautst{rke":žL$"td=1..255 -TondauerU'¾ ž¥20)"(td=0 - Dauerton)Š'È ž:ž"STOP Stoppt "P$¨23)"Fortsetzung mit CONT¾'Ò ž:ž"VPOKE z,b":žL$"Schreibt Byte b in die Spei-ñ'Ü žL$"cherzelle z im IRM.":žL$"z=0..16383":ˆ2420'(æ ž:ž"WAIT i,j ,k¡":ž:žL$P$" wartet,bis am Port i";b(ð žL$"das aus j und k gebildete"¨13)"Bitmuster erscheint„(ú žL$G$"k=0)":žL$"("S$H$")":ž:ž¾( ž"WINDOW za,ze,sa,se¡":ž:žL$"Unterteilt Bildschirm inæ( žL$W$:žL$"za -erste Zeile des "W$"s) žL$"ze -letzte -''-"¨27)"(0<=za<=ze<=31)^)" žL$"sa -erste Spalte des "W$"s"L$"se -letzte -''-"¨27)"(0<=sa<=se<=39)), žL$G$"za=1, ze=30"¨27)"sa=0, se=39)":ˆ2420´)6 žá(1,5);â7,0;"Mathematische "F$"enå)@ Ý4,31,1,38:ž"ABS(x) - absoluter Betrag von x*J ž:ž"EXP(x) - e^x, x<=87.3365&*T ž:ž"INT(x) - ganzer AnteilO*^ ž:ž"LN(X) - nat}rlicher Logarithmusu*h ž:ž"PI = 3.14159 (Konstante)¯*r ž:ž"SGN(x) - Vorzeichen: =-1 bei x<0"¨27)"= 0 bei x=0ä*| ž¨21)"= 1 bei x>0":ž:ž"SQR(x) - Quadratwurzel":ž$+† ž"ATN(x) - arctan x":ž:ž"COS(x) - cos x":ž:ž"SIN(x) - sin x[+ ž:ž"TAN(x) - tan x,";â5,0;"alle Winkel im Bogenma~Œ+š ž¨7)â5,0;"x: Konstante,"V$", Ausdruck":ˆ1070Ï+¤ S$´" ":Ý3,31,2,38:žá(1,6);â7,0;Z$;"ketten-"F$"en ,® ž"ASC(X$) - ASCII-Code des 1.Zei- "S$"chens von X$C,¸ ž"CHR$(n) - das n-te "Z$" des":žS$"ASCII-Codes~, ž"INSTR(Y$,X$) - Anfangsposition des":žS$ST$" Y$ in X$Ç,Ì žS$"0-wenn nicht enthaltenLEFT$(X$,n) - die linken n "Z$S$" von X$ì,Ö ž"LEN(X$) - L{nge von X$":ž.-à ž"MID$(X$,n,m) - m "Z$" von X$, be-"S$" ginnend mit dem n-ten_-ê ž"RIGHT$(X$,m) - die letzten m "Z$S$" von X$“-ô ž"STRING$(n,X$)- vervielfacht "ST$" X$"S$"n malÐ-þ ž"STR$(n) - formt den Wert n in":žS$"einen "ST$" um. ž"VAL(X$) - numerischer Wert von "S$"X$, soweit der Inhalt?. žS$"eine Zahl darstellt, "S$"sonst 0|. ž"VGET$ - Inhalt der Cursorposi-"S$"tion als "ST$”.& žS$"(1 "Z$")":ˆ1070·.0 žá(1,10);â7,0;"Sonstige "F$"enì.: Ý4,31,1,38:ž"CSRLIN(n) Zeilennummer des Cursors/D ž:ž" bei n=0 -bez}glich max. "W$"sQ/N ž" bei n>0 -bez}glich aktuell."W$"s bei n<0 -FC-ERROR”/X ž:ž:ž"DEEK(i) liest Inhalt der Speicher-"¨12)"pl{tze i und i+1¥/b ž:ž"FRE(var)ê/l žI$"Gr|~e des noch freien RAM-":žI$"Speicherplatzes, bzw. "ST$"-0v žI$"speicherplatzes, je nach Typ":žI$"von vara0€ ž:ž"INKEY$ liest von der Tastatur ohne "L$P$"unterbrechung und0Š žI$"ohne <"Ì(141)"> 1 "Z$:žÃ0” ž"INP(i) "LF$"das vom Port i gele- "L$"sene Byte (i=0..255)1ž ž:ž"PEEK(i) "LF$" Inhalt der Spei-":žI$"cherzelle i":Œ5010F1¨ ž:ž"POS(I) "LF$"die aktuelle Schreib-"L$"position in der ZeileW1² ž:ž"PTEST(x)—1¼ žI$F$" testet, ob Bildpunkt"L$"mit x-Komponente gesetzt istË1Æ žI$"(y-Komponente entspricht":žI$"letzter "A$")2Ð ž:ž"RND(x) erzeugt "ZU$"zahlen zwi-":žI$"schen 0 und 1.2Ú ž" bei x>0-v|llig zuf{llige ZahlenX2ä ž" bei x=0-Wert der letzten "ZU$"zahl‹2î ž" bei x<0-Neuinitialisierung des"¨16);ZU$T$"s¸2ø ž:ž:ž"USR(x) Aufruf eines Maschinenpro-ú2 žI$"gramms. Startadresse mu~ in"L$" Speicherzelle 772 stehen+3 ž:ž"VPEEK(z)":žI$"liest Inhalt der Speicher-W3 žI$"zelle z im IRM (z=0..16383)":ˆ1070Œ3 Ý3,31,2,38:žá(1,10);â7,0;"Operatoren (Rangfolge)Ò3* ž"Die Rangfolge bei der Abarbeitung vonAusdr}cken ergibt sich "; 44 ž"aus folgenderTabelle der verf}gbaren Operatoren,54> ž"beginnend mit der h|chsten Priorit{t:i4H ž:ž" 1. Klammern, "F$"en":ž" 2. Potenzieren (^)‡4R ž" 3. Negative Vorzeichen²4\ ž" 4. Multiplikation, Division (* , /)Ú4f ž" 5. Addition, Subtraktion (+ , -)5p ž" 6. Vergleiche (=, <, >, <=, >=, <>)+5z ž" 7. NOT":ž" 8. AND":ž" 9. OR":žl5„ ž:ž"Die logischen Operatoren wirken bit-weise auf 16-Bit-";¦5Ž ž"Integerzahlen im Be-reich von -32768 bis +32767.":žß5˜ ž"Die Vergleichsoperatoren und die Ad- dition als ";6¢ ž"Verkn}pfung sind auch auf "ST$"s anwendbar.":ˆ1070Q6¬ Ý3,31,1,37:N$´" ":žá(1,12);â7,0;"FEHLERMELDUNGEN:™6¶ ž"Ist ein "R$" aufgetreten, kehrt derBASIC-Interpreter auf die ";¶6À ž"Kommando-ebene zur}ck.æ6Ê ž:ž:ž"Format der "R$"meldungen:":ž×(26,"=")7Ô ž:ž"Direkt-Modus: ";â5,0;"?xx ERROR97Þ žP$"-Modus: ";â5,0;"?xx ERROR IN zl7è ž:ž"(xx-"R$"code; z - Zeilennummer)":ž:ž:ž:ž:ž§7ò žá(18,5);â6,0;R$"codes:":ž"BAD "R$" beim Laden oder ";Ã7ü ž"Retten von Feldernÿ7ž"BS Feldelement au~erhalb des dimen-"N$"sionierten ";8ž"Bereiches aufgerufenS8ž"CN "P$" kann nicht mit CONT fort- gesetzt werden8$ž"DD Feld mehrfach dimensioniert":Œ5010¡8.ž"FC unzul{ssiger "F$"saufrufÍ88ž" -aktuelle Parameter kontrollieren!ù8Bž"ID unzul{ssige Eingabe im Direktmodus=9Lž"IO Ein-, Ausgabefehler (meist falscher Name beim "P$"laden)_9Vž"LS "ST$" l{nger als 255 "Z$Š9`ž"MO Operand fehlt":ž"NF NEXT ohne FOR³9jž"OD zu wenig Daten in DATA f}r READÛ9tž"OM Speicherplatz reicht nicht ausû9~ž"OS "ST$"speicher ist voll>:ˆž"OV Ergebnis einer Berechnung ist":ž" gr|~er als 1.70141E38~:’ž"RG RETURN ohne GOSUB (Haupt"P1$N$" mit END abschlie~en!)¬:œž"SN syntaktischer "R$:ž"ST "ST$" zu langò:¦ž"TM Verwechselung oder unzul{ssige Paa- rung von numerischen";;°ž" und "ST$"-"N$" Werten3;ºž"UF "F$" noch nicht definierth;Äž"UL Angegebene Zeilennummer existiert nichtŒ;Ξ"/0 Division durch Null":ˆ1070—;ˆœENTER¾;’Ý3,31,1,38:é27,28:ž"":Œ6500Õ;—Š Å(509)µ³13 ©5015Ý;˜™:æ;|œENDý;†™:žá(15,17);"ENDE"<Ý 0,31,0,39:Œ6500<š€#°Ý0,31,0,39:â7,3:™:Ý11,31,3,36::™:žá(7,6);"LEXIKON"È=ú¯žá(10,6);"(BASIC-UEBERSICHT)"â=°E´Å(509):Š E´0 ©45060ê=°Ü2 >°Ý0,31,0,39:â7,3:™