[Red Nova]

Со школы не ладится у меня с программированием. Все предметы щелкал, а на экзамене по информатике (Visual foxpro) программку типа суммирования столбцов списал у соседа (это уже в университете).
Не смотря на эте намерен научится писать программы для Автокада на лиспе, скачал книгу Хювенена, несколько примеров создания программ, но после получасового “смотрения” таких книг мое мышление явно притормаживает.
Решил пойти другим путем.
Нашел самый короткий лисп из моей коллекции, и прошу программистов с этого форума пошагово объяснить какой символ что означает. Надеюсь на вашу помощь.

Код:

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

(defun c:make-blocks-explodeable (/ adoc)
  (vl-load-com)
  (vla-startundomark
    (setq adoc (vla-get-activedocument (vlax-get-acad-object)))
    ) ;_ end of vla-startundomark
  (vlax-for blk_def (vla-get-blocks adoc)
    (if (and (equal (vla-get-isxref blk_def) :vlax-false)
             (equal (vla-get-islayout blk_def) :vlax-false)
             ) ;_ end of and
      (vl-catch-all-apply '(lambda () (vla-put-explodable blk_def :vlax-true)))
      ) ;_ end of if
    ) ;_ end of vlax-for
  (vla-endundomark adoc)
  (princ)
  ) ;_ end of defun

_____________________________________________________________________________________________________________

Прошло много лет и топик теперь представляет из себя площадку для обучения азов программирования для многих начинающих.
Так что начинающие лиспогрызы приветствуются .

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

Я хоть убей не понимаю необходимости использования vla-eval вместо обычного eval.

[Сергей812]

Добрый день. В программах на lisp регулярно встречается конструкция "loc:" - но не могу найти никак, для чего она. Подскажите, пожалуйста, где можно про нее почитать?

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

Скорее всего, это имя (или часть имени) переменной.

[Сергей812]

Т.е, например, в определение функции

Код:

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

 (defun loc:catch (func / ret)
...
)

loc: - это лишь часть имени? Просто часто встречаю достаточно в примерах кода, подумал, что это какой-то модификатор доступа. Поискал по книжкам Полещука и Зуева, в электронном виде по форумам - ничего определенного не нашел.

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

Имя переменной / функции в лиспе не может содержать, насколько я помню, символы ";", "(", ")" и " ". Остальные, кажется, вполне допустимы. Ну и зарезервированные имена лучше не переопределять )))

[Сергей812]

kpblc, Спасибо) значит, видимо просто пометка - что локальная функция, переменная.

[skkkk]

Сергей812, тоже задавался в свое время этим вопросом. Пришел к однозначному выводу: двоеточие в имени функции или переменной есть не что иное, как система обозначений, принятая неким автором или сообществом авторов кодов для обеспечения (в том числе и себя же в последующем) понимания логики кода. Многие вместо двоеточия используют тире. Еще один пример: знаменитый Lee Mac предваряет свои функции префиксом LM:. Больше ничего это не значит. Исключение, по-видимому, составляет C:, вроде что-то еще было, но не припомню.
Вот, кстати, вспомнил про двоеточия в методах функции ssget. Насколько я разобрался, комбинировать можно ТОЛЬКО методы с двоеточием. И так и не смог разобраться, что означают и каким образом применять затронутые описанием у Полещука, как недокументированнные, методы, наследуемые от соответствующих функций ObjectARX ("M", ".", "#", ":O", ":$" и т.д.). Кто знает, о чем речь?

[ShaggyDoc]

Пришел к однозначному выводу: двоеточие в имени функции или переменной есть не что иное, как система обозначений, принятая неким автором или сообществом авторов кодов для обеспечения (в том числе и себя же в последующем) понимания логики кода. Многие вместо двоеточия используют тире.

Именно так. Вводят свои префиксы для удобства понимания кода. Кто-то любит двоеточие. У меня у всех функций префикс "ru-", у низкоуровневых "_ru-". А в именах переменных разлелитель слогов всегда "_", что легко позволяет отличить переменную от функции. Глобальные переменные заключаю в ** и пишу в верхнем регистре.

И классический пример в AutoLisp Tutorial где все функции с префиксом GP: и пояснение

