MacAddict 18/MacAddict_018_1998_02.iso/MEDIA/STORE.dxr/Internal_23_box2.ls

Text File | 1997-12-04 | 709 b | 28 lines

on mouseEnter me
  cursor(260)
  set the text of field "whichBox" to "box2."
  put line 2 of field "storeData" into field "temp"
  updateData()
  set the text of field "roll info" to "Click here to get info on " & field "appName"
  set the member of sprite 52 to member "s02"
  set the visible of sprite 52 to 1
end

on mouseLeave me
  cursor(-1)
  set the text of field "roll info" to " "
  set the visible of sprite 52 to 0
end

on mouseDown me
  set the locH of sprite 38 to the mouseH
  set the locV of sprite 38 to the mouseV
end

on mouseUp me
  set the visible of sprite the currentSpriteNum to 0
  set the visible of sprite 38 to 1
  set i to the currentSpriteNum
  put i into field "lastClicked"
end