; ein größeres Beispiel zur Erzeugung eines Lochmusters ; Zur Einarbeitung gut geeignet ; Es wird ein 3 mal 3 Lochmuster mit Hilfe von Loops
; und Unterprogrammen erzeugt
zur Editoransicht
Display1 "Demo I-PCON" Display2 "Lochmuster" ;
Geschwindigkeit 800 ;Geschwindigkeit setzen
XSteps 100 ;Auflösung in x und y YSteps 100
Mdauer1 ;Rücksprungmarke Dauerbetrieb
WartestartE0 ;Warten auf Eingang 0
Vloop1 = 3 ;3 Reihen in Variable 1
Vloop2 = 3 ;3 Spalten in Variable 2
Vdy3 = 6 ; Abstand y
WX ;warten, dass x fertig wird
WY ;warten, dass y fertig wird
absX 0 absY 0 ;auf 0-Position fahren
LVloop1 ;Anzahl Loops aus Vloop1
LVloop2 ;Anzahl Loops aus Vloop2
JumpSub Msub10 ;Unterprogramm z.Bohren WY
DeltaY Vdy3 ;y relativ fahren, was in Variable 3 steht
Loop ;Loop 2 ende
JumpSub Msub10 ;wieder Bohren
Vdy3 = - Vdy3 ;Variable 3 umdrehen WX
DeltaX 10 ;x relativ fahren
JumpSub Msub10 ; wieder Bohren
Loop ;äußere Schleife fertig
Jump Mdauer1 ; das ganze von vorne
Msub10 ; Unterprogramm zum Bohren
SetbohranO1 ; Bohrer ein, s. LED 1
Z10 ; Achse z absolut 10
Z0 ; Achse z zurück
ResetbohrO1 ; Bohrer aus
RETURN ;Rücksprung ENDE
|