(? #[() "ÀÁÂ\042ˆÀÃÂ\042ˆÄ`ˆÅÆ`Ç`È`É`Ê`Ë`&ˆ‡\000" [defvar othersat-setup-menu-last-pos 0 menu-othersat-setup-menu-last-id (menu-global-search-cursor-pos menu-othersat-setup-item-list menu-othersat-setup-menu-last-id) list (make-menu-items (quote othersat-setup-menu-fav) 2 (backquote (m-access-3 other-setup-menu-fav :title (backquote-unquote (gettext "Favourites Edit")) :enter-action (function (lambda (key) (lock-top-keys 500) (write-back-bytes 1010 4 8888)))))) (make-menu-items (quote othersat-setup-menu-ch-list) 2 (backquote (m-access-3 other-setup-menu-ch-list :title "Channel List" :enter-action (function (lambda (key) (lock-top-keys 500) (write-back-bytes 1011 4 8888)))))) (make-menu-items (quote othersat-setup-menu-atp) 2 (backquote (m-access-3 othersat-setup-menu-atp :title "Auto Setup" :enter-action (function (lambda (key) (lock-top-keys 500) (write-back-bytes 1055 4 8888)))))) (make-menu-items (quote othersat-setup-menu-manual-tune) 2 (backquote (m-access-3 othersat-setup-menu-manual-tune :title "Manual Tuning" :enter-action (function (lambda (key) (write-back-bytes 1056 4 8888)))))) (make-menu-items (quote othersat-setup-menu-update-ch) 2 (backquote (m-access-3 othersat-setup-menu-update-ch :title "Add New Channels" :enter-action (function (lambda (key) (write-back-bytes 1075 4 8888)))))) (make-menu-items (quote othersat-setup-menu-signal-cond) 2 (backquote (m-access-3 othersat-setup-menu-signal-cond :title "Signal Condition" :enter-action (function (lambda (key) (write-back-bytes 1020 4 8888)))))) othersat-setup-menu-list] 16])
(! 'make-othersat-setup-menu-button-list #[() "ˆ	@«„Â`ªƒˆ‡\000" [() menu-othersat-setup-item-list (menu-global-make-button-list (reverse menu-othersat-setup-item-list) () othersat-setup-menu-list)] 11])
(? #[() "À`ˆ‡\000" [(m-frame-1 othersat-setup-menu :width (m-scale-h *menu-width* h-unit) :height (m-scale-v 400 v-unit) :title "Other Satellite Tuning Menu" :button (make-othersat-setup-menu-button-list) :last-pos (quote othersat-setup-menu-last-pos))] 9])
