Home » Personal collection » Acorn ADFS disks » Electron » Paint.ADF » ScreenDump
ScreenDump
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 » Paint.ADF |
Filename: | ScreenDump |
Read OK: | ✔ |
File size: | 0365 bytes |
Load address: | FFFF1D00 |
Exec address: | FFFF8023 |
Duplicates
There are 2 duplicate copies of this file in the archive:
- Personal collection » Acorn ADFS disks » Electron » Autostereograms_1.ADF » 4DUMP2
- Personal collection » Acorn ADFS disks » Electron » Paint.ADF » ScreenDump
- Personal collection » Acorn hard disk » zipped_disks » elk06 » autoster/4DUMP2
File contents
10 code=&B00 20 FOR pass=0 TO 2 STEP 2 30 P%=code 50 [OPT pass:LDA#&FF:STAd2:LDA#3:STAd3:LDA#2:JSR&FFEE:LDX#&1B:JSRprint:LDX#&33:JSRprint:LDX#2:JSRprint 60 .l LDA#3:STAd7:.b LDA#0:STAd1:LDX#&1B:JSR print 70 LDX#&4C:JSR print:LDX#&80:JSR print:LDX#2:JSR print:.d:LDA#4:STAd6:.e LDX#(d0 MOD 256) 80 LDY#(d0 DIV 256):LDA#9:JSR&FFF1:CLC:LDAd4:BEQ f:LDAd3:BMI f:SEC:.f ROLd5:ASL d5:LDAd2:SEC:SBC#6:STAd2:BCS g:DECd3:.g DECd6:BNE e 90 LDXd5:JSR print:CLC:LDA#2:ADCd0:STAd0:BCC h:INCd1:.h LDAd1:CMP#5:BEQ i:LDA#&18:LDX#0:.n CLC:ADCd2:STAd2:BCC o:INCd3:.o CPX#1:BEQl:BCCd:BCSb 100 .i LDX#&A:JSR print:DECd7:BEQ k:LDA#&16:LDX#2:BNEn:.k LDX#&1B:JSR print:LDX#&4A:JSR print:LDX#&12:JSR print:LDA#4:LDX#1:LDYd3:BPLn 110 .j LDA#3:JSR&FFEE:.print LDA#1:JSR&FFEE:TXA:JMP&FFEE 120 .d0 EQUB0:.d1 EQUB0:.d2 EQUB47:.d3 EQUB13:.d4 EQUB0:.d5 EQUB0:.d6 EQUB0:.d7 EQUB0 130 ] 140 NEXT 150 CALLcode
code=&B00 � pass=0 � 2 � 2 P%=code 2h [OPT pass:LDA#&FF:STAd2:LDA#3:STAd3:LDA#2:JSR&FFEE:LDX#&1B:JSRprint:LDX#&33:JSRprint:LDX#2:JSRprint <4 .l LDA#3:STAd7:.b LDA#0:STAd1:LDX#&1B:JSR print FY LDX#&4C:JSR print:LDX#&80:JSR print:LDX#2:JSR print:.d:LDA#4:STAd6:.e LDX#(d0 � 256) P� LDY#(d0 � 256):LDA#9:JSR&FFF1:CLC:LDAd4:BEQ f:LDAd3:BMI f:SEC:.f ROLd5:ASL d5:LDAd2:SEC:SBC#6:STAd2:BCS g:DECd3:.g DECd6:BNE e Z� LDXd5:JSR print:CLC:LDA#2:ADCd0:STAd0:BCC h:INCd1:.h LDAd1:CMP#5:BEQ i:LDA#&18:LDX#0:.n CLC:ADCd2:STAd2:BCC o:INCd3:.o CPX#1:BEQl:BCCd:BCSb d� .i LDX#&A:JSR print:DECd7:BEQ k:LDA#&16:LDX#2:BNEn:.k LDX#&1B:JSR print:LDX#&4A:JSR print:LDX#&12:JSR print:LDA#4:LDX#1:LDYd3:BPLn n9 .j LDA#3:JSR&FFEE:.print LDA#1:JSR&FFEE:TXA:JMP&FFEE xV .d0 EQUB0:.d1 EQUB0:.d2 EQUB47:.d3 EQUB13:.d4 EQUB0:.d5 EQUB0:.d6 EQUB0:.d7 EQUB0 � ] � � � �code �
00000000 0d 00 0a 0e 20 63 6f 64 65 3d 26 42 30 30 0d 00 |.... code=&B00..| 00000010 14 15 20 e3 20 70 61 73 73 3d 30 20 b8 20 32 20 |.. . pass=0 . 2 | 00000020 88 20 32 0d 00 1e 0c 20 50 25 3d 63 6f 64 65 0d |. 2.... P%=code.| 00000030 00 32 68 20 5b 4f 50 54 20 70 61 73 73 3a 4c 44 |.2h [OPT pass:LD| 00000040 41 23 26 46 46 3a 53 54 41 64 32 3a 4c 44 41 23 |A#&FF:STAd2:LDA#| 00000050 33 3a 53 54 41 64 33 3a 4c 44 41 23 32 3a 4a 53 |3:STAd3:LDA#2:JS| 00000060 52 26 46 46 45 45 3a 4c 44 58 23 26 31 42 3a 4a |R&FFEE:LDX#&1B:J| 00000070 53 52 70 72 69 6e 74 3a 4c 44 58 23 26 33 33 3a |SRprint:LDX#&33:| 00000080 4a 53 52 70 72 69 6e 74 3a 4c 44 58 23 32 3a 4a |JSRprint:LDX#2:J| 00000090 53 52 70 72 69 6e 74 0d 00 3c 34 20 2e 6c 20 4c |SRprint..<4 .l L| 000000a0 44 41 23 33 3a 53 54 41 64 37 3a 2e 62 20 4c 44 |DA#3:STAd7:.b LD| 000000b0 41 23 30 3a 53 54 41 64 31 3a 4c 44 58 23 26 31 |A#0:STAd1:LDX#&1| 000000c0 42 3a 4a 53 52 20 70 72 69 6e 74 0d 00 46 59 20 |B:JSR print..FY | 000000d0 4c 44 58 23 26 34 43 3a 4a 53 52 20 70 72 69 6e |LDX#&4C:JSR prin| 000000e0 74 3a 4c 44 58 23 26 38 30 3a 4a 53 52 20 70 72 |t:LDX#&80:JSR pr| 000000f0 69 6e 74 3a 4c 44 58 23 32 3a 4a 53 52 20 70 72 |int:LDX#2:JSR pr| 00000100 69 6e 74 3a 2e 64 3a 4c 44 41 23 34 3a 53 54 41 |int:.d:LDA#4:STA| 00000110 64 36 3a 2e 65 20 4c 44 58 23 28 64 30 20 83 20 |d6:.e LDX#(d0 . | 00000120 32 35 36 29 0d 00 50 83 20 4c 44 59 23 28 64 30 |256)..P. LDY#(d0| 00000130 20 81 20 32 35 36 29 3a 4c 44 41 23 39 3a 4a 53 | . 256):LDA#9:JS| 00000140 52 26 46 46 46 31 3a 43 4c 43 3a 4c 44 41 64 34 |R&FFF1:CLC:LDAd4| 00000150 3a 42 45 51 20 66 3a 4c 44 41 64 33 3a 42 4d 49 |:BEQ f:LDAd3:BMI| 00000160 20 66 3a 53 45 43 3a 2e 66 20 52 4f 4c 64 35 3a | f:SEC:.f ROLd5:| 00000170 41 53 4c 20 64 35 3a 4c 44 41 64 32 3a 53 45 43 |ASL d5:LDAd2:SEC| 00000180 3a 53 42 43 23 36 3a 53 54 41 64 32 3a 42 43 53 |:SBC#6:STAd2:BCS| 00000190 20 67 3a 44 45 43 64 33 3a 2e 67 20 44 45 43 64 | g:DECd3:.g DECd| 000001a0 36 3a 42 4e 45 20 65 0d 00 5a 90 20 4c 44 58 64 |6:BNE e..Z. LDXd| 000001b0 35 3a 4a 53 52 20 70 72 69 6e 74 3a 43 4c 43 3a |5:JSR print:CLC:| 000001c0 4c 44 41 23 32 3a 41 44 43 64 30 3a 53 54 41 64 |LDA#2:ADCd0:STAd| 000001d0 30 3a 42 43 43 20 68 3a 49 4e 43 64 31 3a 2e 68 |0:BCC h:INCd1:.h| 000001e0 20 4c 44 41 64 31 3a 43 4d 50 23 35 3a 42 45 51 | LDAd1:CMP#5:BEQ| 000001f0 20 69 3a 4c 44 41 23 26 31 38 3a 4c 44 58 23 30 | i:LDA#&18:LDX#0| 00000200 3a 2e 6e 20 43 4c 43 3a 41 44 43 64 32 3a 53 54 |:.n CLC:ADCd2:ST| 00000210 41 64 32 3a 42 43 43 20 6f 3a 49 4e 43 64 33 3a |Ad2:BCC o:INCd3:| 00000220 2e 6f 20 43 50 58 23 31 3a 42 45 51 6c 3a 42 43 |.o CPX#1:BEQl:BC| 00000230 43 64 3a 42 43 53 62 0d 00 64 87 20 2e 69 20 4c |Cd:BCSb..d. .i L| 00000240 44 58 23 26 41 3a 4a 53 52 20 70 72 69 6e 74 3a |DX#&A:JSR print:| 00000250 44 45 43 64 37 3a 42 45 51 20 6b 3a 4c 44 41 23 |DECd7:BEQ k:LDA#| 00000260 26 31 36 3a 4c 44 58 23 32 3a 42 4e 45 6e 3a 2e |&16:LDX#2:BNEn:.| 00000270 6b 20 4c 44 58 23 26 31 42 3a 4a 53 52 20 70 72 |k LDX#&1B:JSR pr| 00000280 69 6e 74 3a 4c 44 58 23 26 34 41 3a 4a 53 52 20 |int:LDX#&4A:JSR | 00000290 70 72 69 6e 74 3a 4c 44 58 23 26 31 32 3a 4a 53 |print:LDX#&12:JS| 000002a0 52 20 70 72 69 6e 74 3a 4c 44 41 23 34 3a 4c 44 |R print:LDA#4:LD| 000002b0 58 23 31 3a 4c 44 59 64 33 3a 42 50 4c 6e 0d 00 |X#1:LDYd3:BPLn..| 000002c0 6e 39 20 2e 6a 20 4c 44 41 23 33 3a 4a 53 52 26 |n9 .j LDA#3:JSR&| 000002d0 46 46 45 45 3a 2e 70 72 69 6e 74 20 4c 44 41 23 |FFEE:.print LDA#| 000002e0 31 3a 4a 53 52 26 46 46 45 45 3a 54 58 41 3a 4a |1:JSR&FFEE:TXA:J| 000002f0 4d 50 26 46 46 45 45 0d 00 78 56 20 2e 64 30 20 |MP&FFEE..xV .d0 | 00000300 45 51 55 42 30 3a 2e 64 31 20 45 51 55 42 30 3a |EQUB0:.d1 EQUB0:| 00000310 2e 64 32 20 45 51 55 42 34 37 3a 2e 64 33 20 45 |.d2 EQUB47:.d3 E| 00000320 51 55 42 31 33 3a 2e 64 34 20 45 51 55 42 30 3a |QUB13:.d4 EQUB0:| 00000330 2e 64 35 20 45 51 55 42 30 3a 2e 64 36 20 45 51 |.d5 EQUB0:.d6 EQ| 00000340 55 42 30 3a 2e 64 37 20 45 51 55 42 30 0d 00 82 |UB0:.d7 EQUB0...| 00000350 06 20 5d 0d 00 8c 06 20 ed 0d 00 96 0a 20 d6 63 |. ].... ..... .c| 00000360 6f 64 65 0d ff |ode..| 00000365