setBrush 0xff7f7f
setPen 0x7f0000

path_moveTo path -1000000 10000
path_cubicTo path 100 100 100 150 150 400
path_closeSubpath path

begin_block drawing

  drawPath ellipse

  drawLine -1000000 200 200 200
  drawLine 200 -1000000 200 200
  drawLine 200 200 1000000 200
  drawLine 200 200 200 1000000
  drawLine -1000000 -1000000 200 200

  drawPolygon [-1000000 100 100 -1000000 100 100]
  drawRect 300 -500000 1000000 1000000

  drawPath path
  
end_block

save
translate 20 20
setBrush #0x7f7f7fff
setPen #0x7f00007f
repeat_block drawing

translate 20 20
setRenderHint Antialiasing
setBrush #0x7f7fff7f
setPen #0x7f007f00
repeat_block drawing
restore

setPen 0x00007f 2
setRenderHint Antialiasing

drawLine 0 -200 200 200

setPen 0x007f00 10

drawLine 0 -200 200 0