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

UptoLike

76
TDZ# = T# - (MU * X#(2) ^ 2 / (2 * KA * LA) * (3.14 * X#(3) * X#(4) /
X#(2)) ^ (pm + 1) * EXP(-b2 * Ts1#) - T0 + Tz) * EXP(-A * X5)
TDZK# = TDZ# + 273.15
TAUS = (TAUS1 + TAUS2 / TDZK# ^ 2) ^ 2
JB = JB0 + dTAU / TAUS: JB0 = JB
NEXT X5
EPS = ABS((JB - JB1) / JB) * 100
'PRINT JB1; JB; dTAU; EPS
IF EPS < 1 THEN 63 ELSE 62
62 JB1 = JB: dTAU = dTAU / 1.5: GOTO 61
63 'PRINT "TAU="; TAU; "JB="; JB; XT5
99 IF INQ = 2 THEN GOTO 100
IF INQ = 3 THEN GOTO 200
NN1 = MU * W1 * (3.14 * X#(3) * X#(4)) ^ (1 + pm) / X#(2) ^ pm * (4 * SN ^
2 + CS ^ 2) * X#(5) * EE / SN
NN2 = 3.14 * X#(3) * X#(4) * CS / 2 * W1 * X#(2) * dP
NN3 = (3.14 * X#(3) * X#(4)) ^ (pm + 1) * MU * E1 * X#(5) / TAN(X#(1) *
3.1416 / 180) / d1 ^ pm * EXP(-b2 * Tz)
R#(14) = NN1 + NN2 + NN3
95 Q1 = W1 * X#(2) * 3.14 * X#(3) * X#(4) * CS * Fg / 2
Q2 = W1 * X#(2) ^ (2 + pm) * Fp * dP * SN / (12 * MU * (3.14 * X#(3) *
X#(4)) ^ (pm - 1) * X#(5) * FZ)
Q# = Q1 - Q2
NN1 = MU * W1 * (3.14 * X#(3) * X#(4)) ^ (1 + pm) / X#(2) ^ pm * (4 * SN ^
2 + CS ^ 2) * X#(5) * FZ / SN
NN2 = 3.14 * X#(3) * X#(4) * CS / 2 * W1 * X#(2) * dP
NN3 = (3.14 * X#(3) * X#(4)) ^ (pm + 1) * MU * E1 * X#(5) / TAN(X#(1) *
3.1416 / 180) / d1 ^ pm * FZ
R#(13) = NN1 + NN2 + NN3
' "расчет шнека на прочность, жесткость и устойчивость"
FI = X#(1)
h = X#(2)
d = X#(3)
W4 = X#(4) * 60
L = X#(5)
A = 400: DIM MIZ(A), X(A), MK(A), FP1(A)
' "ДОПУСКАЕМОЕ НАПРЯЖЕНИЕ (SIG), [Па]"
' "ПЛОТНОСТЬ МАТЕРИАЛА ШНЕКА, [КГ/М^3]"
d11 = .01 ' "ДИАМЕТР ОСЕВОГО ОТВЕРСТИЯ ШНЕКА, [М]"
ZX = 10: dX = L / ZX: PI = 3.14: FI = FI * PI / 180