adfun.ru
 
BIGLIB
  большущая библиотека (9812 книг), можно не только прочитать но и скачать бесплатно
 
АСТРОЛОГИЯ
  книги по астрологии
 
КРИМИНАЛ
  книги про криминал
 
ДЕТЕКТИВЫ
  детективы известных
   писателей
 
ФАНТАСТИКА
  фентези, фантастика,   фантастические повести
 
ПРИКЛЮЧЕНИЯ
  книги про приключения,   путешествия
 
ПОЛИТИКА
  книги про политиков,   репрессии
 
ПСИХОЛОГИЯ
  разнообразная литература   по психологии
 
КЛАССИКА
  классическая литература
 
КОМПЬЮТЕРНАЯ
  ЛИТЕРАТУРА
  про компютерное железо,   документация, языки   программирования
 
РЕЛИГИЯ, АТЕИЗМ
  книги про религию
 
ФИЛОСОФИЯ
  книги, которые заставляют   задуматься над   окружающим тебя миром.
 
ЭНЦИКЛОПЕДИИ
  самые интересные   энциклопедии на
   разные темы
 
МЕДИЦИНА
  медицинские книги,   методички,
   народные лечебники
 
КУЛИНАРИЯ
  рецепты тортов,   консервирование,
  все о спиртных
  напитках.
 
СТИХИ
  стихи популярных и не   очень авторов
 
ТВОРЧЕСТВО
  народное творчество,   стихи, песни и т.д.
 
ЮМОР
  анекдоты, приколы,   смешные истории
 
ЛЮБОВНЫЙ РОМАН
  мир высоких чувств и   любовных грез
 
ЭРОТИКА
  эротические рассказы,   книги о технике секса,   кама-сутра и др.




adfun.ru
Rambler's Top100 Rambler's Top100
    НА ГЛАВНУЮ
    РЕФЕРАТЫ
    ТОСТЫ
    ТЕСТЫ
    АВТО
    ДЛЯ СТУДЕНТА
    КНИГИ
    КОНТАКТ
 
Руководство пользователя по АвтоЛиспу
Автор ""
Размер 218625 Байт
Страница 24 из 30
СКАЧАТЬ КНИГУ ЦЕЛИКОМ

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


       5. 7. 1.  (grclear)

       Эта функция очищает графический экран AutoCADа. (В системах с
одним экраном она переключит графический экран с текстового режима
на первый). Подсказка , статус и меню остаются неизменными. Оригинал
может быть перевыведен на графический экран функцией REDRAW.


       5. 7. 2.  (grdraw     [])

       Функция GRDRAW вычерчивает вектор между двумя точками . 
и  являются точками (списки из двух действительных чисел), кото-
рые определяют конечные точки  вектора. Конечные точки определяются ,
как плавающие точки для вычерчивания координат и будет clipped, как




                           - 76 -

            Руководство пользователя по АВТОЛИСПу


требование , чтобы вывести на экран.  Вектор будет нарисован с цветным
выводом , если аргумент  целое число, определяемое в группе -1 в
"XOR ink",которая заканчивает любое его вычерчивание и уничтожается,
когда перечерчено. Если аргумент  целое число и не "0",
будет нарисован вектор так, как механизм дисплея высветит выбранные
объекты ( обычно по-точечно ). Если  пропущен или имеет зна-
чение 0, будет использован нормальный режим вывода на экран.


       5. 7. 3.    ( grtext [  []])

       Функция GRTEXT позволяет AutoLISPу выводить текст частямии
на графический экран в AutoCADе. Если вызывается с аргументом
 от 0 и до самого высокого численного значения бокса в меню экрана
минус 1, функция выведет на экран дисплея строковый  аргумент ,
в указанный в меню бокс .  Текст будет  cокращен, если он
слишком длинный , и непригоден для бокса, и пустота заполнится пробела-
ми, если текст короче. Если присутствует факультативный аргумент
(целое число)  и он не 0 , в предназначенном боксе
будет высвечиваться текст. Если  присутствует и  0, текст в
предназначенном боксе не будет высвечиваться ( запомните, что при высве-
чивании другого текста, бокс автоматически отменяет предыдущий текст, ко-
торый был высвечен). Когда вы пишете в боксе , текст сначала должен быть
написан без аргумента , затем высвечен. Такая же текстовая
строка , какая в оригинале вводится в бокс,  должна высвечиваться и не
высвечиваться. Результатом несоблюдения этих правил будут  LISP програм-
мы , которые ведут себя по-разному на разных дисплеях. Запомните , что
эта функция просто выводит на экран дисплея текст, находящийся в площади
экрана ; она не изменяет элементы экранного меню.
       Если функция GRTEXT вызывается боксом  номер -1, текст будет
выведен на экран в режиме статуса линии . Длина линии зависит от дисплея
( большинство их допускает , по крайней мере , 40 разновидностей, за
исключением замечательного Color Graphics Adaptor фирмы IBM ). Текст
будет сокращен , чтобы пригнать его к имеющемуся в распоряжении про-
странству .
       Если используется бокс с номером -2, текст будет написан в коор-
динатах статуса линии. Запомните, что если слежение координат вклю-
чено, величины, записанные в это поле , перепишутся ,как только
указатель пошлет другой набор координат. Каждый из номеров , -1 или -2 ,
игнорирует аргумент  , если он присутствует .
       Наконец, функция DRTEXT может быть вызвана без аргументов, что-
