Error: Expected Expression in Kix Script: Trying to Audit MAC Addresses

$kwVBPath=@CurDir + "\KiXGUI.dll"
$SleepTime=3
$ScripToExecute=Split("ScrFunc1,ScrFunc2,ScrFunc3,ScrFunc4,ScrFunc5",",")
$SOC=8
$DefHeight=20
 
Dim $RelMaxLwidth
;This text below will show the current user name and current full name of the user logging in.
If @inwin=2
  $Userid=@WUserID
Else
  $Userid=@UserID
EndIf
 
; First, we have to create the first handler. Note that you can also directly do this :
; $form=createobject("KiXGUI.Desktop").addform("name","caption",...)
 
$root=CreateObject("KiXGUI.Desktop")
 
;************************User Form
; Here we will create a form with user informations
$frmUser=$root.createform("frmUser","Current User / Username")
$frmUser.height=125
$frmUser.width=250
 
 
; It''s possible to use the parent property
$frmUser.Left=($frmUser.parent.width-$frmUser.width) / 2
 
; Or, if you have desktop in a variable, to use it instead
$frmUser.top=($root.height-$frmUser.height) / 2
 
 
$frmUser.ChangeSysMenu(1,1,0)
$frmUser.Moveable=0
$frmUser.ResizeAble=0
$=$frmUser.addlabel("lblUserN","Complete name",10,10+2,SizeoS("Complete name"),$DefHeight)
$RelMaxLwidth=$frmUser.controls("lblusern").width
 
; Here we''ll immediatly use the returned object to change one of his property. 
; With this syntax, no need to have a $= in front to catch the object, but you can''t use both of them in the same line
$frmUser.addtextbox("txtUserN","@fullname",10+2+$RelMaxLwidth,10,sizeoS(" "+@fullname),$DefHeight).locked=1
 
$=$frmUser.addlabel("lblUserL","Login",10+2,10+$DefHeight,$RelMaxLwidth,$DefHeight)
$frmUser.addtextbox("txtUserL","$Userid",10+2+$RelMaxLwidth,10+$DefHeight,SizeoS(" "+$Userid),$DefHeight).locked=1
 
$=$frmUser.addlabel("lblLserver","Logon Server",10+2,10+($DefHeight*3),$RelMaxLwidth,$DefHeight)
$frmUser.addtextbox("txtLserver","@LServer",10+2+$RelMaxLwidth,10+($DefHeight)*3,SizeoS(" "+@LServer),$DefHeight).locked=1
$frmUser.width=$frmUser.width+30
 
; Here we will create a form with a welcome text and current progress status
$frmMain=$root.createform("frmMain","User logging into domain: YOURDOMAINNAME",,,350,125)
$frmMain.Left=($frmMain.parent.width-$frmMain.width) / 2
$frmMain.top=($frmMain.parent.height-$frmMain.height) / 14
$frmMain.ChangeSysMenu(1,1,0)
$=$frmMain.addlabel("lblWelcome","Welcome to the @Domain domain"+Chr(10)+"Please wait while loading your profile",10,10,SizeoS("Please wait while loading your profile"),35,1)
$ProgressFull=$frmMain.addprogressbar("pbFull",30,60,$frmMain.width-(30*2),20,2)
; We have +1 for the fact Ubound is 0 based and Progress Bar is not.
$ProgressFull.maxprogress=Ubound($ScripToExecute)+2
 
For $i=1 to $root.count
  $root.forms($i).visible=1
Next
 
For $i=0 to Ubound($ScripToExecute)
  $ProgressFull.currentprogress=$ProgressFull.currentprogress+1
  $=Execute($ScripToExecute[$i])
Next
 
$ProgressFull.currentprogress=$ProgressFull.maxprogress
 
; A last sleep here, just to had a final look
Sleep 1
Exit()
 
;**************************************************************************
;			Functions and others
;**************************************************************************
 
; Function using $SOC to return a pixel lenght of a string
Function SizeoS($f_sString)
  $SizeoS=(Len($f_sString)*$soc)
EndFunction
 
; Instead of execute a script, we will replace them with a function for this example
Function ScrFunc1()
Dim $f_frmScr
  $f_frmScr=$Root.createform("frmScr1","Logging into network ...",,,350,$DefHeight*4)
  $f_frmScr.Left=($f_frmScr.parent.width-$f_frmScr.width) / 2
  $f_frmScr.top=($f_frmScr.parent.height / 8)+$f_frmScr.height
  $f_frmScr.changesysmenu(1,1,0)
  $f_frmScr.resizeable=0
  $f_frmScr.visible=1
 
  ; Needed, as even if the container variable is out of range, the object lives in 
  ; his parent''s collection and we don''t want the form to show when we don''t use it
  $f_frmScr.visible=0
EndFunction
 
Function ScrFunc2()
  Sleep 1
EndFunction
 
 
Function ScrFunc3()
  Sleep 1
EndFunction
 
 
Function ScrFunc4()
Dim $f_frmScr
Dim $f_pbDrive
  $f_frmScr=$Root.createform("frmScr4","Collecting Hardware Information ...",,,350,$DefHeight*4 )
  $f_frmScr.Left=($f_frmscr.parent.width-$f_frmScr.width) / 2
  $f_frmScr.top=($f_frmScr.parent.height / 8)+$f_frmScr.height
  $f_frmScr.changesysmenu(1,1,0)
  $f_frmScr.resizeable=0  
  $=$f_frmScr.addlabel("lblNet","Please wait while collecting hardware information ...",10,10,$f_frmScr.width-30,$DefHeight,1)
  $f_frmScr.Addprogressbar("pbDrive",10,10+$DefHeight,$f_frmScr.width-30,$DefHeight).maxprogress=(Ubound($NetDrives)+1)
  $f_frmScr.visible=1
  Sleep 1
    $f_frmScr.controls("lblnet").caption="Collecting Hardware Information"
 
; 1)  Basic computer info for reference
 
RedirectOutput ("C:\Inventory\@WKSTA.txt",1)
 
  ?"NetBIOS name = "@WKSTA
 
  ?"Last login by "@USERID
 
  ?"OS = "@PRODUCTTYPE" with "@CSD
 
  ?"Memory = "MemorySize(0)" MB"
 
  ?"Processor type is "@CPU
 
  ?"Processor speed is "@MHZ
 
  ?"IP address = "@IPADDRESS0
 
  ?"MAC address = "@ADDRESS
 
  ?"This information was gathered on "@DATE" at "@TIME
  
EndFunction
 
Function ScrFunc5()
  Sleep 1
EndFunction
 
;----------------------------------------------------------
RETURN ; Must be last line of file. Do not remove this line