Home » Archimedes archive » Acorn User » AU 1998-09.adf » Features » DesktopPD/Director/!Director/Menus/Library/!Core

DesktopPD/Director/!Director/Menus/Library/!Core

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 1998-09.adf » Features
Filename: DesktopPD/Director/!Director/Menus/Library/!Core
Read OK: ✔
File size: 2B38 bytes
Load address: 0000
Exec address: 0000
Duplicates

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

File contents
| Common menu definitions

| Icon numbers

SetEval	WorkArea		&FFFFFFFF
SetEval	BackIcon		&FFFFFFFE
SetEval	CloseIcon		&FFFFFFFD
SetEval	TitleBar		&FFFFFFFC
SetEval	ToggleSizeIcon		&FFFFFFFB
SetEval	ScrollUpArrow		&FFFFFFFA
SetEval	VerticalScrollBar	&FFFFFFF9
SetEval	ScrollDownArrow		&FFFFFFF8
SetEval	AdjustSizeIcon		&FFFFFFF7
SetEval	ScrollLeftArrow		&FFFFFFF6
SetEval	HorizontalScrollBar	&FFFFFFF5
SetEval	ScrollRightArrow	&FFFFFFF4
SetEval	OuterWindowFrame	&FFFFFFF3

SetEval	IconBar			&FFFFFF00

| Colours

SetEval White	0
SetEval Grey1	1
SetEval Grey2	2
SetEval Grey3	3
SetEval Grey4	4
SetEval Grey5	5
SetEval Grey6	6
SetEval Black	7
SetEval Blue	8
SetEval Yellow	9
SetEval Green	10
SetEval Red	11
SetEval Cream	12
SetEval Khaki	13
SetEval Orange	14
SetEval Cyan	15

| Force a screen redraw
Set Alias$RedrawScreen SWI Wimp_Initialise 300 "TASK" "Redraw"|MSWI Wimp_ForceRedraw -1 0 0 &7FFF &7FFF

| Select a new set of window furniture
Set Alias$NewTools ToolSprites %0|MRedrawScreen|M

