|
||
Pagina precedente ![]() |
![]() Home Page |
Pagina seguente |
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 ++++
![]() |
|
|
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
|