Hallo,
Zitat:
Zeile für Zeile wird ausgelesen, wird überprüft, ob Befehl vorhanden, ansonsten ein Syntaxfehler, wenn Befehl vorhanden dann (if-Abfrage für jeden Befehl) zugeordneten Befehl ausführen.
Schlimm wirds aber erst mit Schleifen und Bedingungen. Da werfe ich dann mit Arrays um mich.
Ein "wenn" erhöht die Variable "condsopen" um 1, ein ~wenn verringert sie um 1 usw...
ich weiss nicht ob ich dir damit helfen kann, aber ich würde eine Schleife wie im Assembler umsetzen:
Dazu brauchst du:
-die möglichkeit von "Goto"-Funktionen(Jumps)
-und eine interne Variable
Ein Beispiel (weis, ist nicht wirklick Assembler, für die Demonstartion reichst aber):
Delphi-Quellcode:
09:var counter //lokale Variable deklarieren
10:if counter > endcount then goto 14; //die überprüfung ob die Schleife schon fertig ist
11:{tu was in einer Schleife}
12:inc(counter); //Schleifenvariable um eins erhöhen
13:goto 10;
14:{tu das nach der Schleife}
Zu diesem Thema gibt es im Forum aber noch andere Beiträge. Alternativ könntest du dir ein ganz simples Delphi Porgramm schreiben und dort dir den Assembler-Code anzeigen lassen.