Добро пожаловать!

Войдите или зарегистрируйтесь сейчас!

Войти

Помогу бесплатно разработать любую программу на autolisp.

Тема в разделе "Autodesk", создана пользователем Германup, 3 фев 2014.

  1. Палыч

    Форумчанин

    Регистрация:
    16 июл 2007
    Сообщения:
    2.332
    Симпатии:
    176
    Адрес:
    Беларусь
    1958, Тогда в вашу програмку вмонтируйте блок. Кстати та что с расширением lisp не пишет отметки
     
    #661
  2. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    660
    Симпатии:
    725
    Адрес:
    Ташкент, город пыльный
    Это приказ? ::blink.gif::

    У кого не пишет и кому? точка.jpg
     
    #662
    Sergey B. нравится это.
  3. Палыч

    Форумчанин

    Регистрация:
    16 июл 2007
    Сообщения:
    2.332
    Симпатии:
    176
    Адрес:
    Беларусь
    Шутить изволите?::biggrin24.gif:: Что вы. Конечно же только по вашему желанию.

    На одной машине не выводила отметку. Попробую на другой. А так большое вам спасибо еще раз.::drink1.gif::
     
    #663
  4. Aitbek.Bostonov

    Регистрация:
    8 окт 2018
    Сообщения:
    6
    Симпатии:
    0
    Здравствуйте я новичок, за ранее извините пожалуйста. Помогите пожалуйста, при работе лисп анкер чтобы при завышение от проекта показывал +6, как минусовой показал. Спасибо большое.
     

    Вложения:

    • Anker.lsp
      Размер файла:
      4,6 КБ
      Просмотров:
      2
    • +6.PNG
      +6.PNG
      Размер файла:
      53,9 КБ
      Просмотров:
      16
    #664
  5. ivsem

    Форумчанин

    Регистрация:
    26 мар 2009
    Сообщения:
    2.475
    Симпатии:
    1.051
    Адрес:
    Киев
    Приложи фрагментик чертежа dwg, где выводится шестерка. Это облегчит исследование-внесение изменений в программу, бо я, например, изыскатель и в строительстве практически не работал.
     
    #665
  6. Aitbek.Bostonov

    Регистрация:
    8 окт 2018
    Сообщения:
    6
    Симпатии:
    0
     

    Вложения:

    • 0001.dwg
      Размер файла:
      2,2 МБ
      Просмотров:
      3
    #666
  7. mihamster

    Форумчанин

    Регистрация:
    24 июл 2013
    Сообщения:
    806
    Симпатии:
    217
    ivsem, там дело не в чертеже..
    просто перевод вещественного числа в строку по умолчанию "опускает" "+".. его надо вручную добавлять через strcat.

    -------
    попробуй это, должно работать в целом, нет возможности протестить полностью
     

    Вложения:

    • Anker.lsp
      Размер файла:
      4,7 КБ
      Просмотров:
      6
    #667
  8. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    660
    Симпатии:
    725
    Адрес:
    Ташкент, город пыльный
    Ну, попробуйте:
    1. Создаются слои "ИИ_ОТМЕТКА_025" и "ИИ_СКРЫТЫЙ_025"
    2. Создается текстовый стиль "VNIPISIMPLEXCUR"
    3. Идут запросы на масштаб съемки и высоту сечения рельефа
    4. Далее, в цикле - запросы на точку вставки пикета и ввод отметки. Если хотите прервать процесс, просто нажмите Enter без ввода отметки.
    5. После завершения возвращается текущий слой перед началом работы
    Подпись отметки производится с округлением, согласно магической зеленой книжке (при сечении 0,5 м - до сантиметра, при остальных - до дециметра).
    Масштаб вставляемого блока "PICKET" зависит от масштаба съемки: 1:500 - 0.5, 1:1000 - 1.0, 1:2000 - 2.0, 1:5000 - 5.0.
    Образец моего блока "PICKET" прикладывается.
     

    Вложения:

    • PICKET.dwg
      Размер файла:
      24,6 КБ
      Просмотров:
      10
    • pk_lay.LSP
      Размер файла:
      2,1 КБ
      Просмотров:
      4
    #668
    Последнее редактирование: 24 окт 2018
    sergtor нравится это.
  9. Aitbek.Bostonov

    Регистрация:
    8 окт 2018
    Сообщения:
    6
    Симпатии:
    0
    Спасибо большое!!! ураааа!!!
    --- Сообщения объединены, 24 окт 2018, Оригинальное время сообщения: 24 окт 2018 ---
    Большое спасибо, все получилось!!!
     
    #669
  10. sergtor

    Форумчанин

    Регистрация:
    23 сен 2012
    Сообщения:
    1.716
    Симпатии:
    604
    Адрес:
    Ухта
    Ну, и в дополнение, программа автонумерации атрибутов блока "Nomer". Если разовая задача, просто перетаскиваем лисп в окно AutoCAD. Если нужно будет использовать в дальнейшем, то создаем кнопку с макросом: ^C^C(load"AutoLabelAttributesV11.lsp")
     

    Вложения:

    #670
  11. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    660
    Симпатии:
    725
    Адрес:
    Ташкент, город пыльный
    Изначально, я предусматривал автонумерацию для атрибута "NOMER", потом решил, что можно обойтись. Если надо, то не долго и дополнить.
     
    #671
  12. sergtor

    Форумчанин

    Регистрация:
    23 сен 2012
    Сообщения:
    1.716
    Симпатии:
    604
    Адрес:
    Ухта
    Я думаю будет удобнее, если все скомпоновать в "одном флаконе".
     
    #672
  13. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    660
    Симпатии:
    725
    Адрес:
    Ташкент, город пыльный
    На здоровье, дорогой! ::biggrin24.gif::
     

    Вложения:

    • pk_l_n.LSP
      Размер файла:
      2,3 КБ
      Просмотров:
      5
    #673
    sergtor и Qvinto нравится это.
  14. sergtor

    Форумчанин

    Регистрация:
    23 сен 2012
    Сообщения:
    1.716
    Симпатии:
    604
    Адрес:
    Ухта
    Спасибо большое! Работает. Но тут нужно обязательно указать один нюанс: системная переменная в чертеже ATTMODE (количество видимых атрибутов блока) должна быть в 2.
     
    #674
  15. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    660
    Симпатии:
    725
    Адрес:
    Ташкент, город пыльный
    01.jpg 02.jpg
    Если вы используете мой блок "PICKET", а не из 3DService, то атрибут "NOMER" будет виден и при ATTMODE =1, так как в моем блоке этот атрибут расположен на слое "ИИ_СКРЫТЫЙ_025". Так что, если не хотите лицезреть номер пикета, отключите это слой.
     
    #675
  16. sergtor

    Форумчанин

    Регистрация:
    23 сен 2012
    Сообщения:
    1.716
    Симпатии:
    604
    Адрес:
    Ухта
    Пытался адаптировать его в программу 3DService. Но тогда некоторые опции самой программы не работают. Так, что пока использую "родной".
     
    #676
  17. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    660
    Симпатии:
    725
    Адрес:
    Ташкент, город пыльный
    Если вы обратили внимание на мои скриншоты, то должны были увидеть дополнительную панель инструментов. В 3DService всё прекрасно, но и кое-чего не хватает, а что-то не доработано. Поэтому мы с товарищем, взяв за основу шаблон 3DService и его блоки, полностью переработали, что-то изменили, что-то дополнили. Вообщем, создали для себя свой продукт для обработки топогеодезических изысканий. На всё про всё ушло два года работы между делом. Много там ещё надо бы доделать, но как-то я уже привык к недостаткам и они мне вроде бы не мешают. ::laugh24.gif::

    панель.jpg
     
    #677
    Qvinto, X-Y-H и sergtor нравится это.
  18. Палыч

    Форумчанин

    Регистрация:
    16 июл 2007
    Сообщения:
    2.332
    Симпатии:
    176
    Адрес:
    Беларусь
    1958, Спасибо. Совершенству нет предела.
    --- Сообщения объединены, 24 окт 2018, Оригинальное время сообщения: 24 окт 2018 ---
    Обратил и я конечно . Но в силу своей скромности постеснялся спросить.- что это?И как бы.. это... нууу::rolleyes24.gif::
     
    #678
  19. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    660
    Симпатии:
    725
    Адрес:
    Ташкент, город пыльный
    Там для Узбекистана, для славной Беларуси подойдет ли? По крайней мере, импорт картинок с привязкой из SasPlanet точно нет. А также вставка номенклатур в СК-42 - обработка для территории РУз.
     
    #679
  20. Палыч

    Форумчанин

    Регистрация:
    16 июл 2007
    Сообщения:
    2.332
    Симпатии:
    176
    Адрес:
    Беларусь
    Ну попробывать поткорректировать всегда можно.
     
    #680

Поделиться этой страницей

  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление