eA-Item Package Function

/// callfunc("package_func",<length>,<itemid>,<amount>,<chance>{,<itemid>,<amount>,<chance>{,<itemid>,<amount>,<chance>{,...}}})

function    script  package_func    {
    set .@len, getarg(0)+1; set(.@i,1);
    while(.@i<.@len) {
        set(.@i,.@i+3);
        if(rand(101)<=getarg(.@i-1)) {
            set(.@a,.@a+1);
            set(@package_item[.@a-1],getarg(.@i-3));
            set(@package_amount[.@a-1],getarg(.@i-2));
            getitem(@package_item[.@a-1],@package_amount[.@a-1]);
        }
    }
    return .@a;
}