home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 14 / CD_ASCQ_14_0694.iso / maj / 4559 / cad5gs_.exe / CENT92.CAD < prev    next >
Text File  |  1993-12-28  |  2KB  |  61 lines
  1. Vue(125,35.2,0);Echelle(3.5);Ns:=24;Plan(0,0,0);Soleil(250,-120,180);{1° Ligne}
  2. 'Vue(180,0,0);
  3. Piece(1,1);
  4. Pt(19,30);Pt(19,73);Pt(18,74);Pt(15,74);Pt(15,93);Pt(13,93);Pt(13,102);
  5. Pt(11,102);Pt(11,108);Pt(9.5,109);Pt(9.5,160);Pt(8.5,161);RevX;Fusion;
  6. Oblong(3,20);EtiY(6.5,13,0);Tx(143);Coupe;
  7. Cyl(30,16);Ry(90);Tx(14);Tz(11);Fusion;
  8. Cyl(22,27);Ry(90);Tz(11);Coupe;
  9. Cyl(20,10.5);Ry(90);Tx(20);Tz(11);Coupe;
  10. Cyl(18,30);Ry(90);Tx(22);Tz(11);Coupe;
  11. Cyl(7.5,22);Ry(90);Tx(44);Tz(11);Coupe;
  12. Piece(2,2);
  13. Pt(16,12);Pt(16,17);Pt(12.5,17);Pt(12.5,31);Pt(9,31);Pt(9,35);Pt(12.5,35);
  14. Pt(12.5,50);Pt(5.5,50);Pt(5.5,63);Pt(4.5,64);RevX;Tz(11);Fusion;
  15. Cyl(20,5);Ry(90);Tx(7);Tz(15.5);Fusion;
  16. Cyl(13.5,15.5);Ry(90);Tx(-8.5);Tz(22);Fusion;
  17. Borgne(2,13);Tz(-10);Ry(90);Tz(22);Coupe;
  18. Piece(3,3);
  19. Cyl(34,15.5);Ry(90);Tx(35.5);Fusion;
  20. Cyl(20.5,50);Ry(90);Tx(25);Coupe;
  21. Par(100,100,100);Tx(30);Coupe;
  22. Piece(4,5);
  23. Pt(7,108);Pt(-7,108);Pt(-17,22);Pt(17,22);EtiX(-6.5,6.5,1);Fusion;
  24. Pt(2,108);Pt(-2,108);Pt(-12,22);Pt(12,22);EtiX(3,10,1);Coupe;
  25. Pt(2,108);Pt(-2,108);Pt(-12,22);Pt(12,22);EtiX(-10,-3,1);Coupe;
  26. Cyl(13,15);Ry(90);Tx(-7.5);Tz(108);Fusion;
  27. Sph(23.5,23.5);Tz(22);Fusion;
  28. 'Sph(13,13);Tz(108);Fusion;
  29. Par(50,80,100);Tx(-58);Ty(-40);Tz(-50);Coupe;
  30. Par(50,80,100);Tx(7);Ty(-40);Tz(-50);Coupe;
  31. Cyl(13.5,50);Tz(-25);Ry(90);Tz(22);Coupe;
  32. Cyl(5,50);Tz(-25);Ry(90);Tz(108);Coupe;
  33. Piece(5,6);
  34. Pt(22,-21);Pt(22,28);Pt(23,28);Pt(23,35);RevZ;Fusion;
  35. Pt(15,-25);Pt(13,16);RevZ;Coupe;
  36. Oblong(10,20);EtiX(11,18,0);Tz(10);Fusion;
  37. Oblong(10,20);EtiX(-18,-11,0);Tz(10);Fusion;
  38. Cyl(5,60);Tz(-30);Ry(90);Coupe;
  39. '
  40. Par(50,50,100);Tx(-50);Tz(-30);Coupe;
  41.  
  42. Centre(500,350);
  43. W:=pi/3;   {Inclinaison de la ligne de deplacement}
  44. U:=0;V:=0;
  45. 'Anime(0,2*pi,16,1,2);
  46. Rx((W+U)*180/pi,1);
  47. Tz(-11,2);
  48. Rx((w-U)*180/pi,2);
  49. Tz(11*cos(w+U),2);Ty(-11*Sin(w+U),2);Rx(w,2);
  50.  
  51. Tz(-22,4);
  52. v:=(86^2-(22*cos(u)*sin(w))^2)^0.5;
  53. Atan(-22*cos(u)*sin(w),v);Rx(A*180/pi,4);
  54. Tz(22*Cos(u)*Cos(w),4);
  55. Ty(-22*Cos(u)*Sin(w),4);
  56. Tz(v+22*Cos(u)*Cos(w),5);
  57.  
  58.  
  59.  
  60.  
  61.