SelfProfan²:Vergleiche

Vergleiche

Es gibt sogennante vergleiche,hier ein kleines Beispiel,die Erklärung folgt:
Declare var1$,var2$,z1%,z2%
print "Bitte geben sie ihren Namen ein:";
Input var1$
print "Bitte geben sie den Namen eines Freundes von ihnen ein:";
Input var2$
print "Bitte geben sie ihr Alter ein:";
Input z1%
print "Bitte geben sie das Alter des Freundes ein:";
Input z2%
' Hier kommen die Vergleiche und immer wenn ein Anführungszeichen kommt(das,dass am
' Anfang der Zeile steht),wird dieser Abschnitt nach dem Zeichen Ignoriert.
If Equ$(var$,"Michael")
print "Aber hallo!Ich heiße auch Michael!"
ElseIf Equ$(var$,"Enrico")
print "Nett,dich mal wieder zu treffen!"
ElseIf Equ(z1%,11)
print "Na sieh mal an,Genauso alt wie ich!"
ElseIf Equ(z2%,20)
print "Schon so alt?"
Else
print "Nichts von dir Bekannt,keine Spezielle begrüßung oder anderes..."
EndIf
Erklärung:
Bis zu dem Kommentar verstehst du sicher alles(es wird ein Name angefordert...).
Danach kommt der Vergleich:
If Equ$(var1$,"Michael")
<... Tue irgendetwas ...>
ElseIf Equ$(var2$,"Enrico")
<... Tue etwas,falls der Name des Freundes "Enrico" ist ...>
Else
<.. Falls kein Vergleich zutrifft,tue das hier ...>
EndIf
If ist Englisch und bedeutet so viel wie "wenn". Equ$ bedeutet,dass 2 Strings miteinander
verglichen werden. Equ bedeutet,dass 2 Integer miteinander verglichen werden.Es ist auf das
$ zu achten,dass verändert alles. Außerdem muss der Wert des Strings in " stehen. Eine
zweite möglichkeit wäre, dass man es so schreibt:
If Equ$(var1$,var2$)
Das wäre dann ein Vergleich von zwei Blättern! Das selbe geht mit Zahlen.
ElseIf ist ebenfalls Englisch und bedeutet in etwa "Oder Wenn noch...".
Dort kann ebenfalls eine Anweisung stehen, die Syntax(Stellung) ist genauso wie bei If.
Da bekanntlich alle guten Dinge 3 sind, gibt es noch den 3.ten Anweisungspunkt:
Else
Else kann ich nicht richtig übersetzen, aber vom Sinn her ist es so zu verstehen, dass
die Anweisung, die nach Else kommt, die Anweisung ist, die Erfüllt wird, wenn keine der
anderen Vergleiche Zutreffen. Zum Schluss muss der Vergleich beendet werden. Hier
eine Liste der möglichen Bedingungen:

Name Bedeutung Beispiel
Equ Vergleich von 2 Zahlen If Equ(zahl1%,zahl2%)
Equ$ Vergleich von 2 Blättern If Equ$(blatt1$,blatt2$)
Neq Vergleich,bei dem keine Gleichheit,sondern Ungleichheit zählt. If Neq(zahl1%,zahl2%)
Neq$ Vergleich,bei dem keine Gleichheit,sondern Ungleichheit zählt. If Neq$(blatt1$,blatt2$)
Gt Wenn Wert 1 größer als Wert 2 ist... If Gt(zahl1%,zahl2%)
Gt$ Wenn Blatt1 größer als Blatt2... If Gt$(blatt1$,blatt2$)
Lt Wenn Wert 1 kleiner als Wert 2 ist... If Lt(zahl1%,zahl2%)
Lt$ Wenn Blatt1 kleiner als Blatt2 ist... If Lt$(blatt1$,blatt2$)


Einführung
Grundlagen
Windows-Modus
Anhang

(©) Michael Stapelberg