Projet ER

1
Projet ER

• Commande dune fraiseuse numérique

2
Sommaire

• Présentation
• La fraiseuse
• Les moteurs
• Le processus complet
• Partie informatique
• Etude des exemples trouvés
• Création dun programme simple
• Création du programme CNC_1
• Création du Firmware CNC1
• Réalisation dun tutoriel
• Partie électronique
• Prototype et version finale de la partie
  puissance
• Prototype et version finale de la partie commande
• Tests

3
I. Présentation1) Principes dune fraiseuse
numérique
4
I. Présentation2) Réalisations de particuliers
5
I. Présentation 3) La notre
6
I. Présentation 4) Quest ce quun moteur pas à
pas?
7
(No Transcript)
8

• I. Présentation 5) Processus complet

9
II. Partie informatique
10
II. Partie informatique 1) Norme ISO, G-CODE
Un rectangle de 10,16 centimètres x 5,08
centimètres N1X0Y0T01 N2X0Y2000 N3X4000Y2000 N4X4
000Y0 N5X0Y0 N6M00 Ligne 1 (N1) dit à la machine
d'aller au point X0Y0 et de saisir l'outil 1
Ligne 2 dit à la machine d'aller au point
X0Y2.000 Ligne 3 dit à la machine d'aller au
point X4.000Y2.000 Ligne 4 dit à la machine
d'aller au point X4.000Y0 Ligne 5 retourne vers
l'origine machine Ligne 6 arrête la machine
11
II. Partie informatique 2) Etude du bootloader
12
II. Partie informatique 3) Etude des exemples

• Exemple de Microchip
• Utilisation de MPLAB avec C18
• Utilisation dune bibliothèque, mpusbapi.dll
• Exemples sur internet
• Utilisation de CCS, C18, ASM
• Utilisation de C, Delphi, Visual Basic

13
II. Partie informatique 4) Programme de test
procedure TForm1.SetLedClick(Sender
TObject) var RecvLength DWORD send_buf
TByteBuffer receive_buf TByteBuffer begin
send_buf0 SET_LED // Command for set led
send_buf1 StrToInt(edit1.Text) //
Expected length of the DATA result (Except 2
bytes header). change it as needed RecvLength
1 // 1 Byte if (EnvoiReception(_at_send_buf,s
end_buf1,_at_receive_buf,RecvLength) 2) Then
if (receive_buf0 SET_LED) then
Memo1.lines.add('update led ok') Else
Memo1.lines.add('upper cerita is error!')
Else Memo1.lines.add('USB Operation
Failed') send_buf0 SOMME // Command for
set led send_buf1 StrToInt(edit2.Text)
// Expected length of the DATA result
(Except 2 bytes header). change it as needed
send_buf2 StrToInt(edit3.Text) //
Expected length of the DATA result (Except 2
bytes header). change it as needed RecvLength
2 // 2 Byte if (EnvoiReception(_at_send_buf,s
end_buf1,_at_receive_buf,RecvLength) 2) Then
if (receive_buf0 SOMME) then
begin Memo1.lines.add('somme ok')
label1.CaptionIntToStr(receive_buf1)
End Else Memo1.lines.add('upper
cerita is error!') Else
Memo1.lines.add('USB Operation Failed') end
14
II. Partie informatique 5) Programme CNC_1
procedure TCNC1.refresh(Sender TObject) var
RecvLength DWORD send_buf TByteBuffer
receive_buf TByteBuffer mode
byte begin mode 0 if(Mot1.Checked) then
mode mode 1 if(Mot2.checked) then mode
mode 2 if(Mot3.checked) then mode mode
4 if(sens1.itemssens1.ItemIndex'Droite')
then mode mode 8 if(sens2.itemssens2.Item
Index'Droite') then mode mode 16
if(sens3.itemssens3.ItemIndex'Droite') then
mode mode 32 FrequenceX.Caption'Frequen
ce X ' IntToStr(vitesse1.position(-27)
2941) ' Hz' FrequenceY.Caption'Frequence Y
' IntToStr(vitesse2.position(-27) 2941)
' Hz' FrequenceZ.Caption'Frequence Z '
IntToStr(vitesse3.position(-27) 2941) '
Hz' label4.captionIntToStr(mode)
if senderMARCHE then Begin init1
Memo1.lines.add('Marche OK') end if init1
then begin send_buf0 CHANGE
send_buf1 6 send_buf2
vitesse1.Position10 send_buf3
vitesse2.Position10 send_buf4
vitesse3.Position10 send_buf5 mode
RecvLength 2 if (EnvoiReception(_at_send_buf,
send_buf1,_at_receive_buf,RecvLength) ltgt 2) Then
Memo1.lines.add('USB Operation Failed')
end End
15
II. Partie informatique 6) Firmware CNC1
pragma interrupt Timer0 void Timer0(void) INT
CONbits.TMR0IF 0 if (periodeX gt
0) periodeX-- if (periodeX lt
2) periodeX periodeX_recu() clockX
!clockX if (periodeY gt 0) periodeY-- if
(periodeY lt 2) periodeY
periodeY_recu() clockY !clockY if
(periodeZ gt 0) periodeZ-- if (periodeZ lt
2) periodeZ periodeZ_recu() clockZ
!clockZ
void stop_mot(void) enableX 0 enableY
0 enableZ 0 INTCONbits.GIE 0 void
go_mot(void) if (PARAMbits.enable_motX) enableX
1 else enableX 0 if
(PARAMbits.enable_motY) enableY 1
else enableY 0 if (PARAMbits.enable_motZ)
enableZ 1 else enableZ
0 if (PARAMbits.sens_motX) sensX 1
else sensX 0 if (PARAMbits.sens_motY)
sensY 1 else sensY 0 if
(PARAMbits.sens_motZ) sensZ 1
else sensZ 0 INTCONbits.GIE 1
16
II. Partie informatique 7) Tutoriel
dutilisation USB

• Sommaire
• Objectif
• Norme USB
• PIC18F4550
• Pilote et Firmware USB de Microchip
• Bootloader
• Software PC
• Firmware PIC
• Exemple
• Conclusion

17

• III. Partie électronique

18
III. Partie électronique 1) Premier prototype de
la partie puissance
19
III. Partie électronique 2) Prototype 2
20
III. Partie électronique 3) Prototype 3 et
version finale
21
III. Partie électronique

• 4) Carte CNC v1
• 5) Carte CNC v2

22
III. Partie électronique 6) Schéma de la version
2
23
IV. Tests