[wwalll]

Добрый день.
Имею опыт програмирования на различных языках програмирования ,но сейчас надо изучить программирование под автокадом.
Предлагаю - вы ставите задачи, я решаю и бесплатно отдаю решение вам.
Ограничения -
1. по времени (уделять более 2 часов в день на решение задачи не смогу)
2. по качеству (знаний "правильной работы" в автокаде нет )
3. по постановке/сопровождению (внятная задача предпочтительней обощеной "хотелки", человеческое общение (skype + teamviewer) предпочительней "хотелок")

Не смотря на ограниченя, с моей точки зрения это предложение выгодно всем - у вас решения, у меня опыт.

[DEM]

Тут к вам вопрос, что вы подразумеваете под функциями..
Например есть вот задача, построения изолиний по текстовому файлу, интересна ли она вам???

[ShaggyDoc]

сейчас надо изучить программирование под автокадом

и

у меня опыт

как-то не вяжется. Вообще-то здесь все желающие публикуют сотни "решений" и тоже бесплатно. Но если хочется порешать "по спецзаказу", вот задачка для проверки:

Напиши под заказ на Lisp функцию транспонирования двухмерного списка.

У функции должен быть один аргумент - список ("таблица") из двух одномерных списков ("Поля" и "Записи") с одинаковым количеством элементов. На выходе - "транспонированный" (или как хочшь назови) список, у которого "поля" и "записи" поменялись местами. Например:

Было:

Код:

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

Папа     Мама    Дочка
Демократ Политик Лошадка

Стало:

Код:

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

Папа Демократ
Мама Политик
Дочка Лошадка

Условие:

Использовать только штатные средства Lisp (без всяких dll и т.п.)

Подсказка:

Список в Lisp можно сформировать так:

(list (list "Папа" "Мама" "Дочка") (list "Демократ" "Политик" "Лошадка"))

Т.е. заказанная функция должна вызываться примерно так:

Код:

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

 (my_super_puper_trans (list (list "Папа" "Мама" "Дочка") (list "Демократ" "Политик" "Лошадка")))

и возвращать

Код:

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

 (("Папа" "Демократ") ("Мама" "Политик") ("Дочка" "Лошадка")) 

А потом "посмотрим, что это за Сухов" (С)

[Profan]

Автор темы, по всей видимости, хочет бесплатно научиться программированию в среде AutoCAD.

[DEM]

Сообщение от Profan Автор темы, по всей видимости, хочет бесплатно научиться программированию в среде AutoCAD.

Ну наверное немного не так, он хочет расширить свои знания в программировании...

[MrBrown]

wwalll, добрый день! Я восхищён. Это - поступок! Я в своё время так же тренировался в создании макросов на VBA для Excel и простых сайтов на PHP+mysql. А теперь просьба:
вот макрос (см. вложение), прекрасно работающий в пространстве модели. Он автоматически отрисовывает защитную зону электрокабелей, в роли каковых выступают полилинии. Но он не хочет правильно работать, если развернуть видовой экран на листе. Помогите, пожалуйста, устранить это небольшое неудобство. Макрос не мой, пользователя Олега(jr.), спасибо ему за него. Но, видимо, он сейчас очень занят, поэтому прошу Вас.
Спасибо.
__________________
Значки - Калуга и область.

[Дима_]

Я одобряю инициативу автора - только поясните - на чем Вы программируете под автокад, и в каком диалекте программирования есть опыт (т.к. есть варианты когда опыт программирования на одном будет скорее мешать программировать на другом) бери задачи из уже решенных, реши сам а потом сравни чей вариант лучше. ShaggyDoc как старый "корефей" подсунул тебе любимую "красоту" решаемую в 1 строку лиспа - решишь (а не найдешь) ее так-же сам - без гугла (что в общем врядли) - значит лисп это точно для тебя (если до этого его еще не знал), но аккуратней - после него может прийти разочарование во многих "мэйнстримовых" языках и возращаться к ним уже не захочется, а это может сказаться в разные стороны на кошельке - знанием еще надо уметь воспользоваться.

