(? #[() "懒耚042埨媚\042埨牌\042埨侨\042埨陕\042埨仕\042埨掏\042埨蜗\042埨醒\042埨疑\042埨勇\042埨月\042埨账\042埨滞\042埨茁\042埨芈\042埨仝\042埨勰\042埨芘\042埨萋\042埨蘼\042埨呗\042埨嗄\042堘`垏\000" [defvar *list-last-pos* 0 *list-svl-cdr* () *list-displayed-elements* 7 *svl-editor-mode-with-vcr* t *SL-DVB-T* *SL-DVB-C* 1 *SL-DVB-S* 2 *SL-FREESAT* 3 *SL-ANALOGUE* 4 *list-mode* *sorting-mode* *CONT* *UK* *OTHER* *model* *MHEG_EPG* *current-connected* "" *last-key* *list-page-updown-stepw* *list-dyn-page-updown-count* *list-data-num* *list-disp-top* *WITH-ICU* (m-frame-1 list-frame :height (m-scale-v 420 v-unit) :width (m-scale-h *menu-width* h-unit) :title (gettext "Channel List") :sub-title "" :button (backquote ((m-access-6 list-0-btn :index (backquote-unquote "") :sname "" :normal-icon2 "Pay_key.png" :focus-icon2 "Pay_key.png" :normal-dis-icon2 "Pay_key.png" :focus-dis-icon2 "Pay_key.png" :use-dis-txt-col t :enter-action (function (lambda (key) (list-operate-ok))) :icu-set (backquote-unquote (if *WITH-ICU* t ()))) (m-access-6 list-1-btn :index (backquote-unquote "") :sname "" :normal-icon2 "Pay_key.png" :focus-icon2 "Pay_key.png" :normal-dis-icon2 "Pay_key.png" :focus-dis-icon2 "Pay_key.png" :use-dis-txt-col t :enter-action (function (lambda (key) (list-operate-ok))) :icu-set (backquote-unquote (if *WITH-ICU* t ()))) (m-access-6 list-2-btn :index (backquote-unquote "") :sname "" :normal-icon2 "Pay_key.png" :focus-icon2 "Pay_key.png" :normal-dis-icon2 "Pay_key.png" :focus-dis-icon2 "Pay_key.png" :use-dis-txt-col t :enter-action (function (lambda (key) (list-operate-ok))) :icu-set (backquote-unquote (if *WITH-ICU* t ()))) (m-access-6 list-3-btn :index (backquote-unquote "") :sname "" :normal-icon2 "Pay_key.png" :focus-icon2 "Pay_key.png" :normal-dis-icon2 "Pay_key.png" :focus-dis-icon2 "Pay_key.png" :use-dis-txt-col t :enter-action (function (lambda (key) (list-operate-ok))) :icu-set (backquote-unquote (if *WITH-ICU* t ()))) (m-access-6 list-4-btn :index (backquote-unquote "") :sname "" :normal-icon2 "Pay_key.png" :focus-icon2 "Pay_key.png" :normal-dis-icon2 "Pay_key.png" :focus-dis-icon2 "Pay_key.png" :use-dis-txt-col t :enter-action (function (lambda (key) (list-operate-ok))) :icu-set (backquote-unquote (if *WITH-ICU* t ()))) (m-access-6 list-5-btn :index (backquote-unquote "") :sname "" :normal-icon2 "Pay_key.png" :focus-icon2 "Pay_key.png" :normal-dis-icon2 "Pay_key.png" :focus-dis-icon2 "Pay_key.png" :use-dis-txt-col t :enter-action (function (lambda (key) (list-operate-ok))) :icu-set (backquote-unquote (if *WITH-ICU* t ()))) (m-access-6 list-6-btn :index (backquote-unquote "") :sname "" :normal-icon2 "Pay_key.png" :focus-icon2 "Pay_key.png" :normal-dis-icon2 "Pay_key.png" :focus-dis-icon2 "Pay_key.png" :use-dis-txt-col t :enter-action (function (lambda (key) (list-operate-ok))) :icu-set (backquote-unquote (if *WITH-ICU* t ()))))) :last-pos (quote *list-last-pos*) :cursor-help-args (backquote (:cur-up-text-lst ("" (backquote-unquote (gettext "Select"))) :enter-text-lst ("" (backquote-unquote (gettext "View"))) :return-text-lst ((backquote-unquote (gettext "Return"))))) :with-up-down-help t :with-color-help t :color-help-args (backquote (:r-text "" :g-text "" :y-text "" :b-text "")))] 11])
