Die Rechenoperationen in CP sind weniger zum Programmieren von Rechenprogrammen gedacht. Fuer Berechnungen von Datenadressen reichen positive ganze Zahlen von 0 bis 0xffff (65535) vollkommen aus, sowie die Grundrechenarten +, -, *, / und %. Der Operator % bedeutet keine Prozentrechnung, sondern eine Division, die den uebrigbleibenden Rest als Ergebnis liefert. Es gibt keine Punkt- vor Strichrechnung. Alle Operationen werden der Reihe nach ausgefuehrt. Bevor der Rechenbefehl erfolgt, muessen sich die Daten bereits in den Registern befinden.
Register
--------
CP besitzt zur Wertaufnahme zwei Register. Betrachten wir uns einmal die Berechnung a=5+3. In CP wuerde dieses lauten:
5 3 + a =
Werte werden an das Hauptregister HR uebergeben. Der Wert 5 wandert also in HR. Damit nicht genug, bei der Wertaufnahme wird ausserdem zuvor der fruehere Inhalt von HR an das Nebenregister NR weitergegeben. Nach 5 3 befindet sich 5 in NR und 3 in HR. Arithmetische und logische Befehle, die zwei Werte verknuepfen, legen das Ergebnis in HR ab. Nach 5 3 + befindet sich das Ergebnis 8 in HR. Der neue Wert a schiebt die 8 in NR weiter und legt die Adresse der Variablen a in HR ab. Was die Zuweisung '=' bewirkt, wurde erst teilweise besprochen. Sie uebergibt naemlich nicht nur den Inhalt von NR an die in HR enthaltene Adresse, sondern schiebt zusaetzlich den Inhalt von NR danach wieder in HR zurueck. Dadurch sind auch Mehrfachzuweisungen und Zwischenspeicherungen moeglich:
5 a = b =
Dies entspricht in BASIC a=5:b=a.
Nur maximal zwei Werte koennen von den Registern aufgenommen werden. Nach 1 2 3 befindet sich der Wert 2 in NR und 3 in HR, der Wert 1 ist nicht mehr vorhanden. Operationen wie a=5+3*4 sind, soll die Reihenfolge nicht veraendert werden, mit Hilfe von Klammern moeglich:
5 ( 3 4 * ) + a =
Durch die oeffnende Klammer wird HR auf einen Stapel gesichert. Die schliessende Klammer holt den gesicherten Wert vom Stapel zurueck, legt ihn allerdings nicht in HR sondern in NR ab, woraufhin die Verknuepfung + so erfolgen kann, als waere zur 5 lediglich ein neuer Wert 12 hinzugekommen. Es koennen ohne weiteres mehrere klammern geschachtelt werden. Aus Klammern darf nicht einfach mit go oder return herausgesprungen werden. Sov viele Klammern wie geoeffnet wurden, muessen auch wieder geschlossen werden, sonst kommt es unweigerlich zum Programmabsturz.
Manchmal moechte man auch gerne noch den Inhalt von NR verwenden, an den so einfach nicht ranzukommen ist, oder die Registerinhalte vertauschen. Hierfuer gibt es den Befehl swap:
5 a =
a 5 swap =
Eine Funktion kann durch Vertauschung mittels swap einen Wert in einer durch NR uebergebenen Adresse speichern. Von besonderer Bedeutung ist swap fuer Vergleiche mit nachfolgenden Verzweigungen. Verknuepfungsbefehle ausser / und % lassen naemlich den Inhalt von NR unveraendert, sodass dieser wieder in HR zurueckgeholt werden kann.
Logische Befehle
----------------
Logische Verknuepfungen sind and, or und xor. Die ersten beiden sind auch von BASIC her bekannt, da sie fuer logische Aussagen von Bedeutung sind. Sie lassen sich aber auch zur Bitmanipulation einsetzen. Der Befehl xor, fuer den es beim BASIC des C128 die eor-Funktion gibt, ist dann wahr, wenn genau eine von zwei Aussagen wahr ist. Waehrend bei Bitmanipulationen and zum Nullsetzen und or zum Einssetzen dient, koennen durch xor Bits invertiert werden.
Vergleiche
----------
Besonders wichtig fuer die Programmlogik sind Vergleiche. Die Vergleichsbefehle lauten ==, <>, <, >, <= und >=.
Auffallend sind die zwei Gleichheitszeichen beim Gleichheitsoperator. Schliesslich muss dieser ja von der Zuweisung '=' unterschieden werden. Als Ergebnis wird eine Null bei Nichtzutreffen erhalten, der Wert 0xffff beim Zutreffen. Da Vergleichsbefehle NR nicht beeinflussen, laesst sich durch swap oft die Verwendung einer Variablen sparen:
getc '1' == if lab1
swap '2' == if lab2
swap '3' == if lab3
Weitere Operatoren
------------------
Einige Operatoren verknuepfen nicht zwei Werte, sondern veraendern nur einen, naemlich den in HR.
Diese Befehle sparen nicht nur Schreibarbeit, sondern auch Klammern:
3 ( 5 2 * ) + a =
3 5 << + a =
Zuweisungsoperationen
---------------------
Befehle, die Operationen mit Zuweisungen kombinieren, tragen zu Schnelligkeit und Kuerze bei:
a ] 2 + a =
Dieses laesst sich kuerzer ausdruecken durch:
2 a +=
Es gibt die Befehle +=, -=, /=, %=, or=, and=, xor=, <<= und >>=. Die Kennung 'by' davor gibt an, dass eine Bytezuweisung erfolgen soll.
Ein kurzes Beispiel, das den wichtigen Vergleichsbefehl == und swap benuetzt, nimmt Ihre Eingaben an und schreibt sie auf den Bildschirm, bis Sie die Returntaste druecken.
