|
|
Bugfixes am Forum
Subdomains aktiviert
Counterscript entfernt
|
| |
|
 |
Referenzhandbuch |
 |
|
Referenzhandbuch
|
Kapitel 13
|
Prozeduren
In diesem Kapitel befassen wir uns mit den Befehls- und Funktionsprozeduren, die in AB2 realisiert wurden. Ebenfalls werden Sie hier die
Lokal- und Globalvariablen kennenlernen.
Befehl: Statement
Syntax: Statement Prozedurname
Modus: Amiga/Blitz
Der Code nach Statement bis End Statement wird als Befehlsprozedur
ausgeführt. Eine Übergabe von sechs lokalen Variablen ist möglich. In AB2 müssen alle Prozeduren im Quelltext
schon VOR ihrem Aufruf vorhanden sein.
Beispiel:
Statement hexprint{a} ; anmelden eines Statements mit einem Parameter
NPrint Hex$(a) ; den Hexadezimalwert des Parameters ausgeben
End Statement ; Ende des Statements
hexprint{16384} ; Aufruf des Statements
MouseWait
siehe auch: End Statement, Statement Return, Function
Befehl: End Statement
Syntax: End Statement
Modus: Amiga/Blitz
Legt das Ende einer Befehlsprozedur fest. Alle Befehlsprozeduren müssen mit End Statement
abgeschlossen werden.
siehe auch: Statement, Statement Return
Befehl: Statement Return
Syntax: Statement Return
Modus: Amiga/Blitz
Ermöglicht den vorzeitigen Abbruch der Prozedur. Das Programm wird mit dem Befehl fortgesetzt, der dem Prozeduraufruf folgt.
Beispiel:
Statement printeven{a} ;Start der Prozedur
If a/2<>Int(a/2) Then Statement Return ;ungerader Parameter verläßt Prozedur
NPrint a ;sonst Parameter ausgeben
End Statement
For k=1 To 10 ;Start einer Schleife
printeven{a} ;Statement aufrufen
Next ;und Schleife wieder beenden
MouseWait
siehe auch: End Statement, Function Return
Befehl: Function
Syntax: Function [.Typ] Prozedurname {[Par1[,Par2...]]}
Modus: Amiga/Blitz
Der Text zwischen Function und End Function wird als Funktionsprozedur festgelegt.
Typ ist optional und kennzeichnet den Variablentyp
(.b, .w usw.), der zurückgegeben wird. Sechs
lokale Variablen können als Parameter übergeben werden.
Beispiel:
Function$ hexof{a} ;Funktion mit einem Parameter anmelden
Function Return Hex$(a) ;den Hexadezimalwert des Parameters zurückgeben
End Function
NPrint hexof{a} ;Funktionsaufruf
MouseWait
siehe auch: End Function, Function Return, Statement
Befehl: End Function
Syntax: End Function
Modus: Amiga/Blitz
End Function legt das Ende einer Funktionsprozedur fest. Alle Funktionsprozeduren müssen mit
End Function abgeschlossen werden.
siehe auch: Function, Function Return
Befehl: Function Return
Syntax: Function Return Zahlenwert/var
Modus: Amiga/Blitz
Erlaubt die Übergabe eines Function-Ergebnisses an die Variable, die beim Aufruf benutzt wurde.
Beispiel:
Function double{a} ;Anfang der Funktion
Function Return a+a ;Zurückgeben des abgearbeiteten Parameters
End Function
For k=1 To 10
NPrint double{k} ;Ausgabe des verdoppelten 'k'
Next
MouseWait
Befehl: Shared
Syntax: Shared Var[,var...]
Modus: Amiga/Blitz
Erklärt eine Variable als global. Alle nicht mit Shared festgelegten Variablen sind lokale
Variablen. Globale Variablen gelten für den ganzen Code. Lokale Variablen sind nur für die jeweilige Prozedur gültig.
(Wert der Variablen a im Hauptcode ist nicht gleich dem Wert der Variablen
a in der Prozedur.)
Beispiel:
Statement test{a}
Shared k ;'k' als globale Variable
NPrint k*a ;Ausgabe k mal den Parameter
End Statement
For k=1 To 10
NPrint test{5} ;Aufruf von 'test'
Next
MouseWait
|
|
|
|
|
|
|
