Janosch's Funktionssammlung

Name

Charin

Syntax

zeichen = Charin( [inpFile[, [start][, anzahl]] ) [;]

Beschreibung

Lesen Zeichen aus einer Eingabedatei oder aus einem Eigabegerät z. B. stdin.

Aufrufparameter

Parameter

Beschreibung

inpFile

Entweder der Name einer Eingabedatei bzw. eines Eingabegerätes oder eine Variable die diesen Namen enthält oder ein Ausdruck, der diesen Namen liefert.

start

Zeichenposition, ab der die Datei die Eingabedatei gelesen werden soll.

len

Anzahl von Zeichen, die gelesen werden soll.

Standardwerte

Parameter

Wert

inpFile

Standardeingabegerät (stdin) - meist die Tastatur.

start

1 oder aktuelle Leseposition (siehe Bemerkung)

anzahl

Rückgabewerte

Name/Wert

Rückgabewert

zeichen

Eine Zeichenkette bestehend aus der Anzahl anzahl von Zeichen, die aus der Eingabedatei bzw. aus dem Eingabegerät gelesen wurde.

Bemerkungen

Für jede geöffnete Eingabedatei wird von REXX ein Zeiger verwaltet, der die aktuelle Leseposition angibt. Wenn beim Aufruf von Charin der Parameter start nicht angegeben wird, so beginnt der Lesevorgang ab der in dem Zeiger abgespeicherten aktuellen Position.

Der Parameter anzahl gibt an, wie viele Zeichen in einem Lesevorgang gelesen werden. Wenn die Anzahl mit 0 angegeben wird, so wird der Zeiger für die aktuelle Position auf start gesetzt. Es werden dabei keine Zeichen gelesen.

Beim Lesen von einem Eingabegerät (z. B. Tastatur) wartet die Funktion bis alle Zeichen (anzahl) verfügbar sind. Die Eingabetaste übergibt 2 Zeichen (x0D0A - CR und LF - Wagenrücklauf und Zeilenvorschub), beendet aber die Eingabe nicht.

Beispiel 1

zeichen = Charin()

Ergebnis 1

Liest ein Zeichen von stdin

Beispiel 2

zeichen = Charin( ,, 5 )
Say C2X( zeichen )

Ergebnis 2

31320D0A33

Wenn 12[Eingabetaste]3 eingegeben wurde.

Beispiel 3

inpFile = "c:\myrexx.rex"
anzahl = Chars( inpFile )
zeichen = Charin( inpFile, 1, anzahl )

Ergebnis 3

Die ganze Datei (inklusive Sonder- und Steuerzeichen) werden in die Variable zeichen eingelesen.

Beispiel 4

inpFile = "c:\myrexx.rex"
zeichen = Charin( inpFile, 1, 10 )

Ergebnis 4

/* REXX */

(möglicherweise)

Your privacy: This web site has no cookies, no advertising and does not provide access data to anyone for any reason.
Copyright © Janosch R. Kowalczyk 1999, 2010. All rights reserved.
Most recent revision on 11 May 2010 (131) - 12:41:49.