[elektro] Szetszedtem 546

[Arpad]

En szivesen tanultam volna LISP-et de mivel nem matematikai szakra jartam,
csak erintolegesen, meg par infos kolesztarstol hallottam. Illetve meg
elotte, kozepiskolaban, mikor AutoCAD-et tanultam, s az akkori matektanarom
meselt meg errol a nyelvrol. Kesobb keresgettem is forditokat, ertelmezoket
hozza, de leginkabb en is csak az ACAD-ban tudtam hasznalni vagyis ott
probaltam ki a nagy kek LISP konyvben levo fuggvenyeket :)
Meg valahol van egy MProlog konyvem is, csak prolog ertelmezot nem talaltam
mar, ugy latszik az is csak vmi spec helyen van. Illetve neha beleakadok
linux ala valokbol, vagy az Emacs talan erre is, meg a lisp-re is raveheto,
csak azzal mar regen foglalkoztam.
Forth-ot meg pl a sun gepek hasznalnak, mint belso monitorprogram,
legalabbis azokon probalgattam ki a szurke Forth konyvben levo utasitasokat,
peldakat :)

Arpi


2011. január 29. 10:33 Kovács József írta, <kj at faldeko.hu>:

>  > Kérlek segíts, mert hülyén fogok meghalni :(
>  > (legalább 3 alaputasítás, hogy képben legyek....)
>
> >  JAni
>
>
> Egy kis LISP.
> (windows+autocad a környzet, mivel
> az autocad LISP bázisú)
>
> Innen van...
>
> http://www.jtbworld.com/lisp.htm
>
> KJ
>
>
> *This is how you can preset the Path type in the xref attach dialog box
> *;;; Sets the Xref Path type used in the xref attach dialog box
> ;;; Absolute Path: (SetPathType 0)
> ;;; Relative Path: (SetPathType 1)
> ;;; No Path: (SetPathType 2)
>
> (defun SetPathType (v)
>   (vl-load-com)
>   (vl-registry-write
>     (strcat
>       "HKEY_CURRENT_USER\\"
>       (vlax-product-key)
>       "\\Profiles\\"
>       (vla-get-activeprofile
>        (vla-get-profiles
>          (vla-get-preferences (vlax-get-acad-object))
>        )
>       )
>       "\\Dialogs\\XattachDialog"
>     )
>     "PathType"
>     v
>   )
> )
>
> ;;; Gets the Xref Path type used in the xref attach dialog box
> ;;; 0 = Absolute Path
> ;;; 1 = Relative Path
> ;;; 2 = No Path
>
> (defun GetPathType ()
>   (vl-load-com)
>   (vl-registry-read
>     (strcat
>       "HKEY_CURRENT_USER\\"
>       (vlax-product-key)
>       "\\Profiles\\"
>       (vla-get-activeprofile
>        (vla-get-profiles
>          (vla-get-preferences (vlax-get-acad-object))
>        )
>       )
>       "\\Dialogs\\XattachDialog"
>     )
>     "PathType"
>   )
> )
>
>
>
>
>
> >
>
>
> -----------------------------------------
>          elektro[-flame|-etc]
>



-- 
Arpad Lakatos

web: http://k777.freeweb.hu
facebook:
http://www.facebook.com/?ref=home#!/pages/kando777s-Old-Computers-and-Instruments/112188812153800
twitter: kando777