0  BEGIN PGM 8250_fr MM 
1  ;Programme CN permettant d'afficher, dans
2  ;une fentre de l'cran, les cotes d'une
3  ;tolrance standard dans le systme
4  ;Arbre standard ou Trou standard.
5  ;Dans ce programme CN, vous dfinissez la
6  ;cote d'ajustement et la tolrance. La CN
7  ;appelle ensuite un programme CN qui lui
8  ;permet de calculer les cotes et de les
9  ;afficher  l'cran.
10 ;Le contenu de ce programme CN peut par
11 ;exemple tre copi dans un programme
12 ;d'usinage,  l'endroit o les cotes
13 ;sont censes tre affiches.
14 ;
15 ;
16 ;Dfinition des paramtres
17 Q1 = 40 ;COTE D'AJUSTEMENT
18 QS1 = "H7" ;TOLERANCE
19 ;Fin de la programmation des paramtres
20 ;
21 ;Appel de programme permettant de dterminer
22 ;les cotes et d'afficher les valeurs  l'cran.
23 CALL PGM 82501_fr.H
24 ;
25 ;
26 STOP
27 ;Fin du programme
28 END PGM 8250_fr MM