Điều khiển máy khoan mạch in CNC dùng động cơ bước - 11


REFERENCE XYZ; STOP .

{***************************************************** PB29

Erlauterung Zum PAL­Beispeilprogramm:E/ A_Erweiterungseinheit seite 24 uten byteweises lesen eines Port der E/A_Erweiterung

***********************************************************}

#AXIS XYZ;

#REFERENCE XYZ;

MOVE 50(3000), 50(3000), 30(3000),­20(3000);

MOVE ­40(3000), ­40(3000),­5(1000), 0(1000);

ON_PORT 65531, 128 = 10, 3;

Có thể bạn quan tâm!

Xem toàn bộ 97 trang tài liệu này.

ON_PORT 65531, 128 = 0, ­2;

ON_PORT 65531, 128 = 205, ­4;

Điều khiển máy khoan mạch in CNC dùng động cơ bước - 11

MOVE 60(6000), 60(6000), 30(3000), 0(3000); REFERENCE XYZ;

STOP .

{*******************************************************PB31 Anwendungsbeispiel: Programmwaheit Art.Nr.1783

Programm "Pb31" zur Interface_karte ubertragen subD_Buchse von der Interfacekaarte abziechen und Programmwaheinheit anschlieben

STAART_TASTER durcken und die tasten F1 bis F12 sind funktionsbereit

***********************************************************}

#AXIS XYZ;

#DEFINE ( ) (21);

#ELVE 4, 4, 4; ANFANG; REPEAT

ON_KEY 1, REFERENCE Z; ON_KEY 2, FAHREZ;

ON_KEY 3, FAHREZ;

ON_KEY 4, FAHREZXY;

ON_KEY 5, FAHREY;

ON_KEY 6, FAHREXY;

ON_KEY 7, FAHREX;

ON_KEY 8, REFERENCEZ;

ON_KEY 9, FAHREX;

ON_KEY 10, FAHREXY;

ON_KEY 11, FAHREY;

ON_KEY 12, FAHREXY;

UNTIL 0;

FAHREZ: MOVE 0( ), 0( ), ­1(2000), 0( ); GO TO ANFANG;

FAHREZ: MOVE 0( ), 0( ), 1(2000), 0( ); GO TO ANFANG;

FAHREXY: MOVE 10(2000 ), ­10(2000 ), 0( ), 0( ); GO TO ANFANG;

FAHREX: MOVE 10(2000 ), 0( ), 0( ), 0( ); GO TO ANFANG;

FAHREXY: MOVE 10(2000 ), 10(2000 ), 0( ), 0( ); GO TO ANFANG;

FAHREX: MOVE 0( ), ­10(2000 ), 0( ), 0( ); GO TO ANFANG; FAHREZ: REFERENCE XYZ; GO TO ANFANG;

FAHREY: MOVE 0( ), 10(2000 ), 0( ), 0( ); GO TO ANFANG;


FAHREXY: MOVE ­10(2000 ), ­10(2000 ), ­10(2000), 0( ), 0( ); GO TO ANFANG;

FAHREX: MOVE ­10(2000 ), 0( ), 0( ), 0( ); GO TO ANFANG;

FAHREXY: MOVE ­10(2000 ), 10(2000 ), 0( ), 0( ); GO TO ANFANG; END.

STOP.

{****************************************************** PB32 Anwendungsbeispiel: Interface­kart mit E/A_Erweiterungseinheit Programm zum Testen der E/A Einheit

Programm mit den Befehl "TRNFER" im window_menue zur Interfacekart ubertragen. Nach erfolgreicher ubertragung und compierung solten sie den Befehl "COMMUNICATION" im window_menu aufrufen. Nun betatigen sie die "START" Taste und in window wird "PORT = 0" angezeigt, ercheint die meldung "PORT = 1". Schalten sie nun auf alle Eingange nacheianander die Meldung "PORT = 1, 2, 3, 4, 5, 6, 7, 8" KOMMEN. Schalten sie nur Eingang 7 (bit 7) leuchten zunachst die LED'STOP am Ausgangsport I nacheinande auf, anschliebend am Ausgangsport II.

Dieser vorgang wiederholt sich nocheinmal

Schalten sie nur Eingang 8 (bit 8), leuchten zunachst die LED am Ausgangsport I nacheinander auf, verfahibewegung X_Achse und aufleuchten der LED'STOP am Ausgangsport II nacheiander

Dieser vorgang wiederholt sich noch eininol

***********************************************************}

#AXIS X;

#ELEV 2;

#DEFINE M MOVE 1(9000);

#DEFINE L MOVE ­1(9000)

#DEFINE INPUT ON_PORT 65531, 128 = ;

#DEFINE P1 SET_PORT 65529, 128 = ;

#DEFINE P SET_PORT 65530, 128 = ;

#DEFINE T TIME 3;

#DEFINE T1 TIME 2; START :

PULSE IN; TIME 5;

INPUT 0, A;

INPUT 1, B;

INPUT 3, C;

INPUT 7, D;

INPUT 15, E;

INPUT 31, F;

INPUT 63, G;

INPUT 127, H; INPUT 255, I ; INPUT 128, K;

INPUT 64, N;

A: SEND 80; SEND 79; SEND 82; SEND 61; SEND 48; SEND 13; GOTO START ;

B: SEND 80; SEND 79; SEND 82; SEND 61; SEND 49; SEND 13; GOTO START ;


C: SEND 80; SEND 79; SEND 82; SEND 61; SEND 49; SEND 44; SEND 50; SEND 13; GOTO START ;

