Danke PMroz, funktioniert super.
Gen
In JSL scheint es keine Vorzeichenfunktion zu geben.Benötigen Sie eine Zeichenfunktion?Etwas, das 1 für positiv, 0 für null und -1 für negativ zurückgibt?Hier ist eine Lösung:
/*
Funktionsname: sign
Beschreibung: Gibt 1 zurück, wenn positiv, 0 für Null, -1 für negativ
Argumente:
eine Nummer Nummer zum Testen
*/
Zeichen = Funktion ( { eine Nummer } ,
{ Standardmäßig lokal } ,
sign_value = . ;
Wenn ( ! ist leer ( eine Nummer ) ,
Wenn ( eine Nummer > 0 ,
sign_value = 1 ,
eine Nummer == 0 ,
sign_value = 0 ,
eine Nummer < 0 ,
sign_value = - 1
) ;
) ;
// Den Vorzeichenwert zurückgeben
sign_value ;
) ;
Beispielverwendung:
A = Zeichen ( 47 ) ;
drucken ( A ) ;
B = Zeichen ( 0 ) ;
drucken ( B ) ;
C = Zeichen ( - 999999 ) ;
drucken ( C ) ;
Ergibt im Protokollfenster Folgendes:
1
0
-1
