<cffunction name="autoLink" returntype="string" access="public" output="false" hint="View, Helper, Turns all URLs and e-mail addresses into clickable links.">
	<cfargument name="text" type="string" required="true" hint="The text to create links in.">
	<cfargument name="link" type="string" required="false" default="all" hint="Whether to link URLs, email addresses or both. Possible values are: 'all' (default), 'URLs' and 'emailAddresses'.">

	<!---
		EXAMPLES:
		#autoLink("Download Wheels from http://www.cfwheels.com/download")#
		-> Download Wheels from <a href="http://www.cfwheels.com/download">http://www.cfwheels.com/download</a>

		#autoLink("Email us at [email protected]")#
		-> Email us at <a href="mailto:[email protected]">[email protected]</a>

		RELATED:
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfscript>
		var loc = {};
		loc.urlRegex = "(?ix)([^(url=)|(href=)'""])(((https?)://([^:]+\:[^@]*@)?)([\d\w\-]+\.)?[\w\d\-\.]+\.(com|net|org|info|biz|tv|co\.uk|de|ro|it|site)(( / [\w\d\.\-@%\\\/:]* )+)?(\?[\w\d\?%,\.\/\##!@:=\+~_\-&amp;]*(?<![\.]))?)";
		loc.mailRegex = "(([^@\s]+)@((?:[-a-z0-9]+\.)+[a-z]{2,}))";
		loc.returnValue = arguments.text;
		if (arguments.link IS NOT "URLs")
			loc.returnValue = REReplaceNoCase(loc.returnValue, loc.mailRegex, "<a href=""mailto:\1"">\1</a>", "all");
		if (arguments.link IS NOT "emailAddresses")
			loc.returnValue = loc.returnValue.ReplaceAll(loc.urlRegex, "$1<a href=""$2"">$2</a>");
	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>

<cffunction name="excerpt" returntype="string" access="public" output="false" hint="View, Helper, Extracts an excerpt from text that matches the first instance of phrase.">
	<cfargument name="text" type="string" required="true" hint="The text to extract an excerpt from.">
	<cfargument name="phrase" type="string" required="true" hint="The phrase to extract.">
	<cfargument name="radius" type="numeric" required="false" default="100" hint="Number of characters to extract surronding the phrase.">
	<cfargument name="excerptString" type="string" required="false" default="..." hint="String to replace first and/or last characters with.">

	<!---
		EXAMPLES:
		#excerpt(text="Wheels is a framework for ColdFusion", phrase="framework", radius=5)#
		-> ...is a framework for ...

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfscript>
	var loc = {};
	loc.pos = FindNoCase(arguments.phrase, arguments.text, 1);
	if (loc.pos != 0)
	{
		loc.excerptStringStart = arguments.excerptString;
		loc.excerptStringEnd = arguments.excerptString;
		loc.start = loc.pos - arguments.radius;
		if (loc.start <= 0)
		{
			loc.start = 1;
			loc.excerptStringStart = "";
		}
		loc.count = Len(arguments.phrase) + (arguments.radius*2);
		if (loc.count > (Len(arguments.text)-loc.start))
			loc.excerptStringEnd = "";
		loc.returnValue = loc.excerptStringStart & Mid(arguments.text, loc.start, loc.count) & loc.excerptStringEnd;
	}
	else
	{
		loc.returnValue = "";
	}

	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>

<cffunction name="highlight" returntype="string" access="public" output="false" hint="View, Helper, Highlights the phrase(s) everywhere in the text if found by wrapping it in a strong tag (by default).">
	<cfargument name="text" type="string" required="true">
	<cfargument name="phrases" type="string" required="true">
	<cfargument name="highlighter" type="string" required="false" default="<strong class=""highlight"">\1</strong>">

	<!---
		EXAMPLES:
		#highlight(text="You searched for: Wheels", phrases="Wheels")#
		-> You searched for: <strong class="highlight">Wheels</strong>

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfscript>
		var loc = {};
		loc.returnValue = arguments.text;
		loc.iEnd = ListLen(arguments.phrases);
		for (loc.i=1; loc.i LTE loc.iEnd; loc.i=loc.i+1)
		{
			loc.returnValue = REReplaceNoCase(loc.returnValue, "(#ListGetAt(arguments.phrases, loc.i)#)", arguments.highlighter, "all");
		}
	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>