These names are prefixed with gp: to indicate they are specific to the garden path application. This is not a requirement, but it is a good naming convention to use to distinguish application-specific functions from general utility functions you frequently use.

[tehkonst]

Сообщение от ShaggyDoc что легко позволяет отличить переменную от функции

Я все функции, с глагола начинаю. Если что-то получить - get: getPoint, getArea. Если что-то нарисовать - draw: drawTangent, drawWall и т.д.

[skkkk]

Offtop: tehkonst, при таком подходе при выполнении функции

Сообщение от tehkonst getPoint

можно удивиться

[tehkonst]

Offtop: Не вижу ничего странного. В любом ооп так принято методы называть.

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

tehkonst, намек: ты про зарезервированные слова наверняка слышал...

[ShaggyDoc]

Я все функции, с глагола начинаю

Хоть как можно начинать, лишь бы была система. У меня около 3000 функций разного назначения (компилируемых в один файл библиотеки), да еще несколько сотен "функций-программ". Без системы в именовании (а также без раскладки по папкам) в них не разобраться. Помимо системы имен, еще каждая функция в отдельном файле, да в своем каталоге.
И конечно нельзя "штатные" имена применять.

В любом ооп так принято методы называть

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

Код:

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

 ru-get-point-reguired
ru-get-point-or-lw-or-exit
ru-get-point-or-lw-or-continue-or-exit
ru-get-point-or-exit-or-kword-base
ru-get-point-or-exit-base
ru-get-point-with-offset
ru-get-point-reguired-with-offset
ru-get-point-or-exit-with-offset
ru-get-point-or-exit-or-kword-base-with-offset
ru-get-point-or-exit-base-with-offset
ru-get-point-in-angle-with-offset
ru-get-point-or-exit
ru-get-point-on-ent
ru-get-point-and-ang-on-ent
ru-get-corner-reguired.lsp

Условно это всё разные "методы" ввода точки. Но это не ООП. А вот система имен позволяет очень облегчить собственную работу.

[gomer]

раз уж снова пошел такой срач

