'ThreadPriorities - begin
Public Const tpIdle = &HFFFFFFF1 'Lowest thread priority
Public Const tpLowest = &HFFFFFFFE 'Indicates 2 points below normal priority for the priority class.
Public Const tpBellowNormal = &HFFFFFFFF 'Indicates 1 point below normal priority for the priority class.
Public Const tpNormal = &H0 'Indicates normal priority for the priority class.
Public Const tpAboveNormal = &H1 ' Indicates 1 point above normal priority for the priority class.
Public Const tpHighest = &H2 'Indicates 2 points above normal priority for the priority class.
Public Const tpTimeCritical = &HF 'Indicates a base-priority level of 15.
'ThreadPriorities - end

'ThreadPriorities - begin
Public Const tpIdle As Long = &HFFFFFFF1 'Lowest thread priority
Public Const tpLowest As Long = &HFFFFFFFE 'Indicates 2 points below normal priority for the priority class.
Public Const tpBellowNormal As Long = &HFFFFFFFF 'Indicates 1 point below normal priority for the priority class.
Public Const tpNormal As Long = &H0 'Indicates normal priority for the priority class.
Public Const tpAboveNormal As Long = &H1 ' Indicates 1 point above normal priority for the priority class.
Public Const tpHighest As Long = &H2 'Indicates 2 points above normal priority for the priority class.
Public Const tpTimeCritical As Long = &HF 'Indicates a base-priority level of 15.
'ThreadPriorities - end

Public Enum ThreadPriorities
  tpIdle = &HFFFFFFF1 'Lowest thread priority
  tpLowest = &HFFFFFFFE 'Indicates 2 points below normal priority for the priority class.
  tpBellowNormal = &HFFFFFFFF 'Indicates 1 point below normal priority for the priority class.
  tpNormal = &H0 'Indicates normal priority for the priority class.
  tpAboveNormal = &H1 ' Indicates 1 point above normal priority for the priority class.
  tpHighest = &H2 'Indicates 2 points above normal priority for the priority class.
  tpTimeCritical = &HF 'Indicates a base-priority level of 15.
End Enum 'ThreadPriorities

//ThreadPriorities - begin
var tpIdle = 0xFFFFFFF1; //Lowest thread priority
var tpLowest = 0xFFFFFFFE; //Indicates 2 points below normal priority for the priority class.
var tpBellowNormal = 0xFFFFFFFF; //Indicates 1 point below normal priority for the priority class.
var tpNormal = 0x0; //Indicates normal priority for the priority class.
var tpAboveNormal = 0x1; // Indicates 1 point above normal priority for the priority class.
var tpHighest = 0x2; //Indicates 2 points above normal priority for the priority class.
var tpTimeCritical = 0xF; //Indicates a base-priority level of 15.
//ThreadPriorities - end

// ThreadPriorities
typedef [helpstring("Priority values for the thread.")]
enum ThreadPriorities{
	[helpstring("Lowest thread priority")]
		tpIdle = 0xFFFFFFF1,
	[helpstring("Indicates 2 points below normal priority for the priority class.")]
		tpLowest = 0xFFFFFFFE,
	[helpstring("Indicates 1 point below normal priority for the priority class.")]
		tpBellowNormal = 0xFFFFFFFF,
	[helpstring("Indicates normal priority for the priority class.")]
		tpNormal = 0x0,
	[helpstring(" Indicates 1 point above normal priority for the priority class.")]
		tpAboveNormal = 0x1,
	[helpstring("Indicates 2 points above normal priority for the priority class.")]
		tpHighest = 0x2,
	[helpstring("Indicates a base-priority level of 15.")]
		tpTimeCritical = 0xF
} ThreadPriorities;