Milli aviasiya akademiyasi


AutoLİSpdə əsas funksİyaların sİyahısı



Yüklə 13,77 Mb.
səhifə247/248
tarix01.01.2022
ölçüsü13,77 Mb.
#104836
1   ...   240   241   242   243   244   245   246   247   248
AutoLİSpdə əsas funksİyaların sİyahısı

Aşağıdakı cədvəldə AutoLİSP də ən çox istifadə edilən funksiyaların vəzifələri verilmişdir. Cədvəldəki şərtiliklərin mənaları belədir:

N - say;

S - mətn sətri;

A - istənilən atom;

L - istənilən siyahı;

AL - atom və ya siyahı;


P - iki rəqəmdən ibarət siyahı (nöqtələri koordinatları);

[…] - qeyriməcburi parametr;


* - funksiyanın istənilən sayda arqumenti ola bilər.

V - dəyişənin adı;

E - Autolisp-də ifadə;

B - məntiqi qiymət (T və ya NIL).




Funksiya

Parametrlər

Qaytarılan ədədlər

Yazılışı

Misal1

RIAZI, MƏNTIQI VƏ HƏNDƏSI FUNKSIYALAR

+

N1 N2 [… NM*]

N1+N2+…+NM

Cəm

( + 5 8 )

-

N1 N2 [… NM*]

N1-N2-…-NM

Fərq

( - a 5 )

*

N1 N2 [… NM*]

N1*N2*…*NM

Hasil

( * 2 4 r )

/

N1 N2 [… NM*]

N1/N2/…/NM

Bölmə

(/(+ 2 2)d)

=

N1 N2 və ya S1 S2

B

Bərabərliyin iki ədədi və ya sətrinin müqayisəsi

( = x 0.5 )

/=

N1 N2 və ya S1 S2

B

Bərabərsizliyin iki ədədi və ya sətrinin müqayisəsi

( /= a "ABC" )

>

N1 N2 və ya S1 S2

B

Yoxlama "N1 böyükdür N2" və ya "S1 böyükdür S2"?

( > c ( + 3 d ) )

<

N1 N2 və ya S1 S2

B

Yoxlama "N1 kiçikdir N2" və ya "S1 kiçikdir S2"?

( < e 1 )

>=

N1 N2 və ya S1 S2

B

Yoxlama "N1 böyükdür və yabərabərdirN2" və ya "S1 böyükdür və yabərabərdirS2"?

(>= f 4.0 )

<=

N1 N2 və ya S1 S2

B

Yoxlama "N1 kiçikdirvə yabərabərdirN2" və ya "S1 kiçikdirvə yabərabərdirS2"?

( <= 5 a1 )

AND

B1 B2

B

Qytarır T, və əgər B1=T, B2=T, əks halda NIL.

( AND ( = 5 a ) flag )

OR

B1 B2

B

Qytarır NIL, əgər B1=NIL və B2=NIL, əks halda T.

( OR ( = ans "Н" )( = ans "н") )

NOT

B1

B

Məntiqi ifadəni əksinə dəyişir (NIL -i T-yə , T-ni NIL-yə).

( NOT flag )

ANGLE

P1 P2

N

OX oxunun müsbət tərfini və P1P2 vektorunun radianla oxun müsbət tərəfi ilə əmələ gətirdiyi bucağı hesablayır.

(ANGLE a ( LIST 0 0 ) )

COS

N1

N

N1 radianla verilmiş bucağın kosinusunu qaytarır

( COS ( / PI 2 ) )

DISTANCE

P1 P2

N

P1 vəP2 arasındakı məsafəni hesablayır

( DISTANCE ( LIST 10 y) a )

POLAR

P1 N1 N2

P

P1 nöqtəsindən N1 məsafəsində və N2 bucağı altında aralıda yerləşən nöqtənin koordinatlarını qaytarır.

( POLAR ( LIST x y ) 10

PI )


SETQ

V1 AL1 [… VN ALN ]

ALN

V1 dəyişəninə AL1 qiymətini, V2 - ə AL2 -ni və s.Sonuncu mənimsədilmiş qiyməti qaytarır

( SETQ a ( + b 4 ) )

SQRT

N1

N

N1-in kvadrat kökünü tapır.

(SQRT ( * a a ) ( * b b ))

