rem by Tim Shaw - tishaw@iname.com
    include "bmp.oxh"

    proc main:
        local bitmap&, sid&

        bitmap& = bitmapload&:("mysprite.mbm", 0)
        sid& = spritecreate&:(1, 100, 100, 0)
        spriteappend:(0, bitmap&, bitmap&, 1, 0, 0)
        spritedraw:
        get
    endp