viewing paste Unknown #37055 | 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 24 25 26 27
//用法
//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(.@j=0; .@j<= 61; .@j++) {
                for(.@i=(.@i=.@j?0:1); .@i<= 61; .@i++ ){
                        .@n++;
                        .@os$ = .c$[.@j]+(.@i?.c$[.@i]:"0");
                        if(.@stopnum == .@n) {
                                freeloop(0);
                                return .@os$;
                        }
                }
        }
        freeloop(0);
}
 
prontera,160,190,4      script  test    48,{
        input .@input;
        dispbottom .@input+":<ITEM>0000000"+callfunc("gcstr",.@input)+"'00</ITEM>";
        end;
}
Viewed 642 times, submitted by suezosilver.