Home » CEEFAX disks » telesoftware14.adl » 18-03-89/T_Flow
18-03-89/T_Flow
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
| Tape/disk: | Home » CEEFAX disks » telesoftware14.adl |
| Filename: | 18-03-89/T_Flow |
| Read OK: | ✔ |
| File size: | 0A93 bytes |
| Load address: | 0000 |
| Exec address: | FFFFFFFF |
File contents
�...........................................................................<
FLOW
Here is a program which can be used as an adjunct to any Mode 2 graphics
package to allow a similar kind of animation that will indicate the flow
of fluids or the propagation of radiation in eye-catching moving strips of
colour. It uses a pre-drawn screen as a transparency, the masks are
generated with the Flo program and the rotation is provided by sequencing
the rarely used flashing colours - numbered 8 to 15. By using the VDU 19
command to alter the colour shown, the desired impression of movement can
be produced.
The only complication is that the display must be handled by a short
program or routine which keeps the colours rotating. It would be possible
to write a background program to do this job by interrupts, but it is not
necessary for most applications.
To use the system you must first create a Mode 2 picture which can be
saved to disc as a block of memory from &3000 to &8000 - the normal
procedure for saving graphics screens. When run, Flo loads it and you can
place blocks and strips of colour on the picture, using size or angle and
in a choice of two colours in solid stripes or dots. The animation can be
tested at any time. Finally the enhanced picture is saved to disc for use
with the Display program.
When you run Flow, you are first shown the keyboard controls, followed by
a choice of message windows. You should choose one to conform with the
type of graphics package initially used.
The sreen clears and you can now press L to load a prepared picture. You
can place the cursor where you want the first block using the arrow keys
and adjust its size with the game keys Z,X,* and ?. To rotate it use
< and >. All functions may be speeded up by holding down SHIFT. The
cursor will indicate size, colour and plot type at all times.
The colour may be selected using A or B. The solid or dotted plot is
selected by C or D and pressing TAB irrevocably draws the block. Strange
colour effects will appear momentarily, but they are soon sorted out by
PROCcolsoff. Keep repeating the process until you are ready to test the
animation by holding down M. Finally the screen may be saved by pressing
S. Both filing functions are aborted if Return is pressed with no
filename given.
It may be necessary to return to the original graphics package to tidy up
the picture and you can keep swapping between applications as many times
as required. Listing II is the simple Display which gives a numerical
choice of colours for the final display and any two from one to seven may
be selected to replace the red and blue in the design program.
00000000 81 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |................| 00000010 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |................| * 00000040 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 3c 20 20 20 |............< | 00000050 20 20 20 20 20 20 20 20 0d 20 20 20 20 20 20 20 | . | 00000060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000070 20 20 20 20 20 20 20 46 4c 4f 57 0d 0d 48 65 72 | FLOW..Her| 00000080 65 20 69 73 20 61 20 70 72 6f 67 72 61 6d 20 77 |e is a program w| 00000090 68 69 63 68 20 63 61 6e 20 62 65 20 75 73 65 64 |hich can be used| 000000a0 20 61 73 20 61 6e 20 61 64 6a 75 6e 63 74 20 74 | as an adjunct t| 000000b0 6f 20 61 6e 79 20 4d 6f 64 65 20 32 20 67 72 61 |o any Mode 2 gra| 000000c0 70 68 69 63 73 0d 70 61 63 6b 61 67 65 20 74 6f |phics.package to| 000000d0 20 61 6c 6c 6f 77 20 61 20 73 69 6d 69 6c 61 72 | allow a similar| 000000e0 20 6b 69 6e 64 20 6f 66 20 61 6e 69 6d 61 74 69 | kind of animati| 000000f0 6f 6e 20 74 68 61 74 20 77 69 6c 6c 20 69 6e 64 |on that will ind| 00000100 69 63 61 74 65 20 74 68 65 20 66 6c 6f 77 0d 6f |icate the flow.o| 00000110 66 20 66 6c 75 69 64 73 20 6f 72 20 74 68 65 20 |f fluids or the | 00000120 70 72 6f 70 61 67 61 74 69 6f 6e 20 6f 66 20 72 |propagation of r| 00000130 61 64 69 61 74 69 6f 6e 20 69 6e 20 65 79 65 2d |adiation in eye-| 00000140 63 61 74 63 68 69 6e 67 20 6d 6f 76 69 6e 67 20 |catching moving | 00000150 73 74 72 69 70 73 20 6f 66 0d 63 6f 6c 6f 75 72 |strips of.colour| 00000160 2e 20 20 49 74 20 75 73 65 73 20 61 20 70 72 65 |. It uses a pre| 00000170 2d 64 72 61 77 6e 20 73 63 72 65 65 6e 20 61 73 |-drawn screen as| 00000180 20 61 20 74 72 61 6e 73 70 61 72 65 6e 63 79 2c | a transparency,| 00000190 20 74 68 65 20 6d 61 73 6b 73 20 61 72 65 0d 67 | the masks are.g| 000001a0 65 6e 65 72 61 74 65 64 20 77 69 74 68 20 74 68 |enerated with th| 000001b0 65 20 46 6c 6f 20 70 72 6f 67 72 61 6d 20 61 6e |e Flo program an| 000001c0 64 20 74 68 65 20 72 6f 74 61 74 69 6f 6e 20 69 |d the rotation i| 000001d0 73 20 70 72 6f 76 69 64 65 64 20 62 79 20 73 65 |s provided by se| 000001e0 71 75 65 6e 63 69 6e 67 0d 74 68 65 20 72 61 72 |quencing.the rar| 000001f0 65 6c 79 20 75 73 65 64 20 66 6c 61 73 68 69 6e |ely used flashin| 00000200 67 20 63 6f 6c 6f 75 72 73 20 2d 20 6e 75 6d 62 |g colours - numb| 00000210 65 72 65 64 20 38 20 74 6f 20 31 35 2e 20 20 42 |ered 8 to 15. B| 00000220 79 20 75 73 69 6e 67 20 74 68 65 20 56 44 55 20 |y using the VDU | 00000230 31 39 0d 63 6f 6d 6d 61 6e 64 20 74 6f 20 61 6c |19.command to al| 00000240 74 65 72 20 74 68 65 20 63 6f 6c 6f 75 72 20 73 |ter the colour s| 00000250 68 6f 77 6e 2c 20 74 68 65 20 64 65 73 69 72 65 |hown, the desire| 00000260 64 20 69 6d 70 72 65 73 73 69 6f 6e 20 6f 66 20 |d impression of | 00000270 6d 6f 76 65 6d 65 6e 74 20 63 61 6e 0d 62 65 20 |movement can.be | 00000280 70 72 6f 64 75 63 65 64 2e 0d 0d 54 68 65 20 6f |produced...The o| 00000290 6e 6c 79 20 63 6f 6d 70 6c 69 63 61 74 69 6f 6e |nly complication| 000002a0 20 69 73 20 74 68 61 74 20 74 68 65 20 64 69 73 | is that the dis| 000002b0 70 6c 61 79 20 6d 75 73 74 20 62 65 20 68 61 6e |play must be han| 000002c0 64 6c 65 64 20 62 79 20 61 20 73 68 6f 72 74 0d |dled by a short.| 000002d0 70 72 6f 67 72 61 6d 20 6f 72 20 72 6f 75 74 69 |program or routi| 000002e0 6e 65 20 77 68 69 63 68 20 6b 65 65 70 73 20 74 |ne which keeps t| 000002f0 68 65 20 63 6f 6c 6f 75 72 73 20 72 6f 74 61 74 |he colours rotat| 00000300 69 6e 67 2e 20 20 49 74 20 77 6f 75 6c 64 20 62 |ing. It would b| 00000310 65 20 70 6f 73 73 69 62 6c 65 0d 74 6f 20 77 72 |e possible.to wr| 00000320 69 74 65 20 61 20 62 61 63 6b 67 72 6f 75 6e 64 |ite a background| 00000330 20 70 72 6f 67 72 61 6d 20 74 6f 20 64 6f 20 74 | program to do t| 00000340 68 69 73 20 6a 6f 62 20 62 79 20 69 6e 74 65 72 |his job by inter| 00000350 72 75 70 74 73 2c 20 62 75 74 20 69 74 20 69 73 |rupts, but it is| 00000360 20 6e 6f 74 0d 6e 65 63 65 73 73 61 72 79 20 66 | not.necessary f| 00000370 6f 72 20 6d 6f 73 74 20 61 70 70 6c 69 63 61 74 |or most applicat| 00000380 69 6f 6e 73 2e 0d 0d 54 6f 20 75 73 65 20 74 68 |ions...To use th| 00000390 65 20 73 79 73 74 65 6d 20 79 6f 75 20 6d 75 73 |e system you mus| 000003a0 74 20 66 69 72 73 74 20 63 72 65 61 74 65 20 61 |t first create a| 000003b0 20 4d 6f 64 65 20 32 20 70 69 63 74 75 72 65 20 | Mode 2 picture | 000003c0 77 68 69 63 68 20 63 61 6e 20 62 65 0d 73 61 76 |which can be.sav| 000003d0 65 64 20 74 6f 20 64 69 73 63 20 61 73 20 61 20 |ed to disc as a | 000003e0 62 6c 6f 63 6b 20 6f 66 20 6d 65 6d 6f 72 79 20 |block of memory | 000003f0 66 72 6f 6d 20 26 33 30 30 30 20 74 6f 20 26 38 |from &3000 to &8| 00000400 30 30 30 20 2d 20 74 68 65 20 6e 6f 72 6d 61 6c |000 - the normal| 00000410 0d 70 72 6f 63 65 64 75 72 65 20 66 6f 72 20 73 |.procedure for s| 00000420 61 76 69 6e 67 20 67 72 61 70 68 69 63 73 20 73 |aving graphics s| 00000430 63 72 65 65 6e 73 2e 20 20 57 68 65 6e 20 72 75 |creens. When ru| 00000440 6e 2c 20 46 6c 6f 20 6c 6f 61 64 73 20 69 74 20 |n, Flo loads it | 00000450 61 6e 64 20 79 6f 75 20 63 61 6e 0d 70 6c 61 63 |and you can.plac| 00000460 65 20 62 6c 6f 63 6b 73 20 61 6e 64 20 73 74 72 |e blocks and str| 00000470 69 70 73 20 6f 66 20 63 6f 6c 6f 75 72 20 6f 6e |ips of colour on| 00000480 20 74 68 65 20 70 69 63 74 75 72 65 2c 20 75 73 | the picture, us| 00000490 69 6e 67 20 73 69 7a 65 20 6f 72 20 61 6e 67 6c |ing size or angl| 000004a0 65 20 61 6e 64 0d 69 6e 20 61 20 63 68 6f 69 63 |e and.in a choic| 000004b0 65 20 6f 66 20 74 77 6f 20 63 6f 6c 6f 75 72 73 |e of two colours| 000004c0 20 69 6e 20 73 6f 6c 69 64 20 73 74 72 69 70 65 | in solid stripe| 000004d0 73 20 6f 72 20 64 6f 74 73 2e 20 20 54 68 65 20 |s or dots. The | 000004e0 61 6e 69 6d 61 74 69 6f 6e 20 63 61 6e 20 62 65 |animation can be| 000004f0 0d 74 65 73 74 65 64 20 61 74 20 61 6e 79 20 74 |.tested at any t| 00000500 69 6d 65 2e 20 20 46 69 6e 61 6c 6c 79 20 74 68 |ime. Finally th| 00000510 65 20 65 6e 68 61 6e 63 65 64 20 70 69 63 74 75 |e enhanced pictu| 00000520 72 65 20 69 73 20 73 61 76 65 64 20 74 6f 20 64 |re is saved to d| 00000530 69 73 63 20 66 6f 72 20 75 73 65 0d 77 69 74 68 |isc for use.with| 00000540 20 74 68 65 20 44 69 73 70 6c 61 79 20 70 72 6f | the Display pro| 00000550 67 72 61 6d 2e 0d 0d 57 68 65 6e 20 79 6f 75 20 |gram...When you | 00000560 72 75 6e 20 46 6c 6f 77 2c 20 79 6f 75 20 61 72 |run Flow, you ar| 00000570 65 20 66 69 72 73 74 20 73 68 6f 77 6e 20 74 68 |e first shown th| 00000580 65 20 6b 65 79 62 6f 61 72 64 20 63 6f 6e 74 72 |e keyboard contr| 00000590 6f 6c 73 2c 20 66 6f 6c 6c 6f 77 65 64 20 62 79 |ols, followed by| 000005a0 0d 61 20 63 68 6f 69 63 65 20 6f 66 20 6d 65 73 |.a choice of mes| 000005b0 73 61 67 65 20 77 69 6e 64 6f 77 73 2e 20 20 59 |sage windows. Y| 000005c0 6f 75 20 73 68 6f 75 6c 64 20 63 68 6f 6f 73 65 |ou should choose| 000005d0 20 6f 6e 65 20 74 6f 20 63 6f 6e 66 6f 72 6d 20 | one to conform | 000005e0 77 69 74 68 20 74 68 65 0d 74 79 70 65 20 6f 66 |with the.type of| 000005f0 20 67 72 61 70 68 69 63 73 20 70 61 63 6b 61 67 | graphics packag| 00000600 65 20 69 6e 69 74 69 61 6c 6c 79 20 75 73 65 64 |e initially used| 00000610 2e 0d 0d 54 68 65 20 73 72 65 65 6e 20 63 6c 65 |...The sreen cle| 00000620 61 72 73 20 61 6e 64 20 79 6f 75 20 63 61 6e 20 |ars and you can | 00000630 6e 6f 77 20 70 72 65 73 73 20 4c 20 74 6f 20 6c |now press L to l| 00000640 6f 61 64 20 61 20 70 72 65 70 61 72 65 64 20 70 |oad a prepared p| 00000650 69 63 74 75 72 65 2e 20 20 59 6f 75 0d 63 61 6e |icture. You.can| 00000660 20 70 6c 61 63 65 20 74 68 65 20 63 75 72 73 6f | place the curso| 00000670 72 20 77 68 65 72 65 20 79 6f 75 20 77 61 6e 74 |r where you want| 00000680 20 74 68 65 20 66 69 72 73 74 20 62 6c 6f 63 6b | the first block| 00000690 20 75 73 69 6e 67 20 74 68 65 20 61 72 72 6f 77 | using the arrow| 000006a0 20 6b 65 79 73 0d 61 6e 64 20 61 64 6a 75 73 74 | keys.and adjust| 000006b0 20 69 74 73 20 73 69 7a 65 20 77 69 74 68 20 74 | its size with t| 000006c0 68 65 20 67 61 6d 65 20 6b 65 79 73 20 5a 2c 58 |he game keys Z,X| 000006d0 2c 2a 20 61 6e 64 20 3f 2e 20 20 54 6f 20 72 6f |,* and ?. To ro| 000006e0 74 61 74 65 20 69 74 20 75 73 65 0d 3c 20 61 6e |tate it use.< an| 000006f0 64 20 3e 2e 20 20 41 6c 6c 20 66 75 6e 63 74 69 |d >. All functi| 00000700 6f 6e 73 20 6d 61 79 20 62 65 20 73 70 65 65 64 |ons may be speed| 00000710 65 64 20 75 70 20 62 79 20 68 6f 6c 64 69 6e 67 |ed up by holding| 00000720 20 64 6f 77 6e 20 53 48 49 46 54 2e 20 20 54 68 | down SHIFT. Th| 00000730 65 0d 63 75 72 73 6f 72 20 77 69 6c 6c 20 69 6e |e.cursor will in| 00000740 64 69 63 61 74 65 20 73 69 7a 65 2c 20 63 6f 6c |dicate size, col| 00000750 6f 75 72 20 61 6e 64 20 70 6c 6f 74 20 74 79 70 |our and plot typ| 00000760 65 20 61 74 20 61 6c 6c 20 74 69 6d 65 73 2e 0d |e at all times..| 00000770 0d 54 68 65 20 63 6f 6c 6f 75 72 20 6d 61 79 20 |.The colour may | 00000780 62 65 20 73 65 6c 65 63 74 65 64 20 75 73 69 6e |be selected usin| 00000790 67 20 41 20 6f 72 20 42 2e 20 20 54 68 65 20 73 |g A or B. The s| 000007a0 6f 6c 69 64 20 6f 72 20 64 6f 74 74 65 64 20 70 |olid or dotted p| 000007b0 6c 6f 74 20 69 73 0d 73 65 6c 65 63 74 65 64 20 |lot is.selected | 000007c0 62 79 20 43 20 6f 72 20 44 20 61 6e 64 20 70 72 |by C or D and pr| 000007d0 65 73 73 69 6e 67 20 54 41 42 20 69 72 72 65 76 |essing TAB irrev| 000007e0 6f 63 61 62 6c 79 20 64 72 61 77 73 20 74 68 65 |ocably draws the| 000007f0 20 62 6c 6f 63 6b 2e 20 20 53 74 72 61 6e 67 65 | block. Strange| 00000800 0d 63 6f 6c 6f 75 72 20 65 66 66 65 63 74 73 20 |.colour effects | 00000810 77 69 6c 6c 20 61 70 70 65 61 72 20 6d 6f 6d 65 |will appear mome| 00000820 6e 74 61 72 69 6c 79 2c 20 62 75 74 20 74 68 65 |ntarily, but the| 00000830 79 20 61 72 65 20 73 6f 6f 6e 20 73 6f 72 74 65 |y are soon sorte| 00000840 64 20 6f 75 74 20 62 79 0d 50 52 4f 43 63 6f 6c |d out by.PROCcol| 00000850 73 6f 66 66 2e 20 20 4b 65 65 70 20 72 65 70 65 |soff. Keep repe| 00000860 61 74 69 6e 67 20 74 68 65 20 70 72 6f 63 65 73 |ating the proces| 00000870 73 20 75 6e 74 69 6c 20 79 6f 75 20 61 72 65 20 |s until you are | 00000880 72 65 61 64 79 20 74 6f 20 74 65 73 74 20 74 68 |ready to test th| 00000890 65 0d 61 6e 69 6d 61 74 69 6f 6e 20 62 79 20 68 |e.animation by h| 000008a0 6f 6c 64 69 6e 67 20 64 6f 77 6e 20 4d 2e 20 20 |olding down M. | 000008b0 46 69 6e 61 6c 6c 79 20 74 68 65 20 73 63 72 65 |Finally the scre| 000008c0 65 6e 20 6d 61 79 20 62 65 20 73 61 76 65 64 20 |en may be saved | 000008d0 62 79 20 70 72 65 73 73 69 6e 67 0d 53 2e 20 20 |by pressing.S. | 000008e0 42 6f 74 68 20 66 69 6c 69 6e 67 20 66 75 6e 63 |Both filing func| 000008f0 74 69 6f 6e 73 20 61 72 65 20 61 62 6f 72 74 65 |tions are aborte| 00000900 64 20 69 66 20 52 65 74 75 72 6e 20 69 73 20 70 |d if Return is p| 00000910 72 65 73 73 65 64 20 77 69 74 68 20 6e 6f 0d 66 |ressed with no.f| 00000920 69 6c 65 6e 61 6d 65 20 67 69 76 65 6e 2e 0d 0d |ilename given...| 00000930 49 74 20 6d 61 79 20 62 65 20 6e 65 63 65 73 73 |It may be necess| 00000940 61 72 79 20 74 6f 20 72 65 74 75 72 6e 20 74 6f |ary to return to| 00000950 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 20 67 72 | the original gr| 00000960 61 70 68 69 63 73 20 70 61 63 6b 61 67 65 20 74 |aphics package t| 00000970 6f 20 74 69 64 79 20 75 70 0d 74 68 65 20 70 69 |o tidy up.the pi| 00000980 63 74 75 72 65 20 61 6e 64 20 79 6f 75 20 63 61 |cture and you ca| 00000990 6e 20 6b 65 65 70 20 73 77 61 70 70 69 6e 67 20 |n keep swapping | 000009a0 62 65 74 77 65 65 6e 20 61 70 70 6c 69 63 61 74 |between applicat| 000009b0 69 6f 6e 73 20 61 73 20 6d 61 6e 79 20 74 69 6d |ions as many tim| 000009c0 65 73 0d 61 73 20 72 65 71 75 69 72 65 64 2e 20 |es.as required. | 000009d0 20 4c 69 73 74 69 6e 67 20 49 49 20 69 73 20 74 | Listing II is t| 000009e0 68 65 20 73 69 6d 70 6c 65 20 44 69 73 70 6c 61 |he simple Displa| 000009f0 79 20 77 68 69 63 68 20 67 69 76 65 73 20 61 20 |y which gives a | 00000a00 6e 75 6d 65 72 69 63 61 6c 0d 63 68 6f 69 63 65 |numerical.choice| 00000a10 20 6f 66 20 63 6f 6c 6f 75 72 73 20 66 6f 72 20 | of colours for | 00000a20 74 68 65 20 66 69 6e 61 6c 20 64 69 73 70 6c 61 |the final displa| 00000a30 79 20 61 6e 64 20 61 6e 79 20 74 77 6f 20 66 72 |y and any two fr| 00000a40 6f 6d 20 6f 6e 65 20 74 6f 20 73 65 76 65 6e 20 |om one to seven | 00000a50 6d 61 79 0d 62 65 20 73 65 6c 65 63 74 65 64 20 |may.be selected | 00000a60 74 6f 20 72 65 70 6c 61 63 65 20 74 68 65 20 72 |to replace the r| 00000a70 65 64 20 61 6e 64 20 62 6c 75 65 20 69 6e 20 74 |ed and blue in t| 00000a80 68 65 20 64 65 73 69 67 6e 20 70 72 6f 67 72 61 |he design progra| 00000a90 6d 2e 0d |m..| 00000a93
18-03-89/T_Flow.m0
18-03-89/T_Flow.m1
18-03-89/T_Flow.m2
18-03-89/T_Flow.m4
18-03-89/T_Flow.m5
.