Home » Personal collection » Acorn tapes » Electron_User » Electron_User_tape15b_acorn_eu_1990_october.wav » R.Polygon

R.Polygon

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 tapes » Electron_User » Electron_User_tape15b_acorn_eu_1990_october.wav
Filename: R.Polygon
Read OK:
File size: 0070 bytes
Load address: FFFFFFFF
Exec address: FFFFFFFF
Duplicates

There are 3 duplicate copies of this file in the archive:

File contents
TO POLYGON :SIDE :NUMOFSIDES
MAKE "ANGLE 360 / :NUMOFSIDES
REPEAT :NUMOFSIDES [
FORWARD :SIDE
LEFT :ANGLE ]
END
00000000  54 4f 20 50 4f 4c 59 47  4f 4e 20 3a 53 49 44 45  |TO POLYGON :SIDE|
00000010  20 3a 4e 55 4d 4f 46 53  49 44 45 53 0d 4d 41 4b  | :NUMOFSIDES.MAK|
00000020  45 20 22 41 4e 47 4c 45  20 33 36 30 20 2f 20 3a  |E "ANGLE 360 / :|
00000030  4e 55 4d 4f 46 53 49 44  45 53 0d 52 45 50 45 41  |NUMOFSIDES.REPEA|
00000040  54 20 3a 4e 55 4d 4f 46  53 49 44 45 53 20 5b 0d  |T :NUMOFSIDES [.|
00000050  46 4f 52 57 41 52 44 20  3a 53 49 44 45 0d 4c 45  |FORWARD :SIDE.LE|
00000060  46 54 20 3a 41 4e 47 4c  45 20 5d 0d 45 4e 44 0d  |FT :ANGLE ].END.|
00000070
R.Polygon.m0
R.Polygon.m1
R.Polygon.m2
R.Polygon.m4
R.Polygon.m5