ABS

N1

N

N1-in modulnu qaytarır.

( ABS -5)

FIX

N1

N

N1-in tam hissəsini qaytarır.

(FIX 5.25 )

SIN

N1

N

Radianlarla verilmiş N1 bucağının sinusns təyin edir

( SIN 0 )

SADƏLƏŞDIRICI KONSTRUKSIYALAR

DEFUN


S [AL1 … ALN] [/ V1 … VM]

AL

S adında istifadəçi funksiya yaradır,arqumentlər AL1 … ALN (olmayada bilər) vəlokal dəyişənlər V1 … VM(olmayada bilər, onda bu işarə "/"qoyulmur)

( DEFUN myfunc ( a / n )

( SETQ a ( + a 10 ) )

)


IF

E1 E2 [E3]

NIL

E1 ifadəsi hesablanır. Əgər o düzdürsə (NIL deyilsə), onda E2 ifadəsi hesablanır,əks halda - E3

( IF ( = a b )

( PRINT "\nA=B" )

( PRINT "\nA<>B" )

)


PROGN

E1 .. EN

EN

IF funksiyasında istifadə üçün bir neçə ifadəni birləşdirir, əgər ayırmalarda "əgər" və ya "əks halda" varsa onda brdən çox istifadə edilir..

( IF ( = a 0 )

( PROGN


( SETQ a 1 )

( PROMPT "\nA=0" )

)

)


REPEAT

N E1 [... EN]

EN

E1 .. EN ifadəsi N dəfə təkrar hesablanır

( REPEAT 10 ( PRINT "\n" )

)


WHILE

E1 E2 [... EN]

EN

E1NILolmayana qədər E2 .. EN dövrü təkrar hesablanır

( WHILE ( <= i 10 )

( SETQ i ( + i 1 ) )



)

AUTOCAD LA ƏLAQƏ YARADAN FUNKSIYALAR

COMMAND

S1 […SN]

NIL

S1 adlı və S2..SN parametrləri ilə Autocad-ın komandası yerinə yetirilir. Parametrlər dəyişənlərin adı və ya Autolisp in ifadəsi ola bilər

( COMMAND "Pline" ( LIST 10 10 ) a "Close" )

GETVAR

S

AL və ya S və ya B

S adında Autocad-ın sistem dəyişəninin adını qaytarır.

( GETVAR "DIMTXT" )

SETVAR

S AL və ya S və ya B

ALvə ya S və ya B

S adında Autocad-ın sistem dəyişənininə yeni ədəd mənimsədir.

( SETVAR "dimext" 3.5 )

SIYAHILARI EMAL EDƏN FUNKSIYALAR

CADR

L1

AL

L siyahısından ikinci elementi qaytarır (məsələn, nöqtənin y koordinatını)

( CADR ( LIST 10 20 ) )

CAR

L1

AL

L siyahısından birinci elementi qaytarır (məsələn, nöqtənin x koordinatını)

( CAR a )

LIST

AL1 AL2 [… ALN*]

L

Öz arqumentlərini bir siyahıda birləşdirir

( LIST x y )

NTH

N L

AL

L siyahısından N-ci nömrəli elementi qaytarır (birinci element sıfırdır)

( NTH 1 a )

GIRIŞ-ÇIXIŞ PARAMETRLƏRI

GETINT

S

N

Klaviaturadan tam ədədin daxili. S - mətnli yardaımdır.

( SETQ n ( GETINT "\ndaxil et еnöqt. sayı: " ) )

GETPOINT

[P1] S

P

Siçanla koordinatın daxili. S - mətnli yardaımdır. P1 nöqtəsi verilibsə ondan cari nöqtəyə "elastik" xətt uzanır.

( SETQ p ( GETPOINT ( LIST 0 0 ) "\nGöstər еbaşlanğıc nöqtə: " ) )

GETREAL

S

N

Klaviaturadan həqiqi ədədin daxili. S - mətnli yardaımdır.

( SETQ x ( GETREAL "\nВведите координату Х: " ) )

GETSTRING

[N] S

S

Klavituradn mətnli sətrin daxili. S - mətnli yardaımdır.Əgər B gösərilib və 0 deyilsə, onda daxil edilən sətirdə probel ola bilər, əks halda probel Enter deməkdir.

