home *** CD-ROM | disk | FTP | other *** search
- ; ************************* OEd Menu Layout: *************************
- ;
- ; There be an arbitrary number of menu strips. Each must be introduced
- ; by an statement of the form
- ;
- ; MENU <name>
- ;
- ; The following lines specify the menu's items. An item may be a seperator
- ; line or a selectable menu item. Seperator lines are defined by
- ;
- ; SEPARATOR
- ;
- ; Selectable items are created with a statement like
- ;
- ; ITEM <name> <command>
- ;
- ; where <name> is the name of the item and <command> is an OEd command
- ; specifying the action a selection of the item should cause.
- ;
- ; Subitems are currently not supported.
- ;
- ; Menu Shortcuts are not defined here. The file Oberon:OEd_Keys.txt is used
- ; for this.
- ;
- ; IMPORTANT NOTES:
- ;
- ; OEd does not check if your menu fits on the screen. So if one of your
- ; menus is too big and you're not using AmigaOS 2.0 your machine may
- ; crash.
- ;
- ; The lines of this text mustn't be longer that 256 characters.
- ;
-
- MENU "Project"
-
- ITEM "Load..." (load)
- ITEM "New Window..." (newwindow)
- ITEM "Save" (save)
- ITEM "Save as..." (saveas)
- ITEM "Save Block..." (bsave)
- ITEM "Insert File..." (insfile)
- SEPARATOR
- ITEM "Print" (print)
- ITEM "Print Block" (printblock)
- ITEM "Print As..." (printas)
- ITEM "Print Block As..." (printblkas)
- SEPARATOR
- ITEM "Hide" (hide)
- ITEM "Reveal..." (reveal)
- SEPARATOR
- ITEM "Screen Mode..." (screenmode)
- SEPARATOR
- ITEM "About..." (about)
- ITEM "Quit" (quit)
-
-
- MENU "Search"
-
- ITEM "Find..." (find)
- ITEM "Next" (next)
- ITEM "Previous" (prev)
- SEPARATOR
- ITEM "Find-Replace..." (findrep)
- ITEM "Next-Replace" (nextrep)
- ITEM "Previous-Replace" (prevrep)
- SEPARATOR
- ITEM "Find Word" (execrexx (options results; getword; findstr result; next))
- SEPARATOR
- ITEM "Case sensitive" (casesens)
- ITEM "Word by Word" (wordbyword)
-
-
- MENU "Block"
-
- ITEM "Begin" (bbegin)
- ITEM "End" (bend)
- ITEM "Mark All" (markall)
- ITEM "Copy Block" (bcopy)
- ITEM "Move" (bmove)
- ITEM "Delete" (bdelete)
- SEPARATOR
- ITEM "Cut" (cut)
- ITEM "Copy" (copy)
- ITEM "Paste" (paste)
- SEPARATOR
- ITEM "TAB right" (btabright)
- ITEM "TAB left " (btableft)
- SEPARATOR
- ITEM "Unmark" (bunmark)
-
-
- MENU "Special"
-
- ITEM "Enter Rexx Cmd..." (enterrexx)
- ITEM "Execute Rexx Cmd" (execrexx)
- ITEM "Stop Rexx (HI)" (stoprexx)
- SEPARATOR
- ITEM "Goto Line..." (gotoy)
- ITEM "Goto Last Change" (gotolastch)
- SEPARATOR
- ITEM "Matching Bracket" (mbracket)
- ITEM "Change Case" (changecase)
- SEPARATOR
- ITEM "Undo" (undo)
- ITEM "Redo" (redo)
- ITEM "Undo All" (undoall)
- ITEM "Redo All" (redoall)
- ITEM "Clear All Undos" (clearundos)
- SEPARATOR
- ITEM "Undelete Line" (undeline)
-
-
- MENU "Macros"
-
- ITEM "Start Learning" (startmacro (t:RexxMacro_F10.oed))
- ITEM "Stop Learning" (stopmacro)
- ITEM "Play Macro" (rx (t:RexxMacro_F10.oed))
-
-
- MENU "Oberon"
-
- ITEM "Parse" (parse)
- ITEM "Compile..." (compile)
- ITEM "Link..." (link)
- ITEM "Make..." (make)
- ITEM "Execute..." (execute)
- SEPARATOR
- ITEM "Compiler Options..." (coptions)
- SEPARATOR
- ITEM "Next Error" (nexterror)
- ITEM "First Error" (firsterror)
- ITEM "Reload Errorfile" (reloaderrs)
-
-
- MENU "Options"
-
- ITEM "StackChk" (stackchk)
- ITEM "OvflChk" (ovflchk)
- ITEM "RangeChk" (rangechk)
- ITEM "CaseChk" (casechk)
- ITEM "ReturnChk" (returnchk)
- ITEM "NilChk" (nilchk)
- ITEM "TypeChk" (typechk)
- ITEM "OddChk" (oddchk)
- ITEM "AutRegPars" (autoregpars)
- ITEM "Clear Vars" (clearvars)
- ITEM "New Symbolfile" (newsymfile)
- SEPARATOR
- ITEM "SmallCode" (smallcode)
- ITEM "SmallData" (smalldata)
- ITEM "Garbage-Collector" (garbagecollector)
- ITEM "Language Extensions" (extensions)
- SEPARATOR
- ITEM "Debug" (debug)
- SEPARATOR
- ITEM "68010" (mc68010)
- ITEM "68020" (mc68020)
- ITEM "68030" (mc68030)
- ITEM "68881/68882" (mc68881)
-
-
- MENU "Settings"
-
- ITEM "Insert" (insert)
- ITEM "Layout Mode" (layout)
- ITEM "Auto Uppercase" (autouc)
- SEPARATOR
- ITEM "Create Icons?" (icons)
- ITEM "Set Script Flag?" (script)
- SEPARATOR
- ITEM "No Umlauts" (execrexx ('map (ä (write ae))'; 'map (ö (write oe))'; 'map (ü (write ue))'; 'map (Ä (write Ae))'; 'map (Ö (write Oe))'; 'map (Ü (write Ue))'; 'map (ß (write ss))'))
- ITEM "Umlauts" (execrexx ('map (ä (write ä))'; 'map (ö (write ö))'; 'map (ü (write ü))'; 'map (Ä (write Ä))'; 'map (Ö (write Ö))'; 'map (Ü (write Ü))'; 'map (ß (write ß))'))
- SEPARATOR
- ITEM "Wordwrap on" (map (SPACE (execrexx (options results; getposx; if result<77 then 'write " "'; else do; wleft; getposx; if result>1 then do; split; last; right; end; else 'return'; end))))
- ITEM "Wordwrap off" (map (SPACE (write " ")))
-