[byackafoot]

Есть такие вот програмулины PASPORT и Ochistnie Написаные когда-то давно для облегчения жизни горных инженеров - предназначены для полуавтоматического составления паспортов горных выработок шахт. При попытке воткнуть их в ACAD2010 - все значки меню превращаются в гору вопросительных знаков, ну и собственно программа не идет. пробовал ставить и на 2002 и на 2004 - с меню все нормально, но программа обрывается после ввода данных (хотя вроде скачана полностью). В чем может быть дело? что нужно почитать или где подсмотреть чтобы ее нормально внедрить? Может кто-нибудь помочь с этим? ато я в LISP не в зуб ногой. (PASPORT упакован *.7z - надо переименовать)...
...Вобщм теперь задача сводиться хотябы к запуску в AutoCad 14R - 2004.

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

Насколько я понял, оба архива надо распаковать на c: и прописать их в путях доступа AutoCAD'a. Но сам подход к программе ужаснул.

[Alan]

На вскидку.
Достаточно просто решаемая задача.
Необходимо откорректировать файлы меню - MNU. Убрать оттуда часть, которая принадлежит Автокаду и оставить только пользовательскую часть.
Например в anker.mnu оставить только (с необходимой корректировкой путей, сборкой слайдов в библиотеку и т.п.)

Код:

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

***image
**TIPKR
[ВЫБЕРИТЕ ТИП КРЕПИ]
[krepdwg/moskow(tt1, )]1
................
**rels
[ВЫБЕРИТЕ РЕЛЬСОВЫЙ ПУТЬ]
[c:/pasport/krepdwg/tipkr(rels1)]c:/pasport/krepdwg/dwg/rels1
...................
**prijm
[ВЫБЕРИТЕ КАНАВКУ]
..........

Собрать все эти пользовательские части в ОДНО пользовательское меню: POP; IMAGE: TOOLBARS.
Загрузить его один раз и вызывать ту или иную часть по необходимости. И будет Вам счастье! ЯТД

[gomer]

очередная корзина мусора

[byackafoot]

Спасибо! попробую пошаманить.

Насколько я понял, оба архива надо распаковать на c: и прописать их в путях доступа AutoCAD'a. Но сам подход к программе ужаснул.

Да уж. подход получился через китай... Грузит свою панель инструментов с переопределением вообще всех кнопок...

... но ведь после загрузки "своей" меню поидее дальше всеравно должно быть продолжение по вводу там данных всяких???

Достаточно просто решаемая задача.

А редактировать только файлы *.mnu? в эти не лазить - *.mns, lsp ,sld... и еще кагбы таки понять что именно пренадлежит автокаду.


... в ankers.mnu поудалял все на мой взгляд лишнее - пишет "Пользовательское предупреждение: присвоение защищенному символу: C:AI_MOLC <-#<SUBR @18b1e6cc C:AI_MOLC>" и опять слетают все кнопки панели и тд.

[Andru1968]

А у тебя AutoCAD 2010 какой? Русский? И какой AutoCAD 2004?

[byackafoot]

Да, русские.

[Alan]

Сообщение от byackafoot Спасибо! попробую пошаманить. Да уж. подход получился через китай... Грузит свою панель инструментов с переопределением вообще всех кнопок... ... но ведь после загрузки "своей" меню поидее дальше всеравно должно быть продолжение по вводу там данных всяких???

Достаточно просто решаемая задача. Я от своих слов не отказываюсь, в математике программы сложностей нет.
Но! Как совершенно справедливо заметил gomer

очередная корзина мусора

И чтобы её разгрести недостаточно просто поудалять строки в указанном мной меню.
РЕЦЕПТ
Её нужно РАЗГРЕБАТЬ!!!
Т.е. вникнуть в систему чужого программирования, понять алгоритм задачи и т.д. и т.п.

А редактировать только файлы *.mnu? в эти не лазить - *.mns, lsp ,sld... и еще кагбы таки понять что именно пренадлежит автокаду.

Конечно надо!

... в ankers.mnu поудалял все на мой взгляд лишнее - пишет "Пользовательское предупреждение: присвоение защищенному символу: C:AI_MOLC <-#<SUBR @18b1e6cc C:AI_MOLC>" и опять слетают все кнопки панели и тд.

