Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_24.ADF » F/FNcct1

F/FNcct1

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 » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_24.ADF
Filename: F/FNcct1
Read OK:
File size: 0878 bytes
Load address: 46204556
Exec address: 7463634E
File contents
FURTHER NOTES ON 'CIRCUIT'
~~~~~~~~~~~~~~~~~~~~~~~~~~
I have been told  that some members have enquired about how to make up the
DATA lines for the files for the CIRCUIT program and I am sorry this was
not explained more clearly.

The program draws the components using a series of PLOT commands using
VDU25.  The VDU25 command is given by the program and then the three DATA
values are read from the DATA lines.  The number of PLOT commands (Z%)
needs to be entered first so that each DATA line should be -

       DATA Z%, P1, X1, Y1, P2, X2, Y2, etc

Where   P1, P2 ... are the PLOT codes - 4=MOVE, 5=DRAW, etc
        X1, X2,...  Y1, Y2,... are the co-ordinates

The values of the co-ordinates relate to the start point which should be
regarded as MOVE 0,0.

As a simple example -

       DATA 4,5,100,0,5,100,50,5,0,50,5,0,0

draws a small rectangle.

I hope this has explained the making up of these lines more clearly.

I am pleased that the program has been of interest and hope it will be
found very useful.

Richard Dimond

**************************************************************************

USING RICHARDS ADVICE I HAVE MADE A STAB AT DESIGNING SOME ICONS TO DRAW
ELECTRICAL INSTALLATION DRAWINGS. I HAVE SO FAR ONLY MADE A FEW AND IT IS
A BIT LABOUROUS BUT ONCE YOU GET THE HANG OF IT IT BECOMES FAIRLY EASY.

MOVE TO MODE 0. USING THE GRID ON THE FIRST PAGE OF APPENDIX G IN THE ELK
USER GUIDE PLAN OUT THE SHAPE OF THE ICON YOU WANT. DO THIS LIGHTLY IN
PENCIL SO THAT YOU CAN RUB IT OUT AFTERWARDS. REMEMBER THAT THE ICON NEEDS
TO BE DRAWN SIDEWAYS TO THE RIGHT SO FOR EXAMPLE A SEMICIRCLE THE BASE
WILL BE FROM 0,0 TO SAY 0,40. THEN THE FIRST STEP WILL BE SAY 1,39 WHILE
THE SECOND STEP WILL BE 2,38 AND SO ON. THE FIRST NUMBER IS THE 'X'
CO-ORDANATE IE HORRIZONTAL WHILE THE SECOND IS THE 'Y' CO-ORDANATE IE
VERTICAL. THE PLOT NUMBER FOR MOVING WITHOUT DRAWING IS 4 WHILE TO DRAW IS
5. SO IN MODE 0 ENTER PLOT5,0,40 <RET> THEN PLOT5,1,39 <RET>.

I SEEM TO REMEMBER THAT EU PUBLISHED A BIT OF CODE TO PROVIDE A CIRCLE
PLOT. I WILL LOOK THIS UP AND SEE IT IT IS SUITABLE.

