%\title{Barras de colores SMPTE RP 219-2002}
\documentclass[svgnames]{standalone}
\usepackage{tikz, verbatim}
\input{definido} % Archivo de definición de colores y dimensiones.
\begin{comment}
Esta imagen es una "carta de ajuste", dividida en 4 franjas o patrones, usada en televisión de Alta Definición para comprobar la fidelidad de las señales de color transmitidas. Este patrón, en la actualidad, se encuentra incorporado a los equipos usados para pruebas de televisión en transmisores que se encuentran en mantenimiento.
La cantidad de barras y tonalidades de color en cada franja se encuentran definidos en la norma estadounidense SMPTE RP 219-2002, que es la variante en Alta Definición de la norma SMPTE EG-1-1990 y que es descrita en parte en el documento "Audio/Video Connectivity Solutions for Virtex-II Pro and Virtex-4 FPGAs (http://www.xilinx.com/support/documentation/application_notes/xapp514.pdf) pp 383-384 y las dimensiones aproximadas de los patrones están en el estándar japonés ARIB STD-B28 (http://www.arib.or.jp/english/html/overview/doc/6-STD-B28v1_0-E1.pdf) página 8.
\end{comment}
\begin{document}
\begin{tikzpicture}
% Primer patrón, de altura \b
\fill [Gray!80!Black] (0,\barb) rectangle (\d,\b); % Gris al 40% de negro
\foreach \x / \y [evaluate=\x as \z using int(\x-1)] in {1/White, 2/Yellow, 3/Cyan, 4/green, 5/Magenta, 6/Red, 7/Blue}{
\fill [\y!75!Black] (\d+\x*\c, \barb) rectangle (\d+\z*\c,\b);
}
\fill [Gray!80!Black] (\d+7*\c, \barb) rectangle (\a,\b);
% Segundo patrón, de altura \barb
\fill [Cyan] (0,\barc) rectangle (\d,\barb);
\fill [Black Pearl] (\d,\barc) rectangle (\c+\d,\barb); % Señal -I
\fill [White!75!Black] (\c+\d,\barc) rectangle (\d+0.75*\a, \barb);
\fill [Blue] (\d+0.75*\a, \barc) rectangle (\a, \barb);
% Tercer patrón, de altura \barc
\fill [Yellow] (0,\bard) rectangle (\d,\barc);
\fill [Blackcurrant] (\d,\bard) rectangle (\c+\d,\barc); % Señal +Q
\fill [left color=Black, right color= White] (\c+\d,\bard) rectangle (\d+0.75*\a,\barc);
\fill [Red] (\d+0.75*\a,\bard) rectangle (\a,\barc);
% Cuarto patrón, de altura \bard
\fill [Gray!30!Black] (0,0) rectangle (\d,\bard); % Gris al 15% de negro.
\fill [Black] (\d,0) rectangle (\d+1.5*\c,\bard);
\fill [White] (\d+1.5*\c,0) rectangle (\d+3.5*\c,\bard);
\fill [Black] (\d+3.5*\c,0) rectangle (\d+5*\c,\bard);
\fill [Negro1] (\d+5*\c,0) rectangle (\d+5.33*\c,\bard);
\fill [Black] (\d+5.33*\c,0) rectangle (\d+5.66*\c,\bard);
\fill [Negro2] (\d+5.66*\c,0) rectangle (\d+6*\c,\bard);
\fill [Black] (\d+6*\c,0) rectangle (\d+7*\c,\bard);
\fill [Gray!30!Black] (\d+7*\c,0) rectangle (\a,\bard);
\end{tikzpicture}
\end{document}