I've been asked by a lecturer (I work at a University) to add colour to the formatting options. If I can work out how to do it I'll probably add emoticons too. Any hints or suggestions would be very welcome!
UPDATE 6th Dec.
Emoticons seem to be working ok. I added some gif images from http://www.smileyarena.com/ to the resources section, added this function to the WikiPage class
' Mark Bryson Dec 06. Char strings replaced by codes for images in db resources<br/>
' e.g. :oops: becomes <img src="/ContEd/HilsWiki.nsf/oops.gif" title="oops" alt="oops"><br/>
' to alter or add, adjust the split names below and resource area images accordingly<br/>
Public Function parseEmoticons (txt As String) As String<br/>
Dim t As String<br/>
Dim emoticons As Variant<br/>
emoticons = Split("angry ask doh eek hush laugh laff mad nono oops sick", " ")<br/>
t$ = txt$<br/>
Forall e In emoticons<br/>
If Instr ( 1, txt$, ":" & e & ":", 5 ) > 0 Then<br/>
t$ = Replace(t$, ":" & e & ":", {<img src="/} & dbPath$ & {/} & e & {.gif" title="} &e & {" alt="} & e & {">} )<br/>
End If<br/>
End Forall<br/>
parseEmoticons = t$<br/>
End Function <br/>
and called it from the wikiFormat function just after the call to table support
'// ADDED 05-Feb-2006 Ralf Lutter: table support<br/>
s1 = parseTables(s1)<br/>
<br/>
' added Dec 06 - emoticons support<br/>
s1 = parseEmoticons(s1)<br/>
Once we've settled on an appropriate set of images, I'll probably make them all the same size and add height and width to the code insert. This hasn't been tested with large pages - or tested much at all really, if you use it please bear that in mind.