[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [APD] double dropchecker setup



Hey Steve.

> Part of the problem, as I sorta pointed out before, is that the colors in
> your color card seem to be wrong.  You assume your last color for pH 7.0
> is "blue" or "blue green" and yet it REALLY seems like it should be green....

Again, I am not assuming the last color I am using is pH 7.0.  I am
using this image with the pH values, provided by Aquarium Pharm:
http://www.aquariacentral.com/forums/attachment.php?attachmentid=69291&d=1226809951

I am cutting out 7.2 and 7.6 pH for the purposes of the chart.  It's
an image provided by API.  I am happy to use another image!  But what
other image can I use from the manufacturer in such a way I can place
my own values beside it?  ie: a flat card like the image above is
ideal.

Try the yellow out one more time.  All it does is assume yellow is
6.0pH with no real range or variance for yellow.

On Tue, May 1, 2012 at 12:22 PM,  <rader at hep_wisc.edu> wrote:
>
> The perl code I use for labeling my pH cards follows, fwiw.  It assumes
> you're using the API freshwater pH color card.  Example output:
>
>  $ dropchecker 3.0
>  For a 3.0 dKH reference solution...
>  pH 6.0 yellow        90 ppm co2
>  pH 6.4 yellow-green  35 ppm co2
>  pH 6.6 light-green   22 ppm co2
>  pH 6.8 green         14 ppm co2
>  pH 7.0 green         9 ppm co2
>  pH 7.2 dark-green    5 ppm co2
>  pH 7.6 blue-green    2 ppm co2
>  $ dropchecker 3.4
>  For a 3.4 dKH reference solution...
>  pH 6.0 yellow        102 ppm co2
>  pH 6.4 yellow-green  40 ppm co2
>  pH 6.6 light-green   25 ppm co2
>  pH 6.8 green         16 ppm co2
>  pH 7.0 green         10 ppm co2
>  pH 7.2 dark-green    6 ppm co2
>  pH 7.6 blue-green    2 ppm co2
>
> steve
> --
>
> #!/usr/bin/perl -w
>
> %colors = qw( 6.0 yellow 6.4 yellow-green 6.6 light-green
>  6.8 green 7.0 green 7.2 dark-green 7.6 blue-green );
>
> if ( $ARGV[0] ) { $kh = $ARGV[0] } else { $kh = 4; }
>
> print "For a $kh dKH reference solution...\n";
> for my $ph qw(6.0 6.4 6.6 6.8 7.0 7.2 7.6) {
>  my $co2 = sprintf("%d", 3 * $kh * 10**(7-$ph));
>  printf "pH $ph %-12s  $co2 ppm co2\n", $colors{$ph};
> }
>

_______________________________________________
Aquatic-Plants mailing list
Aquatic-Plants at actwin_com
http://mailman.actwin.com/mailman/listinfo/aquatic-plants