D: SEND 80; SEND 79; SEND 82; SEND 61; SEND 49; SEND 44; SEND 50; SEND

44; SEND 51; SEND 13; GOTO START ;

E: SEND 80; SEND 79; SEND 82; SEND 84; SEND 61; SEND 49; SEND 44; SEND

50; SEND 44; SEND 51; SEND 44; SEND 52; SEND 13; GOTO START ;

F: SEND 80; SEND 79; SEND 82; SEND 84; SEND 61; SEND 49; SEND 44; SEND

50; SEND 44; SEND 51; SEND 44; SEND 52; SEND 44; SEND 53; SEND 13; GOTO START ;

G: SEND 80; SEND 79; SEND 82; SEND 84; SEND 61; SEND 49; SEND 44; SEND

50; SEND 44; SEND 51; SEND 44; SEND 52; SEND 44; SEND 54; SEND 13; GOTO START ;

H: SEND 80; SEND 79; SEND 82; SEND 84; SEND 61; SEND 49; SEND 44; SEND

50; SEND 44; SEND 51; SEND 44; SEND 52; SEND 44; SEND 53; SEND 44;

SEND 54; SEND 44; SEND 55; SEND 13; GOTO START ;

I: SEND 80; SEND 79; SEND 82; SEND 84; SEND 61; SEND 49; SEND 44; SEND

50; SEND 44; SEND 51; SEND 44; SEND 52; SEND 44; SEND 53; SEND 44;

SEND 54; SEND 44; SEND 55; SEND 44; SEND 56; SEND 13; GOTO START ;

K: SEND 80; SEND 79; SEND 82; SEND 84; SEND 61; SEND 56; SEND 13; GOTO START ;

REFERENCE X; REPEAT

P1 1; T;

P1 2; T;

P1 4; T;

P1 8; T;

P1 16; T;

P1 32; T;

P1 64; T;

P1 128; T;

P1 0; T;

P 1; M; T1;

P 2; L; T1;

P 4; M; T1;

P 8; L; T1;

P 16; M; T1;

P 32; L; T1;

P 64; M; T1; P 128;L ; T1; P 0; T1;

UNTIL 2; GOTO START ;

N: SEND 80; SEND 79; SEND 82; SEND 84; SEND 61; SEND 55; SEND 13; REPEAT

P1 1; T;

P1 3; T;

P1 7; T;

P1 15; T;



STOP .

P1 31; T;

P1 63; T;

P1 127; T;

P1 255; T;

P1 127; T;

P1 63; T;

P1 31; T;

P1 15; T;

P1 7; T;

P1 3; T;

P1 1; T;

P1 0; T;

P1 1; T;

P1 3; T;

P1 7; T;

P1 15; T;

P1 31; T;

P1 63; T;

P1 127; T;

P1 255; T;

P1 127; T;

P1 63; T;

P1 31; T;

P1 15; T;

P1 7; T;

P1 3; T;

P1 1; T;

P1 0; T;

P1 15; T;

UNTIL 2; GOTO START ;

{****************************************************** PB33

Erlauterung Zum PAL­Beispeilprogramm: Interface­Manual 4.0 zursatzblatt 30_Interpolation und kreisiterprolation

**********************************************************}

#AXIS XYZ;

#REFERENCE XYZ;

MOVE 50(1000), 50(1000), 10(1000), 0(1000);

DELAY 50; SET3D ON;

MOVE 50(1000), 50(1000), 50(1000), 0(1000); SET3D OFF;

DELAY 50;

MOVE ­80(3000), ­80(3000), ­50(3000), 0(3000); REFERENCE XYZ;

STOP . START ;


{****************************************************** PB34

Erlauterung Zum PAL­Beispeilprogramm: PAL_PC Manual seite 91 unten kreis rechtsdrehend

**********************************************************}

#AXIS XYZ;

#REFERENCE XYZ;

MOVE 50(3000), 50(3000), 50(3000), 0(3000);

ARC_R 10(100), 0, 360, 5; REFERENCE XYZ;

STOP .

#START ;


{********************************************************PB35

Erlauterung Zum PAL­Beispeilprogramm: PAL_PC Manual seite 92 unten kreis rechtsdrehend

***********************************************************}

#AXIS XYZ;

#REFERENCE XYZ;

MOVE 50(3000), 50(3000), 50(3000), 0(3000);

ARC_L 6(5000), 180, 270, 3; REFERENCE XYZ;

STOP .

#START ;

{****************************************************** PB36

Erlauterung Zum PAL­Beispeilprogramm: Interface­Manual 4.0 zursatzblatt 30_Interpolation und kreisiterprolation kreis rechtsdrehend; mit knostanter Bahngeschwindigkeut

**********************************************************}

#AXIS XYZ;

#REFERENCE XYZ;

MOVE 50(3000), 50(3000), 50(3000), 0(3000); LINE YZ;

CIRCLE_CW 10(1000), 720, 360; REFERENCE XYZ;

STOP .

#START ;


{****************************************************** PB37

Erlauterung Zum PAL­Beispeilprogramm: Interface­Manual 4.0 zursatzblatt 30_Interpolation und kreisiterprolation kreis rechtsdrehend; mit knostanter Bahngeschwindigkeut

***********************************************************}

#AXIS XYZ;

#REFERENCE XYZ;


MOVE 50(3000), 50(3000), 50(3000), 0(3000);

CIRCLE_CCW 10(1000), 0, 360; REFERENCE XYZ;

STOP . START ;

..... Xem trang tiếp theo?
⇦ Trang trước - Trang tiếp theo ⇨

Ngày đăng: 28/04/2022