高手帮忙看看下拉选单显示的问题

lixiaomin96

(defun c:two()
  (setvar "cmdecho" 0)
  (setq wei1_list '("白炽灯" "荧光灯(单管)" "荧光灯(双管)" "荧光灯(多管)" "高强气体放电灯" "卤钨灯"))
  (setq wei2_list '("清洁" "一般" "污染"))
  (setq li1_list1 '("0.6" "0.7" "0.8" "0.9" "1.0" "1.1" "1.25" "1.5" "1.75" "2.0" "2.25" "2.5" "3.0" "3.5" "4.0" "5.0"))
 (setq li2_list1 '("50,30,10" "50,30,30" "50,50,10" "50,50,30" "70,30,10" "70,30,30" "70,50,10" "70,50,30")) 
  (setq li1_list2 '("0.6" "0.8" "1.0" "1.25" "1.5" "2.0" "2.5" "3.0" "4.0" "5.0"))
  (setq li2_list2 '("30,10" "30,30" "50,10" "50,30" "50;50" "70,10" "70,30" "70,50"))
 (setq li1_list3 '("0.5" "0.6" "0.7" "0.8" "0.9" "1.0" "1.1" "1.25" "1.5" "1.75" "2.0" "2.25" "2.5" "3.0" "3.5" "4.0" "5.0"))
  (setq li2_list3 '("30,10" "30,30" "50,30" "50;50" "50;70" "70,30" "70,50" "70,70"))
 (setq li1_list4 '("0.6" "0.7" "0.8" "0.9" "1.0" "1.1" "1.25" "1.5" "1.75" "2.0" "2.25" "2.5" "3.0" "3.5" "4.0" "5.0"))
  (setq li2_list4 '("30,10,10" "50,30,30" "70,50;10" "70,50.30"))
 (setq li1_list5 '("0.6" "0.7" "0.8" "0.9" "1.0" "1.1" "1.25" "1.5" "1.75" "2.0" "2.25" "2.5" "3.0" "3.5" "4.0" "5.0"))
  (setq li2_list5 '("30,10,10" "50,30,10" "50,30,30" "50,50,10" "50,50,30" "70,30,10" "70,30,30" "70,50,10" "70,50,30"))
  (dcl_1st)
  (prin1)
)
(defun dcl_1st()
   (setq dcl_id(load_dialog "two"))
   (new_dialog "two" dcl_id)
   (show_list "wei1" wei1_list)
   (show_list "wei2" wei2_list)
   (setq wei1 "0"
         wei2 "0"
         whxs "0"
         li1 "0"
         li2 "0"
   )
   (sub_wei) 
   (action_tile "wei1" "(setq wei1 $value)(sub_wei)")
   (action_tile "wei2" "(setq wei2 $value)(sub_wei)")
  (action_tile "whxs" "(setq whxs $value)(sub_wei)")
   (action_tile "li1" "(setq li1 $value)(sub_wei)")
   (action_tile "li2" "(setq li2 $value)(sub_wei)")
   (action_tile "accept" "(ok_1st)(done_dialog)")
   (start_dialog)
)
(defun ok_1st()
  (setq lyxs(get_tile "lyxs"))
)
(defun show_list(key newlist)
       (start_list key)
       (mapcar 'add_list newlist)
       (end_list)
)
(defun sub_wei()

   (cond
    ((= wei1 "5")
     (progn
     (show_list "li1" nil)
    (show_list "li2" nil)
    )
  )  
    ((= wei1 "4")
        (progn
          (show_list "li1" li1_list5)
          (show_list "li2" li2_list5)
        )
     (cond  
   ((and(= li1 "0") (= li2 "0")) (set_tile "lyxs" "0.40"))
     ((and(= li1 "0") (= li2 "1")) (set_tile "lyxs" "0.40"))
  ((and(= li1 "0") (= li2 "2")) (set_tile "lyxs" "0.41"))
  ((and(= li1 "0") (= li2 "3")) (set_tile "lyxs" "0.45"))
  ((and(= li1 "0") (= li2 "4")) (set_tile "lyxs" "0.46"))
  ((and(= li1 "0") (= li2 "5")) (set_tile "lyxs" "0.41"))
  ((and(= li1 "0") (= li2 "6")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "0") (= li2 "7")) (set_tile "lyxs" "0.45"))
  ((and(= li1 "0") (= li2 "8")) (set_tile "lyxs" "0.47"))
   ((and(= li1 "1") (= li2 "0")) (set_tile "lyxs" "0.46"))
     ((and(= li1 "1") (= li2 "1")) (set_tile "lyxs" "0.46"))
  ((and(= li1 "1") (= li2 "2")) (set_tile "lyxs" "0.46"))
  ((and(= li1 "1") (= li2 "3")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "1") (= li2 "4")) (set_tile "lyxs" "0.52"))
  ((and(= li1 "1") (= li2 "5")) (set_tile "lyxs" "0.46"))
  ((and(= li1 "1") (= li2 "6")) (set_tile "lyxs" "0.47"))
  ((and(= li1 "1") (= li2 "7")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "1") (= li2 "8")) (set_tile "lyxs" "0.53"))
   ((and(= li1 "2") (= li2 "0")) (set_tile "lyxs" "0.48"))
     ((and(= li1 "2") (= li2 "1")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "2") (= li2 "2")) (set_tile "lyxs" "0.51"))
  ((and(= li1 "2") (= li2 "3")) (set_tile "lyxs" "0.54"))
  ((and(= li1 "2") (= li2 "4")) (set_tile "lyxs" "0.56"))
  ((and(= li1 "2") (= li2 "5")) (set_tile "lyxs" "0.49"))
  ((and(= li1 "2") (= li2 "6")) (set_tile "lyxs" "0.51"))
  ((and(= li1 "2") (= li2 "7")) (set_tile "lyxs" "0.54"))
  ((and(= li1 "2") (= li2 "8")) (set_tile "lyxs" "0.57"))
   ((and(= li1 "3") (= li2 "0")) (set_tile "lyxs" "0.54"))
     ((and(= li1 "3") (= li2 "1")) (set_tile "lyxs" "0.54"))
  ((and(= li1 "3") (= li2 "2")) (set_tile "lyxs" "0.55"))
  ((and(= li1 "3") (= li2 "3")) (set_tile "lyxs" "0.58"))
  ((and(= li1 "3") (= li2 "4")) (set_tile "lyxs" "0.60"))
  ((and(= li1 "3") (= li2 "5")) (set_tile "lyxs" "0.54"))
  ((and(= li1 "3") (= li2 "6")) (set_tile "lyxs" "0.56"))
  ((and(= li1 "3") (= li2 "7")) (set_tile "lyxs" "0.58"))
  ((and(= li1 "3") (= li2 "8")) (set_tile "lyxs" "0.61"))
   ((and(= li1 "4") (= li2 "0")) (set_tile "lyxs" "0.56"))
     ((and(= li1 "4") (= li2 "1")) (set_tile "lyxs" "0.56"))
  ((and(= li1 "4") (= li2 "2")) (set_tile "lyxs" "0.57"))
  ((and(= li1 "4") (= li2 "3")) (set_tile "lyxs" "0.60"))
  ((and(= li1 "4") (= li2 "4")) (set_tile "lyxs" "0.62"))
  ((and(= li1 "4") (= li2 "5")) (set_tile "lyxs" "0.56"))
  ((and(= li1 "4") (= li2 "6")) (set_tile "lyxs" "0.58"))
  ((and(= li1 "4") (= li2 "7")) (set_tile "lyxs" "0.60"))
  ((and(= li1 "4") (= li2 "8")) (set_tile "lyxs" "0.64"))
   ((and(= li1 "5") (= li2 "0")) (set_tile "lyxs" "0.59"))
     ((and(= li1 "5") (= li2 "1")) (set_tile "lyxs" "0.59"))
  ((and(= li1 "5") (= li2 "2")) (set_tile "lyxs" "0.61"))
  ((and(= li1 "5") (= li2 "3")) (set_tile "lyxs" "0.63"))
  ((and(= li1 "5") (= li2 "4")) (set_tile "lyxs" "0.66"))
  ((and(= li1 "5") (= li2 "5")) (set_tile "lyxs" "0.60"))
  ((and(= li1 "5") (= li2 "6")) (set_tile "lyxs" "0.62"))
  ((and(= li1 "5") (= li2 "7")) (set_tile "lyxs" "0.64"))
  ((and(= li1 "5") (= li2 "8")) (set_tile "lyxs" "0.67"))
     ((and(= li1 "6") (= li2 "0")) (set_tile "lyxs" "0.61"))
     ((and(= li1 "6") (= li2 "1")) (set_tile "lyxs" "0.62"))
  ((and(= li1 "6") (= li2 "2")) (set_tile "lyxs" "0.63"))
  ((and(= li1 "6") (= li2 "3")) (set_tile "lyxs" "0.65"))
  ((and(= li1 "6") (= li2 "4")) (set_tile "lyxs" "0.68"))
  ((and(= li1 "6") (= li2 "5")) (set_tile "lyxs" "0.62"))
  ((and(= li1 "6") (= li2 "6")) (set_tile "lyxs" "0.64"))
  ((and(= li1 "6") (= li2 "7")) (set_tile "lyxs" "0.67"))
  ((and(= li1 "6") (= li2 "8")) (set_tile "lyxs" "0.70"))
   ((and(= li1 "7") (= li2 "0")) (set_tile "lyxs" "0.64"))
     ((and(= li1 "7") (= li2 "1")) (set_tile "lyxs" "0.65"))
  ((and(= li1 "7") (= li2 "2")) (set_tile "lyxs" "0.67"))
  ((and(= li1 "7") (= li2 "3")) (set_tile "lyxs" "0.68"))
  ((and(= li1 "7") (= li2 "4")) (set_tile "lyxs" "0.72"))
  ((and(= li1 "7") (= li2 "5")) (set_tile "lyxs" "0.66"))
  ((and(= li1 "7") (= li2 "6")) (set_tile "lyxs" "0.68"))
  ((and(= li1 "7") (= li2 "7")) (set_tile "lyxs" "0.69"))
  ((and(= li1 "7") (= li2 "8")) (set_tile "lyxs" "0.74"))
   ((and(= li1 "8") (= li2 "0")) (set_tile "lyxs" "0"))
     ((and(= li1 "8") (= li2 "1")) (set_tile "lyxs" "0"))
  ((and(= li1 "8") (= li2 "2")) (set_tile "lyxs" "0"))
  ((and(= li1 "8") (= li2 "3")) (set_tile "lyxs" "0"))
  ((and(= li1 "8") (= li2 "4")) (set_tile "lyxs" "0"))
  ((and(= li1 "8") (= li2 "5")) (set_tile "lyxs" "0"))
  ((and(= li1 "8") (= li2 "6")) (set_tile "lyxs" "0"))
  ((and(= li1 "8") (= li2 "7")) (set_tile "lyxs" "0"))
  ((and(= li1 "8") (= li2 "8")) (set_tile "lyxs" "0"))
   ((and(= li1 "9") (= li2 "0")) (set_tile "lyxs" "0.69"))
     ((and(= li1 "9") (= li2 "1")) (set_tile "lyxs" "0.69"))
  ((and(= li1 "9") (= li2 "2")) (set_tile "lyxs" "0.72"))
  ((and(= li1 "9") (= li2 "3")) (set_tile "lyxs" "0.72"))
  ((and(= li1 "9") (= li2 "4")) (set_tile "lyxs" "0.77"))
  ((and(= li1 "9") (= li2 "5")) (set_tile "lyxs" "0.70"))
  ((and(= li1 "9") (= li2 "6")) (set_tile "lyxs" "0.74"))
  ((and(= li1 "9") (= li2 "7")) (set_tile "lyxs" "0.73"))
  ((and(= li1 "9") (= li2 "8")) (set_tile "lyxs" "0.79"))
   ((and(= li1 "10") (= li2 "0")) (set_tile "lyxs" "0.70"))
     ((and(= li1 "10") (= li2 "1")) (set_tile "lyxs" "0.71"))
  ((and(= li1 "10") (= li2 "2")) (set_tile "lyxs" "0.74"))
  ((and(= li1 "10") (= li2 "3")) (set_tile "lyxs" "0.74"))
  ((and(= li1 "10") (= li2 "4")) (set_tile "lyxs" "0.79"))
  ((and(= li1 "10") (= li2 "5")) (set_tile "lyxs" "0.72"))
  ((and(= li1 "10") (= li2 "6")) (set_tile "lyxs" "0.77"))
  ((and(= li1 "10") (= li2 "7")) (set_tile "lyxs" "0.75"))
  ((and(= li1 "10") (= li2 "8")) (set_tile "lyxs" "0.82"))
   ((and(= li1 "11") (= li2 "0")) (set_tile "lyxs" "0.72"))
     ((and(= li1 "11") (= li2 "1")) (set_tile "lyxs" "0.72"))
  ((and(= li1 "11") (= li2 "2")) (set_tile "lyxs" "0.76"))
  ((and(= li1 "11") (= li2 "3")) (set_tile "lyxs" "0.75"))
  ((and(= li1 "11") (= li2 "4")) (set_tile "lyxs" "0.80"))
  ((and(= li1 "11") (= li2 "5")) (set_tile "lyxs" "0.73"))
  ((and(= li1 "11") (= li2 "6")) (set_tile "lyxs" "0.79"))
  ((and(= li1 "11") (= li2 "7")) (set_tile "lyxs" "0.76"))
  ((and(= li1 "11") (= li2 "8")) (set_tile "lyxs" "0.84"))
   ((and(= li1 "12") (= li2 "0")) (set_tile "lyxs" "0.74"))
     ((and(= li1 "12") (= li2 "1")) (set_tile "lyxs" "0.74"))
  ((and(= li1 "12") (= li2 "2")) (set_tile "lyxs" "0.79"))
  ((and(= li1 "12") (= li2 "3")) (set_tile "lyxs" "0.77"))
  ((and(= li1 "12") (= li2 "4")) (set_tile "lyxs" "0.82"))
  ((and(= li1 "12") (= li2 "5")) (set_tile "lyxs" "0.74"))
  ((and(= li1 "12") (= li2 "6")) (set_tile "lyxs" "0.82"))
  ((and(= li1 "12") (= li2 "7")) (set_tile "lyxs" "0.77"))
  ((and(= li1 "12") (= li2 "8")) (set_tile "lyxs" "0.85"))
   ((and(= li1 "13") (= li2 "0")) (set_tile "lyxs" "0.75"))
     ((and(= li1 "13") (= li2 "1")) (set_tile "lyxs" "0.76"))
  ((and(= li1 "13") (= li2 "2")) (set_tile "lyxs" "0.81"))
  ((and(= li1 "13") (= li2 "3")) (set_tile "lyxs" "0.78"))
  ((and(= li1 "13") (= li2 "4")) (set_tile "lyxs" "0.84"))
  ((and(= li1 "13") (= li2 "5")) (set_tile "lyxs" "0.76"))
  ((and(= li1 "13") (= li2 "6")) (set_tile "lyxs" "0.84"))
  ((and(= li1 "13") (= li2 "7")) (set_tile "lyxs" "0.78"))
   ((and(= li1 "13") (= li2 "8")) (set_tile "lyxs" "0.87"))
   ((and(= li1 "14") (= li2 "0")) (set_tile "lyxs" "0.76"))
     ((and(= li1 "14") (= li2 "1")) (set_tile "lyxs" "0.77"))
  ((and(= li1 "14") (= li2 "2")) (set_tile "lyxs" "0.82"))
  ((and(= li1 "14") (= li2 "3")) (set_tile "lyxs" "0.79"))
  ((and(= li1 "14") (= li2 "4")) (set_tile "lyxs" "0.85"))
  ((and(= li1 "14") (= li2 "5")) (set_tile "lyxs" "0.77"))
  ((and(= li1 "14") (= li2 "6")) (set_tile "lyxs" "0.86"))
  ((and(= li1 "14") (= li2 "7")) (set_tile "lyxs" "0.79"))
  ((and(= li1 "14") (= li2 "8")) (set_tile "lyxs" "0.89"))
  ((and(= li1 "15") (= li2 "0")) (set_tile "lyxs" "0.77"))
     ((and(= li1 "15") (= li2 "1")) (set_tile "lyxs" "0.78"))
  ((and(= li1 "15") (= li2 "2")) (set_tile "lyxs" "0.84"))
  ((and(= li1 "15") (= li2 "3")) (set_tile "lyxs" "0.80"))
  ((and(= li1 "15") (= li2 "4")) (set_tile "lyxs" "0.87"))
  ((and(= li1 "15") (= li2 "5")) (set_tile "lyxs" "0.79"))
  ((and(= li1 "15") (= li2 "6")) (set_tile "lyxs" "0.89"))
  ((and(= li1 "15") (= li2 "7")) (set_tile "lyxs" "0.80"))
   ((and(= li1 "15") (= li2 "8")) (set_tile "lyxs" "0.92"))
     ))
    ((= wei1 "3")
        (progn
          (show_list "li1" li1_list4)
          (show_list "li2" li2_list4)
        ) 
     (cond
     ((and(= li1 "0") (= li2 "0")) (set_tile "lyxs" "0.25"))
     ((and(= li1 "0") (= li2 "1")) (set_tile "lyxs" "0.29"))
  ((and(= li1 "0") (= li2 "2")) (set_tile "lyxs" "0.34"))
  ((and(= li1 "0") (= li2 "3")) (set_tile "lyxs" "0.36"))  
    ((and(= li1 "1") (= li2 "0")) (set_tile "lyxs" "0.29"))
     ((and(= li1 "1") (= li2 "1")) (set_tile "lyxs" "0.33"))
  ((and(= li1 "1") (= li2 "2")) (set_tile "lyxs" "0.38"))
  ((and(= li1 "1") (= li2 "3")) (set_tile "lyxs" "0.40"))
    ((and(= li1 "2") (= li2 "0")) (set_tile "lyxs" "0.33"))
     ((and(= li1 "2") (= li2 "1")) (set_tile "lyxs" "0.36"))
  ((and(= li1 "2") (= li2 "2")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "2") (= li2 "3")) (set_tile "lyxs" "0.44"))
    ((and(= li1 "3") (= li2 "0")) (set_tile "lyxs" "0.35"))
     ((and(= li1 "3") (= li2 "1")) (set_tile "lyxs" "0.39"))
  ((and(= li1 "3") (= li2 "2")) (set_tile "lyxs" "0.45"))
  ((and(= li1 "3") (= li2 "3")) (set_tile "lyxs" "0.47"))
   ((and(= li1 "4") (= li2 "0")) (set_tile "lyxs" "0.38"))
     ((and(= li1 "4") (= li2 "1")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "4") (= li2 "2")) (set_tile "lyxs" "0.47"))
  ((and(= li1 "4") (= li2 "3")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "5") (= li2 "0")) (set_tile "lyxs" "0.40"))
     ((and(= li1 "5") (= li2 "1")) (set_tile "lyxs" "0.44"))
  ((and(= li1 "5") (= li2 "2")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "5") (= li2 "3")) (set_tile "lyxs" "0.53"))
  ((and(= li1 "6") (= li2 "0")) (set_tile "lyxs" "0.43"))
     ((and(= li1 "6") (= li2 "1")) (set_tile "lyxs" "0.48"))
  ((and(= li1 "6") (= li2 "2")) (set_tile "lyxs" "0.53"))
  ((and(= li1 "6") (= li2 "3")) (set_tile "lyxs" "0.57"))
   ((and(= li1 "7") (= li2 "0")) (set_tile "lyxs" "0.47"))
     ((and(= li1 "7") (= li2 "1")) (set_tile "lyxs" "0.52"))
  ((and(= li1 "7") (= li2 "2")) (set_tile "lyxs" "0.57"))
  ((and(= li1 "7") (= li2 "3")) (set_tile "lyxs" "0.41"))
   ((and(= li1 "8") (= li2 "0")) (set_tile "lyxs" "0.51"))
     ((and(= li1 "8") (= li2 "1")) (set_tile "lyxs" "0.54"))
  ((and(= li1 "8") (= li2 "2")) (set_tile "lyxs" "0.60"))
  ((and(= li1 "8") (= li2 "3")) (set_tile "lyxs" "0.65"))
   ((and(= li1 "9") (= li2 "0")) (set_tile "lyxs" "0.54"))
     ((and(= li1 "9") (= li2 "1")) (set_tile "lyxs" "0.57"))
  ((and(= li1 "9") (= li2 "2")) (set_tile "lyxs" "0.62"))
  ((and(= li1 "9") (= li2 "3")) (set_tile "lyxs" "0.68"))
   ((and(= li1 "10") (= li2 "0")) (set_tile "lyxs" "0.56"))
     ((and(= li1 "10") (= li2 "1")) (set_tile "lyxs" "0.59"))
  ((and(= li1 "10") (= li2 "2")) (set_tile "lyxs" "0.64"))
  ((and(= li1 "10") (= li2 "3")) (set_tile "lyxs" "0.70"))
  ((and(= li1 "11") (= li2 "0")) (set_tile "lyxs" "0.57"))
     ((and(= li1 "11") (= li2 "1")) (set_tile "lyxs" "0.60"))
  ((and(= li1 "11") (= li2 "2")) (set_tile "lyxs" "0.65"))
  ((and(= li1 "11") (= li2 "3")) (set_tile "lyxs" "0.72"))
  ((and(= li1 "12") (= li2 "0")) (set_tile "lyxs" "0.60"))
     ((and(= li1 "12") (= li2 "1")) (set_tile "lyxs" "0.63"))
  ((and(= li1 "12") (= li2 "2")) (set_tile "lyxs" "0.67"))
  ((and(= li1 "12") (= li2 "3")) (set_tile "lyxs" "0.75"))
  ((and(= li1 "13") (= li2 "0")) (set_tile "lyxs" "0.62"))
     ((and(= li1 "13") (= li2 "1")) (set_tile "lyxs" "0.65"))
  ((and(= li1 "13") (= li2 "2")) (set_tile "lyxs" "0.69"))
  ((and(= li1 "13") (= li2 "3")) (set_tile "lyxs" "0.78"))
   ((and(= li1 "14") (= li2 "0")) (set_tile "lyxs" "0.64"))
     ((and(= li1 "14") (= li2 "1")) (set_tile "lyxs" "0.66"))
  ((and(= li1 "14") (= li2 "2")) (set_tile "lyxs" "0.70"))
  ((and(= li1 "14") (= li2 "3")) (set_tile "lyxs" "0.80"))
  ((and(= li1 "15") (= li2 "0")) (set_tile "lyxs" "0.66"))
     ((and(= li1 "15") (= li2 "1")) (set_tile "lyxs" "0.69"))
  ((and(= li1 "15") (= li2 "2")) (set_tile "lyxs" "0.72"))
  ((and(= li1 "15") (= li2 "3")) (set_tile "lyxs" "0.82"))
     ))
    ((= wei1 "2")
        (progn
          (show_list "li1" li1_list3)
          (show_list "li2" li2_list3)
        )
     (cond  
   ((and(= li1 "0") (= li2 "0")) (set_tile "lyxs" "0.09"))
     ((and(= li1 "0") (= li2 "1")) (set_tile "lyxs" "0.12"))
  ((and(= li1 "0") (= li2 "2")) (set_tile "lyxs" "0.14"))
  ((and(= li1 "0") (= li2 "3")) (set_tile "lyxs" "0.18"))
  ((and(= li1 "0") (= li2 "4")) (set_tile "lyxs" "0.23"))
  ((and(= li1 "0") (= li2 "5")) (set_tile "lyxs" "0.15"))
  ((and(= li1 "0") (= li2 "6")) (set_tile "lyxs" "0.20"))
  ((and(= li1 "0") (= li2 "7")) (set_tile "lyxs" "0.27"))
   ((and(= li1 "1") (= li2 "0")) (set_tile "lyxs" "0.13"))
     ((and(= li1 "1") (= li2 "1")) (set_tile "lyxs" "0.16"))
  ((and(= li1 "1") (= li2 "2")) (set_tile "lyxs" "0.18"))
  ((and(= li1 "1") (= li2 "3")) (set_tile "lyxs" "0.22"))
  ((and(= li1 "1") (= li2 "4")) (set_tile "lyxs" "0.28"))
  ((and(= li1 "1") (= li2 "5")) (set_tile "lyxs" "0.20"))
  ((and(= li1 "1") (= li2 "6")) (set_tile "lyxs" "0.25"))
  ((and(= li1 "1") (= li2 "7")) (set_tile "lyxs" "0.33"))
   ((and(= li1 "2") (= li2 "0")) (set_tile "lyxs" "0.16"))
     ((and(= li1 "2") (= li2 "1")) (set_tile "lyxs" "0.19"))
  ((and(= li1 "2") (= li2 "2")) (set_tile "lyxs" "0.21"))
  ((and(= li1 "2") (= li2 "3")) (set_tile "lyxs" "0.26"))
  ((and(= li1 "2") (= li2 "4")) (set_tile "lyxs" "0.32"))
  ((and(= li1 "2") (= li2 "5")) (set_tile "lyxs" "0.23"))
  ((and(= li1 "2") (= li2 "6")) (set_tile "lyxs" "0.29"))
  ((and(= li1 "2") (= li2 "7")) (set_tile "lyxs" "0.36"))
   ((and(= li1 "3") (= li2 "0")) (set_tile "lyxs" "0.18"))
     ((and(= li1 "3") (= li2 "1")) (set_tile "lyxs" "0.21"))
  ((and(= li1 "3") (= li2 "2")) (set_tile "lyxs" "0.24"))
  ((and(= li1 "3") (= li2 "3")) (set_tile "lyxs" "0.28"))
  ((and(= li1 "3") (= li2 "4")) (set_tile "lyxs" "0.34"))
  ((and(= li1 "3") (= li2 "5")) (set_tile "lyxs" "0.26"))
  ((and(= li1 "3") (= li2 "6")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "3") (= li2 "7")) (set_tile "lyxs" "0.39"))
   ((and(= li1 "4") (= li2 "0")) (set_tile "lyxs" "0.20"))
     ((and(= li1 "4") (= li2 "1")) (set_tile "lyxs" "0.23"))
  ((and(= li1 "4") (= li2 "2")) (set_tile "lyxs" "0.26"))
  ((and(= li1 "4") (= li2 "3")) (set_tile "lyxs" "0.30"))
  ((and(= li1 "4") (= li2 "4")) (set_tile "lyxs" "0.36"))
  ((and(= li1 "4") (= li2 "5")) (set_tile "lyxs" "0.28"))
  ((and(= li1 "4") (= li2 "6")) (set_tile "lyxs" "0.33"))
  ((and(= li1 "4") (= li2 "7")) (set_tile "lyxs" "0.40"))
   ((and(= li1 "5") (= li2 "0")) (set_tile "lyxs" "0.21"))
     ((and(= li1 "5") (= li2 "1")) (set_tile "lyxs" "0.24"))
  ((and(= li1 "5") (= li2 "2")) (set_tile "lyxs" "0.27"))
  ((and(= li1 "5") (= li2 "3")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "5") (= li2 "4")) (set_tile "lyxs" "0.37"))
  ((and(= li1 "5") (= li2 "5")) (set_tile "lyxs" "0.30"))
  ((and(= li1 "5") (= li2 "6")) (set_tile "lyxs" "0.35"))
  ((and(= li1 "5") (= li2 "7")) (set_tile "lyxs" "0.42"))
     ((and(= li1 "6") (= li2 "0")) (set_tile "lyxs" "0"))
     ((and(= li1 "6") (= li2 "1")) (set_tile "lyxs" "0"))
  ((and(= li1 "6") (= li2 "2")) (set_tile "lyxs" "0"))
  ((and(= li1 "6") (= li2 "3")) (set_tile "lyxs" "0"))
  ((and(= li1 "6") (= li2 "4")) (set_tile "lyxs" "0"))
  ((and(= li1 "6") (= li2 "5")) (set_tile "lyxs" "0"))
  ((and(= li1 "6") (= li2 "6")) (set_tile "lyxs" "0"))
  ((and(= li1 "6") (= li2 "7")) (set_tile "lyxs" "0"))
   ((and(= li1 "7") (= li2 "0")) (set_tile "lyxs" "0.24"))
     ((and(= li1 "7") (= li2 "1")) (set_tile "lyxs" "0.27"))
  ((and(= li1 "7") (= li2 "2")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "7") (= li2 "3")) (set_tile "lyxs" "0.35"))
  ((and(= li1 "7") (= li2 "4")) (set_tile "lyxs" "0.40"))
  ((and(= li1 "7") (= li2 "5")) (set_tile "lyxs" "0.34"))
  ((and(= li1 "7") (= li2 "6")) (set_tile "lyxs" "0.39"))
  ((and(= li1 "7") (= li2 "7")) (set_tile "lyxs" "0.46"))
   ((and(= li1 "8") (= li2 "0")) (set_tile "lyxs" "0.27"))
     ((and(= li1 "8") (= li2 "1")) (set_tile "lyxs" "0.29"))
  ((and(= li1 "8") (= li2 "2")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "8") (= li2 "3")) (set_tile "lyxs" "0.38"))
  ((and(= li1 "8") (= li2 "4")) (set_tile "lyxs" "0.43"))
  ((and(= li1 "8") (= li2 "5")) (set_tile "lyxs" "0.37"))
  ((and(= li1 "8") (= li2 "6")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "8") (= li2 "7")) (set_tile "lyxs" "0.48"))
   ((and(= li1 "9") (= li2 "0")) (set_tile "lyxs" "0.29"))
     ((and(= li1 "9") (= li2 "1")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "9") (= li2 "2")) (set_tile "lyxs" "0.36"))
  ((and(= li1 "9") (= li2 "3")) (set_tile "lyxs" "0.40"))
  ((and(= li1 "9") (= li2 "4")) (set_tile "lyxs" "0.45"))
  ((and(= li1 "9") (= li2 "5")) (set_tile "lyxs" "0.40"))
  ((and(= li1 "9") (= li2 "6")) (set_tile "lyxs" "0.45"))
  ((and(= li1 "9") (= li2 "7")) (set_tile "lyxs" "0.51"))
   ((and(= li1 "10") (= li2 "0")) (set_tile "lyxs" "0.31"))
     ((and(= li1 "10") (= li2 "1")) (set_tile "lyxs" "0.33"))
  ((and(= li1 "10") (= li2 "2")) (set_tile "lyxs" "0.38"))
  ((and(= li1 "10") (= li2 "3")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "10") (= li2 "4")) (set_tile "lyxs" "0.47"))
  ((and(= li1 "10") (= li2 "5")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "10") (= li2 "6")) (set_tile "lyxs" "0.47"))
  ((and(= li1 "10") (= li2 "7")) (set_tile "lyxs" "0.53"))
   ((and(= li1 "11") (= li2 "0")) (set_tile "lyxs" "0.32"))
     ((and(= li1 "11") (= li2 "1")) (set_tile "lyxs" "0.34"))
  ((and(= li1 "11") (= li2 "2")) (set_tile "lyxs" "0.40"))
  ((and(= li1 "11") (= li2 "3")) (set_tile "lyxs" "0.44"))
  ((and(= li1 "11") (= li2 "4")) (set_tile "lyxs" "0.49"))
  ((and(= li1 "11") (= li2 "5")) (set_tile "lyxs" "0.44"))
  ((and(= li1 "11") (= li2 "6")) (set_tile "lyxs" "0.49"))
  ((and(= li1 "11") (= li2 "7")) (set_tile "lyxs" "0.55"))
   ((and(= li1 "12") (= li2 "0")) (set_tile "lyxs" "0.34"))
     ((and(= li1 "12") (= li2 "1")) (set_tile "lyxs" "0.37"))
  ((and(= li1 "12") (= li2 "2")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "12") (= li2 "3")) (set_tile "lyxs" "0.45"))
  ((and(= li1 "12") (= li2 "4")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "12") (= li2 "5")) (set_tile "lyxs" "0.49"))
  ((and(= li1 "12") (= li2 "6")) (set_tile "lyxs" "0.51"))
  ((and(= li1 "12") (= li2 "7")) (set_tile "lyxs" "0.57"))
   ((and(= li1 "13") (= li2 "0")) (set_tile "lyxs" "0.37"))
     ((and(= li1 "13") (= li2 "1")) (set_tile "lyxs" "0.38"))
  ((and(= li1 "13") (= li2 "2")) (set_tile "lyxs" "0.44"))
  ((and(= li1 "13") (= li2 "3")) (set_tile "lyxs" "0.47"))
  ((and(= li1 "13") (= li2 "4")) (set_tile "lyxs" "0.52"))
  ((and(= li1 "13") (= li2 "5")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "13") (= li2 "6")) (set_tile "lyxs" "0.54"))
  ((and(= li1 "13") (= li2 "7")) (set_tile "lyxs" "0.59"))
   ((and(= li1 "14") (= li2 "0")) (set_tile "lyxs" "0.38"))
     ((and(= li1 "14") (= li2 "1")) (set_tile "lyxs" "0.40"))
  ((and(= li1 "14") (= li2 "2")) (set_tile "lyxs" "0.46"))
  ((and(= li1 "14") (= li2 "3")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "14") (= li2 "4")) (set_tile "lyxs" "0.54"))
  ((and(= li1 "14") (= li2 "5")) (set_tile "lyxs" "0.52"))
  ((and(= li1 "14") (= li2 "6")) (set_tile "lyxs" "0.56"))
  ((and(= li1 "14") (= li2 "7")) (set_tile "lyxs" "0.61"))
  ((and(= li1 "15") (= li2 "0")) (set_tile "lyxs" "0.40"))
     ((and(= li1 "15") (= li2 "1")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "15") (= li2 "2")) (set_tile "lyxs" "0.48"))
  ((and(= li1 "15") (= li2 "3")) (set_tile "lyxs" "0.51"))
  ((and(= li1 "15") (= li2 "4")) (set_tile "lyxs" "0.55"))
  ((and(= li1 "15") (= li2 "5")) (set_tile "lyxs" "0.54"))
  ((and(= li1 "15") (= li2 "6")) (set_tile "lyxs" "0.58"))
  ((and(= li1 "15") (= li2 "7")) (set_tile "lyxs" "0.63"))
  ((and(= li1 "16") (= li2 "0")) (set_tile "lyxs" "0.42"))
     ((and(= li1 "16") (= li2 "1")) (set_tile "lyxs" "0.43"))
  ((and(= li1 "16") (= li2 "2")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "16") (= li2 "3")) (set_tile "lyxs" "0.54"))
  ((and(= li1 "16") (= li2 "4")) (set_tile "lyxs" "0.57"))
  ((and(= li1 "16") (= li2 "5")) (set_tile "lyxs" "0.56"))
  ((and(= li1 "16") (= li2 "6")) (set_tile "lyxs" "0.61"))
  ((and(= li1 "16") (= li2 "7")) (set_tile "lyxs" "0.65"))
     ))
    ((= wei1 "1")
        (progn
          (show_list "li1" li1_list2)
          (show_list "li2" li2_list2)
        )
     (cond  
   ((and(= li1 "0") (= li2 "0")) (set_tile "lyxs" "0.17"))
     ((and(= li1 "0") (= li2 "1")) (set_tile "lyxs" "0.20"))
  ((and(= li1 "0") (= li2 "2")) (set_tile "lyxs" "0.18"))
  ((and(= li1 "0") (= li2 "3")) (set_tile "lyxs" "0.21"))
  ((and(= li1 "0") (= li2 "4")) (set_tile "lyxs" "0.26"))
  ((and(= li1 "0") (= li2 "5")) (set_tile "lyxs" "0.18"))
  ((and(= li1 "0") (= li2 "6")) (set_tile "lyxs" "0.22"))
  ((and(= li1 "0") (= li2 "7")) (set_tile "lyxs" "0.27"))
   ((and(= li1 "1") (= li2 "0")) (set_tile "lyxs" "0.23"))
     ((and(= li1 "1") (= li2 "1")) (set_tile "lyxs" "0.26"))
  ((and(= li1 "1") (= li2 "2")) (set_tile "lyxs" "0.24"))
  ((and(= li1 "1") (= li2 "3")) (set_tile "lyxs" "0.28"))
  ((and(= li1 "1") (= li2 "4")) (set_tile "lyxs" "0.32"))
  ((and(= li1 "1") (= li2 "5")) (set_tile "lyxs" "0.25"))
  ((and(= li1 "1") (= li2 "6")) (set_tile "lyxs" "0.29"))
  ((and(= li1 "1") (= li2 "7")) (set_tile "lyxs" "0.34"))
   ((and(= li1 "2") (= li2 "0")) (set_tile "lyxs" "0.27"))
     ((and(= li1 "2") (= li2 "1")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "2") (= li2 "2")) (set_tile "lyxs" "0.28"))
  ((and(= li1 "2") (= li2 "3")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "2") (= li2 "4")) (set_tile "lyxs" "0.36"))
  ((and(= li1 "2") (= li2 "5")) (set_tile "lyxs" "0.29"))
  ((and(= li1 "2") (= li2 "6")) (set_tile "lyxs" "0.33"))
  ((and(= li1 "2") (= li2 "7")) (set_tile "lyxs" "0.38"))
   ((and(= li1 "3") (= li2 "0")) (set_tile "lyxs" "0.30"))
     ((and(= li1 "3") (= li2 "1")) (set_tile "lyxs" "0.33"))
  ((and(= li1 "3") (= li2 "2")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "3") (= li2 "3")) (set_tile "lyxs" "0.35"))
  ((and(= li1 "3") (= li2 "4")) (set_tile "lyxs" "0.39"))
  ((and(= li1 "3") (= li2 "5")) (set_tile "lyxs" "0.33"))
  ((and(= li1 "3") (= li2 "6")) (set_tile "lyxs" "0.37"))
  ((and(= li1 "3") (= li2 "7")) (set_tile "lyxs" "0.42"))
   ((and(= li1 "4") (= li2 "0")) (set_tile "lyxs" "0.33"))
     ((and(= li1 "4") (= li2 "1")) (set_tile "lyxs" "0.36"))
  ((and(= li1 "4") (= li2 "2")) (set_tile "lyxs" "0.34"))
  ((and(= li1 "4") (= li2 "3")) (set_tile "lyxs" "0.38"))
  ((and(= li1 "4") (= li2 "4")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "4") (= li2 "5")) (set_tile "lyxs" "0.34"))
  ((and(= li1 "4") (= li2 "6")) (set_tile "lyxs" "0.41"))
  ((and(= li1 "4") (= li2 "7")) (set_tile "lyxs" "0.46"))
   ((and(= li1 "5") (= li2 "0")) (set_tile "lyxs" "0.37"))
     ((and(= li1 "5") (= li2 "1")) (set_tile "lyxs" "0.40"))
  ((and(= li1 "5") (= li2 "2")) (set_tile "lyxs" "0.39"))
  ((and(= li1 "5") (= li2 "3")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "5") (= li2 "4")) (set_tile "lyxs" "0.47"))
  ((and(= li1 "5") (= li2 "5")) (set_tile "lyxs" "0.41"))
  ((and(= li1 "5") (= li2 "6")) (set_tile "lyxs" "0.46"))
  ((and(= li1 "5") (= li2 "7")) (set_tile "lyxs" "0.51"))
     ((and(= li1 "6") (= li2 "0")) (set_tile "lyxs" "0.41"))
     ((and(= li1 "6") (= li2 "1")) (set_tile "lyxs" "0.44"))
  ((and(= li1 "6") (= li2 "2")) (set_tile "lyxs" "0.43"))
  ((and(= li1 "6") (= li2 "3")) (set_tile "lyxs" "0.47"))
  ((and(= li1 "6") (= li2 "4")) (set_tile "lyxs" "0.51"))
  ((and(= li1 "6") (= li2 "5")) (set_tile "lyxs" "0.45"))
  ((and(= li1 "6") (= li2 "6")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "6") (= li2 "7")) (set_tile "lyxs" "0.55"))
   ((and(= li1 "7") (= li2 "0")) (set_tile "lyxs" "0.43"))
     ((and(= li1 "7") (= li2 "1")) (set_tile "lyxs" "0.46"))
  ((and(= li1 "7") (= li2 "2")) (set_tile "lyxs" "0.45"))
  ((and(= li1 "7") (= li2 "3")) (set_tile "lyxs" "0.49"))
  ((and(= li1 "7") (= li2 "4")) (set_tile "lyxs" "0.57"))
  ((and(= li1 "7") (= li2 "5")) (set_tile "lyxs" "0.48"))
  ((and(= li1 "7") (= li2 "6")) (set_tile "lyxs" "0.53"))
  ((and(= li1 "7") (= li2 "7")) (set_tile "lyxs" "0.58"))
   ((and(= li1 "8") (= li2 "0")) (set_tile "lyxs" "0.45"))
     ((and(= li1 "8") (= li2 "1")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "8") (= li2 "2")) (set_tile "lyxs" "0.50"))
  ((and(= li1 "8") (= li2 "3")) (set_tile "lyxs" "0.53"))
  ((and(= li1 "8") (= li2 "4")) (set_tile "lyxs" "0.57"))
  ((and(= li1 "8") (= li2 "5")) (set_tile "lyxs" "0.53"))
  ((and(= li1 "8") (= li2 "6")) (set_tile "lyxs" "0.57"))
  ((and(= li1 "8") (= li2 "7")) (set_tile "lyxs" "0.63"))
   ((and(= li1 "9") (= li2 "0")) (set_tile "lyxs" "0.50"))
     ((and(= li1 "9") (= li2 "1")) (set_tile "lyxs" "0.52"))
  ((and(= li1 "9") (= li2 "2")) (set_tile "lyxs" "0.52"))
  ((and(= li1 "9") (= li2 "3")) (set_tile "lyxs" "0.55"))
  ((and(= li1 "9") (= li2 "4")) (set_tile "lyxs" "0.60"))
  ((and(= li1 "9") (= li2 "5")) (set_tile "lyxs" "0.56"))
  ((and(= li1 "9") (= li2 "6")) (set_tile "lyxs" "0.60"))
  ((and(= li1 "9") (= li2 "7")) (set_tile "lyxs" "0.65"))
     ))
    ((= wei1 "0")
        (progn
          (show_list "li1" li1_list1)
          (show_list "li2" li2_list1)
        ) 
     (cond
     ((and(= li1 "0") (= li2 "0")) (set_tile "lyxs" "0.13"))
     ((and(= li1 "0") (= li2 "1")) (set_tile "lyxs" "0.14"))
  ((and(= li1 "0") (= li2 "2")) (set_tile "lyxs" "0.16"))
  ((and(= li1 "0") (= li2 "3")) (set_tile "lyxs" "0.17"))
  ((and(= li1 "0") (= li2 "4")) (set_tile "lyxs" "0.14"))
  ((and(= li1 "0") (= li2 "5")) (set_tile "lyxs" "0.15"))
  ((and(= li1 "0") (= li2 "6")) (set_tile "lyxs" "0.18"))
  ((and(= li1 "0") (= li2 "7")) (set_tile "lyxs" "0.19"))
    ((and(= li1 "1") (= li2 "0")) (set_tile "lyxs" "0.16"))
     ((and(= li1 "1") (= li2 "1")) (set_tile "lyxs" "0.17"))
  ((and(= li1 "1") (= li2 "2")) (set_tile "lyxs" "0.20"))
  ((and(= li1 "1") (= li2 "3")) (set_tile "lyxs" "0.20"))
  ((and(= li1 "1") (= li2 "4")) (set_tile "lyxs" "0.18"))
  ((and(= li1 "1") (= li2 "5")) (set_tile "lyxs" "0.19"))
  ((and(= li1 "1") (= li2 "6")) (set_tile "lyxs" "0.22"))
  ((and(= li1 "1") (= li2 "7")) (set_tile "lyxs" "0.23"))
    ((and(= li1 "2") (= li2 "0")) (set_tile "lyxs" "0.18"))
     ((and(= li1 "2") (= li2 "1")) (set_tile "lyxs" "0.19"))
  ((and(= li1 "2") (= li2 "2")) (set_tile "lyxs" "0.22"))
  ((and(= li1 "2") (= li2 "3")) (set_tile "lyxs" "0.22"))
  ((and(= li1 "2") (= li2 "4")) (set_tile "lyxs" "0.21"))
  ((and(= li1 "2") (= li2 "5")) (set_tile "lyxs" "0.22"))
  ((and(= li1 "2") (= li2 "6")) (set_tile "lyxs" "0.24"))
  ((and(= li1 "2") (= li2 "7")) (set_tile "lyxs" "0.25"))
    ((and(= li1 "3") (= li2 "0")) (set_tile "lyxs" "0.20"))
     ((and(= li1 "3") (= li2 "1")) (set_tile "lyxs" "0.21"))
  ((and(= li1 "3") (= li2 "2")) (set_tile "lyxs" "0.24"))
  ((and(= li1 "3") (= li2 "3")) (set_tile "lyxs" "0.24"))
  ((and(= li1 "3") (= li2 "4")) (set_tile "lyxs" "0.22"))
  ((and(= li1 "3") (= li2 "5")) (set_tile "lyxs" "0.23"))
  ((and(= li1 "3") (= li2 "6")) (set_tile "lyxs" "0.26"))
  ((and(= li1 "3") (= li2 "7")) (set_tile "lyxs" "0.28"))
   ((and(= li1 "4") (= li2 "0")) (set_tile "lyxs" "0.21"))
     ((and(= li1 "4") (= li2 "1")) (set_tile "lyxs" "0.22"))
  ((and(= li1 "4") (= li2 "2")) (set_tile "lyxs" "0.25"))
  ((and(= li1 "4") (= li2 "3")) (set_tile "lyxs" "0.26"))
  ((and(= li1 "4") (= li2 "4")) (set_tile "lyxs" "0.24"))
  ((and(= li1 "4") (= li2 "5")) (set_tile "lyxs" "0.25"))
  ((and(= li1 "4") (= li2 "6")) (set_tile "lyxs" "0.27"))
  ((and(= li1 "4") (= li2 "7")) (set_tile "lyxs" "0.29"))
  ((and(= li1 "5") (= li2 "0")) (set_tile "lyxs" "0.22"))
     ((and(= li1 "5") (= li2 "1")) (set_tile "lyxs" "0.23"))
  ((and(= li1 "5") (= li2 "2")) (set_tile "lyxs" "0.26"))
  ((and(= li1 "5") (= li2 "3")) (set_tile "lyxs" "0.27"))
  ((and(= li1 "5") (= li2 "4")) (set_tile "lyxs" "0.25"))
  ((and(= li1 "5") (= li2 "5")) (set_tile "lyxs" "0.27"))
  ((and(= li1 "5") (= li2 "6")) (set_tile "lyxs" "0.29"))
  ((and(= li1 "5") (= li2 "7")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "6") (= li2 "0")) (set_tile "lyxs" "0.24"))
     ((and(= li1 "6") (= li2 "1")) (set_tile "lyxs" "0.25"))
  ((and(= li1 "6") (= li2 "2")) (set_tile "lyxs" "0.28"))
  ((and(= li1 "6") (= li2 "3")) (set_tile "lyxs" "0.29"))
  ((and(= li1 "6") (= li2 "4")) (set_tile "lyxs" "0.27"))
  ((and(= li1 "6") (= li2 "5")) (set_tile "lyxs" "0.29"))
  ((and(= li1 "6") (= li2 "6")) (set_tile "lyxs" "0.30"))
  ((and(= li1 "6") (= li2 "7")) (set_tile "lyxs" "0.33"))
   ((and(= li1 "7") (= li2 "0")) (set_tile "lyxs" "0.26"))
     ((and(= li1 "7") (= li2 "1")) (set_tile "lyxs" "0.28"))
  ((and(= li1 "7") (= li2 "2")) (set_tile "lyxs" "0.30"))
  ((and(= li1 "7") (= li2 "3")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "7") (= li2 "4")) (set_tile "lyxs" "0.29"))
  ((and(= li1 "7") (= li2 "5")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "7") (= li2 "6")) (set_tile "lyxs" "0.33"))
  ((and(= li1 "7") (= li2 "7")) (set_tile "lyxs" "0.35"))
   ((and(= li1 "8") (= li2 "0")) (set_tile "lyxs" "0.28"))
     ((and(= li1 "8") (= li2 "1")) (set_tile "lyxs" "0.30"))
  ((and(= li1 "8") (= li2 "2")) (set_tile "lyxs" "0.32"))
  ((and(= li1 "8") (= li2 "3")) (set_tile "lyxs" "0.33"))
  ((and(= li1 "8") (= li2 "4")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "8") (= li2 "5")) (set_tile "lyxs" "0.33"))
  ((and(= li1 "8") (= li2 "6")) (set_tile "lyxs" "0.34"))
  ((and(= li1 "8") (= li2 "7")) (set_tile "lyxs" "0.38"))
   ((and(= li1 "9") (= li2 "0")) (set_tile "lyxs" "0.29"))
     ((and(= li1 "9") (= li2 "1")) (set_tile "lyxs" "0.31"))
  ((and(= li1 "9") (= li2 "2")) (set_tile "lyxs" "0.33"))
  ((and(= li1 "9") (= li2 "3")) (set_tile "lyxs" "0.35"))
  ((and(= li1 "9") (= li2 "4")) (set_tile "lyxs" "0.32"))
  ((and(= li1 "9") (= li2 "5")) (set_tile "lyxs" "0.35"))
  ((and(= li1 "9") (= li2 "6")) (set_tile "lyxs" "0.36"))
  ((and(= li1 "9") (= li2 "7")) (set_tile "lyxs" "0.39"))
   ((and(= li1 "10") (= li2 "0")) (set_tile "lyxs" "0.31"))
     ((and(= li1 "10") (= li2 "1")) (set_tile "lyxs" "0.32"))
  ((and(= li1 "10") (= li2 "2")) (set_tile "lyxs" "0.34"))
  ((and(= li1 "10") (= li2 "3")) (set_tile "lyxs" "0.36"))
  ((and(= li1 "10") (= li2 "4")) (set_tile "lyxs" "0.33"))
  ((and(= li1 "10") (= li2 "5")) (set_tile "lyxs" "0.37"))
  ((and(= li1 "10") (= li2 "6")) (set_tile "lyxs" "0.37"))
  ((and(= li1 "10") (= li2 "7")) (set_tile "lyxs" "0.41"))
  ((and(= li1 "11") (= li2 "0")) (set_tile "lyxs" "0.32"))
     ((and(= li1 "11") (= li2 "1")) (set_tile "lyxs" "0.34"))
  ((and(= li1 "11") (= li2 "2")) (set_tile "lyxs" "0.35"))
  ((and(= li1 "11") (= li2 "3")) (set_tile "lyxs" "0.37"))
  ((and(= li1 "11") (= li2 "4")) (set_tile "lyxs" "0.35"))
  ((and(= li1 "11") (= li2 "5")) (set_tile "lyxs" "0.38"))
  ((and(= li1 "11") (= li2 "6")) (set_tile "lyxs" "0.38"))
  ((and(= li1 "11") (= li2 "7")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "12") (= li2 "0")) (set_tile "lyxs" "0.33"))
     ((and(= li1 "12") (= li2 "1")) (set_tile "lyxs" "0.36"))
  ((and(= li1 "12") (= li2 "2")) (set_tile "lyxs" "0.37"))
  ((and(= li1 "12") (= li2 "3")) (set_tile "lyxs" "0.39"))
  ((and(= li1 "12") (= li2 "4")) (set_tile "lyxs" "0.37"))
  ((and(= li1 "12") (= li2 "5")) (set_tile "lyxs" "0.41"))
  ((and(= li1 "12") (= li2 "6")) (set_tile "lyxs" "0.40"))
  ((and(= li1 "12") (= li2 "7")) (set_tile "lyxs" "0.44"))
  ((and(= li1 "13") (= li2 "0")) (set_tile "lyxs" "0.35"))
     ((and(= li1 "13") (= li2 "1")) (set_tile "lyxs" "0.37"))
  ((and(= li1 "13") (= li2 "2")) (set_tile "lyxs" "0.38"))
  ((and(= li1 "13") (= li2 "3")) (set_tile "lyxs" "0.40"))
  ((and(= li1 "13") (= li2 "4")) (set_tile "lyxs" "0.38"))
  ((and(= li1 "13") (= li2 "5")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "13") (= li2 "6")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "13") (= li2 "7")) (set_tile "lyxs" "0.46"))
   ((and(= li1 "14") (= li2 "0")) (set_tile "lyxs" "0.36"))
     ((and(= li1 "14") (= li2 "1")) (set_tile "lyxs" "0.39"))
  ((and(= li1 "14") (= li2 "2")) (set_tile "lyxs" "0.39"))
  ((and(= li1 "14") (= li2 "3")) (set_tile "lyxs" "0.41"))
  ((and(= li1 "14") (= li2 "4")) (set_tile "lyxs" "0.40"))
  ((and(= li1 "14") (= li2 "5")) (set_tile "lyxs" "0.41"))
  ((and(= li1 "14") (= li2 "6")) (set_tile "lyxs" "0.43"))
  ((and(= li1 "14") (= li2 "7")) (set_tile "lyxs" "0.48"))
  ((and(= li1 "15") (= li2 "0")) (set_tile "lyxs" "0.38"))
     ((and(= li1 "15") (= li2 "1")) (set_tile "lyxs" "0.41"))
  ((and(= li1 "15") (= li2 "2")) (set_tile "lyxs" "0.41"))
  ((and(= li1 "15") (= li2 "3")) (set_tile "lyxs" "0.44"))
  ((and(= li1 "15") (= li2 "4")) (set_tile "lyxs" "0.42"))
  ((and(= li1 "15") (= li2 "5")) (set_tile "lyxs" "0.47"))
  ((and(= li1 "15") (= li2 "6")) (set_tile "lyxs" "0.44"))
  ((and(= li1 "15") (= li2 "7")) (set_tile "lyxs" "0.50"))
     )))
      (cond
      ((and (= wei1 "0") (= wei2 "0")) (set_tile "whxs" "0.75"))
      ((and (= wei1 "0") (= wei2 "1")) (set_tile "whxs" "0.70"))
      ((and (= wei1 "0") (= wei2 "2")) (set_tile "whxs" "0.65"))        
      ((and (= wei1 "1") (= wei2 "0")) (set_tile "whxs" "0.75"))
      ((and (= wei1 "1") (= wei2 "1")) (set_tile "whxs" "0.70"))
      ((and (= wei1 "1")(= wei2 "2")) (set_tile "whxs" "0.65"))
      ((and (= wei1 "2") (= wei2 "0")) (set_tile "whxs" "0.75"))
      ((and (= wei1 "2") (= wei2 "1")) (set_tile "whxs" "0.70"))
      ((and (= wei1 "2") (= wei2 "2")) (set_tile "whxs" "0.65"))
      ((and (= wei1 "3") (= wei2 "0")) (set_tile "whxs" "0.75"))
      ((and (= wei1 "3") (= wei2 "1")) (set_tile "whxs" "0.70"))
      ((and (= wei1 "3") (= wei2 "2")) (set_tile "whxs" "0.65"))
      ((and (= wei1 "4") (= wei2 "0")) (set_tile "whxs" "0.75"))
      ((and (= wei1 "4") (= wei2 "1")) (set_tile "whxs" "0.70"))
      ((and (= wei1 "4") (= wei2 "2")) (set_tile "whxs" "0.65"))
      ((and (= wei1 "5") (= wei2 "0")) (set_tile "whxs" "0.85"))
      ((and (= wei1 "5") (= wei2 "1")) (set_tile "whxs" "0.75"))
      ((and (= wei1 "5") (= wei2 "2")) (set_tile "whxs" "0.70"))
    )
)

