[WhiteShark]

Вопрос в названии темы.

Пример: надо получить кавычку внутри текста, но
(strcat " " "\"" " ") игнорит бэкслэш и в результате получаем " \" ". Как быть?

Ну и так же у меня не получается прописать символ с его кодом nnn через конструкцию \nnn.

[Кулик Алексей aka kpblc]

Выполни в ком.строке

Код:

[Выделить все]

(princ (strcat " " "\"" " ") )

[Do$]

Сообщение от WhiteShark (strcat " " "\"" " ") игнорит бэкслэш и в результате получаем " \" ". Как быть?

Так и должно быть, ничего не "игнорит", вполне нормальное поведение. А что ожидалось?

[WhiteShark]

Princ то работает, но он мне не подходит. Мне нужно чтоб strcat возвращал как надо. Потому что у меня (apply 'strcat ...)

----- добавлено через ~1 мин. -----
Ожидалась " " " (кавычка в кавычках обрамленная пробелами), то есть без \

[nolte]

попробуй так
(strcat (chr 34) "text" (chr 34))

[Кулик Алексей aka kpblc]

WhiteShark, почитай про управляющие символы и работу слеша. Тебя вообще не смущает, что перевод строки - это \n, символ табуляции - \t, слеш - \\ и т.д.?

[Do$]

Сообщение от WhiteShark Ожидалась " " " (кавычка в кавычках обрамленная пробелами), то есть без \

Не надо путать внутреннее представление строки и ее вид при выводе на экран.

[WhiteShark]

Do$ ну почему моя строка не может быть такой как я хочу и представлять из себя просто кавычку, а не кавычку со слэшем? Так же не должно быть.
Между прочим, вариант от nolte, даёт желаемый результат!

Вообще задача состоит в том, чтобы команде vl-cmdf передать набор параметров, имеющихся ввиду списка. Для этого надо перевести весь этот список в строку. Например:

(vl-cmdf "-insert" "blockname" "basePt" "Xscale" "Yscale" "Zscale" "Angle" ???что то вокруг списка значений тэгов вида ("TagVal1" "TagVal2")??)
нужно перевести в

(vl-cmdf "-insert" "blockname" "basePt" "Xscale" "Yscale" "Zscale" "Angle" "TagVal1" "TagVal2")

Вот вместо ???что то вокруг .... ??? вроде подходит (apply 'strcat ("TagVal1" "TagVal2")), но кавычки при этом съедаются. Конструкция

(strcat (chr 34) "TagVal1" (chr 34) " " (chr 34) "TagVal2" (chr 34))

возвращает желаемую последовательность "TagVal1" "TagVal2" но vl-cmdf всё равно её не кушает

Понятно, что можно более программно менять значения атрибутов в блоках, но цель была сделать это во время вставки, а не после.
Если, кто-то что-то подскажет, буду рад

[Do$]

Сообщение от WhiteShark Do$ ну почему моя строка не может быть такой как я хочу и представлять из себя просто кавычку, а не кавычку со слэшем? Так же не должно быть. Между прочим, вариант от nolte, даёт желаемый результат!

Код:

[Выделить все]

_$ (strcat (chr 34) "text" (chr 34))
"\"text\""
_$

[WhiteShark]

Do$, это во VLIDE так выглядит. А если вы присвоите это значение какой нить переменной и потом её inspect, то увидите, что там будет
#\"
#\t
#\e
#\x
#\t
#\"
То есть тут каждый символ предваряется слэшем. То есть, считай его нет и перед кавычкой. В общем, как бы это ни казалось визуально тем же, но vl-cmdf такой вариант съедает. Единстенная проблема - не понимает пробел как enter (

[Do$]

Как Enter vl-cmdf принимает пустую строку:

Код:

[Выделить все]

(vl-cmdf "_.line" "0,0,0" "1,1,1" "")

[WhiteShark]

Do$, Это понятно, что пустую строку как enter. Я имею ввиду не воспринимает пробел между аргументамии. То есть

хотя вроде и получается после обработки (vl-cmdf "-insert" "blockname" "basePt" "Xscale" "Yscale" "Zscale" "Angle" "TagVal1" "TagVal2")

но по факту передается не пара значений тэгов в конце, а совокупность ' "TagVal1" "TagVal2" ' воспринимается как значение первого тэга, а для значения второго тэга команда ожидает очередного ввода.

Задачу в общем виде можно описать так: как сделать

(vl-cmdf "_.line" "0,0,0" "1,1,1" "")
из vl-cmdf и ("_.line" "0,0,0" "1,1,1" "")?

То есть отбросить скобки вокруг списка параметров (преобразовать список в строку)?

[Do$]

Код:

[Выделить все]

(apply 'vl-cmdf '("_.line" "0,0,0" "1,1,1" ""))

[Alan]

Сообщение от WhiteShark Задачу в общем виде можно описать так: как сделать (vl-cmdf "_.line" "0,0,0" "1,1,1" "") из vl-cmdf и ("_.line" "0,0,0" "1,1,1" "")? То есть отбросить скобки вокруг списка параметров (преобразовать список в строку)?

Какая мутность и примитивность задачи в теме Лисп...

[WhiteShark]

Do$, большое спасибо! Направили, куда нужно )

В итоге конструкция

(apply 'vl-cmdf (append (list "-insert" "blockname" "basePt" "Xscale" "Yscale" "Zscale" "Angle") '("Val1" "Val2" .. "Valn")) )

делает то, что нужно

Alan может это и мутно, но короче еще одного цикла. А общая задача, которую я решил - восстановление взорванных блоков (без наличия их описаний в словарях). По мне так не самая примитивная задача. По крайней мере я еще не видел нигде её решения.

[Кулик Алексей aka kpblc]

Вообще-то вставку блока можно делать и не командными методами. ИМХО нередко получается надежнее и проще.

[WhiteShark]

Сообщение от Кулик Алексей aka kpblc Вообще-то вставку блока можно делать и не командными методами. ИМХО нередко получается надежнее и проще.

Тут как раз тот случай, когда не проще. Ведь нельзя же сделать вставку блока с уже назначенными значениями TextString'ов атрибутов?
vla-insertblock такого не позволяет. А делать блок через entmake намного более громоздко этой строчки, потому что заранее неизвестен набор примитивов, составляющих блок.

[Кулик Алексей aka kpblc]

Ага, получается, что проще сначала системные переменные ATTREQ (и, возможно, ATTDIA) поставить в 0, потом назначать значения атрибутам, потом возвращать все обратно? Не, я на такое не согласный - мне проще получить указатель на вставленный программно блок, из этого указателя вычислить все атрибуты и по тэгам уже назначать строковые значения. Быстро, просто, надежно.

[WhiteShark]

Во-первых я не трогаю эти переменные (и без них всё как надо)
Во-вторых я уже было дописал ваш второй предлагаемый вариант, как ответил Do$ и вариант в одну строчку мне показался покомпактней чем такой )
Плюс, вы не считаете, что идеологически правильно вставить блок с уже правильными значениями атрибутов, чем вставить с неправильными и потом вторым действием их исправлять?

[Кулик Алексей aka kpblc]

Не-а, не считаю: последовательность задания атрибутов может быть изменена. Пользователем или нет, это уже неважно. А программа должна работать предсказуемо.
P.S. "Вы" - это кому? Меня один.

[Alan]

Сообщение от Кулик Алексей aka kpblc последовательность задания атрибутов может быть изменена.

И командные методы здесь не применимы.
Для меня проще вставить блок " с неправильными" атрибутами при (setvar "attreq" 0) "и потом вторым действием их исправлять".
Указателем на это примитив будет (setq rr3 (entlast)) а потом корректировка не раз публиковавшейся мной здесь функцией.

[WhiteShark]

Сообщение от Кулик Алексей aka kpblc последовательность задания атрибутов может быть изменена. Пользователем или нет, это уже неважно.

В моём случае последовательность не может быть изменена. Вернее, правильность передачи значений атрибутов именно нужным тегам отслеживается и так по сценарию.