Haiku Gallery
: y x t 1 / 10.2 1 / mod - 10 * 0.8 cos * cos 70 / y + 0.010 + ; x 0.30 < x 0.40 > or y 0.45 < y 0.55 > or and y 0.990 < y 0.010 > and and x 0.25 > x 0.30 < and x 0.40 > x 0.45 < and or y 0.45 < y 0.55 > or and y 0.40 > y 0.45 < and y 0.55 > y 0.60 < and or x 0.30 < x 0.40 > or and or y 0.990 < y 0.010 > and and x 0.30 > x 0.40 < and y 0.45 > y 0.55 < and or 0.0000001 * x 0.25 > x 0.30 < and x 0.40 > x 0.45 < and or y 0.40 > y 0.45 < and y 0.55 > y 0.60 < and or or or y 0.990 < y 0.010 > and and
挪威國旗
黃東禹
'25 Jul 11
: y x t 10 / 10 10 / mod - 30 * 0.5 cos * cos 100 / y + 0.003 + ; : n 10 ; : alpha pi 20 / ; : x0 0.25 ; : y0 0.75 ; : r0 0.3 ; : theta x x0 + y y0 - atan2 pi + ; : r x x0 - dup * y y0 - dup * + sqrt ; : beta theta pi n / 2 * mod pi n / - abs ; : b r0 alpha sin * alpha cos beta sin * beta cos alpha sin * + / ; x 0.5 > y 0.5 > y 0.99 < and and y 0.025 > y 0.5 < and or b r > r 0.5 > and r 0.1 < and or b r > r 0.1 > and r 0.09 < or x 0.5 < y 0.5 > y 0.99 < and and
Uniqlo flag
資傳3B 蘇約寧
'25 Jul 11
: y x t 1.5 / 10.2 3 / mod - 15 * 0.15 cos * cos 90 / y + ; : n 12 ; : alpha pi 10 / ; \ half of spike angle : x0 0.25 ; : y0 0.75 ; : r0 0.15 ; : theta x x0 - y y0 - atan2 pi + ; : r x x0 - dup * y y0 - dup * + sqrt ; : beta theta pi n / 2 * mod pi n / - abs ; : b r0 alpha sin * alpha cos beta sin * beta cos alpha sin * + / ; x 0.5 > y 0.5 > y 0.99 < and and y 0.025 > y 0.5 < and or b r > r 0.1 > and r 0.09 < or or b r > r 0.1 > and r 0.09 < or x 0.5 < y 0.5 > y 0.995 < and and
陳智祺
Anonymous
'25 Jul 11
: y x t 1.5 / 10.2 3 / mod - 15 * 0.15 cos * cos 90 / y +; : n 12 ; : alpha pi 10 / ; \ half of spike angle : x0 0.25 ; : y0 0.75 ; : r0 0.15 ; : theta x x0 - y y0 - atan2 pi + ; : r x x0 - dup * y y0 - dup * + sqrt ; : beta theta pi n / 2 * mod pi n / - abs ; : b r0 alpha sin * alpha cos beta sin * beta cos alpha sin * + / ; x 0.5 > y 0.5 > y 0.99 < and and y 0.025 > y 0.5 < and or b r > r 0.1 > and r 0.09 < or or b r > r 0.1 > and r 0.09 < or x 0.5 < y 0.5 > y 0.995 < and and
陳智祺
Anonymous
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 20 * 0.5 cos * cos 90 / y + 0.0005 + ; : n 12 ; : alpha pi 10 / ; : x0 0.25 ; : y0 0.75 ; : r0 0.17 ; : theta x x0 - y y0 - atan2 pi + ; : r x x0 - dup * y y0 - dup * + sqrt ; : beta theta pi n / 2 * mod pi n / - abs ; : b r0 alpha sin * alpha cos beta sin * beta cos alpha sin * + / ; x 0.5 > y 0.5 > y 0.99 < and and y 0.025 > y 0.5 < and or b r > r 0.1 > and r 0.09 < or or b r > r 0.1 > and r 0.09 < or x 0.5 < y 0.5 > y 0.995 < and and
中華民國國旗
資工四A_410126519_謝鎮宇
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 20 * 0.5 cos * cos 180 / y + 0.0005 + ; : n 12 ; : alpha pi 12 / ; : x0 0.25 ; : y0 0.75 ; : r0 0.17 ; : theta x x0 - y y0 - atan2 pi + ; : r x x0 - dup * y y0 - dup * + sqrt ; : beta theta pi n / 2 * mod pi n / - abs ; : b r0 alpha sin * alpha cos beta sin * beta cos alpha sin * + / ; x 0.5 > y 0.5 > y 0.99 < and and y 0.025 > y 0.5 < and or b r > r 0.1 > and r 0.09 < or or b r > r 0.1 > and r 0.09 < or x 0.5 < y 0.5 > y 0.995 < and and
台灣國旗
資工四A謝鎮宇
'25 Jul 11
: y x t 1 / 100 1 / mod - 10 * 2 cos * cos 70 / y + ; y 0.66 < y 0.33 < 0 y 0.975 < y 0.025 > and
德國國旗 Redux Redux
林昇諺
'25 Jul 11
: y x t 5 / 10 10 / mod - 30 * 0.2 cos * cos 100 / y + 0.003 + ; : n 12 ; : alpha pi 10 / ; : x0 0.25 ; : y0 0.75 ; : r0 0.17 ; : theta x x0 - y y0 - atan2 pi + ; : r x x0 - dup * y y0 - dup * + sqrt ; : beta theta pi n / 2 * mod pi n / - abs ; : b r0 alpha sin * alpha cos beta sin * beta cos alpha sin * + / ; x 0.5 > y 0.5 > y 0.99 < and and y 0.025 > y 0.5 < and or b r > r 0.1 > and r 0.09 < or or b r > r 0.1 > and r 0.09 < or x 0.5 < y 0.5 > y 0.99 < and and
Taiwan flag
孫康瑄
'25 Jul 11
: y x t 1 / 10.2 1 / mod - 10 * 0.14 cos * cos 70 / y + 0.010 + ; y 0.66 < y 0.33 < 0 y 0.975 < y 0.025 > and
德國國旗 Redux
林昇諺
'25 Jul 11
: x x ; : y x t 2/ 1 4 / mod - 20 * 1 cos * cos 10 / y + ; : x x 2 * ; : y y 2 * 1 - ; : n 12 ; : alpha pi 12 / ; : x0 0.5 ; : y0 0.5 ; : r0 0.3 ; : theta x x0 - y y0 - atan2 pi + ; : r x x0 - dup * y y0 - dup * + sqrt ; : beta theta pi n / 2 * mod pi n / - abs ; : b r0 alpha sin * alpha cos beta sin * beta cos alpha sin * + / ; b r > r .19 > and r .14 < or >r r@ x 1 > or y 0 < or r> y 0 > x 1 < an
0
Anonymous
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 15 * 0.15 cos * cos 50 / y + 0.005 + ; : n 12 ; \ number of spikes : alpha pi 10 / ; \ half of spike angle : x0 0.25 ; ( 太陽x座標 ) : y0 0.75 ; ( 太陽x座標 ) : r0 t 23 / 1 5 / mod 1 30 / + ; : theta x x0 - y y0 - atan2 pi + ; ( 太陽的角度 ) : r x x0 - dup * y y0 - dup * + sqrt ; ( 半徑 ) : beta theta pi n / 2 * mod pi n / - abs ; ( 太陽尖尖 ) : b r0 alpha sin * alpha cos beta sin * beta cos alpha sin * + / ; ( 呈現太陽尖尖狀 ) x 0.5 > y 0.5 > y 0.99 < and and y 0.025 > y 0.5 < and or b r > r 0.1 > and r 0.09 < or or \ 太陽圖形 + 紅色 b r > r 0.1 > and r 0.09 < or \ 綠 x 0.5 < y 0.5 > y 0.995 < and and \ 藍
Taiwan
賴瑩珊
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 8 * 0.002 cos * cos 60 / y + 0.010 + ; y 0.025 > y 0.85 < and y 0.15 > y 0.85 < and y 0.975 < y 0.15 > and
克里米亞自治共和國
駱晟堯
'25 Jul 11
: f t pi 2 * mod ; \ 頻率 : xf x pi 2 * * ; \ 波形變化量 : w 0.1 ; \ 振幅 \ 正弦曲線 : y xf f + sin w * y + ; \ y = 振幅*sin(頻率+波形變化量) \ 座標中央 : x0 x 10 * 5 - ; : y0 y 10 * 5 - ; : r push dup * pop dup * + sqrt ; \ 計算半徑 : circle push push push x0 pop + y0 pop + r pop < ; \ 畫圓 ( x y r ) \ 5個圓環 : blue 2.5 -.5 1.2 circle 2.5 -.5 1 circle not and ; : yellow 1.25 .5 1.2 circle 1.25 .5 1 circle not and ; : black 0 -.5 1.2 circle 0 -.5 1 circle not and ; : green -1.25 .5 1.2 circle -1.25 .5 1 circle not and ; : red -2.5 -.5 1.2 circle -2.5 -.5 1 circle not and ; \ 顏色反轉 black blue green or or not black blue red or or not black red yellow green or or or not \ alpha值 y .2 > y .8 < and \ 旗子比例3:5
奧運旗
沈富權
'25 Jul 11
: y x t 0.75 / 30 5 / mod - 8 * 0.2 cos * cos 60 / y + 0.01 + ; x 0.3 > y 0.01 > and x 0.3 > x 0.66 < y 0.01 > and and x 0.66 < y 0.975 < y 0.025 > and
法國
林冠儒
'25 Jul 11
: y x t 1 / 12 3 / mod - 8 * 0.5 cos * cos 60 / y + 0.015 + ; y 0.025 > y 0.33 < y 0.66 > y 0.975 < and or and y 0.66 > y 0.975 < and y 0.33 > y 0.975 < and
俄羅斯
康芸瑄
'25 Jul 11
: y x t 1 / 12 3 / mod - 8 * 0.5 cos * cos 60 / y + 0.015 + ; y 0.025 > y 0.33 < y 0.66 > y 0.975 < and or and y 0.66 > y 0.975 < and y 0.33 > y 0.975 < and
俄羅斯
余奐均
'25 Jul 11
: y x t 1 / 12 3 / mod - 8 * 0.5 cos * cos 60 / y + 0.015 + ; y 0.025 > y 0.33 < y 0.66 > y 0.975 < and or and y 0.66 > y 0.975 < and y 0.33 > y 0.975 < and
俄羅斯 Redux
Anonymous
'25 Jul 11
: y x t 1 / 12 3 / mod - 8 * 0.5 cos * cos 60 / y + 0.015 + ; x 0.33 > x 0.975 < y 0.025 > y 0.975 < and and and x 0.33 > x 0.66 < y 0.025 > y 0.975 < and and and x 0.025 > x 0.66 < y 0.025 > y 0.975 < and and and
法國
吳厚靖
'25 Jul 11
: y x t 1 / 12 3 / mod - 8 * 0.5 cos * cos 60 / y + 0.015 + ; y 0.025 > y 0.33 < y 0.66 > y 0.975 < and or and y 0.66 > y 0.975 < and y 0.33 > y 0.975 < and
俄羅斯
徐意如
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 9 * 0.55 cos * cos 60 / y + 0.005 + ; x 0.33 > x 0.975 < y 0.025 > y 0.975 < and and and x 0.025 > x 0.66 < y 0.025 > y 0.975 < and and and x 0.33 > x 0.66 < y 0.025 > y 0.975 < and and and
義大利國旗
魏朋宥
'25 Jul 11
: y x t 1.7 / 12 3 / mod - 8 * 0.15 cos * cos 60 / y + 0.015 + ; y 0.33 < y 0.33 < y 0.66 > y 0.33 < or y 0.975 < y 0.025 > and
愛沙尼亞國旗
許襄鈴
'25 Jul 11
: y x t 2 / 12 3 / mod - 8 * 0.5 cos * cos 70 / y + 0.015 + ; 1 y 0.33 > y 0.658 < and y 0.33 > y 0.658 < and
奧地利國旗
資傳四Ｂ 吳思賢
'25 Jul 11
: x x ; : y x t 12 / 2 1 / mod - 20 * 1 cos * cos 10 / y + ; : x x 2 * ; : y y 2 * 1 - ; : n 12 ; : alpha pi 12 / ; : x0 0.5 ; : y0 0.5 ; : r0 0.3 ; : theta x x0 - y y0 - atan2 pi + ; : r x x0 - dup * y y0 - dup * + sqrt ; : beta theta pi n / 2 * mod pi n / - abs ; : b r0 alpha sin * alpha cos beta sin * beta cos alpha sin * + / ; b r > r .19 > and r .14 < or >r r@ x 1 > or y 0 < or r> y 0 > x 1 < and
Flag of ROC
陳柏宇
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 8 * 0.002 cos * cos 60 / y + 0.010 + ; y 0.975 < y 0.33 > and y 0.33 > y 0.66 < and y 0.025 > y 0.66 < and
是荷荷荷蘭
林宏歷
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 8 * 0.002 cos * cos 60 / y + 0.010 + ; y 0.975 < y 0.33 > and y 0.33 > y 0.66 < and y 0.025 > y 0.66 < and
法法法國國旗
林宏歷
'25 Jul 11
x 0.33 > x 0.66 > y 1
資工4A
王建寰
'25 Jul 11
: y x t 1.5 / 10.2 3 / mod - 8 * 0.14 cos * cos 70 / y + 0.010 + ; x 0.3 > y 0.02 > and x 0.3 > x 0.66 < y 0.025 > and and x 0.66 < y 0.975 < y 0.025 > and
法國
葉柏巖
'25 Jul 11
: y x t 1.5 / 12 3 / mod - 8 * 0.5 cos * cos 70 / y + 0.015 + ; y 0.66 < y 0.33 < 0 y 0.99 < y 0.025 > and
德國
周律慈
'25 Jul 11
: y x t 1 / 12 3 / mod - 8 * 0.5 cos * cos 60 / y + 0.015 + ; y 0.6 < y 0.02 > and y 0.3 < y 0.02 > and 0 y 0.9 < y 0.02 > and
德國
吳程榆
'25 Jul 11
: y x t 1 / 12 3 / mod - 8 * 0.5 cos * cos 60 / y + 0.015 + ; y 0.6 < y 0.02 > and y 0.3 < y 0.02 > and 0 y 0.9 < y 0.02 > and
德國國旗
吳程榆
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 8 * 0.002 cos * cos 60 / y + 0.010 + ; y 0.66 < y 0.01 > and y 0.01 > y 0.33 < and y 0.00 > y 0.00 < and
德國國旗
許齊文
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 15 * 0.20 cos * cos 180 / y + 0.005 + ; : x0 0.5 ; : y0 0.5 ; : r x x0 - dup * y y0 - dup * + 5 / sqrt ; ( 半徑 ) y 0 > y 0.25 < and y 0.75 > y 1 < and or b r > r 0.1 > and r 0.09 < or or 0 b r > r 0.1 > and r 0.09 < or or y 0.25 > y 0.75 < and y 0.025 > y 0.975 < and
寮人民民主共和國國旗
徐錞瀚
'25 Jul 11
: y x t 2 / 10.2 1 / mod - 10 * 2 cos * cos 7 / y + 0.005 + ; x 0.5 < x 0.0 > and y 0.6 < y 0.6 > and or x 0.8 > x 0.7 < or y 0.65 > y 0.55 < or and over over and rot y 0.025 > y 0.975 < and
New New New Norway 終極版
黃崇恩
'25 Jul 11
: y x t 2 / 10.2 1 / mod - 10 * 2 cos * cos 7 / y + 0.005 + ; x 0.5 < x 0.0 > and y 0.6 < y 0.6 > and or x 0.8 > x 0.7 < or y 0.65 > y 0.55 < or and over over and rot
New New Norway
資工四A黃崇恩
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 9 * 0.23 cos * cos 60 / y + 0.005 + ; x 0.33 > x 0.66 < y 0.025 > y 0.975 < and and and x 0.025 > x 0.975 < y 0.025 > y 0.975 < and and and x 0.33 > x 0.66 < y 0.025 > y 0.975 < and and and
尼日利亞
資工四B李明儒410153451
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 10 * 2 cos * cos 7 / y + 0.005 + ; x 0.5 < x 0.0 > and y 0.6 < y 0.6 > and or x 0.8 > x 0.7 < or y 0.65 > y 0.55 < or and over over and rot
New Norway
黃崇恩
'25 Jul 11
: y x t 3 / 50 5 / mod + 3 * 0.8 cos / cos 30 / y + 0.05 + ; y 0.68 < y 0.975 < and y 0.38 < y 0.66 < and y 0.1 < y 0 > and y 0.99 < y 0 > and
德國
資傳4B高名誼
'25 Jul 11
: y x t 2 / 10.2 3 / mod - 15 * 0.15 cos * cos 50 / y + 0.005 + ; : n 7 ; \ number of spikes : alpha pi 10 / ; \ half of spike angle : x0 0.5 ; ( 太陽x座標 ) : y0 0.5 ; ( 太陽y座標 ) : r0 0.15 ; : theta x x0 - y y0 - atan2 pi + ; ( 太陽的角度 ) : r x x0 - dup * y y0 - dup * + sqrt ; ( 半徑 ) : beta theta pi n / 2 * mod pi n / - abs ; ( 太陽尖尖 ) : b r0 alpha sin * alpha cos beta sin * beta cos alpha sin * + / ; ( 呈現太陽尖尖狀 ) 0 b r > r 0.1 > and r 0.09 < or or \ 太陽圖形 + 紅色 x 0.5 < y 0.5 < y 0.99 < y 0.025 > and and and x 0.5 > y 0.5 > y 0.995 < and and or b r > r 0.1 > and r 0.09 < or b r > r 0.1 > and r 0.09 < or x 0.5 > y 0.5 < and and or or \ 綠 b r > r 0.1 > and r 0.09 < or x 0.5 < y 0.5 > y 0.995 < and and x 0.5 > y 0.5 < y 0.025 > and and or or \ 藍 y 0.025 > y 0.975 < and
藍綠和平~天下太平~中華萬歲 優化版
林哲揚 - doublesheep
'25 Jul 11
: ox x ; : oy y ; : x x 1.1 * ; : y y 1.5 * 0.25 - ; : x x t + .7 * sin y x min 1.3 * t + 1.1 * sin * dup * 10 / x + ; : y y t + 1.1 * sin x .7 * sin * dup * y + ; : clip x 0 > x 1 < * y 0 > * y 1 < * * ; : iclip 1 1 clip - * ; : sun ox 0.5 + oy * 4 pow ; : tenth 10 / ; : hundredth 100 / ; : xor <> ; : japan 1.0 x 5 tenth - dup * y 5 tenth - dup * + 7 hundredth > dup ; japan push push push pop clip pop clip pop clip
Japan Redux
Anonymous
'25 Jul 11
: y x t 1.5 / 10.2 3 / mod - 12 * 0.55 cos * cos 50 / y + 0.005 + ; : one x y - abs .1 < ; : two x 1 y - - abs .1 < ; : both one two or ; both both 1
蘇格蘭旗
駱晟堯
'25 Jul 11
Next