MM-ferme-demiGSYMHEAD@@TYPE€2DDR˜3DSC( ?PARDhÐTYPEMMMM2DDRMM˜XMM¿¹™™à@¾P€ @¾P¾P@¾P@¿¹™™à¿¹™™à@¿¹™™à ¿©™š  @¿©™š  @¿©™š 0¾P@¾P0@¾P@¿¹™™à0@¿¹™™à¿¹™™à0¿¹™™à¾P0?É™™™™™š¾P?É™™™™™š¿¹™™à0¿¹™™à?É™™™™™š¾P0?É™™™™™š¿¹™™à¾P3DSCMM ? ! ferme-demi ! 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 ! explications des paramtres : ! Pour des raisons de facilitŽ, la hauteur de l'objet est la hauteur sous le fa”tage. ! a est la longueur de la ferme ! b est l'Žpaisseur des arbalŽtriers et des faux entraits. Exemple : b = 0,1 m ! signifie que l'Žpaisseur des arbalŽtriers sera de 10 cm ainsi que celle des faux-entraits ! ce qui fera un total de 30 cm. ! c est la hauteur des arbalŽtriers et des faux-entraits ! d est la section du poinon. Si d = 0, il n'y a pas de poinon. ! e est la distance entre le bas des pointes des arbalŽtriers et le bas des faux-entraits. ! E = 0 donne une fermette ! f 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 f = 35 mais pour une pente de 35 %, mettre 35 / 100 = 0,35 ! g est la prŽsence ou non de contre-fiches. La section des contre-fiches est celle du poinon. ! h est le cas d'un arbalŽtrier plus long que l'autre. Avec les paramtres ˆ zŽro, c'est l'arbalŽtrier ! de droite qui se retrouve avec le supplŽment. Pour que ce soit celui de gauche, faire une symŽtrie ou ! une rotation. model solid let a=a*2 ! afin de compenser les a/2 de la programmation ci-dessous model solid if f>2.01 then 1 ! pente en degrŽs (63,549 ¡ maximum soit 201 %) let f=atn(f) ! pente en % 1: ! pen 1 addz -a/2*tan(f)-c/cos(f) ! afin que le 0 corresponde ˆ la pointe du fa”tage. ! arbalŽtriers rotx 90 ! arbalŽtrier de gauche prism 4,b, 0,0, ! 1 a/2,a/2*tan(f), ! 2 a/2,a/2*tan(f)+c/cos(f), ! 3 0,c/cos(f) ! 4 del top ! pen 3 ! entraits ! entrait arrire addz -a/2*tan(f)-c/cos(f) ! afin que le 0 corresponde ˆ la pointe du fa”tage. addx (e-c/cos(f))/tan(f) addy -b addz e rotx 90 for z=1 to 2 if eF ?ðGlargeur des ŽlŽmentssection du poinonhauteur bas des entraitspente du toit (<2=%, XX, = ¡)contre-fiche non:0,oui:1