・ 選択セットをハイライト表示する( redraw の選択セット対応)
(redraw) を使って、選択セットをハイライト表示させます
;*********************************************************;
;サブルーチン (redraw) の選択セット対応;
; ss:選択セット
; mode:(redraw)のモード値
;*********************************************************;
(defun Jos_ss_redraw (ss mode / i )
(setq i 0)
(repeat (sslength ss)
(redraw (ssname ss i) mode)
(setq i (1+ i))
)
)