DCL程序：

two:dialog{
            label="电气计算软件系列—照度计算";    
            :boxed_column{
                        label="维护系数:";
                        :row{
                        :popup_list{
                                 label="灯具类型:";
                 key="wei1";                
                                 width=24;
                                 height=10;
                         }
                        :popup_list{
                                 label="污染特性:";
                 key="wei2";
                                 width=24;
                                 height=10;
                         }
                        :edit_box{
                                 label="维护系数:";
                 key="whxs";
                                 width=24;
                         }
                    }
                 }      
                 :boxed_column{
                        label="利用系数:";
                        :row{
                        :popup_list{
                                 label="室内指数:";
                 key="li1";
                                 width=24;
                                 height=10;
                         }
                        :popup_list{
                                 label="反射系数:";
                 key="li2";
                                 width=24;
                                 height=10;
                         }
                        :edit_box{
                                 label="利用系数:";
                 key="lyxs";
                                 width=24;
                         }
                    }
                 }
               ok_cancel;
}

利用系数中的2个下拉选单无法选择哪个显示哪个，是怎么回事 ，高手帮忙看看

龙龙仔

我試沒有問題,可能是你電腦中有好幾個相同名稱的程序(LSP主程序與DCL配亂了)

lixiaomin96

谢谢龙哥，我去试试

luowy

lz的帖子是我在mj见到的最长的帖子～～