CST MWS球型螺旋天线怎么画啊

顶个
我也想知道

没做过天线，能把模型和尺寸发上来吗?这样知道的人会比较多

郁闷.高手都在春眠吗

到这个地方看看吧 应该对你有帮助
http://www.mwhrf.com/dispbbs.asp?BoardID=2&ID=2392&replyID=&skin=1

請到 http://imw.mwhrf.com/thread-10719-1-1.html
看看！
在CST-->Macros--->construct---->curves---->creat 3D curves analytical(xyz-wcs)-------------------------- >出現一個螺旋線-------->到history把VBA code改成下述.
CST VBA code
------------------------------------------------------------------------------------------------------------------------------------
On Error GoTo Curve_Exists
Curve.NewCurve "3D-Analytical"
Curve_Exists:
On Error GoTo 0
Dim sCurveName As String
sCurveName = "3dpolygon_1"
With Polygon3D
  .Reset
  .Name sCurveName
  .Curve "3D-Analytical"
' ======================================
' ！ Do not change ABOVE this line ！
' ======================================
' -----------------------------------------------------------
' adjust x-range as for-loop parameters (xmin,max,step)
' enter y/z-Function-statement within for-loop
' fixed parameters a,b,c have to be declared via Dim-Statement
' -----------------------------------------------------------
' NOTE: available MWS-Parameters can be used without
'      declaration at any place (loop-dimensions, ...)
'      (for parametric curves during parameter-sweeps and optimisation ！)
' -------------------------------------------
Dim  x As Double, y As Double, z As Double 
Dim  rho As Double, theta As Double, phi As Double
  Dim t As Double
  For t=-0.25*Pi To 0.25*Pi STEP 0.001 ( 此設定剛好繞球一圈)
 
            rho=10 (sphere radius)
            theta=t
            phi=2*t
            x=rho*( sin(theta*100) )*cos(phi)  (*100, 控制螺旋圈數)
            y=rho*( cos(theta*100) )*cos(phi)
            z=-rho*sin(phi)
    .Point x, y, z
  Next t
' ======================================
' ！ Do not change BELOW this line ！
' ======================================
  .Create
End With
SelectTreeItem("Curves\3D-Analytical\"+sCurveName)

Re:球型螺旋天线怎么画啊

路过，赞mfhsu

能不能给出个sat格式的模型，让大家都瞅瞅。或者直接CST模型也行啊

您好，这个是cst建的模吧，怎么画呢?尤其是每根的粗细

您好，请问您这是什么语言?画的