Sign in to follow this  
Followers 0
kaesereibe

Convert Temp

6 posts in this topic

#1 ·  Posted (edited)

Convert Temp

MsgBox(0, "Convert Temp", ConvertTemp(80, "C", "F"))          ; ==> 176
MsgBox(0, "Convert Temp", ConvertTemp(212, "K", "Ra", 2))     ; ==> 381.6
MsgBox(0, "Convert Temp", ConvertTemp(22.7, "N", "Re", 4))    ; ==>  55.0303

Func ConvertTemp($D, $F = "C", $T = "F", $R = 2)
    $D = ($F = "K") ? (($D - 273.15)) : (($F = "F") ? (($D - 32) / 1.8) : (($F = "Ra") ? (($D + 5 / 9) - 273.15) : (($F = "Re") ? (($D * 1.25)) _
        : (($F = "De") ? ((100 - $D) * 2 / 3) : (($F = "N") ? (($D * 100 / 33)) : (($F = "Ro") ? (($D - 7.5) * 40 / 21) : $D))))))
    return round(($T = "C") ? $D : (($T = "K") ? (($D + 273.15)) : (($T = "F") ? (($D * 1.8) + 32) : (($T = "Ra") ? (($D + 273.15) * 1.8) : (($T = "Re") ? (($D * 0.8)) _
        : (($T = "De") ? ((100 - $D) * 1.5) : (($T = "N") ? (($D * 1 / 3)) : (($T = "Ro") ? (($D * 0.525) + 7.5) : "" ))))))), $R)
EndFunc    ;==> ConvertTemp() AutoIt v3.3.12.0

ConvertTemp(Temperature in Degrees, From, To, Round by)

Celsius      --> C
Kelvin       --> K
Fahrenheit   --> F
Rankine      --> Ra
Réaumur      --> Re
Delisle      --> De
Newton       --> N
Rømer        --> Ro
Edited by kaesereibe
2 people like this

Share this post


Link to post
Share on other sites



(100 - d) * 2 / 3) error

to change

((100 - $D) * 2 / 3)

Share this post


Link to post
Share on other sites

It's good to see people adopting new syntax.


_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_BinaryBin()_CheckMsgBox()_CmdLineRaw()_ContextMenu()_ConvertLHWebColor()/_ConvertSHWebColor()_DesktopDimensions()_DisplayPassword()_DotNet_Load()/_DotNet_Unload()_Fibonacci()_FileCompare()_FileCompareContents()_FileNameByHandle()_FilePrefix/SRE()_FindInFile()_GetBackgroundColor()/_SetBackgroundColor()_GetConrolID()_GetCtrlClass()_GetDirectoryFormat()_GetDriveMediaType()_GetFilename()/_GetFilenameExt()_GetHardwareID()_GetIP()_GetIP_Country()_GetOSLanguage()_GetSavedSource()_GetStringSize()_GetSystemPaths()_GetURLImage()_GIFImage()_GoogleWeather()_GUICtrlCreateGroup()_GUICtrlListBox_CreateArray()_GUICtrlListView_CreateArray()_GUICtrlListView_SaveCSV()_GUICtrlListView_SaveHTML()_GUICtrlListView_SaveTxt()_GUICtrlListView_SaveXML()_GUICtrlMenu_Recent()_GUICtrlMenu_SetItemImage()_GUICtrlTreeView_CreateArray()_GUIDisable()_GUIImageList_SetIconFromHandle()_GUIRegisterMsg()_GUISetIcon()_Icon_Clear()/_Icon_Set()_IdleTime()_InetGet()_InetGetGUI()_InetGetProgress()_IPDetails()_IsFileOlder()_IsGUID()_IsHex()_IsPalindrome()_IsRegKey()_IsStringRegExp()_IsSystemDrive()_IsUPX()_IsValidType()_IsWebColor()_Language()_Log()_MicrosoftInternetConnectivity()_MSDNDataType()_PathFull/GetRelative/Split()_PathSplitEx()_PrintFromArray()_ProgressSetMarquee()_ReDim()_RockPaperScissors()/_RockPaperScissorsLizardSpock()_ScrollingCredits_SelfDelete()_SelfRename()_SelfUpdate()_SendTo()_ShellAll()_ShellFile()_ShellFolder()_SingletonHWID()_SingletonPID()_Startup()_StringCompact()_StringIsValid()_StringRegExpMetaCharacters()_StringReplaceWholeWord()_StringStripChars()_Temperature()_TrialPeriod()_UKToUSDate()/_USToUKDate()_WinAPI_Create_CTL_CODE()_WinAPI_CreateGUID()_WMIDateStringToDate()/_DateToWMIDateString()Au3 script parsingAutoIt SearchAutoIt3 PortableAutoIt3WrapperToPragmaAutoItWinGetTitle()/AutoItWinSetTitle()CodingDirToHTML5FileInstallrFileReadLastChars()GeoIP databaseGUI - Only Close ButtonGUI ExamplesGUICtrlDeleteImage()GUICtrlGetBkColor()GUICtrlGetStyle()GUIEventsGUIGetBkColor()Int_Parse() & Int_TryParse()IsISBN()LockFile()Mapping CtrlIDsOOP in AutoItParseHeadersToSciTE()PasswordValidPasteBinPosts Per DayPreExpandProtect GlobalsQueue()Resource UpdateResourcesExSciTE JumpSettings INISHELLHOOKShunting-YardSignature CreatorStack()Stopwatch()StringAddLF()/StringStripLF()StringEOLToCRLF()VSCROLLWM_COPYDATAMore Examples...

Updated: 04/09/2015

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0