瀏覽代碼

[fixed] cleanup of variables in shortgs

anjuna krokus 1 月之前
父節點
當前提交
674db27fd8
共有 1 個文件被更改,包括 4 次插入1 次删除
  1. 4 1
      locations/shortgs.qsrc

+ 4 - 1
locations/shortgs.qsrc

@@ -131,8 +131,11 @@ end
 if $ARGS[0] = 'doy':
 	doy_N1 = 275 * ARGS[2] / 9
 	doy_N2 = (ARGS[2] + 9) / 12
-	doy_N3 = 1 + (ARGS[1] - 4 * (ARGS[1] / 4) + 2) / 3
+	doy_N3 = 1 + (ARGS[1] - (4 * (ARGS[1] / 4)) + 2) / 3
 	result = doy_N1 - (doy_N2 * doy_N3) + ARGS[3] - 30
+	killvar 'doy_N1'
+	killvar 'doy_N2'
+	killvar 'doy_N3'
 end
 
 if $ARGS[0] = 'mk1':