On Error Resume Next

If FileLen("c:\Mach3\WizLic.dat")=0 Then

nofile:

  msg=MsgBox("No Wizard License file found, will run in Demo mode",0)
  setticker 11, "No Wizard License file found, runing in Demo mode"
  call setuserdro(1105,0)
  setuserled(1101,1)
else
  setuserled(1101,0)
  setticker 11, ""
end if

Call SetUserDRO(1101,0)
Call SetUserDRO(1102,0)
Call SetUserDRO(1106,0)
Call SetUserDRO(1107,0)