code:

---

Function Exp($Base, $Power)
	;Returns a base value raised to the specified power
	If $Power = 0
		$Exp = 1
	Else
		$Exp = Exp($Base, $Power - 1) * $Base
	EndIf
EndFunction

---

code:

---

Function Exp2($Base, $Power)
	;Returns a base value raised to the specified power
	$Exp2 = iif($Power = 0, 1, Exp2($Base, $Power - 1) * $Base)
EndFunction

---

code:

---

 
WScript.Echo Exp(5,5)
 
Function Exp(Base, Power)
 
 ' Returns a base value raised to the specified power	
 
 Exp = IIF(Power = 0, 1, Exp(Base, Power - 1) * Base)
 
' If Power = 0 Then
'  Exp = 1	
' Else 
'  Exp = Exp(Base, Power - 1) * Base
' End If
 
End Function

---

code:

---

$var=1
$loopcount
test()

function test()
 $loopcount=$loopcount+1
 $loopcount ?
 $var=iif($var=1,$var,test())
endfunction

---

code:

---

$var=1,0
$loopcount
test()

function test()
 $test=0
 $loopcount=$loopcount+1
 ? $loopcount

 $var[test()]
endfunction

---

code:

---

break on
 
$x = iif(1=1,FuncOne(),FuncTwo())
 
exit 1
  
function FuncOne()
 ?"FuncOne..."
endfunction
 
function FuncTwo()
 ?"FuncTwo..."
endfunction
 

---

code:

---

C:\>kix32 t

FuncOne...
FuncTwo...

---

quote:

---

code:

---

$x = iif(1=1,FuncOne(),FuncTwo())

---

---

code:

---

  

Function Exp2($Base, $Power)
   ;Returns a base value raised to the specified power
   $ = iif($Power = 0, '$$Exp2 = 1', '$$Exp2 = Exp2($$Base, $$Power - 1) * $$Base')
   $ = execute($)
EndFunction

---

code:

---

Break On
 
$x = IIF2(1=1,1+1,2+2)
 
Exit 1 
 
Function IIF2($x,$y,$z)
 
 If $x 
  $IIF2=$y 
 Else 
  $IIF2=$z 
 EndIf
 
EndFunction

---