Gecko [ elibrary.unsap.ac.id ]

Windows NT WIN-F6SLGVICLOP 10.0 build 17763 (Windows Server 2016) AMD64
Microsoft-IIS/10.0
Server IP : & Your IP : 3.135.194.164
Domains : Cant Read [ /etc/named.conf ]
User : elibrary.unsap.ac.id

Name	Size	Permission	Date
README.txt	1.41 KB	-rw-rw-rw-	2020-02-14 07:54
color_range.example.php	1.06 KB	-rw-rw-rw-	2020-02-14 07:54
color_range.php	3.44 KB	-rw-rw-rw-	2020-02-14 07:54
color_range.test1.php	1.5 KB	-rw-rw-rw-	2020-02-14 07:54
color_range.test2.php	2.54 KB	-rw-rw-rw-	2020-02-14 07:54
prune_labels.example.php	892 B	-rw-rw-rw-	2020-02-14 07:54
prune_labels.php	1.29 KB	-rw-rw-rw-	2020-02-14 07:54
prune_labels.test.php	1.16 KB	-rw-rw-rw-	2020-02-14 07:54

Rename

<?php
# PHPlot / contrib / color_range : Test 1, make a picture
# $Id: color_range.test1.php,v 1.1 2009/12/09 03:45:49 lbayuk Exp $
# This creates a PNG file on output with a color gradient.

require_once 'color_range.php';

function usage()
{
   fwrite(STDERR, "Usage: color_range.test1.php color1 color2 number_of_colors
Each color is of the form rrggbb with 2 digit hex color components.
");
   exit(1);
}

# Split color "rrggbb" into separate components. Code is from PHPlot.
function rgb($color)
{
  return array(hexdec(substr($color, 1, 2)),
               hexdec(substr($color, 3, 2)),
               hexdec(substr($color, 5, 2)));
}

if ($_SERVER['argc'] != 4) usage();

$color1 = rgb($_SERVER['argv'][1]);
$color2 = rgb($_SERVER['argv'][2]);
$n_col = (int)$_SERVER['argv'][3];
if ($n_col < 2) usage();

# Build a color map from colors[0]=color1 to colors[$n_col-1]=color2.
$colors = color_range($color1, $color2, $n_col);

# Make a picture:
$w = 800;
$h = 800;
$im = imagecreate($w, $h);
$background = imagecolorresolve($im, 0, 0, 0);
for ($col = 0; $col < $n_col; $col++) {
    list($r, $g, $b) = $colors[$col];
    $colmap[$col] = imagecolorresolve($im, $r, $g, $b);
}

$margin = 20;
$bar_width = (int)(($w - 2 * $margin) / $n_col);
$x1 = $margin;
$x2 = $x1 + $bar_width;
$y1 = $margin;
$y2 = $h - $margin;
for ($col = 0; $col < $n_col; $col++) {
    imagefilledrectangle($im, $x1, $y1, $x2, $y2, $colmap[$col]);
    $x1 = $x2;
    $x2 += $bar_width;
}
imagepng($im);