Fireball/!Fireball2/FBpointer

Home » Archimedes archive » Acorn Computing » 1993 05 Mega Disk.adf » 93_05 » Fireball/!Fireball2/FBpointer

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 » Archimedes archive » Acorn Computing » 1993 05 Mega Disk.adf » 93_05
Filename:	Fireball/!Fireball2/FBpointer
Read OK:	✔
File size:	069E bytes
Load address:	0000
Exec address:	0000

File contents

   10REM >FBpointer
   20REM
   30REM *** FireBall II written by Simon B. Heather 1990 ***
   40REM
   50REM ***    (C)  Cambridge International Software     ***
   60REM
   70DIM blk% 20,data% 256
   80RESTORE 140:READ I$:cx%=INSTR(I$,"*"):FORX%=0TO31:P%=data%+X%*8:READ I$:FORY%=0TO7:Q%=0
   90FORZ%=0TO7 STEP2:N%=(ASCMID$(I$,Y%*4+Z%/2+1,1)-46)<<Z%:Q%=Q%+N%:NEXT:P%?Y%=Q%:NEXT:IFRIGHT$(I$,1)="*" cy%=X%
  100NEXT
  110?blk%=0:blk%?1=2:blk%?2=8:blk%?3=&20:blk%?4=cx%:blk%?5=cy%:blk%!6=data%:SYS "OS_Word",&15,blk%
  120END
  130:
  140DATA ...............*................
  150DATA 11111111111111111111111111111111
  160DATA 1///////1//////1///////1///////1
  170DATA 1//11111111//111//111//1//111111
  180DATA 1//111111.1//1.1//111//1//1111..
  190DATA 1///////1.1//1.1///////1/////1..
  200DATA 1//111111.1//1.1//11//11//1111..
  210DATA 1//1......1//111//11//11//111111
  220DATA 1//1....1//////1//11//11///////1
  230DATA 1111....111111111111111111111111
  240DATA ................................
  250DATA .........11..........11.........
  260DATA ........1001........1001........
  270DATA .........1001......1001.........
  280DATA ..........1001....1001..........
  290DATA ...........11......11...........
  300DATA ...............................*
  310DATA ................................
  320DATA ...........11......11...........
  330DATA ..........1001....1001..........
  340DATA .........1001......1001.........
  350DATA ........1001........1001........
  360DATA .........11..........11.........
  370DATA ................................
  380DATA 11111111111111111111....1111....
  390DATA 1//////11///////1//1....1//1....
  400DATA 1//11//11//111//1//1....1//1....
  410DATA 1//11//11//1.1//1//1....1//1....
  420DATA 1///////1//111//1//1....1//1....
  430DATA 1//111//1///////1//1....1//1....
  440DATA 1//111//1//111//1//111111//11111
  450DATA 1///////1//1.1//1///////1//////1
  460DATA 111111111111.1111111111111111111


� >FBpointer
�
:� *** FireBall II written by Simon B. Heather 1990 ***
(�
2:� ***    (C)  Cambridge International Software     ***
<�
F� blk% 20,data% 256
PE� �tL@:� I$:cx%=�I$,"*"):�X%=0�31:P%=data%+X%*8:� I$:�Y%=0�7:Q%=0
ZW�Z%=0�7 �2:N%=(��I$,Y%*4+Z%/2+1,1)-46)<<Z%:Q%=Q%+N%:�:P%?Y%=Q%:�:��I$,1)="*" cy%=X%
d�
na?blk%=0:blk%?1=2:blk%?2=8:blk%?3=&20:blk%?4=cx%:blk%?5=cy%:blk%!6=data%:ș "OS_Word",&15,blk%
x�
�:
�&� ...............*................
�&� 11111111111111111111111111111111
�&� 1///////1//////1///////1///////1
�&� 1//11111111//111//111//1//111111
�&� 1//111111.1//1.1//111//1//1111..
�&� 1///////1.1//1.1///////1/////1..
�&� 1//111111.1//1.1//11//11//1111..
�&� 1//1......1//111//11//11//111111
�&� 1//1....1//////1//11//11///////1
�&� 1111....111111111111111111111111
�&� ................................
�&� .........11..........11.........
&� ........1001........1001........
&� .........1001......1001.........
&� ..........1001....1001..........
"&� ...........11......11...........
,&� ...............................*
6&� ................................
@&� ...........11......11...........
J&� ..........1001....1001..........
T&� .........1001......1001.........
^&� ........1001........1001........
h&� .........11..........11.........
r&� ................................
|&� 11111111111111111111....1111....
�&� 1//////11///////1//1....1//1....
�&� 1//11//11//111//1//1....1//1....
�&� 1//11//11//1.1//1//1....1//1....
�&� 1///////1//111//1//1....1//1....
�&� 1//111//1///////1//1....1//1....
�&� 1//111//1//111//1//111111//11111
�&� 1///////1//1.1//1///////1//////1
�&� 111111111111.1111111111111111111
�

