Home » CEEFAX disks » telesoftware17.adl » 11-08-89/SP1

11-08-89/SP1

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 » telesoftware17.adl
Filename: 11-08-89/SP1
Read OK:
File size: 076B bytes
Load address: FFFF1C00
Exec address: FFFF801F
File contents
   10REM Spectramania (1)
   20REM by David Acton
   30REM BBC B/B+/128k and Electron
   40REM (c) Acorn User January 1986
   50:
   60MODE 5
   70VDU 19,3,9,0;0,23;6,23;0;0;0
   80ENVELOPE 1,2,0,0,0,0,0,0,126,-1,0,-1,126,63
   90ENVELOPE 2,2,0,72,-72,0,3,3,126,0,0,-1,126,63
  100ENVELOPE 3,3,-4,-1,2,6,6,28,81,-4,-5,-1,126,63
  110ENVELOPE 4,3,1,-2,1,1,1,1,126,-1,0,-1,100,63
  120*FX 9,1
  130*FX 10,1
  140*FX 225
  150FOR X%=0 TO 31:A%=&3000+640*X%
  160X%?&CA0=A% DIV256:X%?&CC0=A%:NEXT
  170T%=0:FOR X%=&B00 TO &C9C STEP4
  180READ!X%:T%=T%+!X%
  190NEXT:!&75=RND:!&79=&768553
  200IFT%<>&3A816AC7 MODE6:PRINT"Data error - please check listing":END
  210PRINTTAB(4,2)"SPECTRAMANIA"
  220COLOUR2:PRINTTAB(5,6)"by D Acton"
  230COLOUR1:PRINTTAB(6,12)"LOADING."
  240VDU 28,1,22,18,20
  250PAGE=&3000:CHAIN"SP2"
  260DATA &B0B0F050,&F00050F0
  270DATA &D070F0F0,&F050F0F0
  280DATA &E0B0F0F0,&F0A0F0F0
  290DATA &7070F0A0,&F000A0F0
  300DATA &A0A0A0A0,&F0A0
  310DATA &F0F0F0F0,&30101010
  320DATA &F0F0F0F0,&30202020
  330DATA &50505050,&F050
  340DATA &1000A050,&30307030
  350DATA &B0B0A0A0,&30B03030
  360DATA &70705050,&30703030
  370DATA &200050A0,&3030B030
  380DATA &30306060,&103030
  390DATA &60309090,&3060C030
  400DATA &90306060,&3090C030
  410DATA &30309090,&203030
  420DATA &10000000,&30303030
  430DATA &F0300000,&B0B0F0B0
  440DATA &F0300000,&7070F070
  450DATA &20000000,&30303030
  460DATA &30303030,&1030
  470DATA &90909030,&30C090
  480DATA &60606030,&30C060
  490DATA &30303030,&2030
  500DATA &F0500000,&E0E0E0F0
  510DATA &F0F0F000,&30706030
  520DATA &F0F0F000,&30E0C030
  530DATA &F0A00000,&70707070
  540DATA &E0E0E0E0,&50F0
  550DATA &F0707060,&F0F0F0
  560DATA &F0F0F0C0,&F0F0F0
  570DATA &F0F0F0F0,&A0F0
  580:
  590DATA &71353529,&15511535
  600DATA &192A2315,&42480661
  610DATA &2A33610C,&231C0A2A
  620DATA &3629060C,&421C2A0A
  630DATA &15357429,&36482354
  640DATA &35686219,&62151535
  650DATA &680A3368,&41410962
  660DATA &A626803,&C2A2A0A
  670DATA &2A064444,&1C0A0A2A
  680DATA &29231554,&A367435
  690DATA &33613548,&61192A2A
  700DATA &350C4215,&54740C36
  710DATA &6151C06
  720:
  730DATA &F0C0300,&2060400
  740DATA &2020202,&222A2222
  750DATA &222A2A22,&2C1414EC
  760DATA &2C442C44,&4050404
  770DATA &4050504,&1000009
  780DATA &1020102,0,0
  790DATA &FFF80000,&10002

� Spectramania (1)
� by David Acton
 � BBC B/B+/128k and Electron
