Befehl gesucht

[Simon (Gast)]

Hi,

Ich benutze mikroPascal for AVR und bräuchte eure Hilfe,
ich suche einen Befehl mitdem ich in einen anderen Programmabschnitt 
springen kann.
Also irgendwo einen Abschnitt deklarieren und an einer anderen Stelle 
des Programms so etwas wie "goto xy" benützen um zu dem aufgerufenen 
Abschnitt zu gelangen.

Ich hab es schon mit Labels vergeblich versucht, da spinnt das Programm 
nur rum.

Bsp:

abschnitt eins:
  begin
  befehl;
  end;
...
if x=1 then
  begin
  goto eins;
  end;

Ich hoffe ihr könnt mir helfen und sagen, wie ich das am besten mache
MfG

[Sven P. (Gast)]

Ne Prozedur/Funktion..?

[Thomas R. (Gast)]

Kein Mensch braucht einen "GOTO"-Befehl.
Kauf dir ein Pascal-Buch, dann lernst du, warum ich recht habe.

[Thomas R. (Gast)]

Ich habe vor 20 Jahren das letzte mal Pascal programmiert, aber ich 
glaube, das ging so:

PROGRAM ABC;
PROCEDURE eins;
BEGIN
   writeln('wer GOTO haben will, kann nicht programmieren');
END;

BEGIN   {  des Hauptprogrammes }
VAR x: Integer;
x:=1;
if x=1 then
  begin
    eins;
  end;
END;