Home » Archimedes archive » Archimedes World » AW-1993-09.adf » AWSept93 » !AWSept93/Goodies/ThrowBack/Examples/SampleLib/LibExample
!AWSept93/Goodies/ThrowBack/Examples/SampleLib/LibExample
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 » Archimedes World » AW-1993-09.adf » AWSept93 |
| Filename: | !AWSept93/Goodies/ThrowBack/Examples/SampleLib/LibExample |
| Read OK: | ✔ |
| File size: | 0103 bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
10REM --------------------------------- 20REM There is a mistake in the Library 30REM Procedure PROCPrint 40REM --------------------------------- 50ON ERROR PROCError : END 60LIBRARY "SampleLib:Procedures" 70PROCPrint 80END 90: 100DEF PROCError 110ON ERROR OFF 120CHAIN "Edit:Throwback" 130ENDPROC
'� ---------------------------------
'� There is a mistake in the Library
� Procedure PROCPrint
('� ---------------------------------
2� � �Error : �
< ț "SampleLib:Procedures"
F
�Print
P�
Z:
d � �Error
n � � �
x� "Edit:Throwback"
��
� 00000000 0d 00 0a 27 f4 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |...'. ----------|
00000010 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------|
00000020 2d 2d 2d 2d 2d 2d 2d 0d 00 14 27 f4 20 54 68 65 |-------...'. The|
00000030 72 65 20 69 73 20 61 20 6d 69 73 74 61 6b 65 20 |re is a mistake |
00000040 69 6e 20 74 68 65 20 4c 69 62 72 61 72 79 0d 00 |in the Library..|
00000050 1e 19 f4 20 50 72 6f 63 65 64 75 72 65 20 50 52 |... Procedure PR|
00000060 4f 43 50 72 69 6e 74 0d 00 28 27 f4 20 2d 2d 2d |OCPrint..('. ---|
00000070 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------|
00000080 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 00 |--------------..|
00000090 32 12 ee 20 85 20 f2 45 72 72 6f 72 20 3a 20 e0 |2.. . .Error : .|
000000a0 0d 00 3c 1d c8 9b 20 22 53 61 6d 70 6c 65 4c 69 |..<... "SampleLi|
000000b0 62 3a 50 72 6f 63 65 64 75 72 65 73 22 0d 00 46 |b:Procedures"..F|
000000c0 0a f2 50 72 69 6e 74 0d 00 50 05 e0 0d 00 5a 05 |..Print..P....Z.|
000000d0 3a 0d 00 64 0c dd 20 f2 45 72 72 6f 72 0d 00 6e |:..d.. .Error..n|
000000e0 09 ee 20 85 20 87 0d 00 78 16 d7 20 22 45 64 69 |.. . ...x.. "Edi|
000000f0 74 3a 54 68 72 6f 77 62 61 63 6b 22 0d 00 82 05 |t:Throwback"....|
00000100 e1 0d ff |...|
00000103 
.