Home » Personal collection » Acorn ADFS disks » Electron » Electrolysis.ADF » ANAstore

ANAstore

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 » Electrolysis.ADF
Filename: ANAstore
Read OK:
File size: 0101 bytes
Load address: FFFF1D00
Exec address: FFFF8023
Duplicates

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

File contents
    5 HIMEM=&3000
   10 FORpass=0 TO 2 STEP 2:P%=&A00:[OPTpass
   20 LDA#0:STA&70:LDA#&30:STA&71:.loop LDA#16:LDX#1:JSR&FFF4:LDA#&80:.wait LDX#0:JSR&FFF4:CPY#1:BNEwait:LDX#1:JSR&FFF4:TYA:LDY#0:STA(&70),Y:INC&70:BNEloop:INC&71:LDA&71:CMP#&40:BNEloop
   30 RTS:]:NEXT
   40 CALL&A00
 �=&3000

% �pass=0 � 2 � 2:P%=&A00:[OPTpass
� LDA#0:STA&70:LDA#&30:STA&71:.loop LDA#16:LDX#1:JSR&FFF4:LDA#&80:.wait LDX#0:JSR&FFF4:CPY#1:BNEwait:LDX#1:JSR&FFF4:TYA:LDY#0:STA(&70),Y:INC&70:BNEloop:INC&71:LDA&71:CMP#&40:BNEloop
 RTS:]:�
(
 �&A00
�
00000000  0d 00 05 0c 20 d3 3d 26  33 30 30 30 0d 00 0a 25  |.... .=&3000...%|
00000010  20 e3 70 61 73 73 3d 30  20 b8 20 32 20 88 20 32  | .pass=0 . 2 . 2|
00000020  3a 50 25 3d 26 41 30 30  3a 5b 4f 50 54 70 61 73  |:P%=&A00:[OPTpas|
00000030  73 0d 00 14 b8 20 4c 44  41 23 30 3a 53 54 41 26  |s.... LDA#0:STA&|
00000040  37 30 3a 4c 44 41 23 26  33 30 3a 53 54 41 26 37  |70:LDA#&30:STA&7|
00000050  31 3a 2e 6c 6f 6f 70 20  4c 44 41 23 31 36 3a 4c  |1:.loop LDA#16:L|
00000060  44 58 23 31 3a 4a 53 52  26 46 46 46 34 3a 4c 44  |DX#1:JSR&FFF4:LD|
00000070  41 23 26 38 30 3a 2e 77  61 69 74 20 4c 44 58 23  |A#&80:.wait LDX#|
00000080  30 3a 4a 53 52 26 46 46  46 34 3a 43 50 59 23 31  |0:JSR&FFF4:CPY#1|
00000090  3a 42 4e 45 77 61 69 74  3a 4c 44 58 23 31 3a 4a  |:BNEwait:LDX#1:J|
000000a0  53 52 26 46 46 46 34 3a  54 59 41 3a 4c 44 59 23  |SR&FFF4:TYA:LDY#|
000000b0  30 3a 53 54 41 28 26 37  30 29 2c 59 3a 49 4e 43  |0:STA(&70),Y:INC|
000000c0  26 37 30 3a 42 4e 45 6c  6f 6f 70 3a 49 4e 43 26  |&70:BNEloop:INC&|
000000d0  37 31 3a 4c 44 41 26 37  31 3a 43 4d 50 23 26 34  |71:LDA&71:CMP#&4|
000000e0  30 3a 42 4e 45 6c 6f 6f  70 0d 00 1e 0c 20 52 54  |0:BNEloop.... RT|
000000f0  53 3a 5d 3a ed 0d 00 28  0a 20 d6 26 41 30 30 0d  |S:]:...(. .&A00.|
00000100  ff                                                |.|
00000101
ANAstore.m0
ANAstore.m1
ANAstore.m2
ANAstore.m4
ANAstore.m5