Any suggestions or questions then please post below. Thanks.
Note: I will probably add more units over time depending on whether or not I see it is worth it.
UDF:
AutoIt
#include-once ; #AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 -w 7 ; #INDEX# ======================================================================================================================= ; Title .........: Temperature ; AutoIt Version : v3.2.2.0 or higher ; Language ......: English ; Description ...: Convert various temperatures to different units for example Celsius to Fahrenheit. ; Note ..........: ; Author(s) .....: guinness, with Reaumur functions kindly provided by Andreik. ; Remarks .......: Wikipedia was used for the conversion formulas: <a href='https://en.wikipedia.org/wiki/Temperature_conversion_formulas' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Temperature_conversion_formulas</a> ; =============================================================================================================================== ; #INCLUDES# ========================================================================================================= ; None ; #GLOBAL VARIABLES# ================================================================================================= ; None ; #CURRENT# ===================================================================================================================== ; _CelsiusToFahrenheit: Convert a temperature in Celsius to Fahrenheit. ; _CelsiusToKelvin: Convert a temperature in Celsius to Kelvin. ; _CelsiusToRankine: Convert a temperature in Celsius to Rankine. ; _CelsiusToReaumur: Convert a temperature in Celsius to Reaumur. ; _FahrenheitToCelsius: Convert a temperature in Fahrenheit to Celsius. ; _FahrenheitToKelvin: Convert a temperature in Fahrenheit to Kelvin. ; _FahrenheitToRankine: Convert a temperature in Fahrenheit to Rankine. ; _FahrenheitToReaumur: Convert a temperature in Fahrenheit to Reaumur. ; _KelvinToCelsius: Convert a temperature in Kelvin to Celsius. ; _KelvinToFahrenheit: Convert a temperature in Kelvin to Fahrenheit. ; _KelvinToRankine: Convert a temperature in Kelvin to Rankine. ; _KelvinToReaumur: Convert a temperature in Kelvin to Reaumur. ; _RankineToCelsius: Convert a temperature in Rankine to Celsius. ; _RankineToFahrenheit: Convert a temperature in Rankine to Fahrenheit. ; _RankineToKelvin: Convert a temperature in Rankine to Kelvin. ; _RankineToReaumur: Convert a temperature in Rankine to Reaumur. ; _ReaumurToCelsius: Convert a temperature in Reaumur to Celsius. ; _ReaumurToFahrenheit: Convert a temperature in Reaumur to Fahrenheit. ; _ReaumurToKelvin: Convert a temperature in Reaumur to Kelvin. ; _ReaumurToRankine: Convert a temperature in Reaumur to Rankine. ; =============================================================================================================================== ; #INTERNAL_USE_ONLY#============================================================================================================ ; None ; =============================================================================================================================== ; #FUNCTION# ==================================================================================================================== ; Name ..........: _CelsiusToFahrenheit ; Description ...: Convert a temperature in Celsius to Fahrenheit. ; Syntax ........: _CelsiusToFahrenheit($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Celsius' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Celsius</a> ; Example .......: Yes ; =============================================================================================================================== Func _CelsiusToFahrenheit($iTemperature) Return $iTemperature * (9 / 5) + 32 EndFunc ;==>_CelsiusToFahrenheit ; #FUNCTION# ==================================================================================================================== ; Name ..........: _CelsiusToKelvin ; Description ...: Convert a temperature in Celsius to Kelvin. ; Syntax ........: _CelsiusToKelvin($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Celsius' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Celsius</a> ; Example .......: Yes ; =============================================================================================================================== Func _CelsiusToKelvin($iTemperature) Return $iTemperature + 273.15 EndFunc ;==>_CelsiusToKelvin ; #FUNCTION# ==================================================================================================================== ; Name ..........: _CelsiusToRankine ; Description ...: Convert a temperature in Celsius to Rankine. ; Syntax ........: _CelsiusToRankine($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Celsius' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Celsius</a> ; Example .......: Yes ; =============================================================================================================================== Func _CelsiusToRankine($iTemperature) Return ($iTemperature + 273.15) * (9 / 5) EndFunc ;==>_CelsiusToRankine ; #FUNCTION# ==================================================================================================================== ; Name ..........: _CelsiusToReaumur ; Description ...: Convert a temperature in Celsius to Reaumur. ; Syntax ........: _CelsiusToReaumur($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Celsius' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Celsius</a> ; Example .......: Yes ; =============================================================================================================================== Func _CelsiusToReaumur($iTemperature) Return $iTemperature * (4 / 5) EndFunc ;==>_CelsiusToReaumur ; #FUNCTION# ==================================================================================================================== ; Name ..........: _FahrenheitToCelsius ; Description ...: Convert a temperature in Fahrenheit to Celsius. ; Syntax ........: _FahrenheitToCelsius($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Fahrenheit' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Fahrenheit</a> ; Example .......: Yes ; =============================================================================================================================== Func _FahrenheitToCelsius($iTemperature) Return ($iTemperature - 32) * (5 / 9) EndFunc ;==>_FahrenheitToCelsius ; #FUNCTION# ==================================================================================================================== ; Name ..........: _FahrenheitToKelvin ; Description ...: Convert a temperature in Fahrenheit to Kelvin. ; Syntax ........: _FahrenheitToKelvin($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Fahrenheit' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Fahrenheit</a> ; Example .......: Yes ; =============================================================================================================================== Func _FahrenheitToKelvin($iTemperature) Return ($iTemperature + 459.67) * (5 / 9) EndFunc ;==>_FahrenheitToKelvin ; #FUNCTION# ==================================================================================================================== ; Name ..........: _FahrenheitToRankine ; Description ...: Convert a temperature in Fahrenheit to Rankine. ; Syntax ........: _FahrenheitToRankine($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Fahrenheit' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Fahrenheit</a> ; Example .......: Yes ; =============================================================================================================================== Func _FahrenheitToRankine($iTemperature) Return $iTemperature + 459.67 EndFunc ;==>_FahrenheitToRankine ; #FUNCTION# ==================================================================================================================== ; Name ..........: _FahrenheitToReaumur ; Description ...: Convert a temperature in Fahrenheit to Reaumur. ; Syntax ........: _FahrenheitToReaumur($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Fahrenheit' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Fahrenheit</a> ; Example .......: Yes ; =============================================================================================================================== Func _FahrenheitToReaumur($iTemperature) Return ($iTemperature - 32) * (4 / 9) EndFunc ;==>_FahrenheitToReaumur ; #FUNCTION# ==================================================================================================================== ; Name ..........: _KelvinToCelsius ; Description ...: Convert a temperature in Kelvin to Celsius. ; Syntax ........: _KelvinToCelsius($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Kelvin' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Kelvin</a> ; Example .......: Yes ; =============================================================================================================================== Func _KelvinToCelsius($iTemperature) Return $iTemperature - 273.15 EndFunc ;==>_KelvinToCelsius ; #FUNCTION# ==================================================================================================================== ; Name ..........: _KelvinToFahrenheit ; Description ...: Convert a temperature in Kelvin to Fahrenheit. ; Syntax ........: _KelvinToFahrenheit($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Kelvin' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Kelvin</a> ; Example .......: Yes ; =============================================================================================================================== Func _KelvinToFahrenheit($iTemperature) Return ($iTemperature * (9 / 5)) - 459.67 EndFunc ;==>_KelvinToFahrenheit ; #FUNCTION# ==================================================================================================================== ; Name ..........: _KelvinToRankine ; Description ...: Convert a temperature in Kelvin to Rankine. ; Syntax ........: _KelvinToRankine($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Kelvin' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Kelvin</a> ; Example .......: Yes ; =============================================================================================================================== Func _KelvinToRankine($iTemperature) Return $iTemperature * (9 / 5) EndFunc ;==>_KelvinToRankine ; #FUNCTION# ==================================================================================================================== ; Name ..........: _KelvinToReaumur ; Description ...: Convert a temperature in Kelvin to Reaumur. ; Syntax ........: _KelvinToReaumur($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Kelvin' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Kelvin</a> ; Example .......: Yes ; =============================================================================================================================== Func _KelvinToReaumur($iTemperature) Return ($iTemperature - 273.15) * (4 / 5) EndFunc ;==>_KelvinToReaumur ; #FUNCTION# ==================================================================================================================== ; Name ..........: _RankineToCelsius ; Description ...: Convert a temperature in Rankine to Celsius. ; Syntax ........: _RankineToCelsius($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Rankine' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Rankine</a> ; Example .......: Yes ; =============================================================================================================================== Func _RankineToCelsius($iTemperature) Return ($iTemperature - 491.67) * (5 / 9) EndFunc ;==>_RankineToCelsius ; #FUNCTION# ==================================================================================================================== ; Name ..........: _RankineToFahrenheit ; Description ...: Convert a temperature in Rankine to Fahrenheit. ; Syntax ........: _RankineToFahrenheit($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Rankine' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Rankine</a> ; Example .......: Yes ; =============================================================================================================================== Func _RankineToFahrenheit($iTemperature) Return $iTemperature - 459.67 EndFunc ;==>_RankineToFahrenheit ; #FUNCTION# ==================================================================================================================== ; Name ..........: _RankineToKelvin ; Description ...: Convert a temperature in Rankine to Kelvin. ; Syntax ........: _RankineToKelvin($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Rankine' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Rankine</a> ; Example .......: Yes ; =============================================================================================================================== Func _RankineToKelvin($iTemperature) Return $iTemperature * (5 / 9) EndFunc ;==>_RankineToKelvin ; #FUNCTION# ==================================================================================================================== ; Name ..........: _RankineToReaumur ; Description ...: Convert a temperature in Rankine to Reaumur. ; Syntax ........: _RankineToReaumur($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness ; Link ..........: <a href='https://en.wikipedia.org/wiki/Rankine' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Rankine</a> ; Example .......: Yes ; =============================================================================================================================== Func _RankineToReaumur($iTemperature) Return ($iTemperature - 491.67) * (4 / 9) EndFunc ;==>_RankineToReaumur ; #FUNCTION# ==================================================================================================================== ; Name ..........: _ReaumurToCelsius ; Description ...: Convert a temperature in Reaumur to Celsius. ; Syntax ........: _ReaumurToCelsius($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness & Andreik ; Link ..........: <a href='https://en.wikipedia.org/wiki/Réaumur_scale' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Réaumur_scale</a> ; Example .......: Yes ; =============================================================================================================================== Func _ReaumurToCelsius($iTemperature) Return $iTemperature * (5 / 4) EndFunc ;==>_ReaumurToCelsius ; #FUNCTION# ==================================================================================================================== ; Name ..........: _ReaumurToFahrenheit ; Description ...: Convert a temperature in Reaumur to Fahrenheit. ; Syntax ........: _ReaumurToFahrenheit($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness & Andreik ; Link ..........: <a href='https://en.wikipedia.org/wiki/Réaumur_scale' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Réaumur_scale</a> ; Example .......: Yes ; =============================================================================================================================== Func _ReaumurToFahrenheit($iTemperature) Return $iTemperature * (9 / 4) + 32 EndFunc ;==>_ReaumurToFahrenheit ; #FUNCTION# ==================================================================================================================== ; Name ..........: _ReaumurToKelvin ; Description ...: Convert a temperature in Reaumur to Kelvin. ; Syntax ........: _ReaumurToKelvin($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness & Andreik ; Link ..........: <a href='https://en.wikipedia.org/wiki/Réaumur_scale' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Réaumur_scale</a> ; Example .......: Yes ; =============================================================================================================================== Func _ReaumurToKelvin($iTemperature) Return $iTemperature * (5 / 4) + 273.15 EndFunc ;==>_ReaumurToKelvin ; #FUNCTION# ==================================================================================================================== ; Name ..........: _ReaumurToRankine ; Description ...: Convert a temperature in Reaumur to Rankine. ; Syntax ........: _ReaumurToRankine($iTemperature) ; Parameters ....: $iTemperature - An integer value. ; Return values .: Converted temperature. ; Author ........: guinness & Andreik ; Link ..........: <a href='https://en.wikipedia.org/wiki/Réaumur_scale' class='bbc_url' title='External link' rel='nofollow external'>https://en.wikipedia.org/wiki/Réaumur_scale</a> ; Example .......: Yes ; =============================================================================================================================== Func _ReaumurToRankine($iTemperature) Return $iTemperature * (9 / 4) + 491.67 EndFunc ;==>_ReaumurToRankine
Example 1:
AutoIt
#include 'Temperature.au3' Example() Func Example() ConsoleWrite('_CelsiusToFahrenheit: ' & _CelsiusToFahrenheit(0) & ChrW(176) & 'F' & @CRLF) ConsoleWrite('_CelsiusToKelvin: ' & _CelsiusToKelvin(0) & 'K' & @CRLF) ConsoleWrite('_CelsiusToRankine: ' & _CelsiusToRankine(0) & ChrW(176) & 'R' & @CRLF) ConsoleWrite('_CelsiusToReaumur: ' & _CelsiusToReaumur(0) & ChrW(176) & 'Re' & @CRLF & @CRLF) ConsoleWrite('_FahrenheitToCelsius: ' & _FahrenheitToCelsius(32) & ChrW(176) & 'C' & @CRLF) ConsoleWrite('_FahrenheitToKelvin: ' & _FahrenheitToKelvin(32) & 'K' & @CRLF) ConsoleWrite('_FahrenheitToRankine: ' & _FahrenheitToRankine(32) & ChrW(176) & 'R' & @CRLF) ConsoleWrite('_FahrenheitToReaumur: ' & _FahrenheitToReaumur(32) & ChrW(176) & 'Re' & @CRLF & @CRLF) ConsoleWrite('_KelvinToCelsius: ' & _KelvinToCelsius(273.15) & ChrW(176) & 'C' & @CRLF) ConsoleWrite('_KelvinToFahrenheit: ' & _KelvinToFahrenheit(273.15) & ChrW(176) & 'F' & @CRLF) ConsoleWrite('_KelvinToRankine: ' & _KelvinToRankine(273.15) & ChrW(176) & 'R' & @CRLF) ConsoleWrite('_KelvinToReaumur: ' & _KelvinToReaumur(273.15) & ChrW(176) & 'Re' & @CRLF & @CRLF) ConsoleWrite('_RankineToCelsius: ' & ': ' & _RankineToCelsius(491.67) & ChrW(176) & 'C' & @CRLF) ConsoleWrite('_RankineToFahrenheit: ' & _RankineToFahrenheit(491.67) & ChrW(176) & 'F' & @CRLF) ConsoleWrite('_RankineToKelvin: ' & _RankineToKelvin(491.67) & 'K' & @CRLF) ConsoleWrite('_RankineToReaumur: ' & _RankineToReaumur(491.67) & 'Re' & @CRLF & @CRLF) ConsoleWrite('_ReaumurToCelsius: ' & ': ' & _ReaumurToCelsius(0) & ChrW(176) & 'C' & @CRLF) ConsoleWrite('_ReaumurToFahrenheit: ' & _ReaumurToFahrenheit(0) & ChrW(176) & 'F' & @CRLF) ConsoleWrite('_ReaumurToKelvin: ' & _ReaumurToKelvin(0) & 'K' & @CRLF) ConsoleWrite('_ReaumurToRankine: ' & _ReaumurToRankine(0) & 'R' & @CRLF) EndFunc ;==>Example
All of the above has been included in a ZIP file.
Temperature.zip 2.01KB
60 downloads
Edited by guinness, 06 October 2012 - 01:41 PM.
