V

1
Vývojové nástroje

• Prednáška c.6

2
Proc?

• Zefektivnení, automatizace funkcí.
• Zrychlení opakované kreslicí funkce .
• Zjednodušení složitých sérií operací.
• Vytvorení komplexnejšího príkazu.
• Vytvorení skutecné aplikace menší projekty.

3
Externí príkazy a zkratky príkazu

• acad.pgp
• Externí príkazy
• AutoCAD umožnuje volat jiné programy nebo príkazy
  OS,
• definují se urcením názvu a retezce, který je
  predán OS.
• ltNázevgt,ltPožadavek prík. prostredígt,ltBitový
  príznakgt,ltVýzvagt
• Bity v bitovém príznaku mají následující význam
• Bit 1 systém neceká na dokoncení aplikace
• Bit 2 aplikace je spuštena jako minimalizovaná
• Bit 4 aplikace je spuštena jako skrytá
• Bit 8 retezec argumentu je treba vložit do
  uvozovek
• (soucet -gt 3-minimalizuje a neceká, 5-skryje a
  neceká, )
• PRUZKUMNÍK, START EXPLORER, 1,,
• NOTEPAD, START NOTEPAD, 1,Editovaný soubor
  ,

4
Externí príkazy a zkratky príkazu

• Zkratky príkazu programu AutoCAD
• Není doporuceno modifikovat existující príkazy
• Pridání zmen provedte zmeny v novém oddíle
  Uživatelem definované zkratky príkazu na konci
  tohoto souboru.
• Shodný název predefinuje existující zkratku
• O, OBLOUK // kreslení oblouku
• OB, OBRÁZEK // správa pripojených bitmap
• OBD, OBDÉLNÍK // kreslení obdélníka
• OBL, OBLAST // definice oblasti
• OR, OREŽ // orezání objektu
• ORBIT, 3DORBIT // orbit
• ORT, OROTUJ // natocení objektu

5
AutoLISP

• Lisp (50-tá léta),
• interpretovaný jazyk
• základní datový typ seznam
• program tvorí funkce (posloupnost výrazu)
• AutoLisp (od AutoCAD v.2.1)
• .lsp, .fas, .vlx
• nejdríve jen interpret lispu
• R14 obsahuje integrované prostredí (IDE)
• Visual LISP

6
AutoLISP IDE
7
Možnosti IDE

• Formátování textu
• Syntaktická kontrola
• Ladení aplikací
• krokování,
• nastavení prerušení,
• monitorování obsahu promenných ,
• animace behu funkcí,

8
AutoLISP syntaxe

• základní jednotka programu funkce
• (defun název_fce (par_1 par_N / var_1 var_M)
• (výraz)
• )
• parametry funkce par_1 par_N
• lokální promenné var_1 var_M
• (defun csoucin (a b / c)
• (alert \nFunkce pro výpocet soucinu dvou
  císel.)
• (setq c ( a b))
• )

9
Typy promenných

• Globální promenné
• jsou prístupné všem funkcím nacteným v rámci
  dokumentu
• Lokální promenné
• uchovávají si svou hodnotu jen po dobu behu
  funkce, která je definovala,
• využívají pametový prostor efektivneji než
  promenné globální.

10
Visual Lisp - príklad

• (defun drawline (/ b1 b2)
• lokální promenné pt1 and pt2 (deklarace)
• zadání pocátecního a koncového bodu
• (setq b1 (getpoint "\nZadejte pocátecní bod
  úsecky "))
• (setq b2 (getpoint b1 "\nZadejte koncový bod
  úsecky "))
• kontrola existence bodu
• (if (and b1 b2)
• (command "_line" b1 b2 "")
• (princ "\nNeplatné nebo chybející body!")
• )
• potlacení návratové hodnoty
• (princ)
• )

11
Príklad import bodu

• (defun CIMPORTUJ (/ nme txt bod tb)
• zadej název souboru
• (setq nme (getstring "\nZadej nazev souboru s
  body "))
• (setq txt (open nme "r")) otevrení souboru
• (setq bod (read-line txt)) nactení prvního
  bodu
• (while (/ bod nil) podmínka detekuje konec
  souboru
• (if (/ bod "") vykreslení bodu
• (command "_point" bod)
• )
• (setq bod (read-line txt)) nactení dalšího
  bodu
• )
• (close txt) uzavrení souboru
• (command "pdmode" 3) nastavení stylu bodu
• (command "pdsize" 5)
• (command "regen") regenerace pohledu
• (command "zoom" E)
• )

12
Typy aplikací

• Aplikace muže bežet jako interpretovaný LISP kód.
  
• Programový kód muže být zkompilován do aplikace
  VLX se spustitelným souborem .vlx.
• Aplikace VLX beží z vlastního prostoru názvu,
  který muže spolupracovat s dokumentem nacítání
  aplikace.
• Aplikace muže být uložena v jediném dokumentu
  nebo muže být rozptýlena v rozkouskovaných
  souborech.
• AutoLISP umožnuje definovat projekt
• zpusob správy jednotlivých souboru tvorících
  aplikaci

13
Dialogové rozhraní

• jazyk DCL (Dialog Control Language).
• Vytvorení funkcního dialogového rozhraní se
  skládá ze dvou kroku
• Definování vzhledu a obsahu použitých dialogu.
• Napsání obslužného programového kódu urcujícího
  chování dialogu

14
Príklad Dialogové rozhraní

• gp_mainDialog dialog
• label Titulek dialogového okna"
• boxed_radio_column
• label "Typ hranicní krivky"
• radio_button
• label "Odlehcená"
• key "gp_lw"
• value "1"
• radio_button
• label "Puvodní"
• key "gp_hw"
• edit_box
• label "Polomer dlaždice"
• key "gp_trad"
• edit_width 6

row spacer width 1 button
label "OK" is_default true key
"accept" width 8 fixed_width true

15
Visual LISP Náhled DCL
16
AutoCAD ActiveX

• Soucasný trend aplikací v OS Windows
• Objektový model
• objekty, vlastnosti, metody
• prístup k obsahu výkresu
• Objekty reprezentují
• grafické objekty, styly, organizacní struktury
  (hladiny, skupiny, bloky), modelový prostor,
  rozložení
• Funkce ActiveX
• jsou rychlejší,
• naznacují operaci, kterou funkce provádí,
• jsou citelnejší, správou a odladením chyb.

17
(No Transcript)
18
AutoLISP a ActiveX

• zavedení podpory pro prístup k ActiveX
• (vl-load-com)
• spojení s objektem AutoCAD Application,
  Document, ModelSpace
• (setq cadObj (vlax-get-acad-object))
• (setq cadDoc (vla-get-ActiveDocument cadObj))
• (setq mSpc (vla-get-ModelSpace cadDoc))
• vytvorení objektu kružnice
• (setq myCircle
• (vla-addCircle mSpc (vlax-3d-point '(3.0 3.0
  0.0)) 2.0)
• )

19
VBA - Definice rozhraní aplikace
20
VBA príklad

• sub Example_AddLine()
• dim lineObj as acadLine
• dim startPoint(0 To 2) as double
• dim endPoint(0 To 2) as double
• startPoint(0) 1
• startPoint(1) 1
• startPoint(2) 0
• endPoint(0) 5
• endPoint(1) 5
• endPoint(2) 0
• set lineObj ThisDrawing.ModelSpace.AddLine(star
  tPoint, endPoint)
• zoomall
• end sub

deklarace lokálních promenných
nastavení souradnic krajních bodu
pridání prímky