Есть минимум два способа: 1) Задний фон сделать спрайтом. 2)Использовать
ImageBuffer.
Вторым способом делается примерно так:
.....
Render_Snow = CreateImage(xR, yR)
Out_Img = CreateImage(xR, yR)
While Not KeyHit(1)
doSnow()
UpdateWorld()
RenderWorld
GrabImage Render_Snow, 0, 0
SetBuffer ImageBuffer(Out_Img)
Cls
;DrawImage BackFon1,0,0
DrawImage BackFon,0,0
DrawImage SwordMan,900,300
DrawImage Render_Snow,0,0
DrawImage fen,MouseX(),MouseY()
SetBuffer BackBuffer()
DrawImage Out_Img,0,0
Flip
.....