Welcome
Welcome to unofficialdistros

You are currently viewing our boards as a guest, which gives you limited access to view most discussions and access our other features. By joining our free community, you will have access to post topics, communicate privately with other members (PM), respond to polls, upload content, and access many other special features. In addition, registered members also see less advertisements. Registration is fast, simple, and absolutely free, so please, join our community today!

fig with 24-bit color

Including languages that dont have their own subforum

fig with 24-bit color

Postby figosdev » Mon Mar 20, 2017 11:47 pm

Image


Code: Select all
#### license: creative commons cc0 1.0 (public domain)
#### http://creativecommons.org/publicdomain/zero/1.0/

proginf = "sines-2017 mn"

function rgbcolor r g b
python
    now = 0 ; figcgapal[0] = (r, g, b)
    fig
    fig

function rgbvalue v
python
    # this probably doesnt do what it should
    # but it does let you send an integer for a color
    b = (v/65536 - 1) % 256
    g = ((v - b * 65536) / 256 - 1) % 64
    r = ((v - b * 65536 - g * 256) - 1) % 256
    now = 0 ; figcgapal[0] = (int(r), int(g), int(b))
    fig
    fig

FOR z = 1 190 0.125 # 1.0 / 2 ** 3
now display
FOR x = -3.14 3.14 0.0078125 # 1.0 / 2 ** 7

f = 0.0000002384185791015625 # 1 / 2 ** 22
f1 = f plus 1
y2 = (x times 8) SIN times 10
y = z divby 4 times x divby 1.5 SIN times 10 plus y2

x2 = x times 100
xl = z times 8 SIN plus z plus x2 plus 325 divby 10 times 9 int
yl = y plus 25 plus z divby f1
y2 = yl plus 2 int
for yt yl y2 1
c = z divby 2 times 32768 int mod 10000 plus 200 rgbvalue c
now pset xl yt 0
next

NEXT
NEXT

now display lineinput
figosdev
Site Admin
 
Posts: 175
Joined: Sat Sep 03, 2016 2:19 am

Return to Computers and (General) Programming



Who is online

Users browsing this forum: No registered users and 1 guest

cron
suspicion-preferred