Yeah, declare an array called bulletLife(4), i.e dim bulletLife(4)
next use a for...next loop starting at 1 and ending at 4
for attack=1 to 4
then put the attack routine you use in the loop and change it so each enemy is a number from 1 to four, so if you'd use object position x(objectNumber) to find the position of the enemy before he shoots, change objectNumber to attack and do this for everything that refers to what enemy is to shoot. Then, at the end, use something like bulletLife(attack)=10 or whatevr, so all the enemies bullet lives will be set to 10.
Whatever I did I didn't do it!