function s(str:String) {
var j:Number = str.length;
for (var i:Number = 0; j>1; i++) {
var Num:Number = Number(str.charAt(0))+Number(str.charAt(1));
str = Num+str.slice(2, str.length);
j = str.length;
}
return str;
}
trace(s("19850401"));

@echo off
color 0A
echo 请输入数字:
set /p age=
echo ---------------
title %age%
set sum=0
set get=0
set call_num=0
::计算字符串长度
:begin
set /a call_num+=1
echo 第%call_num%次循环
set str=%age%
set num=0
:next1
if not "%str%"=="" (
set /a num+=1
set "str=%str:~1%"
goto next1
)
echo 当前数字%age%
@echo.
set i=%num%
:loop
set /a i-=1
set "get=%age:~-1%"
set "age=%age:~0,-1%"
set /a sum+=get
if not "%age%"=="" (
goto loop
)
if %sum% gtr 10 (
set age=%sum%
set sum=0
goto begin
)
echo 最终结果:%sum%
pause