|
||
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны | Справка по форуму | Файлообменник | |
|
Поиск в этой теме |
|
||||
YngIngKllr Регистрация: 29.03.2005
СПб
Сообщений: 12,968
|
ЖДУ ФУЛЕР
[ATTACH]1147241792.rar[/ATTACH] Я там кой чего подправил. Если захочешь увеличить кубики или уменьшить по работай со стрками Код:
__________________
Работаю за еду. Working for food. Für Essen arbeiten. العمل من أجل الغذاء Працую за їжу. |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,833
|
В первом лиспе, который с кубиками (какие кубики, я так и не понял) используется строка
Код:
Кроме того, у меня полилинии постоянно нулевой ширины, а у тебя они меняются. Вернуть не помешало бы
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
YngIngKllr Регистрация: 29.03.2005
СПб
Сообщений: 12,968
|
Гы крЫс
А у меня все работает И полилинии по слою выходят Причем символ t вводится строкой [/code] (princ "Введите текст кубика N ") (princ (itoa step)) (princ ": ") (setq T (getstring 4 5)) (command "_.text" pt5 2.5 0 T)
__________________
Работаю за еду. Working for food. Für Essen arbeiten. العمل من أجل الغذاء Працую за їжу. |
|||
|
||||
YngIngKllr Регистрация: 29.03.2005
СПб
Сообщений: 12,968
|
Ну уж в другую сторону мне если честно в ломы уже писать.
Так просто поставил для себя задачку, решил её и доволен.
__________________
Работаю за еду. Working for food. Für Essen arbeiten. العمل من أجل الغذاء Працую за їжу. |
|||
|
||||
YngIngKllr Регистрация: 29.03.2005
СПб
Сообщений: 12,968
|
Добавь в локальные переменные T.
Я по запарке забыл внести. Чтобы увеличить длину выноски надо в строке (setq L (* 2 (strlen P))) Поменять 2 на другое значение Все будет зависеть от шрифта.
__________________
Работаю за еду. Working for food. Für Essen arbeiten. العمل من أجل الغذاء Працую за їжу. |
|||
|
||||
YngIngKllr Регистрация: 29.03.2005
СПб
Сообщений: 12,968
|
Цитата:
Чтобы хотя бы чужие заготовки под себя переделывать. Хотел еще DCL окно добавить но понял что это вам не пгодойдет. Уж слишком тяжело будет написть окно для множества значений. Только ограниченное кол-во строк и кубиков. Можно будет только блдокировать значения которые вводить не надо.
__________________
Работаю за еду. Working for food. Für Essen arbeiten. العمل من أجل الغذاء Працую за їжу. |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,833
|
Для начала можно и это (поскольку действительно бесплатно)
Файл vlisptut_rus.pdf (учебное пособие по Visual LISP 2000, сентябрь 1999) доступен по адресам: http://rapidshare.de/files/19738006/...t_rus.pdf.html http://webfile.ru/936881 (будет доступен до 13.05.2006 10:1Cool Объем : 2,2 Мб (на всякий случай повторюсь) Учебное руководство по VLISP (садовая дорожка) (на русском, из поставки AutoCAD 2006) доступно по адресам: http://rapidshare.de/files/19738079/acad_alt.chm.html http://webfile.ru/936884 (будет доступен до 13.05.2006 10:20) Объем (опять же на всякий случай) : 457 кб.
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,833
|
Текст взят отсюда
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||