[magvd]

В программе вот такой порядок:ставишь первую точку линии, затем вторую и между ними появляется линия, затем ставишь третью точку и между 2ой и 3ей точкой появляется линия, получается последовательное соединение линий, а мне хотелось бы что бы после ввода второй точки линия разрывалась и я бы ставил 3ю и 4ую точку и при этом они соединяются а между собой,а между 3ей и второй точкой не было бы соединения. Все время что бы прервать линию надо нажимать экскейп, что не очень удобно.

[xak24]

остается только смириться с этим)))

[hwd]

можно и зайца научить курить, но зачем этот изврат?

[Valery Brelovsky]

В Общем если чертить полилинией (_pline) то так он и есть, а вот если чертить ИМЕНО линией (_line) то это будет как Вам хочется. Обратите на это внимание какой именно функцией Вы чертите. В вопросе говорите о линии, а по свойствам полилиния.

[hwd]

Сообщение от Valery Brelovsky В Общем если чертить полилинией (_pline) то так он и есть, а вот если чертить ИМЕНО линией (_line) то это будет как Вам хочется. Обратите на это внимание какой именно функцией Вы чертите. В вопросе говорите о линии, а по свойствам полилиния.

Я так понял автора: он зачем-то хочет чередовать линейные сегменты.

а между 3ей и второй точкой не было бы соединения

Т.е. все чётные должны отсутствовать - некое подобие пунктирной линии.

[РастОК]

При вводе Линии и Полилинии происходит одно и тоже, только в первом случае в итоге линии каждая отдельно, а во втором это одна ломанная. А автор хочет, чтобы при постановке второй точки комманда Линия завершала своё действие. Наверняка за это отвечает какая то переменная.

[gomer]

Сообщение от magvd после ввода второй точки линия разрывалась и я бы ставил 3ю и 4ую точку и при этом они соединяются а между собой,а между 3ей и второй точкой не было бы соединения.

Код:

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

 ((lambda ( / pt10 pt1 *error* )
    (defun *error* (msg) (princ))
	(while (and (setq pt10 (getpoint "\nПервая точка: "))
				(setq pt11 (getpoint pt10 "\nВторая точка: ")))
	  (entmakex (list '(0 . "LINE") (cons 10 pt10) (cons 11 pt11)))
	  (princ)
	)
  )
  )

[Valery Brelovsky]

Сообщение от hwd Я так понял автора: он зачем-то хочет чередовать линейные сегменты.

А нажать два раза правую кноку мыши в место экскейп.

[gomer]

Сообщение от Valery Brelovsky А нажать два раза правую кноку мыши в место экскейп.

так это ж лишние 100 бакинских надо выложить (была тут ссылочка на одно приложеньице)

[magvd]

а не подскажите как это приложенице называлось. Просто неудобно что бы разорвать линию все время экскей жать

[gomer]

Сообщение от magvd а не подскажите как это приложенице называлось

не подскажу, модер ругаецца
а #7 не помогло?

[Хмурый]

Сообщение от РастОК При вводе Линии и Полилинии происходит одно и тоже, только в первом случае в итоге линии каждая отдельно, а во втором это одна ломанная. А автор хочет, чтобы при постановке второй точки комманда Линия завершала своё действие. Наверняка за это отвечает какая то переменная.

не "каждую пробку есть чем открыть" (Ю. Визбор)
Не на каждую ерунду существует системная переменная за ненадобностью.

[dolber]

сильно надо? Лишний раз долбануть Esc не сложно, у меня в работе на акаде правая рука на мыши (я правша), а левая лежит на левом краю клавы так, что большой палец на пробеле для ввода последней набранной команды, а мизинец ваккурат на Esc-е спит, так что у меня проблем нет с этим...но могу чиркануть exe-шничек, для разрешения Вашей "беды".
p.s. как минутка освободится.

...вот, Ловите, развлекайтесь, правда разок долбануть еск придется, но вконце - Punctir.zip под Акады 2010-11

[Nordek]

А чья морда на иконке програмки, не автора случайно?