TYPES

CAN I TRANSFER THE 'FIRST' VALUE OF WORMS\DIRECTION TO THE SECOND WORMS\DIRECTION WITHIN THE EACH WORMS LOOP.

Yes. You don't even need a for-each loop. Witness

Type mytype
	Field a,b,c
End Type

m.mytype = New mytype
m\a = 1
m\b = 2
m\c = 3

m.mytype = New mytype
m\a = 4
m\b = 5
m\c = 6

m=First mytype
n.mytype = After m

n\a = m\a

Print n\a

WaitKey

You can ofcourse do it itteratively aswell.