Home » Personal collection » Acorn ADFS disks » Electron » Shipwrecked_2.ADF » TextCH

TextCH

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 » Shipwrecked_2.ADF
Filename: TextCH
Read OK:
File size: 02AC bytes
Load address: FFFF0E00
Exec address: FFFF8023
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
   10MODE2:HIMEM=&1EC0:*DIR:1.SHIP
   20VDU23,1,0;0;0;0;
   30*LO. SHIP2
   40GCOL0,0:MOVE50,770:MOVE830,770:PLOT85,50,850:PLOT85,830,850
   50FORc=1TO4:GCOL0,c
   60READx:IFx=-2THENGOTO90
   70READy,xb,yb:MOVE50+x*26+8*c,850-y*40+4*c:DRAW50+xb*26+8*c,850-yb*40+4*c
   80GOTO60
   90RESTORE:NEXT
  100*SAVE Ship2 1EC0 8000
  110 END
  120DATA0,0,2,0,0,0,0,1,0,1,2,1,2,1,2,2,0,2,2,2
  130DATA3,0,3,2,5,0,5,2,3,1,5,1
  140DATA6,0,6,2
  150DATA7,0,9,0,7,0,7,1,7,1,9,1,9,0,9,1,7,1,7,2
  160DATA10,0,10,2,10,2,12,2,11,1,11,2,12,0,12,2
  170DATA13,0,13,2,13,0,15,0,15,0,15,1,15,1,13,1,13,1,15,2
  180 DATA16,0,18,0,16,0,16,2,16,2,18,2,16,1,17,1
  190DATA19,0,21,0,19,0,19,2,19,2,21,2
  200DATA22,0,22,2,22,1,24,0,22,1,24,2
  210DATA25,0,25,2,25,0,27,0,25,1,26,1,25,2,27,2
  220DATA28,0,30,0,28,2,30,2,29,0,29,2,30,0,30,2,-2

