Directory of image this file is from
This file as a plain text file
Z6()BTC U/W-FOCAL:SWPLANO/DA/TE?MBXBAE?MB/BCA !!"ANZ. D. LASTEN: "N," ANZ. D. LF "L?MB=BDT !!"PKT.":7"X":13"Y"?MCHBET :19"Q":24"I/M?MCTBFT !:6"[M]":12"[M]?MC\BGT :18"[KN]?MC+BHS SX=;S SY=;F I=1,N;D 3?MC9BIS SX=SX/SQ;S SY=SY/SQ?MDLBJA !"NEUE ABMESSG. ",I;I (I)1.26?MD&BLA !!"FLAECHE D. BODENPL.: ANZ. D. ECKPKTE. "O?MEHBMT !"ABFRAGE D. PKTE. IM UHRZ.SINN !";D 1.04;T :19"I/M";D 1.06?MEQBNF I=1,O;D 4?ME.BPS A(O+1)=A(1);S B(O+1)=B(1);F I=1,O+1;S B(I)=YM-B(I)?ME7BRF I=1,O;D 5?MFXBTS XS=S/GF;T !%7.03,GF,S,T; U=T;S GF=;S S=;S T=;F I=1,O;D 6?MF:BVS YS=YM-S/GF;T :30,GF,S,T;S IX=T-(YM-YS)^2*GF;S IY=-U-XS*XS*GF?MG\BYA !"PL.STAERKE [CM] D= ",D," NUTZL. AUF BODENPL. [KN/M2]: "P?MG7BZA "PROJ.NR. "C," WELCHE ZEILE ",I;F K=I,72;T !?MHQB^T "*"%3!!"BETR.:"C,:15"POS.": 0"SEITE"!;S =3?MH2B D 7;A "POS. "K;D 7;T "1) KONSTR.: ST.B.-BODENPL. D ="D," CM?MIBBD 9;T "KOORD. D. FLAECHEN?MI[B$T %4.02"-SCHW.PKTS.: XS ="XS," YS ="YS," M?MI+B%D 1.35 T "BEGRENZG.:";D 9?MI9B(T %2"PKT.":16"X":23"Y?MJBB)T !;S =+1?MJ B*F I=1,O;D 8;S A(I) A(I)-XS;S B(I)=YM-B(I)-YS;T %2,I,%5.02,A(I),B(I)?MKPB+D 9;T "GES.-FLAECHE: A ="GF," M2";D 9;T "TRAEGH.MOMENT: IX ="IX," IY =",IY?MK4B-D 1.41;T !;D 7;T "2) BELASTUNG:";D 9;T "EIGENGEW. PLATTE:":35"G =?MLPB/S G=D*.25+2;S Q=G+P;T G," KN/M2";D 8;T "NUTZLAST: ML+B0T :35"P ="P;D 9;T "GES.-GEW.:":35"Q ="Q," KN/M2?MMAB2D 9;T "KOORD. D. LASTPKTE. U. LASTEN:?MMOB4D 9;D 1.4;T :30"Q";D 9?MM5B7F I=1,N;S X(I)=X(I)-XS;S Y(I)=Y(I)-YS;T %2,I,%5.02,X(I),Y(I),Q(I);D 8?MNUB9D 8;T "RESULT.: "SQ," MP LAGE: XR =";S X=SX-XS;S Y SY-YS?MN!B;T X," YR ="Y," M?MN1B<D 7;T "3) BODENPRESSUNGEN:?MOFB>S MX=SQ*X/IY;S MY=SQ*Y/IX;S S=SQ/GF?MO]B?D 9;T "A) UNTER FLAECHENBEGRENZG.: ";D 9?MO0CAD 1.4;D 1.72;T " BODENPRESSG.?MO=CBT " [MP/QM]";D 1.41?MP-CCF I=1,O;D 8;T %2,I,%5.02,A(I),B(I);S A( )=S+MX*A(I)+MY*B(I);T %8.02,A(I),:40,A(I)+G,A(I)+Q?MQCCFD 9;T "B) UNTER LASTPKTEN.:";D 9;D 1.4?MQPCHT " BIEG. PRESSG.?MQVCID 1.66?MQ<CKF I=1,N;D 8;S B(I)=S+MX*X(I)+MY*Y(I);T %2,I,%5.02,X(I),Y(I),%8.02,B(I)?MR[CPD 9;T " R"%5.02,X,Y;S B(N+1)=S+MX*X+MY*Y; %8.02,B(N+1)?MR$DJF K=,69;T !?MR;DTT "ING.-BUERO B R A S S ALFONSSTR. 9?MSSD^T " 8000 MUENCHEN 19 RUF *181081"!!"*?MS D(A !!!"WEITER LF ",I;I (-I)1.03;Q?MS4FCT %2!,I,:7;A X,:13,Y?MTUFDA :18,Q(I),:25,M;I (9-M)3.03;S X(I)=X;S Y(I)=Y;S SQ=SQ+Q(I)?MT FES SX=SX+Q(I)*X;S SY=SY+Q(I)*Y?MUHED 3.03;A :20,M;I (9-M)4.05;S A(I)=X;S B(I)=Y?MULHJI (Y-YM)4.2;S YM=Y?MUOHT?MU JJS H=A(I+1)-A(I);I (H)5.2,5.9 MU6JTS X1=-.025;S DY=(B(I+1)-B(I))/FABS(H)?MVPJ^I (H)5.4;S C=A(I);S D=A(I+1)-.075;S H=1;G 5.5?MVJ(S C=A(I+1);S D=A(I)-.075;S H=-1?MV2J2F K=C,.05,D;D 5.6;D 5.7?MWMJ<S X1=X1+.05;S G=H*(B(I)+DY*X1)*.05;S R=A(I)+H*X1?MW KFS GF=GF+G;S S=S+G*R;S T=T+G*R*R?MW$KZ ?MW5LJS H=B(I+1)-B(I);I (H)6.2,6.7?MXKLTS X1=-.025;S DY=(A(I+1)-A(I))/FABS(H)?MX%L^I (H)6.4;S C=B(I);S D=B(I+1)-.075;S H=1;G 6.5?MX8L(S C=B(I+1);S D=B(I)-.075;S H=-1?MYDL2F K=C,.05,D;D 6.6?MY"L<S X1=X1+.05;S G=H*(A(I)+DY*X1)*.05;S R=B(I)+H*X1;D 5.7?MY%MF? Y7NJT !!;S =+2;I (65-)7.2;G 7.3?MY=NTD 8.2?MZBN^T :4?MZTPJT !;S =+1;I (65-)8.2;G 8.3?MZ&PTD 2.1;D 2.2;D 2.3;S =6;D 1.3?MZ+P^T :9?MRJT !;S =+1;D 8?M8?L S SWPLA?M?.17,1.18?MY*B+S Y=69;F I=I1,N;D 9,7?MZ7B)S U=1,J1=13,Y=69;I (KU)14.1?M\NTS TA=79;I (27-D)7.3;S TA=73;I (24-D)7.3;S TA=19+(D-6)*3?M Note: Lines longer than 256 characters were wrapped