0  BEGIN PGM 8255_fr MM 
1  ;Programme CN permettant de mesurer une
2  ;tolrance norme dans le systme Arbre
3  ;standard ou Trou standard, et de vrifier
4  ;si le rsultat de la mesure se trouve dans
5  ;la limite de tolrance. La CN affiche
6  ;ensuite ltat de la pice, le rsultat de
7  ;la mesure et les cotes de tolrance dans une
8  ;fentre  lcran.
9  ;Dans ce programme CN, vous dfinissez
10 ;lensemble des paramtres qui seront utiles
11 ; lexcution du programme. La CN appelle
12 ;ensuite un autre programme CN qui lui permet
13 ;de calculer les cotes, deffectuer la mesure
14 ;et d'afficher les rsultats  lcran.
15 ;Le contenu de ce programme CN peut par
16 ;exemple tre copi dans un programme
17 ;d'usinage,  l'endroit o la mesure doit
18 ;avoir lieu.
19 ;
20 ;
21 ;
22 ;Introduction des paramtres
23 Q1 = 50 ;COTE D'AJUSTEMENT
24 QS1 = "H7" ;TOLERANCE
25 Q11 = 0 ;CENTRE DE LA MESURE EN X
26 Q21 = 0 ;CENTRE DE LA MESURE EN Y
27 Q31 = - 5 ;HAUTEUR DE LA MESURE EN Z
28 Q41 = 45 ;ANGLE DE LA PREMIERE MESURE
29 Q51 = 2 ;DISTANCE D'APPROCHE LATERALE
30 ;Fin de la programmation des paramtres
31 ;
32 ;Appel de programme permettant deffectuer la
33 ;mesure et d'afficher les valeurs  l'cran.
34 CALL PGM 82551_fr.H
35 ;
36 ;
37 STOP
38 ;Fin du programme
39 END PGM 8255_fr MM