�2:�=&1EC0:*DIR:1.SHIP
�23,1,0;0;0;0;
*LO. SHIP2
(0�0,0:�50,770:�830,770:�85,50,850:�85,830,850
2�c=1�4:�0,c
<�x:�x=-2��DZ@
FB�y,xb,yb:�50+x*26+8*c,850-y*40+4*c:�50+xb*26+8*c,850-yb*40+4*c
P	�T|@
Z�:�
d*SAVE Ship2 1EC0 8000
n �
x,�0,0,2,0,0,0,0,1,0,1,2,1,2,1,2,2,0,2,2,2
��3,0,3,2,5,0,5,2,3,1,5,1
��6,0,6,2
�,�7,0,9,0,7,0,7,1,7,1,9,1,9,0,9,1,7,1,7,2
�,�10,0,10,2,10,2,12,2,11,1,11,2,12,0,12,2
�6�13,0,13,2,13,0,15,0,15,0,15,1,15,1,13,1,13,1,15,2
�- �16,0,18,0,16,0,16,2,16,2,18,2,16,1,17,1
�"�19,0,21,0,19,0,19,2,19,2,21,2
�"�22,0,22,2,22,1,24,0,22,1,24,2
�,�25,0,25,2,25,0,27,0,25,1,26,1,25,2,27,2
�/�28,0,30,0,28,2,30,2,29,0,29,2,30,0,30,2,-2
�
00000000  0d 00 0a 1a eb 32 3a d3  3d 26 31 45 43 30 3a 2a  |.....2:.=&1EC0:*|
00000010  44 49 52 3a 31 2e 53 48  49 50 0d 00 14 12 ef 32  |DIR:1.SHIP.....2|
00000020  33 2c 31 2c 30 3b 30 3b  30 3b 30 3b 0d 00 1e 0e  |3,1,0;0;0;0;....|
00000030  2a 4c 4f 2e 20 53 48 49  50 32 0d 00 28 30 e6 30  |*LO. SHIP2..(0.0|
00000040  2c 30 3a ec 35 30 2c 37  37 30 3a ec 38 33 30 2c  |,0:.50,770:.830,|
00000050  37 37 30 3a f0 38 35 2c  35 30 2c 38 35 30 3a f0  |770:.85,50,850:.|
00000060  38 35 2c 38 33 30 2c 38  35 30 0d 00 32 0f e3 63  |85,830,850..2..c|
00000070  3d 31 b8 34 3a e6 30 2c  63 0d 00 3c 12 f3 78 3a  |=1.4:.0,c..<..x:|
00000080  e7 78 3d 2d 32 8c e5 8d  44 5a 40 0d 00 46 42 f3  |.x=-2...DZ@..FB.|
00000090  79 2c 78 62 2c 79 62 3a  ec 35 30 2b 78 2a 32 36  |y,xb,yb:.50+x*26|
000000a0  2b 38 2a 63 2c 38 35 30  2d 79 2a 34 30 2b 34 2a  |+8*c,850-y*40+4*|
000000b0  63 3a df 35 30 2b 78 62  2a 32 36 2b 38 2a 63 2c  |c:.50+xb*26+8*c,|
000000c0  38 35 30 2d 79 62 2a 34  30 2b 34 2a 63 0d 00 50  |850-yb*40+4*c..P|
000000d0  09 e5 8d 54 7c 40 0d 00  5a 07 f7 3a ed 0d 00 64  |...T|@..Z..:...d|
000000e0  19 2a 53 41 56 45 20 53  68 69 70 32 20 31 45 43  |.*SAVE Ship2 1EC|
000000f0  30 20 38 30 30 30 0d 00  6e 06 20 e0 0d 00 78 2c  |0 8000..n. ...x,|
00000100  dc 30 2c 30 2c 32 2c 30  2c 30 2c 30 2c 30 2c 31  |.0,0,2,0,0,0,0,1|
00000110  2c 30 2c 31 2c 32 2c 31  2c 32 2c 31 2c 32 2c 32  |,0,1,2,1,2,1,2,2|
00000120  2c 30 2c 32 2c 32 2c 32  0d 00 82 1c dc 33 2c 30  |,0,2,2,2.....3,0|
00000130  2c 33 2c 32 2c 35 2c 30  2c 35 2c 32 2c 33 2c 31  |,3,2,5,0,5,2,3,1|
00000140  2c 35 2c 31 0d 00 8c 0c  dc 36 2c 30 2c 36 2c 32  |,5,1.....6,0,6,2|
00000150  0d 00 96 2c dc 37 2c 30  2c 39 2c 30 2c 37 2c 30  |...,.7,0,9,0,7,0|
00000160  2c 37 2c 31 2c 37 2c 31  2c 39 2c 31 2c 39 2c 30  |,7,1,7,1,9,1,9,0|
00000170  2c 39 2c 31 2c 37 2c 31  2c 37 2c 32 0d 00 a0 2c  |,9,1,7,1,7,2...,|
00000180  dc 31 30 2c 30 2c 31 30  2c 32 2c 31 30 2c 32 2c  |.10,0,10,2,10,2,|
00000190  31 32 2c 32 2c 31 31 2c  31 2c 31 31 2c 32 2c 31  |12,2,11,1,11,2,1|
000001a0  32 2c 30 2c 31 32 2c 32  0d 00 aa 36 dc 31 33 2c  |2,0,12,2...6.13,|
000001b0  30 2c 31 33 2c 32 2c 31  33 2c 30 2c 31 35 2c 30  |0,13,2,13,0,15,0|
000001c0  2c 31 35 2c 30 2c 31 35  2c 31 2c 31 35 2c 31 2c  |,15,0,15,1,15,1,|
000001d0  31 33 2c 31 2c 31 33 2c  31 2c 31 35 2c 32 0d 00  |13,1,13,1,15,2..|
000001e0  b4 2d 20 dc 31 36 2c 30  2c 31 38 2c 30 2c 31 36  |.- .16,0,18,0,16|
000001f0  2c 30 2c 31 36 2c 32 2c  31 36 2c 32 2c 31 38 2c  |,0,16,2,16,2,18,|
00000200  32 2c 31 36 2c 31 2c 31  37 2c 31 0d 00 be 22 dc  |2,16,1,17,1...".|
00000210  31 39 2c 30 2c 32 31 2c  30 2c 31 39 2c 30 2c 31  |19,0,21,0,19,0,1|
00000220  39 2c 32 2c 31 39 2c 32  2c 32 31 2c 32 0d 00 c8  |9,2,19,2,21,2...|
00000230  22 dc 32 32 2c 30 2c 32  32 2c 32 2c 32 32 2c 31  |".22,0,22,2,22,1|
00000240  2c 32 34 2c 30 2c 32 32  2c 31 2c 32 34 2c 32 0d  |,24,0,22,1,24,2.|
00000250  00 d2 2c dc 32 35 2c 30  2c 32 35 2c 32 2c 32 35  |..,.25,0,25,2,25|
00000260  2c 30 2c 32 37 2c 30 2c  32 35 2c 31 2c 32 36 2c  |,0,27,0,25,1,26,|
00000270  31 2c 32 35 2c 32 2c 32  37 2c 32 0d 00 dc 2f dc  |1,25,2,27,2.../.|
00000280  32 38 2c 30 2c 33 30 2c  30 2c 32 38 2c 32 2c 33  |28,0,30,0,28,2,3|
00000290  30 2c 32 2c 32 39 2c 30  2c 32 39 2c 32 2c 33 30  |0,2,29,0,29,2,30|
000002a0  2c 30 2c 33 30 2c 32 2c  2d 32 0d ff              |,0,30,2,-2..|
000002ac
TextCH.m0
TextCH.m1
TextCH.m2
TextCH.m4
TextCH.m5