Hey guys
I have a 1st code that works properly and a 2nd code that somehow mess with the advanced pointer. Somehow in the 2nd code the VARJOB turns to 101 before the point is reached..
1st code:
Code
LOOP
SWITCH VARJOB
CASE 1
JOB1()
CASE 2
JOB2()
CASE 10
EXIT
ENDSWITCH
ENDLOOP
DEF JOB1()
DECL POS POSICAO01
DECL BOOL AGUARDARPOSICAO
POSICAO01.X=MYPOS01.X+79.68
POSICAO01.Y=MYPOS01.Y-5.37
POSICAO01.Z=MYPOS01.Z-2.5
POSICAO01.A=MYPOS01.A
POSICAO01.B=MYPOS01.B
POSICAO01.C=MYPOS01.C
WAIT FOR VARPERMISSION==1
PTP POSICAO01
$ADVANCE=0
VARJOB=101
END
(...)
Display More
2nd code
Code
LOOP
SWITCH VARTRABALHO
CASE 1
POINTSECURITY01()
JOB1()
CASE 2
POINTSECURITY01()
POINTSECURITY02()
JOB2()
CASE 10
EXIT
ENDSWITCH
ENDLOOP
DEF JOB1()
DECL POS POSICAO01
DECL BOOL AGUARDARPOSICAO
POSICAO01.X=MYPOS01.X+79.68
POSICAO01.Y=MYPOS01.Y-5.37
POSICAO01.Z=MYPOS01.Z-2.5
POSICAO01.A=MYPOS01.A
POSICAO01.B=MYPOS01.B
POSICAO01.C=MYPOS01.C
WAIT FOR VARPERMISSION==1
PTP POSICAO01
$ADVANCE=0
VARJOB=101
END
(...)
DEF POINTSECURITY01()
DECL POS POSICAOSEG01
POSICAOSEG01.X=MYPOS01.X+79.68
POSICAOSEG01.Y=MYPOS01.Y-5.37
POSICAOSEG01.Z=1200.0
POSICAOSEG01.A=MYPOS01.A
POSICAOSEG01.B=MYPOS01.B
POSICAOSEG01.C=MYPOS01.C
PTP POSICAOSEG01
END
DEF POINTSECURITY02()
DECL POS POSICAOSEG02
POSICAOSEG02.X=MYPOS02.X+79.68
POSICAOSEG02.Y=MYPOS02.Y-5.37
POSICAOSEG02.Z=1200.0
POSICAOSEG02.A=MYPOS02.A
POSICAOSEG02.B=MYPOS02.B
POSICAOSEG02.C=MYPOS02.C
PTP POSICAOSEG02
END
Display More
What am i doing wrong?