Scheme Canvas

Wiki-Quelltext dieser Seite.

<language>Scheme</language>
<eval>
(clear canvas)
(setcolor canvas 0 0 0)
(setwidth canvas 1)

(line canvas 20 20 80 20)
(line canvas 80 20 80 80)

</eval>
<canvas></canvas>