MacWorld 1997: Best New Mac Games/Image(3).iso/Games/Grossology/demo.dxr/Internal_4.ls

Text File | 1997-07-31 | 966 b | 24 lines

on HotspotKezel
  global nagyito, nagyitosprite, animsprite, startsprite, endsprite, RedCircle, firsttext, firstanim, castlibname, soundstring, hotspottilt
  if (nagyito = 0) and (hotspottilt = 0) then
    set i to startsprite
    repeat while not rollOver(i) and (i <= endsprite)
      set i to i + 1
    end repeat
    if i <= endsprite then
      set the text of field "Hotspot_text" to the name of member (i - startsprite + the number of member firsttext of castLib castlibname) of castLib castlibname
      set x to the left of sprite i
      set y to the top of sprite i
      set w to the right of sprite i
      set h to the bottom of sprite i
      spriteBox(RedCircle, x, y, w + 20, h + 20)
      set the locH of sprite RedCircle to x
      set the locV of sprite RedCircle to y
      set the visible of sprite RedCircle to 1
    else
      set the visible of sprite RedCircle to 0
      set the text of field "Hotspot_text" to " "
    end if
  end if
end