You could setup an array to generate the sprites, collision and add random movement. If you want them destroyed set up a timer and then just use the delete sprite command.
This is my code for an array. You can use a fixed sprite position or you can set x# and Y# to a random number generator.
Global dim pegs [52]
for i=1 to 52
loadImage(i , "1.png")
pegs[i] = createSprite (i)
setSpriteSize(pegs[i],2,-1)
setSpritePhysicsOn(pegs[i],3)
setSpriteDepth(pegs[i],10)
setSpriteshape(pegs[i],1)
setSpritePosition (pegs[i], x#, y#)
next i