VBA vs LISP (Страница 2 из 3)

> Maxim T
Поклонникам Бейсика:
Приятно видеть энтузиаста, это честно, без иронии. Я, например, прочитал и задумался, a являюсь ли я поклонником языка Visual Basic? Поклонником, безусловно, нет, но предпочитаю его. Почему? Вот мнение  оппонента:
[Re:] Который против басиков (2004-06-24
...вообщем все это дело вкуса, привычек и предпочтений,
Согласен.Ну а кроме привычек ...? Почему-то никто не сказал, что  VB - это современный язык, а AutoLisp архаичен (при всей его мощи и красоте), что VB адекватен иерархической объектной модели AutoCAD'а, а попытки расширить AutoLisp в этом направлении выглядят, воля ваша, неуклюже, как одежда с чужого плеча. В основе этой неуклюжести, вероятно, лежит неудачная попытка совместить два несовместимых стиля или подхода в программировании - процедурный и функциональный.
По большому счету, иерархическая объектная модель AutoCAD'а
является методологической основой прогаммирования под AutoCAD - что в VB, что в ObjectARX, что в LISP'е.В итоге, прогаммы на VB(VBA) выглядят стройнее и прозрачнее, чем на
LISP'е.Они понятнее, их легче разрабатывать - разве это не преимущество?!

Недавно столкнулся вот с каким недостатком Lispa который меня просто убил - лисп не позволяет работать интерактивно в разных документах. Конечно виноват в этом не лисп, а фирма autodesk которая не знаю по каким причинам ввела ограничения по работе в многодокументном режиме. Тоже самое касается DCL, вызова функций из DLL и др. Видимо autodesk не хочет давать нам в руки мощный инструмент. Ау  ShaggyDoc как думаеш. Но несмотря на это уходить из лиспа не собираюсь, нравится он мне как древняя Leica фотографу.

> Alexander
писал на басике лет 10 назад, как освоил си - забыл, что такое басик.... для школьников он хорош, чтоб не отпугнуть малышей от мира компутеров!

> Alexander
я не занимаюсь пока просветительской деятельностью и сайта у меня нет пока. Звучит забавно - правда?

> ShaggyDoc
я так понимаю что Камаз - это лисп а ЗАЗ это басик?

> VH
Не думаю,что перепутал причины и следствия. Объектная модель AutoCAD в современном понимании  была разработана при создании библиотек ObjectARX, а начиная с 15-й версии ядро AutoCAD (как вам, наверняка, известно) написано на С++ в ObjectARX.Т.е. AutoCAD по всем признакам является объектно-ориентированной системой. Что касается объектной модели AutoCAD для VB(VBA), то она представляет собой программный интерфейс обеспечивающий доступ процедурам VB к возможностям и средствам этого самого ядра.
И в силу такой связи она (объектная модель AutoCAD для VB
(VBA)) базируется на АКАД-овской структуре и отражает ее.
    Но не это главное.Даже если ...когда к AutoCADу "присоединили" еще и BASIC, тогда Autodeskи и иерархическую объектную модель для него соорудили (ежели ему без нее нельзя) то это не умаляет заслуги Autodesk'ов
в деле помощи программистам-прикладникам. Потому что без объектной модели, действительно, никак нельзя.
P.S. Вы и вправду полагаете, что "архаичный" это ругательство?

Да, помогите человеку на Lisp форуме: "Подскажите пожалуйста, как отфильтровать примитив с точно известным значением расширенных данных, используя команду ssget "X"?"
На VBA это делается с пол-....

'Пример, как взять расширенные данные у любого примитива
    Dim xdataOut As Variant
    Dim xtypeOut As Variant
    Dim ret_obj As AcadObject
    Dim pick_pt As Variant
    ThisDrawing.Utility.GetEntity ret_obj, pick_pt, "Укажите примитив: "
    ret_obj.GetXData "", xtypeOut, xdataOut
' Далее, следует проанализировать значение переменных  xtypeOut и xdataOut
'-----------------------------------------------------------------

Прошло 5 часов. Полет нормальный, kos!

для Maximа T
Как говорил Буратино: "Врете, Вы, все".
Проверил этот Lisp-код - данные не дает.
Могу выслать dwg-файл - проверите сами.
А, вот на VBA работает как часики.
Ну и совсем не понятно, что значит: "расширенные данные похоронены Автодеском" ?.

КО ВСЕМ.
Хорошо, объясните, пожалуйста, мне - лисперу, весьма плохо знающему VBA - как сделать такую весчь.
Надо на уровне модуля задекларировать целую константу maxCount (ну это просто:), а потом в цикле по i от 0 до maxCount-1 проинициализировать некий глобальный массив строками вида: PrefixConst + Str(i) + SuffixConst. Сделать это надо только один раз, при загрузке DVB-шника.
А вот это фиг! At module level, you can use only comments and declarative statements. ИМХО, это значит, что я должен внутри каждой процедуры, где используется этот массив, каждый раз проверять его (функцией isEmpty, если не ошибаюсь), и при необходимости - инициализировать. Немного через зад (в смысле быстродействия), или я не прав ???
Я уже не говорю, что на Лиспе я при желании могу наделать maxCount переменных (правда, всегда только глобальных) с именами var0, var1 ... прямо во время исполнения, если мне это понадобится, и сделать это в любом месте кода, где вздумается.
И вдогонку: Procedures can't be nested within other procedures. Занавес.