Siemens SINUMERIK 840D sl Commissioning Manual page 632

Getting Started
2.2 Example
def var3 = (R2///,"1st axis $AA_IM[AX1]"/WR1//"$AA_IM[AX1]"/200,160,150/400,160,100)
def var4 = (R2///,"2nd axis $AA_IM[AX2]"/WR1//"$AA_IM[AX2]"/200,180,150/400,180,100)
def var5 = (R3///,"$P_UIFR G54 AX1"///"$P_UIFR[1,AX1,TR]"/200,200,150/400,200,100)
; Softkey definition in the dialog
HS1=("")
HS2=("")
HS3=("")
HS4=("")
HS5=("")
HS6=("")
HS7=("")
HS8=("")
VS1=("")
VS2=("")
VS3=("")
VS4=("")
VS5=("")
VS6=("")
VS7=("")
VS8=("Exit")
; Change method
change(var5)
; Function PI_START
pi_start("/NC,201,_N_SETUFR")
; End identifier change method
end_change
; press method
press(recall)
; Return to the calling mask
lm("screen form1")
; End identifier press method
end_press
; press method
PRESS(VS8)
; Exit the dialog to the standard application
exit
; End identifier press method
END_PRESS
; Dialog end identifier
//END
14
SINUMERIK Integrate Run MyScreens (BE2)
Programming Manual, 03/2013, 6FC5397-1DP40-3BA1