// Writes current table into HTML format with pass/fail color coding on columns 2 and above. // Write HTML file header and table styling. Write( "\!N" ); Write( "\!N" ); Write( "\!N" ); Write( " \!N" || (Current Data Table() << Get Name()) || " " ); Write( " \!N" ); Write( "\!N" ); Write( "\!N" ); // Write the table. Write( "\!N" ); Write( "" ); // Write the column names. For( cc = 1, cc <= N Col(), cc++, Write( "" ); ); Write( "\!N" ); // Write data values. For Each Row( Write( "" ); For( cc = 1, cc <= N Col(), cc++, if ( cc > 2, // Don't color code first two rows. if ( Column( cc )[Row()] > 2000, // Change pass/fail value here. Write( "" ), Write( "" ) ), Write( "" ) ) ); Write( "\!N" ); ); Write( "
" || (Column( cc ) << Get Name()) || "
" || Char( Column( cc )[Row()], 10, 1 ) || "" || Char( Column( cc )[Row()], 10, 1 ) || "" || Char( Column( cc )[Row()] ) || "
\!N" ); // Write HTML closing tags. Write( "\!N" ); Write( "\!N" );