What PC? 1997 February/WPCFEB97.ISO/multi/times/data/shared.dir/00982.ls

Text File | 1996-08-11 | 1.2 KB | 45 lines

on exitFrame
  global mapLinePos
  go(the frame)
  if rollOver(47) then
    toolsUp()
  else
    toolsDown()
  end if
  if rollOver(41) then
    set the castNum of sprite 41 to 941
    set the castNum of sprite 42 to cast string("gridMap" & the frame - 10)
    set the locV of sprite 42 to mapLinePos
    set the locH of sprite 42 to 358
    set the lineSize of sprite 43 to 0
  else
    set the castNum of sprite 41 to cast 942
    set the locV of sprite 42 to -2000
    set the lineSize of sprite 43 to 2
  end if
  if the mouseCast = 963 then
    set the lineSize of sprite 15 to 2
    set the foreColor of sprite 15 to 30
    cursor([999, 989])
  else
    if the castNum of sprite 15 > 960 then
      set the lineSize of sprite 15 to 1
      set the foreColor of sprite 15 to 27
    end if
  end if
  if the mouseCast = 964 then
    set the lineSize of sprite 16 to 2
    set the foreColor of sprite 16 to 30
    cursor([1000, 990])
  else
    if the castNum of sprite 16 > 960 then
      set the lineSize of sprite 16 to 1
      set the foreColor of sprite 16 to 27
    end if
  end if
  if (the mouseCast < 961) or (the mouseCast > 964) then
    cursor(-1)
  end if
  updateStage()
end