Appendice B

Appendice B : Esempi ottimizzazioni introdotte ed elementi particolari

Pagina precedente Appendice A Torna Home Page
Home Page
Appendice C Pagina seguente



In questa sezione vengono riportati i seguenti elementi d'esempio :


Blocco DMIS per determinazione origine principale cilindro ( PCS1 )

$$---------- Definizione Origine PCS1
$$[notaoperatore]
$$Blocco definizione origine PCS1 cilindri ciechi
$$Utilizzo macro presa punti a 30ø
$$[finenota]

$$---------- DICHIARAZIONE PARAMETRI BLOCCO
DECL/REAL,V(DCANNA)
DECL/REAL,V(USCITA)
DECL/REAL,V(BASEPC)
DECL/REAL,V(ALTEZZAPC)
DECL/REAL,V(PROFOND)
DECL/REAL,V(F5D)
DECL/REAL,V(F6D)
DECL/REAL,V(YF5)
DECL/REAL,V(YF6)
DECL/REAL,V(ZF5)
DECL/REAL,V(ZF6)

$$---------- ASSEGNAMENTO VALORI PARAMETRI
$$[valoriparametri]
V(DCANNA)=
$$Diametro canna cilindro
V(USCITA)=
$$Disimpegno dopo misura
$$V(PROFOND)=
$$Profondità di penetrazione nel foro per presa punti 
V(BASEPC)=
$$Valore base piano carter
V(ALTEZZAPC)=
$$Valore altezza piano carter
V(F5D)=
$$Diametro foro 5
V(YF5)=
$$Coordinata Y foro 5
V(ZF5)=
$$Coordinata Z foro 5
V(F6D)=
$$Diametro foro 6
V(YF6)=
$$Coordinata Y foro 6
V(ZF6)=
$$Coordinata Z foro 6
$$[fineparametri]

$$---------- COMPONENTE FUNZIONALE 
GOTO/100,0,0
GOTO/40,0,0
F(CENTRO)=FEAT/CIRCLE,INNER,CART,0,0,0,1,0,0,V(DCANNA)
CALL/M(FC030_3),(CENTRO),0,0,0,V(DCANNA),0,V(USCITA)
$$TRASLO L'ORIGINE AL CENTRO DELLA CANNA REALE
D(ORI_2)=TRANS/YORIG,FA(CENTRO),ZORIG,FA(CENTRO)
F(PIANO_1)=FEAT/PLANE,CART,0,0,0,1,0,0
CALL/M(PIAX4),(PIANO_1),0,0,0,V(BASEPC),V(ALTEZZAPC),V(USCITA)
DATDEF/FA(PIANO_1),DAT(A)
D(LEVEL_1)=DATSET/DAT(A),XDIR,XORIG
SNSET/APPRCH,0.5
SNSET/RETRCT,0.5
WKPLAN/YZPLAN

$$---------- Calcolo retta asse Y
F(FORO_5)=FEAT/CIRCLE,INNER,CART,0,V(YF5),V(ZF5),1,0,0,V(DF5)
CALL/M(FC4U),(FORO_5),0,0,V(YF5),V(ZF5),V(PROFOND),V(USCITA)
F(FORO_6)=FEAT/CIRCLE,INNER,CART,0,V(YF6),V(ZF6),1,0,0,V(DF6)
CALL/M(FC4U),(FORO_6),0,0,V(YF6),V(ZF6),V(PROFOND),V(USCITA)
F(RETTA_7)=FEAT/LINE,UNBND,CART,-3,0,0,0,1,0,1,0,0
CONST/LINE,F(RETTA_7),BF,FA(FORO_6),FA(FORO_5)
SAVE/FA(RETTA_7)
DATDEF/FA(RETTA_7),DAT(D)
D(ALIGN_2)=ROTATE/XAXIS,FA(RETTA_7),YDIR
SNSET/APPRCH,2
SNSET/RETRCT,2
F(FORO_2)=FEAT/CIRCLE,INNER,CART,0,0,0,1,0,0,V(DCANNA)
CALL/M(FC030_3),(FORO_2),0,0,0,V(DCANNA),0,V(USCITA)
D(PCS1)=TRANS/YORIG,FA(FORO_2),ZORIG,FA(FORO_2)
SAVE/D(PCS1)



Sottoprogramma DMIS per misurazione Zona Candela

$$---------- Misurazione Zona Candela
$$[notaoperatore]
$$Sottoprogramma misurazione Zona Candela
$$[finenota]

$$---------- DICHIARAZIONE PARAMETRI BLOCCO
DECL/REAL, V(PRECAND)
DECL/REAL,V(CPP)
DECL/REAL, V(USCICAND)

$$---------- ASSEGNAMENTO VALORI PARAMETRI
$$[valoriparametri]
$$ V(PRECAND)=9
$$Coordinata presa punti PERNO CANDELA asse X 
V(CPP)=10
$$Coordinata contatto piano candela
V(USCICAND)=25
$$Distanza di allontanamento da perno candela dopo presa punto
$$[fineparametri]

