lisp2arx
Visual Programming for AutoLisp Mathématiques en programmation Lisp.. doc2cpp,doc2lsp, sld2lsp, bmp2dcl, free__GifCcapture for all-CAD'platforms..
Lista Forumurilor Pe Tematici
lisp2arx | Reguli | Inregistrare | Login

POZE LISP2ARX

Nu sunteti logat.
Nou pe simpatie:
brunetyk_20 la Simpatie.ro
Femeie
25 ani
Vrancea
cauta Barbat
26 - 52 ani
lisp2arx / MacOs, WebDesign / Clojure- How to emulate defun/s from Visual-Lisp Autocad?  
Autor
Mesaj Pagini: 1
zauchan
Moderator

Inregistrat: acum 14 ani
Postari: 180


Code:

(defun if_str(s386 elseuser / $rr tip) ;;_ASSERT_OK
........................
$rr)
(defun tmti_trpunct_rect_sav(fc / rr m dI c)
....................
rr)

(Defun t_ang_grad2rad(p120 / rr r)
  (dfn_pp_v1chk p120 "1real" "t_ang_grad2rad") (setq;|a331196|;
     r (t_ang_radcheck (/ (* p120 pi) 200.0))) 
...........................
rr)

(defun str_chr1a(n169 o169 q169 / rr)
  (setq;|a379465|;
     rr (if (str_l0 n169) "" (substr n169 o169 q169))) (if (=  n169 nil) (setq;|a379541|;
     rr "")) 
rr)



_______________________________________
psw: cea de la wjndowsXP gigabyte..

pus acum 4 ani
   
Pagini: 1  

Mergi la