1 setPen black

     2 setBrush 7f7fff

     3 

     4 path_moveTo star 50 0

     5 path_lineTo star 30 90

     6 path_lineTo star 100 60

     7 path_lineTo star 0 20

     8 path_lineTo star 80 100

     9 

    10 setFont "times" 50

    11 path_addText text 0 50 "ABCD, 1234, abcd, #¤%&"

    12 

    13 path_addRect rectncircle 0 0 75 75

    14 path_addEllipse rectncircle 25 25 75 75

    15 path_setFillRule rectncircle winding

    16 

    17 path_moveTo curve 100 0

    18 path_cubicTo curve 100 100 50 50 0 100

    19 

    20 begin_block drawing

    21 drawPath star

    22 translate 100 0

    23 drawPath rectncircle

    24 translate 100 0

    25 drawPath curve

    26 translate -200 100

    27 drawPath text

    28 end_block

    29 

    30 translate 50 100

    31 rotate 10

    32 repeat_block drawing