$$---------- COMPONENTE FUNZIONALE 
SNSET/APPRCH,2
SNSET/RETRCT,3
GOTO/50,8.5,0
F(PIANO_50)=FEAT/PLANE,CART,0,0,0,1,0,0
MEAS/PLANE,F(PIANO_44),4
     PTMEAS/CART,0,V(CPP),0,1,0,0
     GOTO/30,8.5,0
     GOTO/30,0,8.5
     PTMEAS/CART,0,0, V(CPP),1,0,0
     GOTO/30,0,8.5
     GOTO/30,-8.5,0
     PTMEAS/CART,0,- V(CPP),0,1,0,0
     GOTO/30,-8.5,0
     GOTO/30,0,-8.5
     PTMEAS/CART,0,0,- V(CPP),1,0,0
     GOTO/50,0,-8.5
     GOTO/50,8,0
ENDMES
SAVE/FA(PIANO_50)
D(ORI_CAND)=TRANS/XORIG,FA(PIANO_50)
F(PERNO_51)=FEAT/CIRCLE,OUTER,CART,9,0,0,1,0,0,8
MEAS/CIRCLE,F(PERNO_45),4
     PTMEAS/CART,V(PRECAND),4,0,0,1,0
     GOTO/V(USCICAND),8,0
     GOTO/ V(USCICAND),0,8
     PTMEAS/CART, V(PRECAND),0,4,0,0,1
     GOTO/ V(USCICAND),0,8
     GOTO/ V(USCICAND),-8,0
     PTMEAS/CART, V(PRECAND),-4,0,0,-1,0
     GOTO/ V(USCICAND),-8,0
     GOTO/ V(USCICAND),0,-8
     PTMEAS/CART, V(PRECAND),0,-4,0,0,-1
     GOTO/100,0,-8
ENDMES
SAVE/FA(PERNO_51)
F(PUNTO_51)=FEAT/POINT,CART,0,0,0,1,0,0
CONST/POINT,F(PUNTO_51),PROJPT,FA(PERNO_51),FA(PIANO_50)
SAVE/FA(PUNTO_51)



Esempio Certificato di Collaudo

================================================================================
RAGIONE SOCIALE : GILARDONI             PROVA N.        : 3                     
REPARTO/UFFICIO : Ass.qualita           ATTREZZATURA    :                       
NOME            : .....                 PROGRAMMA       : PICB0403              
DATA            : 01/10/99              TIPO DEL PEZZO  :                       
ORA             : 14:40:29              N. DEL PEZZO    :                       
NUMERO D'ORDINE :                       PROVENIENZA :                           
--------------------------------------------------------------------------------
                                 teor.  tmin.  tmax.           reale  diff.     
--------------------------------------------------------------------------------
 ** DIAMETRI FORI PIANO CARTER **
  E  5 FORO.. D..............    8.300  0.000  0.200 Buono     8.326  0.026 ---
  E  6 FORO.. D..............    8.300  0.000  0.200 Buono     8.339  0.039 ---
  E  8 FORO.. D..............    8.300  0.000  0.200 Buono     8.325  0.025 ---
  E  9 FORO.. D..............    8.300  0.000  0.200 Buono     8.336  0.036 ---
  E180 FORO.. D..............    7.500 -0.003  0.016 Buono     7.513  0.013 +++
  E190 FORO.. D..............    7.500 -0.003  0.016 Buono     7.513  0.013 +++
 ** INTERASSI LATO CARTER **
  V  1 DISTY. E2-E9..........   36.000 -0.100  0.100 Buono    36.080  0.080 ++++
  V  2 DISTY. E2-E5..........   36.000 -0.100  0.100 Buono    36.039  0.039 ++
  V  3 DISTY. E2-E6..........   36.000 -0.100  0.100 Buono    35.995 -0.005 -
  V  4 DISTY. E2-E8..........   36.000 -0.100  0.100 Buono    35.903 -0.097 ----
  V  5 DISTZ. E2-E9..........   31.000 -0.100  0.100 Buono    30.957 -0.043 --
  V  6 DISTZ. E2-E5..........   31.000 -0.100  0.100 Buono    30.972 -0.028 --
  V  7 DISTZ. E2-E6..........   31.000 -0.100  0.100 Buono    30.934 -0.066 ---
  V  8 DISTZ. E2-E8..........   31.000 -0.100  0.100 Buono    31.031  0.031 ++
 ** DIAMETRI FORI PIANO TESTA **
  E 14 FORO.. D..............    9.800  0.012  0.030 Magg    24.170  0.170 
  V 24 DISTY. E2-E20.........   14.000 -0.100  0.100 Buono    13.981 -0.019 -
  V 25 DISTZ. E2-E10.........   64.000 -0.100  0.100 Buono    64.013  0.013 +
 ** VALUTAZIONI FLANGIA  **
  V 26 DISTY. E11-E2.........   47.000 -0.200  0.200 Buono    47.056  0.056 ++
 ** ************************* **
  V 27 DISTX. E12-E1.........    8.100 -0.100  0.100 >Magg     8.276  0.176 
  V 28 DISTZ. E12-E2.........   61.800 -0.100  0.100 Buono    61.763 -0.037 --
  V 29 DISTX. E14-E12........   35.800 -0.100  0.100 Buono    35.784 -0.016 -
  V 30 DISTZ. E14-E2.........   43.300 -0.100  0.100 Buono    43.277 -0.023 -
 ** ALTEZZA CILINDRO **
  V 31 DISTX. E1-E30.........   67.000 -0.050  0.050 Buono    67.038  0.038 ++++





Logo HTML Write

WebMaster : Ing. Rusconi Sergio
E-mail : serusco@tin.it
Home Page : space.tin.it/scienza/srusco


Pagine ottimizzate per Explorer 5 con risoluzione video 1024 x 768
Ultima revisione 20/12/99