karazu

THANK YOU VERY MUCH MAN! MUAH ngek, I think u missed something in monster 2222(Flamel) I still got error on him! however the other 6 are working fine! thank you very much!

Sorry for the late reply Mr.. Ok at the 1st place I did a mistake by simply not carefully reading ur instruction.. I was confused about (idname) and (name) but i manage to fix it. but then the error still exist! here it is. // Lighthalzen Biolab F4 2221,RANDEL,Randel,Randel,141,478745,0,32367,24055,1,3055,4277,180,56,142,69,86,49,132,55,10,12,1,7,66,0x3095,170,76,384,288,0,0,0,0,0,0,0,7345,3000,6470,300,6471,300,985,100,617,10,1435,1,2162,1,0,0 2222,FLAMEL,Flamel,Flamel,141,316468,0,31166,21445,1,1074,1503,93,40,138,79,62,53,82,48,10,12,1,7,63,0x3095,180,76,384,288,0,0,0,0,0,0,0,7345,3000,6470,300,6471,300,984,100,617,10,16010,10,15044,1,0,0 2223,CELIA,Celia,Celia,141,253145,0,22107,19017,1,1612,2256,74,312,108,78,55,144,139,49,10,12,1,7,68,0x3295,150,1152,384,288,0,0,0,0,0,0,0,7345,3000,6470,300,6471,300,985,100,1654,10,2853,10,18111,1,5514,1,0,0 2224,CHEN,Chen,Chen,141,218721,2000,25684,19810,1,2501,3501,125,56,126,74,71,123,99,65,10,12,1,6,81,0x3295,180,1152,384,288,0,0,0,0,0,0,0,7347,2000,6470,300,6471,300,984,100,617,10,1814,10,1659,0,0 2225,GERTIE,Gertie,Gertie,141,266926,0,24267,20233,1,3684,5157,108,10,145,87,59,67,127,76,10,12,1,6,85,0x3195,180,76,384,288,0,0,0,0,0,0,0,7347,2000,6470,300,6471,300,985,100,617,10,13061,10,18109,1,0,0 2226,ALPHOCCIO,Alphoccio,Alphoccio,142,256202,0,22192,20322,1,1273,1782,84,15,121,126,67,80,165,42,10,12,1,7,64,0x3095,180,76,384,288,0,0,0,0,0,0,0,7347,2000,6470,300,6471,300,984,100,617,10,1930,10,2161,1,0,0 2227,TRENTINI,Trentini,Trentini,142,204962,0,15995,13248,1,1070,1498,70,12,121,126,67,80,165,42,10,12,1,7,64,0x3095,180,76,384,288,0,0,0,0,0,0,0,7347,2000,6470,300,6471,300,985,100,1984,10,2465,10,2892,1,0,0 I am using Miruku Full client and fully update using hes patcher and i did ur instruction however I still have error in this following monsters: tested earlier 2221 2222 2223 2224 2225 2226 2227 It fixes other items but i still have error....

Ok Mr. thank you for your great help.... still looking forward for further help from you! I wish if u find more problems like this issue, you will post it here.. Thank you! Still have problem with the paladins book, can u help me with that? I tried the gypsy but her drop's are ok... did i miss something?

wow! great help for me! is their more? so that i can compile my GRF now? such a great help for me! is this the only error from the present client atM? I wish u can share me more! like in another dungeon etc..

Thank you Mr..

now please! haha.......... joke but thank you! btw can u help me w/ this? http://rathena.org/board/topic/60267-error-unmagnified-items/

I am having trouble in this Unmagnified Items drop by the lhz_dun04 monster, however when I @item them they're fine.. any suggestions please?

the script is working fine for me now! however the Vablainn castle emblem still dont show in the flag! hehehe! any update?

About changing the price of the APPLE heheh!

if i leave it alone, then he error will still show.... I think we had d same idea of Vertigo..

