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 |
|
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 |
|