BAS:

        '** STAR LOADER **

STAR_LOAD:
		StarPalSize=0
        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

StarAffi:
        gosub IMGDISPLAY:' ** DISPLAY IMAGES GIF OR IMAGES BMP 16/256 COLORS NOT COMPRESSED **
		StarPalSize=MAX(PalSize,StarPalSize)
		RETURN