LESSON 5 VARIABLES: Variables are used as the principle means to store values. Files may also be used to store values, but variables are what store values for short term use. AutoLisp variables may be any of (4) four "types"; integer, real, point, and string. Variables in AutoLISP are automatically "typed" depending on the value they contain, so no "typeing" of variables is required. The function "setq" will be used to create a variable. A variable will contain a nil value until some value is bound to it. If you reference a variable before you have assigned a value to it, you will receive nil as the result of the reference. (setq a 3) ;Integer variable (setq a 3.00) ;Real variable (setq a (list 1.50 2.375 1.00) ;Point variable (setq a "This is a string.") ;String variable VARIABLE NAMING: When we discussed comments in lesson 3, we neglected to touch on the easiest method of commenting of all; variable names. If you use proper variable names, much of your code can be self-documenting. You need only add comments to code which is not clear simply by reading it. Variables can be named anything you want providing the first character is alphabetic, and you don't use the reserved characters from lesson 2. Many AutoLISP programmers try to keep variable names to (6) six characters or less. This is due to the way variables are stored in AutoLISP. If a variables name is less than 6 characters AutoLISP only requires (2) two nodes to store the value. If you make the variable name longer than (6) six characters, AutoLISP stores the value in one node and stores a pointer to the name in the other node. The name itself is stored in memory taken from the heap for string storage. Heap space is limited and that is why some programmers try to keep variable names short. Two things have happened that makes this rule not so carved in stone as it used to be. The advent of virtual memory and learning how to program cleanly have done much to solve the problem of running out of memory. I can't do much about the amount of memory in your computer or the amount of memory AutoCAD needs, but I can show you how not to run out of memory by programming in a clean manner. Anyway, back to naming variables. Naming a variable is not like naming the family pet, you can't choose a name cause it's cute or it's what the variable looks like. You need to choose names based on what it is the variable holds. You must look at the variable and its name as being the same thing. If you can't tell what the variable is, maybe you don't need the variable anyway. If a variable holds the point for a line, state that in the variable name. First tell which line, and then tell which point. Variables can be named well or they can be named badly, it's all up to you. Good: CenterLineStart CtrLnStrt CtrLnEnd Bad: C1 ;Start of centerline C2 ;End of centerline The bad variable names have been made sightly more palletable by the use of comments to say what they are, but the good variable names are much more descriptive and require no comments. Anyone who has programmed for awhile knows comments rarely come easy and sometimes not at all. It is better to give your variables names which do not need explained, so a missing comment later will not lead to confusion about what the variable is holding. Also note that end-line comments no matter how well done, clutter up code and make it harder to read. If you can avoid using end-line comments, you will be much better off. Sometimes you have many variables that seem to hold the same type values. They may seem the same but there is always something different about them that the name can tell you. Good: TapDrillCenterLineStart TapDrCtrLnStrt TapDrCtrLnEnd TapCenterLineStart TapCtrLnStrt TapCtrLnEnd Bad: TDCS TDCE TDS TDE I have seen programmers go as far as giving many pages of comments to explain what each of thier variables was supposed to hold. Having a decoder ring is no substitute for proper variable naming. If you give full variable names you will have alot less commenting and alot easier time when hunting problems. Index variables ... Indexes through a loop are one of the areas where it is sometimes difficult to come up with a name. Many programmers have a name they give to all indexes, such as Index, Idx, Ndx, or some such thing that they are comfortable looking at. They know when they read their code what these things are, but others may not. If you are going to use short names for indexes be sure to tell what it is that you are indexing through. Good: PointNdx ListNdx FileNdx Bad: x Idx Ndx An index variable is like any other variable and needs a proper name to be truly understood. Status variables ... Status variables should be given names better than "flag". Everyone seems to use flag for status variables. The first thing we have to do to give truly meaningful names to variables, is get away from thinking about our problems from the viewpoint of the computer. A flag tells if something is right or wrong, it should be given a name that reflects the item we are checking. Good: FileDone PrintDone SortDone Status variables are not used extensively in AutoLISP programming, but if you use them, give them real names. Naming guidelines ... Variables should be named in a manner that also identifies their scope and / or type. GLOBAL variables should be identifiable as such by reading their name. Some people use prefix or suffix notations to accomplish this. An example would be to add a g or g_to the beginning of the variable name: gScrewList This identifies the variable as a list that is available to all the functions in your program. I am not a fan of putting the "_" character in variable names as a separator. I prefer the naming convention where you capitalize the first letter of each word or abbreviation in the variable name. CONSTANTS are normally capitalized as a way of identifying them. They stand out from the rest of your code so you know they are a constant. INPUT variables, which are parameters to a function, should not be modified inside the function. It is recommended that you identify input variables so if you see one getting modified you can do something else. It will be a lot easier to read your code and tell which variables are parameters if you identify them in the name. An "i" or "ip" may be prefixed to the name to identify them.

[Curiosity]

Доброго времени суток!
Можно ли сформировать один набор, выбором нескольких рамок (ssget "_W" (pt1 pt2) (pt3 pt4)...)?

[skkkk]

Сообщение от Curiosity Можно ли сформировать один набор, выбором нескольких рамок (ssget "_W" (pt1 pt2) (pt3 pt4)...)?

Нельзя. Можно создать несколько наборов, а потом объединить их. LISP : Как объединить два набора в один?

[Curiosity]

Сообщение от skkkk Нельзя. Можно создать несколько наборов, а потом объединить их. LISP : Как объединить два набора в один?

Спасибо за ссылку
А как можно сделать так чтобы
(command "_rectang" pause pause)
повторялось до тех пор пока пользователь не нажмет enter или space?

[skkkk]

Вариант 1 (лисп):

Код:

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

(defun C:MULTIRECTANG ()
	(while t
		(command "_RECTANG" pause pause)
	)
)

Ввариант 2 (макрос со звездочкой на кнопку):

Код:

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

*^C^C_RECTANG

[Curiosity]

Это не совсем то что мне нужно
Мне надо прервать _rectang без прекращения работы лиспа, чтобы лисп дальше выполнялся
(defun c:.... ()
........
(while (not ("Проверка нажатия enter или space"))
(command "_rectang" pause pause)
)
........
)

[kurstep]

Подскажите пожалуйста как открыть файл экселя через автолисп