;´ÎÃæ°å-------ÃÅ´°Êý×ÖÃæ°å[mini_window_panel].lsp
(defun c:mini_window_panel ()
	(mai_last_com "mini_window_panel")
	(mai_make_panel_up
		(list
			"ÃÅ´°Êý×ÖÃæ°å"
			(list
				"ÅúÁ¿ÐÞ¸ÄÃÅ´°¿í¶È"
				(list "¡ôÃÅ´°¿í¶È" "mini_win_width" nil "->")
				(list "©¸600 " "mini_win_width 600")
				(list "©¸700 " "mini_win_width 700")
				(list "©¸800 " "mini_win_width 800")
				(list "©¸900 " "mini_win_width 900" nil nil 4)
				(list "©¸1000" "mini_win_width 1000")
				(list "©¸1200" "mini_win_width 1200")
				(list "©¸1500" "mini_win_width 1500" nil nil 4)
				(list "©¸1800" "mini_win_width 1800")
				(list "©¸2000" "mini_win_width 2000")
				(list "©¸2100" "mini_win_width 2100" nil nil 4)
				(list "©¸2400" "mini_win_width 2400")
				(list "©¸2700" "mini_win_width 2700")
				(list "©¸3000" "mini_win_width 3000" nil nil 4)
				(list "©¸3300" "mini_win_width 3300")
				(list "©¸3600" "mini_win_width 3600")
				(list "©¸3900" "mini_win_width 3900")
			)

			(list
				"Ç½ÉÏ¿ªÃÅ A"
				(list "¡ôÇ½ÉÏ¿ªÃÅ" "mini_hole_door" nil "->")
				(list "©¸ÃÅÑùÊ½..." "mini_hole_door s")
				(list "©¸¶´¿í ......" "mini_hole_door w")
				(list "©¸¶´¿í 600 " "mini_hole_door w 600")
				(list "©¸¶´¿í 700 " "mini_hole_door w 700")
				(list "©¸¶´¿í 800 " "mini_hole_door w 800")
				(list "©¸¶´¿í 900 " "mini_hole_door w 900" nil nil 2)
				(list "©¸¶´¿í 1000" "mini_hole_door w 1000")
				(list "©¸¶´¿í 1200" "mini_hole_door w 1200")
				(list "©¸¶´¿í 1500" "mini_hole_door w 1500" nil nil 2)
				(list "©¸¶´¿í 1800" "mini_hole_door w 1800")
				(list "©¸¶´¿í 2000" "mini_hole_door w 2000")
				(list "©¸¶´¿í 2100" "mini_hole_door w 2100")
				(list "©¸¶´¿í 2400" "mini_hole_door w 2400" nil nil 2)
				(list "©¸¶´¿í 2700" "mini_hole_door w 2700")
				(list "©¸¶´¿í 3000" "mini_hole_door w 3000" nil nil 2)
				(list "©¸¶´¿í 3300" "mini_hole_door w 3300")
				(list "©¸¶´¿í 3600" "mini_hole_door w 3600" nil nil 2)
				(list "©¸¶´¿í 4000" "mini_hole_door w 4000")
				(list "©¸¶´¿í 4200" "mini_hole_door w 4200")
				(list "©¸¶´¿í 4500" "mini_hole_door w 4500")
			)

			(list
				"Ç½ÉÏ¿ªÃÅ B"
				(list "¡ôÁ½µã»­ÃÅ" "mini_door" nil "->")
				(list "©¸ÃÅÑùÊ½..." "mini_door s")
				nil
				(list "¶´¾ÓÇ½ÖÐ " "(setq mai_door_dist \"middle_position\")(c:mini_window_panel)")
				(list "©¸Ç½¶â  0  " "(setq mai_door_dist 0)(c:mini_window_panel)")
				(list "©¸Ç½¶â 50  " "(setq mai_door_dist 50)(c:mini_window_panel)")
				(list "©¸Ç½¶â 60  " "(setq mai_door_dist 60)(c:mini_window_panel)")
				(list "©¸Ç½¶â 90  " "(setq mai_door_dist 90)(c:mini_window_panel)")
				(list "©¸Ç½¶â 100 " "(setq mai_door_dist 100)(c:mini_window_panel)")
				(list "©¸Ç½¶â 120 " "(setq mai_door_dist 120)(c:mini_window_panel)")
				(list "©¸Ç½¶â 200 " "(setq mai_door_dist 200)(c:mini_window_panel)")
				(list "©¸Ç½¶â 300 " "(setq mai_door_dist 300)(c:mini_window_panel)")
				(list "©¸Ç½¶â 400 " "(setq mai_door_dist 400)(c:mini_window_panel)")
				(list "©¸Ç½¶â 500 " "(setq mai_door_dist 500)(c:mini_window_panel)")
				(list "©¸Ç½¶â 600 " "(setq mai_door_dist 600)(c:mini_window_panel)")
				(list "©¸Ç½¶â 700 " "(setq mai_door_dist 700)(c:mini_window_panel)")
				(list "©¸Ç½¶â 800 " "(setq mai_door_dist 800)(c:mini_window_panel)")
				(list "©¸Ç½¶â 900 " "(setq mai_door_dist 900)(c:mini_window_panel)")
				(list "©¸Ç½¶â 1000" "(setq mai_door_dist 1000)(c:mini_window_panel)")
				(list "©¸Ç½¶â 1200" "(setq mai_door_dist 1200)(c:mini_window_panel)")
				(list "©¸Ç½¶â 1500" "(setq mai_door_dist 1500)(c:mini_window_panel)")
			)

			(list
				"¿ª²ÎÊýÃÅ´° A"
				(list "¡ôÇ½ÉÏ¿ª´°" "mini_hole_win" nil "->")
				(list "©¸´°ÑùÊ½ ..." "mini_hole_win s")
				(list "©¸¶´¿í ......" "mini_hole_win w")
				(list "©¸¶´¿í 600 " "mini_hole_win w 600")
				(list "©¸¶´¿í 700 " "mini_hole_win w 700")
				(list "©¸¶´¿í 800 " "mini_hole_win w 800")
				(list "©¸¶´¿í 900 " "mini_hole_win w 900" nil nil 4)
				(list "©¸¶´¿í 1000" "mini_hole_win w 1000")
				(list "©¸¶´¿í 1200" "mini_hole_win w 1200")
				(list "©¸¶´¿í 1500" "mini_hole_win w 1500" nil nil 4)
				(list "©¸¶´¿í 1800" "mini_hole_win w 1800")
				(list "©¸¶´¿í 2000" "mini_hole_win w 2000")
				(list "©¸¶´¿í 2100" "mini_hole_win w 2100")
				(list "©¸¶´¿í 2400" "mini_hole_win w 2400" nil nil 4)
				(list "©¸¶´¿í 2700" "mini_hole_win w 2700")
				(list "©¸¶´¿í 3000" "mini_hole_win w 3000" nil nil 4)
				(list "©¸¶´¿í 3300" "mini_hole_win w 3300")
				(list "©¸¶´¿í 3600" "mini_hole_win w 3600" nil nil 4)
				(list "©¸¶´¿í 4000" "mini_hole_win w 4000")
				(list "©¸¶´¿í 4200" "mini_hole_win w 4200")
				(list "©¸¶´¿í 4500" "mini_hole_win w 4500")
			)

			(list
				"¿ª²ÎÊýÃÅ´° B"
				(list "¡ôÁ½µã»­´°" "mini_win"  nil "->")
				(list "©¸´°ÑùÊ½" "mini_win s")
				nil
				(list "¶´¾ÓÇ½ÖÐ" "(setq mai_win_dist \"middle_position\")(c:mini_window_panel)")
				(list "©¸Ç½¶â  0 " "(setq mai_win_dist 0)(c:mini_window_panel)")
				(list "©¸Ç½¶â  50 " "(setq mai_win_dist 50)(c:mini_window_panel)")
				(list "©¸Ç½¶â  60 " "(setq mai_win_dist 60)(c:mini_window_panel)")
				(list "©¸Ç½¶â  90 " "(setq mai_win_dist 90)(c:mini_window_panel)")
				(list "©¸Ç½¶â 100 " "(setq mai_win_dist 100)(c:mini_window_panel)")
				(list "©¸Ç½¶â 120 " "(setq mai_win_dist 120)(c:mini_window_panel)")
				(list "©¸Ç½¶â 200 " "(setq mai_win_dist 200)(c:mini_window_panel)")
				(list "©¸Ç½¶â 300 " "(setq mai_win_dist 300)(c:mini_window_panel)")
				(list "©¸Ç½¶â 400 " "(setq mai_win_dist 400)(c:mini_window_panel)")
				(list "©¸Ç½¶â 500 " "(setq mai_win_dist 500)(c:mini_window_panel)")
				(list "©¸Ç½¶â 600 " "(setq mai_win_dist 600)(c:mini_window_panel)")
				(list "©¸Ç½¶â 700 " "(setq mai_win_dist 700)(c:mini_window_panel)")
				(list "©¸Ç½¶â 800 " "(setq mai_win_dist 800)(c:mini_window_panel)")
				(list "©¸Ç½¶â 900 " "(setq mai_win_dist 900)(c:mini_window_panel)")
				(list "©¸Ç½¶â 1000" "(setq mai_win_dist 1000)(c:mini_window_panel)")
				(list "©¸Ç½¶â 1200" "(setq mai_win_dist 1200)(c:mini_window_panel)")
				(list "©¸Ç½¶â 1500" "(setq mai_win_dist 1500)(c:mini_window_panel)")
			)

			(list
				"¿ª×ª½Ç´° A"
				(list "¡ô¿ª×ª½Ç´°" "mini_coner_win" nil "->")
				(list "©¸¿íA ......" "mini_coner_win a")
				(list "©¸¿íA 600 " "(setq mai_dw1 600)(c:mini_window_panel)")
				(list "©¸¿íA 700 " "(setq mai_dw1 700)(c:mini_window_panel)")
				(list "©¸¿íA 800 " "(setq mai_dw1 800)(c:mini_window_panel)")
				(list "©¸¿íA 900 " "(setq mai_dw1 900)(c:mini_window_panel)")
				(list "©¸¿íA 1000" "(setq mai_dw1 1000)(c:mini_window_panel)")
				nil
				(list "©¸¿íA 1200" "(setq mai_dw1 1200)(c:mini_window_panel)")
				(list "©¸¿íA 1500" "(setq mai_dw1 1500)(c:mini_window_panel)")
				nil
				(list "©¸¿íA 1800" "(setq mai_dw1 1800)(c:mini_window_panel)")
				(list "©¸¿íA 2000" "(setq mai_dw1 2000)(c:mini_window_panel)")
				(list "©¸¿íA 2100" "(setq mai_dw1 2100)(c:mini_window_panel)")
				nil
				(list "©¸¿íA 2400" "(setq mai_dw1 2400)(c:mini_window_panel)")
				(list "©¸¿íA 2700" "(setq mai_dw1 2700)(c:mini_window_panel)")
				(list "©¸¿íA 3000" "(setq mai_dw1 3000)(c:mini_window_panel)")
				(list "©¸¿íA 3300" "(setq mai_dw1 3300)(c:mini_window_panel)")
				(list "©¸¿íA 3600" "(setq mai_dw1 3600)(c:mini_window_panel)")
				(list "©¸¿íA 4000" "(setq mai_dw1 4000)(c:mini_window_panel)")
			)

			(list
				"¿ª×ª½Ç´° B"
				(list "×ª½Ç´°ÑùÊ½" "mini_coner_win s" nil "->")
				(list "©¸¿íB ......" "mini_coner_win b")
				(list "©¸¿íB 600 " "mini_coner_win b 600")
				(list "©¸¿íB 700 " "mini_coner_win b 700")
				(list "©¸¿íB 800 " "mini_coner_win b 800")
				(list "©¸¿íB 900 " "mini_coner_win b 900")
				(list "©¸¿íB 1000" "mini_coner_win b 1000")
				nil
				(list "©¸¿íB 1200" "mini_coner_win b 1200")
				(list "©¸¿íB 1500" "mini_coner_win b 1500")
				nil
				(list "©¸¿íB 1800" "mini_coner_win b 1800")
				(list "©¸¿íB 2000" "mini_coner_win b 2000")
				(list "©¸¿íB 2100" "mini_coner_win b 2100")
				nil
				(list "©¸¿íB 2400" "mini_coner_win b 2400")
				(list "©¸¿íB 2700" "mini_coner_win b 2700")
				(list "©¸¿íB 3000" "mini_coner_win b 3000")
				(list "©¸¿íB 3300" "mini_coner_win b 3300")
				(list "©¸¿íB 3600" "mini_coner_win b 3600")
				(list "©¸¿íB 4000" "mini_coner_win b 4000")
			)
		)
	)
)
