test

[(gile)]

(defun jeu1 (s / f)
 (defun f (l a)
   (if	(cdr l)
     (f (cddr l) (vl-list* (car l) (cadr l) a))
     a
   )
 )
 (vl-list->string (f (vl-string->list s) nil))
)

 

 

(defun jeu2 (s / l r)
 (setq l (vl-string->list s))
 (while (cdr l)
   (setq r (vl-list* (car l) (cadr l) r)
  l (cddr l)
   )
 )
 (vl-list->string r)
)

 

 

(defun jeu3 (str / f)
 (defun f (s r)
   (if	(< 1 (strlen s))
     (f (substr s 3) (strcat (substr s 1 2) r))
     r
   )
 )
 (f str "")
)

 

 

(defun jeu4 (s / r)
 (setq r "")
 (while (< 1 (strlen s))
   (setq r (strcat (substr s 1 2) r)
  s (substr s 3)
   )
 )
 r
)

 

Pour ce challenge :

 

(defun vlax-curve-getPolylineCoordinates (pl / i pts)
  (repeat (setq	i (if (vlax-curve-isClosed pl)
		    (fix (vlax-curve-getEndParam pl))
		    (1+ (fix (vlax-curve-getEndParam pl)))
		  )
	  )
    (setq pts (cons (vlax-curve-getPointAtParam pl (setq i (1- i))) pts))
  )
)

 

[Olivier Eckmann]

"rettlee èrmire plae imprup seu jontincfoa "

[lecrabe]

Hello

Belle journée pour les vieux CADXPiens !

La Santé, Bye, lecrabe "fatigué"

[VDH-Bruno]

Salut (gile)

 

Quant je suis passé il n'y avait que les 2 premières, j'ai pas vu que tu en avais rajouté, j'aurais du joué le jeu...

Sans regret ce genre de challenge tombe toujours lorsque l'on est charrette c'est la loi de Murphy

 

Amicalement Bruno

[DenisHen]

La loi de Murphy est très bien expliquée par Audiard : "Au début, les problèmes s'additionnent, après, ils se multiplient"...

 

Et on ne parle pas du coté beurrée de la tartine qui tombe sur le sol...

 

@VDH, tu ne vas pas te laisser faire par une pauvre et simple publication... Si ? ? ? Tu nous as habituer à plus de ferveurs... ;)

[DenisHen]

Maître (gile), tu ne jouerais pas perso, là ? Comme pour ne pas répondre à ma proposition de challenge ? ? Hein ? Vilain ! ! ! :angry:

[(gile)]

Maintenant que vous avez vu ce que j'avais très mal caché, vous pourriez poster vos réponses dans le bon sujet.

[DenisHen]

;)

Merci, Ôh grand maître...

 

Mais je suis étonné de ne pas voir de VLisp...