digital literacy for everyone



fun.fig



fig is a multi-purpose educational language-- originally designed to offer 16 colours in the term window or vt, with a compatible 16-colour palette in a graphics window.




# < fig code >
# comments | built-in functions | user functions | inline python



# 2019 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.

now display
for p -3.14159 3.14159 0.00314159

xl2 p tan times 40 plus 400 int
yl2 p sin times 40 plus 300 int

al2 p cos times 40 plus 400 int
bl2 p sin times 40 plus 300 int

cl2 p cos times 40 plus 400 int
dl2 p tan times 40 plus 300 int

el2 p sin times 40 plus 400 int
fl2 p tan times 40 plus 300 int

gl2 p tan times 40 plus 400 int
hl2 p cos times 40 plus 300 int



xl p tan times 40 plus 400 int
yl p sin times xl plus 300 int

al p cos times 40 plus 400 int
bl p sin times al plus 300 int

cl p cos times 40 plus 400 int
dl p tan times cl plus 300 int

el p sin times 40 plus 400 int
fl p tan times el plus 300 int

gl p tan times 40 plus 400 int
hl p cos times gl plus 300 int

now line xl yl al bl 14
now line cl dl el fl 12
now line gl hl xl yl 10



xl p tan times yl plus 400 int
yl p sin times 40 plus 300 int

al p cos times bl plus 400 int
bl p sin times 40 plus 300 int

cl p cos times dl plus 400 int
dl p tan times 40 plus 300 int

el p sin times fl plus 400 int
fl p tan times 40 plus 300 int

gl p tan times hl plus 400 int
hl p cos times 40 plus 300 int

try
now line xl yl al bl 9
except
pass
resume
try
now line cl dl el fl 8
except
pass
resume
try
now line gl hl xl yl 7
except
pass
resume


now line xl2 yl2 al2 bl2 15
now line cl2 dl2 el2 fl2 13
now line gl2 hl2 xl2 yl2 11


now display
next

now lineinput




home: https://freesoftwareresistance.neocities.org