minor tweaks

Fraktalism/julias.f90

@@ -86,8 +86,8 @@ subroutine julia_colormapped(pic, cx, cy, maxiter)
             pic(ix, iy)%b = mod(abs(int(aimag(Z)*140)), 255)
           else
             pic(ix, iy)%r = mod(iter*33, 255)
-            pic(ix, iy)%g = mod(iter*29, 255)
-            pic(ix, iy)%b = mod(iter*21, 255)
+            pic(ix, iy)%g = mod(iter*59, 255)
+            pic(ix, iy)%b = mod(iter*41, 255)
           endif
       enddo      ! iy
     enddo        ! ix

Fraktalism/mkjulia.f90

@@ -26,7 +26,7 @@ program julia
     call getarg(2, string)       ;   read (string, *) cx
     call getarg(3, string)       ;   read (string, *) cy
 
-    allocate(picz(640, 480))
+    allocate(picz(512, 342))
 
     call julia_colormapped(picz, cx, cy, 500)
     call rgbpix_spit_as_pnm_8(picz, trim(filename))

Fraktalism/mkjuliagif.sh

@@ -25,6 +25,8 @@ do
 
 	./mkjulia $img $cx $cy
 
+	sleep 145
+
 done
 
 ./tagpicz.sh $workdir

Fraktalism/tagpicz.sh

@@ -15,12 +15,12 @@ fi
 for img in $SDIR/*.pnm
 do
 
-	mogrify					\
-		-gravity South-East		\
-		-font Courier			\
-		-pointsize 12			\
-		-fill Yellow			\
-		-annotate +10+10 "tTh 2023"	\
+	mogrify						\
+		-gravity South-East			\
+		-font Courier				\
+		-pointsize 12				\
+		-fill firebrick				\
+		-annotate +10+10 "Konrad+tTh 2023"	\
 		$img
 	echo "tagging " $img