break on
$=setoption("WrapATEOL","on")
$nic="PCI\CC_0200"
 

shell '%comspec% /c devcon status ' + $nic + ' > "' + @scriptdir + '\status.tmp"'
$fh=freefilehandle()
if open($fh,@scriptdir + "\status.tmp")=0
  $line=readline($fh)
  while @error=0 and $changed=0
    select
      case instr($line,"Driver is running")>0
        shell '%comspec% /c devcon disable ' + $nic + ' 1>Nul 2>&1'
        $changed=1
      case instr($line,"Device is disabled")>0
        shell '%comspec% /c devcon enable  ' + $nic + ' 1>Nul 2>&1'
        $changed=1
    endselect
    $line=readline($fh)
  loop
  $=close($fh)
endif