ZXASCII
AUTO -1
PROG demos:misc/xmas_tree
CHANGED FALSE
1 FOR I=0 TO 70 STEP 0.1:
    PLOT I*COS(I)+140,20-I*(SIN(I)*0.2-2):
 NEXT I:
 polygon 136,20 TO 140,12 TO 144,20 TO 134,16 TO 146,16