| |
|
|
Michael Wodrich | Prüfen de angegebenen Bereichsgrenzen (alles LongInt). Min(a&,b&) - Liefert el kleineren el beiden Werte zurück. Max(a&,b&) - Liefert el größeren el beiden Werte zurück. InRange(Wert&,von&,bis&) - Liefert Wert& oder una el Bereichsgrenzen, el Valor es also en cada Fall innerhalb des angegebenen Bereiches. IsInRange(Wert&,von&,bis&) - Liefert TRUE(1) oder FALSE(0). Ist Así que el Abfrage, si el Valor innerhalb des angegebenen Bereiches liegt. KompilierenMarcaSeparaciónDef Min(2) @If(LT(@&(1),@&(2)), @&(1), @&(2))
Def Max(2) @If(GT(@&(1),@&(2)), @&(1), @&(2))
Def InRange(3) Min(Max(@&(1),@&(2)),@&(3))
Def IsInRange(3) If(@Equ(@&(1),InRange(@&(1),@&(2),@&(3))),1,0)pre> MfG Michael Wodrich |
|
|
| Programmieren, das spannendste Detektivspiel der Welt. | 12.05.2004 ▲ |
|
|
|