EA-14254 付魔機率與爆不爆裝

liushrchiye

//==========================================
// [冥] The PlutoEA Project [王]
// http://opensvn.csie.org/PlutoEA
// -----------------------------------------
// - 隱藏打洞 (附魔系統)
//==========================================
// 版本: 1.0 [L0ne_W0lf]
//==========================================
ra_temsky,68,95,5 script 鎧甲附魔師 73,{
if (countitem(7432) > 2) {
  mes "請帶著三個袋子和你要附魔的裝備";
  mes " ";
  mes "附魔中，請勿移動、發生失敗或物品不見，請勿叫GM賠";
  next;
  switch(select("1洞盔甲:高級盔甲:下次再說")) {
  case 1:
   switch(select("毛皮大衣:秘衣 美德:秘衣 惡德:西裝外套:大衣:長大衣:鋼鐵鎖子甲:鋼鐵鎧甲:絲質外袍:聖職之袍:聖職之衣:緊身便衣:秘銀之衣:盜賊之衣:秘銀金屬鎧甲:火鱗鎧甲:水鱗鎧甲:風鱗鎧甲:地鱗鎧甲")) {
   case 1:
    callsub S_EnchantArmor,2311,55;
   case 2:
    callsub S_EnchantArmor,2318,55;
   case 3:
    callsub S_EnchantArmor,2319,55;
   case 4:
    callsub S_EnchantArmor,2320,55;
   case 5:
    callsub S_EnchantArmor,2308,55;
   case 6:
    callsub S_EnchantArmor,2310,55;
   case 7:
    callsub S_EnchantArmor,2315,55;
   case 8:
    callsub S_EnchantArmor,2317,55;
   case 9:
    callsub S_EnchantArmor,2322,55;
   case 10:
    callsub S_EnchantArmor,2324,55;
   case 11:
    callsub S_EnchantArmor,2326,55;
   case 12:
    callsub S_EnchantArmor,2331,55;
   case 13:
    callsub S_EnchantArmor,2333,55;
   case 14:
    callsub S_EnchantArmor,2336,55;
   case 15:
    callsub S_EnchantArmor,2342,55;
   case 16:
    callsub S_EnchantArmor,2345,55;
   case 17:
    callsub S_EnchantArmor,2347,55;
   case 18:
    callsub S_EnchantArmor,2349,55;
   case 19:
    callsub S_EnchantArmor,2351,55;
   }
  case 2:
   switch(select("隕石鋼鐵鎧甲:歐羅萊昂的制服:巴基力鎧甲:強化西裝外套")) {
   case 1:
    callsub S_EnchantArmor,2364,60;
   case 2:
    callsub S_EnchantArmor,2365,60;
   case 3:
    callsub S_EnchantArmor,2357,60;
   case 4:
    callsub S_EnchantArmor,15021,60;
   }
  case 3:
   mes "[實習打洞師]";
   mes "以後如果有興趣的話，請務必再來找我";
   close;
  }
}
else {
  mes "[實習打洞師]";
  mes "我負責盔甲的鑽洞工作，也就是說我是專";
  mes "門研究如何提高既有盔甲力量的人";
  next;
  mes "[實習打洞師]";
  mes "如果你有興趣的話，請帶著3個袋子和我講話";
  mes "要鑽洞的盔甲過來找我吧!";
  close;
}
S_EnchantArmor:
set .@itemid,getarg(0);
set .@failrate,getarg(1);
if ((countitem(.@itemid) > 0) && (countitem(.@itemid) < 3)) {
  mes "[實習打洞師]";
  mes "插槽鑽洞需要3個袋子，而且鑽洞效果是隨機的，當然裝備有一定機率會損壞";
  next;
  mes "最重要的是，";
  mes "^ff5555既有的精煉值和原來裝備的";
  mes "卡片會全部消失^000000，";
  mes "你確定要鑽洞嗎?";
  next;
  switch(select("再考慮一下:已經決定了，請幫我鑽洞")) {
  case 1:
   mes "[實習打洞師]";
   mes "安全第一，祝你旅途愉快!";
   close;
  case 2:
   mes "[實習打洞師]";
   mes "看來你很喜歡冒險，那我們開始吧";
   close2;
   specialeffect2 EF_MAPPILLAR;
   if (countitem(7432) < 3) {
    mes "[實習打洞師]";
    mes "抱歉，你身上的袋子不夠";
    close;
   }
   progressbar "ffff00",7;
   set .@enc_ran,rand(1,.@failrate);
   delitem 7432,3;
   delitem .@itemid,1;
   if (.@enc_ran == 1) {
    set .@addpart,4704;
   }
   else if (.@enc_ran == 2) {
    set .@addpart,4714;
   }
   else if (.@enc_ran == 3) {
    set .@addpart,4724;
   }
   else if (.@enc_ran == 4) {
    set .@addpart,4734;
   }
   else if (.@enc_ran == 5) {
    set .@addpart,4744;
   }
   else if (.@enc_ran == 6) {
    set .@addpart,4754;
   }
   else if ((.@enc_ran > 6) && (.@enc_ran < 9)) {
    set .@addpart,4701;
   }
   else if ((.@enc_ran > 8) && (.@enc_ran < 11)) {
    set .@addpart,4711;
   }
   else if ((.@enc_ran > 10) && (.@enc_ran < 13)) {
    set .@addpart,4721;
   }
   else if ((.@enc_ran > 12) && (.@enc_ran < 15)) {
    set .@addpart,4731;
   }
   else if ((.@enc_ran > 14) && (.@enc_ran < 17)) {
    set .@addpart,4741;
   }
   else if ((.@enc_ran > 16) && (.@enc_ran < 19)) {
    set .@addpart,4751;
   }
   else if ((.@enc_ran > 18) && (.@enc_ran < 22)) {
    set .@addpart,4700;
   }
   else if ((.@enc_ran > 21) && (.@enc_ran < 25)) {
    set .@addpart,4710;
   }
   else if ((.@enc_ran > 24) && (.@enc_ran < 28)) {
    set .@addpart,4720;
   }
   else if ((.@enc_ran > 27) && (.@enc_ran < 31)) {
    set .@addpart,4730;
   }
   else if ((.@enc_ran > 30) && (.@enc_ran < 34)) {
    set .@addpart,4740;
   }
   else if ((.@enc_ran > 33) && (.@enc_ran < 37)) {
    set .@addpart,4750;
   }
   else {
    specialeffect2 EF_PHARMACY_FAIL;
    mes "真是糟糕!";
    mes "打洞失敗了";
    close;
   }
   getitem2 .@itemid, 1, 1, 0, 0, 0, 0, 0, .@addpart;
  }
}
else {
  mes "嗯? 好像什麼都沒有啊?";
  mes "請帶著3個袋子來給我!";
  close;
}
}

改哪邊可以控制機率 和 爆不爆裝呢

sinya

callsub S_EnchantArmor,物品id,參數1;

參數1  的數字愈大失敗率愈大   數字不能比36小不然會影響到本來的設定   如果 參數1 設36 那就是100%成功