asp高手帮忙看几段asp代码，不胜感激

[cliufeifeizihui]

最近在将一个ASP程序改成java，但是，这asp的代码着实让我感叹，这也太难啦，所以来这牛人论坛请教一下，希望大虾们指教指教，谢谢啦。
int dys=(birthyear-1924)%12;
dys=(dys+12)%12;
int tys=(birthyear-1924)%10;
tys=(tys+10)%10;
ygzs=tg(tys)&dz(dys);
call xunkong(ygzs,yxks,yxss)
'response.write yxss // 请问一下，这三行代码分别是什么意思，谢谢
suishu=y-birthyear+1;
if sex then
hntg=(2+suishu-1) mod 10
hndz=(dzorder(yxss)+suishu)mod 12
else
hntg=(9+suishu-1) mod 10 //这个Mod是取余数的意思吗？我刚刚查的，不知道真假，(9+suishu-1) mod 10是否等同于(9+suishu-1)%10；
hndz=(dzorder(yxss)-4+suishu)mod 12
end if

[cliufeifeizihui]

自己先顶一下，希望下面接上，在线等！！！！！！！！

[Go 旅城通票]

自己找tg和dz的定义，不是函数就是数组，然后将取到的2个值组合成字符串，然后调用xunkong函数 ygzs=tg(tys)&dz(dys); call xunkong(ygzs,yxks,yxss) asp的mod就是去模，对应 %

[ziyeage]

call xunkong(ygzs,yxks,yxss) 'response.write yxss 呼叫一个叫xunkong的函数，代入值为ygzs,yxks,yxss response这句被屏蔽了，原义是打印yxss值。 dzorder(yxss) 这个也是个函数，输入值为yxss，返回值一般就是dzorder函数中函数名为dzorder的值。

[Dogfish]

int dys=(birthyear-1924)%12;
dys=(dys+12)%12;
int tys=(birthyear-1924)%10;
tys=(tys+10)%10;
ygzs=tg(tys)&dz(dys); ’tg和dz是函数，结果组合起来
call xunkong(ygzs,yxks,yxss) ‘调用一个函数，参数为ygzs,yxks,yxss
'response.write yxss   '可能输出来看看结果。测试用。
suishu=y-birthyear+1;
if sex then
   hntg=(2+suishu-1) mod 10
   hndz=(dzorder(yxss)+suishu)mod 12
else
   hntg=(9+suishu-1) mod 10  ’这个是取余。取余的定义应该全世界是一样的。
   hndz=(dzorder(yxss)-4+suishu)mod 12 'dzorder应该是函数
end if

[战A]

int dys=(birthyear-1924)%12; dys=(dys+12)%12; int tys=(birthyear-1924)%10; tys=(tys+10)%10; ygzs=tg(tys)&dz(dys); //tg()和dz()是定义的函数，&把函数返回值连接起来了 call xunkong(ygzs,yxks,yxss) //调用xunkong(p1,p2,p3)函数 'response.write yxss // 输出yxss suishu=y-birthyear+1; if sex then hntg=(2+suishu-1) mod 10 hndz=(dzorder(yxss)+suishu)mod 12 else hntg=(9+suishu-1) mod 10 //(9+suishu-1) mod 10等同于(9+suishu-1)%10； hndz=(dzorder(yxss)-4+suishu)mod 12 end if