THE ICONS I HAVE MADE CAN BE FOUND IN THE FILE 'ELECT'
00000000  0d 46 55 52 54 48 45 52  20 4e 4f 54 45 53 20 4f  |.FURTHER NOTES O|
00000010  4e 20 27 43 49 52 43 55  49 54 27 0d 7e 7e 7e 7e  |N 'CIRCUIT'.~~~~|
00000020  7e 7e 7e 7e 7e 7e 7e 7e  7e 7e 7e 7e 7e 7e 7e 7e  |~~~~~~~~~~~~~~~~|
00000030  7e 7e 7e 7e 7e 7e 0d 49  20 68 61 76 65 20 62 65  |~~~~~~.I have be|
00000040  65 6e 20 74 6f 6c 64 20  20 74 68 61 74 20 73 6f  |en told  that so|
00000050  6d 65 20 6d 65 6d 62 65  72 73 20 68 61 76 65 20  |me members have |
00000060  65 6e 71 75 69 72 65 64  20 61 62 6f 75 74 20 68  |enquired about h|
00000070  6f 77 20 74 6f 20 6d 61  6b 65 20 75 70 20 74 68  |ow to make up th|
00000080  65 0d 44 41 54 41 20 6c  69 6e 65 73 20 66 6f 72  |e.DATA lines for|
00000090  20 74 68 65 20 66 69 6c  65 73 1a 20 66 6f 72 1a  | the files. for.|
000000a0  20 74 68 65 20 43 49 52  43 55 49 54 20 70 72 6f  | the CIRCUIT pro|
000000b0  67 72 61 6d 20 61 6e 64  20 49 20 61 6d 20 73 6f  |gram and I am so|
000000c0  72 72 79 20 74 68 69 73  20 77 61 73 0d 6e 6f 74  |rry this was.not|
000000d0  20 65 78 70 6c 61 69 6e  65 64 20 6d 6f 72 65 20  | explained more |
000000e0  63 6c 65 61 72 6c 79 2e  0d 0d 54 68 65 20 70 72  |clearly...The pr|
000000f0  6f 67 72 61 6d 20 64 72  61 77 73 20 74 68 65 20  |ogram draws the |
00000100  63 6f 6d 70 6f 6e 65 6e  74 73 1a 20 75 73 69 6e  |components. usin|
00000110  67 1a 20 61 1a 20 73 65  72 69 65 73 1a 20 6f 66  |g. a. series. of|
00000120  20 50 4c 4f 54 20 63 6f  6d 6d 61 6e 64 73 20 75  | PLOT commands u|
00000130  73 69 6e 67 0d 56 44 55  32 35 2e 20 20 54 68 65  |sing.VDU25.  The|
00000140  20 56 44 55 32 35 20 63  6f 6d 6d 61 6e 64 20 69  | VDU25 command i|
00000150  73 1a 20 67 69 76 65 6e  20 62 79 20 74 68 65 20  |s. given by the |
00000160  70 72 6f 67 72 61 6d 20  61 6e 64 20 74 68 65 6e  |program and then|
00000170  20 74 68 65 20 74 68 72  65 65 20 44 41 54 41 0d  | the three DATA.|
00000180  76 61 6c 75 65 73 20 61  72 65 20 72 65 61 64 20  |values are read |
00000190  66 72 6f 6d 20 74 68 65  20 44 41 54 41 1a 20 6c  |from the DATA. l|
000001a0  69 6e 65 73 2e 1a 20 20  54 68 65 1a 20 6e 75 6d  |ines..  The. num|
000001b0  62 65 72 1a 20 6f 66 20  50 4c 4f 54 20 63 6f 6d  |ber. of PLOT com|
000001c0  6d 61 6e 64 73 20 28 5a  25 29 0d 6e 65 65 64 73  |mands (Z%).needs|
000001d0  20 74 6f 20 62 65 20 65  6e 74 65 72 65 64 20 66  | to be entered f|
000001e0  69 72 73 74 20 73 6f 20  74 68 61 74 20 65 61 63  |irst so that eac|
000001f0  68 20 44 41 54 41 20 6c  69 6e 65 20 73 68 6f 75  |h DATA line shou|
00000200  6c 64 20 62 65 20 2d 0d  0d 20 20 20 20 20 20 20  |ld be -..       |
00000210  44 41 54 41 20 5a 25 2c  20 50 31 2c 20 58 31 2c  |DATA Z%, P1, X1,|
00000220  20 59 31 2c 20 50 32 2c  20 58 32 2c 20 59 32 2c  | Y1, P2, X2, Y2,|
00000230  20 65 74 63 0d 0d 57 68  65 72 65 20 20 20 50 31  | etc..Where   P1|
00000240  2c 20 50 32 20 2e 2e 2e  20 61 72 65 20 74 68 65  |, P2 ... are the|
00000250  20 50 4c 4f 54 20 63 6f  64 65 73 20 2d 20 34 3d  | PLOT codes - 4=|
00000260  4d 4f 56 45 2c 20 35 3d  44 52 41 57 2c 20 65 74  |MOVE, 5=DRAW, et|
00000270  63 0d 20 20 20 20 20 20  20 20 58 31 2c 20 58 32  |c.        X1, X2|
00000280  2c 2e 2e 2e 20 20 59 31  2c 20 59 32 2c 2e 2e 2e  |,...  Y1, Y2,...|
00000290  20 61 72 65 20 74 68 65  20 63 6f 2d 6f 72 64 69  | are the co-ordi|
000002a0  6e 61 74 65 73 0d 0d 54  68 65 1a 20 76 61 6c 75  |nates..The. valu|
000002b0  65 73 1a 20 6f 66 20 74  68 65 20 63 6f 2d 6f 72  |es. of the co-or|
000002c0  64 69 6e 61 74 65 73 20  72 65 6c 61 74 65 20 74  |dinates relate t|
000002d0  6f 20 74 68 65 20 73 74  61 72 74 20 70 6f 69 6e  |o the start poin|
000002e0  74 20 77 68 69 63 68 20  73 68 6f 75 6c 64 20 62  |t which should b|
000002f0  65 0d 72 65 67 61 72 64  65 64 20 61 73 20 4d 4f  |e.regarded as MO|
00000300  56 45 20 30 2c 30 2e 0d  0d 41 73 20 61 20 73 69  |VE 0,0...As a si|
00000310  6d 70 6c 65 20 65 78 61  6d 70 6c 65 20 2d 0d 0d  |mple example -..|
00000320  20 20 20 20 20 20 20 44  41 54 41 20 34 2c 35 2c  |       DATA 4,5,|
00000330  31 30 30 2c 30 2c 35 2c  31 30 30 2c 35 30 2c 35  |100,0,5,100,50,5|
00000340  2c 30 2c 35 30 2c 35 2c  30 2c 30 0d 0d 64 72 61  |,0,50,5,0,0..dra|
00000350  77 73 20 61 20 73 6d 61  6c 6c 20 72 65 63 74 61  |ws a small recta|
00000360  6e 67 6c 65 2e 0d 0d 49  20 68 6f 70 65 20 74 68  |ngle...I hope th|
00000370  69 73 20 68 61 73 20 65  78 70 6c 61 69 6e 65 64  |is has explained|
00000380  20 74 68 65 20 6d 61 6b  69 6e 67 20 75 70 20 6f  | the making up o|
00000390  66 20 74 68 65 73 65 20  6c 69 6e 65 73 20 6d 6f  |f these lines mo|
000003a0  72 65 20 63 6c 65 61 72  6c 79 2e 0d 0d 49 20 61  |re clearly...I a|
000003b0  6d 20 70 6c 65 61 73 65  64 20 74 68 61 74 20 74  |m pleased that t|
000003c0  68 65 1a 20 70 72 6f 67  72 61 6d 1a 20 68 61 73  |he. program. has|
000003d0  1a 20 62 65 65 6e 1a 20  6f 66 20 69 6e 74 65 72  |. been. of inter|
000003e0  65 73 74 20 61 6e 64 20  68 6f 70 65 20 69 74 20  |est and hope it |
000003f0  77 69 6c 6c 20 62 65 0d  66 6f 75 6e 64 20 76 65  |will be.found ve|
00000400  72 79 20 75 73 65 66 75  6c 2e 0d 0d 52 69 63 68  |ry useful...Rich|
00000410  61 72 64 20 44 69 6d 6f  6e 64 0d 0d 2a 2a 2a 2a  |ard Dimond..****|
00000420  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
*
00000460  2a 2a 2a 2a 2a 2a 0d 0d  55 53 49 4e 47 20 52 49  |******..USING RI|
00000470  43 48 41 52 44 53 20 41  44 56 49 43 45 20 49 20  |CHARDS ADVICE I |
00000480  48 41 56 45 20 4d 41 44  45 20 41 20 53 54 41 42  |HAVE MADE A STAB|
00000490  20 41 54 20 44 45 53 49  47 4e 49 4e 47 20 53 4f  | AT DESIGNING SO|
000004a0  4d 45 20 49 43 4f 4e 53  20 54 4f 20 44 52 41 57  |ME ICONS TO DRAW|
000004b0  0d 45 4c 45 43 54 52 49  43 41 4c 20 49 4e 53 54  |.ELECTRICAL INST|
000004c0  41 4c 4c 41 54 49 4f 4e  20 44 52 41 57 49 4e 47  |ALLATION DRAWING|
000004d0  53 2e 20 49 20 48 41 56  45 20 53 4f 20 46 41 52  |S. I HAVE SO FAR|
000004e0  20 4f 4e 4c 59 20 4d 41  44 45 20 41 20 46 45 57  | ONLY MADE A FEW|
000004f0  20 41 4e 44 20 49 54 20  49 53 0d 41 20 42 49 54  | AND IT IS.A BIT|
00000500  20 4c 41 42 4f 55 52 4f  55 53 20 42 55 54 20 4f  | LABOUROUS BUT O|
00000510  4e 43 45 20 59 4f 55 20  47 45 54 20 54 48 45 20  |NCE YOU GET THE |
00000520  48 41 4e 47 20 4f 46 20  49 54 20 49 54 20 42 45  |HANG OF IT IT BE|
00000530  43 4f 4d 45 53 20 46 41  49 52 4c 59 20 45 41 53  |COMES FAIRLY EAS|
00000540  59 2e 0d 0d 4d 4f 56 45  20 54 4f 20 4d 4f 44 45  |Y...MOVE TO MODE|
00000550  20 30 2e 20 55 53 49 4e  47 20 54 48 45 20 47 52  | 0. USING THE GR|
00000560  49 44 20 4f 4e 20 54 48  45 20 46 49 52 53 54 20  |ID ON THE FIRST |
00000570  50 41 47 45 20 4f 46 20  41 50 50 45 4e 44 49 58  |PAGE OF APPENDIX|
00000580  20 47 20 49 4e 20 54 48  45 20 45 4c 4b 0d 55 53  | G IN THE ELK.US|
00000590  45 52 20 47 55 49 44 45  20 50 4c 41 4e 20 4f 55  |ER GUIDE PLAN OU|
000005a0  54 20 54 48 45 20 53 48  41 50 45 20 4f 46 20 54  |T THE SHAPE OF T|
000005b0  48 45 20 49 43 4f 4e 20  59 4f 55 20 57 41 4e 54  |HE ICON YOU WANT|
000005c0  2e 20 44 4f 20 54 48 49  53 20 4c 49 47 48 54 4c  |. DO THIS LIGHTL|
000005d0  59 20 49 4e 0d 50 45 4e  43 49 4c 20 53 4f 20 54  |Y IN.PENCIL SO T|
000005e0  48 41 54 20 59 4f 55 20  43 41 4e 20 52 55 42 20  |HAT YOU CAN RUB |
000005f0  49 54 20 4f 55 54 20 41  46 54 45 52 57 41 52 44  |IT OUT AFTERWARD|
00000600  53 2e 20 52 45 4d 45 4d  42 45 52 20 54 48 41 54  |S. REMEMBER THAT|
00000610  20 54 48 45 20 49 43 4f  4e 20 4e 45 45 44 53 0d  | THE ICON NEEDS.|
00000620  54 4f 20 42 45 20 44 52  41 57 4e 20 53 49 44 45  |TO BE DRAWN SIDE|
00000630  57 41 59 53 20 54 4f 20  54 48 45 20 52 49 47 48  |WAYS TO THE RIGH|
00000640  54 20 53 4f 20 46 4f 52  20 45 58 41 4d 50 4c 45  |T SO FOR EXAMPLE|
00000650  20 41 20 53 45 4d 49 43  49 52 43 4c 45 20 54 48  | A SEMICIRCLE TH|
00000660  45 20 42 41 53 45 0d 57  49 4c 4c 20 42 45 20 46  |E BASE.WILL BE F|
00000670  52 4f 4d 20 30 2c 30 20  54 4f 20 53 41 59 20 30  |ROM 0,0 TO SAY 0|
00000680  2c 34 30 2e 20 54 48 45  4e 20 54 48 45 20 46 49  |,40. THEN THE FI|
00000690  52 53 54 20 53 54 45 50  20 57 49 4c 4c 20 42 45  |RST STEP WILL BE|
000006a0  20 53 41 59 20 31 2c 33  39 20 57 48 49 4c 45 0d  | SAY 1,39 WHILE.|
000006b0  54 48 45 20 53 45 43 4f  4e 44 20 53 54 45 50 20  |THE SECOND STEP |
000006c0  57 49 4c 4c 20 42 45 20  32 2c 33 38 20 41 4e 44  |WILL BE 2,38 AND|
000006d0  20 53 4f 20 4f 4e 2e 20  54 48 45 20 46 49 52 53  | SO ON. THE FIRS|
000006e0  54 20 4e 55 4d 42 45 52  20 49 53 20 54 48 45 20  |T NUMBER IS THE |
000006f0  27 58 27 0d 43 4f 2d 4f  52 44 41 4e 41 54 45 20  |'X'.CO-ORDANATE |
00000700  49 45 20 48 4f 52 52 49  5a 4f 4e 54 41 4c 20 57  |IE HORRIZONTAL W|
00000710  48 49 4c 45 20 54 48 45  20 53 45 43 4f 4e 44 20  |HILE THE SECOND |
00000720  49 53 20 54 48 45 20 27  59 27 20 43 4f 2d 4f 52  |IS THE 'Y' CO-OR|
00000730  44 41 4e 41 54 45 20 49  45 0d 56 45 52 54 49 43  |DANATE IE.VERTIC|
00000740  41 4c 2e 20 54 48 45 20  50 4c 4f 54 20 4e 55 4d  |AL. THE PLOT NUM|
00000750  42 45 52 20 46 4f 52 20  4d 4f 56 49 4e 47 20 57  |BER FOR MOVING W|
00000760  49 54 48 4f 55 54 20 44  52 41 57 49 4e 47 20 49  |ITHOUT DRAWING I|
00000770  53 20 34 20 57 48 49 4c  45 20 54 4f 20 44 52 41  |S 4 WHILE TO DRA|
00000780  57 20 49 53 0d 35 2e 20  53 4f 20 49 4e 20 4d 4f  |W IS.5. SO IN MO|
00000790  44 45 20 30 20 45 4e 54  45 52 20 50 4c 4f 54 35  |DE 0 ENTER PLOT5|
000007a0  2c 30 2c 34 30 20 3c 52  45 54 3e 20 54 48 45 4e  |,0,40 <RET> THEN|
000007b0  20 50 4c 4f 54 35 2c 31  2c 33 39 20 3c 52 45 54  | PLOT5,1,39 <RET|
000007c0  3e 2e 0d 0d 49 20 53 45  45 4d 20 54 4f 20 52 45  |>...I SEEM TO RE|
000007d0  4d 45 4d 42 45 52 20 54  48 41 54 20 45 55 20 50  |MEMBER THAT EU P|
000007e0  55 42 4c 49 53 48 45 44  20 41 20 42 49 54 20 4f  |UBLISHED A BIT O|
000007f0  46 20 43 4f 44 45 20 54  4f 20 50 52 4f 56 49 44  |F CODE TO PROVID|
00000800  45 20 41 20 43 49 52 43  4c 45 0d 50 4c 4f 54 2e  |E A CIRCLE.PLOT.|
00000810  20 49 20 57 49 4c 4c 20  4c 4f 4f 4b 20 54 48 49  | I WILL LOOK THI|
00000820  53 20 55 50 20 41 4e 44  20 53 45 45 20 49 54 20  |S UP AND SEE IT |
00000830  49 54 20 49 53 20 53 55  49 54 41 42 4c 45 2e 0d  |IT IS SUITABLE..|
00000840  0d 54 48 45 20 49 43 4f  4e 53 20 49 20 48 41 56  |.THE ICONS I HAV|
00000850  45 20 4d 41 44 45 20 43  41 4e 20 42 45 20 46 4f  |E MADE CAN BE FO|
00000860  55 4e 44 20 49 4e 20 54  48 45 20 46 49 4c 45 20  |UND IN THE FILE |
00000870  27 45 4c 45 43 54 27 0d                           |'ELECT'.|
00000878
F/FNcct1.m0
F/FNcct1.m1
F/FNcct1.m2
F/FNcct1.m4
F/FNcct1.m5