| Pick an object from a directory and apply a command to it
| TreePick <menu text> <type> <directory> <menu sprite name> <command for each entry>
Set Alias$TreePick IfThereIs -Dir -X %2 "Option ""%0"" -sprite %3 -sub ""Dynamic:/Director:Menus.Files.TreePick -type %1 -dir %2 -command """"%*4"""""""

| Set up

SetEval RISCOS_3.50 -1
RMEnsure UtilityModule 3.50 SetEval RISCOS_3.50 0

MemoriserItems 50

DirectorObey Director:Menus.Files.FileMenu
DirectorObey Director:Menus.System.Chars

DirectorFilter "Title Bar MenuMenu" * "Dynamic:UnSet Director$CurrentLeaf||M/Director:Menus.Files.MenuMenu" -icon TitleBar -select -menu
DirectorFilter "Title Bar Directory" * Path: -icon TitleBar -menu
DirectorFilter "Alt Menu Directory" Filer Path: -menu -alt
DirectorFilter "Pinboard" Pinboard Pinboard -icon WorkArea -menu
DirectorFilter "Close Icon" * "Dynamic:DirectorObey Director:Menus.System.Close" -icon CloseIcon -menu
DirectorFilter "Pinboard Root" Pinboard "Path:<Root$Dir>" -icon WorkArea -menu -select
DirectorFilter "Pinboard Memoriser" Pinboard Memoriser: -adjust -menu
If RISCOS_3.50 Then DirectorFilter "Display Manager�Adjust" "Display Manager" "Mode" -icon IconBar -adjust
If NOT RISCOS_3.50 Then DirectorFilter "Palette Utility Adjust" "Palette Utility" "Mode" -icon IconBar -adjust


|---------------------------------------------------------------------------|

Menu "Director"
	Option "Info" -sub "Info:"
Dash
	Option -path <Director$Dir>
	Option -path <Director$Dir>.!Help
	Option "Menu" -sub CurrentMenu -sprite small_path
	Option -path <Director$Dir>.Menus
	Option -path <Director$Dir>.Utils
Dash
	Option "Menus" -sub "Dynamic:/Director:Menus.Internal.Enumerate -type 0"
|	Option "Displayed" -sub "Dynamic:/Director:Menus.Internal.Enumerate -type 1"
	Option "Icons" -sub "Dynamic:/Director:Menus.Internal.Enumerate -type 2"
	Option "Filters" -sub "Dynamic:/Director:Menus.Internal.Enumerate -type 3"
	Option "Memory" -sub "Dynamic:/Director:Menus.Internal.Memory"
|Dash
|	Option "" -len 64 -sub "GSTrans:|<MenuText>" -fg 13
Dash
	Option "Quit"
		Command Quit:
EndMenu

|---------------------------------------------------------------------------|

Menu "Current�Menu" CurrentMenu
	Option "Edit�'<Director$Init>'"
		Command DirectorEdit Director:Menus.<Director$Init>
	Option "Edit�'Core'"
		Command DirectorEdit Director:Menus.Library.!Core
	Option "Debug"
		Command TaskWindow "DirectorObey Director:Menus.<Director$Init> -v" -quit
	Option "Reload"
		Command DirectorObey Director:Menus.<Director$Init>
EndMenu

|---------------------------------------------------------------------------|

Menu "Desktop"
	Option "Mode" -sub *
	Option "Palette" -sub *
If RISCOS_3.50 Then Option "Font" -sub "Dynamic:Run Director:Menus.System.Fontmenu"
	Option "Tools" -sub *
	Option "BackDrop" -sub *
	Option "Chars" -sub *
	Option "Wimp Sprites" -sub *
	Option "MouseStep" -sub "Mouse"
	Option "Tasks" -sub "Dynamic:/Director:Menus.System.Tasks"
Dash
	Option "Printer Window" -key Print
		Command Filer_OpenDir Printer::$
	Option "Lose Caret" -key �^Insert
		Command TaskWindow "SWI Wimp_SetCaretPosition -1 -1" -quit
	Option "Factor" -sub *
EndMenu

|---------------------------------------------------------------------------|

Menu "System"
	Option "Time" -sub "Dynamic:DirectorObey Director:Menus.System.Time" -key ^�T
	Option "Modules" -sub "Dynamic:/Director:Menus.System.Modules"
	Option "Scrap" -sub "Dynamic:/Director:Menus.Files.ExplodeDir -dir <Wimp$ScrapDir> -title ScrapDir -sub Director:Menus.Files.ScrapDir -add Purge -do Director:Menus.Files.ScrapPurge"
	Option "Variables" -sub *
Dash
	Option "ScreenBlank" -sub "*" -key ^F11
		Command "SWI ScreenBlanker_Control 0"
	Option "Hourglass Off"
		Command SWI Hourglass_Smash
	Option "Reset SysFont"
		Command fx 20|MRedrawScreen
EndMenu

|---------------------------------------------------------------------------|

Menu "Filing"
	Option "Open Files" -key �^[ -sub "Dynamic:/Director:Menus.System.Openfiles"
	Option "Close Files" -key �^]
		Command SWI "OS_FSControl" 22|MSWI "Sound_Control" 1 -15 220 1|M
	Option "Biggest files"
		Command TaskWindow "Biggest -n 100" -quit -wimpslot 128k -name Biggest
	Option "Biggest dirs"
		Command TaskWindow "Biggest -d" -quit -wimpslot 128k -name Biggest
	Option "Eject CD"
		Command "Filer_CloseDir CDFS:|M-CDFS-Eject"	
	Option "Set CSD" -key ^Tab
		Command DirectorMouseDir a|MIf "|<a>"<>"" Then Dir |<a>|MIf "|<a>"<>"" Then SWI "Sound_Control" 1 -15 147 1
	Option "Close Filers" -key �^F11
		Command Filer_CloseDir adfs:|MFiler_CloseDir cdfs:|MFiler_CloseDir scsi:|MFiler_CloseDir mofs:|MFiler_CloseDir spfs
	Option "No spin down"
		Command SWI ADFS_PowerControl 1 4 0
	If "<Director$Key$Memoriser>" = "" Then Set Director$Key$Memoriser �^Tab
	Option "Memoriser" -sub "*" -key <Director$Key$Memoriser>
EndMenu

|---------------------------------------------------------------------------|

If RISCOS_3.50 Then MenuProcessing 0
Menu "Mode"
	Option "0  - 640 x 256"
		Command WimpMode 0
	Option "12 - 640 x 256"
		Command WimpMode 12
	Option "13 - 320 x 256"
		Command WimpMode 13
	Option "20 - 640 x 512"
		Command WimpMode 20
	Option "15 - 640 x 256"
		Command WimpMode 15
	Option "21 - 640 x 512"
		Command WimpMode 21
	Option "27 - 640 x 480"
		Command WimpMode 27
	Option "31 - 800 x 600"
		Command WimpMode 31
	Option "28 - 640 x 480"
		Command WimpMode 28
	Option "31 - 800 x 600"
		Command WimpMode 31
Dash
	Option "" -len 16
		Command WimpMode <MenuText>
EndMenu
MenuProcessing 1

If NOT RISCOS_3.50 Then MenuProcessing 0
Menu "Mode" -key M
	Option "XxY" -sub "Dynamic:/Director:Menus.Modes.ByXxY"
Dash
	Option "2" -sub "Dynamic:/Director:Menus.Modes.ByColour -lbpp 0"
	Option "4" -sub "Dynamic:/Director:Menus.Modes.ByColour -lbpp 1"
	Option "16" -sub "Dynamic:/Director:Menus.Modes.ByColour -lbpp 2"
	Option "256" -sub "Dynamic:/Director:Menus.Modes.ByColour -lbpp 3"
	Option "32K" -sub "Dynamic:/Director:Menus.Modes.ByColour -lbpp 4"
	Option "16M" -sub "Dynamic:/Director:Menus.Modes.ByColour -lbpp 5"
Dash
	Option "16 Col"
		Command WimpMode  X1280 Y1024 C16
	Option "256 Col"
		Command WimpMode  X1280 Y1024 C256
	Option "32K Col"
		Command WimpMode  X1184 Y885 C32T
	Option "16M Col"
		Command WimpMode  X832 Y630 C16M
	Option "256 SVGA"
		Command "WimpMode X800 Y600 C256"
	Option "256 VGA"
		Command "WimpMode X640 Y480 C256"
Dash
	Option "" -len 32
		Command WimpMode <MenuText>
EndMenu
MenuProcessing 1

|---------------------------------------------------------------------------|

Menu "Memoriser"
	Option Files -sub "Memoriser:4"
	Option Dirs -sub "Memoriser:2"
	Option Apps -sub "Memoriser:1"
Dash
	Option All -sub "Memoriser:"
Dash
	Option Save
		Command MemoriserSave Director:Memory
	Option Load
		Command MemoriserLoad Director:Memory
	Option Edit
		Command DirectorEdit Director:Memory
EndMenu

|---------------------------------------------------------------------------|

| Provides the value of a variable as a writable menu option

Set Alias$VarVal Set Director$Menu Value|MMenu |"|"Value -temp|MOption "|<%0>" -len 256|MIf "%1"<>"" Then Option "%1" -sub "Dynamic:/Director:Menus.System.ExpPath %1"|MCommand Set %0 |<MenuText|>|MEndMenu|M

| A neater way of adding options to the 'variables' menu

Set Alias$ListVar Option |"%0|" -sub |"Dynamic:/Director:Menus.System.Variables -match %0 -not %1|"

Menu Variables
	ListVar *
	ListVar Sys$*
	ListVar *Director*
Dash
	ListVar *$Dir
	ListVar *$Path
	ListVar FileSwitch$*
Dash
	ListVar Alias$* @
Dash
	ListVar File$Type*
	ListVar Alias$@LoadType*
	ListVar Alias$@RunType*
	ListVar *Options
Dash
	Option "" -len 32  -sub "Dynamic:/Director:Menus.System.Variables -match |<MenuText>" -bg 1
EndMenu

|---------------------------------------------------------------------------|

Menu "Mouse"
	Option "8 "
		Command Set OWB$ "|<2>|<8>|<8>|<0>"|MSWI OS_Word 21 |<OWB$>|MUnSet OWB$
	Option "6 "
		Command Set OWB$ "|<2>|<6>|<6>|<0>"|MSWI OS_Word 21 |<OWB$>|MUnSet OWB$
	Option "4 "
		Command Set OWB$ "|<2>|<4>|<4>|<0>"|MSWI OS_Word 21 |<OWB$>|MUnSet OWB$
	Option "2" -len 3 -bg 1
		Command Set OWB$ "|<2>|<<MenuText>>|<<MenuText>>|<0>"|MSWI OS_Word 21 |<OWB$>|MUnSet OWB$
EndMenu

|---------------------------------------------------------------------------|

Menu ScreenBlank
	Option "Blank now"
		Command "SWI ScreenBlanker_Control 0"
	Option "Off"
		Command "BlankTime 0"
	Option "1 Min"
		Command "BlankTime 60"
	Option "5 Mins"
		Command "BlankTime 300"
	Option "10 Mins"
		Command "BlankTime 600"
EndMenu

|---------------------------------------------------------------------------|

Menu "Wimp Sprites"
	Option "RAM"
		Command SWI Wimp_BaseOfSprites TO rom rma|MSWI OS_SpriteOp &10C |<rma> "<Wimp$Scrap>"|MFiler_Run <Wimp$Scrap>
	Option "ROM"
		Command SWI Wimp_BaseOfSprites TO rom rma|MSWI OS_SpriteOp &10C |<rom> "<Wimp$Scrap>"|MFiler_Run <Wimp$Scrap>
EndMenu

|---------------------------------------------------------------------------|

Menu "Backdrop"
	Option "Default"
		Command Filer_Run Boot:Choices.Boot.Tasks.Configure
	Option "Remove"
		Command Backdrop -remove
	TreePick Textures Sprite Boot:Resources.Configure.Textures small_dir Backdrop -tile %0
	TreePick Others... Sprite Root:Oddments.Backdrops small_dir Backdrop -tile %0
EndMenu

|---------------------------------------------------------------------------|

Menu "Tools"
	Option "3D"
		Command NewTools Resources:$.Resources.Wimp.Tools
	Option "2D"
		Command NewTools Boot:Resources.Configure.2DTools
	TreePick Others... Sprite Root:Oddments.ToolSprites small_dir NewTools %0
EndMenu

|---------------------------------------------------------------------------|

Menu "Palette"
	IfThereIs -File -X Boot:Choices.Palette "Option Default -path Boot:Choices.Palette"
	IfThereIs -File -X Boot:Palette.Default "Option Default -path Boot:Palette.Default"
	IfThereIs -Dir -X Boot:Palette "Option Palette -sub Path:Boot:Palette"
EndMenu

|---------------------------------------------------------------------------|

Menu "Factor"
	Option "" -len 10 -sub "Dynamic:/Director:Menus.System.Factor -n |<MenuText>"
EndMenu


00000000  7c 20 43 6f 6d 6d 6f 6e  20 6d 65 6e 75 20 64 65  || Common menu de|
00000010  66 69 6e 69 74 69 6f 6e  73 0a 0a 7c 20 49 63 6f  |finitions..| Ico|
00000020  6e 20 6e 75 6d 62 65 72  73 0a 0a 53 65 74 45 76  |n numbers..SetEv|
00000030  61 6c 09 57 6f 72 6b 41  72 65 61 09 09 26 46 46  |al.WorkArea..&FF|
00000040  46 46 46 46 46 46 0a 53  65 74 45 76 61 6c 09 42  |FFFFFF.SetEval.B|
00000050  61 63 6b 49 63 6f 6e 09  09 26 46 46 46 46 46 46  |ackIcon..&FFFFFF|
00000060  46 45 0a 53 65 74 45 76  61 6c 09 43 6c 6f 73 65  |FE.SetEval.Close|
00000070  49 63 6f 6e 09 09 26 46  46 46 46 46 46 46 44 0a  |Icon..&FFFFFFFD.|
00000080  53 65 74 45 76 61 6c 09  54 69 74 6c 65 42 61 72  |SetEval.TitleBar|
00000090  09 09 26 46 46 46 46 46  46 46 43 0a 53 65 74 45  |..&FFFFFFFC.SetE|
000000a0  76 61 6c 09 54 6f 67 67  6c 65 53 69 7a 65 49 63  |val.ToggleSizeIc|
000000b0  6f 6e 09 09 26 46 46 46  46 46 46 46 42 0a 53 65  |on..&FFFFFFFB.Se|
000000c0  74 45 76 61 6c 09 53 63  72 6f 6c 6c 55 70 41 72  |tEval.ScrollUpAr|
000000d0  72 6f 77 09 09 26 46 46  46 46 46 46 46 41 0a 53  |row..&FFFFFFFA.S|
000000e0  65 74 45 76 61 6c 09 56  65 72 74 69 63 61 6c 53  |etEval.VerticalS|
000000f0  63 72 6f 6c 6c 42 61 72  09 26 46 46 46 46 46 46  |crollBar.&FFFFFF|
00000100  46 39 0a 53 65 74 45 76  61 6c 09 53 63 72 6f 6c  |F9.SetEval.Scrol|
00000110  6c 44 6f 77 6e 41 72 72  6f 77 09 09 26 46 46 46  |lDownArrow..&FFF|
00000120  46 46 46 46 38 0a 53 65  74 45 76 61 6c 09 41 64  |FFFF8.SetEval.Ad|
00000130  6a 75 73 74 53 69 7a 65  49 63 6f 6e 09 09 26 46  |justSizeIcon..&F|
00000140  46 46 46 46 46 46 37 0a  53 65 74 45 76 61 6c 09  |FFFFFF7.SetEval.|
00000150  53 63 72 6f 6c 6c 4c 65  66 74 41 72 72 6f 77 09  |ScrollLeftArrow.|
00000160  09 26 46 46 46 46 46 46  46 36 0a 53 65 74 45 76  |.&FFFFFFF6.SetEv|
00000170  61 6c 09 48 6f 72 69 7a  6f 6e 74 61 6c 53 63 72  |al.HorizontalScr|
00000180  6f 6c 6c 42 61 72 09 26  46 46 46 46 46 46 46 35  |ollBar.&FFFFFFF5|
00000190  0a 53 65 74 45 76 61 6c  09 53 63 72 6f 6c 6c 52  |.SetEval.ScrollR|
000001a0  69 67 68 74 41 72 72 6f  77 09 26 46 46 46 46 46  |ightArrow.&FFFFF|
000001b0  46 46 34 0a 53 65 74 45  76 61 6c 09 4f 75 74 65  |FF4.SetEval.Oute|
000001c0  72 57 69 6e 64 6f 77 46  72 61 6d 65 09 26 46 46  |rWindowFrame.&FF|
000001d0  46 46 46 46 46 33 0a 0a  53 65 74 45 76 61 6c 09  |FFFFF3..SetEval.|
000001e0  49 63 6f 6e 42 61 72 09  09 09 26 46 46 46 46 46  |IconBar...&FFFFF|
000001f0  46 30 30 0a 0a 7c 20 43  6f 6c 6f 75 72 73 0a 0a  |F00..| Colours..|
00000200  53 65 74 45 76 61 6c 20  57 68 69 74 65 09 30 0a  |SetEval White.0.|
00000210  53 65 74 45 76 61 6c 20  47 72 65 79 31 09 31 0a  |SetEval Grey1.1.|
00000220  53 65 74 45 76 61 6c 20  47 72 65 79 32 09 32 0a  |SetEval Grey2.2.|
00000230  53 65 74 45 76 61 6c 20  47 72 65 79 33 09 33 0a  |SetEval Grey3.3.|
00000240  53 65 74 45 76 61 6c 20  47 72 65 79 34 09 34 0a  |SetEval Grey4.4.|
00000250  53 65 74 45 76 61 6c 20  47 72 65 79 35 09 35 0a  |SetEval Grey5.5.|
00000260  53 65 74 45 76 61 6c 20  47 72 65 79 36 09 36 0a  |SetEval Grey6.6.|
00000270  53 65 74 45 76 61 6c 20  42 6c 61 63 6b 09 37 0a  |SetEval Black.7.|
00000280  53 65 74 45 76 61 6c 20  42 6c 75 65 09 38 0a 53  |SetEval Blue.8.S|
00000290  65 74 45 76 61 6c 20 59  65 6c 6c 6f 77 09 39 0a  |etEval Yellow.9.|
000002a0  53 65 74 45 76 61 6c 20  47 72 65 65 6e 09 31 30  |SetEval Green.10|
000002b0  0a 53 65 74 45 76 61 6c  20 52 65 64 09 31 31 0a  |.SetEval Red.11.|
000002c0  53 65 74 45 76 61 6c 20  43 72 65 61 6d 09 31 32  |SetEval Cream.12|
000002d0  0a 53 65 74 45 76 61 6c  20 4b 68 61 6b 69 09 31  |.SetEval Khaki.1|
000002e0  33 0a 53 65 74 45 76 61  6c 20 4f 72 61 6e 67 65  |3.SetEval Orange|
000002f0  09 31 34 0a 53 65 74 45  76 61 6c 20 43 79 61 6e  |.14.SetEval Cyan|
00000300  09 31 35 0a 0a 7c 20 46  6f 72 63 65 20 61 20 73  |.15..| Force a s|
00000310  63 72 65 65 6e 20 72 65  64 72 61 77 0a 53 65 74  |creen redraw.Set|
00000320  20 41 6c 69 61 73 24 52  65 64 72 61 77 53 63 72  | Alias$RedrawScr|
00000330  65 65 6e 20 53 57 49 20  57 69 6d 70 5f 49 6e 69  |een SWI Wimp_Ini|
00000340  74 69 61 6c 69 73 65 20  33 30 30 20 22 54 41 53  |tialise 300 "TAS|
00000350  4b 22 20 22 52 65 64 72  61 77 22 7c 4d 53 57 49  |K" "Redraw"|MSWI|
00000360  20 57 69 6d 70 5f 46 6f  72 63 65 52 65 64 72 61  | Wimp_ForceRedra|
00000370  77 20 2d 31 20 30 20 30  20 26 37 46 46 46 20 26  |w -1 0 0 &7FFF &|
00000380  37 46 46 46 0a 0a 7c 20  53 65 6c 65 63 74 20 61  |7FFF..| Select a|
00000390  20 6e 65 77 20 73 65 74  20 6f 66 20 77 69 6e 64  | new set of wind|
000003a0  6f 77 20 66 75 72 6e 69  74 75 72 65 0a 53 65 74  |ow furniture.Set|
000003b0  20 41 6c 69 61 73 24 4e  65 77 54 6f 6f 6c 73 20  | Alias$NewTools |
000003c0  54 6f 6f 6c 53 70 72 69  74 65 73 20 25 30 7c 4d  |ToolSprites %0|M|
000003d0  52 65 64 72 61 77 53 63  72 65 65 6e 7c 4d 0a 0a  |RedrawScreen|M..|
000003e0  7c 20 50 69 63 6b 20 61  6e 20 6f 62 6a 65 63 74  || Pick an object|
000003f0  20 66 72 6f 6d 20 61 20  64 69 72 65 63 74 6f 72  | from a director|
00000400  79 20 61 6e 64 20 61 70  70 6c 79 20 61 20 63 6f  |y and apply a co|
00000410  6d 6d 61 6e 64 20 74 6f  20 69 74 0a 7c 20 54 72  |mmand to it.| Tr|
00000420  65 65 50 69 63 6b 20 3c  6d 65 6e 75 20 74 65 78  |eePick <menu tex|
00000430  74 3e 20 3c 74 79 70 65  3e 20 3c 64 69 72 65 63  |t> <type> <direc|
00000440  74 6f 72 79 3e 20 3c 6d  65 6e 75 20 73 70 72 69  |tory> <menu spri|
00000450  74 65 20 6e 61 6d 65 3e  20 3c 63 6f 6d 6d 61 6e  |te name> <comman|
00000460  64 20 66 6f 72 20 65 61  63 68 20 65 6e 74 72 79  |d for each entry|
00000470  3e 0a 53 65 74 20 41 6c  69 61 73 24 54 72 65 65  |>.Set Alias$Tree|
00000480  50 69 63 6b 20 49 66 54  68 65 72 65 49 73 20 2d  |Pick IfThereIs -|
00000490  44 69 72 20 2d 58 20 25  32 20 22 4f 70 74 69 6f  |Dir -X %2 "Optio|
000004a0  6e 20 22 22 25 30 22 22  20 2d 73 70 72 69 74 65  |n ""%0"" -sprite|
000004b0  20 25 33 20 2d 73 75 62  20 22 22 44 79 6e 61 6d  | %3 -sub ""Dynam|
000004c0  69 63 3a 2f 44 69 72 65  63 74 6f 72 3a 4d 65 6e  |ic:/Director:Men|
000004d0  75 73 2e 46 69 6c 65 73  2e 54 72 65 65 50 69 63  |us.Files.TreePic|
000004e0  6b 20 2d 74 79 70 65 20  25 31 20 2d 64 69 72 20  |k -type %1 -dir |
000004f0  25 32 20 2d 63 6f 6d 6d  61 6e 64 20 22 22 22 22  |%2 -command """"|
00000500  25 2a 34 22 22 22 22 22  22 22 0a 0a 7c 20 53 65  |%*4"""""""..| Se|
00000510  74 20 75 70 0a 0a 53 65  74 45 76 61 6c 20 52 49  |t up..SetEval RI|
00000520  53 43 4f 53 5f 33 2e 35  30 20 2d 31 0a 52 4d 45  |SCOS_3.50 -1.RME|
00000530  6e 73 75 72 65 20 55 74  69 6c 69 74 79 4d 6f 64  |nsure UtilityMod|
00000540  75 6c 65 20 33 2e 35 30  20 53 65 74 45 76 61 6c  |ule 3.50 SetEval|
00000550  20 52 49 53 43 4f 53 5f  33 2e 35 30 20 30 0a 0a  | RISCOS_3.50 0..|
00000560  4d 65 6d 6f 72 69 73 65  72 49 74 65 6d 73 20 35  |MemoriserItems 5|
00000570  30 0a 0a 44 69 72 65 63  74 6f 72 4f 62 65 79 20  |0..DirectorObey |
00000580  44 69 72 65 63 74 6f 72  3a 4d 65 6e 75 73 2e 46  |Director:Menus.F|
00000590  69 6c 65 73 2e 46 69 6c  65 4d 65 6e 75 0a 44 69  |iles.FileMenu.Di|
000005a0  72 65 63 74 6f 72 4f 62  65 79 20 44 69 72 65 63  |rectorObey Direc|
000005b0  74 6f 72 3a 4d 65 6e 75  73 2e 53 79 73 74 65 6d  |tor:Menus.System|
000005c0  2e 43 68 61 72 73 0a 0a  44 69 72 65 63 74 6f 72  |.Chars..Director|
000005d0  46 69 6c 74 65 72 20 22  54 69 74 6c 65 20 42 61  |Filter "Title Ba|
000005e0  72 20 4d 65 6e 75 4d 65  6e 75 22 20 2a 20 22 44  |r MenuMenu" * "D|
000005f0  79 6e 61 6d 69 63 3a 55  6e 53 65 74 20 44 69 72  |ynamic:UnSet Dir|
00000600  65 63 74 6f 72 24 43 75  72 72 65 6e 74 4c 65 61  |ector$CurrentLea|
00000610  66 7c 7c 4d 2f 44 69 72  65 63 74 6f 72 3a 4d 65  |f||M/Director:Me|
00000620  6e 75 73 2e 46 69 6c 65  73 2e 4d 65 6e 75 4d 65  |nus.Files.MenuMe|
00000630  6e 75 22 20 2d 69 63 6f  6e 20 54 69 74 6c 65 42  |nu" -icon TitleB|
00000640  61 72 20 2d 73 65 6c 65  63 74 20 2d 6d 65 6e 75  |ar -select -menu|
00000650  0a 44 69 72 65 63 74 6f  72 46 69 6c 74 65 72 20  |.DirectorFilter |
00000660  22 54 69 74 6c 65 20 42  61 72 20 44 69 72 65 63  |"Title Bar Direc|
00000670  74 6f 72 79 22 20 2a 20  50 61 74 68 3a 20 2d 69  |tory" * Path: -i|
00000680  63 6f 6e 20 54 69 74 6c  65 42 61 72 20 2d 6d 65  |con TitleBar -me|
00000690  6e 75 0a 44 69 72 65 63  74 6f 72 46 69 6c 74 65  |nu.DirectorFilte|
000006a0  72 20 22 41 6c 74 20 4d  65 6e 75 20 44 69 72 65  |r "Alt Menu Dire|
000006b0  63 74 6f 72 79 22 20 46  69 6c 65 72 20 50 61 74  |ctory" Filer Pat|
000006c0  68 3a 20 2d 6d 65 6e 75  20 2d 61 6c 74 0a 44 69  |h: -menu -alt.Di|
000006d0  72 65 63 74 6f 72 46 69  6c 74 65 72 20 22 50 69  |rectorFilter "Pi|
000006e0  6e 62 6f 61 72 64 22 20  50 69 6e 62 6f 61 72 64  |nboard" Pinboard|
000006f0  20 50 69 6e 62 6f 61 72  64 20 2d 69 63 6f 6e 20  | Pinboard -icon |
00000700  57 6f 72 6b 41 72 65 61  20 2d 6d 65 6e 75 0a 44  |WorkArea -menu.D|
00000710  69 72 65 63 74 6f 72 46  69 6c 74 65 72 20 22 43  |irectorFilter "C|
00000720  6c 6f 73 65 20 49 63 6f  6e 22 20 2a 20 22 44 79  |lose Icon" * "Dy|
00000730  6e 61 6d 69 63 3a 44 69  72 65 63 74 6f 72 4f 62  |namic:DirectorOb|
00000740  65 79 20 44 69 72 65 63  74 6f 72 3a 4d 65 6e 75  |ey Director:Menu|
00000750  73 2e 53 79 73 74 65 6d  2e 43 6c 6f 73 65 22 20  |s.System.Close" |
00000760  2d 69 63 6f 6e 20 43 6c  6f 73 65 49 63 6f 6e 20  |-icon CloseIcon |
00000770  2d 6d 65 6e 75 0a 44 69  72 65 63 74 6f 72 46 69  |-menu.DirectorFi|
00000780  6c 74 65 72 20 22 50 69  6e 62 6f 61 72 64 20 52  |lter "Pinboard R|
00000790  6f 6f 74 22 20 50 69 6e  62 6f 61 72 64 20 22 50  |oot" Pinboard "P|
000007a0  61 74 68 3a 3c 52 6f 6f  74 24 44 69 72 3e 22 20  |ath:<Root$Dir>" |
000007b0  2d 69 63 6f 6e 20 57 6f  72 6b 41 72 65 61 20 2d  |-icon WorkArea -|
000007c0  6d 65 6e 75 20 2d 73 65  6c 65 63 74 0a 44 69 72  |menu -select.Dir|
000007d0  65 63 74 6f 72 46 69 6c  74 65 72 20 22 50 69 6e  |ectorFilter "Pin|
000007e0  62 6f 61 72 64 20 4d 65  6d 6f 72 69 73 65 72 22  |board Memoriser"|
000007f0  20 50 69 6e 62 6f 61 72  64 20 4d 65 6d 6f 72 69  | Pinboard Memori|
00000800  73 65 72 3a 20 2d 61 64  6a 75 73 74 20 2d 6d 65  |ser: -adjust -me|
00000810  6e 75 0a 49 66 20 52 49  53 43 4f 53 5f 33 2e 35  |nu.If RISCOS_3.5|
00000820  30 20 54 68 65 6e 20 44  69 72 65 63 74 6f 72 46  |0 Then DirectorF|
00000830  69 6c 74 65 72 20 22 44  69 73 70 6c 61 79 20 4d  |ilter "Display M|
00000840  61 6e 61 67 65 72 a0 41  64 6a 75 73 74 22 20 22  |anager.Adjust" "|
00000850  44 69 73 70 6c 61 79 20  4d 61 6e 61 67 65 72 22  |Display Manager"|
00000860  20 22 4d 6f 64 65 22 20  2d 69 63 6f 6e 20 49 63  | "Mode" -icon Ic|
00000870  6f 6e 42 61 72 20 2d 61  64 6a 75 73 74 0a 49 66  |onBar -adjust.If|
00000880  20 4e 4f 54 20 52 49 53  43 4f 53 5f 33 2e 35 30  | NOT RISCOS_3.50|
00000890  20 54 68 65 6e 20 44 69  72 65 63 74 6f 72 46 69  | Then DirectorFi|
000008a0  6c 74 65 72 20 22 50 61  6c 65 74 74 65 20 55 74  |lter "Palette Ut|
000008b0  69 6c 69 74 79 20 41 64  6a 75 73 74 22 20 22 50  |ility Adjust" "P|
000008c0  61 6c 65 74 74 65 20 55  74 69 6c 69 74 79 22 20  |alette Utility" |
000008d0  22 4d 6f 64 65 22 20 2d  69 63 6f 6e 20 49 63 6f  |"Mode" -icon Ico|
000008e0  6e 42 61 72 20 2d 61 64  6a 75 73 74 0a 0a 0a 7c  |nBar -adjust...||
000008f0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000930  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 7c 0a 0a 4d 65  |-----------|..Me|
00000940  6e 75 20 22 44 69 72 65  63 74 6f 72 22 0a 09 4f  |nu "Director"..O|
00000950  70 74 69 6f 6e 20 22 49  6e 66 6f 22 20 2d 73 75  |ption "Info" -su|
00000960  62 20 22 49 6e 66 6f 3a  22 0a 44 61 73 68 0a 09  |b "Info:".Dash..|
00000970  4f 70 74 69 6f 6e 20 2d  70 61 74 68 20 3c 44 69  |Option -path <Di|
00000980  72 65 63 74 6f 72 24 44  69 72 3e 0a 09 4f 70 74  |rector$Dir>..Opt|
00000990  69 6f 6e 20 2d 70 61 74  68 20 3c 44 69 72 65 63  |ion -path <Direc|
000009a0  74 6f 72 24 44 69 72 3e  2e 21 48 65 6c 70 0a 09  |tor$Dir>.!Help..|
000009b0  4f 70 74 69 6f 6e 20 22  4d 65 6e 75 22 20 2d 73  |Option "Menu" -s|
000009c0  75 62 20 43 75 72 72 65  6e 74 4d 65 6e 75 20 2d  |ub CurrentMenu -|
000009d0  73 70 72 69 74 65 20 73  6d 61 6c 6c 5f 70 61 74  |sprite small_pat|
000009e0  68 0a 09 4f 70 74 69 6f  6e 20 2d 70 61 74 68 20  |h..Option -path |
000009f0  3c 44 69 72 65 63 74 6f  72 24 44 69 72 3e 2e 4d  |<Director$Dir>.M|
00000a00  65 6e 75 73 0a 09 4f 70  74 69 6f 6e 20 2d 70 61  |enus..Option -pa|
00000a10  74 68 20 3c 44 69 72 65  63 74 6f 72 24 44 69 72  |th <Director$Dir|
00000a20  3e 2e 55 74 69 6c 73 0a  44 61 73 68 0a 09 4f 70  |>.Utils.Dash..Op|
00000a30  74 69 6f 6e 20 22 4d 65  6e 75 73 22 20 2d 73 75  |tion "Menus" -su|
00000a40  62 20 22 44 79 6e 61 6d  69 63 3a 2f 44 69 72 65  |b "Dynamic:/Dire|
00000a50  63 74 6f 72 3a 4d 65 6e  75 73 2e 49 6e 74 65 72  |ctor:Menus.Inter|
00000a60  6e 61 6c 2e 45 6e 75 6d  65 72 61 74 65 20 2d 74  |nal.Enumerate -t|
00000a70  79 70 65 20 30 22 0a 7c  09 4f 70 74 69 6f 6e 20  |ype 0".|.Option |
00000a80  22 44 69 73 70 6c 61 79  65 64 22 20 2d 73 75 62  |"Displayed" -sub|
00000a90  20 22 44 79 6e 61 6d 69  63 3a 2f 44 69 72 65 63  | "Dynamic:/Direc|
00000aa0  74 6f 72 3a 4d 65 6e 75  73 2e 49 6e 74 65 72 6e  |tor:Menus.Intern|
00000ab0  61 6c 2e 45 6e 75 6d 65  72 61 74 65 20 2d 74 79  |al.Enumerate -ty|
00000ac0  70 65 20 31 22 0a 09 4f  70 74 69 6f 6e 20 22 49  |pe 1"..Option "I|
00000ad0  63 6f 6e 73 22 20 2d 73  75 62 20 22 44 79 6e 61  |cons" -sub "Dyna|
00000ae0  6d 69 63 3a 2f 44 69 72  65 63 74 6f 72 3a 4d 65  |mic:/Director:Me|
00000af0  6e 75 73 2e 49 6e 74 65  72 6e 61 6c 2e 45 6e 75  |nus.Internal.Enu|
00000b00  6d 65 72 61 74 65 20 2d  74 79 70 65 20 32 22 0a  |merate -type 2".|
00000b10  09 4f 70 74 69 6f 6e 20  22 46 69 6c 74 65 72 73  |.Option "Filters|
00000b20  22 20 2d 73 75 62 20 22  44 79 6e 61 6d 69 63 3a  |" -sub "Dynamic:|
00000b30  2f 44 69 72 65 63 74 6f  72 3a 4d 65 6e 75 73 2e  |/Director:Menus.|
00000b40  49 6e 74 65 72 6e 61 6c  2e 45 6e 75 6d 65 72 61  |Internal.Enumera|
00000b50  74 65 20 2d 74 79 70 65  20 33 22 0a 09 4f 70 74  |te -type 3"..Opt|
00000b60  69 6f 6e 20 22 4d 65 6d  6f 72 79 22 20 2d 73 75  |ion "Memory" -su|
00000b70  62 20 22 44 79 6e 61 6d  69 63 3a 2f 44 69 72 65  |b "Dynamic:/Dire|
00000b80  63 74 6f 72 3a 4d 65 6e  75 73 2e 49 6e 74 65 72  |ctor:Menus.Inter|
00000b90  6e 61 6c 2e 4d 65 6d 6f  72 79 22 0a 7c 44 61 73  |nal.Memory".|Das|
00000ba0  68 0a 7c 09 4f 70 74 69  6f 6e 20 22 22 20 2d 6c  |h.|.Option "" -l|
00000bb0  65 6e 20 36 34 20 2d 73  75 62 20 22 47 53 54 72  |en 64 -sub "GSTr|
00000bc0  61 6e 73 3a 7c 3c 4d 65  6e 75 54 65 78 74 3e 22  |ans:|<MenuText>"|
00000bd0  20 2d 66 67 20 31 33 0a  44 61 73 68 0a 09 4f 70  | -fg 13.Dash..Op|
00000be0  74 69 6f 6e 20 22 51 75  69 74 22 0a 09 09 43 6f  |tion "Quit"...Co|
00000bf0  6d 6d 61 6e 64 20 51 75  69 74 3a 0a 45 6e 64 4d  |mmand Quit:.EndM|
00000c00  65 6e 75 0a 0a 7c 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |enu..|----------|
00000c10  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000c50  2d 7c 0a 0a 4d 65 6e 75  20 22 43 75 72 72 65 6e  |-|..Menu "Curren|
00000c60  74 a0 4d 65 6e 75 22 20  43 75 72 72 65 6e 74 4d  |t.Menu" CurrentM|
00000c70  65 6e 75 0a 09 4f 70 74  69 6f 6e 20 22 45 64 69  |enu..Option "Edi|
00000c80  74 a0 27 3c 44 69 72 65  63 74 6f 72 24 49 6e 69  |t.'<Director$Ini|
00000c90  74 3e 27 22 0a 09 09 43  6f 6d 6d 61 6e 64 20 44  |t>'"...Command D|
00000ca0  69 72 65 63 74 6f 72 45  64 69 74 20 44 69 72 65  |irectorEdit Dire|
00000cb0  63 74 6f 72 3a 4d 65 6e  75 73 2e 3c 44 69 72 65  |ctor:Menus.<Dire|
00000cc0  63 74 6f 72 24 49 6e 69  74 3e 0a 09 4f 70 74 69  |ctor$Init>..Opti|
00000cd0  6f 6e 20 22 45 64 69 74  a0 27 43 6f 72 65 27 22  |on "Edit.'Core'"|
00000ce0  0a 09 09 43 6f 6d 6d 61  6e 64 20 44 69 72 65 63  |...Command Direc|
00000cf0  74 6f 72 45 64 69 74 20  44 69 72 65 63 74 6f 72  |torEdit Director|
00000d00  3a 4d 65 6e 75 73 2e 4c  69 62 72 61 72 79 2e 21  |:Menus.Library.!|
00000d10  43 6f 72 65 0a 09 4f 70  74 69 6f 6e 20 22 44 65  |Core..Option "De|
00000d20  62 75 67 22 0a 09 09 43  6f 6d 6d 61 6e 64 20 54  |bug"...Command T|
00000d30  61 73 6b 57 69 6e 64 6f  77 20 22 44 69 72 65 63  |askWindow "Direc|
00000d40  74 6f 72 4f 62 65 79 20  44 69 72 65 63 74 6f 72  |torObey Director|
00000d50  3a 4d 65 6e 75 73 2e 3c  44 69 72 65 63 74 6f 72  |:Menus.<Director|
00000d60  24 49 6e 69 74 3e 20 2d  76 22 20 2d 71 75 69 74  |$Init> -v" -quit|
00000d70  0a 09 4f 70 74 69 6f 6e  20 22 52 65 6c 6f 61 64  |..Option "Reload|
00000d80  22 0a 09 09 43 6f 6d 6d  61 6e 64 20 44 69 72 65  |"...Command Dire|
00000d90  63 74 6f 72 4f 62 65 79  20 44 69 72 65 63 74 6f  |ctorObey Directo|
00000da0  72 3a 4d 65 6e 75 73 2e  3c 44 69 72 65 63 74 6f  |r:Menus.<Directo|
00000db0  72 24 49 6e 69 74 3e 0a  45 6e 64 4d 65 6e 75 0a  |r$Init>.EndMenu.|
00000dc0  0a 7c 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |.|--------------|
00000dd0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000e00  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 7c 0a 0a  |-------------|..|
00000e10  4d 65 6e 75 20 22 44 65  73 6b 74 6f 70 22 0a 09  |Menu "Desktop"..|
00000e20  4f 70 74 69 6f 6e 20 22  4d 6f 64 65 22 20 2d 73  |Option "Mode" -s|
00000e30  75 62 20 2a 0a 09 4f 70  74 69 6f 6e 20 22 50 61  |ub *..Option "Pa|
00000e40  6c 65 74 74 65 22 20 2d  73 75 62 20 2a 0a 49 66  |lette" -sub *.If|
00000e50  20 52 49 53 43 4f 53 5f  33 2e 35 30 20 54 68 65  | RISCOS_3.50 The|
00000e60  6e 20 4f 70 74 69 6f 6e  20 22 46 6f 6e 74 22 20  |n Option "Font" |
00000e70  2d 73 75 62 20 22 44 79  6e 61 6d 69 63 3a 52 75  |-sub "Dynamic:Ru|
00000e80  6e 20 44 69 72 65 63 74  6f 72 3a 4d 65 6e 75 73  |n Director:Menus|
00000e90  2e 53 79 73 74 65 6d 2e  46 6f 6e 74 6d 65 6e 75  |.System.Fontmenu|
00000ea0  22 0a 09 4f 70 74 69 6f  6e 20 22 54 6f 6f 6c 73  |"..Option "Tools|
00000eb0  22 20 2d 73 75 62 20 2a  0a 09 4f 70 74 69 6f 6e  |" -sub *..Option|
00000ec0  20 22 42 61 63 6b 44 72  6f 70 22 20 2d 73 75 62  | "BackDrop" -sub|
00000ed0  20 2a 0a 09 4f 70 74 69  6f 6e 20 22 43 68 61 72  | *..Option "Char|
00000ee0  73 22 20 2d 73 75 62 20  2a 0a 09 4f 70 74 69 6f  |s" -sub *..Optio|
00000ef0  6e 20 22 57 69 6d 70 20  53 70 72 69 74 65 73 22  |n "Wimp Sprites"|
00000f00  20 2d 73 75 62 20 2a 0a  09 4f 70 74 69 6f 6e 20  | -sub *..Option |
00000f10  22 4d 6f 75 73 65 53 74  65 70 22 20 2d 73 75 62  |"MouseStep" -sub|
00000f20  20 22 4d 6f 75 73 65 22  0a 09 4f 70 74 69 6f 6e  | "Mouse"..Option|
00000f30  20 22 54 61 73 6b 73 22  20 2d 73 75 62 20 22 44  | "Tasks" -sub "D|
00000f40  79 6e 61 6d 69 63 3a 2f  44 69 72 65 63 74 6f 72  |ynamic:/Director|
00000f50  3a 4d 65 6e 75 73 2e 53  79 73 74 65 6d 2e 54 61  |:Menus.System.Ta|
00000f60  73 6b 73 22 0a 44 61 73  68 0a 09 4f 70 74 69 6f  |sks".Dash..Optio|
00000f70  6e 20 22 50 72 69 6e 74  65 72 20 57 69 6e 64 6f  |n "Printer Windo|
00000f80  77 22 20 2d 6b 65 79 20  50 72 69 6e 74 0a 09 09  |w" -key Print...|
00000f90  43 6f 6d 6d 61 6e 64 20  46 69 6c 65 72 5f 4f 70  |Command Filer_Op|
00000fa0  65 6e 44 69 72 20 50 72  69 6e 74 65 72 3a 3a 24  |enDir Printer::$|
00000fb0  0a 09 4f 70 74 69 6f 6e  20 22 4c 6f 73 65 20 43  |..Option "Lose C|
00000fc0  61 72 65 74 22 20 2d 6b  65 79 20 8b 5e 49 6e 73  |aret" -key .^Ins|
00000fd0  65 72 74 0a 09 09 43 6f  6d 6d 61 6e 64 20 54 61  |ert...Command Ta|
00000fe0  73 6b 57 69 6e 64 6f 77  20 22 53 57 49 20 57 69  |skWindow "SWI Wi|
00000ff0  6d 70 5f 53 65 74 43 61  72 65 74 50 6f 73 69 74  |mp_SetCaretPosit|
00001000  69 6f 6e 20 2d 31 20 2d  31 22 20 2d 71 75 69 74  |ion -1 -1" -quit|
00001010  0a 09 4f 70 74 69 6f 6e  20 22 46 61 63 74 6f 72  |..Option "Factor|
00001020  22 20 2d 73 75 62 20 2a  0a 45 6e 64 4d 65 6e 75  |" -sub *.EndMenu|
00001030  0a 0a 7c 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |..|-------------|
00001040  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00001070  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 7c 0a  |--------------|.|
00001080  0a 4d 65 6e 75 20 22 53  79 73 74 65 6d 22 0a 09  |.Menu "System"..|
00001090  4f 70 74 69 6f 6e 20 22  54 69 6d 65 22 20 2d 73  |Option "Time" -s|
000010a0  75 62 20 22 44 79 6e 61  6d 69 63 3a 44 69 72 65  |ub "Dynamic:Dire|
000010b0  63 74 6f 72 4f 62 65 79  20 44 69 72 65 63 74 6f  |ctorObey Directo|
000010c0  72 3a 4d 65 6e 75 73 2e  53 79 73 74 65 6d 2e 54  |r:Menus.System.T|
000010d0  69 6d 65 22 20 2d 6b 65  79 20 5e 8b 54 0a 09 4f  |ime" -key ^.T..O|
000010e0  70 74 69 6f 6e 20 22 4d  6f 64 75 6c 65 73 22 20  |ption "Modules" |
000010f0  2d 73 75 62 20 22 44 79  6e 61 6d 69 63 3a 2f 44  |-sub "Dynamic:/D|
00001100  69 72 65 63 74 6f 72 3a  4d 65 6e 75 73 2e 53 79  |irector:Menus.Sy|
00001110  73 74 65 6d 2e 4d 6f 64  75 6c 65 73 22 0a 09 4f  |stem.Modules"..O|
00001120  70 74 69 6f 6e 20 22 53  63 72 61 70 22 20 2d 73  |ption "Scrap" -s|
00001130  75 62 20 22 44 79 6e 61  6d 69 63 3a 2f 44 69 72  |ub "Dynamic:/Dir|
00001140  65 63 74 6f 72 3a 4d 65  6e 75 73 2e 46 69 6c 65  |ector:Menus.File|
00001150  73 2e 45 78 70 6c 6f 64  65 44 69 72 20 2d 64 69  |s.ExplodeDir -di|
00001160  72 20 3c 57 69 6d 70 24  53 63 72 61 70 44 69 72  |r <Wimp$ScrapDir|
00001170  3e 20 2d 74 69 74 6c 65  20 53 63 72 61 70 44 69  |> -title ScrapDi|
00001180  72 20 2d 73 75 62 20 44  69 72 65 63 74 6f 72 3a  |r -sub Director:|
00001190  4d 65 6e 75 73 2e 46 69  6c 65 73 2e 53 63 72 61  |Menus.Files.Scra|
000011a0  70 44 69 72 20 2d 61 64  64 20 50 75 72 67 65 20  |pDir -add Purge |
000011b0  2d 64 6f 20 44 69 72 65  63 74 6f 72 3a 4d 65 6e  |-do Director:Men|
000011c0  75 73 2e 46 69 6c 65 73  2e 53 63 72 61 70 50 75  |us.Files.ScrapPu|
000011d0  72 67 65 22 0a 09 4f 70  74 69 6f 6e 20 22 56 61  |rge"..Option "Va|
000011e0  72 69 61 62 6c 65 73 22  20 2d 73 75 62 20 2a 0a  |riables" -sub *.|
000011f0  44 61 73 68 0a 09 4f 70  74 69 6f 6e 20 22 53 63  |Dash..Option "Sc|
00001200  72 65 65 6e 42 6c 61 6e  6b 22 20 2d 73 75 62 20  |reenBlank" -sub |
00001210  22 2a 22 20 2d 6b 65 79  20 5e 46 31 31 0a 09 09  |"*" -key ^F11...|
00001220  43 6f 6d 6d 61 6e 64 20  22 53 57 49 20 53 63 72  |Command "SWI Scr|
00001230  65 65 6e 42 6c 61 6e 6b  65 72 5f 43 6f 6e 74 72  |eenBlanker_Contr|
00001240  6f 6c 20 30 22 0a 09 4f  70 74 69 6f 6e 20 22 48  |ol 0"..Option "H|
00001250  6f 75 72 67 6c 61 73 73  20 4f 66 66 22 0a 09 09  |ourglass Off"...|
00001260  43 6f 6d 6d 61 6e 64 20  53 57 49 20 48 6f 75 72  |Command SWI Hour|
00001270  67 6c 61 73 73 5f 53 6d  61 73 68 0a 09 4f 70 74  |glass_Smash..Opt|
00001280  69 6f 6e 20 22 52 65 73  65 74 20 53 79 73 46 6f  |ion "Reset SysFo|
00001290  6e 74 22 0a 09 09 43 6f  6d 6d 61 6e 64 20 66 78  |nt"...Command fx|
000012a0  20 32 30 7c 4d 52 65 64  72 61 77 53 63 72 65 65  | 20|MRedrawScree|
000012b0  6e 0a 45 6e 64 4d 65 6e  75 0a 0a 7c 2d 2d 2d 2d  |n.EndMenu..|----|
000012c0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00001300  2d 2d 2d 2d 2d 2d 2d 7c  0a 0a 4d 65 6e 75 20 22  |-------|..Menu "|
00001310  46 69 6c 69 6e 67 22 0a  09 4f 70 74 69 6f 6e 20  |Filing"..Option |
00001320  22 4f 70 65 6e 20 46 69  6c 65 73 22 20 2d 6b 65  |"Open Files" -ke|
00001330  79 20 8b 5e 5b 20 2d 73  75 62 20 22 44 79 6e 61  |y .^[ -sub "Dyna|
00001340  6d 69 63 3a 2f 44 69 72  65 63 74 6f 72 3a 4d 65  |mic:/Director:Me|
00001350  6e 75 73 2e 53 79 73 74  65 6d 2e 4f 70 65 6e 66  |nus.System.Openf|
00001360  69 6c 65 73 22 0a 09 4f  70 74 69 6f 6e 20 22 43  |iles"..Option "C|
00001370  6c 6f 73 65 20 46 69 6c  65 73 22 20 2d 6b 65 79  |lose Files" -key|
00001380  20 8b 5e 5d 0a 09 09 43  6f 6d 6d 61 6e 64 20 53  | .^]...Command S|
00001390  57 49 20 22 4f 53 5f 46  53 43 6f 6e 74 72 6f 6c  |WI "OS_FSControl|
000013a0  22 20 32 32 7c 4d 53 57  49 20 22 53 6f 75 6e 64  |" 22|MSWI "Sound|
000013b0  5f 43 6f 6e 74 72 6f 6c  22 20 31 20 2d 31 35 20  |_Control" 1 -15 |
000013c0  32 32 30 20 31 7c 4d 0a  09 4f 70 74 69 6f 6e 20  |220 1|M..Option |
000013d0  22 42 69 67 67 65 73 74  20 66 69 6c 65 73 22 0a  |"Biggest files".|
000013e0  09 09 43 6f 6d 6d 61 6e  64 20 54 61 73 6b 57 69  |..Command TaskWi|
000013f0  6e 64 6f 77 20 22 42 69  67 67 65 73 74 20 2d 6e  |ndow "Biggest -n|
00001400  20 31 30 30 22 20 2d 71  75 69 74 20 2d 77 69 6d  | 100" -quit -wim|
00001410  70 73 6c 6f 74 20 31 32  38 6b 20 2d 6e 61 6d 65  |pslot 128k -name|
00001420  20 42 69 67 67 65 73 74  0a 09 4f 70 74 69 6f 6e  | Biggest..Option|
00001430  20 22 42 69 67 67 65 73  74 20 64 69 72 73 22 0a  | "Biggest dirs".|
00001440  09 09 43 6f 6d 6d 61 6e  64 20 54 61 73 6b 57 69  |..Command TaskWi|
00001450  6e 64 6f 77 20 22 42 69  67 67 65 73 74 20 2d 64  |ndow "Biggest -d|
00001460  22 20 2d 71 75 69 74 20  2d 77 69 6d 70 73 6c 6f  |" -quit -wimpslo|
00001470  74 20 31 32 38 6b 20 2d  6e 61 6d 65 20 42 69 67  |t 128k -name Big|
00001480  67 65 73 74 0a 09 4f 70  74 69 6f 6e 20 22 45 6a  |gest..Option "Ej|
00001490  65 63 74 20 43 44 22 0a  09 09 43 6f 6d 6d 61 6e  |ect CD"...Comman|
000014a0  64 20 22 46 69 6c 65 72  5f 43 6c 6f 73 65 44 69  |d "Filer_CloseDi|
000014b0  72 20 43 44 46 53 3a 7c  4d 2d 43 44 46 53 2d 45  |r CDFS:|M-CDFS-E|
000014c0  6a 65 63 74 22 09 0a 09  4f 70 74 69 6f 6e 20 22  |ject"...Option "|
000014d0  53 65 74 20 43 53 44 22  20 2d 6b 65 79 20 5e 54  |Set CSD" -key ^T|
000014e0  61 62 0a 09 09 43 6f 6d  6d 61 6e 64 20 44 69 72  |ab...Command Dir|
000014f0  65 63 74 6f 72 4d 6f 75  73 65 44 69 72 20 61 7c  |ectorMouseDir a||
00001500  4d 49 66 20 22 7c 3c 61  3e 22 3c 3e 22 22 20 54  |MIf "|<a>"<>"" T|
00001510  68 65 6e 20 44 69 72 20  7c 3c 61 3e 7c 4d 49 66  |hen Dir |<a>|MIf|
00001520  20 22 7c 3c 61 3e 22 3c  3e 22 22 20 54 68 65 6e  | "|<a>"<>"" Then|
00001530  20 53 57 49 20 22 53 6f  75 6e 64 5f 43 6f 6e 74  | SWI "Sound_Cont|
00001540  72 6f 6c 22 20 31 20 2d  31 35 20 31 34 37 20 31  |rol" 1 -15 147 1|
00001550  0a 09 4f 70 74 69 6f 6e  20 22 43 6c 6f 73 65 20  |..Option "Close |
00001560  46 69 6c 65 72 73 22 20  2d 6b 65 79 20 8b 5e 46  |Filers" -key .^F|
00001570  31 31 0a 09 09 43 6f 6d  6d 61 6e 64 20 46 69 6c  |11...Command Fil|
00001580  65 72 5f 43 6c 6f 73 65  44 69 72 20 61 64 66 73  |er_CloseDir adfs|
00001590  3a 7c 4d 46 69 6c 65 72  5f 43 6c 6f 73 65 44 69  |:|MFiler_CloseDi|
000015a0  72 20 63 64 66 73 3a 7c  4d 46 69 6c 65 72 5f 43  |r cdfs:|MFiler_C|
000015b0  6c 6f 73 65 44 69 72 20  73 63 73 69 3a 7c 4d 46  |loseDir scsi:|MF|
000015c0  69 6c 65 72 5f 43 6c 6f  73 65 44 69 72 20 6d 6f  |iler_CloseDir mo|
000015d0  66 73 3a 7c 4d 46 69 6c  65 72 5f 43 6c 6f 73 65  |fs:|MFiler_Close|
000015e0  44 69 72 20 73 70 66 73  0a 09 4f 70 74 69 6f 6e  |Dir spfs..Option|
000015f0  20 22 4e 6f 20 73 70 69  6e 20 64 6f 77 6e 22 0a  | "No spin down".|
00001600  09 09 43 6f 6d 6d 61 6e  64 20 53 57 49 20 41 44  |..Command SWI AD|
00001610  46 53 5f 50 6f 77 65 72  43 6f 6e 74 72 6f 6c 20  |FS_PowerControl |
00001620  31 20 34 20 30 0a 09 49  66 20 22 3c 44 69 72 65  |1 4 0..If "<Dire|
00001630  63 74 6f 72 24 4b 65 79  24 4d 65 6d 6f 72 69 73  |ctor$Key$Memoris|
00001640  65 72 3e 22 20 3d 20 22  22 20 54 68 65 6e 20 53  |er>" = "" Then S|
00001650  65 74 20 44 69 72 65 63  74 6f 72 24 4b 65 79 24  |et Director$Key$|
00001660  4d 65 6d 6f 72 69 73 65  72 20 8b 5e 54 61 62 0a  |Memoriser .^Tab.|
00001670  09 4f 70 74 69 6f 6e 20  22 4d 65 6d 6f 72 69 73  |.Option "Memoris|
00001680  65 72 22 20 2d 73 75 62  20 22 2a 22 20 2d 6b 65  |er" -sub "*" -ke|
00001690  79 20 3c 44 69 72 65 63  74 6f 72 24 4b 65 79 24  |y <Director$Key$|
000016a0  4d 65 6d 6f 72 69 73 65  72 3e 0a 45 6e 64 4d 65  |Memoriser>.EndMe|
000016b0  6e 75 0a 0a 7c 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |nu..|-----------|
000016c0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00001700  7c 0a 0a 49 66 20 52 49  53 43 4f 53 5f 33 2e 35  ||..If RISCOS_3.5|
00001710  30 20 54 68 65 6e 20 4d  65 6e 75 50 72 6f 63 65  |0 Then MenuProce|
00001720  73 73 69 6e 67 20 30 0a  4d 65 6e 75 20 22 4d 6f  |ssing 0.Menu "Mo|
00001730  64 65 22 0a 09 4f 70 74  69 6f 6e 20 22 30 20 20  |de"..Option "0  |
00001740  2d 20 36 34 30 20 78 20  32 35 36 22 0a 09 09 43  |- 640 x 256"...C|
00001750  6f 6d 6d 61 6e 64 20 57  69 6d 70 4d 6f 64 65 20  |ommand WimpMode |
00001760  30 0a 09 4f 70 74 69 6f  6e 20 22 31 32 20 2d 20  |0..Option "12 - |
00001770  36 34 30 20 78 20 32 35  36 22 0a 09 09 43 6f 6d  |640 x 256"...Com|
00001780  6d 61 6e 64 20 57 69 6d  70 4d 6f 64 65 20 31 32  |mand WimpMode 12|
00001790  0a 09 4f 70 74 69 6f 6e  20 22 31 33 20 2d 20 33  |..Option "13 - 3|
000017a0  32 30 20 78 20 32 35 36  22 0a 09 09 43 6f 6d 6d  |20 x 256"...Comm|
000017b0  61 6e 64 20 57 69 6d 70  4d 6f 64 65 20 31 33 0a  |and WimpMode 13.|
000017c0  09 4f 70 74 69 6f 6e 20  22 32 30 20 2d 20 36 34  |.Option "20 - 64|
000017d0  30 20 78 20 35 31 32 22  0a 09 09 43 6f 6d 6d 61  |0 x 512"...Comma|
000017e0  6e 64 20 57 69 6d 70 4d  6f 64 65 20 32 30 0a 09  |nd WimpMode 20..|
000017f0  4f 70 74 69 6f 6e 20 22  31 35 20 2d 20 36 34 30  |Option "15 - 640|
00001800  20 78 20 32 35 36 22 0a  09 09 43 6f 6d 6d 61 6e  | x 256"...Comman|
00001810  64 20 57 69 6d 70 4d 6f  64 65 20 31 35 0a 09 4f  |d WimpMode 15..O|
00001820  70 74 69 6f 6e 20 22 32  31 20 2d 20 36 34 30 20  |ption "21 - 640 |
00001830  78 20 35 31 32 22 0a 09  09 43 6f 6d 6d 61 6e 64  |x 512"...Command|
00001840  20 57 69 6d 70 4d 6f 64  65 20 32 31 0a 09 4f 70  | WimpMode 21..Op|
00001850  74 69 6f 6e 20 22 32 37  20 2d 20 36 34 30 20 78  |tion "27 - 640 x|
00001860  20 34 38 30 22 0a 09 09  43 6f 6d 6d 61 6e 64 20  | 480"...Command |
00001870  57 69 6d 70 4d 6f 64 65  20 32 37 0a 09 4f 70 74  |WimpMode 27..Opt|
00001880  69 6f 6e 20 22 33 31 20  2d 20 38 30 30 20 78 20  |ion "31 - 800 x |
00001890  36 30 30 22 0a 09 09 43  6f 6d 6d 61 6e 64 20 57  |600"...Command W|
000018a0  69 6d 70 4d 6f 64 65 20  33 31 0a 09 4f 70 74 69  |impMode 31..Opti|
000018b0  6f 6e 20 22 32 38 20 2d  20 36 34 30 20 78 20 34  |on "28 - 640 x 4|
000018c0  38 30 22 0a 09 09 43 6f  6d 6d 61 6e 64 20 57 69  |80"...Command Wi|
000018d0  6d 70 4d 6f 64 65 20 32  38 0a 09 4f 70 74 69 6f  |mpMode 28..Optio|
000018e0  6e 20 22 33 31 20 2d 20  38 30 30 20 78 20 36 30  |n "31 - 800 x 60|
000018f0  30 22 0a 09 09 43 6f 6d  6d 61 6e 64 20 57 69 6d  |0"...Command Wim|
00001900  70 4d 6f 64 65 20 33 31  0a 44 61 73 68 0a 09 4f  |pMode 31.Dash..O|
00001910  70 74 69 6f 6e 20 22 22  20 2d 6c 65 6e 20 31 36  |ption "" -len 16|
00001920  0a 09 09 43 6f 6d 6d 61  6e 64 20 57 69 6d 70 4d  |...Command WimpM|
00001930  6f 64 65 20 3c 4d 65 6e  75 54 65 78 74 3e 0a 45  |ode <MenuText>.E|
00001940  6e 64 4d 65 6e 75 0a 4d  65 6e 75 50 72 6f 63 65  |ndMenu.MenuProce|
00001950  73 73 69 6e 67 20 31 0a  0a 49 66 20 4e 4f 54 20  |ssing 1..If NOT |
00001960  52 49 53 43 4f 53 5f 33  2e 35 30 20 54 68 65 6e  |RISCOS_3.50 Then|
00001970  20 4d 65 6e 75 50 72 6f  63 65 73 73 69 6e 67 20  | MenuProcessing |
00001980  30 0a 4d 65 6e 75 20 22  4d 6f 64 65 22 20 2d 6b  |0.Menu "Mode" -k|
00001990  65 79 20 4d 0a 09 4f 70  74 69 6f 6e 20 22 58 78  |ey M..Option "Xx|
000019a0  59 22 20 2d 73 75 62 20  22 44 79 6e 61 6d 69 63  |Y" -sub "Dynamic|
000019b0  3a 2f 44 69 72 65 63 74  6f 72 3a 4d 65 6e 75 73  |:/Director:Menus|
000019c0  2e 4d 6f 64 65 73 2e 42  79 58 78 59 22 0a 44 61  |.Modes.ByXxY".Da|
000019d0  73 68 0a 09 4f 70 74 69  6f 6e 20 22 32 22 20 2d  |sh..Option "2" -|
000019e0  73 75 62 20 22 44 79 6e  61 6d 69 63 3a 2f 44 69  |sub "Dynamic:/Di|
000019f0  72 65 63 74 6f 72 3a 4d  65 6e 75 73 2e 4d 6f 64  |rector:Menus.Mod|
00001a00  65 73 2e 42 79 43 6f 6c  6f 75 72 20 2d 6c 62 70  |es.ByColour -lbp|
00001a10  70 20 30 22 0a 09 4f 70  74 69 6f 6e 20 22 34 22  |p 0"..Option "4"|
00001a20  20 2d 73 75 62 20 22 44  79 6e 61 6d 69 63 3a 2f  | -sub "Dynamic:/|
00001a30  44 69 72 65 63 74 6f 72  3a 4d 65 6e 75 73 2e 4d  |Director:Menus.M|
00001a40  6f 64 65 73 2e 42 79 43  6f 6c 6f 75 72 20 2d 6c  |odes.ByColour -l|
00001a50  62 70 70 20 31 22 0a 09  4f 70 74 69 6f 6e 20 22  |bpp 1"..Option "|
00001a60  31 36 22 20 2d 73 75 62  20 22 44 79 6e 61 6d 69  |16" -sub "Dynami|
00001a70  63 3a 2f 44 69 72 65 63  74 6f 72 3a 4d 65 6e 75  |c:/Director:Menu|
00001a80  73 2e 4d 6f 64 65 73 2e  42 79 43 6f 6c 6f 75 72  |s.Modes.ByColour|
00001a90  20 2d 6c 62 70 70 20 32  22 0a 09 4f 70 74 69 6f  | -lbpp 2"..Optio|
00001aa0  6e 20 22 32 35 36 22 20  2d 73 75 62 20 22 44 79  |n "256" -sub "Dy|
00001ab0  6e 61 6d 69 63 3a 2f 44  69 72 65 63 74 6f 72 3a  |namic:/Director:|
00001ac0  4d 65 6e 75 73 2e 4d 6f  64 65 73 2e 42 79 43 6f  |Menus.Modes.ByCo|
00001ad0  6c 6f 75 72 20 2d 6c 62  70 70 20 33 22 0a 09 4f  |lour -lbpp 3"..O|
00001ae0  70 74 69 6f 6e 20 22 33  32 4b 22 20 2d 73 75 62  |ption "32K" -sub|
00001af0  20 22 44 79 6e 61 6d 69  63 3a 2f 44 69 72 65 63  | "Dynamic:/Direc|
00001b00  74 6f 72 3a 4d 65 6e 75  73 2e 4d 6f 64 65 73 2e  |tor:Menus.Modes.|
00001b10  42 79 43 6f 6c 6f 75 72  20 2d 6c 62 70 70 20 34  |ByColour -lbpp 4|
00001b20  22 0a 09 4f 70 74 69 6f  6e 20 22 31 36 4d 22 20  |"..Option "16M" |
00001b30  2d 73 75 62 20 22 44 79  6e 61 6d 69 63 3a 2f 44  |-sub "Dynamic:/D|
00001b40  69 72 65 63 74 6f 72 3a  4d 65 6e 75 73 2e 4d 6f  |irector:Menus.Mo|
00001b50  64 65 73 2e 42 79 43 6f  6c 6f 75 72 20 2d 6c 62  |des.ByColour -lb|
00001b60  70 70 20 35 22 0a 44 61  73 68 0a 09 4f 70 74 69  |pp 5".Dash..Opti|
00001b70  6f 6e 20 22 31 36 20 43  6f 6c 22 0a 09 09 43 6f  |on "16 Col"...Co|
00001b80  6d 6d 61 6e 64 20 57 69  6d 70 4d 6f 64 65 20 20  |mmand WimpMode  |
00001b90  58 31 32 38 30 20 59 31  30 32 34 20 43 31 36 0a  |X1280 Y1024 C16.|
00001ba0  09 4f 70 74 69 6f 6e 20  22 32 35 36 20 43 6f 6c  |.Option "256 Col|
00001bb0  22 0a 09 09 43 6f 6d 6d  61 6e 64 20 57 69 6d 70  |"...Command Wimp|
00001bc0  4d 6f 64 65 20 20 58 31  32 38 30 20 59 31 30 32  |Mode  X1280 Y102|
00001bd0  34 20 43 32 35 36 0a 09  4f 70 74 69 6f 6e 20 22  |4 C256..Option "|
00001be0  33 32 4b 20 43 6f 6c 22  0a 09 09 43 6f 6d 6d 61  |32K Col"...Comma|
00001bf0  6e 64 20 57 69 6d 70 4d  6f 64 65 20 20 58 31 31  |nd WimpMode  X11|
00001c00  38 34 20 59 38 38 35 20  43 33 32 54 0a 09 4f 70  |84 Y885 C32T..Op|
00001c10  74 69 6f 6e 20 22 31 36  4d 20 43 6f 6c 22 0a 09  |tion "16M Col"..|
00001c20  09 43 6f 6d 6d 61 6e 64  20 57 69 6d 70 4d 6f 64  |.Command WimpMod|
00001c30  65 20 20 58 38 33 32 20  59 36 33 30 20 43 31 36  |e  X832 Y630 C16|
00001c40  4d 0a 09 4f 70 74 69 6f  6e 20 22 32 35 36 20 53  |M..Option "256 S|
00001c50  56 47 41 22 0a 09 09 43  6f 6d 6d 61 6e 64 20 22  |VGA"...Command "|
00001c60  57 69 6d 70 4d 6f 64 65  20 58 38 30 30 20 59 36  |WimpMode X800 Y6|
00001c70  30 30 20 43 32 35 36 22  0a 09 4f 70 74 69 6f 6e  |00 C256"..Option|
00001c80  20 22 32 35 36 20 56 47  41 22 0a 09 09 43 6f 6d  | "256 VGA"...Com|
00001c90  6d 61 6e 64 20 22 57 69  6d 70 4d 6f 64 65 20 58  |mand "WimpMode X|
00001ca0  36 34 30 20 59 34 38 30  20 43 32 35 36 22 0a 44  |640 Y480 C256".D|
00001cb0  61 73 68 0a 09 4f 70 74  69 6f 6e 20 22 22 20 2d  |ash..Option "" -|
00001cc0  6c 65 6e 20 33 32 0a 09  09 43 6f 6d 6d 61 6e 64  |len 32...Command|
00001cd0  20 57 69 6d 70 4d 6f 64  65 20 3c 4d 65 6e 75 54  | WimpMode <MenuT|
00001ce0  65 78 74 3e 0a 45 6e 64  4d 65 6e 75 0a 4d 65 6e  |ext>.EndMenu.Men|
00001cf0  75 50 72 6f 63 65 73 73  69 6e 67 20 31 0a 0a 7c  |uProcessing 1..||
00001d00  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00001d40  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 7c 0a 0a 4d 65  |-----------|..Me|
00001d50  6e 75 20 22 4d 65 6d 6f  72 69 73 65 72 22 0a 09  |nu "Memoriser"..|
00001d60  4f 70 74 69 6f 6e 20 46  69 6c 65 73 20 2d 73 75  |Option Files -su|
00001d70  62 20 22 4d 65 6d 6f 72  69 73 65 72 3a 34 22 0a  |b "Memoriser:4".|
00001d80  09 4f 70 74 69 6f 6e 20  44 69 72 73 20 2d 73 75  |.Option Dirs -su|
00001d90  62 20 22 4d 65 6d 6f 72  69 73 65 72 3a 32 22 0a  |b "Memoriser:2".|
00001da0  09 4f 70 74 69 6f 6e 20  41 70 70 73 20 2d 73 75  |.Option Apps -su|
00001db0  62 20 22 4d 65 6d 6f 72  69 73 65 72 3a 31 22 0a  |b "Memoriser:1".|
00001dc0  44 61 73 68 0a 09 4f 70  74 69 6f 6e 20 41 6c 6c  |Dash..Option All|
00001dd0  20 2d 73 75 62 20 22 4d  65 6d 6f 72 69 73 65 72  | -sub "Memoriser|
00001de0  3a 22 0a 44 61 73 68 0a  09 4f 70 74 69 6f 6e 20  |:".Dash..Option |
00001df0  53 61 76 65 0a 09 09 43  6f 6d 6d 61 6e 64 20 4d  |Save...Command M|
00001e00  65 6d 6f 72 69 73 65 72  53 61 76 65 20 44 69 72  |emoriserSave Dir|
00001e10  65 63 74 6f 72 3a 4d 65  6d 6f 72 79 0a 09 4f 70  |ector:Memory..Op|
00001e20  74 69 6f 6e 20 4c 6f 61  64 0a 09 09 43 6f 6d 6d  |tion Load...Comm|
00001e30  61 6e 64 20 4d 65 6d 6f  72 69 73 65 72 4c 6f 61  |and MemoriserLoa|
00001e40  64 20 44 69 72 65 63 74  6f 72 3a 4d 65 6d 6f 72  |d Director:Memor|
00001e50  79 0a 09 4f 70 74 69 6f  6e 20 45 64 69 74 0a 09  |y..Option Edit..|
00001e60  09 43 6f 6d 6d 61 6e 64  20 44 69 72 65 63 74 6f  |.Command Directo|
00001e70  72 45 64 69 74 20 44 69  72 65 63 74 6f 72 3a 4d  |rEdit Director:M|
00001e80  65 6d 6f 72 79 0a 45 6e  64 4d 65 6e 75 0a 0a 7c  |emory.EndMenu..||
00001e90  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00001ed0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 7c 0a 0a 7c 20  |-----------|..| |
00001ee0  50 72 6f 76 69 64 65 73  20 74 68 65 20 76 61 6c  |Provides the val|
00001ef0  75 65 20 6f 66 20 61 20  76 61 72 69 61 62 6c 65  |ue of a variable|
00001f00  20 61 73 20 61 20 77 72  69 74 61 62 6c 65 20 6d  | as a writable m|
00001f10  65 6e 75 20 6f 70 74 69  6f 6e 0a 0a 53 65 74 20  |enu option..Set |
00001f20  41 6c 69 61 73 24 56 61  72 56 61 6c 20 53 65 74  |Alias$VarVal Set|
00001f30  20 44 69 72 65 63 74 6f  72 24 4d 65 6e 75 20 56  | Director$Menu V|
00001f40  61 6c 75 65 7c 4d 4d 65  6e 75 20 7c 22 7c 22 56  |alue|MMenu |"|"V|
00001f50  61 6c 75 65 20 2d 74 65  6d 70 7c 4d 4f 70 74 69  |alue -temp|MOpti|
00001f60  6f 6e 20 22 7c 3c 25 30  3e 22 20 2d 6c 65 6e 20  |on "|<%0>" -len |
00001f70  32 35 36 7c 4d 49 66 20  22 25 31 22 3c 3e 22 22  |256|MIf "%1"<>""|
00001f80  20 54 68 65 6e 20 4f 70  74 69 6f 6e 20 22 25 31  | Then Option "%1|
00001f90  22 20 2d 73 75 62 20 22  44 79 6e 61 6d 69 63 3a  |" -sub "Dynamic:|
00001fa0  2f 44 69 72 65 63 74 6f  72 3a 4d 65 6e 75 73 2e  |/Director:Menus.|
00001fb0  53 79 73 74 65 6d 2e 45  78 70 50 61 74 68 20 25  |System.ExpPath %|
00001fc0  31 22 7c 4d 43 6f 6d 6d  61 6e 64 20 53 65 74 20  |1"|MCommand Set |
00001fd0  25 30 20 7c 3c 4d 65 6e  75 54 65 78 74 7c 3e 7c  |%0 |<MenuText|>||
00001fe0  4d 45 6e 64 4d 65 6e 75  7c 4d 0a 0a 7c 20 41 20  |MEndMenu|M..| A |
00001ff0  6e 65 61 74 65 72 20 77  61 79 20 6f 66 20 61 64  |neater way of ad|
00002000  64 69 6e 67 20 6f 70 74  69 6f 6e 73 20 74 6f 20  |ding options to |
00002010  74 68 65 20 27 76 61 72  69 61 62 6c 65 73 27 20  |the 'variables' |
00002020  6d 65 6e 75 0a 0a 53 65  74 20 41 6c 69 61 73 24  |menu..Set Alias$|
00002030  4c 69 73 74 56 61 72 20  4f 70 74 69 6f 6e 20 7c  |ListVar Option ||
00002040  22 25 30 7c 22 20 2d 73  75 62 20 7c 22 44 79 6e  |"%0|" -sub |"Dyn|
00002050  61 6d 69 63 3a 2f 44 69  72 65 63 74 6f 72 3a 4d  |amic:/Director:M|
00002060  65 6e 75 73 2e 53 79 73  74 65 6d 2e 56 61 72 69  |enus.System.Vari|
00002070  61 62 6c 65 73 20 2d 6d  61 74 63 68 20 25 30 20  |ables -match %0 |
00002080  2d 6e 6f 74 20 25 31 7c  22 0a 0a 4d 65 6e 75 20  |-not %1|"..Menu |
00002090  56 61 72 69 61 62 6c 65  73 0a 09 4c 69 73 74 56  |Variables..ListV|
000020a0  61 72 20 2a 0a 09 4c 69  73 74 56 61 72 20 53 79  |ar *..ListVar Sy|
000020b0  73 24 2a 0a 09 4c 69 73  74 56 61 72 20 2a 44 69  |s$*..ListVar *Di|
000020c0  72 65 63 74 6f 72 2a 0a  44 61 73 68 0a 09 4c 69  |rector*.Dash..Li|
000020d0  73 74 56 61 72 20 2a 24  44 69 72 0a 09 4c 69 73  |stVar *$Dir..Lis|
000020e0  74 56 61 72 20 2a 24 50  61 74 68 0a 09 4c 69 73  |tVar *$Path..Lis|
000020f0  74 56 61 72 20 46 69 6c  65 53 77 69 74 63 68 24  |tVar FileSwitch$|
00002100  2a 0a 44 61 73 68 0a 09  4c 69 73 74 56 61 72 20  |*.Dash..ListVar |
00002110  41 6c 69 61 73 24 2a 20  40 0a 44 61 73 68 0a 09  |Alias$* @.Dash..|
00002120  4c 69 73 74 56 61 72 20  46 69 6c 65 24 54 79 70  |ListVar File$Typ|
00002130  65 2a 0a 09 4c 69 73 74  56 61 72 20 41 6c 69 61  |e*..ListVar Alia|
00002140  73 24 40 4c 6f 61 64 54  79 70 65 2a 0a 09 4c 69  |s$@LoadType*..Li|
00002150  73 74 56 61 72 20 41 6c  69 61 73 24 40 52 75 6e  |stVar Alias$@Run|
00002160  54 79 70 65 2a 0a 09 4c  69 73 74 56 61 72 20 2a  |Type*..ListVar *|
00002170  4f 70 74 69 6f 6e 73 0a  44 61 73 68 0a 09 4f 70  |Options.Dash..Op|
00002180  74 69 6f 6e 20 22 22 20  2d 6c 65 6e 20 33 32 20  |tion "" -len 32 |
00002190  20 2d 73 75 62 20 22 44  79 6e 61 6d 69 63 3a 2f  | -sub "Dynamic:/|
000021a0  44 69 72 65 63 74 6f 72  3a 4d 65 6e 75 73 2e 53  |Director:Menus.S|
000021b0  79 73 74 65 6d 2e 56 61  72 69 61 62 6c 65 73 20  |ystem.Variables |
000021c0  2d 6d 61 74 63 68 20 7c  3c 4d 65 6e 75 54 65 78  |-match |<MenuTex|
000021d0  74 3e 22 20 2d 62 67 20  31 0a 45 6e 64 4d 65 6e  |t>" -bg 1.EndMen|
000021e0  75 0a 0a 7c 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |u..|------------|
000021f0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00002220  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 7c  |---------------||
00002230  0a 0a 4d 65 6e 75 20 22  4d 6f 75 73 65 22 0a 09  |..Menu "Mouse"..|
00002240  4f 70 74 69 6f 6e 20 22  38 20 22 0a 09 09 43 6f  |Option "8 "...Co|
00002250  6d 6d 61 6e 64 20 53 65  74 20 4f 57 42 24 20 22  |mmand Set OWB$ "|
00002260  7c 3c 32 3e 7c 3c 38 3e  7c 3c 38 3e 7c 3c 30 3e  ||<2>|<8>|<8>|<0>|
00002270  22 7c 4d 53 57 49 20 4f  53 5f 57 6f 72 64 20 32  |"|MSWI OS_Word 2|
00002280  31 20 7c 3c 4f 57 42 24  3e 7c 4d 55 6e 53 65 74  |1 |<OWB$>|MUnSet|
00002290  20 4f 57 42 24 0a 09 4f  70 74 69 6f 6e 20 22 36  | OWB$..Option "6|
000022a0  20 22 0a 09 09 43 6f 6d  6d 61 6e 64 20 53 65 74  | "...Command Set|
000022b0  20 4f 57 42 24 20 22 7c  3c 32 3e 7c 3c 36 3e 7c  | OWB$ "|<2>|<6>||
000022c0  3c 36 3e 7c 3c 30 3e 22  7c 4d 53 57 49 20 4f 53  |<6>|<0>"|MSWI OS|
000022d0  5f 57 6f 72 64 20 32 31  20 7c 3c 4f 57 42 24 3e  |_Word 21 |<OWB$>|
000022e0  7c 4d 55 6e 53 65 74 20  4f 57 42 24 0a 09 4f 70  ||MUnSet OWB$..Op|
000022f0  74 69 6f 6e 20 22 34 20  22 0a 09 09 43 6f 6d 6d  |tion "4 "...Comm|
00002300  61 6e 64 20 53 65 74 20  4f 57 42 24 20 22 7c 3c  |and Set OWB$ "|<|
00002310  32 3e 7c 3c 34 3e 7c 3c  34 3e 7c 3c 30 3e 22 7c  |2>|<4>|<4>|<0>"||
00002320  4d 53 57 49 20 4f 53 5f  57 6f 72 64 20 32 31 20  |MSWI OS_Word 21 |
00002330  7c 3c 4f 57 42 24 3e 7c  4d 55 6e 53 65 74 20 4f  ||<OWB$>|MUnSet O|
00002340  57 42 24 0a 09 4f 70 74  69 6f 6e 20 22 32 22 20  |WB$..Option "2" |
00002350  2d 6c 65 6e 20 33 20 2d  62 67 20 31 0a 09 09 43  |-len 3 -bg 1...C|
00002360  6f 6d 6d 61 6e 64 20 53  65 74 20 4f 57 42 24 20  |ommand Set OWB$ |
00002370  22 7c 3c 32 3e 7c 3c 3c  4d 65 6e 75 54 65 78 74  |"|<2>|<<MenuText|
00002380  3e 3e 7c 3c 3c 4d 65 6e  75 54 65 78 74 3e 3e 7c  |>>|<<MenuText>>||
00002390  3c 30 3e 22 7c 4d 53 57  49 20 4f 53 5f 57 6f 72  |<0>"|MSWI OS_Wor|
000023a0  64 20 32 31 20 7c 3c 4f  57 42 24 3e 7c 4d 55 6e  |d 21 |<OWB$>|MUn|
000023b0  53 65 74 20 4f 57 42 24  0a 45 6e 64 4d 65 6e 75  |Set OWB$.EndMenu|
000023c0  0a 0a 7c 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |..|-------------|
000023d0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00002400  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 7c 0a  |--------------|.|
00002410  0a 4d 65 6e 75 20 53 63  72 65 65 6e 42 6c 61 6e  |.Menu ScreenBlan|
00002420  6b 0a 09 4f 70 74 69 6f  6e 20 22 42 6c 61 6e 6b  |k..Option "Blank|
00002430  20 6e 6f 77 22 0a 09 09  43 6f 6d 6d 61 6e 64 20  | now"...Command |
00002440  22 53 57 49 20 53 63 72  65 65 6e 42 6c 61 6e 6b  |"SWI ScreenBlank|
00002450  65 72 5f 43 6f 6e 74 72  6f 6c 20 30 22 0a 09 4f  |er_Control 0"..O|
00002460  70 74 69 6f 6e 20 22 4f  66 66 22 0a 09 09 43 6f  |ption "Off"...Co|
00002470  6d 6d 61 6e 64 20 22 42  6c 61 6e 6b 54 69 6d 65  |mmand "BlankTime|
00002480  20 30 22 0a 09 4f 70 74  69 6f 6e 20 22 31 20 4d  | 0"..Option "1 M|
00002490  69 6e 22 0a 09 09 43 6f  6d 6d 61 6e 64 20 22 42  |in"...Command "B|
000024a0  6c 61 6e 6b 54 69 6d 65  20 36 30 22 0a 09 4f 70  |lankTime 60"..Op|
000024b0  74 69 6f 6e 20 22 35 20  4d 69 6e 73 22 0a 09 09  |tion "5 Mins"...|
000024c0  43 6f 6d 6d 61 6e 64 20  22 42 6c 61 6e 6b 54 69  |Command "BlankTi|
000024d0  6d 65 20 33 30 30 22 0a  09 4f 70 74 69 6f 6e 20  |me 300"..Option |
000024e0  22 31 30 20 4d 69 6e 73  22 0a 09 09 43 6f 6d 6d  |"10 Mins"...Comm|
000024f0  61 6e 64 20 22 42 6c 61  6e 6b 54 69 6d 65 20 36  |and "BlankTime 6|
00002500  30 30 22 0a 45 6e 64 4d  65 6e 75 0a 0a 7c 2d 2d  |00".EndMenu..|--|
00002510  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00002550  2d 2d 2d 2d 2d 2d 2d 2d  2d 7c 0a 0a 4d 65 6e 75  |---------|..Menu|
00002560  20 22 57 69 6d 70 20 53  70 72 69 74 65 73 22 0a  | "Wimp Sprites".|
00002570  09 4f 70 74 69 6f 6e 20  22 52 41 4d 22 0a 09 09  |.Option "RAM"...|
00002580  43 6f 6d 6d 61 6e 64 20  53 57 49 20 57 69 6d 70  |Command SWI Wimp|
00002590  5f 42 61 73 65 4f 66 53  70 72 69 74 65 73 20 54  |_BaseOfSprites T|
000025a0  4f 20 72 6f 6d 20 72 6d  61 7c 4d 53 57 49 20 4f  |O rom rma|MSWI O|
000025b0  53 5f 53 70 72 69 74 65  4f 70 20 26 31 30 43 20  |S_SpriteOp &10C |
000025c0  7c 3c 72 6d 61 3e 20 22  3c 57 69 6d 70 24 53 63  ||<rma> "<Wimp$Sc|
000025d0  72 61 70 3e 22 7c 4d 46  69 6c 65 72 5f 52 75 6e  |rap>"|MFiler_Run|
000025e0  20 3c 57 69 6d 70 24 53  63 72 61 70 3e 0a 09 4f  | <Wimp$Scrap>..O|
000025f0  70 74 69 6f 6e 20 22 52  4f 4d 22 0a 09 09 43 6f  |ption "ROM"...Co|
00002600  6d 6d 61 6e 64 20 53 57  49 20 57 69 6d 70 5f 42  |mmand SWI Wimp_B|
00002610  61 73 65 4f 66 53 70 72  69 74 65 73 20 54 4f 20  |aseOfSprites TO |
00002620  72 6f 6d 20 72 6d 61 7c  4d 53 57 49 20 4f 53 5f  |rom rma|MSWI OS_|
00002630  53 70 72 69 74 65 4f 70  20 26 31 30 43 20 7c 3c  |SpriteOp &10C |<|
00002640  72 6f 6d 3e 20 22 3c 57  69 6d 70 24 53 63 72 61  |rom> "<Wimp$Scra|
00002650  70 3e 22 7c 4d 46 69 6c  65 72 5f 52 75 6e 20 3c  |p>"|MFiler_Run <|
00002660  57 69 6d 70 24 53 63 72  61 70 3e 0a 45 6e 64 4d  |Wimp$Scrap>.EndM|
00002670  65 6e 75 0a 0a 7c 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |enu..|----------|
00002680  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
000026c0  2d 7c 0a 0a 4d 65 6e 75  20 22 42 61 63 6b 64 72  |-|..Menu "Backdr|
000026d0  6f 70 22 0a 09 4f 70 74  69 6f 6e 20 22 44 65 66  |op"..Option "Def|
000026e0  61 75 6c 74 22 0a 09 09  43 6f 6d 6d 61 6e 64 20  |ault"...Command |
000026f0  46 69 6c 65 72 5f 52 75  6e 20 42 6f 6f 74 3a 43  |Filer_Run Boot:C|
00002700  68 6f 69 63 65 73 2e 42  6f 6f 74 2e 54 61 73 6b  |hoices.Boot.Task|
00002710  73 2e 43 6f 6e 66 69 67  75 72 65 0a 09 4f 70 74  |s.Configure..Opt|
00002720  69 6f 6e 20 22 52 65 6d  6f 76 65 22 0a 09 09 43  |ion "Remove"...C|
00002730  6f 6d 6d 61 6e 64 20 42  61 63 6b 64 72 6f 70 20  |ommand Backdrop |
00002740  2d 72 65 6d 6f 76 65 0a  09 54 72 65 65 50 69 63  |-remove..TreePic|
00002750  6b 20 54 65 78 74 75 72  65 73 20 53 70 72 69 74  |k Textures Sprit|
00002760  65 20 42 6f 6f 74 3a 52  65 73 6f 75 72 63 65 73  |e Boot:Resources|
00002770  2e 43 6f 6e 66 69 67 75  72 65 2e 54 65 78 74 75  |.Configure.Textu|
00002780  72 65 73 20 73 6d 61 6c  6c 5f 64 69 72 20 42 61  |res small_dir Ba|
00002790  63 6b 64 72 6f 70 20 2d  74 69 6c 65 20 25 30 0a  |ckdrop -tile %0.|
000027a0  09 54 72 65 65 50 69 63  6b 20 4f 74 68 65 72 73  |.TreePick Others|
000027b0  2e 2e 2e 20 53 70 72 69  74 65 20 52 6f 6f 74 3a  |... Sprite Root:|
000027c0  4f 64 64 6d 65 6e 74 73  2e 42 61 63 6b 64 72 6f  |Oddments.Backdro|
000027d0  70 73 20 73 6d 61 6c 6c  5f 64 69 72 20 42 61 63  |ps small_dir Bac|
000027e0  6b 64 72 6f 70 20 2d 74  69 6c 65 20 25 30 0a 45  |kdrop -tile %0.E|
000027f0  6e 64 4d 65 6e 75 0a 0a  7c 2d 2d 2d 2d 2d 2d 2d  |ndMenu..|-------|
00002800  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00002840  2d 2d 2d 2d 7c 0a 0a 4d  65 6e 75 20 22 54 6f 6f  |----|..Menu "Too|
00002850  6c 73 22 0a 09 4f 70 74  69 6f 6e 20 22 33 44 22  |ls"..Option "3D"|
00002860  0a 09 09 43 6f 6d 6d 61  6e 64 20 4e 65 77 54 6f  |...Command NewTo|
00002870  6f 6c 73 20 52 65 73 6f  75 72 63 65 73 3a 24 2e  |ols Resources:$.|
00002880  52 65 73 6f 75 72 63 65  73 2e 57 69 6d 70 2e 54  |Resources.Wimp.T|
00002890  6f 6f 6c 73 0a 09 4f 70  74 69 6f 6e 20 22 32 44  |ools..Option "2D|
000028a0  22 0a 09 09 43 6f 6d 6d  61 6e 64 20 4e 65 77 54  |"...Command NewT|
000028b0  6f 6f 6c 73 20 42 6f 6f  74 3a 52 65 73 6f 75 72  |ools Boot:Resour|
000028c0  63 65 73 2e 43 6f 6e 66  69 67 75 72 65 2e 32 44  |ces.Configure.2D|
000028d0  54 6f 6f 6c 73 0a 09 54  72 65 65 50 69 63 6b 20  |Tools..TreePick |
000028e0  4f 74 68 65 72 73 2e 2e  2e 20 53 70 72 69 74 65  |Others... Sprite|
000028f0  20 52 6f 6f 74 3a 4f 64  64 6d 65 6e 74 73 2e 54  | Root:Oddments.T|
00002900  6f 6f 6c 53 70 72 69 74  65 73 20 73 6d 61 6c 6c  |oolSprites small|
00002910  5f 64 69 72 20 4e 65 77  54 6f 6f 6c 73 20 25 30  |_dir NewTools %0|
00002920  0a 45 6e 64 4d 65 6e 75  0a 0a 7c 2d 2d 2d 2d 2d  |.EndMenu..|-----|
00002930  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00002970  2d 2d 2d 2d 2d 2d 7c 0a  0a 4d 65 6e 75 20 22 50  |------|..Menu "P|
00002980  61 6c 65 74 74 65 22 0a  09 49 66 54 68 65 72 65  |alette"..IfThere|
00002990  49 73 20 2d 46 69 6c 65  20 2d 58 20 42 6f 6f 74  |Is -File -X Boot|
000029a0  3a 43 68 6f 69 63 65 73  2e 50 61 6c 65 74 74 65  |:Choices.Palette|
000029b0  20 22 4f 70 74 69 6f 6e  20 44 65 66 61 75 6c 74  | "Option Default|
000029c0  20 2d 70 61 74 68 20 42  6f 6f 74 3a 43 68 6f 69  | -path Boot:Choi|
000029d0  63 65 73 2e 50 61 6c 65  74 74 65 22 0a 09 49 66  |ces.Palette"..If|
000029e0  54 68 65 72 65 49 73 20  2d 46 69 6c 65 20 2d 58  |ThereIs -File -X|
000029f0  20 42 6f 6f 74 3a 50 61  6c 65 74 74 65 2e 44 65  | Boot:Palette.De|
00002a00  66 61 75 6c 74 20 22 4f  70 74 69 6f 6e 20 44 65  |fault "Option De|
00002a10  66 61 75 6c 74 20 2d 70  61 74 68 20 42 6f 6f 74  |fault -path Boot|
00002a20  3a 50 61 6c 65 74 74 65  2e 44 65 66 61 75 6c 74  |:Palette.Default|
00002a30  22 0a 09 49 66 54 68 65  72 65 49 73 20 2d 44 69  |"..IfThereIs -Di|
00002a40  72 20 2d 58 20 42 6f 6f  74 3a 50 61 6c 65 74 74  |r -X Boot:Palett|
00002a50  65 20 22 4f 70 74 69 6f  6e 20 50 61 6c 65 74 74  |e "Option Palett|
00002a60  65 20 2d 73 75 62 20 50  61 74 68 3a 42 6f 6f 74  |e -sub Path:Boot|
00002a70  3a 50 61 6c 65 74 74 65  22 0a 45 6e 64 4d 65 6e  |:Palette".EndMen|
00002a80  75 0a 0a 7c 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |u..|------------|
00002a90  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00002ac0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 7c  |---------------||
00002ad0  0a 0a 4d 65 6e 75 20 22  46 61 63 74 6f 72 22 0a  |..Menu "Factor".|
00002ae0  09 4f 70 74 69 6f 6e 20  22 22 20 2d 6c 65 6e 20  |.Option "" -len |
00002af0  31 30 20 2d 73 75 62 20  22 44 79 6e 61 6d 69 63  |10 -sub "Dynamic|
00002b00  3a 2f 44 69 72 65 63 74  6f 72 3a 4d 65 6e 75 73  |:/Director:Menus|
00002b10  2e 53 79 73 74 65 6d 2e  46 61 63 74 6f 72 20 2d  |.System.Factor -|
00002b20  6e 20 7c 3c 4d 65 6e 75  54 65 78 74 3e 22 0a 45  |n |<MenuText>".E|
00002b30  6e 64 4d 65 6e 75 0a 0a                           |ndMenu..|
00002b38

© Dominic Ford 2021–2025.

Our privacy policy is here.
Last updated: 01 May 2025, 21:49 UTC
Website designed by .