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就可執行剛才輸入的指令