This is the code that loads the image and plain.
`fire image
load bitmap "media\2d\effects\fireboom.bmp",1
for i = 16 to 30
get image i,(i-16)*64,0,(i-15)*64,64,0
next i
firetexnum = 15
delete bitmap 1
make object plain 50,100,100
ghost object on 50
hide object 50
and heres the one that makes it textured
function fire_effect(obj)
if firetexnum = 30
hide object obj
firetexnum = 15
pfireon = 0
endif
if pfireon = 1
if time2 > timer() + 1
texture object obj,firetexnum : show object obj
inc firetexnum
endif
endif
time2 = timer()
endfunction