[===AAA===]

Всем привет!

Писал я под AutoCAD на LISP'е всё, что нужно было, использовал
библиотеку DOSLIB и всё было замечательно.

Но пришлось переходить на nanoCAD - тут всё и началось... :-(

Видимо, дальше нужно будет использовать C#

Теперь вопрос - как начать (да, просто начать !) писать программы
в этой самой MS VS 2022 ?

Вот прямо по шагам.

0. Запустил /это я уже умею/.

А дальше?

Нужно выбрать в VS какой-то шаблон, куда-то установить поставляемый
c nanoCAD'ом SDK, добраться до окна, куда буду вводить текст программы,
скомпилировать его, как загружаемое в nanoCAD приложение...

Т.е. нужны эти 10 ... 15 начальных шагов, чтобы потом просто ввести в командную
строку nanoCAD'а новую команду "new_command" и там же получить в ответ
"Привет, мир!" :-)))

[===AAA===]

Имха проще сделать реализацию полностью на net Это будет работать значительно быстрее

Совсем новые вещи - почему бы и нет.

Когда и если научусь писать на C#
так же быстро и легко, как на Лиспе. :-)

Пока же стоит задача перетащить из
Автокада в наноКад уже сделанное.

Однако я так и не понял из обсуждения
выше - версия nanoCAD 23.1 уже позволяет
делать связки LISP + C# или нужен 24+ ?

Можно просто - "да" или "нет" ? :-)

[doctorraz]

Сообщение от ===AAA=== версия nanoCAD 23.1 уже позволяет делать связки LISP + C# или нужен 24+ ?

Команды с ключами - да
Функции возврат значения в липсе - нет
Но ты выше писал что тебя устроит возврат значения в файл, тоже - да

[===AAA===]

Хорошо. Тогда ещё одно уточнение.

Эту новую команду из LISP функции, как я понимаю,
нужно будет запускать через (command ...) ?

А последующие строчки функции, "дождутся", пока эта
dll-команда отработает, запишет информацию в файл и
закроет его или они начнут выполняться раньше, чем
файл-передатчик будет сформирован?

[doctorraz]

