autospeed

j'y réponds mais dans mon livre. Pour l'instant , il faut se contenter de l'animation de la premiere partie du mécanisme http://www.kheops.biz juste pour info , les conduits de la chambre de la reine sont fermés par les portes de gantenbrink puis 26 cm plus tard par les portes de hawass. dans cet espace pouvait se loger deux à trois boules de granit qui une fois libérées , prenaient de la vitesse dans le conduit et venait percuter le tympan de pierre restant en bas du conduit. Les conduits de la chambre de la reine ont servis a ces essais de choc , on a meme retrouvé une des boules dans un des conduits

Oui , la chambre de la reine et ses conduits etait une salle de tests ! en ce temps la , il n'y avait pas d'ordi pour faire des simulations alors elles etaient faites sur place , pendant le chantier a un endroit ou elles ne genaient pas le reste du mécanisme. Phil http://www.kheops.biz

le soi-disant sarcophage est un bassin d'eau qui allait dans le couloir entre la chambre du roi et les herses. C'est en le repoussant dans la chambre du roi a coup de belier que le coin a été brisé. Le jour ou tu verras un roi comme kheops confondre un bassin d'eau avec un sarcophage n'est pas encore arrivé :-) Phil http://www.kheops.biz

l'eau ne passe pas par ceux de la chambre de la reine mais par ceux de la chambre du roi voir mon animation sur http://www.kheops.biz

L'intérieur des conduits ne renseigne pas sur l'extérieur ! compte tenu du poids sur les joints , cela m'etonnerait beaucoup que l'eau s'inflitre bien loin . De plus compte tenue de la pente , la majeure partie de l'eau arrivera sans encombre dans la chambre du roi . D'autre part , comme je le dit dans mon livre Pour comprendre véritablement le rôle de cette structure ( je parle des chambres de décharges ) , il faut avant tout abandonner l’idée de tombeau. Abandon assez facile si l’on admet que les deux conduits dits « de ventilation » et débouchant en façade faisaient courir de gros risques à la momie et au mobilier funéraire. Outre les insectes, le sable et éventuellement la pluie, il aurait suffit que des hommes versent de l’eau dans ces conduits pour noyer la momie et le mobilier royal. Des pilleurs auraient pu en avoir l’idée, rien que pour voir où l’eau allait ressortir. C’est un risque que Khéops ne pouvait pas prendre s’il voulait vivre éternellement.

Les egyptologues actuels considerent que les 3 chambres sont liées au fait que le toi pouvait mourir pendant la construction et qu'il fallait une chambre provisoire en attendant la fin du chantier. Cela ne tient pas debout ! Pour en revenir a la chambre du roi , la pression repousse des blocs qui ont des trous sous des conduits remplis de sable. En fait , il est posé sur un lit de sable qui va s"écouler et permettre la descente du plancher en fait dans mon livre , j'explique aussi a quoi servaient les conduits de la chambre de la reine , il s'agissait de conduits tests qui ont servi a des essais avant de reproduire le mécanisme a l'etage supérieur. La chambre de la reine etait une sorte de simulateur . Pour les portes de gantenbrink et de hawass situées en haut des conduits de la chambre de la reine , il y a fort a parir que l'espace de 26 cm entre elles contenait 2 boules de granit . Apres liberation , ces boules prenaient de la vitesse dans le conduit et venaient eclater le tympan de pierre restant en partie basse. Une de ses boules a d'ailleurs eté retrouvé dans un des conduits. Pour le reste , je ne vais pas tout raconter sur mon site sinon je ne vendrais plus de livres mais disons que pour l'instant ma théorie explique la plupart des anomalies architecturales constatées. Donc, ma curiosité est piquée au vif et je ne manquerai pas d'essayer d'en savoir plus ... Beau travail en tout cas !!! Did it !

La finalité reste d'ouvrir les vraies portes de la pyramide. La chambre du roi est une sorte de piston qui en s'enfoncant , libere l'eau mais permet aussi a du sable de s'ecouler . Donc si le sable s'ecoule , tout ce qui est posé sur le sable en question va bouger. Le premier but de cet animation est de démontrer que les egyptologues se sont plantés dans leurs interpretations de l'architecture interne. Il s'agit bien d'un mécanisme hydraulique et non d'un tombeau. Phil http://www.kheops.biz

