home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1998 July / WPCJUL98.ISO / DXRS / SOFWPC07.DXR / 00116_RightBrowseRed.ls < prev    next >
Encoding:
Text File  |  1998-05-11  |  809 b   |  26 lines
  1. on mouseDown
  2.   global SOFtemp
  3.   if the member of sprite 4 = member (SOFtemp & "_prev_end") then
  4.     put 1 into field "numberof"
  5.     if the number of member (SOFtemp & "_prev1") = -1 then
  6.       put 1 into field "numberof"
  7.     else
  8.       repeat while the mouseDown
  9.         set the member of sprite 72 to member "RightBrowseDown"
  10.         updateStage()
  11.       end repeat
  12.       set the member of sprite 4 to member (SOFtemp & "_prev1")
  13.     end if
  14.   else
  15.     repeat while the mouseDown
  16.       set the member of sprite 72 to member "RightBrowseDown"
  17.       updateStage()
  18.     end repeat
  19.     set SOFnums to 0
  20.     set SOFnums to the text of field "numberof"
  21.     set SOFnums to SOFnums + 1
  22.     put the integer of SOFnums into field "numberof"
  23.     set the memberNum of sprite 4 to the memberNum of sprite 4 + 1
  24.   end if
  25. end
  26.