("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.)
This program is a port and mod of this QBJS program by Vince.
I've added some colour to more easily identify the roles of the various segments of code, and I made some adjustments to have the graphic fill more of the screen.
The first simple drawing demonstrates the general process of creating a flat conical tent.
Next, a full image is drawn and rotated around an off-center axis point.
Interesting results with no fuss no muss use of DRAW and CIRCLE without the use of any trig functions.
Animated spirals made of circles, the circles positioned with the help of DRAW statements ("pen" up, and pen movement adjusted via incrementally increasing angles.
Keep watching to see changing and very interesting geometric patterns.
Dynamically changing in increments as the program runs and cycles through changing values across several variables.
Dynamically and repetitively transitioning from one colour to another colour, and "bubbles" increasing then decreasing in size, back and forth between a maximum and a minimum.
Refresh the browser window to restart the program with a new random starting point and values.
Left-click (or touch) and hold anywhere on the image to pause the program. Simultaneously right-click (not sure how to, if possible, do the same with touch) to access your browser menu to copy the image to the clipboard (or save the image, whatever your context menu provides.)
 |
Both of the programs are ports and mods of a BASIC program by Luis Alberto Migliorero.
In the port and mod, I've added some animation, and added a loop to redraw the image with a different combination of colours.
In the second version of my port and mod, that program changes the background colour every loop.
Original port and mod:
Second version:
This program is a port and mod of a BBC BASIC program by Richard Russell. Richard Russell's program is a port of a Commodore Amiga demonstration program by Laxity.
This is a port and mod of a SpecBAS program by ZXDunny. Run the program View the source code And, a "less is more?" version: Run t...
