Home » Archimedes archive » Acorn User » AU 1994-07.adf » !StarInfo_StarInfo » Borcherds/InsV
Borcherds/InsV
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 User » AU 1994-07.adf » !StarInfo_StarInfo |
| Filename: | Borcherds/InsV |
| Read OK: | ✔ |
| File size: | 010F bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
10REM > InsV 20DIM code 1000 30P%=code 40[OPT2 50ALIGN 60.data 70EQUD 0 80.claim 90STRB R0,data 100MOV PC,R14 110] 120SYS "OS_AddToVector",&14,claim,0 130ONERROR IF ERR=17 THEN GOTO 180 ELSE REPORT:END 140A%=0 150REPEAT B%=?data 160IF A%<>B% THEN PRINTB%:A%=B% 170UNTILINKEY-99 180SYS "OS_Release",&14,claim,0
� > InsV � code 1000 P%=code ( [OPT2 2 ALIGN < .data F EQUD 0 P .claim ZSTRB R0,data dMOV PC,R14 n] x#ș "OS_AddToVector",&14,claim,0 � � � �=17 � � �tt@ � �:� �A%=0 �� B%=?data �� A%<>B% � �B%:A%=B% � ��-99 � ș "OS_Release",&14,claim,0 �
00000000 0d 00 0a 0c f4 20 3e 20 49 6e 73 56 0d 00 14 0f |..... > InsV....| 00000010 de 20 63 6f 64 65 20 31 30 30 30 0d 00 1e 0b 50 |. code 1000....P| 00000020 25 3d 63 6f 64 65 0d 00 28 09 5b 4f 50 54 32 0d |%=code..(.[OPT2.| 00000030 00 32 09 41 4c 49 47 4e 0d 00 3c 09 2e 64 61 74 |.2.ALIGN..<..dat| 00000040 61 0d 00 46 0a 45 51 55 44 20 30 0d 00 50 0a 2e |a..F.EQUD 0..P..| 00000050 63 6c 61 69 6d 0d 00 5a 10 53 54 52 42 20 52 30 |claim..Z.STRB R0| 00000060 2c 64 61 74 61 0d 00 64 0e 4d 4f 56 20 50 43 2c |,data..d.MOV PC,| 00000070 52 31 34 0d 00 6e 05 5d 0d 00 78 23 c8 99 20 22 |R14..n.]..x#.. "| 00000080 4f 53 5f 41 64 64 54 6f 56 65 63 74 6f 72 22 2c |OS_AddToVector",| 00000090 26 31 34 2c 63 6c 61 69 6d 2c 30 0d 00 82 1c ee |&14,claim,0.....| 000000a0 85 20 e7 20 9f 3d 31 37 20 8c 20 e5 20 8d 74 74 |. . .=17 . . .tt| 000000b0 40 20 8b 20 f6 3a e0 0d 00 8c 08 41 25 3d 30 0d |@ . .:.....A%=0.| 000000c0 00 96 0e f5 20 42 25 3d 3f 64 61 74 61 0d 00 a0 |.... B%=?data...| 000000d0 18 e7 20 41 25 3c 3e 42 25 20 8c 20 f1 42 25 3a |.. A%<>B% . .B%:| 000000e0 41 25 3d 42 25 0d 00 aa 09 fd a6 2d 39 39 0d 00 |A%=B%......-99..| 000000f0 b4 1f c8 99 20 22 4f 53 5f 52 65 6c 65 61 73 65 |.... "OS_Release| 00000100 22 2c 26 31 34 2c 63 6c 61 69 6d 2c 30 0d ff |",&14,claim,0..| 0000010f
.