Function: calculator-help
calculator-help is an interactive and byte-compiled function defined
in calculator.el.gz.
Signature
(calculator-help)
Documentation
Quick reference:
* numbers/operators/parens/./e - enter expressions
+ - * / \(div) %(rem) _(-X,postfix) ;(1/X,postfix) ^(exp) L(og)
Q(sqrt) !(fact) S(in) C(os) T(an) |(or) #(xor) &(and) ~(not)
* >/< repeats last binary operation with its 2nd (1st) arg as postfix op
* I inverse the next trig function * '/"/{/} - display/display args
* D - switch to all-decimal, or toggle deg/rad mode
* B/O/H/X - binary/octal/hex mode for i/o (both H and X are for hex)
* i/o - prefix for D/B/O/X - set only input/output modes
* enter/= - evaluate current expr. * s/g - set/get a register
* space - evaluate & save on list * l/v - list total/average
* up/down/C-p/C-n - browse saved * C-delete - clear all saved
* C-insert - copy whole expr. * C-return - evaluate, copy, exit
* insert - paste a number * backspace- delete backwards
* delete - clear argument or list value or whole expression (twice)
* escape/q - exit.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/calculator.el.gz
(defun calculator-help ()
;; this is used as the quick reference screen you get with `h'
"Quick reference:
* numbers/operators/parens/./e - enter expressions
+ - * / \\(div) %(rem) _(-X,postfix) ;(1/X,postfix) ^(exp) L(og)
Q(sqrt) !(fact) S(in) C(os) T(an) |(or) #(xor) &(and) ~(not)
* >/< repeats last binary operation with its 2nd (1st) arg as postfix op
* I inverse the next trig function \
* \\='/\"/{/} - display/display args
* D - switch to all-decimal, or toggle deg/rad mode
* B/O/H/X - binary/octal/hex mode for i/o (both H and X are for hex)
* i/o - prefix for D/B/O/X - set only input/output modes
* enter/= - evaluate current expr. * s/g - set/get a register
* space - evaluate & save on list * l/v - list total/average
* up/down/C-p/C-n - browse saved * C-delete - clear all saved
* C-insert - copy whole expr. * C-return - evaluate, copy, exit
* insert - paste a number * backspace- delete backwards
* delete - clear argument or list value or whole expression (twice)
* escape/q - exit."
(interactive)
(if (eq last-command 'calculator-help)
(let ((mode-name "Calculator")
(major-mode 'calculator-mode)
(win (selected-window)))
(require 'ehelp)
(if (not calculator-electric-mode)
(describe-mode)
(electric-describe-mode))
(select-window win)
(message nil))
(let ((one (one-window-p t))
(win (selected-window))
(help-buf (get-buffer-create "*Help*")))
(save-window-excursion
(with-output-to-temp-buffer "*Help*"
(princ (documentation 'calculator-help)))
(when one (shrink-window-if-larger-than-buffer
(get-buffer-window help-buf)))
(message "`%s' again for more help, %s."
(calculator-last-input)
"any other key continues normally")
(select-window win)
(sit-for 360))
(select-window win))))