1 C CMS440:6.JAC_GR38_42 (10.01.95) 2 C NUR FUER FEINHEIT 8/ONLY FOR 8 GG/SEULEMENT POUR GG 8 6 C SP950=SAUBERSTRICKEN/KNITTING AFTER PRESS OFF/RETRICOTER PROPREMENT 8 C EINSTELLEN/ADJUST/REGLER: NP WM WMI WMN SEN=F1 #51 #52 MSEC RS15 YD 9 C 11 C RS1= 2X1 RAPPORT/2X1 CYCLE/CYCLE 2X1 12 C RS2= MUSTER/PATTERN/DESSIN 15 C RS15= GROESSE/SIZE/LARGEUR 17 C RS17= ZUNAHMEREIHEN/WIDENING ROWS/RANGEES DE AUGMENTER 19 C RS19=1 GUMMIFADEN/ELASTIC THREAD/FIL ELASTIC 20 C #51-#52= ANFANGSBREITE/START WIDTH/LARGEUR DE DEPART 21 NP1=10.0 C NETZ/SET UP/RESEAU 22 NP2=11.0 C SCHLAUCH/TUBULAR/TUBULAIRE 23 NP3=11.5 C 2X1 24 NP4=11.5 C UEBERGANG/END OF 2X1/FIN DE 2X1 25 NP5=12.5 C MUSTER VORNE/PATTERN FRONT/DESSIN AVANT 26 NP6=12.0 C MUSTER HINTEN/PATERN REAR/DESSIN ARRIERE 29 C 30 NP20=9.0 NP21=10.0 NP22=11.0 NP23=11.5 NP24=12.0 NP25=13.0 C ANFANGSREIHEN 31 NP18=9.0 NP19=10.0 C SAUBERSTRICKEN 40 START 47 PF0 48 WM=10 49 MSEC=1.0 50 YG1:8=D/1=S 3F=G 4=A 5=A 6F=G 7=E; 51 YG2:8=D/1=S 3F=G 4=A 5=A 6F=G 7=E; 54 YD8=54-10 55 YD7=12-42 56 YD6= 8-16 57 YD5=22-28 58 YD4=28-22 59 YD3=14- 8 60 YD2=36-36 61 YD1=42-48 64 C-------------------------------I-------------------------------I 65 C LINKS LEFT GAUCHE RECHTS RIGHT DROITE I 66 C-------------------------------I-------------------------------I 67 C (8) 8=D TRENNFADEN I I 68 C (7) I 7=E GUMMIFADEN I 69 C (6) I 6=G GRUNDFARBE I 70 C (5) I 5=A BEIFARBE I 71 C (4) I 4=A BEIFARBE I 72 C (3) I 3=G GRUNDFARBE I 73 C (2) I I 74 C (1) I 1=S ANFANGSREIHEN I 75 C-------------------------------I-------------------------------I 82 C NICHT BENUETZTE FADENFUEHRER AUSSERHALB SEN-BEREICH STELLEN 83 C PLACE NOT USED YARN CARRIERS OUT OF SEN AREA 84 C PLACER LES GUIDE-FILS NON UTILISEES AUDEHORS DE LA ZONE DU SEN 85 C---------------------------------------------------------------- 90 C TRENNFADEN DRAW THREAD FIL DE SEPERATION 91 C GRUNDFARBE GROUND COLOUR COULEUR DE FOND 92 C BEIFARBE COLOUR COULEUR 93 C GUMMIFADEN ELASTIC THREAD FIL ELASTIC 94 C ANFANGSREIHEN START COURSES RANGEES DE DEPART 99 C---------------------------------------------------------------- 100 JA1=1130(1100-1130) 102 FA=1-16 103 F1=1-320 104 F2=1-320 105 PA:JA1 ; 106 PM:F1 401:F2; 107 SEN1=1-320 108 SEN2=401-720 120 IFN #137=8 FEINHEIT/GG 8? 122 IF RS15=42 #51=40 #52=280 RS2=100 GOTO 148 124 IF RS15=40 #51=45 #52=275 RS2= 96 GOTO 148 126 IF RS15=38 #51=50 #52=270 RS2= 92 GOTO 148 130 << MS S0 C GROESSE/SIZE/LARGEUR ? 131 >> S0 132 << S0 133 >> S0 134 GOTO 122 148 WMN=320 149 C------------------------------ GRUNDPOSITIONEN ENDE ------------ 150 PF0 199 C---------------------------------------------------------------- 200 F:ANFANG-2X1-F; 202 PA:JA1 ; 204 F:UEBERGANG; 206 F:JAC-2-FARBIG*RS2; 299 END 300 C------------------------------ F-ANFANG ------------------------ 301 FBEG:ANFANG-2X1-F; 302 IF #L=#51 IF #R=#52 F:ANFANG-2X1; GOTO FEND 303 IF #L<=#51 IF #R>=#52 F:ABWERFEN; F:ANFANG-2X1; GOTO FEND 304 IF #L>=#51 IF #R<=#52 F:ZUNEHMEN; F:ANFANG-2X1; GOTO FEND 305 IF #L<>#51 IF #R<>#52 F:ABWERFEN; F:ZUNEHMEN; F:ANFANG-2X1; 306 FEND 310 C------------------------------ ANFANG-2X1 ---------------------- 311 FBEG:ANFANG-2X1; 312 <> S0Y 313 #L=#51 #R=#52 314 << S:R(23)-R(23)/R(24)-0; Y:=G/=G; S1 S2 315 >> S:0-R(24)/R-R; Y:=D/=G; SX SX 316 << S:UVSR/R(25)-0; Y:=G; SX SX 317 >> S:U^SD.I.; V0 SX 318 << S:UVSD.I.; VR1 SX 319 >> S:DI.I(22)-DII.(20); Y:=G; SX 320 << S:0-R(21)/DI.I-0; Y:0/=D!; SX SX 321 >> S:0-R/DI.I(1)-DII.(1); Y:0/=G; SX SX 322 IF RS19= 1 F:MIT-GUMMIFADEN; 323 IF RS19<>1 F:OHNE-GUMMIFADEN; 324 RBEG*RS1 325 << S:DI.I(3)-DII.(3); Y:=G/=G; SX SX 326 >> SX SX 327 REND 328 FEND 329 C------------------------------ MIT-GUMMIFADEN ------------------ 330 FBEG:MIT-GUMMIFADEN; 331 << S:DI.I(2)-(2)0/0-DII.; Y:=G/=E; SX SX 332 >> S:0-DII./DI.I(3)-DII.(3); Y:=E!/=G;V0 SX SX 333 FEND 334 C------------------------------ OHNE-GUMMIFADEN ----------------- 335 FBEG:OHNE-GUMMIFADEN; 336 << S:0(2)-(2)DII.; Y:=G; SX 337 >> S:DI.I-0; V0 SX 338 FEND 350 C------------------------------ ABWERFEN ------------------------ 351 FBEG:ABWERFEN; 352 <> S0Y 354 PA:#L:; 355 << S:TI(24)-TI(24); Y:=S; S1 356 >> S:0-TI; SX 357 << S:U^STI/0-(25)TI; SX SX 358 >> S:UVSI; VL1 SX 359 << S:UVST; V0 SX 360 REP*4 361 >> S:TI-0; Y:=S; SX 362 << SX 363 REPEND 364 >> SX 365 PA:#L:#51:; 366 << S:T(21)-T(21); Y:0; SX SX WM=0 WMI=0 367 >> S0 WM=4 368 IF#L<#51 #L=#51 369 IF#R>#52 #R=#52 370 FEND 380 C ----------------------------- ZUNEHMEN ------------------------ 381 FBEG:ZUNEHMEN; 383 IF #R-#L<#137*4 WM=0 WMI=3 WS0 384 PF0 385 << S:R(23)-R(23); V0 Y:=S; S1 386 >> S:0-R(24)/R(22)-(22)R; Y:=D/=S; SX SX 387 << S:UVSR/R(25)-0; Y:=S; SX SX 388 >> S:R(22)-R(20)/0-R; Y:=S/0; SX SX 389 << S:R(24)-0; Y:=D!/=S; SX SX 390 >> Y:=S; SX 391 IF #R-#L>#137*4 GOTO 403 392 PA:; 393 PL:'L.L'; PR:'P.P'; 394 PF1 395 REP*8 396 IF #R<#52 #R=#R+2 IF #R>#52 #R=#52 397 << S:.LPA(21)-PA(20)/0-LA; Y:=S/0; SX SX 398 IF #L>#51 #L=#L-2 IF #L<#51 #L=#51 399 >> S:LPA-LA/0-PA; SX SX 400 REPEND 401 C 402 PF0 403 PA:; 404 << S:U^SY; VR1 SX W0 405 >> S:UVSAY; V0 SX W0 406 PL:'LL.L'; PR:'P.PP'; 407 PF1 408 IF #R<#52 #R=#R+2 IF #R>#52 #R=#52 409 << S:LPA(21)-PA(20)/Y-LA; Y:=S/0; SX SX WM=3 WMI=3 WS1 410 IF #L>#51 #L=#L-2 IF #L<#51 #L=#51 411 >> S:LPA-LA/Y-PA; SX SX 412 IF #L>#51 GOTO 408 413 IF #R<#52 GOTO 408 414 PL:; PR:; 415 << S:R-R/0-R; Y:=S/0; SX SX 416 >> SX SX 417 REP*5 418 << S:R(25)-0; Y:=S; SX 419 >> SX 420 REPEND 421 RBEG*RS17 422 << S:R-R/0-R; Y:=S/0; SX SX 423 >> SX SX 424 REND 427 PF0 428 FEND 500 C -------------------------------- UEBERGANG --------------------- 502 FBEG:UEBERGANG; 504 << S:DI.I-DII./0-R; Y:=G; SX SX 506 >> S:R-0/R(4)-R(4); SX SX 508 FEND 510 C -------------------------------- JAC-2-FARBIG ------------------ 512 FBEG:JAC-2-FARBIG; 514 Y:=G/=A; 516 << S:<1->.(5)-R(6)/A-R; S1 S2 S3 S4 518 >> S1 S2 S3 S4 520 FEND 950 C------------------------------ SAUBERSTRICKEN ------------------ 951 START 952 PF0 GOSUB 50-149 W+0 953 <> S0Y 954 << S:DI.(18)-D.I(18)/D.I-DI.; Y:=G/=G; S1 S2 W07 WS0 955 >> SX SX W07 956 REP*99 957 << S:R(19)-R(19); Y:=G/=G; SX SX W07 958 >> SX SX W07 959 REPEND 960 MS C GESTRICK IN ABZUGSWALZE 961 GOTO 956 962 END 999 <> S0 W0 1100 ................ 1102 .......A........ 1104 ......AAA....... 1106 .....AA.AA...... 1108 ....AA...AA..... 1110 ...AA.....AA.... 1112 ..AA.......AA... 1114 .AA.........AA.. 1116 AA...........AA. 1118 .AA.........AA.. 1120 ..AA.......AA... 1122 ...AA.....AA.... 1124 ....AA...AA..... 1126 .....AA.AA...... 1128 ......AAA....... 1130 .......A........