бы восстановить всю площадь текста на экране, с его стандартными
переменными.


       5. 7. 4.  (grread  [])

       Функция GRREAD позволяет вам непосредственно следить за механиз-
мом входа AutoCADа, выслеживая указанные механизмы , когда они изменяются.
Этой функции нужны только специфические команды , большинство входов в
AutoLISP пройдут через различные функции GETxxx , такие как GETSTRING ,
GETREAL и подобные. Аргумент  , если он имеется и не "nil" ,
дает возможность вернуть координаты из указанных механизмов , когда они
двигаются, не требуя выбора нажатием клавиш. Этот механизм AutoCAD обыч-
но использует для протягивания.
       Функция GRREAD возвращает список , в котором первый элемент это




                           - 77 -

            Руководство пользователя по АВТОЛИСПу


код , определяющий тип входа. Второй элемент списка - любое целое число
или список точек , зависящих от типа входа . Коды для первого элемента
в списке следующие:

       2   характеризует клавиатуру - в кодах ASCII, также и для вторго





элемента 3 выбираемая точка - координаты , как список 4 выбираемый элемент меню экрана- номер бокса , также и для второго элемента 5 режим протягивания координат , также и для второго элемента. Возвращается только , если второй аргумент определен и он не "nil" 6 BUTTONS выбираемый пункт меню - номер клавиши это второй элемент 7 TABLET1 оцифровываемый пункт меню - номер бокса это второй элемент 8 TABLET2 оцифровываемый пункт меню - номер бокса это второй элемент 9 TABLET3 оцифровываемый пункт меню - номер бокса это второй элемент 10 TABLET4 оцифровываемый пункт меню - номер бокса это второй элемент 11 AUXI оцифровываемый пункт меню - номер бокса это второй элемент 12 координаты, связанные с указателем клавиш , возвращаемые, как второй элемент. Всегда следует тип 6 , чтобы возвратить список 13 выбор высвеченного пункта меню экрана при помощи ввода с клавиатуры Ввод CTRL C в то время как идет GRREAD , вызовет прерывание (abort) LISP программы с клавиатуры. Любой другой вход пройдет прямо к GRREAD ,давая этим возможность закончить контроль над механизмом входа. 5. 8. Образцы программ Следующие LISP программы иллюстрируют возможности , описанные в этой главе. 5. 8. 1. Удаление уровня Эта программа выполняет команду DELLAYER , чтобы удалить все примитивы определенного уровня. ; Удаление всех примитивов на определенном уровне (defun C : DELLAYER (/ e l) (setq l (strcase (getstring "\nLayer to delete?"))) ; Запуск черчения сканированием первого примитива (setq e (entnext)) ; Проверка уровней этих примитивов (8 групп) (while e - 78 - Руководство пользователя по АВТОЛИСПу (if (= l (cdr (assoc 8 (entget e)))) ; Корректирование уровня... удаление этого уровня (entdel e) ) ; Взять следующий примитив (setq e (entnext e)) ; Останов до тех пор пока не будет больше примитивов ) ) Функция DELLAYER проверяет 8 групп ( имя уровня ) каждого прими- тива чертежа, просматривая примитивы на специфицируемом уровне. Тестиро- ванием других групп вы можете выполнить команды, чтобы проверить все примитивы особых типов ( окружности, может быть) или все примитивы осо- бых вычислений и прочее. : : : 5. 8. 2. Установление текущего уровня : : Эта программа выполняет команду SETLAYER , давая возможность : изменить текущий уровень просто указывая на существующий объект : этим уровнем. : : ; Установить текущий уровнь этого существующего объекта : : (defun C:SETLAYER ( / e n) : (setq e (car (entsel "Pick an object on the desired layer: "))) (if e ( progn : : ; Взять входные данные групп : (setq e (entget e) : ) : ; Группа 8 - это имя уровня : (setq n (cdr (assoc 8 e))) : : ; Результат выполнения команды "LAYER SET" : (command "LAYER" "SET" n "") : : )) : ) : : Вы можете использовать подобный подход , чтобы установить теку- :


Страницы : 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 [24] 25 26 27 28 29 30


adfun.ru









Форум раскрутка сайта и интернет-реклама
реклама - рекламное агентство -
Интернет PR агентство чат и форум
волчат знакомства - сайт знакомств
бесплатные компьютерные игры
фото знакомства
новые стеклопакеты -
качественное остекление балконов
портал - пластиковые окна -
закажите окна пвх в Москве

частная стоматология в Москве:
надежная стоматологическая клиника
протезирование зубов и
отбеливание зубов в стоматологии
Музыка - скачать mp3 музыка
каталог партнерские программы
ручной бесплатный обмен ссылками цифровые камеры цифровые фотоаппараты -
цифровые видеокамеры

театры - заказ билетов в театр -
магазин - продажа компьютеров
в Москве форум Испания - жилье -
недвижимость в испании

турфирма - испания туры
Переводы - бюро переводов
Законы - закон о товарных знаках,
Грузовые перевозки. АсМАП. Дальнобой закон о рекламе
Интернет казино
реклама на форуме и контекстная реклама
на Яндексе Баннерная сеть и
интернет каталог сайтов Holiday.Ru
Форумы политика, лучшие анекдоты
знакомства.