FilesExpand file tree

 master

/

render_cd_bgalpha.lua

Copy path

Blame

More file actions

Blame

More file actions

Latest commit

 

History

History

History

27 lines (20 loc) · 730 Bytes

 master

/

render_cd_bgalpha.lua

Copy path

Top

File metadata and controls

• Code
• Blame

27 lines (20 loc) · 730 Bytes

Raw

Copy raw file

Download raw file

Open symbols panel

Edit and raw actions

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

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")