Flyer Part 2, contains the sprite creation functions

flyer2.bas

function newToaster() as sprite ptr
    var ret = new sprite
    ret->img = callocate(sizeof(fb.image ptr) * 4)
    ret->max_img = 4
    for n as integer = 0 to 3
        ret->img[n] = flyer(n)
    next
    var y = rndrange(0,SaverInfo.ScrHeight/2)
    var yy = rndrange(0,10)
    if yy > 5 then y = -(y)
    ret->position = vec2d(rndrange(SaverInfo.ScrWidth,SaverInfo.ScrWidth+SaverInfo.ScrWidth/2),y)
    ret->movement = vec2d(-(rndrange(3,10)),rndrange(1,3))
    return ret
end function

function newToast() as sprite ptr
    var ret = new sprite
    ret->img = callocate(sizeof(fb.image ptr))
    ret->max_img = 1
    ret->img[0] = toast(rndrange(0,2))
    var y = rndrange(0,SaverInfo.ScrHeight/2)
    var yy = rndrange(0,10)
    if yy > 5 then y = -(y)
    ret->position = vec2d(rndrange(SaverInfo.ScrWidth,SaverInfo.ScrWidth+SaverInfo.ScrWidth/2),y)
    ret->movement = vec2d(-(rndrange(5,10)),rndrange(1,3))
    return ret
end function