free software resistance
the cost of computing freedom is eternal vigilance
### bt.fig
*original date:* nov 2018
*originally posted:* oct 2024
bt.fig:
```
python
def figpset(z, x, y, c):
figlocate(0, y, x)
figcolortext(0, c)
figprints("*")
fig
inf "btime" # license: creative commons cc0 1.0 (public domain)
textmode #### http://creativecommons.org/publicdomain/zero/1.0/
bin09 "0000 0001 0010 0011 0100 0101 0110 0111 1000 1001" split bin09 " "
z 10 chr times 40 highlight 7 print
function splits p
ps get p
pl ps len
pr arr
forin a ps
pr plus a
next
pr right pl return pr
fig
while
z "\x1b[?25l" print colortext 7 locate 1 1
gettime time
gethour gettime left 2 val minus 12 sgn
ifequal gethour -1
gethour gettime left 2
gh gethour split gh "00" join gh "12"
else
gethour gettime left 2 val minus 12 str
gh "0" plus gethour right 2 split gh "00" join gh "12"
fig
gr gettime right 6
gettime gh plus gr
bar 0 arr
forin pr gettime
try
p pr val plus 1 arrget bin09 p # if numeric, get digit in binary
except
p ":"
resume
bar plus p
next
bar right 8
z arrget bar 1 right 2
bar arrset 1 z
z arrget bar 4 right 3
bar arrset 4 z
z arrget bar 7 right 3
bar arrset 7 z
x 10
y 20
forin p bar
z x plus 2 swap z x
ifequal p ":"
pass
else
zy y
zx x
zp splits p arreverse
forin lghts zp
c 8
ifequal lghts "1"
c 9
fig
z zy minus 2 swap z zy pset zx zy c locate 2 1 #zy zx
#z lghts print
next
fig
next
z "\x1b[?25h" locate 1 1 colortext 7 prints sleep .25
wend
```
license: 0-clause bsd
```
# 2018 mn
#
# Permission to use, copy, modify, and/or distribute this software for any
# purpose with or without fee is hereby granted.
#
# THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
# WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
# MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
# ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
# WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
# ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
# OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
```
=> https://freesoftwareresistance.neocities.org