code:

---

		; ******************************* McAfee VirusShield Section *********************************
	$NAITVD      ="$HKLMS\Network Associates\TVD"
	$vsengine    ="$NAITVD\Shared Components\VirusScan Engine\4.0.xx"
	$mcupdate    ="$NAITVD\Shared Components\McUpdate\CurrentVersion"

	$vscandir    =readvalue("$NAITVD\VirusScan","szInstallDir")
	$vscanver    =readvalue("$NAITVD\VirusScan","szCurrentVersionNumber")
	$vscaneng    =readvalue("$vsengine","szEngineVer")
	$vscandat    =readvalue("$vsengine","szDatVersion")
	$vsdatdir    =readvalue("$vsengine","szInstallDir")
	$vsdatdate   =readvalue("$vsengine","szDatDate")
	$mcupdexe    =readvalue("$mcupdate","szInstallDir")

		; ******* install it
		$availver=readprofilestring("$setup\apps\mcafee\install\PkgDesc.ini","VSNT","Version")
		if "$availver">"$vscanver"
			if updateapp("VirusScan4.5.1",0,1)="yes"
				shell ('$setup\apps\mcafee\install\setup.exe reboot=r scanatstartup=false forceinstall=true /qb /i')
				$vscanver    =readvalue("$NAITVD\VirusScan","szCurrentVersionNumber")
				endif
			endif
		; ******* Service pack it
		if "4.5.1.1306">"$vscanver"
			if updateapp("VirusScan4.5.1-SP1",0,1)="yes"
				shell ('$setup\apps\mcafee\Sp1\VSC451S1.EXE /silent')
				$vscanver    =readvalue("$NAITVD\VirusScan","szCurrentVersionNumber")
				endif
			endif
		; ******* Superdat it
		$availeng=readprofilestring("$setup\apps\mcafee\upgrade\superdat.ini","superdat","Version")
		if $availeng > $vscaneng
			$=writevalue("$McUpdate\Upgrade\Upgrade Site1","szUNCLocation","$setup\Apps\McAfee\Upgrade",REG_SZ)
			shell ('"$mcupdexe/MCUPDATE" /TASK UPGRADE /BATCH /norestart')
			$vscaneng    =readvalue("$vsengine","szEngineVer")
			endif
		; ******* dat it
		$availdat=dir("$setup\apps\mcafee\update\*.zip")
		$availdat=substr("$availdat",5,4)
		if instr("$vscandat","$availdat")=0
			$=writevalue("$McUpdate\Update\Update Site1","szUNCLocation","$setup\Apps\McAfee\Update",REG_SZ)
			shell ('"$mcupdexe/MCUPDATE" /TASK UPDATE /BATCH')
			$vsdatdate   =readvalue("$vsengine","szDatDate")
			$vscandat    =readvalue("$vsengine","szDatVersion")
			endif
		; ******* extra.dat it
		FreshFile("$setup\apps\mcafee\update","$vsdatdir","extra.dat")
		? "	Installed "color c+/n"VirusShield $vscanver "color w/n"is version " color w+/n $vscandat color w/n " dated " color w+/n $vsdatdate color w/n

---