Concatenative topics
Concatenative meta
Other languages
Meta
Viznut is a demoscene artist who found the following bitart pattern that looks like a block of birds flying rightward:
𝑎𝑏𝑠 (((𝑥 + y)&(𝑥 − y))%24) > 9
|20 @Screen &vector $2 &width $2 &height $2 &auto $1 &pad $1 &x $1 &x-lb $1 &y $1 &y-lb $1 &addr $2 &pixel $1 &sprite $1 |100 @viznut ( -> ) #0f7f #08 DEO2k INC INC DEO2k INC INC DEO2 #0100 .Screen/width DEO2k INC INC DEO2 #00 &>x ( -- ) DUP .Screen/x-lb DEO #00 &>y ( -- ) DUP .Screen/y-lb DEO ( x + y ) ADDk STH ( y - x ) SUBk STHr ( & 24 % ) AND #18 DIVk MUL SUB ( 9 > ) #09 GTH .Screen/pixel DEO INC DUP ?&>y POP INC DUP ?&>x POP BRK
This revision created on Sun, 10 Mar 2024 04:38:54 by neauoire