Namespace System
	Class Blittable(DWord) UInt32
		value As DWord
	Public
		Static Function MaxValue() As Long
			Return 2147483647
		End Function
		Static Function MinValue() As Long
			Return -2147483648
		End Function

		Sub UInt32( value As DWord )
			This.value = value
		End Sub

		Override Function ToString() As String
			Return Str$(value)
		End Function

		Function Operator() As DWord
			Return value
		End Function

		Static Function _Create( value As DWord ) As UInt32
			Return New UInt32( value )
		End Function
	End Class
End Namespace