viewing paste getnameditem using getitem() | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
 
crystilia,166,208,4     script  Sample#getnameditem     757,{
        mes "Enter Item ID";
        do{
                input .@item,0,32767;
                if( !.@item ) close;
        }while( getitemname( .@item ) == "null" );
        mes "Amount ?";
        input .@amount,0,30000;
        if( .@amount ){
                .@cid = getcharid(0);
                .@card1 = 254;
                .@card2 = 0;
                .@card3 = .@cid & 65535;
                .@card4 = .@cid >> 16;
                getitem2 .@item,.@amount,1,0,0,.@card1,.@card2,.@card3,.@card4;
        }
        close;
}
Viewed 809 times, submitted by Emistry.