//用法
//callfunc("gcstr",道具id);
function	script	gcstr	{
	setarray .c$[1],"1","2","3","4","5","6","7","8","9";
	setarray .c$[10],"a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z";
	setarray .c$[36],"A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z";
	.@stopnum = getarg(0);
	freeloop(1);
	for(.@k=0; .@k<= 17; .@k++) {
		for(.@j= 0; .@j<= 61; .@j++) {
			for(.@i=( .@k ||.@j ? 0:1);.@i<= 61; .@i++ ){
				.@n++;
				if(.@stopnum == .@n) {
					.@os$ = .c$[.@k]+(.@j?.c$[.@j]:(.@k?"0":""))+(.@i?.c$[.@i]:"0");
					freeloop(0);
					return .@os$;
				}
			}
		}
	}
	freeloop(0);
}


prontera,160,190,4	script	test5467	48,{
	input .@input;
	.@rs$ = callfunc("gcstr",.@input);
	dispbottom "得到字串是:" + .@rs$;
	dispbottom .@input+"：<ITEM>0000000"+.@rs$+"'00</ITEM>";
	end;
}