蛇形敷设长度系数计算

yjwht

lea丶丶 发表于 2025-4-17 09:26
这是按一次手册做的等高避雷，按50064不知道怎么通过查表来，我看天正是按50064来的。

可以把曲线转换为数据，再用等比插值法计算出来

yjwht

计算全控桥交直流电压比：
1、设交流侧电压峰值为1，则ua=sinx、ub=sin(x-120)、uc=sin(x+120)；
2、取ua、ub、uc中的最大值，取ua、ub、uc中的最小值，得到这两者的差值△U；
3、计算△U的平均值，这个值就是输出的直流电压值；
4、全控桥交直流电压比=△U的平均值÷(1/√2)=△U的平均值×√2。

1. (defun c:tt()
   
2.   (setq x 0.0 sum1 0.0)
   
3.   (while (<= x 1080.0)
   
4.     (setq ua (sin (/ (* x pi) 180)))
   
5.     (setq ub (sin (/ (* (- x 120) pi) 180)))
   
6.     (setq uc (sin (/ (* (+ x 120) pi) 180)))
   
7.     (setq ud (- (max ua ub uc) (min ua ub uc)))
   
8.     (setq sum1 (+ sum1 ud))
   
9.     (setq x (1+ x))
   
10.   )
    
11.   (setq y (* (/ sum1 1081.0) (sqrt 2.0)))
    
12.   (princ y)
    
13.   (princ)
    
14. )

(defun c:tt()<br />   (setq x 0.0 sum1 0.0)<br />   (while (<= x 1080.0)<br />     (setq ua (sin (/ (* x pi) 180)))<br />     (setq ub (sin (/ (* (- x 120) pi) 180)))<br />     (setq uc (sin (/ (* (+ x 120) pi) 180)))<br />     (setq ud (- (max ua ub uc) (min ua ub uc)))<br />     (setq sum1 (+ sum1 ud))<br />     (setq x (1+ x))<br />   )<br />   (setq y (* (/ sum1 1081.0) (sqrt 2.0)))<br />   (princ y)<br />   (princ)<br /> )

_$ (c:tt)
2.33913