help with a samurize program (they're vbscript programs)

Ok, I have a samurize program that measures cpu temp (it's the only temperature measurement program that works on my computer so far), but i don't think it's giving the correct temperature (it just said my computer was 70 degrees celsius). What i want to know is if the conversion it's using is correct. Anyone know?

Code:

Function ACPI_CPUTemp()
 	dim r, lu
 	set PFU = GetObject("winmgmts:{impersonationLevel=impersonate}!root\wmi").ExecQuery 
 
 _
 			("SELECT CurrentTemperature FROM MSAcpi_ThermalZoneTemperature")
 	
 	for each U in PFU
 		r = r&U.CurrentTemperature
 	Next
 	
 	' r is tenth of kelvin, convert to °C.
 	ACPI_CPUTemp = (r)
 	
 	set PFU=Nothing
 End Function
 

 

hmm... after further inspection, i think the script was right :-/