chunk_473.json•1.5 kB
{
"id": "chunk_473",
"text": "3150 D- o \n3160 IF N•O TiiEN 3220 \n3170 \nFOR 11•1 TON \n3180 A•A(Il):B•B(Il):C•C(Il) \n3190 lF Y>•D AND Y<•D+C THEN TX(I4)• A+(B-A}\"(Y-D)/C:GOTO 3220 \n3200 \nD•D+C \n3210 NEXTII \n3220 lF NT•O TiiEN 3300 \n3230 \nFOR 11•1 TO NT \n3240 GOSUB 2380 · Conversion \n3250 IF TYP•l AND Y>•Dl AND Y<Dl +C TiiEN TXa4)• TX(I4)+(A+(B-A)\"(Y-Dl)/C)•NB·coEF \n3260 lF TYP•2 AND Y>•Dl-R AND Y<Dl TiiEN TX(I4)•TX(l4)+2·Na·coEF·SQR(RA2-(Dl-Y)A2) \n3270 \nIF TYP•3 AND Y>•Dl AND Y<Dl+R TiiEN TX(I4)•TXa4)+2·NB·coEF\"SQR(RA2-(Dl -Y)A2) \n3280 \nlF TYP•4 AND Y>•Dl -R AND Y<Dl+R TiiEN TX(14)•TX(I4)+2·NB·coEF\"SQR(RA2-(Dl-Y)A\n2\n) \n3290 \nNEXTII \n3300 TY(I4)• Y \n3310 \nIF TX(I4)<LAM! TiiEN LAMl• TXa4) \n3320 NEXT!4 \n3330 RETURN \n3340 REM------------------\n3350 REM Trace de Ia Courbe Parametree x=TX(I) et y • TY(I) \n3360 REM \npour 1•0 TO N9 (Nombre de Points par Courbe) \n3370 REM Pour Impression du Dessin sur lmprimante, Enlever le REM en 13882 \n3380 INPUT\"Suite ·:UU$:CLS \n3390 NPTA•490 · Nombre de Points d'Ecran en Abscisse-490 \n3400 NPTB•290",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 473,
"line_start": 16689,
"line_end": 16724,
"has_formulas": true,
"has_tables": false
}
}