visual line folllowing

Tue, 30 Nov 1999 00:11:00 EST

HI steven,
i don't understand the function in VBScript
x = GetVariable("COG_X")
y = GetVariable("COG_Y")

cx = GetVariable("IMAGE_WIDTH") / 2    why need to divide by 2?
cy = GetVariable("IMAGE_HEIGHT") / 2   why need to divide by 2?
xoff = GetVariable("IMAGE_WIDTH") / 8  why need to divide by 8?
yoff = GetVariable("IMAGE_HEIGHT") / 16  why need to divide by 16?

if x < cx - xoff then
  if y < cy - yoff then
    move = "pivot left"
  else
    move = "left"
  end if
elseif x > cx + xoff then
  if y < cy - yoff then
    move = "pivot right"
  else
    move = "right"
  end if
else
  if y < cy - yoff then
    move = "backup"
  else
    move = "straight"
  end if
end if

SetVariable "move", move

RoboRealm Forum

visual line folllowing