function script randombag { set .@count,17; // <%> , , 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