<cffunction name="simpleFormat" returntype="string" access="public" output="false" hint="View, Helper, Replaces single newline characters with HTML break tags and double newline characters with HTML paragraph tags (properly closed to comply with XHTML standards).">
	<cfargument name="text" type="string" required="true" hint="The text to format.">

	<!---
		EXAMPLES:
		#simpleFormat(params.content)#

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfscript>
		var loc = {};
		loc.returnValue = Trim(arguments.text);
		loc.returnValue = Replace(loc.returnValue, "#Chr(10)##Chr(10)#", "</p><p>", "all");
		loc.returnValue = Replace(loc.returnValue, "#Chr(10)#", "<br />", "all");
		if (loc.returnValue != "")
			loc.returnValue = "<p>" & loc.returnValue & "</p>";
	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>

<cffunction name="stripLinks" returntype="string" access="public" output="false" hint="View, Helper, Removes all links from the text (leaving just the link text).">
	<cfargument name="text" type="string" required="true" hint="The text to remove links from.">

	<!---
		EXAMPLES:
		#stripLinks("Wheels is a framework for <a href='http://www.adobe.com'>ColdFusion</a>")#
		-> Wheels is a framework for ColdFusion

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfreturn REReplaceNoCase(arguments.text, "<a.*?>(.*?)</a>", "\1" , "all")>
</cffunction>

<cffunction name="stripTags" returntype="string" access="public" output="false" hint="View, Helper, Removes all tags from the text.">
	<cfargument name="text" type="string" required="true" hint="The text to remove links from.">

	<!---
		EXAMPLES:
		#stripTags("Wheels is a <b>framework</b> for <a href='http://www.adobe.com'>ColdFusion</a>")#
		-> Wheels is a framework for ColdFusion

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfreturn REReplaceNoCase(arguments.text, "<[a-z].*?>(.*?)</[a-z]>", "\1" , "all")>
</cffunction>

<cffunction name="titleize" returntype="string" access="public" output="false" hint="View, Helper, Capitalizes all words in the text to create a nicer looking title.">
	<cfargument name="text" type="string" required="true" hint="The text to turn into a title.">

	<!---
		EXAMPLES:
		#titleize("Wheels is a framework for ColdFusion")#
		-> Wheels Is A Framework For ColdFusion

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfscript>
		var loc = {};
		loc.returnValue = "";
		loc.iEnd = ListLen(arguments.text, " ");
		for (loc.i=1; loc.i LTE loc.iEnd; loc.i=loc.i+1)
		{
			loc.returnValue = ListAppend(loc.returnValue, capitalize(ListGetAt(arguments.text, loc.i, " ")), " ");
		}
	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>

<cffunction name="truncate" returntype="string" access="public" output="false" hint="View, Helper, Truncates text to the specified length and replaces the last characters with the specified truncate string (defaults to '...').">
	<cfargument name="text" type="string" required="true" hint="The text to truncate.">
	<cfargument name="length" type="numeric" required="false" default="30" hint="Length to truncate the text to.">
	<cfargument name="truncateString" type="string" required="false" default="..." hint="String to replace the last characters with.">

	<!---
		EXAMPLES:
		#truncate(text="Wheels is a framework for ColdFusion", length=20)#
		-> Wheels is a frame...

		#truncate(text="Wheels is a framework for ColdFusion", truncateString=" (more)")#
		-> Wheels is a fra... (continued)

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
	--->

	<cfscript>
		var loc = {};
		if (Len(arguments.text) > arguments.length)
			loc.returnValue = Left(arguments.text, arguments.length-Len(arguments.truncateString)) & arguments.truncateString;
		else
			loc.returnValue = arguments.text;
	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>


 <Cfquery name="Gets" dataSource="#ds#">
	select * from directoryarticlescamps
