my code is now :

particles_add(s.x+2,s.y+5,1,6,false,true)

I d like change destroy of the enemy

somthing like that (small cicrcles)

                                          * *   
                      *                *       *
       *            *    *            *         *
    *  *  *        *      *           *         *
       *            *    *             *       *
                      *                   * *

my request
here are some fragments of the game code

if collectibletype==colt_ring then
s.score=100
end
add(entities,s)
return s
end
function collectible_update(s)
end

now if on one level I have 3 rings the same and for each ring I get 100 points
I would like to change the code to something like this
if collectibletype==colt_ring then
s.bonus+=1 end
if s.bonus=1 then s.score=100 end
if s.bonus=1 then s.score=200 end
if s.bonus=1 then s.score=400 end
so that for getting the first ring in any order there would be 100 points, for the second 200 points, third 400 points

Please help with the code
I would also like to add 2th High score next to in the pannel
Now I only have the Highscore

hiscore=dget(0)
input={}

newhiscore=false
if player and player.score>hiscore then
hiscore=player.score
newhiscore=true

dset(0,hiscore)
end

print(pad0(player.displayscore,5).."0",10,0,7)

if flash and player.score>hiscore then
else
print(pad0(hiscore,5).."0",57,0,7)
end

Please help me write the correct code.
I would like something like that

if dir d_up then y=player.y+8,
if dir d_down then y=player.y+1,
if dir d_none or d_left or d_right then y=player.y+5