home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1998 December / WPCDEC98.ISO / dxrs / Sofwpc12.dxr / 00014.ls < prev    next >
Encoding:
Text File  |  1998-10-12  |  2.9 KB  |  83 lines
  1. on section_frame
  2.   global rolllist, x, whichprog, newlist, whichsection, SOFSelectedSection, t
  3.   set thiscount to "put count(" & whichsection & ") into t"
  4.   do(thiscount)
  5.   if rollOver(16) then
  6.     set the member of sprite 16 to member "menublack"
  7.   else
  8.     set the member of sprite 16 to member "menured"
  9.   end if
  10.   repeat with r = 2 to 100
  11.     puppetSprite(r, 1)
  12.   end repeat
  13.   if t > 5 then
  14.     repeat with s = 31 to 32
  15.       if rollOver(s) then
  16.         set the member of sprite s to member getAt(getAt(rolllist, s - 30), 2)
  17.         next repeat
  18.       end if
  19.       set the member of sprite s to member getAt(getAt(rolllist, s - 30), 1)
  20.     end repeat
  21.   else
  22.     nothing()
  23.   end if
  24.   if rollOver(81) then
  25.     set the member of sprite 85 to member "ENTERTAINMENT2"
  26.     set the member of sprite 86 to member "entertainmentrollover"
  27.     set the loc of sprite 86 to point(193, 397)
  28.   else
  29.     if rollOver(82) then
  30.       set the member of sprite 85 to member "DEVELOP2"
  31.       set the member of sprite 86 to member "developrollover"
  32.       set the loc of sprite 86 to point(319, 396)
  33.     else
  34.       if rollOver(83) then
  35.         set the member of sprite 85 to member "SOHO2"
  36.         set the member of sprite 86 to member "utilsrollover"
  37.         set the loc of sprite 86 to point(446, 397)
  38.       else
  39.         if rollOver(84) then
  40.           set the member of sprite 85 to member "UTILS2"
  41.           set the member of sprite 86 to member "sohorollover"
  42.           set the loc of sprite 86 to point(573, 396)
  43.         else
  44.           set the member of sprite 85 to SOFSelectedSection
  45.           set the member of sprite 86 to member "softdot"
  46.           set the loc of sprite 86 to point(2000, 2000)
  47.         end if
  48.       end if
  49.     end if
  50.   end if
  51.   if rollOver(4) then
  52.     set the member of sprite 9 to member (the name of member the castNum of sprite 4 & "b")
  53.     set the locV of sprite 9 to the locV of sprite rollOver()
  54.   else
  55.     if rollOver(5) then
  56.       set the member of sprite 9 to member (the name of member the castNum of sprite 5 & "b")
  57.       set the locV of sprite 9 to the locV of sprite rollOver()
  58.     else
  59.       if rollOver(6) then
  60.         set the member of sprite 9 to member (the name of member the castNum of sprite 6 & "b")
  61.         set the locV of sprite 9 to the locV of sprite rollOver()
  62.       else
  63.         if rollOver(7) then
  64.           set the member of sprite 9 to member (the name of member the castNum of sprite 7 & "b")
  65.           set the locV of sprite 9 to the locV of sprite rollOver()
  66.         else
  67.           if rollOver(8) then
  68.             set the member of sprite 9 to member (the name of member the castNum of sprite 8 & "b")
  69.             set the locV of sprite 9 to the locV of sprite rollOver()
  70.           else
  71.             if not rollOver(9) then
  72.               set the member of sprite 9 to member "softdot"
  73.               set the loc of sprite 9 to point(310, 2000)
  74.             end if
  75.           end if
  76.         end if
  77.       end if
  78.     end if
  79.   end if
  80.   updateStage()
  81.   go(the frame)
  82. end
  83.