10 lines
142 B
Text
10 lines
142 B
Text
|
#
|
||
|
|
# draw-pixel.icn
|
||
|
|
#
|
||
|
|
procedure main()
|
||
|
|
&window := open("pixel", "g", "size=320,240")
|
||
|
|
Fg("#ff0000")
|
||
|
|
DrawPoint(100, 100)
|
||
|
|
Event()
|
||
|
|
end
|