第一行設定整個光線矩陣為零。第二行放入隨機數噪聲在數組中，仿真自發輻射所造成的噪聲影響。
大部份的雷射都從自發輻射開始，所以此一設定更增加了真實性，而不是簡單的平面波而已。當然，穩定態的解不會因為我們的初始條件而有所影響。
energy/norm 1 1 # normalize energy
此行調整光線的強度，不需要改變其外形，所以其總能量將會是歸一化的。我們將會量測能量在每次傳遞后并減1，此一差異將表示出能量的損失。
pass = 0 # initialize variable
將pass這個變數設為0
reson/run 100
執行reson此一宏100次，有時候我們會需要執行超過100次或少于100次的執行得到穩定
的效能。
title Energy loss per pass
定義下式繪圖所使用的標題
plot/watch plot1.plt # set plot name
此指令建立繪圖文件名稱。繪圖數據將會儲存在此一檔案中。Watch程序會自動的顯示繪圖數據并自動更新數據，當新的繪圖數據建立在同一個文件名稱中。Watch將會針對不同的文件名稱建立不同的繪圖窗口。可以讓我們同時觀察到許多圖形。
plot/udata min=-.05 max=.0
此行畫出在宏中使用udata/set所收集的數據。最小及最大值的定義更有效的顯示出損失。
title diffraction mode shape
此行定義下圖的標題
set/density 32 # set plot grid to 32 x 32
set/window/abs -.05 .05 -.05 .05
第一行定義網格線密度為32x32。第二行定義繪圖寬度為0.05 x 0.05 cm。此指令讓繪圖區域正好足夠繪出主要的光線部份。
plot/watch plot2.plt # set plot name
此行定義新的繪圖檔案。Watch將會定義新的繪圖窗口給新的檔案。
plot/iso 1
此行定義等比例圖顯示共振圖的模態在100次的傳遞后。因為我們開始于隨機數噪聲，經過100步
之后并未完全收斂，還有一些低階的Hermite-gaussian模式存在。如果我們執行更多步計算，終究會得到期待的穩定高斯模態。
執行此一檔案只要輸入read/disk resonator.inp就可執行剛才輸入的指令 |
