diff options
Diffstat (limited to 'npc/re/merchants')
| -rw-r--r-- | npc/re/merchants/shadow_refiner.txt | 146 |
1 files changed, 146 insertions, 0 deletions
diff --git a/npc/re/merchants/shadow_refiner.txt b/npc/re/merchants/shadow_refiner.txt new file mode 100644 index 000000000..5bb888d87 --- /dev/null +++ b/npc/re/merchants/shadow_refiner.txt @@ -0,0 +1,146 @@ +//===== Hercules Script ====================================== +//= Shadow Refiner +//===== By: ================================================== +//= Dastgir +//===== Current Version: ===================================== +//= 1.0 +//===== Description: ========================================= +//= [Aegis Conversion] +//===== Additional Comments: ================================= +//= 1.0 First Version [Dastgir] +//============================================================ + +itemmall,31,76,3 script Shadow Blacksmith#nomal 4_F_JOB_BLACKSMITH,{ + disable_items; + mes "[Shadow Blacksmith]"; + mes "Do you want to refine a Shadow item?."; + mes "Please choose the part you want to refine."; + next; + setarray .@position$[0],"Armor","Weapon","Shield","Shoes","Earring","Pendant"; + for (.@i=EQI_SHADOW_ARMOR; .@i<=EQI_SHADOW_ACC_L; .@i++){ + .@menu$ = .@menu$+((getequipisequiped(.@i))?getequipname(.@i):"^8C8C8C"+.@position$[.@i-EQI_SHADOW_ARMOR]+" [Not Equipped]^000000")+":"; + } + .@menu$ = .@menu$+"Refine Info"; + .@SelectedPart = select(.@menu$); + if (.@SelectedPart == 7){ + mes "[Shadow Blacksmith]"; + mes "Shadow item will gain extra bonus effect by the refine level, same as normal weapon/armour items."; + next; + mes "[Shadow Blacksmith]"; + mes "Following are refining effect for each Shadow item parts."; + mes "Weapon: ATK, MATK + 1 increase for each +1 refine success."; + mes "Etc: HP + 10 increase for each +1 refine success."; + next; + mes "[Shadow Blacksmith]"; + mes "You need Oridecon and Elunium for Shadow item refine ingredient, along with refine fee 20000 zeny."; + next; + mes "[Shadow Blacksmith]"; + mes "When +5 or higher refining Shadow item can be destroyed, please use Enriched or HD ingredient for the refinement."; + close; + } + .@SelectedPart += EQI_SHADOW_ARMOR-1; + while(1){ + mes "[Shadow Blacksmith]"; + mes "20000 zeny will be spent as a refine fee."; + mes "Choose the ingredient and start refining."; + next; + .@index = 0; + if (.@SelectedPart != EQI_SHADOW_WEAPON) + .@index = 1; + setarray .@s_weapon1[0],Oridecon,Elunium; + setarray .@s_weapon2[0],Enriched_Oridecon,Enriched_Elunium; + setarray .@s_weapon3[0],HD_Oridecon,HD_Elunium; + if (countitem(.@s_weapon1[.@index])) + .@mate$[0] = getitemname(.@s_weapon1[.@index]); + else{ + .@mate$[0] = "^8C8C8C"+ getitemname(.@s_weapon1[.@index]) +"^000000"; + .@miss[0] = 1; + } + if (countitem(.@s_weapon2[.@index])) + .@mate$[1] = getitemname(.@s_weapon2[.@index]); + else{ + .@mate$[1] = "^8C8C8C"+ getitemname(.@s_weapon2[.@index]) +"^000000"; + .@miss[1] = 1; + } + if (getequiprefinerycnt(.@SelectedPart) > 6 && countitem(.@s_weapon3[.@index])) + .@mate$[2] = getitemname(.@s_weapon3[.@index]); + else { + .@mate$[2] = "^8C8C8C"+ getitemname(.@s_weapon3[.@index]) +"^000000"; + .@miss[2] = 1; + } + //----------------------------------------------------------------------------- + .@option = select("Cancel",.@mate$[0],.@mate$[1],.@mate$[2]); + if (.@option == 1){ + mes "[Shadow Blacksmith]"; + mes "You've cancelled refining."; + close; + } + .@option -= 2; + if (.@option==2){ //HD + if (getequiprefinerycnt(.@SelectedPart) < 7){ + mes "[Shadow Blacksmith]"; + mes "HD ingredient is only possible to use for +7 or higher refine level items."; + close; + } + .@hoihoi = 1; + } + if (.@miss[.@option]){ + mes "[Shadow Blacksmith]"; + mes "You do not have proper ingredient for this refining."; + close; + } + .@choose = getd(".@s_weapon"+(.@option+1)+"["+ .@index +"]"); + if (Zeny < 20000) { + mes "[Shadow Blacksmith]"; + mes "You do not have enough refine fee."; + close; + } + if (getequiprefinerycnt(.@SelectedPart) > 9) { + mes "[Shadow Blacksmith]"; + mes "Shadow item refining is only possible until +10 level."; + close; + } + if (!getequipisenableref(.@SelectedPart)) { + mes "[Shadow Blacksmith]"; + mes "This item cannot be refined."; + close; + } + if (getequippercentrefinery(.@SelectedPart) < 100) { + mes "[Shadow Blacksmith]"; + mes "Safety guaranteed refine limit for shadow item is until +4."; + if (!.@hoihoi) { + mes "If you try more refining, item might get broken when failed. Still want to refine?"; + } + else { + mes "If you try more refining, item refine level might go down when failed. Still want to refine?"; + } + next; + if (select("Proceed","Cancel") == 2) { + mes "[Shadow Blacksmith]"; + mes "You've cancelled refining."; + close; + } + } + //----------------------------------------------------------------------------- + mes "[Shadow Blacksmith]"; + mes "Here we go--!!!"; + next; + delitem .@choose,1; + Zeny -= 20000; + if (getequippercentrefinery(.@SelectedPart) > rand(100) || getequippercentrefinery(.@SelectedPart) > rand(100)) { + successrefitem .@SelectedPart; + mes "[Shadow Blacksmith]"; + mes "Refine was successful."; + next; + } + else { + if (.@hoihoi) + downrefitem .@SelectedPart; + else + failedrefitem .@SelectedPart; + mes "[Shadow Blacksmith]"; + mes "Oh no.. Refine was failed."; + close; + } + } +}
\ No newline at end of file |