SUB "Spaces visible?" "" SetPrefs ShowSpaces Toggle
SUB "Eols visible?" "" SetPrefs ShowEOLs Toggle
SUB "Esc codes visible?" "" NOP
BAR
ITEM "Scroll bar" "" NOP
SUB "Scroll bar on left" "" ExecARexxString "SetPrefs ScrollGadget 1; RemakeScreen"
SUB "Scroll bar on right" "" ExecARexxString "SetPrefs ScrollGadget 0; RemakeScreen"
SUB "No scroll bar" "" ExecARexxString "SetPrefs ScrollGadget 2; RemakeScreen"
MENU "Special"
ITEM "View operations" "" NOP
SUB "Previous view" "" ActivatePrevDoc
SUB "Next view" "" ActivateNextDoc
SBAR
SUB "Split view" "" SplitView Toggle
SBAR
SUB "Expand view" "" SizeView 1000
SBAR
SUB "Grow view" "" SizeView 1
SUB "Shrink view" "" SizeView -1
ITEM "Format" "" NOP
SUB "With fill" "" NOP
SUB "Without fill" "" FormatParagraph
ITEM "Dos/ARexx interface" "" ExecARexxMacro
BAR
ITEM "Enter ascii..." "" OpenRequester Hex
ITEM "Center cursor" "" CenterView
ITEM "Center line" "" Center
BAR
ITEM "Repeat key/menu..." "" NOP
ITEM "Find matching bracket" "" MoveMatchBkt
BAR
ITEM "Mark location 1" "" SetBookmark 1
ITEM "Mark location 2" "" SetBookmark 2
ITEM "Mark location 3" "" SetBookmark 3
ITEM "Jump to mark 1" "" MoveBookmark 1
ITEM "Jump to mark 2" "" MoveBookmark 2
ITEM "Jump to mark 3" "" MoveBookmark 3
MENU "Cut/Paste"
ITEM "Mark" "" MarkBlk
ITEM "Mark columnar" "" MarkBlk Vertical
ITEM "Cut" "" CutBlk
ITEM "Copy" "" CopyBlk
ITEM "Paste" "" PasteClip
ITEM "Set clipboard unit..." "" NOP
ITEM "Rot marked" "" EncryptBlk
ITEM "Strip CR marked" "" NOP
ITEM "Change case marked" "" NOP
BAR
ITEM "Delete word" "Ctrl Del" DeleteEOW
ITEM "Undelete word" "Ctrl Alt Del" NOP
ITEM "Bck Spc word" "Ctrl BckSpc" DeleteSOW
ITEM "UnBck Spc word" "Ctrl Alt BckSpc" NOP
BAR
ITEM "Delete line" "" DeleteLine
ITEM "Delete to EOL" "" DeleteEOL
ITEM "Undelete line" "" UndeleteLine
MENU "Search/Replace"
ITEM "Repeat search backwards" "" Find
ITEM "Repeat search forwards" "" Find
ITEM "Search for..." "" OpenRequester Find
ITEM "Repeat replace" "" FindChange
ITEM "Replace..." "" OpenRequester FindChange
ITEM "Clip to search buffer" "" NOP
ITEM "Set ASCII zero alias for search..." "" NOP
BAR
ITEM "Change case letter" "" ToggleCharCase
ITEM "Change case word" "" NOP
ITEM "Upper case word" "" Conv2Upper
ITEM "Lower case word" "" Conv2Lower
MENU "Move"
ITEM "Jump to line..." "" Move
ITEM "Jump to auto-mark" "" MoveAutomark
ITEM "Jump to byte" "" MoveChar
BAR
ITEM "Shift-Cursor keys" "" NOP
ITEM " Beg of screen" "" MoveUpScr
ITEM " End of screen" "" MoveDownScr
ITEM " Beg of line" "" MoveSOL
ITEM " End of line" "" MoveEOL
BAR
ITEM "Alt-Cursor keys" "" NOP
ITEM " Up 12 lines" "" MoveUp 12
ITEM " Down 12 lines" "" MoveDown 12
ITEM " Left 12 chars" "" MoveLeft 12
ITEM " Right 12 chars" "" MoveRight 12
BAR
ITEM "Ctrl-Cursor keys" "" NOP
ITEM " Beg of file" "" MoveSOF
ITEM " End of file" "" MoveEOF
ITEM " Prev word" "" MovePrevWord
ITEM " Next word" "" MoveNextWord
MENU "Prefs"
ITEM "Change..." "" OpenRequester Prefs
BAR
ITEM "Open Prefs..." "" OpenPrefs
ITEM "Save Prefs As..." "" SavePrefs
ITEM "Save As Defaults" "" SaveDefPrefs
BAR
ITEM "Open Definitions..." "" OpenDefinitions
#
KEYBOARD:
RETURN InsertLine
ENTER InsertLine Indent NoBreak
SHIFT-TAB MovePrevTabStop
CTRL-ESC OpenDoc
CTRL-N ActivateNextDoc
HELP OpenRequester Info
AMIGA-O OpenFile
AMIGA-SHIFT-O ExecARexxString "OPTIONS RESULTS; RequestFile PROMPT '*"Select File to Insert*"'; IF RC=0 THEN DO; 'OpenClip' RESULT; IF RC=0 THEN PasteClip; END"
AMIGA-W SaveFile
AMIGA-SHIFT-W SaveFileAs
AMIGA-P PrintClip
AMIGA-SHIFT-P PrintFile
AMIGA-Q CloseDoc
AMIGA-SHIFT-Q ExecARexxString "SaveFile; IF RC=0 THEN CloseDoc"