Автоматизированное проектирование и расчет шнековых машин - часть 37

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

П

П

Р

Р

И

И

Л

Л

О

О

Ж

Ж

Е

Е

Н

Н

И

И

Е

Е

 

 

2

2

 

 

 
 

ПРОГРАММА 1 

 

ПРОГРАММА РАСЧЕТА МАКСИМАЛЬНОЙ ПРОИЗВОДИТЕЛЬНОСТИ ШНЕКОВОЙ 

МАШИНЫ ПРИ ОПРЕДЕЛЕННОМ СОПРОТИВЛЕНИИ ФОРМУЮЩЕГО ИНСТРУМЕНТА И 

ВАРЬИРОВАНИЕМ ГЛУБИНЫ НАРЕЗКИ ШНЕКА. ЯЗЫК БЕЙСИК 

 
30 CLS 
40 INPUT "ВЕЛИЧИНА РАДИАЛЬНОГО ЗАЗОРА DL, [м]"; DL 
50 INPUT "КОЭФ-Т ГЕОМЕТРИЧЕСКОЙ ФОРМЫ ГОЛОВКИ, [м] К = "; K 
60 INPUT "СКОРОСТЬ ВРАШЕНИЯ ШНЕКА, [об/c] N = "; N 
70 INPUT "ВЫБРАННАЯ СТЕПЕНЬ СЖАТИЯ МАТЕРИАЛА I = "; W 
80 INPUT "ДЛИНА ШНЕКА, [м] L = "; L 
90 INPUT "ДИАМЕТР ШНЕКА, [м] D = "; D 
100 INPUT "ГЛУБИНА  ВИНТОВОГО  КАНАЛА  В  ЗОНЕ  ЗАГРУЗКИ  ИЗМЕНЯЕТСЯ  ОТ, [м] 

HN = "; HN 

110 INPUT ", [м] ДО HK = "; HK 
120 INPUT "ШИРИНА ГРЕБНЯ ВИТКА ИЗМЕНЯЕТСЯ ОТ, [м] EN-"; EN 
130 INPUT ", [м] ДО ЕК = "; EK 
140 PI = 3.141592 
150 FO = ATN(1 / PI) 
160 R = D / 2 
170 T = D 
180 DL = DL * D 
190 HN = HN * D 
200 HK = HK * D 
210 EN = EN * D 
220 EK = EK * D 
230 QMAX = 1E-10 
240 FOR H1 = HN TO HK STEP .01 * D 
250 H2 = .5 * (D – SQR(D – 2 – (4 * H1 * (D – H1)) / W)) 
260 FOR E = EN TO EK STEP .01 * D 
270 J6 = (L / (H1 – H2)) * LOG(H1 / H2) 
280 J7 = L / (H1 * H2) 
290 J8 = L / 2 * ((HbH2) / (Hl – 2 * H2 – 2)) 
300 J9 = (L / (H1 – H2)) * LOG((2 * R – H2) / (2 * R – HD)) 
310 S = ((2 * R * J7 – J6) / (2 * R * TAN(FO))) 

320 F = ((2 * R * J8 – COS(2 * FO) * J7) / (R * SIN(2 * FO))) + (TAN(FO)  
* (J6 – J9)) / 4 * R – 2 

330 B = (T – E) / (12 * F) 
340 A = P1 * O * (T – E) * 8 / (2 * P) 
350 F1# = ATN(T / (2 * PI * (R – H1))) 
360 F2# = ATN(T / (2 * PI * (R – H2))) 
370 J = 3 * 3.14 ^ 2 * D ^ 2 * DL – 3 
380 I = (SIN(FI#)) ^ 3 * (SIN(F2#)) ^ 3 * (H1 – H2) 
390 U = I * J 
400 Z# = SIN(F1#) 
410 Z2# = SIN(F2#) 
420 'PRINT Z#, Z2#, F1#, F2#, H1, H2 
430 V = 10 * L * T * E * (Z# – 3 – Z2# ^ 3) 
440 G = U / V 
450 Q = A * K * N / (K + B + G) 
460 IF Q < QMAX THEN 480