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;
}