Bonjour , En avant première, je vous présente une partie de la théorie que j'ai élaborée pour expliquer l'architecture interne de la grande pyramide d'Egypte. http://autospeed.celeonet.fr/khufu/spip.php?article4 Le livre ne paraitra qu'en Fevrier 2008 mais vos avis de dessinateurs sont intéressant pour connaitre le pourcentage de crédibilité que vous accordez à cette théorie. Regardez l'animation et ensuite , venez dire ici ce que vous en pensez ! Pour info .. la théorie est déposée ... chasse gardée :-) Phil http://www.kheops.biz

Je suis en train de tester super autoscript mais je bloque sur la syntaxe exacte des scripts pas de probleme pour changer les variables PDMODE 1 PDSIZE 1 PSLTSCALE 0 il suffit d'écrire une variable et d'inscrire sa valeur sur la ligne en dessous. La ou cela se complique c'est par exemple pour faire un zoom etendu faut il ecrire ZOOM ou _ZOOM et comment valider et ? et pire encore , je voudrais créer un calque qui n'existe pas .. exemple PLOMBERIE facile a faire sous autocad grace à la boite de dial mais en script ? Existe t-il un mode d'emploi de toutes les commandes en script ? Phil http://www.autospeed.biz

commande AIRE tu connais ? Phil http://www.autospeed.biz

quels genres de plans et quelles genres de mises à jour ? [Edité le 30/8/2007 par autospeed]

S'il y aquelqu'un a l'autre bout , l'assistance a distance de live messenger est aussi performante que logmein en terme de rendu et de vitesse. Phil http://www.autospeed.biz

http://www.dwggateway.fr/ Phil http://www.autospeed.biz

Contacte drissnabih@yahoo.fr et demande lui une licence de son logiciel EDPLOTARCHIVER , tu ne sera pas déçu ! Phil http://www.autospeed.biz

Sous windows tu peux utiliser Winplomb , une version de démo est dispo sur www superlutin.net . Elle peut calculer 3 chutes et 3 tronçons ! au dela , il faut payer :-) Phil www.autospeed.biz

met la variable PSLTSCALE à ZERO et les types de lignes dans l'espace objet auront la meme représentation dans l''espace papier phil http://www.autospeed.biz

l'astuce consiste a fermer autocad puis a le reouvrir ! la liste de calque est géré par un module externe qui peut planter. Phil http://www.autospeed.biz

Bonjour , pour repondre à ta question , je suis le concepteur d'Autospeed et non son programmeur car je ne connais rien au lisp. On est deux auteurs . Je recherche cette routine pour un ami projeteur qui fait du VDR. Merci pour le code , ça va surement le dépanner

Tu dervais utiliser Autospeed , tu gagnerais du temps sur tes métrés. Voir http://www.autospeed.biz pour la demo on line des possibilités de dessin et de métré Phil 06 76 13 48 98 pour tout renseignements

