Raster bars: Difference between revisions

Content added Content deleted
(→‎{{header|Raku}}: Now with more swaying)
m (→‎{{header|Phix}}: IupCloseOnEscape no longer needed)
Line 328: Line 328:
IupSetAttribute(dlg, "TITLE", "Raster bars")
IupSetAttribute(dlg, "TITLE", "Raster bars")
IupSetCallback(canvas, "ACTION", Icallback("redraw_cb"))
IupSetCallback(canvas, "ACTION", Icallback("redraw_cb"))
IupCloseOnEscape(dlg)
Ihandle hTimer = IupTimer(Icallback("timer_cb"), 10)
Ihandle hTimer = IupTimer(Icallback("timer_cb"), 10)