BAS:

        '** STAR LOADER **

STAR_LOAD:

        ImgName$="EX\STAR00.BMP"
        'record pixels outputs (end of COPY with |FRAMEOUT or |PASTE)
        |COPY,SpriteStar0:'     Create Sprite
        gosub StarAffi
        ImgName$="EX\STAR01.BMP"
        'record pixels outputs (end of COPY with |FRAMEOUT or |PASTE)
        |COPY,SpriteStar1:'     Create Sprite
        gosub StarAffi
        ImgName$="EX\STAR02.BMP"
        'record pixels outputs (end of COPY with |FRAMEOUT or |PASTE)
        |COPY,SpriteStar2:'     Create Sprite
        gosub StarAffi
        ImgName$="EX\STAR03.BMP"
        'record pixels outputs (end of COPY with |FRAMEOUT or |PASTE)
        |COPY,SpriteStar3:'     Create Sprite
        gosub StarAffi

StarAffi:

        ximg=0:yimg=0:'         image coordinates
        FirstInk=0:'            First ink use in palette
        BackGround=0:'          BackGround pen
        ' ** DISPLAY BMP IMAGES 16/256 COLORS NOT COMPRESSED **
        goto BMPDISPLAY





