請幫忙寫個圓孔衍射的程序

偶是新手，不明白里面的衍射是怎么弄的，請各位大俠幫忙寫個圓孔衍射的程序看看行嗎？在DETECTOR顯示出衍射圖樣來？希望把程序命令帖出來。
謝謝！
自己根據(jù)例子改了一個，但是發(fā)現(xiàn)出來的圖像和matlab的不一樣，相差很大，覺得應(yīng)該是錯了，請大家?guī)兔纯磫h？

SYSTEM NEW
RESET
UNITS UM 'W'