00000000  0d 00 0a 10 f4 20 3e 46  42 70 6f 69 6e 74 65 72  |..... >FBpointer|
00000010  0d 00 14 05 f4 0d 00 1e  3a f4 20 2a 2a 2a 20 46  |........:. *** F|
00000020  69 72 65 42 61 6c 6c 20  49 49 20 77 72 69 74 74  |ireBall II writt|
00000030  65 6e 20 62 79 20 53 69  6d 6f 6e 20 42 2e 20 48  |en by Simon B. H|
00000040  65 61 74 68 65 72 20 31  39 39 30 20 2a 2a 2a 0d  |eather 1990 ***.|
00000050  00 28 05 f4 0d 00 32 3a  f4 20 2a 2a 2a 20 20 20  |.(....2:. ***   |
00000060  20 28 43 29 20 20 43 61  6d 62 72 69 64 67 65 20  | (C)  Cambridge |
00000070  49 6e 74 65 72 6e 61 74  69 6f 6e 61 6c 20 53 6f  |International So|
00000080  66 74 77 61 72 65 20 20  20 20 20 2a 2a 2a 0d 00  |ftware     ***..|
00000090  3c 05 f4 0d 00 46 17 de  20 62 6c 6b 25 20 32 30  |<....F.. blk% 20|
000000a0  2c 64 61 74 61 25 20 32  35 36 0d 00 50 45 f7 20  |,data% 256..PE. |
000000b0  8d 74 4c 40 3a f3 20 49  24 3a 63 78 25 3d a7 49  |.tL@:. I$:cx%=.I|
000000c0  24 2c 22 2a 22 29 3a e3  58 25 3d 30 b8 33 31 3a  |$,"*"):.X%=0.31:|
000000d0  50 25 3d 64 61 74 61 25  2b 58 25 2a 38 3a f3 20  |P%=data%+X%*8:. |
000000e0  49 24 3a e3 59 25 3d 30  b8 37 3a 51 25 3d 30 0d  |I$:.Y%=0.7:Q%=0.|
000000f0  00 5a 57 e3 5a 25 3d 30  b8 37 20 88 32 3a 4e 25  |.ZW.Z%=0.7 .2:N%|
00000100  3d 28 97 c1 49 24 2c 59  25 2a 34 2b 5a 25 2f 32  |=(..I$,Y%*4+Z%/2|
00000110  2b 31 2c 31 29 2d 34 36  29 3c 3c 5a 25 3a 51 25  |+1,1)-46)<<Z%:Q%|
00000120  3d 51 25 2b 4e 25 3a ed  3a 50 25 3f 59 25 3d 51  |=Q%+N%:.:P%?Y%=Q|
00000130  25 3a ed 3a e7 c2 49 24  2c 31 29 3d 22 2a 22 20  |%:.:..I$,1)="*" |
00000140  63 79 25 3d 58 25 0d 00  64 05 ed 0d 00 6e 61 3f  |cy%=X%..d....na?|
00000150  62 6c 6b 25 3d 30 3a 62  6c 6b 25 3f 31 3d 32 3a  |blk%=0:blk%?1=2:|
00000160  62 6c 6b 25 3f 32 3d 38  3a 62 6c 6b 25 3f 33 3d  |blk%?2=8:blk%?3=|
00000170  26 32 30 3a 62 6c 6b 25  3f 34 3d 63 78 25 3a 62  |&20:blk%?4=cx%:b|
00000180  6c 6b 25 3f 35 3d 63 79  25 3a 62 6c 6b 25 21 36  |lk%?5=cy%:blk%!6|
00000190  3d 64 61 74 61 25 3a c8  99 20 22 4f 53 5f 57 6f  |=data%:.. "OS_Wo|
000001a0  72 64 22 2c 26 31 35 2c  62 6c 6b 25 0d 00 78 05  |rd",&15,blk%..x.|
000001b0  e0 0d 00 82 05 3a 0d 00  8c 26 dc 20 2e 2e 2e 2e  |.....:...&. ....|
000001c0  2e 2e 2e 2e 2e 2e 2e 2e  2e 2e 2e 2a 2e 2e 2e 2e  |...........*....|
000001d0  2e 2e 2e 2e 2e 2e 2e 2e  2e 2e 2e 2e 0d 00 96 26  |...............&|
000001e0  dc 20 31 31 31 31 31 31  31 31 31 31 31 31 31 31  |. 11111111111111|
000001f0  31 31 31 31 31 31 31 31  31 31 31 31 31 31 31 31  |1111111111111111|
00000200  31 31 0d 00 a0 26 dc 20  31 2f 2f 2f 2f 2f 2f 2f  |11...&. 1///////|
00000210  31 2f 2f 2f 2f 2f 2f 31  2f 2f 2f 2f 2f 2f 2f 31  |1//////1///////1|
00000220  2f 2f 2f 2f 2f 2f 2f 31  0d 00 aa 26 dc 20 31 2f  |///////1...&. 1/|
00000230  2f 31 31 31 31 31 31 31  31 2f 2f 31 31 31 2f 2f  |/11111111//111//|
00000240  31 31 31 2f 2f 31 2f 2f  31 31 31 31 31 31 0d 00  |111//1//111111..|
00000250  b4 26 dc 20 31 2f 2f 31  31 31 31 31 31 2e 31 2f  |.&. 1//111111.1/|
00000260  2f 31 2e 31 2f 2f 31 31  31 2f 2f 31 2f 2f 31 31  |/1.1//111//1//11|
00000270  31 31 2e 2e 0d 00 be 26  dc 20 31 2f 2f 2f 2f 2f  |11.....&. 1/////|
00000280  2f 2f 31 2e 31 2f 2f 31  2e 31 2f 2f 2f 2f 2f 2f  |//1.1//1.1//////|
00000290  2f 31 2f 2f 2f 2f 2f 31  2e 2e 0d 00 c8 26 dc 20  |/1/////1.....&. |
000002a0  31 2f 2f 31 31 31 31 31  31 2e 31 2f 2f 31 2e 31  |1//111111.1//1.1|
000002b0  2f 2f 31 31 2f 2f 31 31  2f 2f 31 31 31 31 2e 2e  |//11//11//1111..|
000002c0  0d 00 d2 26 dc 20 31 2f  2f 31 2e 2e 2e 2e 2e 2e  |...&. 1//1......|
000002d0  31 2f 2f 31 31 31 2f 2f  31 31 2f 2f 31 31 2f 2f  |1//111//11//11//|
000002e0  31 31 31 31 31 31 0d 00  dc 26 dc 20 31 2f 2f 31  |111111...&. 1//1|
000002f0  2e 2e 2e 2e 31 2f 2f 2f  2f 2f 2f 31 2f 2f 31 31  |....1//////1//11|
00000300  2f 2f 31 31 2f 2f 2f 2f  2f 2f 2f 31 0d 00 e6 26  |//11///////1...&|
00000310  dc 20 31 31 31 31 2e 2e  2e 2e 31 31 31 31 31 31  |. 1111....111111|
00000320  31 31 31 31 31 31 31 31  31 31 31 31 31 31 31 31  |1111111111111111|
00000330  31 31 0d 00 f0 26 dc 20  2e 2e 2e 2e 2e 2e 2e 2e  |11...&. ........|
00000340  2e 2e 2e 2e 2e 2e 2e 2e  2e 2e 2e 2e 2e 2e 2e 2e  |................|
00000350  2e 2e 2e 2e 2e 2e 2e 2e  0d 00 fa 26 dc 20 2e 2e  |...........&. ..|
00000360  2e 2e 2e 2e 2e 2e 2e 31  31 2e 2e 2e 2e 2e 2e 2e  |.......11.......|
00000370  2e 2e 2e 31 31 2e 2e 2e  2e 2e 2e 2e 2e 2e 0d 01  |...11...........|
00000380  04 26 dc 20 2e 2e 2e 2e  2e 2e 2e 2e 31 30 30 31  |.&. ........1001|
00000390  2e 2e 2e 2e 2e 2e 2e 2e  31 30 30 31 2e 2e 2e 2e  |........1001....|
000003a0  2e 2e 2e 2e 0d 01 0e 26  dc 20 2e 2e 2e 2e 2e 2e  |.......&. ......|
000003b0  2e 2e 2e 31 30 30 31 2e  2e 2e 2e 2e 2e 31 30 30  |...1001......100|
000003c0  31 2e 2e 2e 2e 2e 2e 2e  2e 2e 0d 01 18 26 dc 20  |1............&. |
000003d0  2e 2e 2e 2e 2e 2e 2e 2e  2e 2e 31 30 30 31 2e 2e  |..........1001..|
000003e0  2e 2e 31 30 30 31 2e 2e  2e 2e 2e 2e 2e 2e 2e 2e  |..1001..........|
000003f0  0d 01 22 26 dc 20 2e 2e  2e 2e 2e 2e 2e 2e 2e 2e  |.."&. ..........|
00000400  2e 31 31 2e 2e 2e 2e 2e  2e 31 31 2e 2e 2e 2e 2e  |.11......11.....|
00000410  2e 2e 2e 2e 2e 2e 0d 01  2c 26 dc 20 2e 2e 2e 2e  |........,&. ....|
00000420  2e 2e 2e 2e 2e 2e 2e 2e  2e 2e 2e 2e 2e 2e 2e 2e  |................|
00000430  2e 2e 2e 2e 2e 2e 2e 2e  2e 2e 2e 2a 0d 01 36 26  |...........*..6&|
00000440  dc 20 2e 2e 2e 2e 2e 2e  2e 2e 2e 2e 2e 2e 2e 2e  |. ..............|
00000450  2e 2e 2e 2e 2e 2e 2e 2e  2e 2e 2e 2e 2e 2e 2e 2e  |................|
00000460  2e 2e 0d 01 40 26 dc 20  2e 2e 2e 2e 2e 2e 2e 2e  |....@&. ........|
00000470  2e 2e 2e 31 31 2e 2e 2e  2e 2e 2e 31 31 2e 2e 2e  |...11......11...|
00000480  2e 2e 2e 2e 2e 2e 2e 2e  0d 01 4a 26 dc 20 2e 2e  |..........J&. ..|
00000490  2e 2e 2e 2e 2e 2e 2e 2e  31 30 30 31 2e 2e 2e 2e  |........1001....|
000004a0  31 30 30 31 2e 2e 2e 2e  2e 2e 2e 2e 2e 2e 0d 01  |1001............|
000004b0  54 26 dc 20 2e 2e 2e 2e  2e 2e 2e 2e 2e 31 30 30  |T&. .........100|
000004c0  31 2e 2e 2e 2e 2e 2e 31  30 30 31 2e 2e 2e 2e 2e  |1......1001.....|
000004d0  2e 2e 2e 2e 0d 01 5e 26  dc 20 2e 2e 2e 2e 2e 2e  |......^&. ......|
000004e0  2e 2e 31 30 30 31 2e 2e  2e 2e 2e 2e 2e 2e 31 30  |..1001........10|
000004f0  30 31 2e 2e 2e 2e 2e 2e  2e 2e 0d 01 68 26 dc 20  |01..........h&. |
00000500  2e 2e 2e 2e 2e 2e 2e 2e  2e 31 31 2e 2e 2e 2e 2e  |.........11.....|
00000510  2e 2e 2e 2e 2e 31 31 2e  2e 2e 2e 2e 2e 2e 2e 2e  |.....11.........|
00000520  0d 01 72 26 dc 20 2e 2e  2e 2e 2e 2e 2e 2e 2e 2e  |..r&. ..........|
00000530  2e 2e 2e 2e 2e 2e 2e 2e  2e 2e 2e 2e 2e 2e 2e 2e  |................|
00000540  2e 2e 2e 2e 2e 2e 0d 01  7c 26 dc 20 31 31 31 31  |........|&. 1111|
00000550  31 31 31 31 31 31 31 31  31 31 31 31 31 31 31 31  |1111111111111111|
00000560  2e 2e 2e 2e 31 31 31 31  2e 2e 2e 2e 0d 01 86 26  |....1111.......&|
00000570  dc 20 31 2f 2f 2f 2f 2f  2f 31 31 2f 2f 2f 2f 2f  |. 1//////11/////|
00000580  2f 2f 31 2f 2f 31 2e 2e  2e 2e 31 2f 2f 31 2e 2e  |//1//1....1//1..|
00000590  2e 2e 0d 01 90 26 dc 20  31 2f 2f 31 31 2f 2f 31  |.....&. 1//11//1|
000005a0  31 2f 2f 31 31 31 2f 2f  31 2f 2f 31 2e 2e 2e 2e  |1//111//1//1....|
000005b0  31 2f 2f 31 2e 2e 2e 2e  0d 01 9a 26 dc 20 31 2f  |1//1.......&. 1/|
000005c0  2f 31 31 2f 2f 31 31 2f  2f 31 2e 31 2f 2f 31 2f  |/11//11//1.1//1/|
000005d0  2f 31 2e 2e 2e 2e 31 2f  2f 31 2e 2e 2e 2e 0d 01  |/1....1//1......|
000005e0  a4 26 dc 20 31 2f 2f 2f  2f 2f 2f 2f 31 2f 2f 31  |.&. 1///////1//1|
000005f0  31 31 2f 2f 31 2f 2f 31  2e 2e 2e 2e 31 2f 2f 31  |11//1//1....1//1|
00000600  2e 2e 2e 2e 0d 01 ae 26  dc 20 31 2f 2f 31 31 31  |.......&. 1//111|
00000610  2f 2f 31 2f 2f 2f 2f 2f  2f 2f 31 2f 2f 31 2e 2e  |//1///////1//1..|
00000620  2e 2e 31 2f 2f 31 2e 2e  2e 2e 0d 01 b8 26 dc 20  |..1//1.......&. |
00000630  31 2f 2f 31 31 31 2f 2f  31 2f 2f 31 31 31 2f 2f  |1//111//1//111//|
00000640  31 2f 2f 31 31 31 31 31  31 2f 2f 31 31 31 31 31  |1//111111//11111|
00000650  0d 01 c2 26 dc 20 31 2f  2f 2f 2f 2f 2f 2f 31 2f  |...&. 1///////1/|
00000660  2f 31 2e 31 2f 2f 31 2f  2f 2f 2f 2f 2f 2f 31 2f  |/1.1//1///////1/|
00000670  2f 2f 2f 2f 2f 31 0d 01  cc 26 dc 20 31 31 31 31  |/////1...&. 1111|
00000680  31 31 31 31 31 31 31 31  2e 31 31 31 31 31 31 31  |11111111.1111111|
00000690  31 31 31 31 31 31 31 31  31 31 31 31 0d ff        |111111111111..|
0000069e

Our privacy policy is here.
Last updated: 01 May 2025, 21:49 UTC
Website designed by .