home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1998 December / WPCDEC98.ISO / dxrs / Sofwpc12.dxr / 00134_More_development_red.ls < prev    next >
Encoding:
Text File  |  1998-10-12  |  421 b   |  17 lines
  1. on mouseDown
  2.   global whichprog, whichsection, x, featuredlist, demo, t, pageAmount
  3.   repeat while the mouseDown
  4.     set the member of sprite 31 to member "More_development_red_down"
  5.     updateStage()
  6.   end repeat
  7.   set thiscount to "put count(" & whichsection & ") into t"
  8.   do(thiscount)
  9.   if x > t then
  10.     set x to 1
  11.     set pageAmount to 0
  12.   else
  13.     set pageAmount to pageAmount + 5
  14.   end if
  15.   SOFimagessetup()
  16. end
  17.