Home » Archimedes archive » Acorn User » AU 1997-10 A.adf » Extras » Apple][e/PD/SketchPad/!SketchPad/!Run

Apple][e/PD/SketchPad/!SketchPad/!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 1997-10 A.adf » Extras
Filename: Apple][e/PD/SketchPad/!SketchPad/!Run
Read OK:
File size: 08DB bytes
Load address: 0000
Exec address: 0000
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
Set SketchPad$Dir <Obey$Dir>

RMEnsure UtilityModule 3.10 Error This application is only suitable for use with RISC OS 3.10 or later versions

RMENSURE FilterManager 0.09 RMLoad System:modules.FilterMgr
RMENSURE FilterManager 0.09 Error You Need filter manager 0.09 or later

RMEnsure BorderUtils 0.02 RMEnsure WindowManager 3.17  RMLoad System:modules.BorderUtil

RMENSURE Toolbox    0.00  RMLOAD System:modules.toolbox.toolbox
RMENSURE Toolbox    1.17  ERROR You need toolbox 1.17 or later to run !SketchPad
RMENSURE Window     0.00  RMLOAD System:modules.toolbox.window
RMENSURE Window     1.12  ERROR You need window 1.12 or later to run !SketchPad
RMENSURE Menu       0.00  RMLOAD System:modules.toolbox.menu
RMENSURE Menu       0.13  ERROR You need menu 0.13 or later to run !SketchPad
RMENSURE Iconbar    0.00  RMLOAD System:modules.toolbox.iconbar
RMENSURE Iconbar    1.06  ERROR You need iconbar 1.06 or later to run !SketchPad
RMENSURE ProgInfo   0.00  RMLOAD System:modules.toolbox.proginfo
RMENSURE ProgInfo   0.04  ERROR You need proginfo 0.04 or later to run !SketchPad
RMENSURE DCS        0.00  RMLOAD System:modules.toolbox.dcs_quit
RMENSURE DCS        1.06  ERROR You need dcs 1.06 or later to run !SketchPad
RMENSURE FileInfo   0.00  RMLOAD System:modules.toolbox.fileinfo
RMENSURE FileInfo   0.14  ERROR You need fileinfo 0.14 or later to run !SketchPad
RMENSURE SaveAs     0.00  RMLOAD System:modules.toolbox.saveas
RMENSURE SaveAs     0.12  ERROR You need saveas 0.12 or later to run !SketchPad
RMENSURE Scale      0.00  RMLOAD System:modules.toolbox.scale
RMENSURE Scale      0.11  ERROR You need scale 0.11 or later to run !SketchPad
RMENSURE ColourMenu 0.00  RMLOAD System:modules.toolbox.colourmenu
RMENSURE ColourMenu 0.17  ERROR You need colourmenu 0.17 or later to run !SketchPad
RMENSURE ColourDbox 0.00  RMLOAD System:modules.toolbox.colourdbox
RMENSURE ColourDbox 0.15  ERROR You need colourdbox 0.15 or later to run !SketchPad
RMENSURE FontDbox   0.00  RMLOAD System:modules.toolbox.fontdbox
RMENSURE FontDbox   0.14  ERROR You need fontdbox 0.14 or later to run !SketchPad

If "<Wimp$ScrapDir>"="" THEN Set Wimp$ScrapDir <SketchPad$Dir>.^

Iconsprites <SketchPad$Dir>.!Sprites
wimpslot -min 72K -max 72K
Run <SketchPad$Dir>.!RunImage
00000000  53 65 74 20 53 6b 65 74  63 68 50 61 64 24 44 69  |Set SketchPad$Di|
00000010  72 20 3c 4f 62 65 79 24  44 69 72 3e 0a 0a 52 4d  |r <Obey$Dir>..RM|
00000020  45 6e 73 75 72 65 20 55  74 69 6c 69 74 79 4d 6f  |Ensure UtilityMo|
00000030  64 75 6c 65 20 33 2e 31  30 20 45 72 72 6f 72 20  |dule 3.10 Error |
00000040  54 68 69 73 20 61 70 70  6c 69 63 61 74 69 6f 6e  |This application|
00000050  20 69 73 20 6f 6e 6c 79  20 73 75 69 74 61 62 6c  | is only suitabl|
00000060  65 20 66 6f 72 20 75 73  65 20 77 69 74 68 20 52  |e for use with R|
00000070  49 53 43 20 4f 53 20 33  2e 31 30 20 6f 72 20 6c  |ISC OS 3.10 or l|
00000080  61 74 65 72 20 76 65 72  73 69 6f 6e 73 0a 0a 52  |ater versions..R|
00000090  4d 45 4e 53 55 52 45 20  46 69 6c 74 65 72 4d 61  |MENSURE FilterMa|
000000a0  6e 61 67 65 72 20 30 2e  30 39 20 52 4d 4c 6f 61  |nager 0.09 RMLoa|
000000b0  64 20 53 79 73 74 65 6d  3a 6d 6f 64 75 6c 65 73  |d System:modules|
000000c0  2e 46 69 6c 74 65 72 4d  67 72 0a 52 4d 45 4e 53  |.FilterMgr.RMENS|
000000d0  55 52 45 20 46 69 6c 74  65 72 4d 61 6e 61 67 65  |URE FilterManage|
000000e0  72 20 30 2e 30 39 20 45  72 72 6f 72 20 59 6f 75  |r 0.09 Error You|
000000f0  20 4e 65 65 64 20 66 69  6c 74 65 72 20 6d 61 6e  | Need filter man|
00000100  61 67 65 72 20 30 2e 30  39 20 6f 72 20 6c 61 74  |ager 0.09 or lat|
00000110  65 72 0a 0a 52 4d 45 6e  73 75 72 65 20 42 6f 72  |er..RMEnsure Bor|
00000120  64 65 72 55 74 69 6c 73  20 30 2e 30 32 20 52 4d  |derUtils 0.02 RM|
00000130  45 6e 73 75 72 65 20 57  69 6e 64 6f 77 4d 61 6e  |Ensure WindowMan|
00000140  61 67 65 72 20 33 2e 31  37 20 20 52 4d 4c 6f 61  |ager 3.17  RMLoa|
00000150  64 20 53 79 73 74 65 6d  3a 6d 6f 64 75 6c 65 73  |d System:modules|
00000160  2e 42 6f 72 64 65 72 55  74 69 6c 0a 0a 52 4d 45  |.BorderUtil..RME|
00000170  4e 53 55 52 45 20 54 6f  6f 6c 62 6f 78 20 20 20  |NSURE Toolbox   |
00000180  20 30 2e 30 30 20 20 52  4d 4c 4f 41 44 20 53 79  | 0.00  RMLOAD Sy|
00000190  73 74 65 6d 3a 6d 6f 64  75 6c 65 73 2e 74 6f 6f  |stem:modules.too|
000001a0  6c 62 6f 78 2e 74 6f 6f  6c 62 6f 78 0a 52 4d 45  |lbox.toolbox.RME|
000001b0  4e 53 55 52 45 20 54 6f  6f 6c 62 6f 78 20 20 20  |NSURE Toolbox   |
000001c0  20 31 2e 31 37 20 20 45  52 52 4f 52 20 59 6f 75  | 1.17  ERROR You|
000001d0  20 6e 65 65 64 20 74 6f  6f 6c 62 6f 78 20 31 2e  | need toolbox 1.|
000001e0  31 37 20 6f 72 20 6c 61  74 65 72 20 74 6f 20 72  |17 or later to r|
000001f0  75 6e 20 21 53 6b 65 74  63 68 50 61 64 0a 52 4d  |un !SketchPad.RM|
00000200  45 4e 53 55 52 45 20 57  69 6e 64 6f 77 20 20 20  |ENSURE Window   |
00000210  20 20 30 2e 30 30 20 20  52 4d 4c 4f 41 44 20 53  |  0.00  RMLOAD S|
00000220  79 73 74 65 6d 3a 6d 6f  64 75 6c 65 73 2e 74 6f  |ystem:modules.to|
00000230  6f 6c 62 6f 78 2e 77 69  6e 64 6f 77 0a 52 4d 45  |olbox.window.RME|
00000240  4e 53 55 52 45 20 57 69  6e 64 6f 77 20 20 20 20  |NSURE Window    |
00000250  20 31 2e 31 32 20 20 45  52 52 4f 52 20 59 6f 75  | 1.12  ERROR You|
00000260  20 6e 65 65 64 20 77 69  6e 64 6f 77 20 31 2e 31  | need window 1.1|
00000270  32 20 6f 72 20 6c 61 74  65 72 20 74 6f 20 72 75  |2 or later to ru|
00000280  6e 20 21 53 6b 65 74 63  68 50 61 64 0a 52 4d 45  |n !SketchPad.RME|
00000290  4e 53 55 52 45 20 4d 65  6e 75 20 20 20 20 20 20  |NSURE Menu      |
000002a0  20 30 2e 30 30 20 20 52  4d 4c 4f 41 44 20 53 79  | 0.00  RMLOAD Sy|
000002b0  73 74 65 6d 3a 6d 6f 64  75 6c 65 73 2e 74 6f 6f  |stem:modules.too|
000002c0  6c 62 6f 78 2e 6d 65 6e  75 0a 52 4d 45 4e 53 55  |lbox.menu.RMENSU|
000002d0  52 45 20 4d 65 6e 75 20  20 20 20 20 20 20 30 2e  |RE Menu       0.|
000002e0  31 33 20 20 45 52 52 4f  52 20 59 6f 75 20 6e 65  |13  ERROR You ne|
000002f0  65 64 20 6d 65 6e 75 20  30 2e 31 33 20 6f 72 20  |ed menu 0.13 or |
00000300  6c 61 74 65 72 20 74 6f  20 72 75 6e 20 21 53 6b  |later to run !Sk|
00000310  65 74 63 68 50 61 64 0a  52 4d 45 4e 53 55 52 45  |etchPad.RMENSURE|
00000320  20 49 63 6f 6e 62 61 72  20 20 20 20 30 2e 30 30  | Iconbar    0.00|
00000330  20 20 52 4d 4c 4f 41 44  20 53 79 73 74 65 6d 3a  |  RMLOAD System:|
00000340  6d 6f 64 75 6c 65 73 2e  74 6f 6f 6c 62 6f 78 2e  |modules.toolbox.|
00000350  69 63 6f 6e 62 61 72 0a  52 4d 45 4e 53 55 52 45  |iconbar.RMENSURE|
00000360  20 49 63 6f 6e 62 61 72  20 20 20 20 31 2e 30 36  | Iconbar    1.06|
00000370  20 20 45 52 52 4f 52 20  59 6f 75 20 6e 65 65 64  |  ERROR You need|
00000380  20 69 63 6f 6e 62 61 72  20 31 2e 30 36 20 6f 72  | iconbar 1.06 or|
00000390  20 6c 61 74 65 72 20 74  6f 20 72 75 6e 20 21 53  | later to run !S|
000003a0  6b 65 74 63 68 50 61 64  0a 52 4d 45 4e 53 55 52  |ketchPad.RMENSUR|
000003b0  45 20 50 72 6f 67 49 6e  66 6f 20 20 20 30 2e 30  |E ProgInfo   0.0|
000003c0  30 20 20 52 4d 4c 4f 41  44 20 53 79 73 74 65 6d  |0  RMLOAD System|
000003d0  3a 6d 6f 64 75 6c 65 73  2e 74 6f 6f 6c 62 6f 78  |:modules.toolbox|
000003e0  2e 70 72 6f 67 69 6e 66  6f 0a 52 4d 45 4e 53 55  |.proginfo.RMENSU|
000003f0  52 45 20 50 72 6f 67 49  6e 66 6f 20 20 20 30 2e  |RE ProgInfo   0.|
00000400  30 34 20 20 45 52 52 4f  52 20 59 6f 75 20 6e 65  |04  ERROR You ne|
00000410  65 64 20 70 72 6f 67 69  6e 66 6f 20 30 2e 30 34  |ed proginfo 0.04|
00000420  20 6f 72 20 6c 61 74 65  72 20 74 6f 20 72 75 6e  | or later to run|
00000430  20 21 53 6b 65 74 63 68  50 61 64 0a 52 4d 45 4e  | !SketchPad.RMEN|
00000440  53 55 52 45 20 44 43 53  20 20 20 20 20 20 20 20  |SURE DCS        |
00000450  30 2e 30 30 20 20 52 4d  4c 4f 41 44 20 53 79 73  |0.00  RMLOAD Sys|
00000460  74 65 6d 3a 6d 6f 64 75  6c 65 73 2e 74 6f 6f 6c  |tem:modules.tool|
00000470  62 6f 78 2e 64 63 73 5f  71 75 69 74 0a 52 4d 45  |box.dcs_quit.RME|
00000480  4e 53 55 52 45 20 44 43  53 20 20 20 20 20 20 20  |NSURE DCS       |
00000490  20 31 2e 30 36 20 20 45  52 52 4f 52 20 59 6f 75  | 1.06  ERROR You|
000004a0  20 6e 65 65 64 20 64 63  73 20 31 2e 30 36 20 6f  | need dcs 1.06 o|
000004b0  72 20 6c 61 74 65 72 20  74 6f 20 72 75 6e 20 21  |r later to run !|
000004c0  53 6b 65 74 63 68 50 61  64 0a 52 4d 45 4e 53 55  |SketchPad.RMENSU|
000004d0  52 45 20 46 69 6c 65 49  6e 66 6f 20 20 20 30 2e  |RE FileInfo   0.|
000004e0  30 30 20 20 52 4d 4c 4f  41 44 20 53 79 73 74 65  |00  RMLOAD Syste|
000004f0  6d 3a 6d 6f 64 75 6c 65  73 2e 74 6f 6f 6c 62 6f  |m:modules.toolbo|
00000500  78 2e 66 69 6c 65 69 6e  66 6f 0a 52 4d 45 4e 53  |x.fileinfo.RMENS|
00000510  55 52 45 20 46 69 6c 65  49 6e 66 6f 20 20 20 30  |URE FileInfo   0|
00000520  2e 31 34 20 20 45 52 52  4f 52 20 59 6f 75 20 6e  |.14  ERROR You n|
00000530  65 65 64 20 66 69 6c 65  69 6e 66 6f 20 30 2e 31  |eed fileinfo 0.1|
00000540  34 20 6f 72 20 6c 61 74  65 72 20 74 6f 20 72 75  |4 or later to ru|
00000550  6e 20 21 53 6b 65 74 63  68 50 61 64 0a 52 4d 45  |n !SketchPad.RME|
00000560  4e 53 55 52 45 20 53 61  76 65 41 73 20 20 20 20  |NSURE SaveAs    |
00000570  20 30 2e 30 30 20 20 52  4d 4c 4f 41 44 20 53 79  | 0.00  RMLOAD Sy|
00000580  73 74 65 6d 3a 6d 6f 64  75 6c 65 73 2e 74 6f 6f  |stem:modules.too|
00000590  6c 62 6f 78 2e 73 61 76  65 61 73 0a 52 4d 45 4e  |lbox.saveas.RMEN|
000005a0  53 55 52 45 20 53 61 76  65 41 73 20 20 20 20 20  |SURE SaveAs     |
000005b0  30 2e 31 32 20 20 45 52  52 4f 52 20 59 6f 75 20  |0.12  ERROR You |
000005c0  6e 65 65 64 20 73 61 76  65 61 73 20 30 2e 31 32  |need saveas 0.12|
000005d0  20 6f 72 20 6c 61 74 65  72 20 74 6f 20 72 75 6e  | or later to run|
000005e0  20 21 53 6b 65 74 63 68  50 61 64 0a 52 4d 45 4e  | !SketchPad.RMEN|
000005f0  53 55 52 45 20 53 63 61  6c 65 20 20 20 20 20 20  |SURE Scale      |
00000600  30 2e 30 30 20 20 52 4d  4c 4f 41 44 20 53 79 73  |0.00  RMLOAD Sys|
00000610  74 65 6d 3a 6d 6f 64 75  6c 65 73 2e 74 6f 6f 6c  |tem:modules.tool|
00000620  62 6f 78 2e 73 63 61 6c  65 0a 52 4d 45 4e 53 55  |box.scale.RMENSU|
00000630  52 45 20 53 63 61 6c 65  20 20 20 20 20 20 30 2e  |RE Scale      0.|
00000640  31 31 20 20 45 52 52 4f  52 20 59 6f 75 20 6e 65  |11  ERROR You ne|
00000650  65 64 20 73 63 61 6c 65  20 30 2e 31 31 20 6f 72  |ed scale 0.11 or|
00000660  20 6c 61 74 65 72 20 74  6f 20 72 75 6e 20 21 53  | later to run !S|
00000670  6b 65 74 63 68 50 61 64  0a 52 4d 45 4e 53 55 52  |ketchPad.RMENSUR|
00000680  45 20 43 6f 6c 6f 75 72  4d 65 6e 75 20 30 2e 30  |E ColourMenu 0.0|
00000690  30 20 20 52 4d 4c 4f 41  44 20 53 79 73 74 65 6d  |0  RMLOAD System|
000006a0  3a 6d 6f 64 75 6c 65 73  2e 74 6f 6f 6c 62 6f 78  |:modules.toolbox|
000006b0  2e 63 6f 6c 6f 75 72 6d  65 6e 75 0a 52 4d 45 4e  |.colourmenu.RMEN|
000006c0  53 55 52 45 20 43 6f 6c  6f 75 72 4d 65 6e 75 20  |SURE ColourMenu |
000006d0  30 2e 31 37 20 20 45 52  52 4f 52 20 59 6f 75 20  |0.17  ERROR You |
000006e0  6e 65 65 64 20 63 6f 6c  6f 75 72 6d 65 6e 75 20  |need colourmenu |
000006f0  30 2e 31 37 20 6f 72 20  6c 61 74 65 72 20 74 6f  |0.17 or later to|
00000700  20 72 75 6e 20 21 53 6b  65 74 63 68 50 61 64 0a  | run !SketchPad.|
00000710  52 4d 45 4e 53 55 52 45  20 43 6f 6c 6f 75 72 44  |RMENSURE ColourD|
00000720  62 6f 78 20 30 2e 30 30  20 20 52 4d 4c 4f 41 44  |box 0.00  RMLOAD|
00000730  20 53 79 73 74 65 6d 3a  6d 6f 64 75 6c 65 73 2e  | System:modules.|
00000740  74 6f 6f 6c 62 6f 78 2e  63 6f 6c 6f 75 72 64 62  |toolbox.colourdb|
00000750  6f 78 0a 52 4d 45 4e 53  55 52 45 20 43 6f 6c 6f  |ox.RMENSURE Colo|
00000760  75 72 44 62 6f 78 20 30  2e 31 35 20 20 45 52 52  |urDbox 0.15  ERR|
00000770  4f 52 20 59 6f 75 20 6e  65 65 64 20 63 6f 6c 6f  |OR You need colo|
00000780  75 72 64 62 6f 78 20 30  2e 31 35 20 6f 72 20 6c  |urdbox 0.15 or l|
00000790  61 74 65 72 20 74 6f 20  72 75 6e 20 21 53 6b 65  |ater to run !Ske|
000007a0  74 63 68 50 61 64 0a 52  4d 45 4e 53 55 52 45 20  |tchPad.RMENSURE |
000007b0  46 6f 6e 74 44 62 6f 78  20 20 20 30 2e 30 30 20  |FontDbox   0.00 |
000007c0  20 52 4d 4c 4f 41 44 20  53 79 73 74 65 6d 3a 6d  | RMLOAD System:m|
000007d0  6f 64 75 6c 65 73 2e 74  6f 6f 6c 62 6f 78 2e 66  |odules.toolbox.f|
000007e0  6f 6e 74 64 62 6f 78 0a  52 4d 45 4e 53 55 52 45  |ontdbox.RMENSURE|
000007f0  20 46 6f 6e 74 44 62 6f  78 20 20 20 30 2e 31 34  | FontDbox   0.14|
00000800  20 20 45 52 52 4f 52 20  59 6f 75 20 6e 65 65 64  |  ERROR You need|
00000810  20 66 6f 6e 74 64 62 6f  78 20 30 2e 31 34 20 6f  | fontdbox 0.14 o|
00000820  72 20 6c 61 74 65 72 20  74 6f 20 72 75 6e 20 21  |r later to run !|
00000830  53 6b 65 74 63 68 50 61  64 0a 0a 49 66 20 22 3c  |SketchPad..If "<|
00000840  57 69 6d 70 24 53 63 72  61 70 44 69 72 3e 22 3d  |Wimp$ScrapDir>"=|
00000850  22 22 20 54 48 45 4e 20  53 65 74 20 57 69 6d 70  |"" THEN Set Wimp|
00000860  24 53 63 72 61 70 44 69  72 20 3c 53 6b 65 74 63  |$ScrapDir <Sketc|
00000870  68 50 61 64 24 44 69 72  3e 2e 5e 0a 0a 49 63 6f  |hPad$Dir>.^..Ico|
00000880  6e 73 70 72 69 74 65 73  20 3c 53 6b 65 74 63 68  |nsprites <Sketch|
00000890  50 61 64 24 44 69 72 3e  2e 21 53 70 72 69 74 65  |Pad$Dir>.!Sprite|
000008a0  73 0a 77 69 6d 70 73 6c  6f 74 20 2d 6d 69 6e 20  |s.wimpslot -min |
000008b0  37 32 4b 20 2d 6d 61 78  20 37 32 4b 0a 52 75 6e  |72K -max 72K.Run|
000008c0  20 3c 53 6b 65 74 63 68  50 61 64 24 44 69 72 3e  | <SketchPad$Dir>|
000008d0  2e 21 52 75 6e 49 6d 61  67 65 0a                 |.!RunImage.|
000008db