Skip to main content

ZPL

Find out how you can save time and energy using the Zemax Programming Language!

  • 208 Topics
  • 566 Replies
208 Topics
MRudolf
MRudolfMonochrome
asked in ZPL
ZPL Macro takes long time for SAVEWINDOW function

Hello,The following  ZPL-macro is run which performs a geometric analysis and then saves the text of this window: OPENANALYSISWINDOW IMA, GIA_cfg_file$n_GIA_window = WINL()SAVEWINDOW n_GIA_window, A$ The size of the image is 125 pixels, resulting in a text file size of 400 KBWhat I observed is that the time it takes to execute the SAVEWINDOW function takes a very long time of about 20 seconds (!), regardless of whether the text file is a temporary or permanent file.The saving takes nearly as long as the execution of the image analysis.However, if the text output of the very same “Geometric Image Analysis” window is saved manually to the very same file A$, the saving is performed in no time.The subsequent extracting of specific strings from this text file by using OPEN, READSKIP and READSTRING  is also  executed within “no” time. So my question is:why is SAVEWINDOW so slow or more importantly: how can I significantly speed up the saving process?Best regards, Marcel Zemax-Version:  Ansys

251
David.Nguyen
Luminary
Matteo
MatteoMonochrome
asked in ZPL
ZPL: Find largest / lowest 100-pixel values on NSC detector

Hi everybody,I would like to write a macro in which I determine the 100 largest and smallest pixel values on a detector. Only pixels in a certain region of interest should be considered. I have already successfully implemented the criterion of whether a pixel is within the ROI.I also have a solution in mind for determining the 100 largest and smallest values, which I think should already work.When I run the macro, the array with the values also fills up at first, but at some point it stops and no new values are added.Do you guys have an idea why this is not working? Could there be some kind of buffer overflow or so? Or do I have a fundamental error in my macro?I added my macro and an exemplary result belowThanks for any help or hint :)  Best,Matteo ! Calculates the max and min intensity (from the 100 largest and lowest pixels) in a circle centered in the detector plane! Calculates the uniformity = min/max from the in that circledetector = 28size = 51max_radius = 25center = 26total = si

724
David.Nguyen
Luminary
KH Kim
KH KimSingle Emitter
posted in ZPL
Q-type F-number solve problem

When I use Q-Type Asphere (Qcon), F-number solve calculates wrong value.I want to know if this is solve error.If this is an solve calculation error at Q-Type, I hope to fix it.  Radius Solve: F-number 2.65<Standard> <Q-type Asphere (QCon)>All extended parameters values are zero. 

190
KH Kim
sparky
sparkyMonochrome
asked in ZPL
multi-fiber data POP optimization

Hi,I am trying to optimize a simple lens that focuses and couples a Gaussian beam into two different fibers. I want to optimize a lens that will yield the best combined coupling efficiency for both fibers. Just to clarify, the beam will be coupled into one fiber at a time, but the same lens will be used to couple a Gaussian beam into both fibers. The fibers are represented by .zbf files which are loaded in the Fiber Data tab in Physical Optics. Right now, I’ve written two ZPL macros that will each open a different .zbf, and they are called in the MFE using two separate ZPLM operands. Each ZPLM operand is immediately followed by a POPD operand to get the coupling efficiency which is then optimized, as shown below. I am not sure if this works as intended. When optimizing, are the operands in the MFE cycled in a loop, so to speak? Also is there a more elegant way of doing this, other than using ZOS-API, or should I use ZOS?Thank you,Sam

300
sparky
Xing
XingSingle Emitter
asked in ZPL
For loop start and end

I tried those code:FOR i = -0.500, 0.500, 0.1      PRINT $STR(i)," ",NEXTPRINT! This one starts from -0.5 and ends at 0.5FOR i = -0.500, 0.500, 0.05      PRINT $STR(i)," ",NEXTPRINT! This one starts from -0.5 and ends at 0.5FOR i = -0.500, 0.500, 0.01      PRINT $STR(i)," ",NEXTPRINT! This one starts from -0.5 and ends at 0.49, WHY? Thanks!Xing 

472
Xing
S
simon.schroeder_01Infrared
asked in ZPL
ZPL Detector Viewer Update

Hi,I would like to use zpl to update my detector viewer and save it as an image.However, neither Ray Database nor Filter are adjusted in the detector viewer.#trace rays & evaluate Detectorfilter$ = "h3&h6&!x_hitface(8,0)&!x_hitface(8,2)&!x_hitface(4,0)&(x_hitface(7,1)|x_hitface(7,0))"filter2$="h3&h6&!x_hitface(8,0)&!x_hitface(8,2)&!x_hitface(4,0)"fileName$ = "ZMPRays.ZRD"NSTR 1, 0,0,0,0,1,0,1,fileName$temp = NSDD(1,0,0,0) ZRDPlayback fileName$,1,0,1, filter2$UPDATE ALLPRINT NSDD(1,9,0,0)ZRDPlayback fileName$,1,0,1, filter$UPDATE ALLPRINT NSDD(1,9,0,0)settingsFile$= "...\Zemax\Configs\DVR.CFG"MODIFYSETTINGS settingsFile$, DVW_ZRD, fileName$MODIFYSETTINGS settingsFile$, DVW_FILTER, filter$UPDATE ALLThe  PRINT NSDD(….) commands give the correct outputs, but the detector viewer is not updated.How can I use ZPL to update the detector viewer using the Ray Database fileName$ and the filter string filter$?

