Explorar el Código

[fixed] cleanup of variables in shortgs

anjuna krokus hace 1 mes
padre
commit
674db27fd8
Se han modificado 1 ficheros con 4 adiciones y 1 borrados
  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':