Defusr - NCR GW-BASIC Betriebsanleitung

DEF USR-Befehl
Syntax:
Verwendung:
Bemerkungen:
Beispiel:
GW-BASIC
DEF USR [<Ziffer>] =<ganzzahliger Ausdruck>
Gibt die Anfangsadresse einer Subroutine in der
Assemblersprache an.
"Ziffer" kann eine beliebige Ziffer von 0 bis 9 sein.
Die Ziffer entspricht der Nummer der USR-
Subroutine, deren Adresse angegeben wird. Wird
"Ziffer" weggelassen, so wird von DEF USRO aus­
gegangen. Der Wert des „ganzzahligen Ausdrucks"
ist die Startadresse des Relativzeigers der USR-
Subroutine zu dem Segmentwert, der benutzt wird,
wenn die USR-Subroutine aufgerufen wird.
Dieselbe "Ziffer" kann in mehr als einem DEF
USR Befehl benutzt werden, wobei dieser Ziffer
dann eine neue Adresse zugewiesen wird. GW-
BASIC erkennt stets die als letztes zugewiesene
Adresse. Dadurch kann auf mehr als zehn Subrouti­
nen zugegriffen werden.
200 DEF USR0=24000
210 X=USR0(YA2/2.89)
Zeile 200 definiert die Startadresse einer in der
Maschinensprache geschriebenen Subroutine als
24000. Zeile 210 weist der Variablen X das Ergebnis
der Funktion zu, die die Subroutine mit dem Wert
des in Klammern angegebenen Ausdrucks ausfuhrt
(siehe USR).
Muß auf eine Subroutine über eine absolute Spei­
cheradresse zugegriffen werden, so betrachten Sie
bitte folgendes Beispiel:
200 DEF SEG - 0
210 DEF USRO = ABSADDR%
300 RESULT = USRO(INFO)
wobei ABSADDR°/o die absolute Speicheradresse
der Subroutine enthält, auf die in Zeile 300 zuge­
griffen wird.
GW-BASIC-BEFEHLE UND FUNKTIONEN

DEFUSR

4-71