1-1.cfm

<cffunction name="solve" output="false">
	<cfargument name="input" required="true" />

	<cfset var inputLength = Len(arguments.input) />
	<cfset var offset = 1 />
	<cfset var sum = 0 />
	<cfset var pos = '' />
	<cfset var currentDigit = '' />
	<cfset var otherDigit = '' />
	<cfloop from="1" to="#inputLength#" index="pos">
		<cfset currentDigit = Mid(input, pos, 1) />
		<cfset otherDigit = Mid(input, (pos + offset - 1) mod inputLength + 1, 1) />
		<cfif currentDigit eq otherDigit>
			<cfset sum += currentDigit />
		</cfif>
	</cfloop>

	<cfreturn sum />
</cffunction>

<cfset testCases = [
	{
		input = '1122',
		expectedOutput = 3
	},
	{
		input = '1111',
		expectedOutput = 4
	},
	{
		input = '1234',
		expectedOutput = 0
	},
	{
		input = '91212129',
		expectedOutput = 9
	},
	{
		input = Trim(FileRead(ExpandPath('1.txt'))),
		expectedOutput = 1393
	}
] />
<cfinclude template="test_runner_include.cfm" />