Code:
Function DecimalSeparator
  $DecimalSeparator = ReadValue('HKCU\Control Panel\International','sDecimal')
EndFunction


:P