Summary
###########################################################################
File: kaleid.icn
Subject: Program to produce kaleidoscopic display
Author: C. Jeffery, inspired by kaleido.icn by Ralph E. Griswold
Date: December 24, 2014
###########################################################################
This file is in the public domain.
###########################################################################
This program displays kaleidoscopic images. The controls on the
user interface are relatively intuitive -- trying them will give
a better idea of what's possible than a prose description here.
This program is based on an earlier one by Steve Wampler, which in
turn was based on a C program by Lorraine Callahan.
###########################################################################
Requires: Unicon, with graphics facilities
###########################################################################
Classes:
Kaleido
Procedures:
clrcircle, main, outcircles, putcircle
Records:
circle
Global variables:
colors, delay, density, draw_list, draw_proc, half, max_off, max_radius, min_off, min_radius, pane, reset, scale_radius, size, t1
Imports:
gui
Links:
filedialog.icn
This file is part of the (main) package.
Source code.
clrcircle()
main()
outcircles(off1, off2, radius, color)
putcircle()
circle(off1, off2, radius, color)
colors -- list of colors
delay -- delay between drawing circles
density -- number of circles in steady state
draw_list -- list of pending drawing parameters
draw_proc -- drawing procedure
half -- half size of view area
max_off -- maximum offset of circle
max_radius -- maximum radius of circle
min_off -- minimum offset of circle
min_radius -- minimum radius of circle
pane -- graphics context for viewing
reset -- nonnull when view area needs resetting
scale_radius -- radius scale factor
size -- size of view area (width & height)
t1 -- the ticker that controls speed
This page produced by UniDoc on 2021/04/15 @ 23:59:54.