[分享]ChangeMaterial(等焦换材料).ZPL

光杆司令

在镜头设计的过程中，有时需要在保持光焦度不变的情况下手动修改某个镜片的材料。我们可以借助以下宏完成相应的工作。
20181209 v1.0 首次发布
1.替换材料,并根据公式rNew =rOld*(nNew-1)/(nOld-1)更新曲率半径的数据。
2.只能输入正在使用的玻璃库里的材料。
3.由于ZEMAX的内部机制，输入的材料名称对大小写敏感。


更新历史

20181215 v1.2
1.调整单面光角度及曲率半径的更新策略，修正了当原曲率半径=Infinity时的不适应情况

wsjch

也可以输入当前未使用的玻璃库材料。输入之后会触发zemax自己的寻找并添加玻璃库机制，弹出框点确定，就可以继续了。
好像是这样的

milanrambo

提示，syntax error: Variable must be followed by = sign

光杆司令

milanrambo 发表于 2018-12-10 10:29
提示，syntax error: Variable must be followed by = sign

应该只能在2013后的版本中使用

lyardan

光杆司令 发表于 2018-12-10 12:17
应该只能在2013后的版本中使用

另存为ANSI编码就可以

光杆司令

lyardan 发表于 2018-12-10 18:40
另存为ANSI编码就可以

应该可以，我都是在老版本的手册里查的“ZPL函数”。

heavymetal

请教下，这个宏和zemax中 材料名+/p 作用是一样的吗？

光杆司令

heavymetal 发表于 2018-12-10 23:49
请教下，这个宏和zemax中 材料名+/p 作用是一样的吗？

应该是乱码了，代码中没有“+/p”~

逐风

多谢多谢，能问下，替换材料后应该是光焦度不变，我试了下，把caf2替换成S-FPL53，咋单镜片光焦度变了呢

光杆司令

笨NANA 发表于 2018-12-12 08:42
多谢多谢，能问下，替换材料后应该是光焦度不变，我试了下，把caf2替换成S-FPL53，咋单镜片光焦度变了呢

你好，不知道变了多少？你可以打开Reports->Surface Data，查看前后的光焦度变化
我目前使用这个代码测试了数十次，没发现大问题。