Home » Archimedes archive » Acorn User » AU 1994-12.adf » !Home_HomeWorks » !HomeWorks/!Graphs/!Run
!HomeWorks/!Graphs/!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 1994-12.adf » !Home_HomeWorks |
| Filename: | !HomeWorks/!Graphs/!Run |
| Read OK: | ✔ |
| File size: | 01EF bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
|This_is_a_HomeWorks_application_module |Ident:GRPH |Name:Graphs and Charts |Help:This is the graphs and charts module for Homeworks IconSprites <Obey$Dir>.!Sprites Set File$Type_FA2 HomeWrks WimpSlot -min 800k -max 800k RMEnsure DrawFile 0 RMLoad HomeWorks_Resources:DrawFile RMEnsure ColourPicker 0 RMLoad HomeWorks_Resources:Picker SetMacro ChangeFSISearch$Path %.,<ChangeFSI$Dir>. Set HomeWorks_Graph$Path <Obey$Dir>. Set HomeWorks_Graphs$Path <Obey$Dir>. Run HomeWorks_Graph:!RunImage %*0
00000000 7c 54 68 69 73 5f 69 73 5f 61 5f 48 6f 6d 65 57 ||This_is_a_HomeW| 00000010 6f 72 6b 73 5f 61 70 70 6c 69 63 61 74 69 6f 6e |orks_application| 00000020 5f 6d 6f 64 75 6c 65 0a 7c 49 64 65 6e 74 3a 47 |_module.|Ident:G| 00000030 52 50 48 0a 7c 4e 61 6d 65 3a 47 72 61 70 68 73 |RPH.|Name:Graphs| 00000040 20 61 6e 64 20 43 68 61 72 74 73 0a 7c 48 65 6c | and Charts.|Hel| 00000050 70 3a 54 68 69 73 20 69 73 20 74 68 65 20 67 72 |p:This is the gr| 00000060 61 70 68 73 20 61 6e 64 20 63 68 61 72 74 73 20 |aphs and charts | 00000070 6d 6f 64 75 6c 65 20 66 6f 72 20 48 6f 6d 65 77 |module for Homew| 00000080 6f 72 6b 73 0a 0a 49 63 6f 6e 53 70 72 69 74 65 |orks..IconSprite| 00000090 73 20 3c 4f 62 65 79 24 44 69 72 3e 2e 21 53 70 |s <Obey$Dir>.!Sp| 000000a0 72 69 74 65 73 0a 53 65 74 20 46 69 6c 65 24 54 |rites.Set File$T| 000000b0 79 70 65 5f 46 41 32 20 48 6f 6d 65 57 72 6b 73 |ype_FA2 HomeWrks| 000000c0 0a 57 69 6d 70 53 6c 6f 74 20 2d 6d 69 6e 20 38 |.WimpSlot -min 8| 000000d0 30 30 6b 20 2d 6d 61 78 20 38 30 30 6b 0a 52 4d |00k -max 800k.RM| 000000e0 45 6e 73 75 72 65 20 44 72 61 77 46 69 6c 65 20 |Ensure DrawFile | 000000f0 30 20 52 4d 4c 6f 61 64 20 48 6f 6d 65 57 6f 72 |0 RMLoad HomeWor| 00000100 6b 73 5f 52 65 73 6f 75 72 63 65 73 3a 44 72 61 |ks_Resources:Dra| 00000110 77 46 69 6c 65 0a 52 4d 45 6e 73 75 72 65 20 43 |wFile.RMEnsure C| 00000120 6f 6c 6f 75 72 50 69 63 6b 65 72 20 30 20 52 4d |olourPicker 0 RM| 00000130 4c 6f 61 64 20 48 6f 6d 65 57 6f 72 6b 73 5f 52 |Load HomeWorks_R| 00000140 65 73 6f 75 72 63 65 73 3a 50 69 63 6b 65 72 0a |esources:Picker.| 00000150 53 65 74 4d 61 63 72 6f 20 43 68 61 6e 67 65 46 |SetMacro ChangeF| 00000160 53 49 53 65 61 72 63 68 24 50 61 74 68 20 25 2e |SISearch$Path %.| 00000170 2c 3c 43 68 61 6e 67 65 46 53 49 24 44 69 72 3e |,<ChangeFSI$Dir>| 00000180 2e 0a 53 65 74 20 48 6f 6d 65 57 6f 72 6b 73 5f |..Set HomeWorks_| 00000190 47 72 61 70 68 24 50 61 74 68 20 3c 4f 62 65 79 |Graph$Path <Obey| 000001a0 24 44 69 72 3e 2e 0a 53 65 74 20 48 6f 6d 65 57 |$Dir>..Set HomeW| 000001b0 6f 72 6b 73 5f 47 72 61 70 68 73 24 50 61 74 68 |orks_Graphs$Path| 000001c0 20 3c 4f 62 65 79 24 44 69 72 3e 2e 0a 52 75 6e | <Obey$Dir>..Run| 000001d0 20 48 6f 6d 65 57 6f 72 6b 73 5f 47 72 61 70 68 | HomeWorks_Graph| 000001e0 3a 21 52 75 6e 49 6d 61 67 65 20 25 2a 30 0a |:!RunImage %*0.| 000001ef
.