Category : Recently Uploaded Files
Archive   : AURORA21.ZIP
Filename : CUKBD.AML

 
Output of file : CUKBD.AML contained in archive : AURORA21.ZIP

// -------------------------------------------------------------------
// The Aurora Editor v2.1
// Copyright 1993-1995 nuText Systems. All Rights Reserved Worldwide.
//
// Aurora/CUA Keyboard definitions (included by MAIN.AML)
//
// If you have made any changes, save this file and select 'Recompile
// the Editor' from the Set menu. Exit and re-enter the editor for
// your changes to take effect.
// -------------------------------------------------------------------

// -------------------------------------------------------------------
// Edit and File Manager windows
// -------------------------------------------------------------------

object edit_fmgr

// Controls
function 'ð' // close window
close
end

// Menu activation
key gotobar // to last menu bar item
key gotobar // to last menu bar item
key gotomenu // goto last pull-down menu

key gotomenu "file" // to file menu (cua)
key gotomenu "macro" // to macro menu (cua)
key gotomenu "options" // to options menu (cua)
key gotomenu "window" // to window menu (cua)
key gotomenu "help" // to help menu (cua)
key gotomenu "help" // to help menu (cua)

// Scroll
key pagedown // scroll down (cua)
key pageup // scroll up (cua)
key row (getviewtop) // to page top
key row (getviewbot) // to page bottom
key row 1 // to file top (cua)
key row (getlines) // to file bottom (cua)
key
adjustrow // center cursor
key adjustrow 1 // scroll to page top
key adjustrow (getviewrows) // scroll to page bottom
key rollrow -1 // scroll up one line
key rollrow 1 // scroll down one line
key lastpos // to last cursor position

// print w/prompt for marked text
function print2
if mark? then
case yncbox "Print Marked Block Only?"
when 'Yes' options = 'b'
when 'Cancel', '' return
end
end
print options
end

// File
key opennew // new edit window
key askopen // open prompt (cua)
key askopen // open prompt (cua)
key openlast // open last window
key filelist // file list
key print2 // print
key close // close window
key close // close window (cua-win)
key closeall // close all windows (cua-win)
key closeall // close all windows and save
key quickref 'qw' // quick function reference
key quickref 'fw' // function reference

// Window
key winlist // window list (cua)
key minimize // minimize window
key maximize // maximize window
key nextwindow // next window (cua)
key prevwindow // prev window (cua)
key tile 'v' // tile vertical
key tile 'h' // tile horizontal
key cascade // cascade
key close // close window

// Search
key askscan // file scan prompt
key gotomark 't' // find top of block
key cyclebook // cycle through bookmarks

// Set
key togglemode // toggle video mode
key recompile // recompile the editor

// Macro
key pickmacro // macro picklist
key runmac "maclist" // macro menu
key askeval // macro command prompt
key askrun // DOS command prompt
key shell // exit to DOS

// Other
key opencfg "tran" // edit translation table

// undefined or unnamed keys
key (keycode)
say (getkeyname (keycode)) + " not defined"
end


// -------------------------------------------------------------------
// Prompts and Edit windows
// -------------------------------------------------------------------

object prompt

// Controls
function 'ð' // close window
close
end

function '*' // simulate
call // (2-line box only)
end

// Cursor
key left // move cursor left
key right // move cursor right
key col 1 // to column one
key col getlinelen + 1 // to end of line

// Cursor + CUA-marking
key left
smark
key right
smark
key col 1
smark
key col getlinelen + 1
smark

// Scroll
key rollcol -(getviewcols - 1) // page left
key rollcol getviewcols - 1 // page right

// Editing
key setting 'I' TOGGLE // toggle insert mode
key
if getmarkbuf == getcurrbuf then
deleteblock // delete selected text
else
delchar // delete character
end
end

key backsp // delete left character
key delchar (getlinelen) // erase to end of line
key literal // enter literal character
key asciilist // display ascii chart

// Block
//key markchar // mark character
key markcolumn // mark column
key markword // mark word
key markeol // mark to end of line
key destroymark // unmark

// copy block to prompt
key
instext (getmarktext)
col getlinelen + 1
end

// paste from clipboard to prompt (cua)

key
oldmark = usemark _ClipName
instext (getmarktext)
usemark oldmark
col getlinelen + 1
end
key call

// copy from prompt to clipboard (cua)
key copy
key copy

