Home » Archimedes archive » Archimedes World » AW-1993-09.adf » AWSept93 » !AWSept93/Goodies/ThrowBack/Examples/!SampleApp/!RunImage

!AWSept93/Goodies/ThrowBack/Examples/!SampleApp/!RunImage

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/!SampleApp/!RunImage
Read OK:
File size: 00CE bytes
Load address: 0000
Exec address: 0000
File contents
   10ON ERROR PROCError
   20
   30REM > Your Program lines here
   40x="Fred"  : REM !!!!!!!!!!!!Deliberate Mistake
   50END
   60:
   70DEF PROCError
   80ON ERROR OFF
   90*Set Basic$File <SampleApp$BasicFile>
  100CHAIN "Edit:Throwback"
  110ENDPROC
  120
  130

� � �Error

� > Your Program lines here
(0x="Fred"  : � !!!!!!!!!!!!Deliberate Mistake
2�
<:
F� �Error
P	� � �
Z)*Set Basic$File <SampleApp$BasicFile>
d� "Edit:Throwback"
n�
x
�
�
00000000  0d 00 0a 0e ee 20 85 20  f2 45 72 72 6f 72 0d 00  |..... . .Error..|
00000010  14 04 0d 00 1e 1f f4 20  3e 20 59 6f 75 72 20 50  |....... > Your P|
00000020  72 6f 67 72 61 6d 20 6c  69 6e 65 73 20 68 65 72  |rogram lines her|
00000030  65 0d 00 28 30 78 3d 22  46 72 65 64 22 20 20 3a  |e..(0x="Fred"  :|
00000040  20 f4 20 21 21 21 21 21  21 21 21 21 21 21 21 44  | . !!!!!!!!!!!!D|
00000050  65 6c 69 62 65 72 61 74  65 20 4d 69 73 74 61 6b  |eliberate Mistak|
00000060  65 0d 00 32 05 e0 0d 00  3c 05 3a 0d 00 46 0c dd  |e..2....<.:..F..|
00000070  20 f2 45 72 72 6f 72 0d  00 50 09 ee 20 85 20 87  | .Error..P.. . .|
00000080  0d 00 5a 29 2a 53 65 74  20 42 61 73 69 63 24 46  |..Z)*Set Basic$F|
00000090  69 6c 65 20 3c 53 61 6d  70 6c 65 41 70 70 24 42  |ile <SampleApp$B|
000000a0  61 73 69 63 46 69 6c 65  3e 0d 00 64 16 d7 20 22  |asicFile>..d.. "|
000000b0  45 64 69 74 3a 54 68 72  6f 77 62 61 63 6b 22 0d  |Edit:Throwback".|
000000c0  00 6e 05 e1 0d 00 78 04  0d 00 82 04 0d ff        |.n....x.......|
000000ce