en fait , j'ai deja un lisp qui permet d'aligner le texte par rapport a un objet mais il n'y a pas de parametre permettant de regler la distance entre le point d'insertion du texte et le point cliqué sur la ligne ou la polyligne. (defun atxerr (ch) (cond ((eq ch "Function cancelled") nil) ((eq ch "quit / exit abort") nil) ((eq ch "console break") nil) (T (princ ch)) ) (setvar "cmdecho" 1) (setvar "angdir" old_adir) (setvar "angbase" old_abase) (setvar "osmode" old_osmd) (setq *error* olderr) (princ) ) (defun near_vertex_arr (obj / obj dxf_obj obj_vlax pt_sel par pt_first pt_snd i bulge e_next) (setq dxf_obj (entget (car obj))) (vl-load-com) (setq obj_vlax (vlax-ename->vla-object (car obj)) pt_sel (vlax-curve-getClosestPointTo obj_vlax (trans (osnap (cadr obj) "_near") 1 0)) par (vlax-curve-getParamAtPoint obj_vlax pt_sel) pt_first (trans (vlax-curve-getPointAtParam obj_vlax (fix par)) 0 1) pt_snd (trans (vlax-curve-getPointAtParam obj_vlax (1+ (fix par))) 0 1) i 0 ) (cond ((eq (cdr (assoc 0 dxf_obj)) "LWPOLYLINE") (while (or (/= (caar dxf_obj) 42) (if (< i (fix par)) (setq i (1+ i)))) (setq bulge (cdadr dxf_obj) dxf_obj (cdr dxf_obj)) ) ) (T (setq e_next (entnext (car obj))) (repeat (fix par) (setq e_next (entnext e_next))) (setq bulge (cdr (assoc 42 (entget e_next)))) ) ) (list pt_first pt_snd bulge) ) (defun c:alt ( / olderr old_abase old_adir e_txt dxf_txt e_seg ent dxf_ent typent l_2pt dxf_11 x_alpha) (setq old_osmd (getvar "osmode") old_abase (getvar "angbase") old_adir (getvar "angdir")) (setvar "osmode" 0) (setvar "angbase" 0) (setvar "angdir" 0) (setvar "cmdecho" 0) (setq olderr *error* *error* atxerr) (while (null (setq e_txt (entsel "\nChoix du texte a aligner: ")))) (cond ((or (and (= (setq typent (cdr (assoc 0 (setq dxf_txt (entget (car e_txt)))))) "TEXT") (not (member (assoc 72 dxf_txt) '((72 . 3) (72 . 5)))) ) (= typent "MTEXT") ) (while (null (setq e_seg (entsel "\nAligner le texte sur le segment --> ")))) (setq typent (cdr (assoc 0 (setq dxf_ent (entget (car e_seg)))))) (cond ((or (eq typent "XLINE") (eq typent "RAY")) (setq dxf_11 (cdr (assoc 11 dxf_ent))) (setq x_alpha (atan (/ (cadr dxf_11) (car dxf_11)))) (grdraw (trans (cdr (assoc 10 dxf_ent)) 0 1) (polar (trans (cdr (assoc 10 dxf_ent)) 0 1) x_alpha (distance (getvar "vsmin") (getvar "vsmax"))) -1 1) ) ((eq typent "LINE") (setq x_alpha (angle (cdr (assoc 10 dxf_ent)) (cdr (assoc 11 dxf_ent)))) (grdraw (trans (cdr (assoc 10 dxf_ent)) 0 1) (trans (cdr (assoc 11 dxf_ent)) 0 1) -1 1) ) ((or (eq typent "LWPOLYLINE") (and (eq typent "POLYLINE") (zerop (boole 1 118 (cdr (assoc 70 dxf_ent)))) ) ) (setq l_2pt (near_vertex_arr e_seg)) (grdraw (car l_2pt) (cadr l_2pt) -1 1) (if (zerop (caddr l_2pt)) (setq x_alpha (angle (trans (car l_2pt) 1 0) (trans (cadr l_2pt) 1 0))) (progn (setq x_alpha nil) (princ "\nNe peut obtenir un angle depuis ce type d'objet!")) ) ) (T (princ "\nNe peut obtenir un angle depuis ce type d'objet!") (redraw) ) ) (cond (x_alpha (entmod (subst (cons 50 x_alpha) (assoc 50 dxf_txt) dxf_txt)) (princ "\n ou [Click+gauche] pour tourner de 90°/ ou [Click+droit] pour finir!.") (while (and (not (member (setq key (grread nil 4 0)) '((2 13)))) (/= (car key) 25)) (setq x_alpha (+ (/ pi 2.0) x_alpha)) (entmod (subst (cons 50 x_alpha) (assoc 50 dxf_txt) dxf_txt)) ) (redraw) ) ) ) (T (princ "\nCe n'est pas du texte, ou alors il est fixé ou aligné!")) ) (setvar "angdir" old_adir) (setvar "angbase" old_abase) (setvar "osmode" old_osmd) (setq *error* olderr) (setvar "cmdecho" 1) (princ) )

Bonjour , je recherche un lisp qui permettrait la fonction suivante. on clique sur un texte puis sur une ligne ou une polyligne et le texte se positionne a une distance prédéfinie de la ligne ou de la polyligne. Est ce que cela existe déja ? >cliquez sur le texte >cliquez sur la ligne ou la polyligne > ecart ( valeur ) phil http://www.autospeed.biz

dans le meme genre http://www.vox-populi.net/IMG/jpg/sarkopreview.jpg allez lire l'article qui va avec sur http://www.vox-populi.net

Hé oui , le probleme c'est le jour d'apres ! http://www.vox-populi.net/IMG/jpg/sarkonul.jpg

de mon coté , j'ai mis tout un tas de lignes spéciales dans la section bonus du site http://www.autospeed.biz

Si tu veux utiliser facilement n'importe quel type de ligne sans avoir besoin de le rentrer dans AutoCAD.lin , utilise le petit lisp autospeed . http://www.autospeed.biz