MAWS 2004 multi-station protocol.
;; maws2004m.el: Set up field values and keybindings for
;; MAWS 2004 protocol, multiple stations.
;; To use, run emacs with this command line option:
;; emacs -l maws2004m filename
;;
(load "ibp.el")
(setq ibp-field-list
(vector
(ibp-field-def 6 "??????") ;; Species code
(ibp-field-def 3 "0 " ) ;; Age, how-aged
(ibp-field-def 3 "u " ) ;; Sex, how-sexed
(ibp-field-def 4 nil ) ;; Skull through fat
(ibp-field-def 4 nil ) ;; Body molt through JP
(ibp-field-def 4 nil ) ;; Micro-aging: 8 fields...
(ibp-field-def 4 nil ) ;; ...(divided 2/4/2 on the sheet)
(ibp-field-def 3 nil ) ;; Wing length
(ibp-field-def 4 nil ) ;; Mass (used to be weight)
(ibp-field-def 5 "3????" ) ;; Status, date
(ibp-field-def 3 nil ) ;; Time
(ibp-field-def 4 nil ) ;; Station code
(ibp-field-def 2 nil ) ) ) ;; Net
(global-set-key "\C-i" 'ibp-tab)
(global-set-key [?\C-_] 'ibp-ditto)
(global-set-key [?\C--] 'ibp-ditto)