Comparing user types

BlitzMax Forums/BlitzMax Beginners Area/Comparing user types

But make sure to return 0 if they are the same because you'll have no end of trouble.
	Method compare(s:Object)
		Local o:system=system(s)
		If o <> Null
			If o.distanceToPlayer=distanceToPlayer
				Return 0
			ElseIf o.distanceToPlayer > distanceToPlayer 
				Return 1 
			Else 
				Return -1
			EndIf
		EndIf
	End Method