[Do$]

Сообщение от Profan Автор темы, по всей видимости, хочет бесплатно научиться программированию в среде AutoCAD.

Вполне нормальное желание.

Добрый день. Имею опыт програмирования на различных языках програмирования ,но сейчас надо изучить программирование под автокадом. Предлагаю - вы ставите задачи, я решаю и бесплатно отдаю решение вам. Ограничения - 1. по времени (уделять более 2 часов в день на решение задачи не смогу) 2. по качеству (знаний "правильной работы" в автокаде нет ) 3. по постановке/сопровождению (внятная задача предпочтительней обощеной "хотелки", человеческое общение (skype + teamviewer) предпочительней "хотелок") Не смотря на ограниченя, с моей точки зрения это предложение выгодно всем - у вас решения, у меня опыт.

Несколько пафосное заявление, на мой взгляд, но желание хорошее. С автокадом-то вообще знакомы?
Только неплохо было бы еще рассказать на каком языке будут писаться программы, может быть посоветовали чего хорошего.

[wwalll]

> DEM
Потратите пару часов объясняя что такое изолинии? если да - то не вижу препятствий к написанию функции
> ShaggyDoc

(defun transformlist (flist slist)
;;; функция строит объединение списков
;;; пример вызова (transformlist (list 'Папа 'Мама 'Дочка) (list 'Демократ 'Политик 'Лошадка))
(if (eq (length flist) (length slist))
(mapcar 'list flist slist)
(nil)))
Я так онимаю задача была понять - знаю ли что такое map/apply/reduce?

> Profan
да. именно так.

> Дима
Лисп знаю (но любимый всеже любимый диалект - sbcl (по сравнению с которым автокадовский лисп - кастрированная лягушка))
> Do$
Повехностно знаком. Именно за этим и пришел - найти людей кто согласен потратить полчаса на объяснение задачи и показаать как можно работать с автокадом, я соответсвенно делаю функцию нужную вам.

Что касается языков программирования - любой . Все равно язык ничего не оппределяет.

[DEM]

wwalll
Могу ТЗ, написать со ссылкой на алгоритмы и т.п.

[wwalll]

Сообщение от DEM Могу ТЗ, написать со ссылкой на алгоритмы и т.п.

Тогда я полностью за.

[hwd]

Сообщение от wwalll Предлагаю - вы ставите задачи, я решаю и бесплатно отдаю решение вам. Что касается языков программирования - любой . Все равно язык ничего не оппределяет.

C++. Напиши модуль нормоконтроля, проверяющий чтобы имена слоёв соответствовали регулярному выражению, указанному во внешнем конфигурационном файле формата XML. Задачка не сложная и полезная.
Если не потянешь C++, можешь выбрать C# или AutoLISP\Visual LISP, ежели хотя бы один из обозначенных языков входит в твой обширный багаж знаний.
А это:

Сообщение от wwalll Имею опыт програмирования на различных языках програмирования. ... Что касается языков программирования - любой . Все равно язык ничего не оппределяет.

говорит о том, что автор - ламер.

[DEM]

Offtop:

Сообщение от hwd говорит о том, что автор - ламер.

Вечно у тебя все овощи...

[wwalll]

Сообщение от hwd говорит о том, что автор - ламер.

Ну я нигде вроде не утверждал что я - крутой мегаспециалист. Всего лишь учусь. А у всех чайников завышеное самомнение, и именно поэтому профессионалам они кажутся ламмерами. Это потом уже с опытом работы на С/С++/С# (хотя странно что вы еще ассемблер не указали) понимаешь что императивная парадигма - основа основ. А все остальное от лукавого. Если дойду до вашего высочайшего уровня - наверное тоже смогу судить о профпригодности по постам на форуме.

А за задачу спасибо. Как раз под мой начинающий уровень.

[hwd]

Сообщение от wwalll А у всех чайников завышеное самомнение, и именно поэтому профессионалам они кажутся ламмерами.

Не существует универсального языка программирования. Каждый язык ориентирован на свой специфический круг решаемых задач. Это не означает, что иные задачи он не решит, но означает то, что на др. языках это можно сделать более удобно. Программисты это знают.

Сообщение от wwalll странно что вы еще ассемблер не указали

На ассемблере под автокад не пишут, а пишут, в основном, как раз на указанных мною языках.

[gomer]

Научу блондинку автолиспу. Дорого

[zamtmn]

wwalll
Я как твой первый пост увидел, сразу сгонял за попкорном и уселся поудобнее, в ожидании подобной "прописки на хате"))