Думаю дождутся))
Если специально не запускать в асинхронном режиме
Все будет идти по очереди,
Т. Е. По окончании работы команды DLL, можно поднимать файл и вынимать из него инфу..
Но как тэ это очень уж костыльно((
На net можно делать много круче вещи чем лисп , единственное неудобство по сравнению с лисп и vbs, надо компилировать

[Нубий-IV]

Есть вариант на плюсах писать. Там точно можно создавать команды, которые работают из-под лиспа, в том числе возвращая значение. Но это если удастся их освоить за 21 день.

Код:

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

 
#include <arxHeaders.h>

// Код команды
const int CMD_SUM = 0;

// Команда "Сумма"
int Sum()
{
	double result = 0.0;

	// Получение списка аргументов, переданных из лиспа
	struct resbuf* rb = acedGetArgs();
	
	// Перебор списка
	while(rb) {
		// Добавление очередного слагаемого
		switch(rb->restype) {
		case RTSHORT:
			result += rb->resval.rint;
			break;
		case RTLONG:
			result += rb->resval.rlong;
			break;
		case RTREAL:
			result += rb->resval.rreal;
			break;
		default:
			acutPrintf(_ACRX_T("; ошибка: неправильный тип аргумента"));
			acedRetVoid();
			return RTERROR;
		}
		// Следующий аргумент в списке
		rb = rb->rbnext;
	}

	// Возвращение результата
	acedRetReal(result);
	return RTNORM;
}

// Класс приложения
class CSum: public AcRxArxApp {
public:
	// Регистрация Лисп-команды при загрузке чертежа
	AcRx::AppRetCode On_kLoadDwgMsg(void *pkt) override
	{
		acedDefun(_ACRX_T("Sum"), CMD_SUM);
		return AcRx::kRetOK;
	}
	
	// Удаление регистрации Лисп-команды при выгрузке чертежа
	AcRx::AppRetCode On_kUnloadDwgMsg(void *pkt) override
	{
		acedUndef(_ACRX_T("Sum"), CMD_SUM);
		return AcRx::kRetOK;

	}
	
	// Обработка запроса на вызов команды из Лиспа
	AcRx::AppRetCode On_kInvkSubrMsg(void *pkt) override
	{
		if(acedGetFunCode() == CMD_SUM)
			Sum();
		return AcRx::kRetOK;
	}

	// ХЗ зачем, но надо
	void RegisterServerComponents() override {}
};

// Экспорт точки входа в DLL
IMPLEMENT_ARX_ENTRYPOINT(CTest)

Вообще, судя по наличию атрибута LispCommand, и на C# должно быть можно. Надо поискать такие же имена функций, и примеры под акад.

[===AAA===]

Кстати, да - DOSLIB же на плюсах написана. И даже было
сообщение, что автор исходник в публичный доступ отдал.
Где-то в сети лежит...

И функция, выдающая список работающих в данный момент
приложений Windows в ней есть.

[Нубий-IV]

Сообщение от ===AAA=== DOSLIB

Проблема только в том, что она под нанокад не собрана?
Сама-то она вроде на гитхабе лежит: https://github.com/dalefugier/DOSLib
А так там и добавлять нечего, только запустить надо?

[===AAA===]

Проблема только в том, что она под нанокад не собрана?

Именно так. Если бы кто-то, понимающий в этом деле, смог пересобрать её
под нанокад 23.1 - отпала бы куча проблем!

[Сергей812]

Сообщение от ===AAA=== Именно так. Если бы кто-то, понимающий в этом деле, смог пересобрать её под нанокад 23.1 - отпала бы куча проблем!

ну так в чем проблемы: объявляете краудфандинг на адаптацию DOSLib, нанимаете профессионального программиста...

[===AAA===]

Ну, лично мне из неё и нужно-то менее десятка функций.
Какой там краудфандинг ...

[Сергей812]

Сообщение от ===AAA=== Ну, лично мне из неё и нужно-то менее десятка функций.

которые с вероятностью 99% реализованы в .Net. Не хотите учить .Net - перетаскивайте из акада в нано урезанный вариант готового кода с исключением вызовов функций DosLib. Ну или ждать перехода на 24 нано, чтобы хотя бы весь код не переписывать, а только вставки на .Net сделать. Хотя для этого все равно придется основы .Net изучить.

[Нубий-IV]

Посмотрел. Технически оно собирается под нанокад с небольшими правками.

Местами пришлось откатить код под старые стандарты плюсов и поправить макросы. Некоторые части пришлось закомментировать, потому что в пятом нанокаде не были реализованы полностью функции автокада. В результате потеряны dos_lisplist, dos_cleardbmod, dos_summaryinfo, dos_custominfo, dos_olelist, dos_proxycount, dos_proxyclean. Возможно, в более поздних версиях нанокада оно заведется. Остальное на первый взгляд работает, но без гарантий, все надо тестить.

У меня есть только старая бесплатная пятерка, современных 23-24 нет ни самих, ни их SDK. Даже если соберу - проверить не смогу. SDK под плюсы (папки include и lib) под 23 ставятся с программой, или их надо качать отдельно? На сайте нет ссылок, только регистрация со сдачей анализов и обещанием рассмотреть их в течение года. Если есть возможность закинуть архив с SDK куда-нибудь, саму сборку можно сделать быстро.

[===AAA===]

Добрый день!

Если есть возможность закинуть архив с SDK куда-нибудь, саму сборку можно сделать быстро.

Ответил в личку.

[Нубий-IV]

Чота собралося. Пришлось закомментировать:

* GetOSDisplayString, IsVistaOrHigher (в vs2022 почему-то недоступны функуции GetVersionEx. Кто знает, что случилось - старые версии SDK надо ставить, или еще что?)
* ads_dos_cleardbmod (использует недокументированную функцию акада, которой, видимо, в нанокаде нет)

Остальное без изменений, теперь надо тестить. В комплекте слегка поправленные исходники и проект под vs2022.

[===AAA===]

Замечательный комплект!
Нубий-IV - огромное спасибо!

Из того, что проверил, запустилось всё, кроме
(dos_progbar p1 p2), где p1 и p2 - аргументы.
Без аргументов работает штатно.

Если "коллективный разум" сумеет допилить
эту библиотеку, будет вообще круто!