// Prompt history
key prevhist // retrieve prev prompt
key nexthist // retrieve next prompt
key askhistory // history popup menu
key askhistory // history popup menu

// Exit
key close // quit prompt

// non-function keys
key (character) // typeable keys
write character
end

// filename completion
key askcomplete // filename completion
key askcomplete
end


// -------------------------------------------------------------------
// Edit windows
// -------------------------------------------------------------------

object edit

// Controls
function 'ð'
close // close window
end

// Menu
key gotobar // to last menu bar item
key gotomenu "search" // to search menu (cua)
key gotomenu "fold" // to fold menu (cua)
key gotomenu "block" // to block menu (cua)
key gotomenu "edit" // to edit menu (cua)
key gotomenu "text" // to text menu (cua)

// Cursor
key up // move cursor up
key down // move cursor down

// Cursor + CUA-marking
key up
smark
key down
smark

key enter // enter key
key enter // keypad enter key

key
if getmarkbuf == getcurrbuf then
deleteblock // delete selected text
else
delchar2 // delete character
end
end

key backsp // delete left char
key delword _CSet // delete right word

key
if getmarkbuf == getcurrbuf then
shiftblock _TabWidth // shift block
else
tabright // tab right
end
end
key
if getmarkbuf == getcurrbuf then
shiftblock -_TabWidth // shift block
else
tableft // tab left
end
end

key prevword // find left word
smark // cua marking
key nextword // find right word
smark // cua marking

// Scroll
key pagedown // page down
key pageup // page up

// Scroll + CUA-marking
key pagedown
smark
key pageup
smark

key row 1 // to file top
smark
key row (getlines) // to file bottom
smark

// scroll up one line
key
rollrow -1
if getrow <> getviewbot then
down
end
end

// scroll down one line
key
rollrow 1
if getrow <> getviewtop then
up
end
end

// File
key askopen // open prompt (cua)
key askopen // open prompt (cua)
key askinsert // open and insert prompt
key askname // rename prompt
key save // save file (cua)
key save // save file (cua)
key open "*.*" // display file manager
key close // close window (cua-win)
key close // close window
key closeall // close all windows (cua-win)
//key close 's' // close window

// Edit
key undo // undo last change (cua)
key undo // undo last change (cua)
key redo // redo last change (cua) ??
key redo // redo last change (cua)

// clipboard keys
key cut // cut (cua)
key cut (if? (shiftkey?) 'a') // cut/cut-append (cua)
key copy // copy (cua)
key copy (if? (shiftkey?) 'a') // copy/copy-append (cua)
key paste // paste (cua)
key paste (if? (shiftkey?) 'o') // paste/paste-over (cua)
key clear // clear clipboard (cua)

key
if shiftkey? then
paste 'w' // paste from windows
else
copy 'w' // copy to windows
end
end

// cut/cut-append current line
key
undobegin
oldmark = usemark 'T'
markline
cut (if? (shiftkey?) 'a')
usemark oldmark
undoend
end

// Window
//key copywin // copy window
key splitwin 'v' // split window vertical
key toolbar // display tool bar

// Block
key markline // mark line
key markpara "tb" // mark paragraph
key copyblock2 // copyblock
key moveblock2 // move block
key moveblockover // move block over
key deleteblock2 // delete block
key shiftblock -1 // unindent block
key shiftblock 1 // indent block
key fillblock2 // fill block with string
key formatblock2 // reformat block
key formatblock2 "rj" // reformat & right just block
key saveblock2 // save block
key sortblock2 // sort block
key caseblock // change block to uppercase
key quote // quote a block
key justblock2 'c' // center a block

// Search
key askfind // find prompt (cua)
key askfind // find prompt
key askfind // find prompt (win)
key askrepl // replace prompt ??
key isearch // incremental search
key askfindo // find occurrences

key findlast // do last find/replace
key quickbook // set quick bookmark
key askrow // go to line prompt
key search2 "f/f" // go to next fold
key gotomatch2 // find matching char
key gotoerror // go to compiler error

// place bookmarks (ms-dos edit)
key <0> placebook '0'
key <1> placebook '1'
key <2> placebook '2'
key <3> placebook '3'
key <4> placebook '4'
key <5> placebook '5'
key <6> placebook '6'
key <7> placebook '7'
key <8> placebook '8'
key <9> placebook '9'