1036
S
Egis
EgisSingle Emitter
asked in ZPL
Through Focus Spot Diagrams separated by wavelengths

The current Through Focus Spot Diagram (TFSD) merges all wavelengths in the same plot, however it provides separation between fields. Right now I’m cloning windows and set the wavelength separate in each window.Is it possible to have a “simple” script to have them separate by wavelengths for a single field? What could be a command for the TFSD plot then?In principle it gives a different view to a Focal Shift.  

360
Egis
M
Marc.DerrienInfrared
asked in ZPL
ZRDPLAYBACK no longer works?

Hi,I would like to use the ZRDPLAYBACK function, but it doesn't seem to work, I think it doesn't take filters string into account.I have similar problem iy I use a function like  NSTR 1, 1, 0, 0, 1, 1, 1, 1, A$ ,”W1”,2Marc.

734
M
Kris
KrisInfrared
asked in ZPL
Variable type conversion in ZPL

Good day everyone,since ZPL is based on BASIC, I thought some of it generic functions could be used for converting variable types such as VAL(), INT() etc. Only $STR works, the other conversions are not recognized by ZPL.In particular, I want to define a single variable in my script (a particular detector number) and use it for both console output (with PRINT), non-sequential raytrace (with NSTR) and changing Detector Viewer settings (with MODIFYSETTINGS).I could define either a numerical variable and change it to string, but doing so outputs a floating point number (such as 5.000 for instance). Unfortunately, NSTR is having trouble with "h5.000” filter string. Then I thought I can define a string variable "5” and change it to numerical but no commands that I know seem to work. Is there a solution to my issue that would allow me to stay within ZPL script, not switching to ZOS-API?

25319
Kris
T
Tali.mutatInfrared
posted in ZPL
Gaussian to uniform radial ditribution beam shaper

Dear Zemax community,I am building upon your 'How to design a Gaussian to Top Hat beam shaper' tutorial.Instaed of TOP HAT, my goal is to create a Uuniform Radial Distribution at distance of 1M from the  beam shaper.i.e my goal is to create a uniform distribution on a sagment from a rolled screen. But the ZPL calculates the desired distribuion up on a flat wall, so what should be the distribution up on a “Flat screen” , so it generates a unifrom radial on a rolled sceen ? Any suggestions are welcome and appreciated.Thank you very much, Tali

632
T
Y
yonghong.LiInfrared
asked in ZPL
ZPL output err

when i use ZPL output to a text file , The output always stops halfway, and Zemax prompts "cannot open text file". Does anyone know why? For example, I plan to output 40,000 lines of data, but it stops at 10,000.

633
Y
HM Light
HM LightSingle Emitter
asked in ZPL
Why does my macro output results from 1 previous macro run?

I have a question about Zemax Macro. My macro outputs the results from 1 previous macro setting, even though I edit and save the new setting in the macro every time. I put the screenshot that explain this problem. I have no idea why it happens, so I would like to have any suggestion and comments.  

492
HM Light
JSavastinuk
JSavastinukSingle Emitter
asked in ZPL
Doesag vs phases macro zones are different

I have run both the “phases” macro to locate where the steps are for a binary 2 on an aspheric surface and the “DoeSag” macro. However, I get different results as the radius increases. Sometimes, the number of zones ends up different.Which one is correct? I’ve used the “phases” macro for a long time without much issue. Recently, we have had requests for the sag tables on a binary, but I’m not sure I can trust the DoeSag results as the number of zones and zone locations do not match.

391
C
Fully Spectral
jhimavanth
jhimavanthMonochrome
posted in ZPL
Getting MTF values for Montecarlo runs

How to get FFT MTF, EFL values of Montecarlo runs when RMS wavefront is selected as criteria in tolerancing, any macro is available or can be done 

1143
Y
P
Patrick.CronkiteVisible
posted in ZPL
Access to field "Convert To" function in ZPL macro

Is there a way to access the field 'Convert To' function in a ZPL macro?  If not, can this be added to the new features list? Thanks. Pat.

2277
Jay.Bernal
Hossein
HosseinSingle Emitter
asked in ZPL
How to write a Macro to scan in XY and get efficiency

Hi everyone,I am new here and trying to write a macro for a simple setup that I have. I have a beam at source with specific NA and goes through few optics and get focused on a surface with floating aperture. My inputs are relative position of source/object respect to image in X and Y and output is efficiency at “Geometric Image Analysis”. How can I write such a Macro? 

