Here's what I came up with myself, works like a charm. You need to use the SetImageWrapU command to make the image repeat. According to the text the best result on all devices is to use an image like this:
"Due to these possibilities it is recommended that UV coords only be modified on sprites that are using whole images (not atlas textures) and which are a power of 2 size in both width and height. With these constraints it is possible to use UV values outside 0-1 to clamp or repeat the texture successfully."
HP = 100
PointImg = LoadImage( "Point.png" )
SetImageWrapU( PointImg, 1 )
HPspr = CreateSprite( PointImg )
SetSpriteColor( HPspr, 255, 0, 0, 255 )
SetSpriteScale(HPspr, HP, 1)
SetSpriteUVScale( HPspr, 1.0/HP, 1 )
I have attached the image I use, feel free to use it yourself. It's in black and white with alpha so you can change the color by code.
Thanks baxslash but I solved it myself