Haiku Gallery
: n 1 + 2 / ; : x .5 y .5 min - .1 y 12 * t .8 * + cos n + x - / sin 3 / ; : k 42 ; : s t 2 * sin 2 / -0.15 + ; : f sin x k * sin x k 13 / * tan * * s + 100 pow ; t 3 * y k * + f x 7 * 2.9 + cos 1 + sqrt 3 pow
Yellow Way Redux
DarkstarAG
'24 Nov 23
: t t 20 / ; : rbus 5 / t + 1 mod x - abs .01 < ; : lbus 5 / t negate + 1 mod x - abs .01 < ; 0 rbus 1 rbus or 2 rbus or 3 rbus or 4 rbus or 5 rbus or 0.5 lbus 1.5 lbus or 2.5 lbus or 3.5 lbus or 4.5 lbus or 5.5 lbus or
Buses
Anonymous
'24 Nov 23
X sin y 3 * cos > Y x > 2dup .2 * z* / x .5 - 2 ** X 2.2 * cos y tan - swap y .5 - 2 ** + .5 ** dup .3 < swap .5 <
Wilted Redux
陳爽
'24 Nov 23
Y x tan / Y x * tan 1 y - .2 *
Bulbforous
Anonymous
'24 Nov 23
: y y 1.5 * .1 + ; X 3 * sin y / X 5 * sin y * X 7 * sin y * Rot
Rise
Anonymous
'24 Nov 23
X y - 1.113 * sin y .1 mod / .1 * X y - 2 * sin y .1 mod / Over 2 *
Snowy Tree
Anonymous
'24 Nov 23
X sin y 3 * cos > Y cos x cos > X 5 * sin y cos + 2dup z* / X 2 * cos y tan -
Wilted
Anonymous
'24 Nov 23
X sin y 3 * cos > Y cos x cos > X 5 * sin y cos +
Colored Bandage
Anonymous
'24 Nov 23
X 7 mod 23 * sin X / Dup y x z* + Dup y / Dup y /
Ice Bars
Anonymous
'24 Nov 23
X 7 * cos Y 3 * sin / Dup x y * - 2dup x y - z*
Lava Lamps
Anonymous
'24 Nov 23
X y y * / X x * y y y * * / X y /
Solar Bloom
Anonymous
'24 Nov 23
: xx x .8 - ; : yy y .5 - ; : tt t .4 * ; : a .25 * ; : mx xx 2 a tt cos * 2 tt * cos a - + ; : my yy 2 a tt sin * 2 tt * sin a - + ; : mm 2dup Z* mx my z+ ; mx my mm mm mm mm mm mm mm mm mm mm mm mm mm mm mm mm mm mm mm mm mm mm mm mm dup * swap dup * + 0 > negate 1 + dup dup
FractaleMandelbrote
Anonimus
'24 Nov 23
: test x' ^2 y' ^2 + 1 - ^3 x' ^2 y' ^3 * - ; test
nul
nul
'24 Nov 23
: q 1 ** ; 0 0 4 push : l x .5 - r@ 1 + * r@ 3 - t 1.9 / cos t 1.9 / sin z* y .5 - r@ 1 + * swap t 2.7 / cos t 2.7 / sin z* -rot q swap q + dup 8 * swap rot q + 1.8 + q - abs .03 < r@ / pop .6 - push max ; : j l l l l ; j j j j pop drop 1.5 * dup 2 ** swap
thrub Redux
Anonymous
'24 Nov 23
: center 2 * 1 - ; : xc x center ; : yc y center ; : r xc 2 ** yc 2 ** + sqrt ; : s r * t 9999 * - ; 1 s 1.0139 * pi 9 / + cos 2 s 0.8143 * cos 14 s 1.9101 * pi + cos dup
bam!
Anonymous
'24 Nov 23
: k t 2 / sin abs ; : dx x 0.5 - t 7 * sin * y 0.5 - t 7 * cos * - ; : dy x 0.5 - t 7 * cos * y 0.5 - t 7 * sin * + ; : r 0.4 k * ; : h r 0.5 * k * ; : w 0.03 k * ; : svastika dx abs w < dy abs h < and dy 0 < if dx h < dx 0 > and else dx 0 < dx 0 h - > and then dy abs h - w + abs w < and or dy abs w < dx abs h < and dx 0 > if dy h < dy 0 > and else dy 0 < dy 0 h - > and then dx abs h - w + abs w < and or or ; : circle dx dx * dy dy * + sqrt r < ; svastika not svastika not circle and svastika not circle and
postironiya Redux
Anonymous
'24 Nov 23
: k t 2 / sin abs ; : dx x t sin * y t cos * + 0.5 - ; : dy x t cos * y t sin * + 0.5 - ; : r 0.4 k * ; : h r 0.5 * k * ; : w 0.03 k * ; : svastika dx abs w < dy abs h < and dy 0 < if dx h < dx 0 > and else dx 0 < dx 0 h - > and then dy abs h - w + abs w < and or dy abs w < dx abs h < and dx 0 > if dy h < dy 0 > and else dy 0 < dy 0 h - > and then dx abs h - w + abs w < and or or ; : circle dx dx * dy dy * + sqrt r < ; svastika not svastika not circle and svastika not circle and
postironiya
Anonymous
'24 Nov 23
: dx x 0.5 - ; : dy y 0.5 - ; : r 0.4 ; : h r 0.5 * ; : w 0.03 ; : svastika dx abs w < dy abs h < and dy 0 < if dx h < dx 0 > and else dx 0 < dx 0 h - > and then dy abs h - w + abs w < and or dy abs w < dx abs h < and dx 0 > if dy h < dy 0 > and else dy 0 < dy 0 h - > and then dx abs h - w + abs w < and or or ; : circle dx dx * dy dy * + sqrt r < ; svastika not svastika not circle and svastika not circle and
vot i vse iskusstvo
Anonymous
'24 Nov 23
: sqr dup * ; : r 0.3 ; : dr t sin r * ; : dx x 0.5 - ; : dy y 0.5 - ; dx sqr dy sqr + sqrt r < dx dr < and
dranik
Anonymous
'24 Nov 23
: sqr dup * ; : r 0.3 ; : alpha t sin pi * ; : dx x 0.5 - ; : dy y 0.5 - ; dx sqr dy sqr + sqrt r < dy dx atan2 x 0 < if pi swap - else then alpha < and
sector
Anonymous
'24 Nov 23
: sq dup * ; : norm * sin 1 + 2 / ; : на x 0.5 - sq ; : мёртвой y 0.5 - sq ; : ветке + ; : чернеет sqrt t sin * ; : ворон. dup 40 norm ; : осенний over 60 norm ; : вечер. rot 80 norm ; на мёртвой ветке чернеет ворон. осенний вечер.
Untitled
Anonymous
'24 Nov 23
: sq dup * ; : norm * sin 1 + 2 / ; : на x 0.5 - sq ; : мёртвой y 0.5 - sq ; : ветке + ; : чернеет sqrt t sin * ; : ворон. dup 40 norm ; : осенний over 60 norm ; : вечер. rot 80 norm ; на мёртвой ветке чернеет вечер. осенний ворон.
Untitled Redux
Anonymous
'24 Nov 23
( color scheme: QuickBasic and MSX2 memories ) 8 180 x .5 - 20 ** y .5 - 20 ** + .05 ** dup -rot / t dup floor - pi * 2 * + sin over 9 * 4 ** ** swap .1 max .1 - * 180 * 5 min .81
liquid tunnel
blank
'24 Nov 23
: v t swap / dup floor - 1.96 * .98 - dup 0 > 2 * 1 - * .01 + ; : px 2.9 v .94 * .025 + ; : py 3.5 v ; : ball px x - 2 ** py y - 2 ** + .5 ** .02 < ; : m .4 * .5 + - ; py .9 * .04 + dup t 3 * sin m px * - y - abs .1 < x .03 < * ball + ball py .9 * .04 + dup t 2 * cos m 1 px - * - y - abs .1 < x .97 > * ball +
PONG game Redux
陳爽
'24 Nov 23
\ all color names defined : rgb rot 255 / rot 255 / rot 255 / ; : snow 255 250 250 rgb ; : pale-turquoise1 187 255 255 rgb ; : ghost-white 248 248 255 rgb ; : pale-turquoise2 174 238 238 rgb ; : white-smoke 245 245 245 rgb ; : pale-turquoise3 150 205 205 rgb ; : gainsboro 220 220 220 rgb ; : pale-turquoise4 102 139 139 rgb ; : floral-white 255 250 240 rgb ; : cadet-blue1 152 245 255 rgb ; : old-lace 253 245 230 rgb ; : cadet-blue2 142 229 238 rgb ; : linen 250 240 230 rgb ; : cadet-blue3 122 197 205 rgb ; : antique-white 250 235 215 rgb ; : cadet-blue4 083 134 139 rgb ; : papaya-whip 255 239 213 rgb ; : turquoise1 000 245 255 rgb ; : blanched-almond 255 235 205 rgb ; : turquoise2 000 229 238 rgb ; : bisque 255 228 196 rgb ; : turquoise3 000 197 205 rgb ; : peach-puff 255 218 185 rgb ; : turquoise4 000 134 139 rgb ; : navajo-white 255 222 173 rgb ; : cyan1 000 255 255 rgb ; : moccasin 255 228 181 rgb ; : cyan2 000 238 238 rgb ; : cornsilk 255 248 220 rgb ; : cyan3 000 205 205 rgb ; : ivory 255 255 240 rgb ; : cyan4 000 139 139 rgb ; : lemon-chiffon 255 250 205 rgb ; : dark-slate-gray1 151 255 255 rgb ; : seashell 255 245 238 rgb ; : dark-slate-gray2 141 238 238 rgb ; : honeydew 240 255 240 rgb ; : dark-slate-gray3 121 205 205 rgb ; : mint-cream 245 255 250 rgb ; : dark-slate-gray4 082 139 139 rgb ; : azure 240 255 255 rgb ; : aquamarine1 127 255 212 rgb ; : alice-blue 240 248 255 rgb ; : aquamarine2 118 238 198 rgb ; : lavender 230 230 250 rgb ; : aquamarine3 102 205 170 rgb ; : lavender-blush 255 240 245 rgb ; : aquamarine4 069 139 116 rgb ; : misty-rose 255 228 225 rgb ; : dark-sea-green1 193 255 193 rgb ; : white 255 255 255 rgb ; : dark-sea-green2 180 238 180 rgb ; : black 000 000 000 rgb ; : dark-sea-green3 155 205 155 rgb ; : dark-slate-gray 047 079 079 rgb ; : dark-sea-green4 105 139 105 rgb ; : dim-grey 105 105 105 rgb ; : sea-green1 084 255 159 rgb ; : slate-grey 112 128 144 rgb ; : sea-green2 078 238 148 rgb ; : light-slate-gray 119 136 153 rgb ; : sea-green3 067 205 128 rgb ; : grey 190 190 190 rgb ; : sea-green4 046 139 087 rgb ; : light-gray 211 211 211 rgb ; : pale-green1 154 255 154 rgb ; : midnight-blue 025 025 112 rgb ; : pale-green2 144 238 144 rgb ; : navy-blue 000 000 128 rgb ; : pale-green3 124 205 124 rgb ; : cornflower-blue 100 149 237 rgb ; : pale-green4 084 139 084 rgb ; : dark-slate-blue 072 061 139 rgb ; : spring-green1 000 255 127 rgb ; : slate-blue 106 090 205 rgb ; : spring-green2 000 238 118 rgb ; : medium-slate-blue 123 104 238 rgb ; : spring-green3 000 205 102 rgb ; : light-slate-blue 132 112 255 rgb ; : spring-green4 000 139 069 rgb ; : medium-blue 000 000 205 rgb ; : green1 000 255 000 rgb ; : royal-blue 065 105 225 rgb ; : green2 000 238 000 rgb ; : blue 000 000 255 rgb ; : green3 000 205 000 rgb ; : dodger-blue 030 144 255 rgb ; : green4 000 139 000 rgb ; : deep-sky-blue 000 191 255 rgb ; : chartreuse1 127 255 000 rgb ; : sky-blue 135 206 235 rgb ; : chartreuse2 118 238 000 rgb ; : light-sky-blue 135 206 250 rgb ; : chartreuse3 102 205 000 rgb ; : steel-blue 070 130 180 rgb ; : chartreuse4 069 139 000 rgb ; : light-steel-blue 176 196 222 rgb ; : olive-drab1 192 255 062 rgb ; : light-blue 173 216 230 rgb ; : olive-drab2 179 238 058 rgb ; : powder-blue 176 224 230 rgb ; : olive-drab3 154 205 050 rgb ; : pale-turquoise 175 238 238 rgb ; : olive-drab4 105 139 034 rgb ; : dark-turquoise 000 206 209 rgb ; : dark-olive-green1 202 255 112 rgb ; : medium-turquoise 072 209 204 rgb ; : dark-olive-green2 188 238 104 rgb ; : turquoise 064 224 208 rgb ; : dark-olive-green3 162 205 090 rgb ; : cyan 000 255 255 rgb ; : dark-olive-green4 110 139 061 rgb ; : light-cyan 224 255 255 rgb ; : khaki1 255 246 143 rgb ; : cadet-blue 095 158 160 rgb ; : khaki2 238 230 133 rgb ; : medium-aquamarine 102 205 170 rgb ; : khaki3 205 198 115 rgb ; : aquamarine 127 255 212 rgb ; : khaki4 139 134 078 rgb ; : dark-green 000 100 000 rgb ; : light-goldenrod1 255 236 139 rgb ; : dark-olive-green 085 107 047 rgb ; : light-goldenrod2 238 220 130 rgb ; : dark-sea-green 143 188 143 rgb ; : light-goldenrod3 205 190 112 rgb ; : sea-green 046 139 087 rgb ; : light-goldenrod4 139 129 076 rgb ; : medium-sea-green 060 179 113 rgb ; : light-yellow1 255 255 224 rgb ; : light-sea-green 032 178 170 rgb ; : light-yellow2 238 238 209 rgb ; : pale-green 152 251 152 rgb ; : light-yellow3 205 205 180 rgb ; : spring-green 000 255 127 rgb ; : light-yellow4 139 139 122 rgb ; : lawn-green 124 252 000 rgb ; : yellow1 255 255 000 rgb ; : green 000 255 000 rgb ; : yellow2 238 238 000 rgb ; : chartreuse 127 255 000 rgb ; : yellow3 205 205 000 rgb ; : med-spring-green 000 250 154 rgb ; : yellow4 139 139 000 rgb ; : green-yellow 173 255 047 rgb ; : gold1 255 215 000 rgb ; : lime-green 050 205 050 rgb ; : gold2 238 201 000 rgb ; : yellow-green 154 205 050 rgb ; : gold3 205 173 000 rgb ; : forest-green 034 139 034 rgb ; : gold4 139 117 000 rgb ; : olive-drab 107 142 035 rgb ; : goldenrod1 255 193 037 rgb ; : dark-khaki 189 183 107 rgb ; : goldenrod2 238 180 034 rgb ; : pale-goldenrod 238 232 170 rgb ; : goldenrod3 205 155 029 rgb ; : lt-goldenrod-yello 250 250 210 rgb ; : goldenrod4 139 105 020 rgb ; : light-yellow 255 255 224 rgb ; : dark-goldenrod1 255 185 015 rgb ; : yellow 255 255 000 rgb ; : dark-goldenrod2 238 173 014 rgb ; : gold 255 215 000 rgb ; : dark-goldenrod3 205 149 012 rgb ; : light-goldenrod 238 221 130 rgb ; : dark-goldenrod4 139 101 008 rgb ; : goldenrod 218 165 032 rgb ; : rosy-brown1 255 193 193 rgb ; : dark-goldenrod 184 134 011 rgb ; : rosy-brown2 238 180 180 rgb ; : rosy-brown 188 143 143 rgb ; : rosy-brown3 205 155 155 rgb ; : indian-red 205 092 092 rgb ; : rosy-brown4 139 105 105 rgb ; : saddle-brown 139 069 019 rgb ; : indian-red1 255 106 106 rgb ; : sienna 160 082 045 rgb ; : indian-red2 238 099 099 rgb ; : peru 205 133 063 rgb ; : indian-red3 205 085 085 rgb ; : burlywood 222 184 135 rgb ; : indian-red4 139 058 058 rgb ; : beige 245 245 220 rgb ; : sienna1 255 130 071 rgb ; : wheat 245 222 179 rgb ; : sienna2 238 121 066 rgb ; : sandy-brown 244 164 096 rgb ; : sienna3 205 104 057 rgb ; : tan 210 180 140 rgb ; : sienna4 139 071 038 rgb ; : chocolate 210 105 030 rgb ; : burlywood1 255 211 155 rgb ; : firebrick 178 034 034 rgb ; : burlywood2 238 197 145 rgb ; : brown 165 042 042 rgb ; : burlywood3 205 170 125 rgb ; : dark-salmon 233 150 122 rgb ; : burlywood4 139 115 085 rgb ; : salmon 250 128 114 rgb ; : wheat1 255 231 186 rgb ; : light-salmon 255 160 122 rgb ; : wheat2 238 216 174 rgb ; : orange 255 165 000 rgb ; : wheat3 205 186 150 rgb ; : dark-orange 255 140 000 rgb ; : wheat4 139 126 102 rgb ; : coral 255 127 080 rgb ; : tan1 255 165 079 rgb ; : light-coral 240 128 128 rgb ; : tan2 238 154 073 rgb ; : tomato 255 099 071 rgb ; : tan3 205 133 063 rgb ; : orange-red 255 069 000 rgb ; : tan4 139 090 043 rgb ; : red 255 000 000 rgb ; : chocolate1 255 127 036 rgb ; : hot-pink 255 105 180 rgb ; : chocolate2 238 118 033 rgb ; : deep-pink 255 020 147 rgb ; : chocolate3 205 102 029 rgb ; : pink 255 192 203 rgb ; : chocolate4 139 069 019 rgb ; : light-pink 255 182 193 rgb ; : firebrick1 255 048 048 rgb ; : pale-violet-red 219 112 147 rgb ; : firebrick2 238 044 044 rgb ; : maroon 176 048 096 rgb ; : firebrick3 205 038 038 rgb ; : medium-violet-red 199 021 133 rgb ; : firebrick4 139 026 026 rgb ; : violet-red 208 032 144 rgb ; : brown1 255 064 064 rgb ; : magenta 255 000 255 rgb ; : brown2 238 059 059 rgb ; : violet 238 130 238 rgb ; : brown3 205 051 051 rgb ; : plum 221 160 221 rgb ; : brown4 139 035 035 rgb ; : orchid 218 112 214 rgb ; : salmon1 255 140 105 rgb ; : medium-orchid 186 085 211 rgb ; : salmon2 238 130 098 rgb ; : dark-orchid 153 050 204 rgb ; : salmon3 205 112 084 rgb ; : dark-violet 148 000 211 rgb ; : salmon4 139 076 057 rgb ; : blue-violet 138 043 226 rgb ; : light-salmon1 255 160 122 rgb ; : purple 160 032 240 rgb ; : light-salmon2 238 149 114 rgb ; : medium-purple 147 112 219 rgb ; : light-salmon3 205 129 098 rgb ; : thistle 216 191 216 rgb ; : light-salmon4 139 087 066 rgb ; : snow1 255 250 250 rgb ; : orange1 255 165 000 rgb ; : snow2 238 233 233 rgb ; : orange2 238 154 000 rgb ; : snow3 205 201 201 rgb ; : orange3 205 133 000 rgb ; : snow4 139 137 137 rgb ; : orange4 139 090 000 rgb ; : seashell1 255 245 238 rgb ; : dark-orange1 255 127 000 rgb ; : seashell2 238 229 222 rgb ; : dark-orange2 238 118 000 rgb ; : seashell3 205 197 191 rgb ; : dark-orange3 205 102 000 rgb ; : seashell4 139 134 130 rgb ; : dark-orange4 139 069 000 rgb ; : antique-white1 255 239 219 rgb ; : coral1 255 114 086 rgb ; : antique-white2 238 223 204 rgb ; : coral2 238 106 080 rgb ; : antique-white3 205 192 176 rgb ; : coral3 205 091 069 rgb ; : antique-white4 139 131 120 rgb ; : coral4 139 062 047 rgb ; : bisque1 255 228 196 rgb ; : tomato1 255 099 071 rgb ; : bisque2 238 213 183 rgb ; : tomato2 238 092 066 rgb ; : bisque3 205 183 158 rgb ; : tomato3 205 079 057 rgb ; : bisque4 139 125 107 rgb ; : tomato4 139 054 038 rgb ; : peach-puff1 255 218 185 rgb ; : orange-red1 255 069 000 rgb ; : peach-puff2 238 203 173 rgb ; : orange-red2 238 064 000 rgb ; : peach-puff3 205 175 149 rgb ; : orange-red3 205 055 000 rgb ; : peach-puff4 139 119 101 rgb ; : orange-red4 139 037 000 rgb ; : navajo-white1 255 222 173 rgb ; : red1 255 000 000 rgb ; : navajo-white2 238 207 161 rgb ; : red2 238 000 000 rgb ; : navajo-white3 205 179 139 rgb ; : red3 205 000 000 rgb ; : navajo-white4 139 121 094 rgb ; : red4 139 000 000 rgb ; : lemon-chiffon1 255 250 205 rgb ; : deep-pink1 255 020 147 rgb ; : lemon-chiffon2 238 233 191 rgb ; : deep-pink2 238 018 137 rgb ; : lemon-chiffon3 205 201 165 rgb ; : deep-pink3 205 016 118 rgb ; : lemon-chiffon4 139 137 112 rgb ; : deep-pink4 139 010 080 rgb ; : cornsilk1 255 248 220 rgb ; : hot-pink1 255 110 180 rgb ; : cornsilk2 238 232 205 rgb ; : hot-pink2 238 106 167 rgb ; : cornsilk3 205 200 177 rgb ; : hot-pink3 205 096 144 rgb ; : cornsilk4 139 136 120 rgb ; : hot-pink4 139 058 098 rgb ; : ivory1 255 255 240 rgb ; : pink1 255 181 197 rgb ; : ivory2 238 238 224 rgb ; : pink2 238 169 184 rgb ; : ivory3 205 205 193 rgb ; : pink3 205 145 158 rgb ; : ivory4 139 139 131 rgb ; : pink4 139 099 108 rgb ; : honeydew1 240 255 240 rgb ; : light-pink1 255 174 185 rgb ; : honeydew2 224 238 224 rgb ; : light-pink2 238 162 173 rgb ; : honeydew3 193 205 193 rgb ; : light-pink3 205 140 149 rgb ; : honeydew4 131 139 131 rgb ; : light-pink4 139 095 101 rgb ; : lavender-blush1 255 240 245 rgb ; : pale-violet-red1 255 130 171 rgb ; : lavender-blush2 238 224 229 rgb ; : pale-violet-red2 238 121 159 rgb ; : lavender-blush3 205 193 197 rgb ; : pale-violet-red3 205 104 137 rgb ; : lavender-blush4 139 131 134 rgb ; : pale-violet-red4 139 071 093 rgb ; : misty-rose1 255 228 225 rgb ; : maroon1 255 052 179 rgb ; : misty-rose2 238 213 210 rgb ; : maroon2 238 048 167 rgb ; : misty-rose3 205 183 181 rgb ; : maroon3 205 041 144 rgb ; : misty-rose4 139 125 123 rgb ; : maroon4 139 028 098 rgb ; : azure1 240 255 255 rgb ; : violet-red1 255 062 150 rgb ; : azure2 224 238 238 rgb ; : violet-red2 238 058 140 rgb ; : azure3 193 205 205 rgb ; : violet-red3 205 050 120 rgb ; : azure4 131 139 139 rgb ; : violet-red4 139 034 082 rgb ; : slate-blue1 131 111 255 rgb ; : magenta1 255 000 255 rgb ; : slate-blue2 122 103 238 rgb ; : magenta2 238 000 238 rgb ; : slate-blue3 105 089 205 rgb ; : magenta3 205 000 205 rgb ; : slate-blue4 071 060 139 rgb ; : magenta4 139 000 139 rgb ; : royal-blue1 072 118 255 rgb ; : orchid1 255 131 250 rgb ; : royal-blue2 067 110 238 rgb ; : orchid2 238 122 233 rgb ; : royal-blue3 058 095 205 rgb ; : orchid3 205 105 201 rgb ; : royal-blue4 039 064 139 rgb ; : orchid4 139 071 137 rgb ; : blue1 000 000 255 rgb ; : plum1 255 187 255 rgb ; : blue2 000 000 238 rgb ; : plum2 238 174 238 rgb ; : blue3 000 000 205 rgb ; : plum3 205 150 205 rgb ; : blue4 000 000 139 rgb ; : plum4 139 102 139 rgb ; : dodger-blue1 030 144 255 rgb ; : medium-orchid1 224 102 255 rgb ; : dodger-blue2 028 134 238 rgb ; : medium-orchid2 209 095 238 rgb ; : dodger-blue3 024 116 205 rgb ; : medium-orchid3 180 082 205 rgb ; : dodger-blue4 016 078 139 rgb ; : medium-orchid4 122 055 139 rgb ; : steel-blue1 099 184 255 rgb ; : dark-orchid1 191 062 255 rgb ; : steel-blue2 092 172 238 rgb ; : dark-orchid2 178 058 238 rgb ; : steel-blue3 079 148 205 rgb ; : dark-orchid3 154 050 205 rgb ; : steel-blue4 054 100 139 rgb ; : dark-orchid4 104 034 139 rgb ; : deep-sky-blue1 000 191 255 rgb ; : purple1 155 048 255 rgb ; : deep-sky-blue2 000 178 238 rgb ; : purple2 145 044 238 rgb ; : deep-sky-blue3 000 154 205 rgb ; : purple3 125 038 205 rgb ; : deep-sky-blue4 000 104 139 rgb ; : purple4 085 026 139 rgb ; : sky-blue1 135 206 255 rgb ; : medium-purple1 171 130 255 rgb ; : sky-blue2 126 192 238 rgb ; : medium-purple2 159 121 238 rgb ; : sky-blue3 108 166 205 rgb ; : medium-purple3 137 104 205 rgb ; : sky-blue4 074 112 139 rgb ; : medium-purple4 093 071 139 rgb ; : light-sky-blue1 176 226 255 rgb ; : thistle1 255 225 255 rgb ; : light-sky-blue2 164 211 238 rgb ; : thistle2 238 210 238 rgb ; : light-sky-blue3 141 182 205 rgb ; : thistle3 205 181 205 rgb ; : light-sky-blue4 096 123 139 rgb ; : thistle4 139 123 139 rgb ; : slate-gray1 198 226 255 rgb ; : grey11 028 028 028 rgb ; : slate-gray2 185 211 238 rgb ; : grey21 054 054 054 rgb ; : slate-gray3 159 182 205 rgb ; : grey31 079 079 079 rgb ; : slate-gray4 108 123 139 rgb ; : grey41 105 105 105 rgb ; : light-steel-blue1 202 225 255 rgb ; : grey51 130 130 130 rgb ; : light-steel-blue2 188 210 238 rgb ; : grey61 156 156 156 rgb ; : light-steel-blue3 162 181 205 rgb ; : grey71 181 181 181 rgb ; : light-steel-blue4 110 123 139 rgb ; : gray81 207 207 207 rgb ; : light-blue1 191 239 255 rgb ; : gray91 232 232 232 rgb ; : light-blue2 178 223 238 rgb ; : dark-grey 169 169 169 rgb ; : light-blue3 154 192 205 rgb ; : dark-blue 000 000 139 rgb ; : light-blue4 104 131 139 rgb ; : dark-cyan 000 139 139 rgb ; : light-cyan1 224 255 255 rgb ; : dark-magenta 139 000 139 rgb ; : light-cyan2 209 238 238 rgb ; : dark-red 139 000 000 rgb ; : light-cyan3 180 205 205 rgb ; : light-cyan4 122 139 139 rgb ; : light-green 144 238 144 rgb ; gold
exact color name
陳爽
'24 Nov 23
: x x 2 * 1 - ; : y y 2 * 1 - ; : r x 2 ** y 2 ** + .5 ** ; : a y negate x negate atan2 pi + 2 pi * / ; : s r * t 3 * - ; 1 s cos 2 s 0.8143 * cos 14 s 1.9101 * cos dup a t - 1 mod *
radiations Redux
Anonymous
'24 Nov 23
: d dup y x
brightness out of nowhere
Anonymous
'24 Nov 23
x y sin dup 0.3
()::::::>
Anonymous
'24 Nov 23
: dup x y dup sin did 0.5
through the mist
Anonymous
'24 Nov 23
: center 2 * 1 - ; : xc x center ; : yc y center ; : r xc 2 ** yc 2 ** + sqrt ; : s r * t 3 * - ; 1 s 1.0139 * pi 9 / + cos 2 s 0.8143 * cos 14 s 1.9101 * pi + cos dup
radiations of the untitled redux
Anonymous
'24 Nov 23
x y dup sin 0.3
watre metre oftre watrementre
unknown author
'24 Nov 23
x y dup sin
watremelentre
Anonymous
'24 Nov 23
1 y 2 * - x y 2 * 7 ** t 34 / sin * + .5 - abs 2dup > .9 y - * -rot 1 * > 3 1 y 9.8 * - / t 1 mod 6 * + floor 2 mod 1 y 1.8 * - * 4 / * + dup 0 = .5 y - * .75 ** y .5 < * over + over 1 x t 98 / cos + 12 * sin 30 / y .6 - < * + 1.5 y 1.3 * - y .5 > * -
STREAM
Anonymous
'24 Nov 23
: c push negate swap negate y x z+ dup * swap dup * + pop dup * < ; : l push -rot negate swap negate y x z+ 2dup dup * swap dup * + pop dup * < push atan2 - abs 0.09 < pop * ; : p dup rot dup sin swap cos rot * -rot * rot + -rot + swap ; : a t 3 * sin ; : b a 21380.9 * ; : m x 10 * + + sin 1 over dup * - sqrt atan2 swap / y 0.6 - > ; 0.5 0.7 -21.57 0.3 l 0.5 0.4 -1.57 a + 0.95 l + 0.5 0.4 -1.57 a + 0.95 p -2 b + 0.2 l + 0.5 0.4 -1.57 a - 0.15 l + 9.5 0.4 -1.57 a - 0.19 p -2 b - 0.8 l + 9.5 9.6 -1.59 a + 0.199 l + 0.5 0.6 -1.57 a + 0.1 p -0.5 b + 0.1 l + 0.5 0.6 -1.57 a - 0.1 l + 0.5 9.6 -1.57 a - 0.1 p -0.5 b - 0.1 l + 0.5 0.7 0.05 c + dup 0 swap 2 1 t 2 / m 9328 3 t m + 25 0 t 4 / m 35 4 t 4 / m + + y 0.89 > * +
STEAM ENGINE
Anonymous
'24 Nov 23
( inspired by "Web Wars" game on Vectrex console ) ( let's discuss Forth Haiku on demoscene.ru forum ) : t t 82 + ; : d dup ; : fract d floor - ; : n 6 ; : xx x .5 - ; : yy y .46 - ; : xw x .99 - 10 * ; : yw y .37 - t 2.5 * 1.1 - sin 90 / - 12 * ; : dx t n / floor sin 2 * ; : dy t n / floor cos 2 * ; : zoom 1 1 t n / fract - 50 * 1 + / ; : phase t fract pi * 2 * ; : wings 1 xw cos t 2.5 * sin * xx abs .5 + * yw - abs - 121 xx 2.08957457 * abs - sqrt * 0 max 8 ** d >r 20 * 4 ** 1 min max r> 9 * 1991 ** 1 min - ; 5 xx d * yy d * + sqrt d -rot / phase + sin abs over 9 * 4 ** ** swap .15 max .15 - * 4 * 12 zoom dx over * xx - d * over dy * yy - d * + sqrt swap 2dup >r >r 7 / - - abs 200 ** 1 min max 1 r> r> 2.2 / - - abs 200 ** - 0 max 1 min wings d d
slither
Anonymous
'24 Nov 23
: r dup y 3 ** * t + sin swap x * cos + 9 mod ; 18 r 22 r dup 89 r /
continental meltdown
Anonymous
'24 Nov 23
: web push push x 123.5 + y 3.23 + * pop * sin 0 max x 0.3 + y 0.123 + * pop * sin 0 max + ; 31 21 web 17 17 web * x + 23 31 web 19 19 web * y x * + 12343 31 web 532 5 web * y +
Untitled
Anonymous
'24 Nov 23
: z t 1 + cos 4 + 3 / * ; : a 1.1 x .5 - y .5 - atan2 t ; : b * dup sin swap 2 / t 5 * + cos t 3 / sin 2 / 1 + * - 1990 / x .5 - z 2 ** y .5 - z 2 ** + + - 4 ** ; a 1.7 / + 10 b t cos 1 + 12 / + a 1.9 / - 8 b a 19.1 / - 6 b t 2.7 * cos 1 + 5 / +
the sun
Anonymous
'24 Nov 23
x 9.91372012 * sin y 321.1432 * sin t 4 * sin * * dup t 3 * sin * dup t 809 * sin *
cracker packs by Anonymous
Anonymous
'24 Nov 23
x y sin floor 0.89 sin 0.9231 x y sin floor 0.89 sin 0.9231
pink
Anonymous
'24 Nov 23
Next