Мульти-вставка блока с автоматическим масштабированием и запросом угла

(defun _ru-block-multi-insert-scaled-angleask
       (block_name ins_code x_scale y_scale)
       ;|
(_ru-block-multi-insert-scaled-angleask "колонна_2" 1 500 2000)
МУльти-вставка блока с автоматическим  масштабированием
Код ins_code (1..10) определяет коэффициенты масштабирования и поворот
Эта функция вставляет блоки в плоские. Угол поворота запрашивается
Коды использованы для совместимости с BestIA

|;
  (ru-block-multi-insert-scaled-angleask
    block_name
    (* (if (= ins_code 1)
         1
         -1
       ) ;_ end of if
       x_scale
    ) ;_ end of *
    y_scale
  ) ;_ end of ru-block-multi-insert-scaled-angleask
) ;_ end of defun

 ;|«Visual LISP© Format Options»
(72 2 30 2 T "end of " 72 9 1 0 0 nil T T T)
;*** DO NOT add text below the comment! ***|;