my $baseTheme = "AppTheme.NoActionBar";
+use constant STEP_DEGREES => 5;
+
# # hsb
-# for( my $hue = 0; $hue < 360; $hue += 15 ) {
-# printf "<style name=\"%s.%d\" parent=\"%s\">\n",
+# for( my $hue = 0; $hue < 360; $hue += STEP_DEGREES ) {
+# printf "<style name=\"%s.%03d\" parent=\"%s\">\n",
# $baseTheme, $hue, $baseTheme;
# printf " <item name=\"colorPrimary\">#%s</item>\n",
# hsvHex($hue/360.0, 0.61, 0.95);
my $out = shift;
my $baseIndent = shift;
$out->print(hslStyleForHue($baseColorHue, undef, $baseIndent));
- for( my $hue = 0; $hue < 360; $hue += 15 ) {
+ for( my $hue = 0; $hue < 360; $hue += STEP_DEGREES ) {
$out->print("\n");
$out->print(hslStyleForHue($hue, $baseTheme, $baseIndent));
}
my $indent = "$baseIndent ";
if ($base) {
- $result .= sprintf "$baseIndent<style name=\"%s.%d\" parent=\"%s\">\n",
+ $result .= sprintf "$baseIndent<style name=\"%s.%03d\" parent=\"%s\">\n",
$baseTheme, $hue, $baseTheme;
}
else {
$baseTheme;
$result .= "$indent<item name=\"windowActionBar\">false</item>\n";
$result .= "$indent<item name=\"windowNoTitle\">true</item>\n";
- $result .= "$indent<item name=\"textColor\">#8a000000</item>\n";
+ $result .= "$indent<item name=\"textColor\">#757575</item>\n";
}
my $S = 0.845;
$result .= sprintf "$indent<item name=\"colorPrimary\">#%s</item>\n",