Highlighted forum codeblocks

I just modified this code, added a link at the bottom of the newly created code blocks that allows you to select the code.

// ==UserScript==
// @name	BlitzMax Code Highlighting
// @description Highlights BlitzMax code within codeblocks in the forums at blitzbasic.com
// @include http://blitzmax.com/*
// @include http://blitzbasic.com/*
// @include http://www.blitzmax.com/*
// @include http://www.blitzbasic.com/*
// ==/UserScript==

// keywords
var vartypes = [ "\$", "\!", "\%", "\#", "Byte", "Short", "Int", "Long", "Float", "Double", "String", "Object" ];

var keywords = [ "Strict","SuperStrict","End","True","False","Null","Pi","Nan","Var","Ptr","If","Then","Else","ElseIf","EndIf","For","To","Step","Next","EachIn",
"While","Wend","EndWhile","Repeat","Until","Forever","Select","EndSelect","Case","Default","Exit","Continue","Const","Local","Global",
"Field","Function","EndFunction","Type","EndType","Extends","Method","EndMethod","Abstract","Final","New","Self","Super","Delete",
"Release","Public","Private","Extern","EndExtern","Module","ModuleInfo","Incbin","IncbinPtr","IncbinLen","Include","Framework","Import",
"Assert","Goto","Try","EndTry","Catch","Throw","DefData","ReadData","RestoreData","And","Or","Not","Shl","Shr","Sar","Len","Abs","Mod",
"Sgn","Min","Max","Varptr","SizeOf","Asc","Chr","Return" ];

var blitz_mod = [ "RuntimeError", "DebugStop", "DebugLog", "AppDir", "AppFile", "AppTitle", "AppArgs", "LaunchDir", "OnEnd",
"ReadStdin", "WriteStdout", "WriteStderr", "Delay", "MilliSecs", "MemAlloc", "MemFree", "MemExtend",
"MemClear", "MemCopy", "MemMove", "GCSetMode", "GCSuspend", "GCResume", "GCCollect", "GCMemAlloced",
"GCEnter", "GCLeave", "HandleFromObject", "HandleToObject", "Print", "Input"]

function addGlobalStyle(css) {
    var head, style;
    head = document.getElementsByTagName('head')[0];
    if (!head) { return; }
    style = document.createElement('style');
    style.type = 'text/css';
    style.innerHTML = css;
    head.appendChild(style);
}
// color styles use by highlighter
addGlobalStyle(
	// background & normal text styles
	"pre.code, pre.codebox { background-color: #013c77 !important;  color: #f0f0f0 !important; }" +
	"pre.codebox { border: 2px solid gray !important; }" +
	// code styles
	".code-comment { color: #06bed9 !important; font-weight: none !important;  }" +
	".code-keyword { color: #fbfb00 !important; font-weight: none !important;  }" +
	".code-vartype { color: #fbc300 !important; font-weight: none !important;  }" +
	".code-string { color: #00f400 !important; font-weight: none !important;  }" +
	".code-number { color: #bbbbbb !important; font-weight: none !important;  }" +
	".code-attribute { color: #808080 !important; font-weight: none !important;  }"
);


function HighlightWord( source, word, style) {
	return source.replace( new RegExp( "\\b("+word+")\\b", "gim"), "<font class=" + style + ">$1</font>");
}

function Sanitize( source) {
	return source.replace( /<\/?font( class=code-(comment|keyword|vartype|string|number|attribute))?(>|$)/gi, "");
}

function HighlightSource( code) {
	// vartypes
	for( var x=0; x<vartypes.length; x++)	code = HighlightWord( code, vartypes[x], "code-vartype");
	// keywords
	for( var x=0; x<keywords.length; x++)	code = HighlightWord( code, keywords[x], "code-keyword");
	for( var x=0; x<blitz_mod.length; x++)	code = HighlightWord( code, blitz_mod[x], "code-keyword");
	// numerals
	code = code.replace( /\b(\$[a-f0-9]+|%[0-1]+|\d+(\.\d*)?)\b/gi, "<font class=code-number>$1</font>");	
	// attributes
	code = code.replace( /(\{[^\r\n\}]*\})/g, function(match,p) {
		return "<font class=code-attribute>"+Sanitize(p)+"</font>";
	});
	// strings
	code = code.replace( /("[^\r\n"]*")/g, function(match,p) {
		// hack to get around comments inside strings
		var s = Sanitize(p).replace( /'/g, "=SINGLE-QUOTE=")
		return "<font class=code-string>"+s+"</font>";
	});
	// comments
	code = code.replace( /('.*)$/gm, function(match,p) {
		return "<font class=code-comment>"+Sanitize(p)+"</font>";
	});
	code = code.replace( /^(Rem(\n|.)*EndRem)$/gim, function(match,p) {
		return "<font class=code-comment>"+Sanitize(p)+"</font>";
	});
	// hack to get around comments inside strings
	return code.replace( /=SINGLE-QUOTE=/g, "'");
}

// highlight all codebox elements on the page
var codes = document.evaluate( "//pre[@class='code']", document, null, XPathResult.UNORDERED_NODE_SNAPSHOT_TYPE, null);
for( var i=0; i<codes.snapshotLength; i++) {
	var e = codes.snapshotItem(i);
	e.id = "greasemonkey_bbcode_"+(i+1);
	e.innerHTML = HighlightSource( e.innerHTML);
	var a = document.createElement("a");
		a.href = "#";
		a.id = "greasemonkey_bbcode_"+(i+1)+"_a"
		a.addEventListener('click', selectCodeBoxCode, false);
		a.appendChild( document.createTextNode("Select Above Code") );
		a.style.marginTop = "0";
		e.style.marginBottom = "0";
	e.parentNode.insertBefore(a, e.nextSibling);
}

var codeboxes = document.evaluate( "//textarea[@class='codebox']", document, null, XPathResult.UNORDERED_NODE_SNAPSHOT_TYPE, null);
for( var i=0; i<codeboxes.snapshotLength; i++) {
	
	var e = codeboxes.snapshotItem(i);
	var c = document.createElement("pre");
	c.id = "greasemonkey_bbcodebox_"+(i+1);
	c.className = "codebox";
	c.style.overflow = "auto";
	c.style.width = 800;
	c.style.height = 300;
	c.style.fontSize = "1.5em";
	c.innerHTML = HighlightSource( e.innerHTML);
	e.parentNode.insertBefore( c, e);
	e.parentNode.removeChild(e);
	var a = document.createElement("a");
		a.href = "#";
		a.id = "greasemonkey_bbcodebox_"+(i+1)+"_a"
		a.addEventListener('click', selectCodeBoxCode, false);
		a.appendChild( document.createTextNode("Select Above Code") );
		a.style.marginTop = "0";
		c.style.marginBottom = "0";
	c.parentNode.insertBefore(a, c.nextSibling);
}

function selectCodeBoxCode(event){
	var userSelection;
	if (window.getSelection) {
		userSelection = window.getSelection();
	}	
	if (document.createRange){
		var oRange = document.createRange();
		var target = document.getElementById( this.id.substring( 0, this.id.length - 2 ) );
		oRange.selectNodeContents(target);
		userSelection.addRange(oRange);
	}
	event.preventDefault()
	return false;
}