Problem with types....

In the function updatebullet()

Change the first line to:

For shot.bullet=Each bullet

Hope this helps

RV