(? #[() "ˆÁÂÃ\042ˆÁÄÅ\042ˆÁÆÇ\042ˆÈ`ˆ‡\000" [() defvar h-unit (m-get-h-unit SCR_LOCAL) v-unit (m-get-v-unit SCR_LOCAL) card-menu-last-pos 2 (m-frame-1 card-menu :width (m-scale-h *card-lt-designed-width* h-unit) :title (ci-make-title) :info2 (quote ((m-message-1 main-title :title "") (m-message-1 ci-sub-title :title ""))) :button (backquote ((m-access-ci-3 item0 :title "" :enter-action ()) (m-access-ci-3 item1 :title "" :enter-action ()) (m-access-ci-3 item2 :title "" :enter-action ()) (m-access-ci-3 item3 :title "" :enter-action ()) (m-access-ci-3 item4 :title "" :enter-action ()))) :info (quote (m-message-1 bottom-text :title "")) :last-pos (quote card-menu-last-pos) :with-title-underline t)] 11])
