A configurable syntax-highlighter.
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en">
<head>
<title>Sample HTML</title>
<meta name="author" content="Dean Edwards"/>
<!-- keeping code tidy!! -->
<meta name="copyright" content="© copyright 2005, Dean Edwards"/>
<style type="text/css">
body {color: black;}
</style>
<script type="text/javascript">
onload = function() {
// do something
};
</script>
</head>
<body>
<p>Hello World!</p>
</body>
</html>
@import url(http://www.example.com/test.css);
/* comment */
@media screen {
div.document {
background-color: #eee;
width: 0;
}
}
// this is a "comment"
/* so is this */
var string = "/* string */";
alert('Hello \'Dean\'!');
function getText(a, b, c) {
if (a && b) return a + b + c.toString();
};
<?php
// author: dean@edwards.name
$string = "/* string */";
print('Hello Dean!');
function getText($a, $b, $c) {
return $a + $b + $c;
};
?>
So said the script writer: > I like *bold* text! :-) > > But the other man said: >> I like /italicised/ text. :( >> >> A third fellow chimed in: >>> I think _underlined_ text should suit you both. ;-) >>> >> _Hey_! He's right! :-) > _Groovy_. ;-)
Rem this is a "comment" ' so is this Function MyHex(ByVal Number) Dim Sign Const HexChars = "0123456789ABCDEF" Sign = Sgn(Number) Number = Fix(Abs(CDbl(number))) If Number = 0 Then MyHex = "0" Exit Function End If While Number > 0 MyHex = Mid(HexChars, 1 + (Number - 16 * Fix(Number / 16)), 1) & MyHex Number = Fix(Number/16) WEnd If Sign = -1 Then MyHex = "-" & MyHex End Function
CREATE PROC nth (
@table_name sysname,
@column_name sysname,
@nth int
)
AS
BEGIN
--Date written: December 23rd 2000
--Purpose: To find out the nth highest number in a column.
SET @table_name = RTRIM(@table_name)
SET @column_name = RTRIM(@column_name)
DECLARE @exec_str CHAR(400)
IF (SELECT OBJECT_ID(@table_name,'U')) IS NULL
BEGIN
RAISERROR('Invalid table name',18,1)
RETURN -1
END