OK thank you! By the way Emistry what's with this Apple ISSUE? every time i start the server it will complain about the apple being in 1z because of the overcharge/discount issue - shop Emistry_Shop -1,512:1 I change the 1 in to 100 and it works fine now.. - shop Emistry_Shop -1,512:100 Is their a possible error coming soon?

OK thank you! By the way Emistry what's with this Apple ISSUE? every time i start the server it will complain about the apple being in 1z because of the overcharge/discount issue - shop Emistry_Shop -1,512:1 I change the 1 in to 100 and it works fine now.. - shop Emistry_Shop -1,512:100 Is their a possible error coming soon?

Thank you Mr. I will test it! I was supposed to PM you after I hit the F5 button lol,, and ur name appears.. haha By the way! can u tell me what caused it to send error?

No I dont have! I did just do a @itemreset to make everything clean. and @item some PODS and its still their..

I already posted an Image.. OK will code box it! sorry dont know about that... If I m going to put a location of each NPC then it will not be a single NPC anymore?

This script is simply the Dynamic Shop NPC but just improve to add some "MENU" (just downloaded in eathena I am having some problem here that every time i brought an item their is/are error in the "map server" prontera,141,176,5, script Donation NPC 992,{ mes "//////////////////////////////////////////////"; mes "// PLEASE BUY 1 ITEM"; mes "//ONLY PER TRANSACTION"; mes "// THANK YOU.."; mes "//////////////////////////////////////////////"; next; mes "Choose your Shop"; switch (select ("Upper:Middle:Lower:Boxes")) { Case 1: doevent "Upper::OnShop"; end; Case 2: doevent "Middle::OnShop"; end; Case 3: doevent "Lower::OnShop"; end; Case 4: doevent "Boxes::OnShop"; end; } } // -- ***************************************** F I R S T S H O P ********************************************** - shop quest_shop1 -1,501:50 - script Upper -1,{ OnShop: set @i,0; mes "[shop Quest NPC]"; mes "Which item do you wish to obtain?"; mes "Select only one."; callshop "quest_shop1",1; npcshopattach "quest_shop1"; end; OnBuyItem: if(.BuildQuest) { for(set .e,0; !compare(""+getarg(.e+1),"Zeny"); set .e,.e+2) {} npcshopadditem "quest_shop1",getarg(.e+2),0; setarray .Shop[.i],getarg(.e+2); set .i,.i+1; goto Quest_Setup; } if(.Shop[@i]!=@bought_nameid) for(set @i,1; 1; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set .i,@i; callsub Quest_Setup; } for(set @i,1; !@e; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set @e,1; set .i,@i; callsub Quest_Setup; } mes "[shop Quest NPC]"; mes "I require the following:"; for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) mes "^FF0000" + ((countitem(getarg(@i))>=getarg(@i+1))? "^00FF00":"") + "" + getarg(@i+1) + " " + getitemname(getarg(@i)) + " [" + countitem(getarg(@i)) + "/" + getarg(@i+1) + "]"; if(getarg(@i)) mes "^FF0000" + ((Zeny>=getarg(@i))? "^00FF00":"") + "" + getarg(@i) + " Zeny"; mes "^000000In exchange, I will give you:^0000FF"; for(set @i,@i+2; getarg(@i); set @i,@i+2) mes getarg(@i+1) + " " + getitemname(getarg(@i)); switch(select("Exchange:" + (((((getiteminfo(@bought_nameid,5) & 1) || (getiteminfo(@bought_nameid,5) & 256) || (getiteminfo(@bought_nameid,5) & 512)) && @equip==0))? "Preview Item":"") + ":No thanks")) { case 1: for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) if(countitem(getarg(@i)) < getarg(@i+1)) { next; mes "You have " + countitem(getarg(@i)) + " " + getitemname(getarg(@i)) + ", while I require " + getarg(@i+1) + "."; mes "Please obtain ^FF0000" + (getarg(@i+1)-countitem(getarg(@i))) + " more " + getitemname(getarg(@i)) + "^000000."; close; } if(Zeny<getarg(@i)) { next; mes "You do not have enough Zeny."; mes "Please obtain ^FF0000" + (getarg(@i)-Zeny) + " more Zeny^000000."; close; } for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) delitem getarg(@i),getarg(@i+1); set Zeny,Zeny-getarg(@i); for(set @i,@i+2; getarg(@i); set @i,@i+2) getitem getarg(@i),getarg(@i+1); close; case 2: set @bottomview, getlook(3); set @topview, getlook(4); set @midview, getlook(5); addtimer 1000, strnpcinfo(3)+"::On_Leave"; set @equip,getiteminfo(@bought_nameid, 5); set @view, getiteminfo(@bought_nameid, 11); if(@equip != -1 && @view > 0) { if(@equip & 1) atcommand "@changelook 3 " + @view; if(@equip & 256) atcommand "@changelook 1 " + @view; if(@equip & 512) atcommand "@changelook 2 " + @view; } next; goto OnBuyItem; case 3: close; } On_Leave: atcommand "@changelook 1 " + @topview; atcommand "@changelook 2 " + @midview; atcommand "@changelook 3 " + @bottomview; set @equip,0; set @view,0; set @topview,0; set @midview,0; set @bottomview,0; end; OnInit: npcshopitem "quest_shop1",0,0; set .BuildQuest,1; set .i,1; Quest_Setup: switch(.i) { default: set .BuildQuest,0; set .e,0; set .i,0; end; case 1: callsub OnBuyItem,7179,300,0,"SZeny",5754,1,0; case 2: callsub OnBuyItem,7179,300,0,"SZeny",5749,1,0; case 3: callsub OnBuyItem,7179,300,0,"SZeny",5746,1,0; case 4: callsub OnBuyItem,7179,300,0,"SZeny",5753,1,0; case 5: callsub OnBuyItem,7179,300,0,"SZeny",5752,1,0; case 6: callsub OnBuyItem,7179,300,0,"SZeny",5751,1,0; case 7: callsub OnBuyItem,7179,300,0,"SZeny",5747,1,0; case 8: callsub OnBuyItem,7179,300,0,"SZeny",5750,1,0; case 9: callsub OnBuyItem,7179,300,0,"SZeny",5756,1,0; case 10: callsub OnBuyItem,7179,300,0,"SZeny",5757,1,0; case 11: callsub OnBuyItem,7179,300,0,"SZeny",5755,1,0; case 12: callsub OnBuyItem,7179,300,0,"SZeny",5748,1,0; case 13: callsub OnBuyItem,7179,300,0,"SZeny",5758,1,0; } } // -- ***************************************** S E C O N D S H O P ********************************************** - shop quest_shop2 -1,501:50 - script Middle -1,{ OnShop: set @i,0; mes "[shop Quest NPC]"; mes "Which item do you wish to obtain?"; mes "Select only one."; callshop "quest_shop2",1; npcshopattach "quest_shop2"; end; OnBuyItem: if(.BuildQuest) { for(set .e,0; !compare(""+getarg(.e+1),"Zeny"); set .e,.e+2) {} npcshopadditem "quest_shop2",getarg(.e+2),0; setarray .Shop[.i],getarg(.e+2); set .i,.i+1; goto Quest_Setup; } if(.Shop[@i]!=@bought_nameid) for(set @i,1; 1; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set .i,@i; callsub Quest_Setup; } for(set @i,1; !@e; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set @e,1; set .i,@i; callsub Quest_Setup; } mes "[shop Quest NPC]"; mes "I require the following:"; for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) mes "^FF0000" + ((countitem(getarg(@i))>=getarg(@i+1))? "^00FF00":"") + "" + getarg(@i+1) + " " + getitemname(getarg(@i)) + " [" + countitem(getarg(@i)) + "/" + getarg(@i+1) + "]"; if(getarg(@i)) mes "^FF0000" + ((Zeny>=getarg(@i))? "^00FF00":"") + "" + getarg(@i) + " Zeny"; mes "^000000In exchange, I will give you:^0000FF"; for(set @i,@i+2; getarg(@i); set @i,@i+2) mes getarg(@i+1) + " " + getitemname(getarg(@i)); switch(select("Exchange:" + (((((getiteminfo(@bought_nameid,5) & 1) || (getiteminfo(@bought_nameid,5) & 256) || (getiteminfo(@bought_nameid,5) & 512)) && @equip==0))? "Preview Item":"") + ":No thanks")) { case 1: for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) if(countitem(getarg(@i)) < getarg(@i+1)) { next; mes "You have " + countitem(getarg(@i)) + " " + getitemname(getarg(@i)) + ", while I require " + getarg(@i+1) + "."; mes "Please obtain ^FF0000" + (getarg(@i+1)-countitem(getarg(@i))) + " more " + getitemname(getarg(@i)) + "^000000."; close; } if(Zeny<getarg(@i)) { next; mes "You do not have enough Zeny."; mes "Please obtain ^FF0000" + (getarg(@i)-Zeny) + " more Zeny^000000."; close; } for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) delitem getarg(@i),getarg(@i+1); set Zeny,Zeny-getarg(@i); for(set @i,@i+2; getarg(@i); set @i,@i+2) getitem getarg(@i),getarg(@i+1); close; case 2: set @bottomview, getlook(3); set @topview, getlook(4); set @midview, getlook(5); addtimer 1000, strnpcinfo(3)+"::On_Leave"; set @equip,getiteminfo(@bought_nameid, 5); set @view, getiteminfo(@bought_nameid, 11); if(@equip != -1 && @view > 0) { if(@equip & 1) atcommand "@changelook 3 " + @view; if(@equip & 256) atcommand "@changelook 1 " + @view; if(@equip & 512) atcommand "@changelook 2 " + @view; } next; goto OnBuyItem; case 3: close; } On_Leave: atcommand "@changelook 1 " + @topview; atcommand "@changelook 2 " + @midview; atcommand "@changelook 3 " + @bottomview; set @equip,0; set @view,0; set @topview,0; set @midview,0; set @bottomview,0; end; OnInit: npcshopitem "quest_shop2",0,0; set .BuildQuest,1; set .i,1; Quest_Setup: switch(.i) { default: set .BuildQuest,0; set .e,0; set .i,0; end; case 1: callsub OnBuyItem,7179,170,0,"SZeny",5401,1,0; case 2: callsub OnBuyItem,7179,170,0,"SZeny",5402,1,0; case 3: callsub OnBuyItem,7179,170,0,"SZeny",5421,1,0; case 4: callsub OnBuyItem,7179,170,0,"SZeny",5288,1,0; case 5: callsub OnBuyItem,7179,170,0,"SZeny",5389,1,0; case 6: callsub OnBuyItem,7179,170,0,"SZeny",5786,1,0; case 7: callsub OnBuyItem,7179,170,0,"SZeny",5788,1,0; case 8: callsub OnBuyItem,7179,170,0,"SZeny",5664,1,0; case 9: callsub OnBuyItem,7179,170,0,"SZeny",5592,1,0; case 10: callsub OnBuyItem,7179,170,0,"SZeny",18503,1,0; } } // -- ***************************************** T H I R D S H O P ********************************************** - shop quest_shop3 -1,501:50 - script Lower -1,{ OnShop: set @i,0; mes "[shop Quest NPC]"; mes "Which item do you wish to obtain?"; mes "Select only one."; callshop "quest_shop3",1; npcshopattach "quest_shop3"; end; OnBuyItem: if(.BuildQuest) { for(set .e,0; !compare(""+getarg(.e+1),"Zeny"); set .e,.e+2) {} npcshopadditem "quest_shop3",getarg(.e+2),0; setarray .Shop[.i],getarg(.e+2); set .i,.i+1; goto Quest_Setup; } if(.Shop[@i]!=@bought_nameid) for(set @i,1; 1; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set .i,@i; callsub Quest_Setup; } for(set @i,1; !@e; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set @e,1; set .i,@i; callsub Quest_Setup; } mes "[shop Quest NPC]"; mes "I require the following:"; for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) mes "^FF0000" + ((countitem(getarg(@i))>=getarg(@i+1))? "^00FF00":"") + "" + getarg(@i+1) + " " + getitemname(getarg(@i)) + " [" + countitem(getarg(@i)) + "/" + getarg(@i+1) + "]"; if(getarg(@i)) mes "^FF0000" + ((Zeny>=getarg(@i))? "^00FF00":"") + "" + getarg(@i) + " Zeny"; mes "^000000In exchange, I will give you:^0000FF"; for(set @i,@i+2; getarg(@i); set @i,@i+2) mes getarg(@i+1) + " " + getitemname(getarg(@i)); switch(select("Exchange:" + (((((getiteminfo(@bought_nameid,5) & 1) || (getiteminfo(@bought_nameid,5) & 256) || (getiteminfo(@bought_nameid,5) & 512)) && @equip==0))? "Preview Item":"") + ":No thanks")) { case 1: for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) if(countitem(getarg(@i)) < getarg(@i+1)) { next; mes "You have " + countitem(getarg(@i)) + " " + getitemname(getarg(@i)) + ", while I require " + getarg(@i+1) + "."; mes "Please obtain ^FF0000" + (getarg(@i+1)-countitem(getarg(@i))) + " more " + getitemname(getarg(@i)) + "^000000."; close; } if(Zeny<getarg(@i)) { next; mes "You do not have enough Zeny."; mes "Please obtain ^FF0000" + (getarg(@i)-Zeny) + " more Zeny^000000."; close; } for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) delitem getarg(@i),getarg(@i+1); set Zeny,Zeny-getarg(@i); for(set @i,@i+2; getarg(@i); set @i,@i+2) getitem getarg(@i),getarg(@i+1); close; case 2: set @bottomview, getlook(3); set @topview, getlook(4); set @midview, getlook(5); addtimer 1000, strnpcinfo(3)+"::On_Leave"; set @equip,getiteminfo(@bought_nameid, 5); set @view, getiteminfo(@bought_nameid, 11); if(@equip != -1 && @view > 0) { if(@equip & 1) atcommand "@changelook 3 " + @view; if(@equip & 256) atcommand "@changelook 1 " + @view; if(@equip & 512) atcommand "@changelook 2 " + @view; } next; goto OnBuyItem; case 3: close; } On_Leave: atcommand "@changelook 1 " + @topview; atcommand "@changelook 2 " + @midview; atcommand "@changelook 3 " + @bottomview; set @equip,0; set @view,0; set @topview,0; set @midview,0; set @bottomview,0; end; OnInit: npcshopitem "quest_shop3",0,0; set .BuildQuest,1; set .i,1; Quest_Setup: switch(.i) { default: set .BuildQuest,0; set .e,0; set .i,0; end; case 1: callsub OnBuyItem,7179,100,0,"SZeny",5377,1,0; case 2: callsub OnBuyItem,7179,100,0,"SZeny",5419,1,0; case 3: callsub OnBuyItem,7179,100,0,"SZeny",5362,1,0; } } // -- ***************************************** F O U R T H S H O P ********************************************** - shop quest_shop4 -1,501:50 - script Boxes -1,{ OnShop: set @i,0; mes "[shop Quest NPC]"; mes "Which item do you wish to obtain?"; mes "Select only one."; callshop "quest_shop4",1; npcshopattach "quest_shop4"; end; OnBuyItem: if(.BuildQuest) { for(set .e,0; !compare(""+getarg(.e+1),"Zeny"); set .e,.e+2) {} npcshopadditem "quest_shop4",getarg(.e+2),0; setarray .Shop[.i],getarg(.e+2); set .i,.i+1; goto Quest_Setup; } if(.Shop[@i]!=@bought_nameid) for(set @i,1; 1; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set .i,@i; callsub Quest_Setup; } for(set @i,1; !@e; set @i,@i+1) if(.Shop[@i]==@bought_nameid) { set @e,1; set .i,@i; callsub Quest_Setup; } mes "[shop Quest NPC]"; mes "I require the following:"; for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) mes "^FF0000" + ((countitem(getarg(@i))>=getarg(@i+1))? "^00FF00":"") + "" + getarg(@i+1) + " " + getitemname(getarg(@i)) + " [" + countitem(getarg(@i)) + "/" + getarg(@i+1) + "]"; if(getarg(@i)) mes "^FF0000" + ((Zeny>=getarg(@i))? "^00FF00":"") + "" + getarg(@i) + " Zeny"; mes "^000000In exchange, I will give you:^0000FF"; for(set @i,@i+2; getarg(@i); set @i,@i+2) mes getarg(@i+1) + " " + getitemname(getarg(@i)); switch(select("Exchange:" + (((((getiteminfo(@bought_nameid,5) & 1) || (getiteminfo(@bought_nameid,5) & 256) || (getiteminfo(@bought_nameid,5) & 512)) && @equip==0))? "Preview Item":"") + ":No thanks")) { case 1: for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) if(countitem(getarg(@i)) < getarg(@i+1)) { next; mes "You have " + countitem(getarg(@i)) + " " + getitemname(getarg(@i)) + ", while I require " + getarg(@i+1) + "."; mes "Please obtain ^FF0000" + (getarg(@i+1)-countitem(getarg(@i))) + " more " + getitemname(getarg(@i)) + "^000000."; close; } if(Zeny<getarg(@i)) { next; mes "You do not have enough Zeny."; mes "Please obtain ^FF0000" + (getarg(@i)-Zeny) + " more Zeny^000000."; close; } for(set @i,0; !compare(""+getarg(@i+1),"Zeny"); set @i,@i+2) delitem getarg(@i),getarg(@i+1); set Zeny,Zeny-getarg(@i); for(set @i,@i+2; getarg(@i); set @i,@i+2) getitem getarg(@i),getarg(@i+1); close; case 2: set @bottomview, getlook(3); set @topview, getlook(4); set @midview, getlook(5); addtimer 1000, strnpcinfo(3)+"::On_Leave"; set @equip,getiteminfo(@bought_nameid, 5); set @view, getiteminfo(@bought_nameid, 11); if(@equip != -1 && @view > 0) { if(@equip & 1) atcommand "@changelook 3 " + @view; if(@equip & 256) atcommand "@changelook 1 " + @view; if(@equip & 512) atcommand "@changelook 2 " + @view; } next; goto OnBuyItem; case 3: close; } On_Leave: atcommand "@changelook 1 " + @topview; atcommand "@changelook 2 " + @midview; atcommand "@changelook 3 " + @bottomview; set @equip,0; set @view,0; set @topview,0; set @midview,0; set @bottomview,0; end; OnInit: npcshopitem "quest_shop4",0,0; set .BuildQuest,1; set .i,1; Quest_Setup: switch(.i) { default: set .BuildQuest,0; set .e,0; set .i,0; end; case 1: callsub OnBuyItem,7179,100,0,"SZeny",12920,1,0; case 2: callsub OnBuyItem,7179,100,0,"SZeny",12921,1,0; case 3: callsub OnBuyItem,7179,50,0,"SZeny",12912,1,0; case 4: callsub OnBuyItem,7179,140,0,"SZeny",13710,1,0; case 5: callsub OnBuyItem,7179,15,0,"SZeny",7776,1,0; case 6: callsub OnBuyItem,7179,12,0,"SZeny",7619,1,0; case 7: callsub OnBuyItem,7179,12,0,"SZeny",7620,1,0; } } That is my script! please help me! Do i need to change something?

I like the feature of this script, but can u make this heal us 100% heal? w/ agi and bless please?