function    script  randombag   {
 
    set .@count,17;
    // <%> , <ItemID> , <Amount>
    setarray .@R1[0],100,7074,1; 
    setarray .@R2[0],100,7082,1; 
    setarray .@R3[0],100,7079,1; 
    setarray .@R4[0],100,7075,1; 
    setarray .@R5[0],100,7083,1; 
    setarray .@R6[0],100,7080,1; 
    setarray .@R7[0],100,7076,1;
    setarray .@R8[0],100,7088,1;
    setarray .@R9[0],100,7086,1;
    setarray .@R10[0],100,7084,1;
    setarray .@R11[0],100,7085,1;
    setarray .@R12[0],100,7090,1;
    setarray .@R13[0],100,7091,1;
    setarray .@R14[0],100,7077,1;
    setarray .@R15[0],100,7078,1;
    setarray .@R16[0],100,7092,1; 
    setarray .@R17[0],100,7087,1;
    //setarray .@Default[0],7086,1;
    set .@i, rand(1,.@count);
    if (rand(1,100) > getd(".@R"+.@i+"[0]"))
    {
        for(set .@j,0; .@j<getarraysize(.@Default); set .@j,.@j+2)
        {
            getitem .@Default[.@j], .@Default[.@j+1];
            if(!.@k[0])
                setarray .@k[0], .@Default[.@j], .@Default[.@j+1];
        }
    }
    else{
        for(set .@j,1; .@j<getarraysize(getd(".@R"+.@i)); set .@j,.@j+2)
        {
            getitem getd(".@R"+.@i+"["+.@j+"]"), getd(".@R"+.@i+"["+(.@j+1)+"]");
            if (!.@k[0])
            {
                set .@gz,.@i;
                setarray .@k[0], getd(".@R"+.@i+"["+.@j+"]"), getd(".@R"+.@i+"["+(.@j+1)+"]");
                break;
            }
        }
    }
    if(1<=.@gz&&.@gz<=5)
    specialeffect2 18;
}