該文檔討論設(shè)置表面
光學(xué)特性(如coatings, importance samples, materials, raytrace controls, scatter等)的最簡易的方式,它利用基于腳本語言的
結(jié)構(gòu)化(或分層次)
模塊,等價于在圖形化的交互式用戶接口中的拖拉方式。
COFCa&m9c 首先參考一個樹狀結(jié)構(gòu)目標,如下所示:
uGY(` -Geometry
,tl(\4n -Subassembly 1 (Optical components)
(Y~gItej -Custom Element 2
I*EHZctH -Surface 3
3FsX3K,_X -Surface 4
hOR1RB +Custom Element 3
=y]FcxF +Subassembly 2 (Mechanical components)
>p>B-m +Subassembly 3 (Auxiliary components)
a+
s%9l -Custom Element 1 (Detector components)
a~wlD.P -Surface 1
V*%Lc9<d 編程思想是,用戶已把目標樹整理成包含相似功能特征的小組,然后想通過腳本編程語言容易地修改任一組的所有表面的光學(xué)特性,即Subassembly 1中的Optical components。形如SetAll___的一組命令能實現(xiàn)這一功能,它運行用戶指定根節(jié)點ID#及期望的特性值,F(xiàn)在考慮下面的例子,我們想為分層次結(jié)構(gòu)中Subassembly 1下面的所有表面設(shè)置Transmit coating,相應(yīng)的命令為:
"7}e~*bM?` Dim idNode As Long, coatNode As Long, count As Long
|*y'H* idNode = FindFullName(“Geometry.Subassembly 1 (Optical components)”)
n0vhc;