Shaggy
Support Moderator
Ireland
6780 Posts |
Posted - 17 January 2005 : 05:34:39
|
Ah, ok, assumed you had that bit done. You'll need to edit both inc_func_common.asp and inc_func_posting.asp to add the additional colours to the forum code.
Firstly, in the chkString() function of inc_func_common.asp, find the following block of code beginning at approximately line 433 and add to it as you need:fString = doCode(fString, "[red]", "[/red]", "<font color=""red"">", "</font id=""red"">")
fString = doCode(fString, "[green]", "[/green]", "<font color=""green"">", "</font id=""green"">")
fString = doCode(fString, "[blue]", "[/blue]", "<font color=""blue"">", "</font id=""blue"">")
fString = doCode(fString, "[white]", "[/white]", "<font color=""white"">", "</font id=""white"">")
fString = doCode(fString, "[purple]", "[/purple]", "<font color=""purple"">", "</font id=""purple"">")
fString = doCode(fString, "[yellow]", "[/yellow]", "<font color=""yellow"">", "</font id=""yellow"">")
fString = doCode(fString, "[violet]", "[/violet]", "<font color=""violet"">", "</font id=""violet"">")
fString = doCode(fString, "[brown]", "[/brown]", "<font color=""brown"">", "</font id=""brown"">")
fString = doCode(fString, "[black]", "[/black]", "<font color=""black"">", "</font id=""black"">")
fString = doCode(fString, "[pink]", "[/pink]", "<font color=""pink"">", "</font id=""pink"">")
fString = doCode(fString, "[orange]", "[/orange]", "<font color=""orange"">", "</font id=""orange"">")
fString = doCode(fString, "[gold]", "[/gold]", "<font color=""gold"">", "</font id=""gold"">")
fString = doCode(fString, "[beige]", "[/beige]", "<font color=""beige"">", "</font id=""beige"">")
fString = doCode(fString, "[teal]", "[/teal]", "<font color=""teal"">", "</font id=""teal"">")
fString = doCode(fString, "[navy]", "[/navy]", "<font color=""navy"">", "</font id=""navy"">")
fString = doCode(fString, "[maroon]", "[/maroon]", "<font color=""maroon"">", "</font id=""maroon"">")
fString = doCode(fString, "[limegreen]", "[/limegreen]", "<font color=""limegreen"">", "</font id=""limegreen"">") Then, in the CleanCode() function of inc_func_posting.asp, find the following begging at approximately line 218 and, again, add what you need to it:fString = replace(fString, "<font color=""red"">", "[red]", 1, -1, 1)
fString = replace(fString, "</font id=""red"">", "[/red]", 1, -1, 1)
fString = replace(fString, "<font color=""green"">", "[green]", 1, -1, 1)
fString = replace(fString, "</font id=""green"">", "[/green]", 1, -1, 1)
fString = replace(fString, "<font color=""blue"">", "[blue]", 1, -1, 1)
fString = replace(fString, "</font id=""blue"">", "[/blue]", 1, -1, 1)
fString = replace(fString, "<font color=""white"">", "[white]", 1, -1, 1)
fString = replace(fString, "</font id=""white"">", "[/white]", 1, -1, 1)
fString = replace(fString, "<font color=""purple"">", "[purple]", 1, -1, 1)
fString = replace(fString, "</font id=""purple"">", "[/purple]", 1, -1, 1)
fString = replace(fString, "<font color=""yellow"">", "[yellow]", 1, -1, 1)
fString = replace(fString, "</font id=""yellow"">", "[/yellow]", 1, -1, 1)
fString = replace(fString, "<font color=""violet"">", "[violet]", 1, -1, 1)
fString = replace(fString, "</font id=""violet"">", "[/violet]", 1, -1, 1)
fString = replace(fString, "<font color=""brown"">", "[brown]", 1, -1, 1)
fString = replace(fString, "</font id=""brown"">", "[/brown]", 1, -1, 1)
fString = replace(fString, "<font color=""black"">", "[black]", 1, -1, 1)
fString = replace(fString, "</font id=""black"">", "[/black]", 1, -1, 1)
fString = replace(fString, "<font color=""pink"">", "[pink]", 1, -1, 1)
fString = replace(fString, "</font id=""pink"">", "[/pink]", 1, -1, 1)
fString = replace(fString, "<font color=""orange"">", "[orange]", 1, -1, 1)
fString = replace(fString, "</font id=""orange"">", "[/orange]", 1, -1, 1)
fString = replace(fString, "<font color=""gold"">", "[gold]", 1, -1, 1)
fString = replace(fString, "</font id=""gold"">", "[/gold]", 1, -1, 1)
fString = replace(fString, "<font color=""beige"">", "[beige]", 1, -1, 1)
fString = replace(fString, "</font id=""beige"">", "[/beige]", 1, -1, 1)
fString = replace(fString, "<font color=""teal"">", "[teal]", 1, -1, 1)
fString = replace(fString, "</font id=""teal"">", "[/teal]", 1, -1, 1)
fString = replace(fString, "<font color=""navy"">", "[navy]", 1, -1, 1)
fString = replace(fString, "</font id=""navy"">", "[/navy]", 1, -1, 1)
fString = replace(fString, "<font color=""maroon"">", "[maroon]", 1, -1, 1)
fString = replace(fString, "</font id=""maroon"">", "[/maroon]", 1, -1, 1)
fString = replace(fString, "<font color=""limegreen"">", "[limegreen]", 1, -1, 1)
fString = replace(fString, "</font id=""limegreen"">", "[/limegreen]", 1, -1, 1) |
Search is your friend “I was having a mildly paranoid day, mostly due to the fact that the mad priest lady from over the river had taken to nailing weasels to my front door again.” |
|
|