path = mfilename('fullpath');
i=strfind(path,'\');
path=path(1:i(end));
cd(path);
addpath(genpath(strcat(path,'hfssapi-by-Jianhui Huang')));

% 创建一个可读写vbs脚本文件.
% tmpScriptFile：vbs脚本的路径，例如F:\test\a.vbs
fid = fopen(tmpScriptFile, 'wt');

%创建一个新的HFSS项目
%fid：新建vbs脚本的一个文件标识符
hfssNewProject(fid)

%插入一个新的设计文件
%Design_name：设计名称
hfssInsertDesign(fid, Design_name);

%保存项目文件到指定路径
%tmpPrjFile：vbs脚本的路径，
%例如F:\test\Helloworld.aedt或者F:\test\Helloworld.hfss
%Overwrite：如果设置为1将覆盖与tmpPrjFile指定的名称相同的任何现存文件
%缺省或者为0则默认不覆盖
hfssSaveProject(fid, tmpPrjFile,Overwrite);

% DesignName：设计名称；variableName:变量名字
% value:变量的值；units:单位；
% flag:值为1时value只支持数字，值为2时value支持表达式
hfssVariableInsert(fid,DesignName,variableName, value, units,flag)

% hfssBox(fid, BoxName, Start, Size, Units, Color, Material, Transparency, flag)
% BoxName：Box的名字；Start：初始点(基点)坐标；Size：沿着x,y,z轴的尺寸；Units：单位
% Color：Box的颜色(RGB)；Material：材料名字（不要随便自己整个名字，必须是HFSS材料库里的名字)；
% Transparency：显示的透明度；flag：值为1时Start, Size只支持向量数字，值为2时value支持元胞数组表达式% 实例：
% hfssBox(fid, 'Sub1', [0,0,0], [1,2,3], 'mm',...
% "(132 132 193)", "FR4_epoxy", 0, 1);
% hfssBox(fid, 'Sub1', {'0mm', '0mm', '0mm'}, {'Box_W', 'Box_L', 'Box_H'}, 'mm',...
% "(132 132 193)", "FR4_epoxy", 0, 2);

clear;clc;
path = mfilename('fullpath');
i=strfind(path,'\');
path=path(1:i(end));
cd(path);
addpath(genpath(strcat(path,'hfssapi-by-Jianhui Huang')));
try
    % 填写路径
    % tmpPrjFile：生成的aedt或者hfss(安装hfss15以下的后缀名为.hfss)项目文件的路径名
    % tmpScriptFile：生成的vbs脚本文件的路径名
    tmpPrjFile = 'F:\vbsScript\First_demo.aedt';
    tmpScriptFile = 'F:\vbsScript\Helloworld.vbs';

    % hfssExePath：HFSS软件的路径
    hfssExePath = 'D:\software\HFSS15\AnsysEM18.2\Win64\ansysedt.exe';

    % 创建一个可读写vbs脚本文件.
    fid = fopen(tmpScriptFile, 'wt');

    %创建一个新的HFSS项目并插入一个新的设计文件.
    hfssNewProject(fid);
    Design_name='Draw_a_box';
    hfssInsertDesign(fid, Design_name);

    Box_H=1;Box_W=2;Box_L=3;
    % hfssVariableInsert(fid,DesignName,variableName, value, units,flag)
    hfssVariableInsert(fid,Design_name,'Box_H', Box_H, 'mm',1);
    hfssVariableInsert(fid,Design_name,'Box_W', Box_W, 'mm',1);
    hfssVariableInsert(fid,Design_name,'Box_L', 'Box_H+Box_W', 'mm',2);

    % 画一个Box
    % hfssBox(fid, BoxName, Start, Size, Units, Color, Material, Transparency, flag)
    hfssBox(fid, 'Sub1', {'0mm', '0mm', '0mm'}, {'Box_W', 'Box_L', 'Box_H'}, 'mm',...
        "(132 132 193)", "FR4_epoxy", 0, 2);
%     hfssBox(fid, 'Sub1', [0,0,0], [1,2,3], 'mm',...
%         "(132 132 193)", "FR4_epoxy", 0, 1);
    % 保存项目文件到指定路径
    hfssSaveProject(fid, tmpPrjFile,1);

    % Close the HFSS Script File.
    fclose(fid);
    disp('vbs脚本已生成！');
catch
    disp('程序出现异常！');
    fclose(fid);
end