BrightSign BrightScript 3.0 Reference Manual User Manual
Page 73

68
x=m.snake_X
y=m.snake_Y
for
each
seg
in
m.seg_list
x=x+seg.Len*seg.xDelta
y=y+seg.Len*seg.yDelta
end for
text_field.SetCursorPos(x, y)
text_field.SendByte(32)
' 32 is ascii space, could use asc(" ")
End
Sub
Function
snkMoveForward(text_field
As
Object
)
As
Boolean
m.EraseEndBit(text_field)
tail=m.seg_list.GetTail()
REM
REM the following shows how you can use an AA's member functions to perform the same
REM functions the BrightScript . operator does behind the scenes for you (when used on an AA).
REM there is not point to this longer method other than illustration
REM
len=tail.Lookup(
"Len"
)
' same as len = tail.Len (or tail.len, BrightScript syntax is not case sensative)
len = len-1
if
len=0
then
m.seg_list.RemoveTail()
else
tail.AddReplace(
"Len"
,len)
' same as tail.Len=len
endif