where id = #url.id#
</cfquery>


 <cfquery name="getstuffb" datasource="#ds#">
	 select id from camp2018catmap
	 where reg = '#Gets.typer#'
	 and catname = '#Gets.catname#'
 </cfquery>

 <cfquery name="getstuff" datasource="#ds#">

select camp2018form.id,businessname,address,website,region,phone,micrositelink,categorytext from camp2018form
inner join camp2018formcats on 
camp2018formcats.campid = camp2018form.id
where catid = #getstuffb.id#

and disable = 0

<cfif #url.id# eq '78'>
	and (region like '%Apple%' or region like '%Brooklyn%' or region like '%queens%')
	<cfelse>
<cfif #Gets.region# contains 'Manhattan'>
	and  region like '%Big Apple%' 
<cfelseif #Gets.region# contains 'Nassau'>
	and  region like '%Long%' 
<cfelse>
and  region like '%#Gets.region#%' 
</cfif>
</cfif>
and categorytext is not null 
order by <Cfif #url.id# eq 78>region,</Cfif>

businessname
<!--- added --->
 </cfquery>
 <p>


<Cfoutput>
<cfset monthvar = '#dateformat(now(),'MMMM')# #dateformat(now(),'yyyy')#'>

	<Cfset newblurb = '#rereplace(gets.blurb,'MONTHNAME','#monthvar#')#'>

	#newblurb#
<br></Cfoutput>
<p>

<Cfoutput query="getstuff">
	
	<cfif url.id eq 78 and region is not region[currentrow-1]><h2>
		<cfif #region# eq 'Big Apple Parent'>Manhattan<cfelse>
		#rereplace(region,'Parent','','all')#</cfif></h2></cfif>
	
<b><Cfif micrositelink is not ''><a href="#micrositelink#"></cfif>#businessname#</a></b><br>
#address#<br>
#phone#<br><Br>#categorytext#



<p>
</Cfoutput>

  <cfoutput><br>
	  #gets.bottomtext#
  </cfoutput>


  <cffunction name="getLinks" access="public" returntype="array" output="yes" hint="seperate Links from given HTML string, output as a array">
 <cfargument name="html" hint="HTML String with links" required="yes">
<cfset local.startpos = 1>
<cfset local.list  = ArrayNew(1)>

<cfloop condition="local.startpos GREATER THAN 0">
 <cfset local.linkpos = reFindNoCase('<a\b[^>]*>(.*?)</a>',arguments.html,local.startpos,'true')>

<cfif val(local.linkpos.len[1])>
<cfset local.startpos  = local.linkpos.len[1]+local.linkpos.pos[1]>
<cfset local.string  = mid(arguments.html,local.linkpos.pos[1],local.linkpos.len[1])>
<cfset local.hrefpos = reFindNoCase('(http|ftp|https):\/\/[\w\-_]+(\.[\w\-_]+)+([\w\-\.,@?^=%&:/~\+##]*[\w\-\@?^=%&/~\+##])?',local.string,1,'true')>
<cfif val(local.hrefpos.pos[1])>
<cfset local.this.a = mid(local.string,local.hrefpos.pos[1],local.hrefpos.len[1])>
<cfset local.this.title = reReplacenocase(local.string,'<a\b[^>]*.>',"")>
<cfset local.this.title = reReplacenocase(local.this.title,'</a*>',"")>
<cfset ArrayAppend(local.list,local.this)>
<cfset StructDelete(local,'this')>
</cfif>
  <cfelse>
 <cfbreak>
  </cfif>
</cfloop>

 <cfreturn local.list>
</cffunction>