viewing paste Unknown #37060 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
//用法
//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;
}
Viewed 650 times, submitted by suezosilver.