NB. Title graphic
NB.
NB. For Sierpinksi carpet, see separate example

F=. jpath '~temp\t1.bmp'
 
Y=. 3&#. inverse i.243
D=. (YELLOW,BLUE,BROWN) {~ Y +./ . *. |: Y
D writebmp F

gback 192 192 128
glbkmode 1
glfont 'Arial 150 bold italic'
glrgb 128 64 128
gltextcolor ''
gltextxy 500 935
gltextalign TA_CENTER
gltext 'J Graphics'

wd 'set p2 "',F,'"'
wd 'setshow p2 1'
