OpticStudio 19.4 ZPL宏快速上手（剔除冗余，直击实操）

一、先搞懂：ZPL宏能干嘛？

• 批量改参数（如10个表面厚度一键调整）

• 自动出报告（像差+MTF报表自动生成）

• 自定义分析（非默认的特殊像差计算）

• 流程自动化（设计→优化→分析一步跑通）

二、实操第一步：打开宏编辑器

1. 点击「编程选项卡」→「ZPL宏组」→「新建宏」，自动生成框架：
BEGIN
! 这里写代码
END
2. 编辑完点「执行」运行，结果在“输出窗口”看；报错会提示行号，直接定位修改。

三、必学基础语法（30分钟入门）

1. 变量（3种常用）
! 1.数值变量（默认双精度）
A = 5.23  ! 直接赋值
B = SQRT(A)  ! 用函数赋值（计算A的平方根）

! 2.数组（存多个值，比如5个表面的半径）
DIM RADIUS[5]  ! 定义1维数组，5个元素
RADIUS[1] = 100.0  ! 给第1个元素赋值

! 3.字符串（用$结尾）
TITLE$ = "镜头半径报表"  ! 存文本
2. 核心语句（循环+条件）

（1）循环（批量操作必用）

例：获取1-5号表面的厚度，打印结果
BEGIN
FOR I = 1 TO 5  ! I从1到5循环
  TH = GETTHICKNESS(I)  ! 取第I个表面厚度
  PRINT "表面", I, "厚度：", TH, "mm"  ! 打印
NEXT I  ! 循环结束
END
（2）条件（判断执行）

例：若表面1厚度>10mm，就改成10mm
BEGIN
TH1 = GETTHICKNESS(1)  ! 取表面1厚度
IF TH1 > 10.0 THEN  ! 条件判断
  PUTTHICKNESS(1, 10.0)  ! 修改厚度为10mm
  PRINT "表面1厚度已调整为10mm"
ELSE
  PRINT "表面1厚度正常"
ENDIF  ! 条件结束
END
3. 最常用函数（直接抄）
函数 功能 示例 
GETRADIUS(surf) 取第surf号表面的半径 R = GETRADIUS(2) 
PUTTHICKNESS(surf,val) 改第surf号表面厚度为val PUTTHICKNESS(3, 8.5) 
ANALYZE_SPOT() 调用点列图分析 ANALYZE_SPOT() 
PRINT(内容) 输出窗口打印 PRINT "分析完成" 

四、实战案例（2个必练）

案例1：批量修改表面半径

需求：把1-3号表面半径都加5mm
BEGIN
! 循环1-3号表面
FOR I = 1 TO 3
  OLD_R = GETRADIUS(I)  ! 取原半径
  NEW_R = OLD_R + 5.0  ! 加5mm
  PUTRADIUS(I, NEW_R)  ! 应用新半径
  PRINT "表面", I, "半径：", OLD_R, "→", NEW_R, "mm"
NEXT I
PRINT "批量修改完成！"
END
案例2：自动生成像差报表

需求：运行后输出轴上/0.7视场的球差、彗差
BEGIN
! 定义视场（0=轴上，1=0.7视场）
FIELD1 = 0
FIELD2 = 1

! 取轴上视场球差（单位：微米）
SPH0 = GETABERRATION(FIELD1, 0, 0)  ! 0=球差类型
! 取0.7视场彗差
COM7 = GETABERRATION(FIELD2, 1, 0)  ! 1=彗差类型

! 打印报表
PRINT "=== 像差报表 ==="
PRINT "轴上视场球差：", SPH0, "μm"
PRINT "0.7视场彗差：", COM7, "μm"
END
五、查错&进阶

1. 报错怎么办：执行后若提示“Undefined function”，大概率是函数名写错（如GETRADIUS少写S）；提示“Array out of bounds”，是数组下标超了（如定义[5]却用了[6]）。

2. 学更多函数：点击「宏帮助」→搜索函数名（如查“GET”能看到所有获取数据的函数）。

3. 抄官方示例：打开<data>\ZPL文件夹，看REPORT.ZPL（报表生成）、MODIFY_LENS.ZPL（镜头修改），直接改代码用。