This BAM program is a port and mod of a Small Visual Basic program.
I've modified the program to create an endless loop of new images, and I've made some previously fixed parameters a bit dynamic by setting them to random values for each new drawing. (see source code for more details.)
Pause the program (at pretty much any time) by clicking/touching the program's output screen.
This is a port and mod of a BBC BASIC program that is a port and mod of a Commodore PLUS/4 program.
(BBC BASIC program by Richard Russell. Commodore PLUS/4 program by Georgios Patsos. See source code for more info.)
This program runs some DRAW statements in a series of inline loops within a larger endless loop, each inline loop transitioning from one value to another parameter within each loop.
Something like that. I'm not sure how to word that coherently.
The animation demonstrates a large possible number of images that can be created using DRAW in a "spirograph" kind of way.
You'll know that the program has restarted from the beginning when the graphing colour changes.
Please note: this program was created with the development version of BASIC Anywhere Machine (to test the recently added fractional angle values for the DRAW statements TA command.)
("Ish" in the sense of "I just could not help myself and succumbed to my tweaking nature.")
This program is inspired from a recent QB64 coding challenge by bplus.
' NOTE: As I was in a "get 'er done quick" mood, I didn't put much effort in pretty code.Please note: this program was created with the development version of BASIC Anywhere Machine (to test the recently added fractional angle values for the DRAW statements TA command.)
For "good enough" drawings of geometric shapes (when one does not feel like dealing with trig functions) the DRAW statement makes for a no fuss no muss solution to just get it done.
Please note: this program was created with the development version of BASIC Anywhere Machine (to test the recently added fractional angle values for the DRAW statements TA command.)
This program draws a "Flower of life triangular arc circle". For a good read, visit this Wikipedia article.
To make the program more interesting (and to see what the code is doing), I've animated the drawing of the geometric shape. When done and after a pause of about three seconds, the program clears the screen and starts drawing again (in an infinite loop)
At the start of every iteration, three new random colours are chosen. Again, to make things visually interesting.
During the three second program pause, you can click/touch the screen to pause the program until you release the click/touch.
Please note: this program was created with the development version of BASIC Anywhere Machine (to test the recently added fractional angle values for the DRAW statements TA command.)
