Help with a simple animation

Question

Hello everybody!
I need a little help about an animation using Lingo!
I need to make 8 sprites and make them look as a volume controler and then make two bottons ( " - " and " + ") and make it looks like that those two bottons controle the volume by pressing " + " , sprite(1) should appear and then when I press it again sprite(2) should appear and so on till sprite(8); and the same thing for the " - " botton, when pressed, sprite(8) should disappear and when pressed again sprite(7) should disappear and so on...
Any help will be appreciated!
Thank you in advance!

Answer 1

There is certainly nothing at all wrong with the suggestion supplied by pallottadesign, but I thought I might provide an alternative solution. I think I understand how you want this volume control to look, but I may be wrong. One of my favorite techniques is to use imaging lingo to create a "one-sprite widget".
With this behavior you need only one bitmap member as a sprite on the stage. However you do need an additional 3 bitmap cast members in the cast (but not on the score). You need an + button, - button and a "volume indicator" (like a rectangle) that will be repeated depending on the current volume. These 3 cast members should all be the same height.
Attach this behavior to a bitmap sprite. It doesnt matter what the bitmap looks like because the script alters the image. There are parameters that will need to be modified, so open the behaviors parameter dialog to do that. I have a simple demo movie I can send you, so send me a private message with your email address if you want it.
-- VOLUME CONTROL ONE SPRITE WIDGET --
property spriteNum, pMe, pNumLevels, pDownButton, pUpButton, pVolumeIndicator, pSpacing, pBitDepth, pCurrentVolume, pStartingVolume
on beginSprite me
  pMe = sprite(spriteNum)
  pCurrentVolume = pStartingVolume
  updateImage(me)
end
on mouseUp me
  if the clickLoc[1] - pMe.loc[1] < pDownButton.width then
    if pCurrentVolume > 0 then
      pCurrentVolume = pCurrentVolume - 1
      -- Your code here
      updateImage(me)
    end if
  else if the clickLoc[1] - pMe.loc[1] > pMe.width - pUpButton.width then
    if pCurrentVolume < pNumLevels then
      pCurrentVolume = pCurrentVolume + 1
      -- Your code here
      updateImage(me)
    end if
  end if
end
on getPropertyDescriptionList
  description = [:]
  addProp description,#pNumLevels, [#default:1, #format:#integer, #comment:"Number of volume levels"]
  addProp description,#pDownButton, [#default:member(0), #format:#member, #comment:"Volume down button cast member"]
  addProp description,#pUpButton, [#default:member(0), #format:#member, #comment:"Volume up button cast member"]
  addProp description,#pVolumeIndicator, [#default:member(0), #format:#member, #comment:"Volume indicator cast member"]
  addProp description,#pBitDepth, [#default:24, #format:#integer, #comment:"Bit Depth"]
  addProp description,#pSpacing, [#default:1, #format:#integer, #comment:"Spacing"]
  addProp description,#pStartingVolume, [#default:0, #format:#integer, #comment:"Starting volume"]
  return description
end
on updateImage me
  imageWidth = pDownButton.width + pUpButton.width + (pNumLevels * pVolumeIndicator.width) + ((pNumLevels + 1) * pSpacing)
  imageHeight = pVolumeIndicator.height
  newImage = image(imageWidth, imageHeight, pBitDepth)
  newImage.copyPixels(pDownButton.member.image, pDownButton.rect, pDownButton.rect)
  repeat with counter = 1 to pNumLevels
    if counter <= pCurrentVolume then
      x1 = pDownButton.width + (counter * pSpacing) + ((counter - 1) * pVolumeIndicator.width)
      y1 = 0
      x2 = x1 + pVolumeIndicator.width
      y2 = pVolumeIndicator.height
      newImage.copyPixels(pVolumeIndicator.member.image, rect(x1,y1,x2,y2) , pVolumeIndicator.rect)
    end if
  end repeat
  newImage.copyPixels(pUpButton.member.image, rect(newImage.width - pUpButton.width, 0, newImage.width, newImage.height), pUpButton.rect)
  pMe.member.image = newImage
  pMe.width = pMe.member.width
  pMe.height = pMe.member.height
  pMe.member.regPoint = point(0,0)
end