Oops
- Posted by Adam Weeden <theskaman at MINDSPRING.COM> Apr 08, 1999
- 461 views
------=_NextPart_000_0012_01BE8187.0CA72040 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable I had some typos with that previous mail the type should read like this: type RGB_Trip(sequence redgreenblue) integer l, i l =3D length(redgreenblue) if l !=3D 3 then return 0 end if for i =3D 1 to 3 do if sequence(redgreenblue[i]) then return 0 elsif redgreenblue[i] < 0 then return 0 elsif redgreenblue[i] > #FF then return 0 end if end for end type ------=_NextPart_000_0012_01BE8187.0CA72040 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type> <META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT color=3D#000000 size=3D2>I had some typos with that previous = mail the=20 type should read like this:</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT color=3D#000000 size=3D2>type RGB_Trip(sequence=20 redgreenblue)</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT color=3D#000000 size=3D2> integer l, = i</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT color=3D#000000 size=3D2> l =3D=20 length(redgreenblue)<BR> if l !=3D 3=20 then<BR> return 0<BR> end=20 if<BR> for i =3D 1 to 3 do<BR> = if=20 sequence(redgreenblue[i])=20 then<BR> return=20 0<BR> elsif redgreenblue[i] < 0=20 then<BR> return=20 0<BR> elsif redgreenblue[i] > #FF=20 then<BR> return=20 0<BR> end if</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT color=3D#000000 size=3D2> end for</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT color=3D#000000 size=3D2>end = ------=_NextPart_000_0012_01BE8187.0CA72040--