MM-pannes 3dGSYMHEAD@@TYPE€2DDRÈ3DSCX ¡2DSCßPARDà˜TYPEMMMM2DDRMMÈXMM¿¾¸V@@°  ¿¾¸T@¾h@¿¾¸U¿®¸SÀ@¿®¸U€@¾P@¿¾¸T€0@¿¾¸U¿¾¸T0¿¾¸T0@¾h0@¾h@¿¾¸U0@™™ ¾t@™™ ¿¾¸U0@33@¾t@33@¿¾¸U0@ff€¾€@ff€¿¾¸U€0@ ¾„@ ¿¾¸V@3DSCMM ¡! pose des pannes ! Marc Tisserand 38, rue de Morbieux 88160 RAMONCHAMP ! TŽl : 03 29 25 22 40 fax : 03 29 25 22 45 ! E-mail : Finn.Ranska@wanadooo.fr ! site : http://www.finnranska.com ! la hauteur de l'objet est la hauteur du dessus de la panne ! explications des paramtres : ! a est la longueur des pannes ! b est l'Žpaisseur ds pannes ! c est la hauteur des pannes ! d est la longueur de l'avant-toit avant et e la longueur de l'avant-toit arrire ! Ces paramtres tracent des rectangles sur les pannes afin de simuler l'intersection des pannes ! avec les murs ! f n'est pas utilisŽ ! g est la pente du toit en degrŽs. Dans le cas de pourcentage, divisez par 100 la pente en pour cent ; ! exemple : pour une pente de 35¡ mettre g = 35 mais pour une pente de 35 %, mettre 35 / 100 = 0,35 ! i ˆ O sont les entre axes entre les pannes. Exemple : dans le cas de 3 pannes par exemple, ! mettre k = 0. La valeur des autres entre axes n'a, dans ce cas, plus d'importance. ! Dans le cas de pannes d'avant-toit, il est plus simple de mettre la panne 1 sur la sablire, ! la panne d'avant-toit avec l'entre axe i nŽgatif et la premire panne du toit avec un entre axe ! J positif Žgal ˆ l'entre axe sablire/panne d'avant-toit + axe sablire/axe de la premire ! panne du toit. ! exemple : soit un entre axe d'avant-toit de 80 cm et un entraxe intŽrieur de 55 cm. Cela fait : ! i= - 80 et J + 1,35 m (55 + 80) model solid if g>2.01 then 2 ! pente en degrŽs (63,549 ¡ maximum soit 201 %) let g=atn(g) ! pente en % 2: ! 1Žre panne let y=0 let z=0 gosub 0 if i=0 then 1 ! 2me panne let y=i let z=i*tan(g) gosub 0 if j=0 then 1 ! 3me panne let y=i+j let z=(i+j)*tan(g) gosub 0 if k=0 then 1 ! 4me panne let y=i+j+k let z=(i+j+k)*tan(g) gosub 0 if l=0 then 1 ! 5me panne let y=i+j+k+l let z=(i+j+k+l)*tan(g) gosub 0 if m=0 then 1 ! 6me panne let y=i+j+k+l+m let z=(i+j+k+l+m)*tan(g) gosub 0 if n=0 then 1 ! 7me panne let y=i+j+k+l+m+n let z=(i+j+k+l+m+n)*tan(g) gosub 0 if o=0 then 1 ! 8me panne let y=i+j+k+l+m+n+o let z=(i+j+k+l+m+n+o)*tan(g) gosub 0 1: del top end !gosub 0 0: model solid addy b+y addz z-c rotx 90 prism 10,b, 0.16,0, ! 1 a-0.16,0, ! 2 a-0.06,0.10, ! 3 a-0.06,c-0.06, ! 4 a,c-0.06, ! 5 a,c, ! 6 0,c, ! 7 0,c-0.06, ! 8 0.06,c-0.06, ! 9 0.06,0.1 ! 10 del top ! rectangles d'intersection avec les murs ! avant-toit arriŽre if e=0 then 11 ! cas sans avant-toit arrire addy b+y addz z-c addx e rotx 90 roty 270 rect b,c del top 11: ! avant-toit avant if d=0 then 12 ! cas sans avant-toit avant addy b+y addz z-c addx a-d rotx 90 roty 270 rect b,c 12: del top return end 2DSCMMß! Objet converti par le Convertisseur de bibliothque (4.0) sous 3/10/91 ! pose des pannes ! Tisserand le 08.11.1990 ! lettres libres= f et de p ˆ x ! chiffres libres= ˆ partir de 2 ! m n o ! la hauteur de l'objet est la hauteur du dessous de la panne ! la panne se positionne par rapport ˆ l'axe de la sablire model solid pen p ! 1Žre panne let y=h let z=(h)*tan(g) gosub 0 if i=0 then 1 pen q ! 2me panne let y=h+i let z=(h+i)*tan(g) gosub 0 if j=0 then 1 ! 3me panne let y=h+i+j let z=(h+i+j)*tan(g) gosub 0 if k=0 then 1 ! 4me panne let y=h+i+j+k let z=(h+i+j+k)*tan(g) gosub 0 if l=0 then 1 ! 5me panne let y=h+i+j+k+l let z=(h+i+j+k+l)*tan(g) gosub 0 if m=0 then 1 ! 6me panne let y=h+i+j+k+l+m let z=(h+i+j+k+l+m)*tan(g) gosub 0 if n=0 then 1 ! 7me panne let y=h+i+j+k+l+m+n let z=(h+i+j+k+l+m+n)*tan(g) gosub 0 if o=0 then 1 ! 8me panne let y=h+i+j+k+l+m+n+o let z=(h+i+j+k+l+m+n+o)*tan(g) gosub 0 1: del top end !gosub 0 0: model solid add2 0,y rect2 0,0,a,b ! rive avant hotspot2 a,0 hotspot2 a,b/2 hotspot2 a,b ! nu du mur avant hotspot2 a-d,0 hotspot2 a-d,b/2 hotspot2 a-d,b ! milieu de la panne hotspot2 a/2,0 hotspot2 a/2,b/2 hotspot2 a/2,b ! nu du mur arrire hotspot2 e,0 hotspot2 e,b/2 hotspot2 e,b ! rive arrire hotspot2 0,0 hotspot2 0,b/2 hotspot2 0,b del top ! rectangles d'intersection avec les murs ! avant-toit arriŽre line2 e,y,e,b+y ! avant-toit avant line2 a-d,y,a-d,b+y del top return end PARDMM˜MMÿÿ € @A ?¾¸Që…¹B ?Ì(õÀC ?é™™™™™šD ?àE F @>G H I @J ?ö¸QàK ?ö¸QàL ?ö¸QàM ?ö¸QàN ?ö¸QàO ?ðP @Qhauteur des pannesavant-toit avantavant-toit arrirenon utilisŽpente du toit (<2=%, XX, = ¡)non utilisŽentre axe2 1;2entre axe3 2;3entre axe4 3;4entre axe5 4;5entre axe6 5;6entre axe7 6;7entre axe8 7;8couleur panne rŽfŽrencecouleur autres pannes