( SETQ s( GETSTRING "\nEnter your name: " ) )

GRAPHSCR

-

NIL

AutoCAD ın qrafiki ekranını qoşur.

( GRAPHSCR )

INITGET

N

NIL

GET funksiyaya düzgün mənimsətməni müdafiə edir. N - aşağıdakı qiymətlərin cəmidir: 1 - boş daxiletmə qadağandır; 2 - 0 daxiletmə qadağandır;

4 - mənfi qimətlərin daxili qadağandır.



( INITGET 1 )

( SETQ a ( GETREAL "?" ) )



PRIN1

[A və ya E]

-

Parametrsiz müracətdə qiymət qaytarılmır.

....

( PRIN1 )



) ; son ПРОГРАММЫ

PRINT

A və ya E

A və ya E

A ifadəsi mətnli ekrandan daxil edilir.

( PRIN1 ( + 2 2 ) )

PROMPT

S

NIL

S mətnli ekrana çıxarır.

( PROMPT "\nHello, world!")

TEXTSCR

-

NIL

AutoCAD ın mətnli ekranını qoşur.

( TEXTSCR )

SƏTIR FUNKSIYASI

STRCASE

S B

S

S sətirdəki hərfləri başlıq (əgər B=NIL) və ya sətir (əgər B=T) çevirir (yalnız latın əlifbası üçün).

( STRCASE s1 T )

SUBSTR

S N1 N2

S

S sətrinin bir hissəsini N1 dən başlayaraq N2 sayda simvolları qaytarır.

( SUBSTR "M16x20" 4 2 )

STRCAT

S1 S2 [... SN ]

S

Bir neçə simvollaradn ibarət sətri birləşdirir.

( STRCAT "\nA=" a )

СHR

N

S

ASCII kodu N olan ilə simvolu qaytarır

( CHR 7 )

STRLEN

S

L

S sətrindəki simvolların sayını qaytarır.

( STRLEN "abc" )

ASCII

S

N

S sətrində ASCII kodu ilə birinci simvolu qayrtarır

( ASCII "Z" )

TIPLƏRI DƏYIŞƏN FUNKSIYALAR

ITOA

N

S

N tam rəqəmini onunS mətn formasına keçirir.

( PROMPT ( ITOA 5 ) )

ATOI

S

N

S mətn sətrini,N onun tqm rəqəm formasına çevirir.

( ATOI "4" )

RTOS

N1 N2 N3

S

N1 həqiqi ədədini onun S mətn formasına keçirir. N2 - kodurəqəmin formatıdır (1 - elmi; 2 - onluq), N3 - dəqiqlik (vergüldən sonrakı rəqəmlərin sayı).

( RTOS 5.255467 1 3 )

ATOF

S

N

S mətn sətrini N onluq ədədə çevirir.

( ATOF "3.141459" )

Ə d ə b i y y a t


1. AutoCAD® 2012& AutoCAD LT® 2012 Bible. Ellen Finkelstein, Copyright © 2011 by Wiley Publishing, Inc., Indianapolis, Indiana. 2544 p.

2. Qələndərov Z.S., İmanov Ə.S., Nadirov U.M. Mühəndis və maşın qrafikası. Bakı- 2007, 400s.

3. Хальворсон М. Microsoft Visual Basic 6.0 для профессионалов. Шаг за шагом: Практ. пособ. / Пер.с англ.- М.: Издательство ЭКОМ, 1999.-720 с.: илл.

4. İmanov Ə.S. VİSUAL BASİC-lə parametrik layi­hə­lən­dir­mə haqqında. Bakı. BDU, Mexanika Maşın­qa­yır­ma, 2006-cı il №1. 4 səh.

5.  Биллиг В.А., ДехтяръМ.И. VBA и Office 97. Офисное программирование. М.: Издательский отдел «Русская Редакция», ТОО «Cheannel Trading Ltd.», 1998.





Yüklə 13,77 Mb.

Dostları ilə paylaş:
1   ...   240   241   242   243   244   245   246   247   248




Verilənlər bazası müəlliflik hüququ ilə müdafiə olunur ©muhaz.org 2024
rəhbərliyinə müraciət

gir | qeydiyyatdan keç
    Ana səhifə


yükləyin