★ APPLICATIONS ★ PROGRAMMATION ★ STRUKTO (CPC MAGAZIN) ★ |
STRUKTO (CPC MAGAZIN) | Update zu Strukto (CPC Magazin) |
Im Programm "Strukto” (Schneider Magazin 3/87, S. 66f.) haben sich leider einige Bugs eingeschlichen, die sich unter bestimmten Bedingungen bemerkbar machen können. So ist in Zeile 1850 das Statement zz$ = LEFT$ (z$, i-LEN(z$)*(i=0)) zu ersetzen durch: MID$ (zz$,1) = no$:MID$ (zz$,1) = LEFT$ (z$,i-zend*(i=0)) Zeile 1930 muß folgendermaßen lauten: 1930 IF VAL (z$) THEN MID$ (z$,6) = LEFT$ (z$,5):MID$ (z$,1) = "GOTO” In Zeile 3860 ist an Stelle des Statements NEXT i, j zu schreiben: NEXT i:NEXT j Letzteres ist übrigens kein Programmierfehler, sondern wird bedingt durch eine Eigentümlichkeit des Basic-Inter-, preters, der bei der ersten Schreibweise leicht verrückt spielt, wenn die innere FOR-Schleife nicht durchlaufen wird. Weiterhin stand in der Beschreibung auf S. 67, Initialisierungsanweisungen für den Drucker ließen sich an Zeile 280 anhängen. Da das Programm aber vor dem Abdruck umnumeriert wurde, muß es richtig Zeile 1260 heißen. Gerd Cebulla, CPC Magazin |
|
|