Home » Archimedes archive » Acorn User » AU 1996-01.adf » Regulars » StarInfo/L-Jones/!Quotes/!Run
StarInfo/L-Jones/!Quotes/!Run
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 1996-01.adf » Regulars |
| Filename: | StarInfo/L-Jones/!Quotes/!Run |
| Read OK: | ✔ |
| File size: | 018A bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
| Smart Quotes | The Flying Pig! | 26/7/1995 Version 1.00 IconSprites <Obey$Dir>.!Sprites |RmEnsure SmartQuotes 1.00 Error Please load the SmartQuotes module before running the front end WimpTask <Obey$Dir>.SmartQuote If "<SmartQuotes$Dir>"<>"" Then Error Smart Quotes is already running Set SmartQuotes$Dir <Obey$Dir> WimpSlot -min 24k -max 24k Run <Obey$Dir>.!RunImage UnSet SmartQuotes$Dir
00000000 7c 20 53 6d 61 72 74 20 51 75 6f 74 65 73 0a 7c || Smart Quotes.|| 00000010 20 54 68 65 20 46 6c 79 69 6e 67 20 50 69 67 21 | The Flying Pig!| 00000020 0a 7c 20 32 36 2f 37 2f 31 39 39 35 20 56 65 72 |.| 26/7/1995 Ver| 00000030 73 69 6f 6e 20 31 2e 30 30 0a 0a 49 63 6f 6e 53 |sion 1.00..IconS| 00000040 70 72 69 74 65 73 20 3c 4f 62 65 79 24 44 69 72 |prites <Obey$Dir| 00000050 3e 2e 21 53 70 72 69 74 65 73 0a 7c 52 6d 45 6e |>.!Sprites.|RmEn| 00000060 73 75 72 65 20 53 6d 61 72 74 51 75 6f 74 65 73 |sure SmartQuotes| 00000070 20 31 2e 30 30 20 45 72 72 6f 72 20 50 6c 65 61 | 1.00 Error Plea| 00000080 73 65 20 6c 6f 61 64 20 74 68 65 20 53 6d 61 72 |se load the Smar| 00000090 74 51 75 6f 74 65 73 20 6d 6f 64 75 6c 65 20 62 |tQuotes module b| 000000a0 65 66 6f 72 65 20 72 75 6e 6e 69 6e 67 20 74 68 |efore running th| 000000b0 65 20 66 72 6f 6e 74 20 65 6e 64 0a 57 69 6d 70 |e front end.Wimp| 000000c0 54 61 73 6b 20 3c 4f 62 65 79 24 44 69 72 3e 2e |Task <Obey$Dir>.| 000000d0 53 6d 61 72 74 51 75 6f 74 65 0a 49 66 20 22 3c |SmartQuote.If "<| 000000e0 53 6d 61 72 74 51 75 6f 74 65 73 24 44 69 72 3e |SmartQuotes$Dir>| 000000f0 22 3c 3e 22 22 20 54 68 65 6e 20 45 72 72 6f 72 |"<>"" Then Error| 00000100 20 53 6d 61 72 74 20 51 75 6f 74 65 73 20 69 73 | Smart Quotes is| 00000110 20 61 6c 72 65 61 64 79 20 72 75 6e 6e 69 6e 67 | already running| 00000120 0a 53 65 74 20 53 6d 61 72 74 51 75 6f 74 65 73 |.Set SmartQuotes| 00000130 24 44 69 72 20 3c 4f 62 65 79 24 44 69 72 3e 0a |$Dir <Obey$Dir>.| 00000140 57 69 6d 70 53 6c 6f 74 20 2d 6d 69 6e 20 32 34 |WimpSlot -min 24| 00000150 6b 20 2d 6d 61 78 20 32 34 6b 0a 52 75 6e 20 3c |k -max 24k.Run <| 00000160 4f 62 65 79 24 44 69 72 3e 2e 21 52 75 6e 49 6d |Obey$Dir>.!RunIm| 00000170 61 67 65 0a 55 6e 53 65 74 20 53 6d 61 72 74 51 |age.UnSet SmartQ| 00000180 75 6f 74 65 73 24 44 69 72 0a |uotes$Dir.| 0000018a
.