Ктотная галактика - спиральная галактика с перемычкой (сиречь, баром). Вероятно, SBb. Инструмент - Context Free. Начато днём (давненько не пользовался программой, с новой версией изменился синтаксис, так что попутно знакомился с новым кодом), но полностью переписано за ночь. Дико извиняюсь за корявый бар, но переделывать буду уже позже, спать хочу. ^_^
Код самого фрактала, ежели кому интересно.
Цитата:
startshape ktot_galaxy
CF::Background = [ b -1 ]
shape ktot_galaxy {
bar [ ]
blue_branch [ ]
red_branch [ ]
}
shape bar {
loop 200 [ x 0.5 y 0.5 s 0.995 alpha -0.03 ]
bar_branch [ ]
loop 200 [ x -0.5 y -0.5 s 0.995 alpha -0.03 ]
bar_branch [ ]
}
shape bar_branch {
CIRCLE [ s 20 b 0.8 hue 60 sat 1 alpha -0.9 ]
}
shape bar_branch {
CIRCLE [ x 1 y 10 s 20 b 0.8 hue 60 sat 1 alpha -0.9 ]
}
shape bar_branch {
CIRCLE [ x -10 y -1 s 20 b 0.8 hue 60 sat 1 alpha -0.9 ]
}
shape blue_branch {
blue_stars [ x 50 y 50 ]
}
shape red_branch {
red_stars [ x -50 y -50 ]
}
shape blue_stars {
loop 500 [ x -2 y 0.5 r 0.53 s 1.001 alpha -0.01 hue 0.5 ]
blue_star [ ]
}
shape red_stars {
loop 500 [ x 2 y -0.5 r 0.53 s 1.001 alpha -0.01 hue -0.5 ]
red_star [ ]
}
shape blue_star {
CIRCLE [ hue 60 sat 1 b 1 ]
blue_star [ x -1 y 1 s 0.999 ]
}
shape blue_star {
CIRCLE [ b 0 ]
blue_star [ x 1 y 1 s 0.999 ]
}
shape blue_star {
CIRCLE [ b 0 ]
blue_star [ x -1 y -1 s 0.999 ]
}
shape blue_star {
CIRCLE [ b 0 ]
blue_star [ x 1 y -1 s 0.999 ]
}
shape red_star {
CIRCLE [ hue 1 sat 1 b 1 ]
blue_star [ x -1 y 1 s 0.999 ]
}
shape red_star {
CIRCLE [ b 0 ]
blue_star [ x 1 y 1 s 0.999 ]
}
shape red_star {
CIRCLE [ b 0 ]
blue_star [ x -1 y -1 s 0.999 ]
}
shape red_star {
CIRCLE [ b 0 ]
blue_star [ x 1 y -1 s 0.999 ]
}
