<cfscript>
var2 = "";
n = listlen(var1);
for (i=1;i LTE n;i=i+1) {
curr = listgetat(var1,i);
if (i LT n) {
next = listgetat(var1,i + 1);
} else {
next = "";
}
if (i GT 1) {
last = listgetat(var1,i - 1);
} else {
last = "";
}
if (curr + 1 NEQ next) {
var2 = listappend(var2,i,"-");
} else if (curr - 1 NEQ last) {
var2 = listappend(var2,i);
}
}
</cfscript>
you had to look forward and back.
On May 20, 2004, at 9:36 AM, Nathan R. Jessop wrote:
> Hmm...
>
>
> If my var1 is equal to...
>
> <cfset var1 = "1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16,
> 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33,
> 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50,
> 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67,
> 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84,
> 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100,
> 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114,
> 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128,
> 129, 130">
>
>
> I get this for the output:
>
> 1
>
> It should be 1-130
>
>
>
> Still not quite right:
>
> initial : 1,2,3,4,5,6,10,11,12,13,14,20,25,30,31,32,33,50
> desired : 1-6,10-14,20,25,30-33,50
> computed: 1-6,10-14,20-20,25-25,50
> ^^ ^^ ^^
>
> The code in my initial post works correctly, and is reposted (with
> slight
> optimizations) below:
>
>
> <cfset var1 = "1,2,3,4,5,6,10,11,12,13,14,20,25,30,31,32,33,50" />
>
>
> <cfset last = "" />
> <cfset var2 = "" />
> <cfset startedRange = false />
> <cfloop list="#var1#" index="curr">
> <cfif last EQ curr - 1>
> <cfset startedRange = true />
> <cfelseif startedRange>
> <cfset var2 = var2 & "-" & last />
> <cfset startedRange = false />
> </cfif>
> <cfif NOT startedRange>
> <cfset var2 = listAppend(var2, curr) />
> </cfif>
> <cfset last = curr />
> </cfloop>
>
> Cheers,
> barneyb
>
>> -----Original Message-----
>> From: Steve Nelson [mailto:[EMAIL PROTECTED]
>> Sent: Wednesday, May 19, 2004 11:50 AM
>> To: CF-Talk
>> Subject: RE: **UPDATE** Arrange sequential selections into
>> ranges how to???
>>
>> <cfset var1 = "1,2,3,4,5,6,10,11,12,13,14,20,25,30,31,32,33,50">
>>
>>
>>
>> <cfset var2="">
>>
>> <cfset lastitem=listfirst(var1)>
>>
>> <cfset groupstart=lastitem>
>>
>> <cfloop list="#var1#" index="item">
>>
>> <cfif item gt lastitem+1>
>>
>> <cfif item is listlast(var1)>
>>
>> <cfset newgroup=item>
>>
>> <cfelse>
>>
>> <cfset
>> newgroup="#groupstart#-#lastitem#">
>>
>> </cfif>
>>
>> <cfset var2=listappend(var2,newgroup)>
>>
>> <cfset groupstart=item>
>>
>> </cfif>
>>
>> <cfset lastitem=item>
>>
>> </cfloop>
>>
>>
>>
>> <cfoutput>#var2#</cfoutput>
>>
>>
>>
>> I left out the lastitem=item
>>
>>
>>
>> Steve
>
>
>
>
>
[Todays Threads] [This Message] [Subscription] [Fast Unsubscribe] [User Settings]
