0 BEGIN PGM 9010_DE MM 1 ; Gravieren Gross- & Kleinbuchstaben auf Kreis oder Geraden ab TNC 155 B/Q 2 BLK FORM 0.1 Z X+0 Y+0 Z-8 3 BLK FORM 0.2 X+100 Y+90 Z+0 4 ; 5 ;Schnittdaten 6 FN 0: Q2 =+1 ; MASSFAKTOR WIRKUNG 7 ; Q2=INHALT VON MP 213/7410 8 ; 0 ENTSPR.: WIRKT AUF 3 ACHSEN 9 ; 1 ENTSPR.: WIRKT AUF 2 ACHSEN 10 FN 0: Q4 =-1 ; FRAESTIEFE 11 FN 0: Q6 =+1000 ; VORSCHUB FRAESEN 12 FN 0: Q7 =+500 ; VORSCHUB TIEFENZUSTELLUNG 13 FN 0: Q8 =+5 ; SICHERHEITSABSTAND 14 ; 15 ; 16 ;Werkzeugaufruf Gravierwerkzeug 17 TOOL CALL 200 Z S8000 18 L Z+20 R0 F9998 M3 19 ;================================== 20 ; 21 ;Eingabeparameter Text auf Kreis 22 FN 0: Q5 =+10 ; SCHRIFTHOEHE 23 FN 0: Q11 =+50 ; X-KREISMITTE 24 FN 0: Q12 =+45 ; Y-KREISMITTE 25 FN 0: Q16 =+25 ; RADIUS 26 FN 0: Q17 =+115 ; START-WINKEL 27 FN 0: Q14 =-3 ; ADDITIVER-WINKELSCHRITT 28 ; 29 ;Texteingabe Beginn 30 ;Beispieltext "TNC" 31 ;Buchstabenzuordnung siehe PDF 32 ; 33 FN 0: Q1 =+84 ; T 34 CALL LBL 1 35 FN 0: Q1 =+78 ; N 36 CALL LBL 1 37 FN 0: Q1 =+67 ; C 38 CALL LBL 1 39 ; 40 ;Texteingabe Ende 41 ;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 42 ; 43 ;Ruecksetzen von Parametern 44 FN 0: Q16 =+0 ; RADIUS 45 FN 0: Q14 =+0 ; ADDITIVER WINKEL 46 FN 0: Q29 =+0 ; ROTATION 47 ;================================== 48 ; 49 ;================================== 50 ;Eingabeparameter Text auf Gerade 51 FN 0: Q5 =+7 ; SCHRIFTHOEHE 52 FN 0: Q21 =+42.5 ; X STARTPUNKT 53 FN 0: Q22 =+16 ; Y STARTPUNKT 54 FN 0: Q24 =+0 ; ADDITIVER SCHRITT IN X 55 ; 56 ;Texteingabe Beginn 57 ;Beispieltext "Text" 58 ;Buchstabenzuordnung siehe PDF 59 ; 60 FN 0: Q1 =+84 ; T 61 CALL LBL 1 62 FN 0: Q1 =+101 ; e 63 CALL LBL 1 64 FN 0: Q1 =+120 ; x 65 CALL LBL 1 66 FN 0: Q1 =+116 ; t 67 CALL LBL 1 68 ; 69 ;Texteingabe Ende 70 ;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 71 ;================================== 72 ;Programmende 73 L Z+22 R0 F9999 M2 74 ; 75 * - Unterprogramme 76 LBL 1 77 FN 0: Q9 =+Q4 78 FN 9: IF +Q2 EQU +1 GOTO LBL 4 79 FN 4: Q9 =+Q4 DIV +Q5 80 LBL 4 81 FN 9: IF +Q16 EQU +0 GOTO LBL 6 82 FN 2: Q29 =+Q17 - +90 83 FN 11: IF +Q17 GT +0 GOTO LBL 5 84 FN 1: Q29 =+Q17 + +90 85 LBL 5 86 FN 7: Q21 = COS +Q17 87 FN 3: Q21 =+Q21 * +Q16 88 FN 1: Q21 =+Q21 + +Q11 89 FN 6: Q22 = SIN +Q17 90 FN 3: Q22 =+Q22 * +Q16 91 FN 1: Q22 =+Q22 + +Q12 92 LBL 6 93 CYCL DEF 7.0 NULLPUNKT 94 CYCL DEF 7.1 X+Q21 95 CYCL DEF 7.2 Y+Q22 96 FN 4: Q20 =+Q5 DIV +10 97 CYCL DEF 11.0 MASSFAKTOR 98 CYCL DEF 11.1 SCL Q20 99 CYCL DEF 10.0 DREHUNG 100 CYCL DEF 10.1 ROT+Q29 101 FN 10: IF +Q1 NE +0 GOTO LBL Q1 102 FN 9: IF +Q1 EQU +0 GOTO LBL 9 103 LBL 32 ; BLK 104 FN 1: Q33 =+Q108 + +6 105 FN 9: IF +9 EQU +9 GOTO LBL 9 106 LBL 45 ; - 107 L X-2 Y+5 R0 F9998 108 L Z+Q9 R0 FQ7 109 L X+2 R0 FQ6 110 FN 1: Q33 =+Q108 + +5.5 111 FN 9: IF +9 EQU +9 GOTO LBL 9 112 LBL 46 ; . 113 CC X-1.5 Y+1 114 LP PR+0.5 PA+0 R0 F9998 115 L Z+Q9 R0 FQ7 116 CP PA+0 DR- R0 FQ6 117 FN 1: Q33 =+Q108 + +4.5 118 FN 9: IF +9 EQU +9 GOTO LBL 9 119 LBL 47 ; / 120 L X-2.5 Y+1 R0 F9998 121 L Z+Q9 R0 FQ7 122 L X+2.5 Y+10 R0 FQ6 123 FN 1: Q33 =+Q108 + +6.5 124 FN 9: IF +9 EQU +9 GOTO LBL 9 125 LBL 48 ; 0 126 L X-2.639 Y+2.639 R0 FMAX 127 L Z+Q9 R0 FQ7 128 CC X+0 Y+2.639 129 CP PA+0 DR+ 130 L Y+7.361 R0 FQ6 131 CC X+0 Y+7.361 132 CP PA+180 DR+ 133 L Y+2.639 134 FN 1: Q33 =+Q108 + +6.5 135 FN 9: IF +9 EQU +9 GOTO LBL 9 136 LBL 49 ; 1 137 L X-2.111 Y+7.778 R0 F9998 138 L Z+Q9 R0 FQ7 139 L X+0.111 Y+10 R0 FQ6 140 L Y+0 141 FN 1: Q33 =+Q108 + +6.3 142 FN 9: IF +9 EQU +9 GOTO LBL 9 143 LBL 50 ; 2 144 L X-2.404 Y+8.147 R0 FMAX 145 L Z+Q9 R0 FQ7 146 CC X+0.012 Y+7.5 147 C X+2.007 Y+5.996 DR- R0 FQ6 148 L X-2.511 Y+0 149 L X+2.489 150 FN 1: Q33 =+Q108 + +7.9 151 FN 9: IF +9 EQU +9 GOTO LBL 9 152 LBL 51 ; 3 153 L X-2.455 Y+8.147 R0 FMAX 154 CC X-0.041 Y+7.5 155 L Z+Q9 R0 FQ7 156 C X+0.515 Y+5.063 DR- R0 FQ6 157 L Y+4.938 158 CC X-0.041 Y+2.5 159 C X-2.455 Y+1.853 DR- 160 FN 1: Q33 =+Q108 + +8.3 161 FN 9: IF +9 EQU +9 GOTO LBL 9 162 LBL 52 ; 4 163 L X+0.972 Y+10 R0 FMAX 164 L Z+Q9 R0 FQ7 165 L X-2.361 Y+1.953 R0 FQ6 166 L Y+1.111 167 L X+2.361 168 L Z+Q8 R0 FMAX 169 L X+0.972 Y+4.444 R0 FMAX 170 L Z+Q9 R0 FQ7 171 L Y+0 R0 FQ6 172 FN 1: Q33 =+Q108 + +8.3 173 FN 9: IF +9 EQU +9 GOTO LBL 9 174 LBL 53 ; 5 175 CC X-0.043 Y+2.5 176 L X-2.457 Y+1.853 R0 FMAX 177 L Z+Q9 R0 FQ7 178 CP PA+0 DR+ R0 FQ6 179 L Y+4.167 180 CC X-0.043 Y+4.167 181 C X-2.457 Y+4.814 DR+ 182 L Y+10 183 L X+2.457 184 FN 1: Q33 =+Q108 + +8.3 185 FN 9: IF +9 EQU +9 GOTO LBL 9 186 LBL 54 ; 6 187 CC X+0 Y+4.167 188 L X-2.5 Y+4.167 R0 FMAX 189 L Z+Q9 R0 FQ7 190 CP PA+0 DR- R0 FQ6 191 L Y+2.5 192 CC X+0 Y+2.5 193 CP PA+180 DR- 194 L Y+7.5 195 CC X+0 Y+7.5 196 C X+2.415 Y+8.147 DR- 197 FN 1: Q33 =+Q108 + +8.3 198 FN 9: IF +9 EQU +9 GOTO LBL 9 199 LBL 55 ; 7 200 L X-2.222 Y+8.889 R0 FMAX 201 L Z+Q9 R0 FQ7 202 L Y+10 R0 FQ6 203 L X+2.222 204 L Y+9.113 205 L X-2.222 Y+0 206 FN 1: Q33 =+Q108 + +7.5 207 FN 9: IF +9 EQU +9 GOTO LBL 9 208 LBL 56 ; 8 209 CC X+0 Y+7.5 210 L X-0.006 Y+5 R0 FMAX 211 L Z+Q9 R0 FQ7 212 CP PA+270 DR- 213 CC X+0 Y+2.5 214 CP PA+90 DR- 215 FN 1: Q33 =+Q108 + +8.3 216 FN 9: IF +9 EQU +9 GOTO LBL 9 217 LBL 57 ; 9 218 L X-2.415 Y+1.853 R0 FMAX 219 L Z+Q9 R0 FQ7 220 CC X+0 Y+2.5 221 CP PA+0 DR+ R0 FQ6 222 L Y+7.5 223 CC X+0 Y+7.5 224 CP PA+180 DR+ 225 L Y+5.833 226 CC X+0 Y+5.833 227 CP PA+0 DR+ 228 FN 1: Q33 =+Q108 + +8.3 229 FN 9: IF +9 EQU +9 GOTO LBL 9 230 LBL 58 ; : 231 L X+0 Y+2.5 R0 FMAX 232 L Z+Q9 R0 FQ7 233 L Z+Q8 R0 FMAX 234 L Y+7.5 R0 FMAX 235 L Z+Q9 R0 FQ7 236 FN 1: Q33 =+Q108 + +8.3 237 FN 9: IF +9 EQU +9 GOTO LBL 9 238 LBL 65 ; A (GROSS) 239 L X-3.639 Y+0 R0 FMAX 240 L Z+Q9 R0 FQ7 241 L X+0 Y+10 R0 FQ6 242 L X+3.639 Y+0 243 L X+2.426 Y+3.333 244 L X-2.426 245 FN 1: Q33 =+Q108 + +9.5 246 FN 9: IF +9 EQU +9 GOTO LBL 9 247 LBL 66 ; B 248 L X-3.056 Y+5 R0 FMAX 249 L Z+Q9 R0 FQ7 250 L X+0.556 R0 FQ6 251 CC X+0.556 Y+7.5 252 CP PA+90 DR+ 253 L X-3.056 254 L Y+0 255 L X+0.556 256 CC X+0.556 Y+2.5 257 CP PA+90 DR+ 258 FN 1: Q33 =+Q108 + +9.5 259 FN 9: IF +9 EQU +9 GOTO LBL 9 260 LBL 67 ; C 261 CC X+0.057 Y+6.667 262 L X+3.276 Y+7.529 R0 FMAX 263 L Z+Q9 R0 FQ7 264 CP PA+180 DR+ R0 FQ6 265 L Y+3.333 266 CC X+0.057 Y+3.333 267 C X+3.276 Y+2.471 DR+ 268 FN 1: Q33 =+Q108 + +9.6 269 FN 9: IF +9 EQU +9 GOTO LBL 9 270 LBL 68 ; D 271 L X-3.055 Y+10 R0 FMAX 272 L Z+Q9 R0 FQ7 273 L Y+0 R0 FQ6 274 L X-0.278 275 CC X-0.278 Y+3.333 276 CP PA+0 DR+ 277 L Y+6.667 278 CC X-0.278 Y+6.667 279 CP PA+90 DR+ 280 L X-3.056 281 FN 1: Q33 =+Q108 + +9.5 282 FN 9: IF +9 EQU +9 GOTO LBL 9 283 LBL 69 ; E 284 L X+3.056 Y+10 R0 FMAX 285 L Z+Q9 R0 FQ7 286 L X-3.056 R0 FQ6 287 L Y+0 288 L X+3.056 289 L Z+Q8 R0 FMAX 290 L X+0.833 Y+5 R0 FMAX 291 L Z+Q9 R0 FQ7 292 L X-3.056 R0 FQ6 293 FN 1: Q33 =+Q108 + +8.8 294 FN 9: IF +9 EQU +9 GOTO LBL 9 295 LBL 70 ; F 296 L X+3.056 Y+10 R0 FMAX 297 L Z+Q9 R0 FQ7 298 L X-3.056 FQ6 299 L Y+0 300 L Y+5 301 L X+0.833 302 FN 1: Q33 =+Q108 + +9.5 303 FN 9: IF +9 EQU +9 GOTO LBL 9 304 LBL 71 ; G 305 CC X+0 Y+6.389 306 L X+3.393 Y+7.624 R0 FMAX 307 L Z+Q9 R0 FQ7 308 CP PA+180 DR+ FQ6 309 L Y+3.611 310 CC X+0 Y+3.611 311 CP PA+0 DR+ 312 L Y+4.444 313 L X+0.833 314 FN 1: Q33 =+Q108 + +10.3 315 FN 9: IF +9 EQU +9 GOTO LBL 9 316 LBL 72 ; H 317 L X-3.333 Y+10 R0 FMAX 318 L Z+Q9 R0 FQ7 319 L Y+0 FQ6 320 L Y+5 321 L X+3.333 322 L Y+10 323 L Y+0 324 FN 1: Q33 =+Q108 + +8.8 325 FN 9: IF +9 EQU +9 GOTO LBL 9 326 LBL 73 ; I 327 L X-2.5 Y+0 R0 F9998 328 L Z+Q9 R0 FQ7 329 L Y+10 R0 FQ6 330 FN 1: Q33 =+Q108 + +5 331 FN 9: IF +9 EQU +9 GOTO LBL 9 332 LBL 74 ; J 333 L X-2.731 Y+2.058 R0 FMAX 334 L Z+Q9 R0 FQ7 335 CC X-0.047 Y+2.778 336 CP PA+0 DR+ FQ6 337 L Y+10 338 FN 1: Q33 =+Q108 + +8.3 339 FN 9: IF +9 EQU +9 GOTO LBL 9 340 LBL 75 ; K 341 L X-3.056 Y+10 R0 FMAX 342 L Z+Q9 R0 FQ7 343 L Y+0 R0 FQ6 344 L Y+2.778 345 L X+3.056 Y+10 346 L Z+Q8 R0 FMAX 347 L Y+0 R0 FMAX 348 L Z+Q9 R0 FQ7 349 L X-0.853 Y+5.381 350 FN 1: Q33 =+Q108 + +9.5 351 FN 9: IF +9 EQU +9 GOTO LBL 9 352 LBL 76 ; L 353 L X-3.056 Y+10 R0 FMAX 354 L Z+Q9 R0 FQ7 355 L Y+0 R0 FQ6 356 L X+2.8 357 FN 1: Q33 =+Q108 + +7.5 358 FN 9: IF +9 EQU +9 GOTO LBL 9 359 LBL 77 ; M 360 L X-3.611 Y+0 R0 F9998 361 L Z+Q9 R0 FQ7 362 L Y+10 R0 FQ6 363 L X+0 Y+3.333 364 L X+3.611 Y+10 365 L Y+0 366 FN 1: Q33 =+Q108 + +10.3 367 FN 9: IF +9 EQU +9 GOTO LBL 9 368 LBL 78 ; N 369 L X-3.056 Y+0 R0 F9998 370 L Z+Q9 R0 FQ7 371 L Y+10 R0 FQ6 372 L X+3.056 Y+0 373 L Y+10 374 FN 1: Q33 =+Q108 + +9.5 375 FN 9: IF +9 EQU +9 GOTO LBL 9 376 LBL 79 ; O 377 L X-3.056 Y+3.056 R0 FMAX 378 L Z+Q9 R0 FQ7 379 CC X+0 Y+3.056 380 CP PA+0 DR+ FQ6 381 L Y+6.944 382 CC X+0 Y+6.944 383 CP PA+180 DR+ 384 L Y+3.056 385 FN 1: Q33 =+Q108 + +10.3 386 FN 9: IF +9 EQU +9 GOTO LBL 9 387 LBL 80 ; P 388 L X-3.056 Y+0 R0 FMAX 389 L Z+Q9 R0 FQ7 390 L Y+10 R0 FQ6 391 L X+0.486 392 CC X+0.486 Y+7.431 393 CP PA+270 DR- 394 L X-3.056 395 FN 1: Q33 =+Q108 + +9 396 FN 9: IF +9 EQU +9 GOTO LBL 9 397 LBL 81 ; Q 398 CC X+0 Y+3.056 399 L X-3.056 Y+3.056 400 L Z+Q9 R0 FQ7 401 CP PA+0 DR+ FQ6 402 L Y+6.944 403 CC X+0 Y+6.944 404 CP PA+180 DR+ 405 L Y+3.056 406 L Z+Q8 R0 FMAX 407 L X+1.087 Y+1.968 R0 FMAX 408 L Z+Q9 R0 FQ7 409 L X+3.056 Y+0 R0 FQ6 410 FN 1: Q33 =+Q108 + +10.3 411 FN 9: IF +9 EQU +9 GOTO LBL 9 412 LBL 82 ; R 413 L X-3.056 Y+0 R0 F9998 414 L Z+Q9 R0 FQ7 415 L Y+10 R0 FQ6 416 L X+0.486 417 CC X+0.486 Y+7.431 418 CP PA+270 DR- 419 L X-3.056 420 L X+0.486 421 L X+2.857 Y+0 422 FN 1: Q33 =+Q108 + +9.5 423 FN 9: IF +9 EQU +9 GOTO LBL 9 424 LBL 83 ; S 425 L X-3.143 Y+1.302 R0 FMAX 426 L Z+Q9 R0 FQ7 427 CC X+0 Y+4.444 428 C X+2.232 Y+0.601 DR+ FQ6 429 CC X+1.151 Y+2.463 430 C X+1.708 Y+4.542 DR+ 431 L X-1.708 Y+5.458 432 CC X-1.151 Y+7.537 433 C X-2.232 Y+9.398 DR- 434 CC X+0 Y+5.556 435 C X+3.143 Y+8.698 DR- 436 FN 1: Q33 =+Q108 + +9.1 437 FN 9: IF +9 EQU +9 GOTO LBL 9 438 LBL 84 ; T 439 L X-3.056 Y+10 R0 F9998 440 L Z+Q9 R0 FQ7 441 L X+3.056 R0 FQ6 442 L X+0 443 L Y+0 444 FN 1: Q33 =+Q108 + +9.1 445 FN 9: IF +9 EQU +9 GOTO LBL 9 446 LBL 85 ; U 447 L X-3.611 Y+10 R0 F9998 448 L Z+Q9 R0 FQ7 449 L Y+3.611 450 CC X+0 Y+3.611 451 CP PA+0 DR+ 452 L Y+10 453 FN 1: Q33 =+Q108 + +9.5 454 FN 9: IF +9 EQU +9 GOTO LBL 9 455 LBL 86 ; V 456 L X-3.443 Y+10 R0 F9998 457 L Z+Q9 R0 FQ7 458 L X+0 Y+0 R0 FQ6 459 L X+3.443 Y+10 460 FN 1: Q33 =+Q108 + +9.5 461 FN 9: IF +9 EQU +9 GOTO LBL 9 462 LBL 87 ; W 463 L X-4.986 Y+10 R0 F9998 464 L Z+Q9 R0 FQ7 465 L X-2.493 Y+0 R0 FQ6 466 L X+0 Y+10 467 L X+2.493 Y+0 468 L X+4.986 Y+10 469 FN 1: Q33 =+Q108 + +10.4 470 FN 9: IF +9 EQU +9 GOTO LBL 9 471 LBL 88 ; X 472 L X-3.124 Y+10 R0 F9998 473 L Z+Q9 R0 FQ7 474 L X+3.124 Y+0 R0 FQ6 475 L Z+Q8 R0 FMAX 476 L X+3.124 Y+10 R0 FMAX 477 L Z+Q9 R0 FQ7 478 L X-3.124 Y+0 FQ6 479 FN 1: Q33 =+Q108 + +8.3 480 FN 9: IF +9 EQU +9 GOTO LBL 9 481 LBL 89 ; Y 482 L X-3.124 Y+10 R0 F9998 483 L Z+Q9 R0 FQ7 484 L X+0 Y+5 R0 FQ6 485 L X+0 Y+0 486 L Z+Q8 R0 FMAX 487 L Y+5 R0 FMAX 488 L Z+Q9 R0 FQ7 489 L X+3.124 Y+10 FQ6 490 FN 1: Q33 =+Q108 + +8.3 491 FN 9: IF +9 EQU +9 GOTO LBL 9 492 LBL 90 ; Z 493 L X-3.611 Y+10 R0 F9998 494 L Z+Q9 R0 FQ7 495 L X+3.611 R0 FQ6 496 L X-3.611 Y+0 497 L X+3.611 498 FN 1: Q33 =+Q108 + +9.5 499 FN 9: IF +9 EQU +9 GOTO LBL 9 500 LBL 97 ; AA 501 L X+2.569 Y+0 R0 F9999 502 Z+Q9 R0 FQ7 503 L Y+6.666 504 L Y+4.097 505 CC X+0 Y+4.097 506 C X-2.569 Y+4.097 DR+ 507 L Y+2.569 508 CC X+0 Y+2.569 509 C X+2.569 Y+2.569 DR+ 510 FN 1: Q33 =+Q108 + +8.3 511 FN 9: IF +9 EQU +9 GOTO LBL 9 512 LBL 98 ; BB 513 L X-2.569 Y+10 R0 FMAX 514 L Z+Q9 R0 FQ7 515 L Y+0 R0 FQ6 516 L Y+2.569 517 CC X+0 Y+2.569 518 CP PA+0 DR+ 519 L Y+4.097 520 CC X+0 Y+4.097 521 CP PA+180 DR+ 522 FN 1: Q33 =+Q108 + +7 523 FN 9: IF +9 EQU +9 GOTO LBL 9 524 LBL 99 ; CC 525 L X+2.397 Y+1.285 R0 FMAX 526 L Z+Q9 R0 FQ7 527 CC X+0.172 Y+2.569 528 CP PA+180 DR- R0 FQ6 529 L Y+4.097 530 CC X+0.172 Y+4.097 531 CR X+2.397 Y+5.382 R+2.5 DR- 532 FN 1: Q33 =+Q108 + +7 533 FN 9: IF +9 EQU +9 GOTO LBL 9 534 LBL 100 ; DD 535 L X+2.569 Y+10 R0 FMAX 536 L Z+Q9 R0 FQ7 537 L Y+0 R0 FQ6 538 L Y+2.569 539 CC X+0 Y+2.569 540 CP PA+180 DR- 541 L Y+4.097 542 CC X+0 Y+4.097 543 CP PA+0 DR- 544 FN 1: Q33 =+Q108 + +7 545 FN 9: IF +9 EQU +9 GOTO LBL 9 546 LBL 101 ; EE 547 CC X+0 Y+2.569 548 L X+2.105 Y+1.096 R0 F9999 549 L Z+Q9 R0 FQ7 550 C X-2.569 Y+2.569 DR- FQ6 551 L X-2.569 Y+4.097 552 CC X+0 Y+4.097 553 C X+2.569 Y+4.097 DR- 554 L Y+3.403 555 L X-2.569 556 FN 1: Q33 =+Q108 + +7 557 FN 9: IF +9 EQU +9 GOTO LBL 9 558 LBL 102 ; FF 559 L X-1.25 Y+6.667 R0 FMAX 560 L Z+Q9 R0 FQ7 561 L X+1.25 562 L Z+Q8 R0 FMAX 563 L X+1.667 Y+10 R0 FMAX 564 L Z+Q9 R0 FQ7 565 CC X+1.667 Y+8.333 566 CP PA+180 DR+ R0 FQ6 567 L X+0 Y+0 568 FN 1: Q33 =+Q108 + +6.8 569 FN 9: IF +9 EQU +9 GOTO LBL 9 570 LBL 103 ; GG 571 L X-2.105 Y-2.238 R0 FMAX 572 L Z+Q9 R0 FQ7 573 CC X+0 Y-0.764 574 CP PA+0 DR+ 575 L Y+6.667 576 L Y+4.097 577 CC X+0 Y+4.097 578 CP PA+180 DR+ 579 L Y+2.569 580 CC X+0 Y+2.569 581 CP PA+0 DR+ 582 FN 1: Q33 =+Q108 + +7.5 583 FN 9: IF +9 EQU +9 GOTO LBL 9 584 LBL 104 ; HH 585 L X-2.569 Y+10 R0 F9999 586 L Z+Q9 R0 FQ7 587 L Y+0 FQ6 588 L Y+4.097 X-2.569 R0 F9999 589 CC X+0 Y+4.097 590 C X+2.569 Y+4.097 DR- R0 FQ6 591 L Y+0 X+2.569 592 FN 1: Q33 =+Q108 + +7 593 FN 9: IF +9 EQU +9 GOTO LBL 9 594 LBL 105 ; II 595 L X+0 Y+0 R0 FMAX 596 L Z+Q9 R0 FQ7 597 L Y+6.667 R0 FQ6 598 L Z+Q8 R0 FMAX 599 L Y+10 R0 FMAX 600 L Z+Q9 R0 FQ7 601 FN 1: Q33 =+Q108 + +4.3 602 FN 9: IF +9 EQU +9 GOTO LBL 9 603 LBL 106 ; JJ 604 L X-1.833 Y-3.333 R0 FMAX 605 L Z+Q9 R0 FQ7 606 CC X-1.833 Y-1.667 607 CP PA+0 DR+ R0 FQ6 608 L Y+6.667 609 L Z+Q8 R0 FMAX 610 L Y+10 R0 FMAX 611 L Z+Q9 R0 FQ7 612 FN 1: Q33 =+Q108 + +5 613 FN 9: IF +9 EQU +9 GOTO LBL 9 614 LBL 107 ; KK 615 L X-2.17 Y+10 R0 FMAX 616 L Z+Q9 R0 FQ7 617 L Y+0 R0 FQ6 618 L Y+1.111 619 L X+2.17 Y+6.667 620 L Z+Q8 R0 FMAX 621 L Y+0 R0 FMAX 622 L Z+Q9 R0 FQ7 623 L X-0.434 Y+3.333 R0 FQ6 624 FN 1: Q33 =+Q108 + +7 625 FN 9: IF +9 EQU +9 GOTO LBL 9 626 LBL 108 ; LL 627 L X+0.833 Y+0 R0 FMAX 628 L Z+Q9 R0 FQ7 629 CC X+0.833 Y+1.667 630 CP PA+180 DR- R0 FQ6 631 L Y+10 632 FN 1: Q33 =+Q108 + +7 633 FN 9: IF +9 EQU +9 GOTO LBL 9 634 LBL 109 ; MM 635 L X-4.444 Y+0 R0 FMAX 636 L Z+Q9 R0 FQ7 637 L Y+6.667 R0 FQ6 638 L Y+4.444 639 CC X-2.222 Y+4.444 640 CP PA+0 DR- 641 L Y+0 642 L Y+4.444 643 CC X+2.222 Y+4.444 644 CP PA+0 DR- 645 L Y+0 646 FN 1: Q33 =+Q108 + +10 647 FN 9: IF +9 EQU +9 GOTO LBL 9 648 LBL 110 ; NN 649 L X-2.569 Y+0 R0 FMAX 650 L Z+Q9 R0 FQ7 651 L Y+6.667 R0 FQ6 652 L Y+4.097 653 CC X+0 Y+4.097 654 CP PA+0 DR- 655 L Y+0 656 FN 1: Q33 =+Q108 + +7.5 657 FN 9: IF +9 EQU +9 GOTO LBL 9 658 LBL 111 ; OO 659 L X-2.569 Y+2.569 R0 FMAX 660 L Z+Q9 R0 FQ7 661 L Y+4.097 R0 FQ6 662 CC X+0 Y+4.097 663 CP PA+0 DR- 664 L Y+2.569 665 CC X+0 Y+2.569 666 CP PA+180 DR- 667 FN 1: Q33 =+Q108 + +7 668 FN 9: IF +9 EQU +9 GOTO LBL 9 669 LBL 112 ; PP 670 L X-2.569 Y-3.333 R0 FMAX 671 L Z+Q9 R0 FQ7 672 L Y+6.667 R0 FQ6 673 L Y+4.097 674 CC X+0 Y+4.097 675 CP PA+0 DR- 676 L Y+2.569 677 CC X+0 Y+2.569 678 CP PA+180 DR- 679 FN 1: Q33 =+Q108 + +7 680 FN 9: IF +9 EQU +9 GOTO LBL 9 681 LBL 113 ; QQ 682 L X+2.569 Y-3.333 R0 FMAX 683 L Z+Q9 R0 FQ7 684 L Y+6.667 R0 FQ6 685 L Y+4.097 686 CC X+0 Y+4.097 687 CP PA+180 DR+ 688 L Y+2.569 689 CC X+0 Y+2.569 690 CP PA+0 DR+ 691 FN 1: Q33 =+Q108 + +7 692 FN 9: IF +9 EQU +9 GOTO LBL 9 693 LBL 114 ; RR 694 L X-1.215 Y+0 R0 FMAX 695 L Z+Q9 R0 FQ7 696 L Y+6.667 R0 FQ6 697 L Y+4.236 698 CC X+1.215 Y+4.236 699 C X+1.844 Y+6.584 DR- 700 FN 1: Q33 =+Q108 + +6 701 FN 9: IF +9 EQU +9 GOTO LBL 9 702 LBL 115 ; SS 703 L X-1.994 Y+0.753 R0 FMAX 704 L Z+Q9 R0 FQ7 705 CC X-0.177 Y+2.569 706 C X+1.526 Y+0.646 DR+ R0 FQ6 707 CC X+0.605 Y+1.686 708 C X+0.965 Y+3.027 DR+ 709 L X-1.32 Y+3.639 710 CC X-0.96 Y+4.981 711 C X-1.881 Y+6.021 DR- 712 CC X-0.177 Y+4.097 713 C X+1.64 Y+5.914 DR- 714 FN 1: Q33 =+Q108 + +6 715 FN 9: IF +9 EQU +9 GOTO LBL 9 716 LBL 116 ; TT 717 L X-1.458 Y+6.667 R0 FMAX 718 L Z+Q9 R0 FQ7 719 L X+1.042 R0 FQ6 720 L Z+Q8 R0 FMAX 721 L X-0.208 Y+10 R0 FMAX 722 L Z+Q9 R0 FQ7 723 L Y+1.667 R0 FQ6 724 CC X+1.458 Y+1.667 725 C X+1.458 Y+0 DR+ 726 FN 1: Q33 =+Q108 + +7 727 FN 9: IF +9 EQU +9 GOTO LBL 9 728 LBL 117 ; UU 729 L X-2.569 Y+6.667 R0 FMAX 730 L Z+Q9 R0 FQ7 731 L Y+2.569 R0 FQ6 732 CC X+0 Y+2.569 733 CP PA+0 DR+ 734 L Y+0 735 L Y+6.667 736 FN 1: Q33 =+Q108 + +7 737 FN 9: IF +9 EQU +9 GOTO LBL 9 738 LBL 118 ; VV 739 L X-2.166 Y+6.667 R0 FMAX 740 L Z+Q9 R0 FQ7 741 L X+0 Y+0 R0 FQ6 742 L X+2.166 Y+6.667 743 FN 1: Q33 =+Q108 + +7 744 FN 9: IF +9 EQU +9 GOTO LBL 9 745 LBL 119 ; WW 746 L X-3.823 Y+6.667 R0 FMAX 747 L Z+Q9 R0 FQ7 748 L X-1.912 Y+0 R0 FQ6 749 L X+0 Y+6.667 750 L X+1.912 Y+0 751 L X+3.823 Y+6.667 752 FN 1: Q33 =+Q108 + +8 753 FN 9: IF +9 EQU +9 GOTO LBL 9 754 LBL 120 ; XX 755 L X-1.944 Y+0 R0 FMAX 756 L Z+Q9 R0 FQ7 757 L X+1.944 Y+6.667 R0 FQ6 758 L Z+Q8 R0 FMAX 759 L X-1.944 Y+6.667 R0 FMAX 760 L Z+Q9 R0 FQ7 761 L X+1.944 Y+0 R0 FQ6 762 FN 1: Q33 =+Q108 + +7 763 FN 9: IF +9 EQU +9 GOTO LBL 9 764 LBL 121 ; YY 765 L X-1.724 Y-3.233 R0 FMAX 766 L Z+Q9 R0 FQ7 767 CC X-2.294 Y-1.667 768 C X-0.709 Y-2.182 DR+ R0 FQ6 769 L X+2.166 Y+6.667 770 L Z+Q8 R0 FMAX 771 L X-2.166 Y+6.667 R0 FMAX 772 L Z+Q9 R0 FQ7 773 L X+0 Y+0 R0 FQ6 774 FN 1: Q33 =+Q108 + +7 775 FN 9: IF +9 EQU +9 GOTO LBL 9 776 LBL 122 ; ZZ 777 L X-2.222 Y+6.667 R0 FMAX 778 L Z+Q9 R0 FQ7 779 L X+2.222 R0 FQ6 780 L X-2.222 Y+0 781 L X+2.222 782 FN 1: Q33 =+Q108 + +7 783 FN 9: IF +9 EQU +9 GOTO LBL 9 784 LBL 130 ; ESZET 785 L X-2.688 Y+0 R0 FMAX 786 L Z+Q9 R0 FQ7 787 L Y+8.333 R0 FQ6 788 CC X-1.021 Y+8.333 789 CP PA+90 DR- 790 L X+0 Y+10 791 CC X+0 Y+8.333 792 CP PA+270 DR- 793 CC X+0 Y+4.167 794 C X+2.259 Y+5.238 DR- 795 CC X-1.757 Y+3.333 796 C X+2.259 Y+1.429 DR- 797 CC X+0 Y+2.5 798 C X+0 Y+0 DR- 799 FN 1: Q33 =+Q108 + +7 800 FN 9: IF +9 EQU +9 GOTO LBL 9 801 LBL 9 802 FN 10: IF +Q16 NE +0 GOTO LBL 7 803 FN 3: Q35 =+Q33 * +Q20 804 FN 1: Q21 =+Q21 + +Q35 805 FN 1: Q21 =+Q21 + +Q24 806 LBL 7 807 FN 9: IF +Q16 EQU +0 GOTO LBL 8 808 FN 4: Q34 =+Q33 DIV +Q16 809 FN 3: Q34 =+Q34 * +57.296 810 FN 3: Q34 =+Q34 * +Q20 811 FN 11: IF +Q17 GT +0 GOTO LBL 2 812 FN 1: Q17 =+Q17 + +Q34 813 FN 12: IF +Q17 LT +0 GOTO LBL 3 814 LBL 2 815 FN 2: Q17 =+Q17 - +Q34 816 LBL 3 817 FN 1: Q17 =+Q17 + +Q14 818 LBL 8 819 CYCL DEF 11.0 MASSFAKTOR 820 CYCL DEF 11.1 SCL 1 821 CYCL DEF 10.0 DREHUNG 822 CYCL DEF 10.1 ROT+0 823 CYCL DEF 7.0 NULLPUNKT 824 CYCL DEF 7.1 X+0 825 CYCL DEF 7.2 Y+0 826 L Z+Q8 R0 F9998 827 LBL 199 828 LBL 0 829 END PGM 9010_DE MM