Инженерная оптимизация прессового и литьевого оборудования. Клинков А.С - 49 стр.

UptoLike

49
**************Mx(X)******************************************
280 A1 = D ^ 2 / 2 * (X ^ 2 / L ^ 2 – 1)
290 A2 = .5 – 2 / 3 * X / L + X ^ 2 / 4 / L ^ 2
300 A2 = A2 * X ^ 2 / L ^ 2
310 A2 = A2 – 1 / 12
320 A2 = D1 ^ 2 * A2
330 MX = DEL * PMAX * SIN(F1) * L / 8: PRINT MX
340 A3 = (1 / 3 – X / 4 / L) * X ^ 3 / L ^ 3 – 1 / 12
350 A3 = A3 * 2 * D1 * D2
360 A4 = D2 ^ 2 / 4 * (X ^ 4 / L ^ 4 – 1)
370 MX = MX * (A1 – A2 – A3 – A4)
373 PRINT "Nx"; NX, "Mx"; MX
376 REM
***************MY(X)****************************************
380 A1 = (D – D1) * (-2 * COS(A * X) / A ^ 3 – X * SIN(A * X) / A ^ 2 +
+ 2 / A ^ 3)
390 A2 = (D2 – D1) / L * (6 / A ^ 4 * SIN(A * X) – 4 * X / A ^ 3 *
COS(A * X) – X ^ 2 / A ^ 2 * SIN(A * X) + 4 * X / A ^ 3)
400 MY = DEL * PMAX * SIN(F1) / 2 / L * (A1 – A2): PRINT "A1"; A1, A2
410 A1 = COS(A * X) / A ^ 2 + X * SIN(A * X) / A – 1 / A ^ 2
420 A1 = (D ^ 2 – D1 ^ 2) / L * A1
430 A2 = 2 * D1 * (D1 – D2) / L ^ 2
440 A3 = 2 * X * COS(A * X) / A ^ 2 + (X ^ 2 / A – 2 / A ^ 3) *
SIN(A * X) – 2 * X / A ^ 2
450 A2 = A2 * A3
460 A3 = (3 * X ^ 2 / A ^ 2 – 6 / A ^ 4) * COS(A * X)
470 A4 = (X ^ 3 / A – 6 * X / A ^ 3) * SIN(A * X) + 6 / A ^ 4 – 3 * L * X /
A ^ 2
480 A3 = A3 + A4
490 A3 = (D2 – D1) ^ 2 / L ^ 3 * A3
500 MY = MY – DEL * PMAX * COS(F1) / 8 * (A1 + A2 – A3)
502 PRINT "MY"; MY
505 REM
******************MZ(Z)**************************************
510 MZ = -DEL * PMAX * SIN(F1) / 2 / L
520 A1 = (D – D1) * (2 * SIN(A * X) / A ^ 3 – X * COS(A * X) / A ^ 2 +
+ X / A ^ 2)
530 A2 = (D2 – D1) / L * (6 / A ^ 4 * COS(A * X) + 4 * X / A ^ 3 *
SIN(A * X) – X ^ 2 / A ^ 2 * COS(A * X) – 6 / A ^ 4 + L * X / A ^ 2):
PRINT A1