Fraid

pourquoi le protéger, et de quoi? je ne sais pas comment tu fait pour taper sur ton clavier sous LSD ....

pour la comparaison Java / Javascript sans rentrer dans les détails techniques, je vais parler de mes ressentis. Java, déjà, il faut quelque mois pour vraiment arriver à quelque chose. Trois apprentissages minimum en parallèle. Le langage (super fournis) l'IDE (le logiciel qui te permet de programmer, netbeans ou eclipse par exemple) la JavaDoc, la documentation officielle tellement tordue qu'elle demande vraiment une attention particulière. C'est un langage relié quasiment à toutes les technologies. Donc, si tu dois en utiliser une (ex: xml, html, sql...) tu peux la rajouter, car cela demande une bonne connaissance de cette dernière. le html est incontournable, Java l'utilise pour ces boites de dialogue par exemple. Cela m'a servi à apprendre un langage orienté objet. Vraiment super rapide. Pour traiter des fichiers textes monstreux avec plus de 36000 lignes 1 seconde en java 30 en Autolisp... Idéal pour des gros projets avec beaucoup d'objets (Minecraft par exemple est en Java) Javascript L'ovni des langages Dans mes préférences, il vient juste après Autolisp. Evidemment, Il ne sert à rien de vouloir écrire du javascipt dans Photoshop si tu ne le connais pas bien. Pareil pour les pages internet, il faut connaitre html et css. un point commun avec java, sauf que lui il travail avec alors que javascript dedans. C'est toujours une aventure de programmer en Javascript. Tout est permis, ou presque. un énorme background sur le net, comme Java (heureusement) pas besoin d'IDE on peut tout de même écrire des programmes importants, pas que des script. orienté objet ou non, comme on veut. procédurale, fonctionnel c'est comme on préfère. il faut tester

tu cherche à comparer l'efficience d'un aspirateur avec celle d'un mixeur et d'un grille pain... le grand perdant sera toujours Autolisp (en temps d’exécution). il est interprété avant d’être exécuté. F# ou Java étant compilés, sont super rapides. php, c'est à part, il s'exécute sur un serveur, modifiant une page internet avant que le client le reçoive. javascript est comme Autolisp, embarqué dans une application.(navigateur internet, Photoshop, Autocad...) mais incomparable nom plus en fait il n'y a pas vraiment de compétition (si f# vs Java) et le nombre de ligne de code n'a pas d'importance. c'est le nombre de commandes et d'itérations.

en php <?php function chal($txt) { $ret = ""; while (1 < strlen ($txt)) { $ret = substr($txt,0, 2) . $ret; $txt = substr($txt,2); } echo $ret; } echo chal("5637159071856346"); ?> Result: 4663857190153756

Je confirme public class Challenge { public static void main(String[] args){ System.out.print(chal("5637159071856346")); } public static String chal( String txt){ String ret = ""; while (1 < txt.length()) { ret = txt.substring(0, 2) + ret; txt = txt.substring(2); } return ret; } } run: 4663857190153756BUILD SUCCESSFUL (total time: 0 seconds)

Oula, c'est que j'ai du travail.... et c'est souvent pour cela que mes messages sont court. Il va falloir que tu te documente, sur Wiki par exemple. Dès que j'ai le temps je fait un exemple en Java.

Yop, Ce n'est pas du Java, mais du Javascript Très grosse différence.

Bonjour, Une solution en Javascript function chal(str) { var lstr = str.split('').reverse(); var lret = []; var cpt = 0; for (var ii = 0; ii < lstr.length / 2; ii++){ lret.push(lstr[cpt + 1],lstr[cpt]); var cpt = cpt + 2; } console.log("".concat(...lret)); } chal('5637159071856346'); > "4663857190153756"

