已经解决,部分程序贴出来
//取主轴修调开关值
L IB 0
L B#16#F0
AW
SRW 4
T MB 20
L MB 20
JL list
JU lis0
JU lis1
JU lis2
JU lis3
JU lis4
JU lis5
JU lis6
JU lis7
JU lis8
JU lis9
JU li10
JU li11
JU li12
JU li13
JU li14
JU li15
list: L 5.000000e-001
JU end
lis0: L 5.000000e-001
JU end
lis1: L 5.000000e-001
JU end
lis2: L 6.000000e-001
JU end
lis3: L 5.500000e-001
JU end
lis4: L 8.000000e-001
JU end
lis5: L 7.500000e-001
JU end
lis6: L 6.500000e-001
JU end
lis7: L 7.000000e-001
JU end
lis8: L 1.200000e+000
JU end
lis9: L 1.200000e+000
JU end
li10: L 1.050000e+000
JU end
li11: L 1.100000e+000
JU end
li12: L 8.500000e-001
JU end
li13: L 9.000000e-001
JU end
li14: L 1.000000e+000
JU end
li15: L 9.500000e-001
JU end
end: T MD 30
//*****************auto s value****************计算S值
//initial s vale
AN M 10.5 //m02,m03有效
AN #spm5 //m5信号
JC xx2
L 0
T #spindle_spd //主轴速度
xx2: NOP 1
//calculate motor speed
L #spindle_spd // //主轴速度
L #spgear //主轴的传动比,浮点型临时变量
*R
T MD 112
L MD 112
L #nrate_motor //电机额定转速
>R
JC xx1
L MD 112
xx1: T #motor_spd //电机转速
//scale speed
L 1.000000e+001
L #nrate_motor
/R
T #scale_spd //计算出每V对的电机转速
//calculate motor set speed
L #scale_spd
L #motor_spd
*R
L MD 30
*R
T #motor_setspd
AN M 110.3
JC *2
L -1.000000e+000
*R
*2: T MD 34
//***************２nd ***********************
L MD 40
AN M 110.3
JC *3
L -1.000000e+000
*R
*3: T MD 44
//****************2nd end********************
L MD 44 //jog speed set value
A DB20.DBX 60.1
A M 122.2
JC *5
L MD 34 //auto s
*5: T MD 52
//set ao
CALL FC 106
IN :=MD52
HI_LIM :=1.000000e+001
LO_LIM :=-1.000000e+001
BIPOLAR:=TRUE
RET_VAL:=MW24
OUT :=PQW256