Sign( AnyValue )

AnyValue

Any numeric value, Or numeric expression that results in a numeric value.

'  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
'  Simple Print Statement Examples
'  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
PRINT Sign( 13 )     '  Returns  1 - Indicating Sign is Positive
PRINT Sign( -13 )   '  Returns -1 - Indicating Sign is Negative
PRINT Sign( 2 * 2 ) '  Returns  1 - Indicating Sign is Positive
PRINT Sign( -2 * 2 ) '  Returns -1 - Indicating Sign is Negative

Or

'  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
'  Control Sign of a Number
'  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
'  Test this number
AnyNumber = 13
'  Show Number
PRINT "AnyNumber   ", AnyNumber ' Returns 13
 
'  Get Sign of AnyNumber
NumberSign = Sign( AnyNumber )
'  Show Number
PRINT "NumberSign  ", NumberSign ' Returns 1
 
'  Get Absolute Value of AnyNumber
AnyNumber = AnyNumber * NumberSign
PRINT "AnyNumber   ", AnyNumber ' Returns 13
 
'  Test this number
AnyNumber = -2 * 2
PRINT "AnyNumber   ", AnyNumber ' Returns -4
'  Assign Result of Sign Function
NumberSign = Sign( AnyNumber )
PRINT "NumberSign  ", NumberSign ' Returns -1
 
'  Use Sign Result to Absolute Value
AnyNumber = AnyNumber * NumberSign
PRINT "AnyNumber   ", AnyNumber ' Returns 4

 
'  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
'  Show Sign of Last Calculation
'  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
If Sign( AnyNumber ) = TRUE THEN
  PRINT "Sign( AnyNumber ) is Positive"
ELSE
  PRINT "Sign( AnyNumber ) is Negative"
ENDIF

Returns:

Returns a 1 when the value is positive, and a -1 when the value is negative.

See Also:

Mathematical Functions

Edit Time: 9/18/2020 12:28:41 PM

Topic ID#: 568