Hi Mark,
I replaced the code:
tex1=CreateTexture(w,w, tex_color, tex_mipmap_OFF)
Per:
tex1=CreateTexture(w,w, tex_color Or tex_mipmap_OFF)
Nothing changed, and then by: tex1=CreateTexture(w,w, tex_color + tex_mipmap_OFF)
And it had no effect, it remains blurred. Thanks for your attention.