Free Form von LOOKUP

[tarkusch]

Hallo,

ich hätte gerne einen Sourcecode bearbeitet und habe da noch einige Flecken die nicht automatisch in Free übernommen werden.

Stimmt hier meine Umsetzung? Welche Stolpersteine würde es geben?



CL0N01Factor1+++++++Opcode(E)+Factor2+++++++Result ++++++++Len++D+HiLoEq
C SEARCH LOOKUP ARR(POS) 99
// // Lookup an Array element
// POS = %LOOKUP(SEARCH:ARR:POS);
// IF POS > 0;
// *IN55 = *ON;
// ELSE;
// *IN55 = *OFF;
// POS = 1;
// ENDIF;


lg

[Fuerchau]

Es gibt noch die Variante des Lookup, die alle Vorkommen in einem Ziel-Array liefert.
Für diese gibt es keine Entsprechung mehr in Freeform.

[Pikachu]

Nimm *IN99, dann paßt das besser. ;)

[tarkusch]

Ja, war leider ein Tippfehler 55 <==> 99