This BAM program inspired by Richard Russell's BBC BASIC program shared on Facebook with the BASIC Programming Language group (link.)
I wanted to recreate Richard Russell's image using DRAW statements as part of my long process of testing enhancements to DRAW that are still at the development level (I..e. not ready for a new BAM release.)
This is a port and mod of a BASIC program by Filho Junior.
No surprise, I've animated the drawing of the graph and put that process in an endless loop, with a 2 second-ish delay between graphs. Although the original program was graphing with random colours, I've modified that so that the graph is limited to a random choice of five colours (duplicates allowed) from the 15 colour palette (excluding the first color, I.e. black). The graphing itself still picks random colours, but only from the five choices.
Whatever lines I've modified, I've preceded those lines with the commented out original lines. Whatever new code I've added, I've not numbered those lines.
Peter McGavin shared a GW-BASIC port of Richard Russell's BBC BASIC "flower tessellation" program.
The GW-BASIC program works as-is in BAM, which makes me pretty happy because I've made BAM compatibility with GW-BASIC a high-priority goal.
I appreciate finding small GW-BASIC gems like Peter's program so that I can test how well I'm doing with this wee goal of mine.
Do note, I made one change to the program (line 10). I changed the screen mode from 9 to 12 (using custom screen dimensions),
This BAM program inspired by Richard Russell's "Flower-like tesselation" BBC BASIC program posted on Facebook.
Created in order to test enhancements to "DRAW" in the development version of BASIC Anywhere Machine.
I did not get fancy with this, keeping the program low resolution to better see the flaws when using DRAW with angles other than any that are a factor of 45 degrees.
As my usual practice, the program runs in an endless loop of animation, and applies randomness to colours and to the drawing angle.
A little program to demonstrate a recursive subroutine.
It also demonstrated the use of DRAW with the TA (angle) command to help draw the outline "dotted" circles by positioning the pen to draw those points (using CIRCLE to create some thick points, because PSET pixels aren't quite visible enough for these aging eyeballs.
To make things interesting, the drawing is animated and uses a new random colour for each recursion (in the hopes "seeing" what the code is doing.
The program runs in an endless loop, retracing the previous drawing with new random colours..
In function and subroutine calls,
a variable as an argument
is always "called by reference"
and never "called by value".
Call by reference (or pass by reference) is an evaluation strategy where a parameter is bound to an implicit reference to the variable used as argument, rather than a copy of its value. This typically means that the function can modify (i.e., assign to) the variable used as argument—something that will be seen by its caller.
In call by value (or pass by value), the evaluated value of the argument expression is bound to the corresponding variable in the function (frequently by copying the value into a new memory region). If the function or procedure is able to assign values to its parameters, only its local variable is assigned—that is, anything passed into a function call is unchanged in the caller's scope when the function returns.
DIM a$ = "Howdy"FUNCTION hello$( p$ )p$ = p$ + " there"hello$ = p$END FUNCTIONPRINT "a$: " + a$PRINT "result of hello$( a$ ): " + hello$( a$ )PRINT "a$: " + a$
DIM a$ = "Howdy"FUNCTION hello$( p$ )p$ = p$ + " there"hello$ = p$END FUNCTIONPRINT "a$: " + a$PRINT "result of hello$( a$ ): " + hello$( ( a$ ) )PRINT "a$: " + a$
This program is a port and mod of a QBJS program by James D Jarvis (shared with the QB64PE community and discussed in this thread ). That pr...
