/kochR{
2 copy ge{dup 0 rlineto}
{
3 div
2 copy kochR
60 rotate
2 copy kochR
-120 rotate
2 copy kochR
60 rotate
2 copy kochR
}ifelse
pop pop
}def
Модифицированная звезда Коха
Модифицируйте программу рисования звезды Коха для создания другого фрактала, основывающегося на фигуре, состоящей из 5 линий 0-го порядка, вычерчиваемых путем смещения на 1 условную единицу в восточном, северном, восточном, южном и восточном направлениях.
вот изначальная программа рисования звезды Коха(на Postscript'e):
Код:
Сама звезда Коха выглядит так:
Код:
Откладывайте единичные отрезки в заданной последовательности и направлениях и получите свой фрактал.