Bonjour, Une solution en Autolisp (defun chal (str / ret cpt) (setq str (vl-string->list str) cpt 0) (repeat (/ (length str) 2) (setq ret (cons (vl-list->string (list (nth cpt str)(nth (1+ cpt)str))) ret ) cpt (+ 2 cpt)) ) (apply 'strcat ret) )

de toute façon, si tu n'est pas administrateur des postes, c'est mort. la config du bureau d’étude me semple étrange tout de même ... Rappel, le VPN existe... ce qui te permettrais de prendre en main à distance les postes de travail

Si tu choisi la solution autorun.inf il te faut lancé un .bat avec. Un exemple de .bat qui change la lettre ici X que tu place sur la clé à coté du autorun.inf @echo off echo select volume %cd:~0,1% > %temp%\driveletter.txt echo assign letter=X noerr >> %temp%\driveletter.txt diskpart /s %temp%\driveletter.txt del /s %temp%\driveletter.txt Un exemple de autorun.inf [autorun] open=changelettre.bat non testé sur Windows 10 et peux générer une réaction de l'antivirus.

Alors, Ini sur USB, non (ou peut être). Branche la clé ou le dd. Ouvrir la fenêtre Exécuter de windows (Windows+R) Taper compmgmt.msc à gauche Stockage puis Gestion de disques clic droit sur ta clé Modifier la lettre du lecteur

Bonjour, Essaye en zipant ton fichier.

Il y aussi la solution d'attribuer via Windows une lettre fixe à la clé USB.

essaye avec des coordonnée en dehors de france, du genre Etats-Unis d'Amérique, il ne te propose pas lambert il me semble.

je pense qu'Autocad essaye de trouver les systèmes les plus probables par rapport au coordonnées fournis. ce n'est qu'une supposition

non, c'est trop particulier. Mais ce n'est pas difficile. au démarrage tester si l'installation est faite sinon enregistrer dans un fichier texte ou dans le registre les variables que tu veux retrouvées.

Bonjour, Si ton lisp ne s'appelle pas comme la commande, c'est difficile. Par contre si tu fait un lisp d'installation, avec lequel tu enregistre le répertoire ...

Bonjour, Juste par curiosité, C'est quoi CtrlSvGrd ?

Bonjour, J'ai modifié mon code, pour que cela fonctionne si la page de garde est en métre.(0.297/0.210) J'avais fait mes testes au mm.(297/210)

quand j'ai testé j'ai eu un effet d’emballement.(les derniers fichiers n’étaient pas renommés) mon pc qui me sert à programmer est un fer à repasser... j' en ai mis 2 pour être sur. je pense qu'il peut sauter. Peut être que cela fonctionne sans du tout de pause avec Windows 10 suis encore sur 7 cela va te faire 3002 routines!!!!!

Bonjour, Malgré le silence, je partage ma p'tite chose. ;;Ressources (vl-load-com) ;;;c:renameDwgByTxt ;;;Renomme les dwg d'un dossier par un texte présent dans l'espace papier. ;;;Ouvrir un des dwg (il ne seras pas traité), taper renameDwgByTxt et choisir le texte (doit avoir la même position dans chaque dessin) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defun c:RenameDwgByTxt (/ getvlatext axdoc lf dir pos posobj txt cpt cmd) ;;Fonctions internes ;;;getvlatext ;;;Retourne le VLA-OBJECT d'un texte sélectionné (defun getvlatext ( / obj ename vlaobj) (while (/= "TEXT" obj);tant qu'un texte n'est pas sélectionné (princ "\nSélectionnez le texte de référence.") (setq ename (ssname (ssget "_:S+.") 0);"_:S+." permet de sélectionner un seul objet obj (cdr (assoc 0 (entget ename))) vlaobj (vlax-ename->vla-object ename) ) );while );defun getvlatext ;;Variables Autocad (setq cmd (getvar 'cmdecho)) (setvar 'cmdecho 0) ;;Principal (and (setq cpt 0;Compteur dir (getvar 'dwgprefix);Chemin du dossier du dessin ouvert lf (vl-directory-files dir "*.dwg" 1);Liste des dwg dans le dossier ) (setq pos (vlax-get 'textalignmentpoint (getvlatext)));Position du texte de référence (foreach f lf;Pour chaque dwg (if (and (/= f (getvar 'dwgname))(setq axdoc (getaxdbdoc (strcat dir f))));Si ce n'est pas le dessin en cours, on entre dans le fichier (progn (vlax-for obj (vla-get-paperspace axdoc);Pour chaque objet présent dans l'espace papier (and (= (vla-get-objectname obj) "AcDbText");Si c'est un texte (setq posobj (vlax-get 'textalignmentpoint obj));position du texte (= (fix(*(car pos)100)) (fix(*(car posobj)100)));si position des textes egal (= (fix(*(cadr pos)100)) (fix(*(cadr posobj)100))) (setq txt (vla-get-textstring obj));String du texte (not (wcmatch txt "*.dwg"));Si le texte ne se termine pas par .dwg (setq txt (strcat txt ".dwg"));Rajout de .dwg );and );vlax (vlax-release-object axdoc);Réalisation par Fraiddd :) (command "_.delay" 200);Une petite pose s'impose (if (and txt (vl-file-rename (strcat dir f) (strcat dir txt)));Si l (setq cpt (1+ cpt) txt nil) );if (command "_.delay" 200);une 2ème moins sur );progn );if );foreach );and ;;Sortie (setvar 'cmdecho cmd) (if (= cpt 0) (princ "\nEchec, aucun fichier renommé.");Try again (princ (strcat "\nOpération réussie, " (itoa cpt) " fichiers renommés.")) );if (princ);Sortie propre );defun ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;Accèder à un dessin fermé (defun getaxdbdoc (filename / axdbdoc release) (setq axdbdoc (vlax-create-object (if (< (setq release (atoi (getvar "ACADVER"))) 16) "ObjectDBX.AxDbDocument" (strcat "ObjectDBX.AxDbDocument." (itoa release)) ) ) ) (if (vl-catch-all-apply 'vla-open (list axdbdoc filename)) (not (vlax-release-object axdbdoc)) axdbdoc ) ) Il ne faut pas ouvrir tous les fichiers, mais un seul dans lequel il faut choisir le texte en question. le fichier ouvert n'est pas traité. J'ai fait un effort de commentaires pour ceux qui se lancent. Je trouve que nous sommes de moins en moins nombreux à Lisper. A tantôt

donne nous ces coordonnées, et nous pourrons te faire un ptit lisp. La, comme ça, difficile de t'expliquer tout les avantages. il te manque donc une formation... mais déjà, les fonctions pour lire les attributs existent, pas pour ton texte.

Bonjour, Il faut pouvoir récupérer le texte en question. Si il n'a pas de particularité, cela va être difficile. C'est une des raisons pour utiliser des attributs en page de garde si il a toujours la même position peut etre...

Bonjour, Je vois que nous arrivons devant la même porte fermée. Mais je n'ai pas encore renoncé. Car si on ajoute un caractère spécial à ce fichier, sans modifié son encodage, c'est gagné.