Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_29.ADF » P/SHVLOAD
P/SHVLOAD
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_User_Group » EUG_29.ADF |
Filename: | P/SHVLOAD |
Read OK: | ✔ |
File size: | 0179 bytes |
Load address: | FFFF0E00 |
Exec address: | FFFF802B |
File contents
10REMDIV16 COLOUR MODE 1 LOADER 20*KEY10O.|MG.40|M 30CALL!-4 40: 50ON ERROR PROCerror 60*TV0,1 70MODE1:MODE129 80VDU23,1,0| 90*16C1SRC 100*FX108,0 110*L. SHVPIC1 3000 120*FX108,1 130*L. SHVPIC2 3000 140*FX14,4 150REPEATUNTILFALSE 160DEFPROCerror 170*FX108,0 180*FX113,1 190COLOUR3 200*FX112,2 210PRINT"Interrupted for error ";ERR;" at line ";ERL 220*FX112,1 230VDU11 240PRINT"Interrupted for error ";ERR;" at line ";ERL 250END 260ENDPROC
�16 COLOUR MODE 1 LOADER *KEY10O.|MG.40|M �!-4 (: 2� � �error < *TV0,1 F�1:�129 P�23,1,0| Z*16C1SRC d*FX108,0 n*L. SHVPIC1 3000 x*FX108,1 �*L. SHVPIC2 3000 �*FX14,4 ���� ���error �*FX108,0 �*FX113,1 ��3 �*FX112,2 �-�"Interrupted for error ";�;" at line ";� �*FX112,1 ��11 �-�"Interrupted for error ";�;" at line ";� �� � �
00000000 0d 00 0a 1d f4 81 31 36 20 43 4f 4c 4f 55 52 20 |......16 COLOUR | 00000010 4d 4f 44 45 20 31 20 4c 4f 41 44 45 52 0d 00 14 |MODE 1 LOADER...| 00000020 14 2a 4b 45 59 31 30 4f 2e 7c 4d 47 2e 34 30 7c |.*KEY10O.|MG.40|| 00000030 4d 0d 00 1e 08 d6 21 2d 34 0d 00 28 05 3a 0d 00 |M.....!-4..(.:..| 00000040 32 0e ee 20 85 20 f2 65 72 72 6f 72 0d 00 3c 0a |2.. . .error..<.| 00000050 2a 54 56 30 2c 31 0d 00 46 0b eb 31 3a eb 31 32 |*TV0,1..F..1:.12| 00000060 39 0d 00 50 0c ef 32 33 2c 31 2c 30 7c 0d 00 5a |9..P..23,1,0|..Z| 00000070 0c 2a 31 36 43 31 53 52 43 0d 00 64 0c 2a 46 58 |.*16C1SRC..d.*FX| 00000080 31 30 38 2c 30 0d 00 6e 14 2a 4c 2e 20 53 48 56 |108,0..n.*L. SHV| 00000090 50 49 43 31 20 33 30 30 30 0d 00 78 0c 2a 46 58 |PIC1 3000..x.*FX| 000000a0 31 30 38 2c 31 0d 00 82 14 2a 4c 2e 20 53 48 56 |108,1....*L. SHV| 000000b0 50 49 43 32 20 33 30 30 30 0d 00 8c 0b 2a 46 58 |PIC2 3000....*FX| 000000c0 31 34 2c 34 0d 00 96 07 f5 fd a3 0d 00 a0 0b dd |14,4............| 000000d0 f2 65 72 72 6f 72 0d 00 aa 0c 2a 46 58 31 30 38 |.error....*FX108| 000000e0 2c 30 0d 00 b4 0c 2a 46 58 31 31 33 2c 31 0d 00 |,0....*FX113,1..| 000000f0 be 06 fb 33 0d 00 c8 0c 2a 46 58 31 31 32 2c 32 |...3....*FX112,2| 00000100 0d 00 d2 2d f1 22 49 6e 74 65 72 72 75 70 74 65 |...-."Interrupte| 00000110 64 20 66 6f 72 20 65 72 72 6f 72 20 22 3b 9f 3b |d for error ";.;| 00000120 22 20 61 74 20 6c 69 6e 65 20 22 3b 9e 0d 00 dc |" at line ";....| 00000130 0c 2a 46 58 31 31 32 2c 31 0d 00 e6 07 ef 31 31 |.*FX112,1.....11| 00000140 0d 00 f0 2d f1 22 49 6e 74 65 72 72 75 70 74 65 |...-."Interrupte| 00000150 64 20 66 6f 72 20 65 72 72 6f 72 20 22 3b 9f 3b |d for error ";.;| 00000160 22 20 61 74 20 6c 69 6e 65 20 22 3b 9e 0d 00 fa |" at line ";....| 00000170 05 e0 0d 01 04 05 e1 0d ff |.........| 00000179