Подпрограмма (defun c:ai_molc находится в ДРУГОМ файле - *.MNL
Вывод. Определитесь в необходимости данной программы. И найдите человека, который Вам это сделает
P.S. Здесь на форуме м.б. и найдётся энтузазист, который ковырнёт этот пласт... Но сильно сомневаюсь
Опыт совместной работы участников форума над программой ПРОКАТ даёт мне это право. ЯТД

[Andru1968]

Сообщение от byackafoot Да, русские.

Н.Н.Полещук рекомендует "Если вы не уверены, что ваша программа всегда будет работать на компьютере с русской версией , то используйте английские имена команд с подчеркиванием (например (command "_LINE" "0,0" "210,0")). С такими именами команды будут выполняться в любой версии системы. Кроме того, перед или после символа подчеркивания желательно ставить точку (command "_.LINE" "0,0" "210,0")..."

Сообщение от byackafoot но программа обрывается после ввода данных

так все таки обрывается в каком AutoCADе

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

Тут вопрос не столько в программе, сколько в том, "чего вокруг нее наверчено". ИМХО.

[Andru1968]

Может проблема в том что программа написана вообще для AutoCAD R14

[Лиспер]

И что из того? Грамотно написанный код будет работать в любых (ладно, оговорюсь: почти в любых) версиях AutoCAD.

[Alan]

Сообщение от Andru1968 Может проблема в том что программа написана вообще для AutoCAD R14

Программа писалась во времена AutoCAD R14.
Потом без коренной переработки адаптировалась под следующие версии...

[Andru1968]

Сообщение от byackafoot При попытке воткнуть их в ACAD2010 - все значки меню превращаются в гору вопросительных знаков, ну и собственно программа не идет. пробовал ставить и на 2002 и на 2004 - с меню все нормально, но программа обрывается после ввода данных (хотя вроде скачана полностью). В чем может быть дело?

Из вопроса не понятно не работает везде или только в ACAD2010. Если не работает везде, то может они вообще не работают и даже в R14.

[byackafoot]

Я пробовал и в R14 и 2002 и 2004 - в них со значками все впорядке, подпрограмма "Очистные работы" б.м. шла, а вот "подготовительные работы" после выбора типа крепи обрываются... в 2006 - 2010 версиях выбираю "очистные работы" - сразу после выбора обрубаются, "подготовительные" - после выбора типа крепи, и все это сопровождается сменой значков всех панелей на вопросительные знаки (в 2006-2008) или их полным исчезновением (2010)...
Программка должна таки быть работоспособной ибо досталась мне из 2х независимых источников, где ее благополучно применяли в действии. (вот только незнаю в каких версиях автокада)...
Мож коряво ее втыкал в ранние автокады? хотя условие

оба архива надо распаковать на c: и прописать их в путях доступа AutoCAD'a

выполнял.

...Похоже надо сначала хотябы в R14 ее воткнуть.

[Andru1968]

Просто я сам много лет работаю в AutoCAD R14 с GEO-пакетом, в начале его устанавливали на наших компах, сами разработчики пакета,
а потом один из разработчиков написал Manual, и пришлось разбираться с настройками GEO-пакета самому. Сейчас можно сказать "закрытыми глазами" устанавливаю его на любом компе. При этом я знаю как GEO-пакет работает и какие есть "подводные камни" в его настройке.

Сообщение от byackafoot Программка должна таки быть работоспособной ибо досталась мне из 2х независимых источников, где ее благополучно применяли в действии.

Может тогда стоит обратиться к ним за помощью по настройке, а то получается "испорченный телефон".

[byackafoot]

Может тогда стоит обратиться к ним за помощью по настройке, а то получается "испорченный телефон".

Да уж, пожалуй лучший вариант. Но еслиб их можно было найти - было бы совсем все просто... А можно этот самый Manual глянуть? мож там какие аналогии есть?
Попробовал еще в англицкую версию R14 воткнуть и кажись понял зачем столько заморочек с кнопками и т.д. - получилось типа русика, но основной пакет так и не прет 8(

[gomer]

Сообщение от Alan Здесь на форуме м.б. и найдётся энтузазист, который ковырнёт этот пласт...

Не, я пас... Ни за какие коврижки

[Andru1968]

Сообщение от byackafoot досталась мне из 2х независимых источников

Обратись к этим двум источникам

Сообщение от byackafoot Но еслиб их можно было найти - было бы совсем все просто...

Ты же не на дороге программы нашел

Сообщение от byackafoot А можно этот самый Manual глянуть?

Я имел ввиду Manual для Geo-пакета, а не для твоих программ

[byackafoot]

Сообщение от Andru1968 Обратись к этим двум источникам Ты же не на дороге программы нашел

Программки попали мне в руки года 3 назад и так скажем через третьих лиц... Конечно можно кого-то найти, но тут надо произвести работу, сопоставимую с копанием кучи "г" в самой этой программе.

В общем не думалось мне что будут такие сложности. Надеялся получить ответ типа

Достаточно просто решаемая задача. Необходимо откорректировать файлы меню - MNU...И будет Вам счастье!...

удалить там пару строчек и радостно юзать!

Я имел ввиду Manual для Geo-пакета, а не для твоих программ

Да понятно что не для моих - я про то, что мож этот мануал мне хотяб чем-нибудь поможет! есть же какие-то общие, может даже элементарные правила для загрузки всяких таких вот приложений? их (приложений) наверно не одна тысяча написана, и все поразному запускаются?

[gomer]

Сообщение от byackafoot сопоставимую с копанием кучи "г" в самой этой программе.

я это уже говорил... в принципе программа рабочая... byackafoot, вы таки не сказали, что именно у вас не работает!
Начать нужно с вытравливания иконок из ресурсов меню.. если они есть в 2004... делов на неделю. максимум месяц. Поднапрягите начальство, но умно, за деньги, а это максимум 100$, вам все сделают

[Alan]

Сообщение от byackafoot удалить там пару строчек и радостно юзать!

Есть такой анекдот...
Однажды на электростанции застучал генератор.
Вызвали специалиста. Приехал, поставил раскладушку, пожил пару дней... Достал мел и поставил метку: "Вот тут!"
Выставил счёт на сумму 10K.
Заказчик возмутился: "Вот это за метку мелом 10К? Распишите расходы!!!"
Специалист расписал: "1$ за то что поставил метку, 9999 - за то что знал, где её поставить"
Анекдот не про деньги, а про то, что когда "знаешь где поставить метку", достаточно "удалить там пару строчек и радостно юзать!"

[byackafoot]

Сообщение от gomer byackafoot, вы таки не сказали, что именно у вас не работает!

Итак задача сводится хотябы к запуску в ACAD R14! ибо даже в нем немогу ниче сделать. насчет меню и значков это уже второстепенно.

делаю следующее:

1. гружу скрипт PASPORT.SCR -

Command: _script
Command: _ZOOM
All/Center/Dynamic/Extents/Previous/Scale(X/XP)/Window/<Realtime>: _W
First corner: 0,0 Other corner: 841,594
Command: (load "c:/pasport/pasp-pod") PASP-POD
Command: pasp-pod
Unknown command "PASP-POD". Press F1 for help. - и облом.

2. PASPORT2.SCR -
Command: _script
Command: (load "c:/pasport/pasport2") C:PASPORT2
Command: pasport2
ERROR -> Menu Syntax Error Line: 902.
ERROR -> Menu Syntax Error Line: 1005.
ERROR -> Menu Syntax Error Line: 1007.
ERROR -> Menu Syntax Error Line: 1046.
ERROR -> Menu Syntax Error Line: 1062.
ERROR -> Menu Syntax Error Line: 1260.
ERROR -> Menu Syntax Error Line: 1288.
Menu loaded successfully. MENUGROUP: ACAD
nil
Command:
AutoCAD menu utilities error: null function
(DEFUN-Q AI_SYSVAR (VARS / SAVEVAR PAIR VARNAME VARVALUE VARLIST) (SETQ VARLIST
nil) (DEFUN SAVEVAR (VARNAME VARVALUE / PAIR) (COND ((NOT VARVALUE) (SETQ
VARLIST (CONS (CONS VARNAME (GETVAR VARNAME)) VARLIST))) ((/= (GETVAR VARNAME)
VARVALUE) (SETQ VARLIST (CONS (CONS VARNAME (GETVAR VARNAME)) VARLIST)) (SETVAR
VARNAME VARVALUE)) (T nil))) (COND ((NOT VARS) (FOREACH PAIR VARLIST (SETQ
VARNAME (CAR PAIR) VARVALUE (CDR PAIR)) (SETVAR VARNAME VARVALUE)) (SETQ
VARLIST nil)) ((NOT (EQ (QUOTE LIST) (TYPE VARS))) (PRINC "\nAI_SYSVAR: Bad
argument type.\n")) ((EQ (QUOTE STR) (TYPE (CAR VARS))) (SAVEVAR (CAR VARS)
(CDR VARS))) ((AND (EQ (QUOTE LIST) (TYPE (CAR VARS))) (EQ (QUOTE STR) (TYPE
(CAAR VARS)))) (FOREACH PAIR VARS (SETQ VARNAME (CAR PAIR) VARVALUE (CDR PAIR))
(IF (NOT (EQ (QUOTE STR) (TYPE VARNAME))) (PRINC "\nAI_SYSVAR: Bad argument
type.\n") (SAVEVAR VARNAME VARVALUE)))) (T (PRINC "\nAI_SYSVAR: Error in first
argument.\n"))) (SETQ AI_SYSVAR (CONS (CAR AI_SYSVAR) (CONS (LIST (QUOTE SETQ)
(QUOTE VARLIST) (LIST (QUOTE QUOTE) VARLIST)) (CDDR AI_SYSVAR)))) VARLIST)
(LOAD "C:\\ochistn\\acad-oc2.mnl")
*Cancel*
- и вылетает окно: "Unable to open source file for write, the toolbar change will not be saved c:\ochistn\acad-oc2.mns".

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

Вот у знающих то и хотел спросить!... хотябы где рыть... на сортир с дерьмом уже показали, собственно где он стоит догадывался, а поконкретней можно? например какую лопату выбрать?

[gomer]

Сообщение от byackafoot например какую лопату выбрать?

Начнем с того что программа вам досталась не полностью! Второе с чем нужно смириться, ее нужно пересобирать с нуля, начать лучше со своего меню, как уже говорили, в него постепенно добавлять пункты, которые нужны... большинство - простая вставка блоков... это не сложно и хорошо описано в книжке В. Света
Во вложении зародыш вашего меню... Вставка форматок (не всех) там уже есть

[byackafoot]

Вооот!!! спасибо большое!

[Andru1968]

???