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:
Diana2019 pe Simpatie
Femeie
25 ani
Vaslui
cauta Barbat
25 - 80 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