1503
Hossein
Lydon Wong
Lydon WongSingle Emitter
asked in ZPL
ZPL Macro for Picking up 'Before surface tilt/decenter'

Hello Optics Team! I meet a question when writing ZPL. There is a mirror-reflected system and I would like to do the sensitivity analysis on some tolerances. When it comes to decenter, I found that it was difficult to pick up a surface’s ‘Before surface tilt/decenter’. There is a function of picking up ‘After surface tilt/decenter’ (SURP 66) but no such a function for ‘Before surface tilt/decenter’.Anyone have some experience about it? Thank you!

672
David.Nguyen
Luminary
Ryan.Burdick
Ryan.BurdickMonochrome
asked in ZPL
Simple ZPL print statements not appearing anywhere

I’m trying to run a simple macro to test printing to screen:PRINT “Hello world”When I run this, all that appears is a text viewer saying “Executing path/to/macro...” and nothing else. I tried adding OUTPUT SCREEN before the print statement to make sure the statement prints to screen, but same issue.Any advice?

1052
Ryan.Burdick
JenR
JenRInfrared
asked in ZPL
How can you write slope cross-section analysis text results to a file?

Hi,I would like to write a macro that runs the surface slope analysis and outputs the “Text” tab results (X-Coord, Y-Coord, and Slope) to a file. I was thinking of using GetTextFile, but I don’t see a string code for surface slope cross section (or slope either). What’s the best way to do this?Thank you,-Jen

1198
JenR
Leon
LeonInfrared
asked in ZPL
Question about ZPLM parameters in merit function editor box

Question 1: what de Ex and Ey mean? I cannot find answers in user manuQuestion 2: non-sequential mode launches rays in a partial random manner, how Hx, Hy, Px, Py work for random rays? 

1022
Leon
gsun86
gsun86Monochrome
asked in ZPL
Is there a build-in ZEMAX macro command to delete all surfaces in the lens table except the object and image?

I wrote a macro to do this but it is slow (line by line).  Is there a build-in method to do this?  I can’t find it in the user manual. Thanks! sub clear_all_lenses    num_s = nsur()    if (num_s > 2)        for i, num_s-1, 1, -1            !print "delete surface ",i            delete i        next    endifreturn

904
gsun86
gsun86
gsun86Monochrome
asked in ZPL
In ZEMAX macro, is there a solve operand to do coordinate return for tilt + decenter on a coordinate surface?

I searched in the help files but didn’t find one.  Thanks.

952
gsun86
B
bgdi10262Infrared
asked in ZPL
How to use ZBFTILT?

Hi Everyone,I would like to ask how to use zbftilt? The help document reads a bit confusing: This keyword requires the name of the ZBF file and four numbers. The phase of the beam is modified by a phase angle given by θ = ( x – cx )tx + ( y – cy )ty . The cx and cy values are the center of the phase tilt, and tx and ty are the slopes of the tilt in units of radians per lens unit length. The coordinates x and y refer to positions within the beam file, with the center coordinate (x = 0, y = 0) being at the point (nx/2 + 1, ny/2 + 1) where nx and ny are the number of points in the x and y directions. The length units in the ZBF file are converted automatically to the current lens units. The resulting data is written back to the same file name. If I want to rotate an elliptical beam mode by 90°, how should I write it?Thanks!Di

1167
S
Ansys Staff
N
Fully Spectral
nadav.amitaiFully Spectral
asked in ZPL
float to integer

Hi, Is there a way to change variable from float to integer?I want to use it to write list of polygons in loop:for i:n:polygon_name 1.pobpolygon_name 2.pobpolygon_name 3.pob….In other words, i dont want something like that: Thanks,Nadav….. 

1062
N
Fully Spectral
Masato.Aketagawa
Masato.AketagawaSingle Emitter
asked in ZPL
ZPL Improvements

The program in the following file assigns random values ​​to the specified Zernike terms. This ZPL works in non-sequential mode but not in sequential mode.Where do I need to modify it to make it work in sequential mode?Lens data is attached in another file.

1151
David.Nguyen
Luminary

Badge winners

  • Allow me to introduce myself
    eyal.dekelhas earned the badge Allow me to introduce myself
  • Visibly Un-Polarized
    Asukuhas earned the badge Visibly Un-Polarized
  • Allow me to introduce myself
    Bharathas earned the badge Allow me to introduce myself
  • Allow me to introduce myself
    Yryxhas earned the badge Allow me to introduce myself
  • Allow me to introduce myself
    curiouslearnerhas earned the badge Allow me to introduce myself
Show all badges
Community Posting GuidelinesCookie settings


Zemax Community

Need more help?

To Chinese users:

Do not provide any information or data that is restricted by applicable law, including by the People’s Republic of China’s Cybersecurity and Data Security Laws ( e.g., Important Data, National Core Data, etc.).


不要提供任何受适用法律，包括中华人民共和国的网络安全和数据安全法限制的信息或数据（如重要数据、国家核心数据等）。



Privacy policy   License Agreements    Terms of use    Cookie Policy   Zemax Account Licensing Policies