home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1998 December / WPCDEC98.ISO / dxrs / Sofwpc12.dxr / 00012.ls < prev    next >
Encoding:
Text File  |  1998-10-12  |  569 b   |  21 lines
  1. on blue
  2.   global whichprog, x, whichsection, whichonehuh, SOFprevsetup, SOFSelectedSection, pageAmount
  3.   set pageAmount to 0
  4.   set SOFSelectedSection to "soho2"
  5.   set whichprog to 4
  6.   set whichsection to "SOFsoholist"
  7.   set t to count(SOFsoholist)
  8.   set x to 1
  9.   set stop to 5
  10.   repeat with f = 20 to 32
  11.     set the member of sprite f to member "softdot"
  12.     set the loc of sprite f to point(2000, 2000)
  13.   end repeat
  14.   SOFimagessetup()
  15.   set the member of sprite 2 to member "sohomain"
  16.   updateStage()
  17.   put_them_on()
  18.   set whichonehuh to 1
  19.   set SOFprevsetup to 1
  20. end
  21.