Haiku Gallery
: x y t 1 / 12 3 / mod - 10 * 0.5 cos * cos 45 / y + 0.015 + ; x 0.6 < x 0.02 > and x 0.3 < x 0.02 > and 0 x 0.9 < x 0.02 > and
資工4A
王建寰
'25 Sep 15
: 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
中華民國
資傳4B 羅詣凱
'25 Sep 15
: 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
奧地利國旗
資傳四B 吳思賢
'25 Sep 15
: y x t 2 / 10.2 1 / mod - 10 * 2 cos * cos 7 / y + 0.005 + ; x 0.33 > x 0.66 < x 0.66 < x 0.33 > and y 0.975 < y 0.025 > x 0.975 < x 0.025 > and and and
俄羅斯國旗 Redux
Anonymous
'25 Sep 15
: y x t 1 / 12 3 / mod - 8 * 0.5 cos * cos 180 / 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 y 0.025 > y 0.975 < and
俄羅斯國旗
李佩甄
'25 Sep 15
: y x t 2 / 10.2 3 / mod - 20 * 0.5 cos * cos 150 / 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
台灣國旗
連子懿
'25 Sep 15
: y x t 1 / 100 1 / mod - 10 * 2 cos * cos 70 / y + ; y 0.99 < y 0.01 > and x y < x 1 y - < and not and y 0.66 < y 0.33 > and over and swap 1 over and swap y 0.66 > y 0.33 < or and
Flag of Bahamas Redux
陳詠舜
'25 Sep 15
: y x t 1 / 12 3 / mod - 10 * 0.5 cos * cos 45 / 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 Sep 15
: y x t 6 / 10 3 / mod - 8 * 0.6 cos * cos 20 / y + 0.001 + ; : n 12 ; : alpha pi 10 / ; : x0 0.2 ; : y0 0.75 ; : r0 0.16 ; : 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
台灣國旗
韓培倫
'25 Sep 15
: x y t 2 / 10.2 1 / mod - 9 * 0.55 cos * cos 60 / x + 0.005 + ; x 0 > x 0.33 < and x 0.66 > x 0.975 < and or x 0.33 > x 0.975 < and 0 x 0.025 > x 0.975 < and
Untitled
Anonymous
'25 Sep 15
: 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
德國
陳璟毓
'25 Sep 15
: y x t 2 / 10.2 1 / mod - 10 * 2 cos * cos 7 / y + 0.005 + ; x 0.33 > x 0.66 < x 0.66 < x 0.33 > and y 0.975 < y 0.025 > x 0.975 < x 0.025 > and and and
義大利
邱垂華
'25 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
: 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 Sep 15
x 0.33 > x 0.66 > y 1
資工4A
王建寰
'25 Sep 15
: 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 Sep 15
: 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 Sep 15
Next