|
|
|
| 9 January 2002 | Exp() |
| Author | ScriptLogic Corporation |
| Action | Mathematical Exponentiation. |
| Syntax | Exp (base, power) |
| Parameters | |
| Remarks | Useful when computing bit-masked registry values (such as HideDrives Policy). |
| Returns | Returns the result of base raised to the specified power. |
| Dependencies | None. |
| Examples | $x=2 $y=10 $result=Exp($x,$y) ?'The result of '+$x+' raised to the power of '+$y+' is: '+$result |
| Source |
FUNCTION Exp ($base, $power)
DIM $sub
$base=0+$base
$power=0+$power
$exp=1
:exploop
IF ($power > 0)
$exp=$exp*$base
$power=$power-1
GOTO exploop
ENDIF
ENDFUNCTION ; - Exp -
|
|
|
|