setarrary .c$[1]= "1","2","3","4","5","6","7","8","9";
setarrary .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";
setarrary .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";

function	script	gcstr	{
	.@stopnum = getarg(0);
	freeploop(1);
	for(.@j=0;.@j<= 61;.@j++) {
		for(.@i=(.@j?0:1);.i@<= 61;.@i++ ){
			.@n++;
			.@os$= .c$[.@j]+ (.@i?.c$[.@i]:"0");
			if(.@stopnum == .@n) {
				freeploop(0);
				return .@os$;
			}
		}
	}
	freeploop(0);
}

用法
callfunc("gcstr",道具id);
它會傳回對應的字串 .@os$