// goto bookmarks (ms-dos edit)
key <0> gotobook2 '0'
key <1> gotobook2 '1'
key <2> gotobook2 '2'
key <3> gotobook2 '3'
key <4> gotobook2 '4'
key <5> gotobook2 '5'
key <6> gotobook2 '6'
key <7> gotobook2 '7'
key <8> gotobook2 '8'
key <9> gotobook2 '9'

// Fold
key foldline // fold next line
key foldline 'u' // unfold next line
key destroyfold2 // destroy closed/open fold
key // open or close fold
if fold? then
openfold
else
closefold
end
end
key foldall 'os' // open all folds
key foldall 'cs' // close all folds

// Text
key insline2 // insert line
key delline // delete line
key joinline // join line
key insline (gettext) // duplicate line
key swapline // swap line
key centerline // center line
key commentline // comment/uncomment line
key timestamp // date/time stamp
key tabfile // expand tabs
key hiliteword // highlight words

// Set
key setting 'L' TOGGLE // live word wrap toggle
key setting 'D' TOGGLE // line draw toggle

// Macro
key compilemacro2 (getbufname) // compile current file
key runmacro2 (getbufname) // run current file

// non-function (typeable) keys
key (character) // typeable keys
write character
end

// Other
key askrepkey // repeat entered keys

// invoke a spell checker from within an edit window
// (replace 'jspell' with your favorite spell checker)
key
save // save the current file
run "jspell " + getbufname "ck" // call spellchecker
reopen // reopen current file
end

// -------------------------------------------------------------------
// File Manager windows
// -------------------------------------------------------------------

object fmgr

// Menu activation
key gotomenu "mark" // to mark menu (cua)
key gotomenu "command" // to command menu (cua)
key gotomenu "sort" // to sort menu (cua)
key gotobar2 // to drive menu bar

// Cursor
key rollcol -1 // scroll left one column
key rollcol 1 // scroll right one column
key col 1 // scroll to column one

key up // move cursor up
key down // move cursor down
key fmark // mark files
up
key fmark // mark files
down

// file manager commands (single character command codes)
key (c)

// toggle file mark
if c == ' ' then
fmark

// commands
elseif shiftkey? then
case locase c
when 'o' fopen 'o' // open file/directory
when 'e' fopen 'e' // open file/directory
when 'z' fopen "ze" // open maximized
when 'b' fopen 'b' // open binary file
when 'y' fopen "be" // open binary in one window
when 'k' openkey2 (getffile) // open key macro file
when 'm' fmove // move file
when 'c' fcopy // copy file
when 'd' fdelete // delete file
when 'n' frename // rename file
when 'r' frun 'c' // run program/batch file
when 'p' fprint // print file
when 'a' fattr // change file attributes
when 't' ftouch // touch file

// spell checker
when 's' run "jspell " + getffile "ck"

// unarchive .ZIP or .LZH files
when 'u'
f = getffile
run (if? (pos ".lzh" f 'i') "lha e " "pkunzip ") + f "ck"
reopen

// view .ZIP or .LZH archives
when 'v'
f = getffile
runcap (if? (pos ".lzh" f 'i') "lha v " "pkunzip -v ") + f
end

// hotkey to files
else
onhotkey c
end

// File
key fup // parent directory

// Mark
key fmark "ma" // mark all files
key fmark "ua" // unmark all

// Command
key fopen '1' // open file (one only)
key fopen 'q' // open file (close fmgr)
key fdelete // delete file

// Sort
key fsort 'n' // sort by name
key fsort 'e' // sort by extension
key fsort 'd' // sort by date/time

// Print
key print // print fmgr contents
end


// -------------------------------------------------------------------
// Movable/Sizable windows
// -------------------------------------------------------------------

object win

key sizekey // move/size with kbd
key pankey // pan video with kbd

//key sizewin -2 -1 -2 -1 2 // move window northwest
key sizewin 2 1 2 1 2 // move window southeast
end


// -------------------------------------------------------------------
// All windows
// -------------------------------------------------------------------

object mon

// key macros
key record // toggle record setting
key play // play scrap key macro

// define multi-key prefixes
key prefix // define prefix
key prefix // define prefix



  3 Responses to “Category : Recently Uploaded Files
Archive   : AURORA21.ZIP
Filename : CUKBD.AML

  1. Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/