(!� (c) Acorn User January 1986
2:
<� 5
F� 19,3,9,0;0,23;6,23;0;0;0
P(� 1,2,0,0,0,0,0,0,126,-1,0,-1,126,63
Z*� 2,2,0,72,-72,0,3,3,126,0,0,-1,126,63
d+� 3,3,-4,-1,2,6,6,28,81,-4,-5,-1,126,63
n)� 4,3,1,-2,1,1,1,1,126,-1,0,-1,100,63
x*FX 9,1
�*FX 10,1
�*FX 225
�� X%=0 � 31:A%=&3000+640*X%
� X%?&CA0=A% �256:X%?&CC0=A%:�
�T%=0:� X%=&B00 � &C9C �4
��!X%:T%=T%+!X%
��:!&75=�:!&79=&768553
�<�T%<>&3A816AC7 �6:�"Data error - please check listing":�
��4,2)"SPECTRAMANIA"
��2:�5,6)"by D Acton"
��1:�6,12)"LOADING."
�� 28,1,22,18,20
��=&3000:�"SP2"
� &B0B0F050,&F00050F0
� &D070F0F0,&F050F0F0
� &E0B0F0F0,&F0A0F0F0
"� &7070F0A0,&F000A0F0
,� &A0A0A0A0,&F0A0
6� &F0F0F0F0,&30101010
@� &F0F0F0F0,&30202020
J� &50505050,&F050
T� &1000A050,&30307030
^� &B0B0A0A0,&30B03030
h� &70705050,&30703030
r� &200050A0,&3030B030
|� &30306060,&103030
�� &60309090,&3060C030
�� &90306060,&3090C030
�� &30309090,&203030
�� &10000000,&30303030
�� &F0300000,&B0B0F0B0
�� &F0300000,&7070F070
�� &20000000,&30303030
�� &30303030,&1030
�� &90909030,&30C090
�� &60606030,&30C060
�� &30303030,&2030
�� &F0500000,&E0E0E0F0
�� &F0F0F000,&30706030
� &F0F0F000,&30E0C030
� &F0A00000,&70707070
� &E0E0E0E0,&50F0
&� &F0707060,&F0F0F0
0� &F0F0F0C0,&F0F0F0
:� &F0F0F0F0,&A0F0
D:
N� &71353529,&15511535
X� &192A2315,&42480661
b� &2A33610C,&231C0A2A
l� &3629060C,&421C2A0A
v� &15357429,&36482354
�� &35686219,&62151535
�� &680A3368,&41410962
�� &A626803,&C2A2A0A
�� &2A064444,&1C0A0A2A
�� &29231554,&A367435
�� &33613548,&61192A2A
�� &350C4215,&54740C36
�� &6151C06
�:
�� &F0C0300,&2060400
�� &2020202,&222A2222
�� &222A2A22,&2C1414EC
�� &2C442C44,&4050404
� &4050504,&1000009
� &1020102,0,0
� &FFF80000,&10002
�
00000000  0d 00 0a 16 f4 20 53 70  65 63 74 72 61 6d 61 6e  |..... Spectraman|
00000010  69 61 20 28 31 29 0d 00  14 14 f4 20 62 79 20 44  |ia (1)..... by D|
00000020  61 76 69 64 20 41 63 74  6f 6e 0d 00 1e 20 f4 20  |avid Acton... . |
00000030  42 42 43 20 42 2f 42 2b  2f 31 32 38 6b 20 61 6e  |BBC B/B+/128k an|
00000040  64 20 45 6c 65 63 74 72  6f 6e 0d 00 28 21 f4 20  |d Electron..(!. |
00000050  28 63 29 20 41 63 6f 72  6e 20 55 73 65 72 20 4a  |(c) Acorn User J|
00000060  61 6e 75 61 72 79 20 31  39 38 36 0d 00 32 05 3a  |anuary 1986..2.:|
00000070  0d 00 3c 07 eb 20 35 0d  00 46 1e ef 20 31 39 2c  |..<.. 5..F.. 19,|
00000080  33 2c 39 2c 30 3b 30 2c  32 33 3b 36 2c 32 33 3b  |3,9,0;0,23;6,23;|
00000090  30 3b 30 3b 30 0d 00 50  28 e2 20 31 2c 32 2c 30  |0;0;0..P(. 1,2,0|
000000a0  2c 30 2c 30 2c 30 2c 30  2c 30 2c 31 32 36 2c 2d  |,0,0,0,0,0,126,-|
000000b0  31 2c 30 2c 2d 31 2c 31  32 36 2c 36 33 0d 00 5a  |1,0,-1,126,63..Z|
000000c0  2a e2 20 32 2c 32 2c 30  2c 37 32 2c 2d 37 32 2c  |*. 2,2,0,72,-72,|
000000d0  30 2c 33 2c 33 2c 31 32  36 2c 30 2c 30 2c 2d 31  |0,3,3,126,0,0,-1|
000000e0  2c 31 32 36 2c 36 33 0d  00 64 2b e2 20 33 2c 33  |,126,63..d+. 3,3|
000000f0  2c 2d 34 2c 2d 31 2c 32  2c 36 2c 36 2c 32 38 2c  |,-4,-1,2,6,6,28,|
00000100  38 31 2c 2d 34 2c 2d 35  2c 2d 31 2c 31 32 36 2c  |81,-4,-5,-1,126,|
00000110  36 33 0d 00 6e 29 e2 20  34 2c 33 2c 31 2c 2d 32  |63..n). 4,3,1,-2|
00000120  2c 31 2c 31 2c 31 2c 31  2c 31 32 36 2c 2d 31 2c  |,1,1,1,1,126,-1,|
00000130  30 2c 2d 31 2c 31 30 30  2c 36 33 0d 00 78 0b 2a  |0,-1,100,63..x.*|
00000140  46 58 20 39 2c 31 0d 00  82 0c 2a 46 58 20 31 30  |FX 9,1....*FX 10|
00000150  2c 31 0d 00 8c 0b 2a 46  58 20 32 32 35 0d 00 96  |,1....*FX 225...|
00000160  1f e3 20 58 25 3d 30 20  b8 20 33 31 3a 41 25 3d  |.. X%=0 . 31:A%=|
00000170  26 33 30 30 30 2b 36 34  30 2a 58 25 0d 00 a0 20  |&3000+640*X%... |
00000180  58 25 3f 26 43 41 30 3d  41 25 20 81 32 35 36 3a  |X%?&CA0=A% .256:|
00000190  58 25 3f 26 43 43 30 3d  41 25 3a ed 0d 00 aa 1c  |X%?&CC0=A%:.....|
000001a0  54 25 3d 30 3a e3 20 58  25 3d 26 42 30 30 20 b8  |T%=0:. X%=&B00 .|
000001b0  20 26 43 39 43 20 88 34  0d 00 b4 12 f3 21 58 25  | &C9C .4.....!X%|
000001c0  3a 54 25 3d 54 25 2b 21  58 25 0d 00 be 19 ed 3a  |:T%=T%+!X%.....:|
000001d0  21 26 37 35 3d b3 3a 21  26 37 39 3d 26 37 36 38  |!&75=.:!&79=&768|
000001e0  35 35 33 0d 00 c8 3c e7  54 25 3c 3e 26 33 41 38  |553...<.T%<>&3A8|
000001f0  31 36 41 43 37 20 eb 36  3a f1 22 44 61 74 61 20  |16AC7 .6:."Data |
00000200  65 72 72 6f 72 20 2d 20  70 6c 65 61 73 65 20 63  |error - please c|
00000210  68 65 63 6b 20 6c 69 73  74 69 6e 67 22 3a e0 0d  |heck listing":..|
00000220  00 d2 18 f1 8a 34 2c 32  29 22 53 50 45 43 54 52  |.....4,2)"SPECTR|
00000230  41 4d 41 4e 49 41 22 0d  00 dc 19 fb 32 3a f1 8a  |AMANIA".....2:..|
00000240  35 2c 36 29 22 62 79 20  44 20 41 63 74 6f 6e 22  |5,6)"by D Acton"|
00000250  0d 00 e6 18 fb 31 3a f1  8a 36 2c 31 32 29 22 4c  |.....1:..6,12)"L|
00000260  4f 41 44 49 4e 47 2e 22  0d 00 f0 13 ef 20 32 38  |OADING."..... 28|
00000270  2c 31 2c 32 32 2c 31 38  2c 32 30 0d 00 fa 12 d0  |,1,22,18,20.....|
00000280  3d 26 33 30 30 30 3a d7  22 53 50 32 22 0d 01 04  |=&3000:."SP2"...|
00000290  19 dc 20 26 42 30 42 30  46 30 35 30 2c 26 46 30  |.. &B0B0F050,&F0|
000002a0  30 30 35 30 46 30 0d 01  0e 19 dc 20 26 44 30 37  |0050F0..... &D07|
000002b0  30 46 30 46 30 2c 26 46  30 35 30 46 30 46 30 0d  |0F0F0,&F050F0F0.|
000002c0  01 18 19 dc 20 26 45 30  42 30 46 30 46 30 2c 26  |.... &E0B0F0F0,&|
000002d0  46 30 41 30 46 30 46 30  0d 01 22 19 dc 20 26 37  |F0A0F0F0..".. &7|
000002e0  30 37 30 46 30 41 30 2c  26 46 30 30 30 41 30 46  |070F0A0,&F000A0F|
000002f0  30 0d 01 2c 15 dc 20 26  41 30 41 30 41 30 41 30  |0..,.. &A0A0A0A0|
00000300  2c 26 46 30 41 30 0d 01  36 19 dc 20 26 46 30 46  |,&F0A0..6.. &F0F|
00000310  30 46 30 46 30 2c 26 33  30 31 30 31 30 31 30 0d  |0F0F0,&30101010.|
00000320  01 40 19 dc 20 26 46 30  46 30 46 30 46 30 2c 26  |.@.. &F0F0F0F0,&|
00000330  33 30 32 30 32 30 32 30  0d 01 4a 15 dc 20 26 35  |30202020..J.. &5|
00000340  30 35 30 35 30 35 30 2c  26 46 30 35 30 0d 01 54  |0505050,&F050..T|
00000350  19 dc 20 26 31 30 30 30  41 30 35 30 2c 26 33 30  |.. &1000A050,&30|
00000360  33 30 37 30 33 30 0d 01  5e 19 dc 20 26 42 30 42  |307030..^.. &B0B|
00000370  30 41 30 41 30 2c 26 33  30 42 30 33 30 33 30 0d  |0A0A0,&30B03030.|
00000380  01 68 19 dc 20 26 37 30  37 30 35 30 35 30 2c 26  |.h.. &70705050,&|
00000390  33 30 37 30 33 30 33 30  0d 01 72 19 dc 20 26 32  |30703030..r.. &2|
000003a0  30 30 30 35 30 41 30 2c  26 33 30 33 30 42 30 33  |00050A0,&3030B03|
000003b0  30 0d 01 7c 17 dc 20 26  33 30 33 30 36 30 36 30  |0..|.. &30306060|
000003c0  2c 26 31 30 33 30 33 30  0d 01 86 19 dc 20 26 36  |,&103030..... &6|
000003d0  30 33 30 39 30 39 30 2c  26 33 30 36 30 43 30 33  |0309090,&3060C03|
000003e0  30 0d 01 90 19 dc 20 26  39 30 33 30 36 30 36 30  |0..... &90306060|
000003f0  2c 26 33 30 39 30 43 30  33 30 0d 01 9a 17 dc 20  |,&3090C030..... |
00000400  26 33 30 33 30 39 30 39  30 2c 26 32 30 33 30 33  |&30309090,&20303|
00000410  30 0d 01 a4 19 dc 20 26  31 30 30 30 30 30 30 30  |0..... &10000000|
00000420  2c 26 33 30 33 30 33 30  33 30 0d 01 ae 19 dc 20  |,&30303030..... |
00000430  26 46 30 33 30 30 30 30  30 2c 26 42 30 42 30 46  |&F0300000,&B0B0F|
00000440  30 42 30 0d 01 b8 19 dc  20 26 46 30 33 30 30 30  |0B0..... &F03000|
00000450  30 30 2c 26 37 30 37 30  46 30 37 30 0d 01 c2 19  |00,&7070F070....|
00000460  dc 20 26 32 30 30 30 30  30 30 30 2c 26 33 30 33  |. &20000000,&303|
00000470  30 33 30 33 30 0d 01 cc  15 dc 20 26 33 30 33 30  |03030..... &3030|
00000480  33 30 33 30 2c 26 31 30  33 30 0d 01 d6 17 dc 20  |3030,&1030..... |
00000490  26 39 30 39 30 39 30 33  30 2c 26 33 30 43 30 39  |&90909030,&30C09|
000004a0  30 0d 01 e0 17 dc 20 26  36 30 36 30 36 30 33 30  |0..... &60606030|
000004b0  2c 26 33 30 43 30 36 30  0d 01 ea 15 dc 20 26 33  |,&30C060..... &3|
000004c0  30 33 30 33 30 33 30 2c  26 32 30 33 30 0d 01 f4  |0303030,&2030...|
000004d0  19 dc 20 26 46 30 35 30  30 30 30 30 2c 26 45 30  |.. &F0500000,&E0|
000004e0  45 30 45 30 46 30 0d 01  fe 19 dc 20 26 46 30 46  |E0E0F0..... &F0F|
000004f0  30 46 30 30 30 2c 26 33  30 37 30 36 30 33 30 0d  |0F000,&30706030.|
00000500  02 08 19 dc 20 26 46 30  46 30 46 30 30 30 2c 26  |.... &F0F0F000,&|
00000510  33 30 45 30 43 30 33 30  0d 02 12 19 dc 20 26 46  |30E0C030..... &F|
00000520  30 41 30 30 30 30 30 2c  26 37 30 37 30 37 30 37  |0A00000,&7070707|
00000530  30 0d 02 1c 15 dc 20 26  45 30 45 30 45 30 45 30  |0..... &E0E0E0E0|
00000540  2c 26 35 30 46 30 0d 02  26 17 dc 20 26 46 30 37  |,&50F0..&.. &F07|
00000550  30 37 30 36 30 2c 26 46  30 46 30 46 30 0d 02 30  |07060,&F0F0F0..0|
00000560  17 dc 20 26 46 30 46 30  46 30 43 30 2c 26 46 30  |.. &F0F0F0C0,&F0|
00000570  46 30 46 30 0d 02 3a 15  dc 20 26 46 30 46 30 46  |F0F0..:.. &F0F0F|
00000580  30 46 30 2c 26 41 30 46  30 0d 02 44 05 3a 0d 02  |0F0,&A0F0..D.:..|
00000590  4e 19 dc 20 26 37 31 33  35 33 35 32 39 2c 26 31  |N.. &71353529,&1|
000005a0  35 35 31 31 35 33 35 0d  02 58 19 dc 20 26 31 39  |5511535..X.. &19|
000005b0  32 41 32 33 31 35 2c 26  34 32 34 38 30 36 36 31  |2A2315,&42480661|
000005c0  0d 02 62 19 dc 20 26 32  41 33 33 36 31 30 43 2c  |..b.. &2A33610C,|
000005d0  26 32 33 31 43 30 41 32  41 0d 02 6c 19 dc 20 26  |&231C0A2A..l.. &|
000005e0  33 36 32 39 30 36 30 43  2c 26 34 32 31 43 32 41  |3629060C,&421C2A|
000005f0  30 41 0d 02 76 19 dc 20  26 31 35 33 35 37 34 32  |0A..v.. &1535742|
00000600  39 2c 26 33 36 34 38 32  33 35 34 0d 02 80 19 dc  |9,&36482354.....|
00000610  20 26 33 35 36 38 36 32  31 39 2c 26 36 32 31 35  | &35686219,&6215|
00000620  31 35 33 35 0d 02 8a 19  dc 20 26 36 38 30 41 33  |1535..... &680A3|
00000630  33 36 38 2c 26 34 31 34  31 30 39 36 32 0d 02 94  |368,&41410962...|
00000640  17 dc 20 26 41 36 32 36  38 30 33 2c 26 43 32 41  |.. &A626803,&C2A|
00000650  32 41 30 41 0d 02 9e 19  dc 20 26 32 41 30 36 34  |2A0A..... &2A064|
00000660  34 34 34 2c 26 31 43 30  41 30 41 32 41 0d 02 a8  |444,&1C0A0A2A...|
00000670  18 dc 20 26 32 39 32 33  31 35 35 34 2c 26 41 33  |.. &29231554,&A3|
00000680  36 37 34 33 35 0d 02 b2  19 dc 20 26 33 33 36 31  |67435..... &3361|
00000690  33 35 34 38 2c 26 36 31  31 39 32 41 32 41 0d 02  |3548,&61192A2A..|
000006a0  bc 19 dc 20 26 33 35 30  43 34 32 31 35 2c 26 35  |... &350C4215,&5|
000006b0  34 37 34 30 43 33 36 0d  02 c6 0e dc 20 26 36 31  |4740C36..... &61|
000006c0  35 31 43 30 36 0d 02 d0  05 3a 0d 02 da 17 dc 20  |51C06....:..... |
000006d0  26 46 30 43 30 33 30 30  2c 26 32 30 36 30 34 30  |&F0C0300,&206040|
000006e0  30 0d 02 e4 18 dc 20 26  32 30 32 30 32 30 32 2c  |0..... &2020202,|
000006f0  26 32 32 32 41 32 32 32  32 0d 02 ee 19 dc 20 26  |&222A2222..... &|
00000700  32 32 32 41 32 41 32 32  2c 26 32 43 31 34 31 34  |222A2A22,&2C1414|
00000710  45 43 0d 02 f8 18 dc 20  26 32 43 34 34 32 43 34  |EC..... &2C442C4|
00000720  34 2c 26 34 30 35 30 34  30 34 0d 03 02 17 dc 20  |4,&4050404..... |
00000730  26 34 30 35 30 35 30 34  2c 26 31 30 30 30 30 30  |&4050504,&100000|
00000740  39 0d 03 0c 12 dc 20 26  31 30 32 30 31 30 32 2c  |9..... &1020102,|
00000750  30 2c 30 0d 03 16 16 dc  20 26 46 46 46 38 30 30  |0,0..... &FFF800|
00000760  30 30 2c 26 31 30 30 30  32 0d ff                 |00,&10002..|
0000076b
11-08-89/SP1.m0
11-08-89/SP1.m1
11-08-89/SP1.m2
11-08-89/SP1.m4
11-08-89/SP1.m5