Code: Select all
F$="testimage"
ALBUM IMPORT F$ ' choose a pattern
GRAPHICS
GRAPHICS CLEAR 0,0,1 ' make a color background
GRAPHICS MODE CLEAR
DRAW FONT NAME "ArialMT"
DRAW FONT SIZE 200
DRAW TEXT "Hullabaloo" AT 50,200 ' draw transparent text
GRAPHICS SAVE 0,0, 1024,768 TO "stencil.png" ' save image with alpha data
GRAPHICS MODE NORMAL
DRAW IMAGE F$ AT 0,0 SCALE 1 ' draw the patterned image
GRAPHICS MODE CLEAR
DRAW IMAGE "stencil1.png" AT 0,0 SCALE 1 'ANGLE A ' draw the stencil
GRAPHICS SAVE 0,0, 1024,768 TO "final.png"
PAUSE 30