home *** CD-ROM | disk | FTP | other *** search
/ Champak 48 / cdrom_image.iso / Games / rollerrush / game.dcr / cars_3_upgradepop.ls < prev    next >
Encoding:
Text File  |  2007-10-01  |  2.1 KB  |  81 lines
  1. property sd, spriteNum, mysprites, pUgr
  2.  
  3. on beginSprite me
  4.   sd = sprite(spriteNum)
  5.   mysprites = []
  6.   repeat with b = spriteNum to spriteNum + 3
  7.     append(mysprites, b)
  8.     sprite(b).visible = 0
  9.   end repeat
  10. end
  11.  
  12. on OpenUp me, upg
  13.   pUgr = upg
  14.   repeat with b = 1 to mysprites.count
  15.     sprite(mysprites[b]).visible = 1
  16.   end repeat
  17.   if upg = 1 then
  18.     sprite(91).memberNum = 185
  19.   else
  20.     if upg = 16 then
  21.       sprite(91).memberNum = 184
  22.     else
  23.       if (upg = 22) or (upg = 5) then
  24.         sprite(91).memberNum = 186
  25.       else
  26.         if upg = 24 then
  27.           sprite(91).memberNum = 187
  28.         else
  29.           if (upg = 35) or (upg = 27) then
  30.             sprite(91).memberNum = 188
  31.           else
  32.             if (upg = 6) or (upg = 25) then
  33.               sprite(91).memberNum = 189
  34.             else
  35.               if (upg = 14) or (upg = 23) or (upg = 33) then
  36.                 sprite(91).memberNum = 190
  37.               else
  38.                 if upg = 34 then
  39.                   sprite(91).memberNum = 191
  40.                 else
  41.                   if (upg = 2) or (upg = 13) or (upg = 21) or (upg = 31) then
  42.                     sprite(91).memberNum = 192
  43.                   else
  44.                     if upg = 12 then
  45.                       sprite(91).memberNum = 193
  46.                     else
  47.                       if (upg = 3) or (upg = 4) or (upg = 11) then
  48.                         sprite(91).memberNum = 194
  49.                       else
  50.                         if (upg = 7) or (upg = 15) or (upg = 17) or (upg = 26) or (upg = 32) then
  51.                           sprite(91).memberNum = 195
  52.                         end if
  53.                       end if
  54.                     end if
  55.                   end if
  56.                 end if
  57.               end if
  58.             end if
  59.           end if
  60.         end if
  61.       end if
  62.     end if
  63.   end if
  64. end
  65.  
  66. on BuyIt me
  67.   global gCurrProfile
  68.   playSound(9, "buynow")
  69.   gCurrProfile.UpGradesHave[pUgr] = 1
  70.   SaveProfile()
  71.   CalculateStarInfo()
  72.   go("upgradeS")
  73.   closeUp(me)
  74. end
  75.  
  76. on closeUp me
  77.   repeat with b = 1 to mysprites.count
  78.     sprite(mysprites[b]).visible = 0
  79.   end repeat
  80. end
  81.