diff options
Diffstat (limited to 'html')
| -rw-r--r-- | html/examples/render_cd_bgalpha.lua | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/html/examples/render_cd_bgalpha.lua b/html/examples/render_cd_bgalpha.lua new file mode 100644 index 0000000..3cbcff9 --- /dev/null +++ b/html/examples/render_cd_bgalpha.lua @@ -0,0 +1,27 @@ +require"imlua" +require"cdlua" +require"cdluaim" + +local image = im.ImageCreate(500, 500, im.RGB, im.BYTE) +image:AddAlpha() +local canvas = image:cdCreateCanvas() -- Creates a CD_IMAGERGB canvas + +canvas:Activate() + +-- Use SetBackground instead of Background to avoid conflict with cd.QUERY +canvas:SetBackground(cd.EncodeAlpha(cd.EncodeColor(255, 255, 255), 0)) -- full transparent white +canvas:Clear() + +fgcolor = cd.EncodeAlpha(cd.EncodeColor(255, 0, 0), 50) -- semi transparent red +canvas:Foreground(fgcolor) +canvas:Font("Times", cd.BOLD, 24) +canvas:Text(100, 100, "Test") +canvas:Line(0,0,100,100) + +fgcolor = cd.EncodeColor(0, 0, 255) +canvas:Foreground(fgcolor) +canvas:Line(0,50,150,50) + +canvas:Kill() + +image:Save("new.png", "PNG") |