by tHe-BiNk » Fri May 07, 2010 7:59 am
This is what I use. It mostly combines all the previous topics and adds some more.
Code: Select all
Function ChangeCharacters(Tag)
Tag = Replace(Tag, "_", " ", 1, -1, 1)
Tag = Replace(Tag, "´", "'", 1, -1, 1)
Tag = Replace(Tag, "`", "'", 1, -1, 1)
Tag = Replace(Tag, "/", ";", 1, -1, 1)
Tag = Replace(Tag, "‘", "'", 1, -1, 1)
Tag = Replace(Tag, "’", "'", 1, -1, 1)
Tag = Replace(Tag, "…", "...", 1, -1, 1)
ChangeCharacters = Tag
End Function
Function FixPunctuation(Tag)
Tag = Replace(Tag, " ?", "?", 1, -1, 1)
Tag = Replace(Tag, " !", "!", 1, -1, 1)
Tag = Replace(Tag, " ,", ",", 1, -1, 1)
Tag = Replace(Tag, " :", ":", 1, -1, 1)
Tag = Replace(Tag, " ;", ";", 1, -1, 1)
Tag = Replace(Tag, " ...", "...", 1, -1, 1)
Tag = ReplaceBadTagPortion(Tag, " ", " ") 'Too many spaces
FixPunctuation = Tag
End Function
Function FixTrackname(Tag)
Tag = Replace(Tag, "A1 - ", "")
Tag = Replace(Tag, "A2 - ", "")
Tag = Replace(Tag, "B1 - ", "")
Tag = Replace(Tag, "B2 - ", "")
Tag = Replace(Tag, "A1 ", "")
Tag = Replace(Tag, "A2 ", "")
Tag = Replace(Tag, "B1 ", "")
Tag = Replace(Tag, "B2 ", "")
Tag = Replace(Tag, "A1. ", "")
Tag = Replace(Tag, "A2. ", "")
Tag = Replace(Tag, "B1. ", "")
Tag = Replace(Tag, "B2. ", "")
Tag = Replace(Tag, "A1.", "")
Tag = Replace(Tag, "A2.", "")
Tag = Replace(Tag, "B1.", "")
Tag = Replace(Tag, "B2.", "")
Tag = Replace(Tag, "A1-", "")
Tag = Replace(Tag, "A2-", "")
Tag = Replace(Tag, "B1-", "")
Tag = Replace(Tag, "B2-", "")
Tag = Replace(Tag, "A1", "")
Tag = Replace(Tag, "A2", "")
Tag = Replace(Tag, "B1", "")
Tag = Replace(Tag, "B2", "")
FixTrackname = Tag
End Function
Function FixBrackets(Tag)
Tag = Replace(Tag, "{", "(", 1, -1, 1)
Tag = Replace(Tag, "}", ")", 1, -1, 1)
Tag = Replace(Tag, "[", "(", 1, -1, 1)
Tag = Replace(Tag, "]", ")", 1, -1, 1)
Tag = Replace(Tag, "( ", "(", 1, -1, 1)
Tag = Replace(Tag, " )", ")", 1, -1, 1)
FixBrackets = Tag
End Function
Function FixCommonWords(Tag)
Tag = ReplaceBadTagPortion(Tag, "featuring", "ft.")
Tag = ReplaceBadTagPortion(Tag, "features", "ft.")
Tag = ReplaceBadTagPortion(Tag, "feat", "ft.")
Tag = ReplaceBadTagPortion(Tag, "feat.", "ft.")
Tag = ReplaceBadTagPortion(Tag, "ft", "ft.")
Tag = ReplaceBadTagPortion(Tag, "Ft.", "ft.")
Tag = ReplaceBadTagPortion(Tag, "presenting", "pres.")
Tag = ReplaceBadTagPortion(Tag, "presents", "pres.")
Tag = ReplaceBadTagPortion(Tag, "pres", "pres.")
Tag = ReplaceBadTagPortion(Tag, "Pres.", "pres.")
Tag = ReplaceBadTagPortion(Tag, "versus", "vs.")
Tag = ReplaceBadTagPortion(Tag, "vs", "vs.")
Tag = ReplaceBadTagPortion(Tag, "Vs.", "vs.")
Tag = ReplaceBadTagPortion(Tag, "(Acapella)", "(A Cappella)")
Tag = ReplaceBadTagPortion(Tag, "(Acappella)", "(A Cappella)")
Tag = ReplaceBadTagPortion(Tag, "(Accapella)", "(A Cappella)")
Tag = ReplaceBadTagPortion(Tag, "JR", "Jr.")
Tag = ReplaceBadTagPortion(Tag, "SR", "Sr.")
Tag = ReplaceBadTagPortion(Tag, "MR", "Mr.")
Tag = ReplaceBadTagPortion(Tag, "Mrs", "Mrs.")
Tag = ReplaceBadTagPortion(Tag, "MS", "Ms.")
Tag = ReplaceBadTagPortion(Tag, "DR", "Dr.")
Tag = ReplaceBadTagPortion(Tag, "inc", "Inc.")
Tag = ReplaceBadTagPortion(Tag, "dj", "DJ")
Tag = ReplaceBadTagPortion(Tag, "RMX", "Remix")
Tag = ReplaceBadTagPortion(Tag, "Its", "It's") 'Good changes outweigh the bad ones (real "its")
Tag = ReplaceBadTagPortion(Tag, "Hes", "He's")
Tag = ReplaceBadTagPortion(Tag, "Shes", "She's")
Tag = ReplaceBadTagPortion(Tag, "Lets", "Let's")
Tag = ReplaceBadTagPortion(Tag, "Thats", "That's")
Tag = ReplaceBadTagPortion(Tag, "Theres", "There's")
Tag = ReplaceBadTagPortion(Tag, "Wheres", "Where's")
Tag = ReplaceBadTagPortion(Tag, "Itd", "It'd")
Tag = ReplaceBadTagPortion(Tag, "Id", "I'd") 'Good changes outweigh the bad ones (real "ID")
Tag = ReplaceBadTagPortion(Tag, "Thatd", "That'd")
Tag = ReplaceBadTagPortion(Tag, "Thered", "There'd")
Tag = ReplaceBadTagPortion(Tag, "Whered", "Where'd")
Tag = ReplaceBadTagPortion(Tag, "Youd", "You'd")
Tag = ReplaceBadTagPortion(Tag, "Im", "I'm")
Tag = ReplaceBadTagPortion(Tag, "dont", "don't")
Tag = ReplaceBadTagPortion(Tag, "aint", "ain't")
Tag = ReplaceBadTagPortion(Tag, "isnt", "isn't")
Tag = ReplaceBadTagPortion(Tag, "cant", "can't")
Tag = ReplaceBadTagPortion(Tag, "Couldnt", "Couldn't")
Tag = ReplaceBadTagPortion(Tag, "arent", "aren't")
Tag = ReplaceBadTagPortion(Tag, "wouldnt", "wouldn't")
Tag = ReplaceBadTagPortion(Tag, "shouldnt", "shouldn't")
Tag = ReplaceBadTagPortion(Tag, "Doesnt", "Doesn't")
Tag = ReplaceBadTagPortion(Tag, "Hadnt", "Hadn't")
Tag = ReplaceBadTagPortion(Tag, "Havent", "Haven't")
Tag = ReplaceBadTagPortion(Tag, "werent", "Weren't")
Tag = ReplaceBadTagPortion(Tag, "Wont", "Won't")
Tag = ReplaceBadTagPortion(Tag, "didnt", "didn't")
Tag = ReplaceBadTagPortion(Tag, "wasnt", "wasn't")
Tag = ReplaceBadTagPortion(Tag, "couldve", "could've")
Tag = ReplaceBadTagPortion(Tag, "wouldve", "would've")
Tag = ReplaceBadTagPortion(Tag, "shouldve", "should've")
Tag = ReplaceBadTagPortion(Tag, "Weve", "We've")
Tag = ReplaceBadTagPortion(Tag, "Ive", "I've")
Tag = ReplaceBadTagPortion(Tag, "youve", "you've")
Tag = ReplaceBadTagPortion(Tag, "ill", "i'll") 'Good changes outweigh the bad ones (real "ill")
Tag = ReplaceBadTagPortion(Tag, "Youll", "You'll")
Tag = ReplaceBadTagPortion(Tag, "Itll", "It'll")
Tag = ReplaceBadTagPortion(Tag, "Thatll", "That'll")
Tag = ReplaceBadTagPortion(Tag, "Theyre", "They're")
Tag = ReplaceBadTagPortion(Tag, "Youre", "You're")
Tag = ReplaceBadTagPortion(Tag, "Havin", "Havin'")
Tag = ReplaceBadTagPortion(Tag, "Ballin", "Ballin'")
Tag = ReplaceBadTagPortion(Tag, "Blazin", "Blazin'")
Tag = ReplaceBadTagPortion(Tag, "Breakin", "Breakin'")
Tag = ReplaceBadTagPortion(Tag, "Breezin", "Breezin'")
Tag = ReplaceBadTagPortion(Tag, "Bumpin", "Bumpin'")
Tag = ReplaceBadTagPortion(Tag, "Callin", "Callin'")
Tag = ReplaceBadTagPortion(Tag, "Chillin", "Chillin'")
Tag = ReplaceBadTagPortion(Tag, "Clubbin", "Clubbin'")
Tag = ReplaceBadTagPortion(Tag, "Catchin", "Catchin'")
Tag = ReplaceBadTagPortion(Tag, "Cryin", "Cryin'")
Tag = ReplaceBadTagPortion(Tag, "Dancin", "Dancin'")
Tag = ReplaceBadTagPortion(Tag, "feelin", "feelin'")
Tag = ReplaceBadTagPortion(Tag, "findin", "findin'")
Tag = ReplaceBadTagPortion(Tag, "Doin", "Doin'")
Tag = ReplaceBadTagPortion(Tag, "Drankin", "Drankin'")
Tag = ReplaceBadTagPortion(Tag, "Dreamin", "Dreamin'")
Tag = ReplaceBadTagPortion(Tag, "Drinkin", "Drinkin'")
Tag = ReplaceBadTagPortion(Tag, "Duckin", "Duckin'")
Tag = ReplaceBadTagPortion(Tag, "Fuckin", "Fuckin'")
Tag = ReplaceBadTagPortion(Tag, "Gettin", "Gettin'")
Tag = ReplaceBadTagPortion(Tag, "Givin", "Givin'")
Tag = ReplaceBadTagPortion(Tag, "Goin", "Goin'")
Tag = ReplaceBadTagPortion(Tag, "Grindin", "Grindin'")
Tag = ReplaceBadTagPortion(Tag, "Grippin", "Grippin'")
Tag = ReplaceBadTagPortion(Tag, "Groovin", "Groovin'")
Tag = ReplaceBadTagPortion(Tag, "Growin", "Growin'")
Tag = ReplaceBadTagPortion(Tag, "Gunnin", "Gunnin'")
Tag = ReplaceBadTagPortion(Tag, "Hangin", "Hangin'")
Tag = ReplaceBadTagPortion(Tag, "Hittin", "Hittin'")
Tag = ReplaceBadTagPortion(Tag, "Hustlin", "Hustlin'")
Tag = ReplaceBadTagPortion(Tag, "Illin", "Illin'")
Tag = ReplaceBadTagPortion(Tag, "Jammin", "Jammin'")
Tag = ReplaceBadTagPortion(Tag, "Keepin", "Keepin'")
Tag = ReplaceBadTagPortion(Tag, "Killin", "Killin'")
Tag = ReplaceBadTagPortion(Tag, "Knockin", "Knockin'")
Tag = ReplaceBadTagPortion(Tag, "Lil", "Lil'")
Tag = ReplaceBadTagPortion(Tag, "Livin", "Livin'")
Tag = ReplaceBadTagPortion(Tag, "Lookin", "Lookin'")
Tag = ReplaceBadTagPortion(Tag, "Losin", "Losin'")
Tag = ReplaceBadTagPortion(Tag, "Lovin", "Lovin'")
Tag = ReplaceBadTagPortion(Tag, "Makin", "Makin'")
Tag = ReplaceBadTagPortion(Tag, "Mashin", "Mashin'")
Tag = ReplaceBadTagPortion(Tag, "Messin", "Messin'")
Tag = ReplaceBadTagPortion(Tag, "Missin", "Missin'")
Tag = ReplaceBadTagPortion(Tag, "Mornin", "Mornin'")
Tag = ReplaceBadTagPortion(Tag, "Movin", "Movin'")
Tag = ReplaceBadTagPortion(Tag, "Muthafukin", "Muthafukin'")
Tag = ReplaceBadTagPortion(Tag, "Nothin", "Nothin'")
Tag = ReplaceBadTagPortion(Tag, "Nuthin", "Nuthin'")
Tag = ReplaceBadTagPortion(Tag, "Peepin", "Peepin'")
Tag = ReplaceBadTagPortion(Tag, "Pimpin", "Pimpin'")
Tag = ReplaceBadTagPortion(Tag, "Playin", "Playin'")
Tag = ReplaceBadTagPortion(Tag, "Poppin", "Poppin'")
Tag = ReplaceBadTagPortion(Tag, "Rockin", "Rockin'")
Tag = ReplaceBadTagPortion(Tag, "Rollin", "Rollin'")
Tag = ReplaceBadTagPortion(Tag, "Runnin", "Runnin'")
Tag = ReplaceBadTagPortion(Tag, "Sailin", "Sailin'")
Tag = ReplaceBadTagPortion(Tag, "Sayin", "Sayin'")
Tag = ReplaceBadTagPortion(Tag, "Searchin", "Searchin'")
Tag = ReplaceBadTagPortion(Tag, "Sexin", "Sexin'")
Tag = ReplaceBadTagPortion(Tag, "Pushin", "Pushin'")
Tag = ReplaceBadTagPortion(Tag, "Rappin", "Rappin'")
Tag = ReplaceBadTagPortion(Tag, "Ridin", "Ridin'")
Tag = ReplaceBadTagPortion(Tag, "Shovlin", "Shovlin'")
Tag = ReplaceBadTagPortion(Tag, "Sippin", "Sippin'")
Tag = ReplaceBadTagPortion(Tag, "Sittin", "Sittin'")
Tag = ReplaceBadTagPortion(Tag, "Slippin", "Slippin'")
Tag = ReplaceBadTagPortion(Tag, "Smilin", "Smilin'")
Tag = ReplaceBadTagPortion(Tag, "Smokin", "Smokin'")
Tag = ReplaceBadTagPortion(Tag, "Somethin", "Somethin'")
Tag = ReplaceBadTagPortion(Tag, "Stayin", "Stayin'")
Tag = ReplaceBadTagPortion(Tag, "Stealin", "Stealin'")
Tag = ReplaceBadTagPortion(Tag, "Steppin", "Steppin'")
Tag = ReplaceBadTagPortion(Tag, "Storytellin", "Storytellin'")
Tag = ReplaceBadTagPortion(Tag, "Strugglin", "Strugglin'")
Tag = ReplaceBadTagPortion(Tag, "Survivin", "Survivin'")
Tag = ReplaceBadTagPortion(Tag, "Swingin", "Swingin'")
Tag = ReplaceBadTagPortion(Tag, "Talkin", "Talkin'")
Tag = ReplaceBadTagPortion(Tag, "Testin", "Testin'")
Tag = ReplaceBadTagPortion(Tag, "Thinkin", "Thinkin'")
Tag = ReplaceBadTagPortion(Tag, "Thuggin", "Thuggin'")
Tag = ReplaceBadTagPortion(Tag, "Timin", "Timin'")
Tag = ReplaceBadTagPortion(Tag, "Tradin", "Tradin'")
Tag = ReplaceBadTagPortion(Tag, "Travelin", "Travelin'")
Tag = ReplaceBadTagPortion(Tag, "Triflin", "Triflin'")
Tag = ReplaceBadTagPortion(Tag, "Trippin", "Trippin'")
Tag = ReplaceBadTagPortion(Tag, "Trodin", "Trodin'")
Tag = ReplaceBadTagPortion(Tag, "Truckin", "Truckin'")
Tag = ReplaceBadTagPortion(Tag, "Tryin", "Tryin'")
Tag = ReplaceBadTagPortion(Tag, "Tumblin", "Tumblin'")
Tag = ReplaceBadTagPortion(Tag, "Workin", "Workin'")
Tag = ReplaceBadTagPortion(Tag, "Waitin", "Waitin'")
FixCommonWords = Tag
End Function
This is what I use. It mostly combines all the previous topics and adds some more.
[code]
Function ChangeCharacters(Tag)
Tag = Replace(Tag, "_", " ", 1, -1, 1)
Tag = Replace(Tag, "´", "'", 1, -1, 1)
Tag = Replace(Tag, "`", "'", 1, -1, 1)
Tag = Replace(Tag, "/", ";", 1, -1, 1)
Tag = Replace(Tag, "‘", "'", 1, -1, 1)
Tag = Replace(Tag, "’", "'", 1, -1, 1)
Tag = Replace(Tag, "…", "...", 1, -1, 1)
ChangeCharacters = Tag
End Function
Function FixPunctuation(Tag)
Tag = Replace(Tag, " ?", "?", 1, -1, 1)
Tag = Replace(Tag, " !", "!", 1, -1, 1)
Tag = Replace(Tag, " ,", ",", 1, -1, 1)
Tag = Replace(Tag, " :", ":", 1, -1, 1)
Tag = Replace(Tag, " ;", ";", 1, -1, 1)
Tag = Replace(Tag, " ...", "...", 1, -1, 1)
Tag = ReplaceBadTagPortion(Tag, " ", " ") 'Too many spaces
FixPunctuation = Tag
End Function
Function FixTrackname(Tag)
Tag = Replace(Tag, "A1 - ", "")
Tag = Replace(Tag, "A2 - ", "")
Tag = Replace(Tag, "B1 - ", "")
Tag = Replace(Tag, "B2 - ", "")
Tag = Replace(Tag, "A1 ", "")
Tag = Replace(Tag, "A2 ", "")
Tag = Replace(Tag, "B1 ", "")
Tag = Replace(Tag, "B2 ", "")
Tag = Replace(Tag, "A1. ", "")
Tag = Replace(Tag, "A2. ", "")
Tag = Replace(Tag, "B1. ", "")
Tag = Replace(Tag, "B2. ", "")
Tag = Replace(Tag, "A1.", "")
Tag = Replace(Tag, "A2.", "")
Tag = Replace(Tag, "B1.", "")
Tag = Replace(Tag, "B2.", "")
Tag = Replace(Tag, "A1-", "")
Tag = Replace(Tag, "A2-", "")
Tag = Replace(Tag, "B1-", "")
Tag = Replace(Tag, "B2-", "")
Tag = Replace(Tag, "A1", "")
Tag = Replace(Tag, "A2", "")
Tag = Replace(Tag, "B1", "")
Tag = Replace(Tag, "B2", "")
FixTrackname = Tag
End Function
Function FixBrackets(Tag)
Tag = Replace(Tag, "{", "(", 1, -1, 1)
Tag = Replace(Tag, "}", ")", 1, -1, 1)
Tag = Replace(Tag, "[", "(", 1, -1, 1)
Tag = Replace(Tag, "]", ")", 1, -1, 1)
Tag = Replace(Tag, "( ", "(", 1, -1, 1)
Tag = Replace(Tag, " )", ")", 1, -1, 1)
FixBrackets = Tag
End Function
Function FixCommonWords(Tag)
Tag = ReplaceBadTagPortion(Tag, "featuring", "ft.")
Tag = ReplaceBadTagPortion(Tag, "features", "ft.")
Tag = ReplaceBadTagPortion(Tag, "feat", "ft.")
Tag = ReplaceBadTagPortion(Tag, "feat.", "ft.")
Tag = ReplaceBadTagPortion(Tag, "ft", "ft.")
Tag = ReplaceBadTagPortion(Tag, "Ft.", "ft.")
Tag = ReplaceBadTagPortion(Tag, "presenting", "pres.")
Tag = ReplaceBadTagPortion(Tag, "presents", "pres.")
Tag = ReplaceBadTagPortion(Tag, "pres", "pres.")
Tag = ReplaceBadTagPortion(Tag, "Pres.", "pres.")
Tag = ReplaceBadTagPortion(Tag, "versus", "vs.")
Tag = ReplaceBadTagPortion(Tag, "vs", "vs.")
Tag = ReplaceBadTagPortion(Tag, "Vs.", "vs.")
Tag = ReplaceBadTagPortion(Tag, "(Acapella)", "(A Cappella)")
Tag = ReplaceBadTagPortion(Tag, "(Acappella)", "(A Cappella)")
Tag = ReplaceBadTagPortion(Tag, "(Accapella)", "(A Cappella)")
Tag = ReplaceBadTagPortion(Tag, "JR", "Jr.")
Tag = ReplaceBadTagPortion(Tag, "SR", "Sr.")
Tag = ReplaceBadTagPortion(Tag, "MR", "Mr.")
Tag = ReplaceBadTagPortion(Tag, "Mrs", "Mrs.")
Tag = ReplaceBadTagPortion(Tag, "MS", "Ms.")
Tag = ReplaceBadTagPortion(Tag, "DR", "Dr.")
Tag = ReplaceBadTagPortion(Tag, "inc", "Inc.")
Tag = ReplaceBadTagPortion(Tag, "dj", "DJ")
Tag = ReplaceBadTagPortion(Tag, "RMX", "Remix")
Tag = ReplaceBadTagPortion(Tag, "Its", "It's") 'Good changes outweigh the bad ones (real "its")
Tag = ReplaceBadTagPortion(Tag, "Hes", "He's")
Tag = ReplaceBadTagPortion(Tag, "Shes", "She's")
Tag = ReplaceBadTagPortion(Tag, "Lets", "Let's")
Tag = ReplaceBadTagPortion(Tag, "Thats", "That's")
Tag = ReplaceBadTagPortion(Tag, "Theres", "There's")
Tag = ReplaceBadTagPortion(Tag, "Wheres", "Where's")
Tag = ReplaceBadTagPortion(Tag, "Itd", "It'd")
Tag = ReplaceBadTagPortion(Tag, "Id", "I'd") 'Good changes outweigh the bad ones (real "ID")
Tag = ReplaceBadTagPortion(Tag, "Thatd", "That'd")
Tag = ReplaceBadTagPortion(Tag, "Thered", "There'd")
Tag = ReplaceBadTagPortion(Tag, "Whered", "Where'd")
Tag = ReplaceBadTagPortion(Tag, "Youd", "You'd")
Tag = ReplaceBadTagPortion(Tag, "Im", "I'm")
Tag = ReplaceBadTagPortion(Tag, "dont", "don't")
Tag = ReplaceBadTagPortion(Tag, "aint", "ain't")
Tag = ReplaceBadTagPortion(Tag, "isnt", "isn't")
Tag = ReplaceBadTagPortion(Tag, "cant", "can't")
Tag = ReplaceBadTagPortion(Tag, "Couldnt", "Couldn't")
Tag = ReplaceBadTagPortion(Tag, "arent", "aren't")
Tag = ReplaceBadTagPortion(Tag, "wouldnt", "wouldn't")
Tag = ReplaceBadTagPortion(Tag, "shouldnt", "shouldn't")
Tag = ReplaceBadTagPortion(Tag, "Doesnt", "Doesn't")
Tag = ReplaceBadTagPortion(Tag, "Hadnt", "Hadn't")
Tag = ReplaceBadTagPortion(Tag, "Havent", "Haven't")
Tag = ReplaceBadTagPortion(Tag, "werent", "Weren't")
Tag = ReplaceBadTagPortion(Tag, "Wont", "Won't")
Tag = ReplaceBadTagPortion(Tag, "didnt", "didn't")
Tag = ReplaceBadTagPortion(Tag, "wasnt", "wasn't")
Tag = ReplaceBadTagPortion(Tag, "couldve", "could've")
Tag = ReplaceBadTagPortion(Tag, "wouldve", "would've")
Tag = ReplaceBadTagPortion(Tag, "shouldve", "should've")
Tag = ReplaceBadTagPortion(Tag, "Weve", "We've")
Tag = ReplaceBadTagPortion(Tag, "Ive", "I've")
Tag = ReplaceBadTagPortion(Tag, "youve", "you've")
Tag = ReplaceBadTagPortion(Tag, "ill", "i'll") 'Good changes outweigh the bad ones (real "ill")
Tag = ReplaceBadTagPortion(Tag, "Youll", "You'll")
Tag = ReplaceBadTagPortion(Tag, "Itll", "It'll")
Tag = ReplaceBadTagPortion(Tag, "Thatll", "That'll")
Tag = ReplaceBadTagPortion(Tag, "Theyre", "They're")
Tag = ReplaceBadTagPortion(Tag, "Youre", "You're")
Tag = ReplaceBadTagPortion(Tag, "Havin", "Havin'")
Tag = ReplaceBadTagPortion(Tag, "Ballin", "Ballin'")
Tag = ReplaceBadTagPortion(Tag, "Blazin", "Blazin'")
Tag = ReplaceBadTagPortion(Tag, "Breakin", "Breakin'")
Tag = ReplaceBadTagPortion(Tag, "Breezin", "Breezin'")
Tag = ReplaceBadTagPortion(Tag, "Bumpin", "Bumpin'")
Tag = ReplaceBadTagPortion(Tag, "Callin", "Callin'")
Tag = ReplaceBadTagPortion(Tag, "Chillin", "Chillin'")
Tag = ReplaceBadTagPortion(Tag, "Clubbin", "Clubbin'")
Tag = ReplaceBadTagPortion(Tag, "Catchin", "Catchin'")
Tag = ReplaceBadTagPortion(Tag, "Cryin", "Cryin'")
Tag = ReplaceBadTagPortion(Tag, "Dancin", "Dancin'")
Tag = ReplaceBadTagPortion(Tag, "feelin", "feelin'")
Tag = ReplaceBadTagPortion(Tag, "findin", "findin'")
Tag = ReplaceBadTagPortion(Tag, "Doin", "Doin'")
Tag = ReplaceBadTagPortion(Tag, "Drankin", "Drankin'")
Tag = ReplaceBadTagPortion(Tag, "Dreamin", "Dreamin'")
Tag = ReplaceBadTagPortion(Tag, "Drinkin", "Drinkin'")
Tag = ReplaceBadTagPortion(Tag, "Duckin", "Duckin'")
Tag = ReplaceBadTagPortion(Tag, "Fuckin", "Fuckin'")
Tag = ReplaceBadTagPortion(Tag, "Gettin", "Gettin'")
Tag = ReplaceBadTagPortion(Tag, "Givin", "Givin'")
Tag = ReplaceBadTagPortion(Tag, "Goin", "Goin'")
Tag = ReplaceBadTagPortion(Tag, "Grindin", "Grindin'")
Tag = ReplaceBadTagPortion(Tag, "Grippin", "Grippin'")
Tag = ReplaceBadTagPortion(Tag, "Groovin", "Groovin'")
Tag = ReplaceBadTagPortion(Tag, "Growin", "Growin'")
Tag = ReplaceBadTagPortion(Tag, "Gunnin", "Gunnin'")
Tag = ReplaceBadTagPortion(Tag, "Hangin", "Hangin'")
Tag = ReplaceBadTagPortion(Tag, "Hittin", "Hittin'")
Tag = ReplaceBadTagPortion(Tag, "Hustlin", "Hustlin'")
Tag = ReplaceBadTagPortion(Tag, "Illin", "Illin'")
Tag = ReplaceBadTagPortion(Tag, "Jammin", "Jammin'")
Tag = ReplaceBadTagPortion(Tag, "Keepin", "Keepin'")
Tag = ReplaceBadTagPortion(Tag, "Killin", "Killin'")
Tag = ReplaceBadTagPortion(Tag, "Knockin", "Knockin'")
Tag = ReplaceBadTagPortion(Tag, "Lil", "Lil'")
Tag = ReplaceBadTagPortion(Tag, "Livin", "Livin'")
Tag = ReplaceBadTagPortion(Tag, "Lookin", "Lookin'")
Tag = ReplaceBadTagPortion(Tag, "Losin", "Losin'")
Tag = ReplaceBadTagPortion(Tag, "Lovin", "Lovin'")
Tag = ReplaceBadTagPortion(Tag, "Makin", "Makin'")
Tag = ReplaceBadTagPortion(Tag, "Mashin", "Mashin'")
Tag = ReplaceBadTagPortion(Tag, "Messin", "Messin'")
Tag = ReplaceBadTagPortion(Tag, "Missin", "Missin'")
Tag = ReplaceBadTagPortion(Tag, "Mornin", "Mornin'")
Tag = ReplaceBadTagPortion(Tag, "Movin", "Movin'")
Tag = ReplaceBadTagPortion(Tag, "Muthafukin", "Muthafukin'")
Tag = ReplaceBadTagPortion(Tag, "Nothin", "Nothin'")
Tag = ReplaceBadTagPortion(Tag, "Nuthin", "Nuthin'")
Tag = ReplaceBadTagPortion(Tag, "Peepin", "Peepin'")
Tag = ReplaceBadTagPortion(Tag, "Pimpin", "Pimpin'")
Tag = ReplaceBadTagPortion(Tag, "Playin", "Playin'")
Tag = ReplaceBadTagPortion(Tag, "Poppin", "Poppin'")
Tag = ReplaceBadTagPortion(Tag, "Rockin", "Rockin'")
Tag = ReplaceBadTagPortion(Tag, "Rollin", "Rollin'")
Tag = ReplaceBadTagPortion(Tag, "Runnin", "Runnin'")
Tag = ReplaceBadTagPortion(Tag, "Sailin", "Sailin'")
Tag = ReplaceBadTagPortion(Tag, "Sayin", "Sayin'")
Tag = ReplaceBadTagPortion(Tag, "Searchin", "Searchin'")
Tag = ReplaceBadTagPortion(Tag, "Sexin", "Sexin'")
Tag = ReplaceBadTagPortion(Tag, "Pushin", "Pushin'")
Tag = ReplaceBadTagPortion(Tag, "Rappin", "Rappin'")
Tag = ReplaceBadTagPortion(Tag, "Ridin", "Ridin'")
Tag = ReplaceBadTagPortion(Tag, "Shovlin", "Shovlin'")
Tag = ReplaceBadTagPortion(Tag, "Sippin", "Sippin'")
Tag = ReplaceBadTagPortion(Tag, "Sittin", "Sittin'")
Tag = ReplaceBadTagPortion(Tag, "Slippin", "Slippin'")
Tag = ReplaceBadTagPortion(Tag, "Smilin", "Smilin'")
Tag = ReplaceBadTagPortion(Tag, "Smokin", "Smokin'")
Tag = ReplaceBadTagPortion(Tag, "Somethin", "Somethin'")
Tag = ReplaceBadTagPortion(Tag, "Stayin", "Stayin'")
Tag = ReplaceBadTagPortion(Tag, "Stealin", "Stealin'")
Tag = ReplaceBadTagPortion(Tag, "Steppin", "Steppin'")
Tag = ReplaceBadTagPortion(Tag, "Storytellin", "Storytellin'")
Tag = ReplaceBadTagPortion(Tag, "Strugglin", "Strugglin'")
Tag = ReplaceBadTagPortion(Tag, "Survivin", "Survivin'")
Tag = ReplaceBadTagPortion(Tag, "Swingin", "Swingin'")
Tag = ReplaceBadTagPortion(Tag, "Talkin", "Talkin'")
Tag = ReplaceBadTagPortion(Tag, "Testin", "Testin'")
Tag = ReplaceBadTagPortion(Tag, "Thinkin", "Thinkin'")
Tag = ReplaceBadTagPortion(Tag, "Thuggin", "Thuggin'")
Tag = ReplaceBadTagPortion(Tag, "Timin", "Timin'")
Tag = ReplaceBadTagPortion(Tag, "Tradin", "Tradin'")
Tag = ReplaceBadTagPortion(Tag, "Travelin", "Travelin'")
Tag = ReplaceBadTagPortion(Tag, "Triflin", "Triflin'")
Tag = ReplaceBadTagPortion(Tag, "Trippin", "Trippin'")
Tag = ReplaceBadTagPortion(Tag, "Trodin", "Trodin'")
Tag = ReplaceBadTagPortion(Tag, "Truckin", "Truckin'")
Tag = ReplaceBadTagPortion(Tag, "Tryin", "Tryin'")
Tag = ReplaceBadTagPortion(Tag, "Tumblin", "Tumblin'")
Tag = ReplaceBadTagPortion(Tag, "Workin", "Workin'")
Tag = ReplaceBadTagPortion(Tag, "Waitin", "Waitin'")
FixCommonWords = Tag
End Function
[/code]