Jump to content

Colour bars/Display: Difference between revisions

m
(Phix added, PicoLisp moved below PHP)
Line 880:
-- ============================
--
 
--#withtype Ihandle
--#withtype cdCanvas
--#withtype cdCanvan
 
include pGUI.e
 
Line 909 ⟶ 904:
cdcanvas = cdCreateCanvas(CD_IUP, ih)
cddbuffer = cdCreateCanvas(CD_DBUFFER, cdcanvas)
cdCanvasSetBackground(cddbuffer, CD_WHITE)
cdCanvasSetForeground(cddbuffer, CD_BLACK)
cdCanvasFont(cddbuffer, "Helvetica", CD_PLAIN, 8)
cdCanvasVectorTextDirection(cddbuffer, 1, 1, 1, 0)
return IUP_DEFAULT
end function
7,818

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.