$bbhome=ReadValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Installer\UserData\S-1-5-18\Components\16FD58773EE02F44F9082F014DAF6CC9", "6BB86DA5D449506409F1448FC6560289")
If @error <> 0
	? "Error Encountered: " + @serror
	MessageBox("Can't find Big Brother install path!", $bbhome, 16)
	Exit @ERROR
Else
	$bbexternals = ReadValue ("HKEY_LOCAL_MACHINE\SOFTWARE\Quest Software\BigBrother\bbnt\Externals","")
	If @error = 0
		$bbfolder=$bbhome + "ext"
		$bbhomeext=";" + $bbfolder + " /INT=300"
		If NOT Exist($bbfolder)
			MD $bbfolder
			$ = updateregistry("HKEY_LOCAL_MACHINE\SOFTWARE\Quest Software\BigBrother\bbnt\Externals","",$bbhomeext,"REG_SZ")	                   
		Else 
			?"?????"
		EndIf 
	EndIf
EndIf