Object Drawing Priority on overlap? example reques

There are 100's of posts regarding TLists and their use.
Anyway :

Type ttest
	Field x
End Type
Local mylist:tlist=CreateList()
For Local x:Int = 1 To 5
	Local temp:ttest = New ttest
	temp.x = x
	ListAddLast mylist , temp
Next
Print "List contents"
For all:ttest = EachIn mylist
	Print all.x
Next
Local switchtemp:ttest = ttest(mylist.last() )
ListRemove(mylist,switchtemp)
ListAddFirst mylist , switchtemp
Print "List contents after switching"
For all:ttest = EachIn mylist
	Print all.x
Next