OpenGL Commands

Hi.
At first I thought to create a little program that will add the documents of each command in the OpenGL.Bmx from Chapter 5 of the Blue Book but I lost my way thru the html file.
So I created the minimum program to high light the OpenGL commands

SuperStrict

Local file:TStream = OpenFile("opengl.bmx")
Local doc:String = "Rem~nbbdoc:~nEnd Rem~n"
Local newFile:TStream = WriteFile("newopengl.bmx")
Local OriginalFile:TStream = WriteFile("OriginalOpengl.bmx")
Local line:String
While Not Eof(file)
	line = ReadLine(file)
	WriteLine( OriginalFile , line)
	If line.find("Const") = 0 
		WriteString(newFile , doc)
		Print "ok"
	Else
		If line.find("Function") = 0 Then WriteString(newFile , doc)
	End If
	WriteLine(newFile , line)
Wend
End

By the way I have done this thing you will have to save the file in the same directory that contains the OpenGL.Bmx witch is if the main directory of BlitzMax is C:\BlitzMax the directory C:\BlitzMax\mod\pub.mod\opengl.mod
This will create the files:
newopengl.bmx
and
originalopengl.bmx
after that delete or rename the opengl.bmx
and rename the newopengl.bmx to opengl.bmx
Build the module, docmods and you are done.

I thing that if someone find a way around the html file that I had posted and create an app to pass all the information inside the opengl.bmx that will be great.

I think it would be a great idea to have every OpenGL command not only hilighting properly but also with integrated doc help detailing every command, what it does, how to use it, syntax, related commands, etc, like in the blue book. I think this should come as standard with BlitzMax, since OpenGL is an integrated part of the system.