//用法
//callfunc("gcstr2",道具id);
 
function    script  gcstr2  {
    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";
    .@num = getarg(0);
    .@a[1] = .@num/62;
    .@a[2] = .@num%62;
    .@a[3] = .@a[1]/62;
    .@a[4] = .@a[1]%62;
    .@a[5] = .@a[3]/62;
    .@a[6] = .@a[3]%62;
    return .c$[.@a[6]]+.c$[.@a[4]]+.c$[.@a[2]];
}
prontera,160,190,4  script  test#gcstr  48,{
    input .@input;
    .@s$ = callfunc("gcstr2",.@input);
    dispbottom "得到字串是:"+.@s$;
    dispbottom .@input+"：<ITEM>0000y1"+.@s$+"'00</ITEM>";
    end;
}