home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Elysian Archive
/
AmigaElysianArchive.iso
/
wp_dtp
/
jed207.lha
/
macros
/
jed-menus
< prev
next >
Wrap
Text File
|
1993-01-16
|
5KB
|
104 lines
MENU "Project"
ITEM "Open file..." "o" "(openfile (freq `r' `file...' (info `fullname')))"
ITEM "Open new file..." "/" "(newfile (freq `r' `new file...' (info `dirname')))"
ITEM "Open new view" "d" "(newview)"
ITEM "Include file..." "O" "(insert `f' (freq `r' `include file...' (info `dirname')))"
BAR
ITEM "Save" "w" "(savefile)"
ITEM "Save as..." "W" "(savefileas (freq `w' `save file as...' (info `fullname')))"
ITEM "Clear text" "C" "(clear)"
ITEM "Rename file..." "" "(rename (getstr `newname> '))"
ITEM "Print file..." "P" "(savesection `f' `prt:')"
BAR
ITEM "Sleep window" "" "(sleep)"
ITEM "Quit window" "q" "(close)"
MENU "Edit"
ITEM "Mark block" "b" "(block `t')"
BAR
ITEM "Copy block" "c" "(copy `b' 0)"
ITEM "Cut block" "x" "(cut `b' 0)"
ITEM "Insert clip" "v" "(insert `cb' 0)"
ITEM "Erase block" "z" "(delete `b')"
ITEM "Insert block" "i" "(insert `b')"
ITEM "Save block..." "n" "(savesection `b' (freq `w' `save block as...' (info `dirname')))"
ITEM "Print block..." "p" "(savesection `b' `prt:')"
BAR
ITEM "Delete line" "" "(cut `l' -1)"
ITEM "Delete to EOL" "" "(cut `el' -1)"
ITEM "Undelete line" "" "(insert `cb' -1)"
MENU "Find"
ITEM "Search for..." "S" "(if (find `s' (getstr `find> ')) `(find `n')')"
ITEM "Repeat search" "s" "(find `n')"
ITEM "Replace..." "R" "(if (replace `s' (getstr `replace> ')) `(if (replace `r') `(find `n')')')"
ITEM "Repeat replace" "r" "(if (replace `r') `(find `n')')"
ITEM "Global replace" "" "(dlock 1)(move `sm' 0)(move `sf')(move `sl')(while `(find `n')' `(replace `r')')(move `bm' 0)(dlock 0)"
ITEM "Regular Expressions" "" ""
SUB "on" "" "(find `r' 1)"
SUB "off" "" "(find `r' 0)"
ITEM "Case significant" "" ""
SUB "on" "" "(find `c' 1)"
SUB "off" "" "(find `c' 0)"
ITEM "Use wildcards" "" ""
SUB "on" "" "(find `w' 1)"
SUB "off" "" "(find `w' 0)"
BAR
ITEM "Line..." "j" "(move `ln' (getnum `line> '))"
ITEM "Matching bracket" "h" "(move `mb')"
ITEM "Reference" "" "(getref)"
BAR
ITEM "Auto-mark" "#" "(move `am')"
ITEM "Bookmark" "" ""
SUB "Mark 1" "" "(move `bm' 1)"
SUB "Mark 2" "" "(move `bm' 2)"
SUB "Mark 3" "" "(move `bm' 3)"
ITEM "Set bookmark" "" ""
SUB "Mark 1" "" "(move `sm' 1)"
SUB "Mark 2" "" "(move `sm' 2)"
SUB "Mark 3" "" "(move `sm' 3)"
MENU "Other"
ITEM "Cycle windows" "." "(nextwind `a')"
ITEM "Expand window" "[" "(position 0 0 (info `screenx') (info `screeny'))"
BAR
ITEM "Enter command" "" "(cli)"
ITEM "AmigaDOS command" "" "(system (getstr `system> '))"
ITEM "Insert date" "" "(insert `s' (info `date'))"
BAR
ITEM "Undo line" "l" "(undo `l')"
ITEM "Undo any line" "L" "(undo `L')"
ITEM "Store file" "U" "(global (format `%s_chg' (info `filename')) (info `changes'))(savesection `f' (format `t:%s' (info `filename')))"
ITEM "Restore file" "u" "(changes 0)(openfile (format `t:%s' (info `filename')))(changes (script `s' (format `(%s_chg)' (info `filename'))))"
MENU "Settings"
ITEM "Set screen tab..." "" "(setpref `tabsize' (getnum `tabs> '))"
ITEM "Set disk tab..." "" "(setpref `disktab' (getnum `dtabs> '))"
ITEM "Set left margin..." "" "(setpref `leftmargin' (getnum `lmargin> '))"
ITEM "Set right margin..." "" "(setpref `rightmargin' (getnum `rmargin> '))"
ITEM "Set backup dir..." "" "(setpref `bakdir' (getstr `backup dir> '))"
ITEM "Set max backups..." "" "(setpref `baknum' (getnum `backups> '))"
ITEM "Set font..." "" "(setpref `font' (getstr `font> ') (getnum `size> '))"
ITEM "Set screen..." "" "(setpref `pubscreen' (getstr `public screen> '))"
ITEM "Auto indent" "" ""
SUB "on" "" "(setpref `autoindent' 1)"
SUB "off" "" "(setpref `autoindent' 0)"
ITEM "Word wrap" "" ""
SUB "on" "" "(setpref `wordwrap' 1)"
SUB "off" "" "(setpref `wordwrap' 0)"
ITEM "Save tabs" "" ""
SUB "none" "" "(setpref `savetabs' 0)"
SUB "leading" "" "(setpref `savetabs' 1)"
SUB "all" "" "(setpref `savetabs' 2)"
ITEM "Snapshot window" "" ""
SUB "on exit" "" "(setpref `nosnapshot' 0)"
SUB "never" "" "(setpref `nosnapshot' 1)"
SUB "now" "" "(setpref `nosnapshot' 2)"
BAR
ITEM "Save settings on exit" "" ""
SUB "yes" "" "(saveprefs 1)"
SUB "no" "" "(saveprefs 0)"
END