HEIDENHAIN TNC 335 Technical Manual - Manual (Page 244)

8/95
TNC 360 8 Key Simulation 4-147
1131 L K109 ;Key code for X
1132 = W102
1133 CM 136 ;Simulate key
1134 EM
1135 LBL 132 ;"Position transfer"
1136 L K100 ;Key code for "Position transfer"
1137 = W102
1138 CM 136 ;Simulate key
1139 EM
1140 LBL 133 ;Y
1141 L K108 ;Key code for Y
1142 = W 102
1143 CM 136 ;Simulate key
1144 EM
1145 LBL 134 ;Z
1146 L K107 ;Key code for Z
1147 = W102
1148 CM 136 ;Simulate key
1149 EM
1150 LBL 135 ;"END BLOCK"
1151 L K119 ;Key code for "END BLOCK"
1152 = W102
1153 CM 136 ;Simulate key
1154 EM
1155 LBL 136 ;Key simulation
1156 L M2813 ;Strobe key transfer from W516
1157 JPT 137 ;Still set, then wait
1158 L B200 ;Case byte
1159 + K+1
1160 = B200 ;Increment case byte
1161 L W102 ;Buffered key code
1162 = W516 ;To NC
1163 LN M2813
1164 S M2813 ;Set strobe (activate simulation)
1165 EM
1166 LBL 137 ;Return marker
1167 EM
1168 LBL 141 ;End key simulation
1169 L M2813 ;Simulation performed?
1170 JPT 137 ;No, then wait
1171 L K+0
1172 = B200 ;Reset step counter
1173 L M10
1174 R M10 ;Reset marker "Key simulation active"
1175 R M2182 ;Reset marker "Disabled key operated"
1176 EM