Multimedia Dogs/Multimedia Dogs v2.0.iso/mac/Multimedia Dogs 2.0/MMDOGS2.DXR/00346.ls

Text File | 1995-10-09 | 587 b | 27 lines

on exitFrame
  autoPointerCursor()
  go(the frame)
end

on idle
  global gpGroupsButtonSprite, gCPU
  if gCPU <> #mac then
    exit
  end if
  if the mouseV > 19 then
    exit
  end if
  if the mouseDown then
    putDebug("Groups - clicked in Top 20 Pixels")
    if rollOver(gpGroupsButtonSprite) then
      putDebug("Groups - Top 20 Pixel hack in progress...")
      customButtonBehavior(gpGroupsButtonSprite)
      if rollOver(gpGroupsButtonSprite) then
        waitCursor()
        handleGroupsChoice(gpGroupsButtonSprite)
        pointerCursor()
      end if
    end if
  end if
end