Заказик от меня:
Преобразовать выделенные штриховки в 3дфейсы.
Без лиспа я это делаю так - присваиваю штриховкам паттерн "солид", сохраняю в dxf12, закрываю, снова открываю этот dxf, расчленяю образованные блоки. В итоге на месте штриховок остаются фейсы и отрезки.
Конечно специфично, наврятли комута кроме меня надо, но малоли...

[Do$]

wwalll, с лабораторными работами из материалов тренинга по API AutoCAD знакомы? Может лучше с них начать. Найти можно на сайте Autodesk в разделе для программистов.

[ShaggyDoc]

Зря набросились на автора темы. Он просто неправильно или неудачно начал "работу на заказ". Здесь на форуме постоянно публикуют "ТЗ", и все желающие бескорыстно помогают. При этом и сами учатся. И на таких работах многие участники достигли белстящих результатов для себя.

Что касается проверки "посмотрим, что за Сухов":

(defun transformlist (flist slist) ;;; функция строит объединение списков ;;; пример вызова (transformlist (list 'Папа 'Мама 'Дочка) (list 'Демократ 'Политик 'Лошадка)) (if (eq (length flist) (length slist)) (mapcar 'list flist slist) (nil))) Я так онимаю задача была понять - знаю ли что такое map/apply/reduce?

Задача была проверить автора темы. Вот он написал "ставьте задачи" - я и поставил. Но решение не соответствует "ТЗ". В задании было запрошена обработка одного списка, а функция написана для двух списков. Это не годится - если уж работа "на заказ", надо делать точно по ТЗ. В общем, еще не "Сухов", но уже "Петька".

Решается она самым изящным способом так:

(defun transformlist (lst) (apply 'mapcar (cons 'list lst)) )

Такая кажущаяся итоговая простота требует большой работы по отсеканию всего лишнего.

При этом и дополнительных проверок делать не надо на длину списков (одинаковое количество элементов было в ТЗ), да и при разной длине списков и при пустых списках функция вернет ожидаемый результат.

Еще раз подчеркиваю - если беремся работать "на заказ" - точно выполняем ТЗ.

[Дима_]

Сообщение от wwalll Лисп знаю (но любимый всеже любимый диалект - sbcl (по сравнению с которым автокадовский лисп - кастрированная лягушка))

Вижу - что знаете, автолисп несомненно недолисп, но в Вашем варианте:
1. Он не делает того что требовалось (на входе нужен один список содержащий произвольное число "подсписков", а в Вашем варианте их фиксированно 2 отдельных).
2. В автолиспе в if третий аргумент не обязателен - по умолчанию при невыполнении условия и так возращает nil.
3. Конструкция (nil), а именно ее вернет Ваша программа в случае несовпадения длинны списков, выдаст ошибку в любом (по крайней мере известном мне) диалекте лиспа - либо nil, либо '(), кое-где еще прокатит просто (). В общем потренеруйтесь еще.
з.ы. Насчет язык нечего не определяет, мне это странно слышать от человека знакомого с лиспом и оперирующего понятием парадигма - парадигма точно определяет по своему определению, а языки пишутся под парадигму(ы). А уж в разрезе автокада - это вообще отдельная песня.