Mercurial > hg > octave-nkf
diff scripts/image/ntsc2rgb.m @ 1024:56520a75b5b3
[project @ 1995-01-11 20:30:04 by jwe]
author | jwe |
---|---|
date | Wed, 11 Jan 1995 20:30:04 +0000 |
parents | 4e826edfbc56 |
children | 611d403c7f3d |
line wrap: on
line diff
--- a/scripts/image/ntsc2rgb.m +++ b/scripts/image/ntsc2rgb.m @@ -1,6 +1,34 @@ -function rgb = ntsc2rgb(yiq) +# Copyright (C) 1995 John W. Eaton +# +# This file is part of Octave. +# +# Octave is free software; you can redistribute it and/or modify it +# under the terms of the GNU General Public License as published by the +# Free Software Foundation; either version 2, or (at your option) any +# later version. +# +# Octave is distributed in the hope that it will be useful, but WITHOUT +# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or +# FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +# for more details. +# +# You should have received a copy of the GNU General Public License +# along with Octave; see the file COPYING. If not, write to the Free +# Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. - trans = [ 1. 1. 1.; 0.95617 -0.27269 -1.10374; 0.62143 -0.64681 1.70062 ]; +function rgb = ntsc2rgb (yiq) + +# Image format conversion. + +# Written by Tony Richardson (amr@mpl.ucsd.edu) July 1994. + + if (nargin != 1) + usage ("ntsc2rgb (yiq)"); + endif + + trans = [ 1.0, 1.0, 1.0; + 0.95617, -0.27269, -1.10374; + 0.62143, -0.64681, 1.70062 ]; rgb = yiq * trans;