weiner@novavax.UUCP (Bob Weiner) (04/28/89)
Info file ../info-local/cmd-menus, produced by Bob Weiner -*- Emacs-Lisp -*- THIS IS A SAMPLE FILE MEANT ONLY TO GIVE YOU IDEAS. MANY OF THE COMMANDS WILL NOT WORK ON YOUR SYSTEM. ALL OF THE ^_ and ^L characters have been converted to two characters for reliable transmission. This file provides a menu interface for executing many useful operating system commands on an Apollo display node or terminal. A number of commands will not work when using a terminal. All main functions called in this file may be found in ../lisp-local/cmd-menus.el ^_ File: cmd-menus, Node: Top, Prev: (DIR), Up: (DIR) Menus That Execute Useful Operating System Commands Bob Weiner, Motorola Inc., 03/21/89, Last Mod: 04/28/89 * Menu: How to get around on your Apollo without really trying. =========================================================================== * DM Cmds:: * Environment Setup:: * Help:: * Mail:: * Printing:: * Start Shells:: * System Status:: * Utilities:: ^L execute: (require 'cmd-menus) ^_^L Node: DM Cmds, Up: Top * Menu: --------------------------------------------------------------------------- * Invert Color Screen: !Toggle Color. * Invert Mono Screen: !Toggle Mono. * Load Large Font: !Large Font. * Load Small Font: !Small Font. ^_ Node: Toggle Color *************************************************************************** ^L execute: (cmd-menus-dm-command "mono") ^_ Node: Toggle Mono ^L execute: (cmd-menus-dm-command "inv") ^_ Node: Large Font ^L execute: (cmd-menus-dm-command "fl f16.b") ^_ Node: Small Font ^L execute: (cmd-menus-dm-command "fl f5x9") *************************************************************************** ^_^L Node: Environment Setup, Up: Top * Menu: --------------------------------------------------------------------------- * Setup User Environment: !Setup User. * Check User Environment Setup: !Check User Setup. * Setup Non-Server Node Envir: !Setup Node. ^_ Node: Setup User *************************************************************************** ^L execute: (cmd-menus-setup-user) ^_ Node: Check User Setup ^L execute: (cmd-menus-check-user-setup) ^_ Node: Setup Node ^L execute: (cmd-menus-setup-node) *************************************************************************** ^_^L Node: Help, Up: Top * Menu: --------------------------------------------------------------------------- * !Function Key Help:: ^_ Node: Function Key Help *************************************************************************** ^L execute: (cmd-menus-dm-command "cmdf ~/user_data/dm_key_mappings/fkeys_help.cmdf") *************************************************************************** ^_^L Node: Mail, Up: Top * Menu: --------------------------------------------------------------------------- * !Read Mail:: * !Send Mail:: ^_ Node: Read Mail *************************************************************************** ^L execute: (cmd-menus-read-mail) ^_ Node: Send Mail ^L execute: (cmd-menus-mail) *************************************************************************** ^_^L Node: Printing, Up: Top * Menu: --------------------------------------------------------------------------- * Cancel Print Job: !Lpr-cancel. * List Available Printers: !Pr-list. * List Entries in Print Queue: !Lpq. * List Printer Manager Sites: !Prmgr-list. * Print Buffer: !Lpr-buffer. * Print Files: !Lpr-file. ^_ Node: Lpr-cancel *************************************************************************** ^L execute: (cmd-menus-lpr-cancel) ^_ Node: Pr-list ^L execute: (cmd-menus-shell-command "prf -list_printers") ^_ Node: Lpq ^L execute: (cmd-menus-shell-command "prf -read;echo '';ls -l $SERVER_PRINT/sys/print/spooler") ^_ Node: Prmgr-list ^L execute: (cmd-menus-shell-command "prf -list_sites") ^_ Node: Lpr-buffer ^L execute: (cmd-menus-lpr-buffer) ^_ Node: Lpr-file ^L execute: (cmd-menus-lpr-file) *************************************************************************** ^_^L Node: Start Shells, Up: Top * Menu: --------------------------------------------------------------------------- * !C Shell:: * !Korn Shell:: * !Bourne Shell:: * !Aegis Shell:: ^_ Node: C Shell *************************************************************************** ^L execute: (cmd-menus-dm-command "cp /bin/csh;wc -a") ^_ Node: Korn Shell ^L execute: (cmd-menus-dm-command "cp /bin/ksh;wc -a") ^_ Node: Bourne Shell ^L execute: (cmd-menus-dm-command "cp /bin/sh;wc -a") ^_ Node: Aegis Shell ^L execute: (cmd-menus-dm-command "cp com/sh;wc -a") *************************************************************************** ^_^L Node: System Status, Up: Top * Menu: --------------------------------------------------------------------------- * !Dir Size In Kilobytes:: * !Dir Listing By Modification Time:: * !Disk Usage For All Nodes:: * !Disk Usage For Group's Nodes:: * !Disk Usage For This Node:: * !Give Data On User:: * !List All Processes For User:: * !List Current Users:: * !List Nodes On Ring:: * !My Account ID:: * !Time And Date:: ^_ Node: Dir Size In Kilobytes *************************************************************************** ^L execute: (cmd-menus-dir-size) ^_ Node: Dir Listing By Modification Time ^L execute: (cmd-menus-shell-command "ls -lt") ^_ Node: Disk Usage For All Nodes ^L execute: (cmd-menus-shell-command "df //*") ^_ Node: Disk Usage For Group's Nodes ^L execute: (cmd-menus-shell-command "df //ar_*") ^_ Node: Disk Usage For This Node ^L execute: (cmd-menus-shell-command "df") ^_ Node: Give Data On User ^L execute: (cmd-menus-user-data) ^_ Node: List All Processes For User ^L execute: (cmd-menus-user-processes) ^_ Node: List Current Users ^L execute: (cmd-menus-shell-command "who") ^_ Node: List Nodes On Ring ^L execute: (cmd-menus-shell-command "lcnode") ^_ Node: My Account ID ^L execute: (cmd-menus-shell-command "lusr -me") ^_ Node: Time And Date ^L execute: (cmd-menus-shell-command "date") *************************************************************************** ^_^L Node: Utilities, Up: Top * Menu: --------------------------------------------------------------------------- * Apollo Online Manuals: !Delphi. * Apollo Demos:: * !Calculator:: * !Interleaf:: * !Spreadsheet:: ^_ Node: Delphi, Up: Utilities *************************************************************************** ^L execute: (cmd-menus-dm-command "cp -n Delphi /sys/delphi/com/delphi;wc -a") ^_^L Node: Apollo Demos, Up: Utilities * Menu: ONLY RUN ONE OF THESE PROGRAMS AT A TIME --------------------------------------------------------------------------- * Battle Zone Documentation: !Bzone-doc. * Battle Zone Game: !Bzone. This may not be available. * Demo Rapid Polygon Fill: !Kali. * Display 16 Color Images: !Images_240. * Draw Pulsating Circles and Squares: !Smooth. * Melt Screen: !Melt. Be prepared before choosing this. * Psychodelic Patterns: !Pretty. * Push Screen Off Display: !Push. Be prepared before choosing this. * Rapidly Draw Spirograph Patterns: !Petal. * Star Wars Documentation: !Stwar-doc. * Star Wars Game: !Stwar. Caution: fairly addictive. This may not be available. ^_ Node: Bzone-doc *************************************************************************** *************************************************************************** ^L execute: (cmd-menus-apollo-game-doc "bzone") ^_ Node: Bzone ^L execute: (cmd-menus-apollo-game "bzone") ^_ Node: Kali ^L execute: (cmd-menus-apollo-demo "kali") ^_ Node: Images_240 ^L execute: (cmd-menus-apollo-demo "images_240") ^_ Node: Smooth ^L execute: (cmd-menus-apollo-demo "smooth") ^_ Node: Melt ^L execute: (cmd-menus-apollo-demo "melt" "(1260,1010)dr;(1270,1020)") ^_ Node: Pretty ^L execute: (cmd-menus-apollo-demo "pretty") ^_ Node: Push ^L execute: (cmd-menus-apollo-demo "push" "(1260,1010)dr;(1270,1020)") ^_ Node: Petal ^L execute: (cmd-menus-apollo-demo "petal") ^_ Node: Stwar-doc ^L execute: (cmd-menus-apollo-game-doc "stwar") ^_ Node: Stwar ^L execute: (cmd-menus-apollo-game "stwar") *************************************************************************** *************************************************************************** ^_^L Node: Calculator, Up: Utilities ^L execute: (cmd-menus-dm-command "cp -n Calc /usr/local/bin/calc;wc -a") ^_ Node: Interleaf, Up: Utilities ^L execute: (cmd-menus-dm-command "(000,000)dr;(1279,991) cp -n Interleaf /interleaf/tps/user/tps -w;wc -a") ^_ Node: Spreadsheet, Up: Utilities ^L execute: (cmd-menus-dm-command "(000,000)dr;(1279,991) cp -n Spreadsheet /usr/local/bin/sc; wc -a") *************************************************************************** -- Bob Weiner, Motorola, Inc., USENET: ...!gatech!uflorida!novavax!weiner (407) 738-2087