viewing paste Unknown #37055 | Athena | Private

Posted on the | Last edited on
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 865 times, submitted by suezosilver.