President

May 22, 2012

After i'm compiling battle.c i don't accept report about error..but after that, i start up my map-server_sql

and i'm looking this error .. anyone can help me?

May 22, 2012

don't just reboot..you must recompile the source....

where i must compile it? it means how to compile it? sorry I'm Newbie..

May 22, 2012

did you recompile??
 4000 + 4000 * skill_lv + sstatus->str + sstatus->dex
and are you sure about this?? 24000%??

i just test it.. but after i reboot my server , i doesn't effect on my feint bomb..the bomb still same with the last. any suggestion?

May 21, 2012

src/map/battle.c

case SC_FEINTBOMB:

skillratio += 4000 + 4000 * skill_lv + sstatus->str + sstatus->dex; //orginal :skillratio += 100 + 100 * skill_lv;

break;

i change but, it doesn't effect ... any suggestion?

May 21, 2012

I'm not sure about the formula, but in Rathena, i found this:
case SC_FEINTBOMB:
 skillratio += 100 + 100 * skill_lv;
 break;
I don't see anyting saying about DEX here.

Anyways, if you wan't change the damage of this formula above, just add the command where you wan't:
sstatus->vit
sstatus->dex
sstatus->str
Change str, vit, dex by what you wan't,

where i found that script?

May 21, 2012

you must ask in the source support section...Skill implementations are done in source not on script..^^

ic ic ok thank you sir...

May 21, 2012

Problem : Feint Bomb in KRO looking for stats DEX on player. but i want in my private server Feint Bomb Looking For STR too..

where i must edit the script?

May 21, 2012

db/item_noequip.txt

in item_noequip.txt look for this:

//PVP

14529,2 //Greed Scroll

607,2 //Yggdrasil Berry

608,2 //Yggdrasil Seed

602,2 //Butterfly Wing <--- add this one

ok guy's thanks for all information

May 20, 2012

Problem : in my pvp room player can't use Butterfly wing --> how i can disable Butterfly wing on PVP Room...?

May 20, 2012

the weapon look's like that... if no one help me...can i get sprite ice pick(Hause auger) for male/female ...THanks For Your Responds guys

May 15, 2012

//===== eAthena Script =======================================
//= eAthena PVP-Ladder
//===== By: ==================================================
//= Terces
//===== Current Version: =====================================
//= 1.7.2
//===== Compatible With: =====================================
//= Any Athena Version that has "for" implemented
//===== Credits: =============================================
//= The whole eAthena Board and the eAthena Chat
//===== Notes: ===============================================
//= Note 1:
//= Experience gain works like this formula:
//= ($@LadderLength-(<new position>-1))*$@LadderExp
//= so if someone gets the first place he'll get
//= $@LadderLength*$@LadderExp experience points.
//============================================================
//= Fixxed by Dante
//= V1.7.2
//= Hosted by Dant3 aka Dante
//= HAFE FUN! READ THE TOPIC! IT DONT WORKS MAYBE ON OLDER REV
//= LAST UPDATE: 12th,February.2008
// Main Script - Terces (Main Thanks to Terces )
// V1.7.0 - Dant3
// v1.7.1 - AnnieRuRu
// v1.7.2 - Dant3
// v1.7.3 - Dant3
// THIS SCRIPT WORKS ONLY ON THE NEW EATHENA REVISIONS! ENJOY!
- script PVPLADDEROPTIONS -1,{
end;
OnInit:
// 0 = Disabled (NO)
// 1 = Enable   (YES)
set $@languageselect, 0; //Enable/Disable language selection [English/German] (Default: 1)
set $@LadderAnnounce, 0; //Enable/Disable the announcement when a char reaches a new position in the ladder (Default: 1)
set $@LadderLength, 30;  //Set the length of the Ladder [!Not higher than 128!] (Default: 30)
set $@LadderSteps, 10;  //Set the views per page (Default: 10)set $@LadderExpGain, 1;  //Enable/Disable experience gain when reaching a new position in the ladder (*Note1)
set $@LadderExp, 50;  //Set Experience gain value (*Note1)
set $@LadderZenyGain, 1; //Enable/Disable zeny gain when reaching a new position in the ladder
set $@LadderZeny, 50;  //Set Zeny gain value
set $@LadderChatRoom, 1; //Enable/Disable an Chat Room over the NPC with the message "PvP Ladder" (Users can not enter the Chat room)
set $@LadderAskLogin, 1; //Enable/Disable that the NPC asks about the Broadcast when a Player logins / or  with the Npc Chat (0 = Login Ask , 1 = Npc Chat) Related: 0
set $@LadderGM, 60;  //All GM LVL UNDER this value will show on the PvP Ladder (Over GM LVL: Not shown on Ladder | under GM LVL:  Shown on Ladder)
set $@LadderGMMenu, 99; //GM LVL that need for entering GM Menu
}
- script PVPLADDER -1,{
OnPCKillEvent:
if ( getgmlevel() >= $@LadderGM ) end;
if (terces_PVP_resets != $terces_PVP_resets) {
dispbottom "Please relog your character, in order to get the correct kills for you in the PVP ladder.";
dispbottom "Because a GM just reset the ladder.";
end;
}
if ( killedrid == getcharid(3) ) {
set PVPDeaths, PVPDeaths +1;
set #PVPDeathsAccount, #PVPDeathsAccount +1;
set @PVPDeathstoday, @PVPDeathstoday +1;
end;
}
set $@PVPcounter,$@PVPcounter+1;
set getd("$@PVPKill"+$@PVPcounter),getcharid(3); //getd to avoid errors when more than 1 people kill someone
attachrid(killedrid);
set PVPDeaths,PVPDeaths+1;
set @PVPDeathstoday,@PVPDeathstoday+1;
set #PVPDeathsAccount,#PVPDeathsAccount+1;
set getd("$@PVPkilledplayer"+$@PVPcounter+"$"), strcharinfo(0); //again, getd to avoid possible glitches
detachrid;
attachrid(getd("$@PVPKill"+$@PVPcounter));
CountKills:
set PVPKills,PVPKills+1;
set @PVPKillstoday,@PVPKillstoday+1;
set #PVPKillsAccount,#PVPKillsAccount+1;
setarray @playerstats[0],@PVPKillstoday,@PVPDeathstoday,PVPKills,PVPDeaths,#PVPKillsAccount,#PVPDeathsAccount;
l_ladder:
set @considerdeath,0;
for (set @PosinLadder, 0; @PosinLadder < $@LadderLength; set @PosinLadder, @PosinLadder + 1){
 if (PVPKills >= $terces_PVP_kills[@PosinLadder]){ //Player deserves to be in the ladder
  //Check if Death plays a role on the position
  if ((PVPKills == $terces_PVP_kills[@PosinLadder]) && (PVPDeaths > $terces_PVP_deaths[@PosinLadder])) set @considerdeath,1; //Consider Deaths
  //Check if the player only topped his own scores
  if ($terces_PVP_names$[@PosinLadder] == strcharinfo(0)){
   set $terces_PVP_kills[@PosinLadder],PVPKills;
   set $terces_PVP_deaths[@PosinLadder],PVPDeaths;
   end;
  }
  //Moves all characters in the Ladder
  for (set @beginmoving, $@LadderLength; @beginmoving >= (@PosinLadder+@considerdeath); set @beginmoving, @beginmoving - 1){
   if ($terces_PVP_names$[@beginmoving] == strcharinfo(0)){
 //If the player already is in the Ladder it only has to move players between characters new position and characters old position
 callsub L_LadderMove,0;
 end;
   }
   else if (@beginmoving == (@PosinLadder+@considerdeath)){
 //Player is not in the Ladder and therefor it has to move all players from characters new position downwards
 callsub L_LadderMove,1;
 end;
   }
  }
  end;
 }
}

L_LadderMove:
if (getarg(0) == 0) set @length,@beginmoving;
if (getarg(0) == 1) set @length,$@LadderLength;
for (set @movecycle, @length; @movecycle > (@PosinLadder+@considerdeath);
 set @movecycle, @movecycle - 1){
 set $terces_PVP_names$[@movecycle],$terces_PVP_names$[(@movecycle-1)];
 set $terces_PVP_kills[@movecycle],$terces_PVP_kills[(@movecycle-1)];
 set $terces_PVP_deaths[@movecycle],$terces_PVP_deaths[(@movecycle-1)];
 set $terces_PVP_times[@movecycle],$terces_PVP_times[(@movecycle-1)];
}
//sets the character's stats in the new position
set $terces_PVP_names$[(@PosinLadder+@considerdeath)],strcharinfo(0);
set $terces_PVP_kills[(@PosinLadder+@considerdeath)],PVPKills;
set $terces_PVP_deaths[(@PosinLadder+@considerdeath)],PVPDeaths;
set $terces_PVP_times[(@PosinLadder+@considerdeath)],gettimetick(2);
//Experience Gain
if ($@LadderExpGain == 1){
 set BaseExp,BaseExp+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderExp);
 dispbottom "You have just been rewarded with "+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderExp)+" base experience points";
}
//Zeny Gain
if ($@LadderZenyGain == 1){
 set Zeny,Zeny+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderZeny);
 dispbottom "You have just been rewarded with "+(($@LadderLength-((@PosinLadder+@considerdeath)-1))*$@LadderZeny)+" Zeny";
}
//Announcement (Setting for Char)
if (pvpbroadcast == 2){
announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength+" after killing "+getd("$@PVPkilledplayer"+$@PVPcounter+"$")+".",16;
}
//Announcement (Setting for Account)
if (#pvpbroadcast == 2){
announce strcharinfo(0)+" just claimed the "+((@PosinLadder+@considerdeath)+1)+". Position in the Top "+$@LadderLength+" after killing "+getd("$@PVPkilledplayer"+$@PVPcounter+"$")+".",16;
}
end;
OnPCLoginEvent:
if (terces_PVP_resets != $terces_PVP_resets){
 set PVPDeaths,0;
 set @PVPDeathstoday,0;
 set #PVPDeathsAccount,0;
 set PVPKills,0;
 set @PVPKillstoday,0;
 set #PVPKillsAccount,0;
 set terces_PVP_resets,$terces_PVP_resets;
}
if ($@LadderAskLogin == 0){
if (#pvpbroadcast == 2) goto L_ignore;
if (pvpbroadcast == 2) goto L_ignore;
if (#pvpbroadcast == 1) goto L_ignore;
if (pvpbroadcast == 1) goto L_ignore;
if (pvpbroadcast == 0)
mes "Hi, "+strcharinfo(0)+"";
mes "Me is the PvP Top Management!";
mes "Let me ask you one Question and i will let you play!";
menu "Later please",L_close,"Okay, fine",L_fine;
L_fine:
next;
mes "Well, do you want read Broadcast Messages when a Player reach a new position on the PvP Ranglist?";
menu "Yeah, why not",L_accept,"No, thanks",L_accept_2,"Wtf is Broadcast?",L_broadcast;
L_accept:
next;
mes "Yay, thank you! ";
mes "Will this Setting work on all your Chars on this account or only this char?";
menu "Account",L_account,"Only this char",L_char;
L_account:
set #pvpbroadcast,2;
next;
mes "Okay, "+strcharinfo(0)+"";
mes "Thank you for your time and have fun!";
close;
L_char:
set pvpbroadcast,2;
next;
mes "Okay, "+strcharinfo(0)+"";
mes "Thank you for your time and have fun!";
goto access_eng;
close;

L_accept_2:
next;
mes "Yay, thank you! ";
mes "Will this Setting work on all your Chars on this account or only this char?";
menu "Account",L_account_2,"Only this char",L_char_2;
L_close:
close;
L_account_2:
set #pvpbroadcast,1;
next;
mes "Okay, "+strcharinfo(0)+"";
mes "Thank you for your time and have fun!";
close;
L_char_2:
set pvpbroadcast,1;
next;
mes "Okay, "+strcharinfo(0)+"";
mes "Thank you for your time and have fun!";
goto access_eng;
close;

L_broadcast:
mes "Broadcasts are this yellow messages from  the GMs";
goto L_fine;
}
}
prontera.gat,147,171,6 script PvP Ladder 750,{
if ($@LadderChatRoom == 1) {
 waitingroom "PvP Top "+$@LadderLength+"",0;   // Look on the configuration!
}
set @name$,"[PvP-Ladder]";
//Colour of:   Position Name  Kills  Deaths  Time
setarray @colour$[0], "^996600", "^006699", "^00AA00", "^FF0000", "^EE8800";
if ($@LadderAskLogin == 1){
if (#pvpbroadcast == 2) goto  access_eng;
if (pvpbroadcast == 2) goto  access_eng;
if (#pvpbroadcast == 1) goto  access_eng;
if (pvpbroadcast == 1) goto  access_eng;
if (pvpbroadcast == 0)
mes "Hi, "+strcharinfo(0)+"";
mes "Me is the PvP Top Management!";
mes "Let me ask you one Question and i will let you play!";
menu "Later please",L_close,"Okay, fine",L_fine;
L_fine:
next;
mes "Well, do you want read Broadcast Messages when a Player reach a new position on the PvP Ranglist?";
menu "Yeah, why not",L_accept,"No, thanks",L_accept_2,"Wtf is Broadcast?",L_broadcast;
L_accept:
next;
mes "Yay, thank you! ";
mes "Will this Setting work on all your Chars on this account or only this char?";
menu "Account",L_account,"Only this char",L_char;
L_account:
set #pvpbroadcast,2;
next;
mes "Okay, "+strcharinfo(0)+"";
mes "Thank you for your time and have fun!";
close;
L_char:
set pvpbroadcast,2;
next;
mes "Okay, "+strcharinfo(0)+"";
mes "Thank you for your time and have fun!";
goto access_eng;
close;

L_accept_2:
next;
mes "Yay, thank you! ";
mes "Will this Setting work on all your Chars on this account or only this char?";
menu "Account",L_account_2,"Only this char",L_char_2;
L_close:
close;
L_account_2:
set #pvpbroadcast,1;
next;
mes "Okay, "+strcharinfo(0)+"";
mes "Thank you for your time and have fun!";
close;
L_char_2:
set pvpbroadcast,1;
next;
mes "Okay, "+strcharinfo(0)+"";
mes "Thank you for your time and have fun!";
goto access_eng;
close;

L_broadcast:
mes "Broadcasts are this yellow messages from  the GMs";
goto L_fine;
}
access_eng:
mes @name$;
mes "Hello "+strcharinfo(0)+"...";
mes "If you want to I can show you your PVP stats.";
next;
M_selection_eng:
if ( getgmlevel () < $@LadderGMMenu )
 menu "Show me the PVP Ladder",M_Ladder_eng,"PvP stats since my login",M_seitLogin_eng,"PvP stats of this Char",M_dieserChar_eng,"Stats of the whole account",M_vomAccount_eng,"Cancel",M_abbrechen_eng;
else
 menu "[GM MENU]",GMMenu,"[uSER MENU]",UserMenu;
UserMenu:
menu "Show me the PVP Ladder",M_Ladder_eng,"PvP stats since my login",M_seitLogin_eng,"PvP stats of this Char",M_dieserChar_eng,"Stats of the whole account",M_vomAccount_eng,"Cancel",M_abbrechen_eng;
GMMenu:
mes "PVP Ladder Script";
mes "Version: 1.7.3";
mes "Status of functions: ";
mes "Reset Ladder: No Bugs";
mes "Delete Char on the ladder: BETA [Not working perfect]";
menu "Reset Ladder",L_reset,"Delete a Char on the Ladder",L_del_char,"Cancel",M_abbrechen_eng;
M_Ladder_eng:
mes "Alright...I'll show you the Top "+ $@LadderLength +" with "+$@LadderSteps+" entries per page.";
mes "It'll be viewed like this:";
mes @colour$[0]+"Place^000000: "+@colour$[1]+"<name>^000000 :"+@colour$[2]+"<kills>^000000:"+@colour$[3]+"<deaths>^000000 "+@colour$[4]+"<time>";
next;
callsub L_Ladder;
goto M_selection_eng;
M_seitLogin_eng:
mes @name$;
mes "Your stats since your login:";
mes @PVPKillstoday+"/"+@PVPDeathstoday+"(Kills/Deaths)";
next;
goto M_selection_eng;
M_dieserChar_eng:
mes @name$;
mes "Your stats of this Char:";
mes PVPKills+"/"+PVPDeaths+"(Kills/Deaths)";
next;
goto M_selection_eng;
M_vomAccount_eng:
mes @name$;
mes "Your stats of the whole account:";
mes #PVPKillsAccount+"/"+#PVPDeathsAccount+"(Kills/Deaths)";
next;
goto M_selection_eng;
M_abbrechen_eng:
mes @name$;
mes "OK. You can come back to me and see your stats whenever you want.";
close;
L_del_char:
if (getgmlevel() < 99) end;
mes "Do you want to delete a char on the Ladder?";
if (select ("Yes","No") == 2) goto L_end;
next;
mes "Please give me the Ladder Position of the Char";
input $@CharLadderInput;
set $@CharLadder, $@CharLadderInput;
deletearray @PosinLadder, $@CharLadderInput;
next;
mes "THIS IS ONLY  BETA";
mes "When this step has not worked PLEASE wait until the next Update for this script";
mes "Please don't request support when this step has not worked";
close;
L_reset:
if (getgmlevel() < 99) end;
mes "Do you want to reset the ladder?";
if (select ("Yes","No") == 2) goto L_end;
mes "Are you really really sure you want to reset it?";
menu "Yes, ffs!!",-,"No",L_end;
deletearray $terces_PVP_kills,128;
deletearray $terces_PVP_deaths,128;
deletearray $terces_PVP_names$,128;
deletearray $terces_PVP_times,128;
set $terces_PVP_resets,$terces_PVP_resets +1;
L_end:
mes "Okay...cya";
close;

L_Ladder:
for (set @y,0; @y < $@LadderLength; set @y,@y+$@LadderSteps){
 for (set @x,@y; (@x < (@y+$@LadderSteps)) && (@x < ($@LadderLength)); set @x,@x+1){
  if ($terces_PVP_names$[@x] != ""){
   mes @colour$[0]+(@x+1)+"^000000: "+@colour$[1]+$terces_PVP_names$[@x]+"^000000 "+@colour$[2]+$terces_PVP_kills[@x]+"^000000:"+@colour$[3]+$terces_PVP_deaths[@x]+"^000000 ~ "+@colour$[4]+callfunc ("Gettime",$terces_PVP_times[@x])+"^000000";
  } else {
   mes "^DD0000"+(@x+1)+": ^006699None^000000 ";
  }
 }
 next;
}
return;
}
function script Gettime {
if (getarg(0)==0) return;
set @difftimedays,(gettimetick(2) - getarg(0));
set @difftimehours,@difftimedays%86400;
set @difftimeminutes,@difftimehours%3600;
set @difftimeseconds,@difftimeminutes%60;
set @days,@difftimedays/86400;
set @hours,@difftimehours/3600;
set @minutes,@difftimeminutes/60;
set @seconds,@difftimeseconds;
set @result$,"";
if(@days != 0) set @result$,@result$+@days+"d ";
if(@hours != 0) set @result$,@result$+@hours+"h ";
if(@minutes != 0) set @result$,@result$+@minutes+"m ";
if(@seconds != 0) set @result$,@result$+@seconds+"s";
return (@result$);
}

anyone help me to fix it please, cause the dead score doesn't update if player die...thank's

May 15, 2012

i think this is not a script problem >.<

i know but i wanna ask maybe someone can help me to explain that...is that impact from KRO or something wrong with my kro...T_T

May 14, 2012

check my picture :

first Cross Impact without Weapon = 1475

For Now I use Weapon on right hand Use (2 Hydra, 2 Skeleton Worker) = 2984

if i move the weapon to the left hand Use (2 Hydra, 2 Skeleton Worker) : 1516 (LOL --> the Damage looks same without weapon)

is that impact from new KRO?

Please help me to fix it...T_T

May 14, 2012

Where is the shop this calls?

callshop "President_shop",1;

npcshopattach "President_shop";

We can't tell you what's wrong without first seeing that shop.

shop call at quiz_02,307,251,4 but the method call at

OnInit:

npcshopitem "President_shop",0,0;

set .BuildQuest,1;

set .i,1;

did you use @reloadscript? you need to restart the server i guess.

i try to type @reloadscript.. my npc spawn at the position but, after i choose an item, the required item can't be shown to me...i still confuse about that

FINNALY i know my problem hahahahaha....

if i create 10 item in my npc..the npc can show what i required but, i create 20++ item in one npc...my npc can't work Normally thanks all...

May 13, 2012

- shop President_shop -1,501:50
quiz_02,307,251,4 script President 965,{
	    set @i,0;
	    mes "[ President ]";
	    mes "Which item do you wish to obtain?";
	    mes "Select only one.";
	    callshop "President_shop",1;
	    npcshopattach "President_shop";
	    end;

OnBuyItem:
	    if(.BuildQuest) {
			    for(set .e,0; !compare(getarg(.e+1),"Zeny"); set .e,.e+2) {}
			    npcshopadditem "President_shop",getarg(.e+2),getarg(.e)*compare(getarg(.e+1),"SZeny");
			    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 "[ President ]";
	    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+1,0); 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+1,0); set @i,@i+2) getitem getarg(@i),getarg(@i+1);
					    if (compare(getarg(@i,0),"announce")) announce strcharinfo(0) + " has just obtained " + getitemname(@bought_nameid) + "!",bc_all;
					    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 "President_shop",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,5083,1,2244,5,5091,2,975,10,976,10,7166,350,0,"SZeny",5382,1,"announce";
  case 2: callsub OnBuyItem,7441,600,978,20,916,1000,7226,20,4031,10,0,"SZeny",5405,1,"announce";
  case 3: callsub OnBuyItem,2214,2,5045,1,975,1,7038,400,949,1000,7213,500,0,"SZeny",5378,1,"announce";
  case 4: callsub OnBuyItem,5016,1,7108,30,7437,2,983,10,0,"SZeny",5184,1,"announce";
  case 5: callsub OnBuyItem,1039,1000,7023,1000,0,"SZeny",5254,1,"announce";
  case 6: callsub OnBuyItem,5048,4,5012,1,7169,100,0,"SZeny",5364,1,"announce";
  case 7: callsub OnBuyItem,5172,1,7301,666,979,20,980,10,982,5,0,"SZeny",5383,1,"announce";
  case 8: callsub OnBuyItem,982,10,1059,1000,7038,100,0,"SZeny",5322,1,"announce";
  case 9: callsub OnBuyItem,2254,1,7038,777,7063,500,0,"SZeny",5324,1,"announce";
  case 10: callsub OnBuyItem,949,1500,7063,500,6020,50,4006,10,982,10,0,"SZeny",5527,1,"announce";
  case 11: callsub OnBuyItem,7031,999,574,500,4074,10,7480,10,0,"SZeny",5365,1,"announce";
  case 12: callsub OnBuyItem,5057,1,5118,1,12211,500,2215,30,0,"SZeny",5387,1,"announce";
  case 13: callsub OnBuyItem,10016,10,5052,1,2220,1,7754,3,6020,500,7038,300,982,20,0,"SZeny",5468,1,"announce";
  case 14: callsub OnBuyItem,5036,1,7192,1000,975,20,0,"SZeny",5458,1,"announce";
  case 15: callsub OnBuyItem,741,33,909,456,7126,678,0,"SZeny",5255,1,"announce";
  case 16: callsub OnBuyItem,5065,1,1053,300,978,10,6022,60,0,"SZeny",5508,1,"announce";
  case 17: callsub OnBuyItem,5035,1,741,200,0,"SZeny",5335,1,"announce";
  case 18: callsub OnBuyItem,5045,10,5052,1,7217,500,919,1000,0,"SZeny",5359,1,"announce";
  case 19: callsub OnBuyItem,5058,1,703,1000,710,1000,7481,10,0,"SZeny",5289,1,"announce";
  case 20: callsub OnBuyItem,5016,1,975,30,4040,300,7063,500,0,"SZeny",5466,1,"announce";
  case 21: callsub OnBuyItem,976,20,7024,200,7166,700,0,"SZeny",5277,1,"announce";
  case 22: callsub OnBuyItem,753,1000,7011,200,0,"SZeny",5385,1,"announce";
  case 23: callsub OnBuyItem,2288,1,7187,1,949,500,982,5,0,"SZeny",5143,1,"announce";
  case 24: callsub OnBuyItem,5058,1,2214,1,7063,500,12045,10,0,"SZeny",5198,1,"announce";
  case 25: callsub OnBuyItem,5035,1,918,1,908,500,7155,979,20,0,"SZeny",5447,1,"announce";
  case 26: callsub OnBuyItem,2253,1,5048,1,5041,1,5077,1,5061,1,0,"SZeny",5103,1,"announce";
  case 27: callsub OnBuyItem,5035,1,7063,10,979,30,511,300,0,"SZeny",5352,1,"announce";
  case 28: callsub OnBuyItem,4218,1,5076,1,7570,100,0,"SZeny",5133,1,"announce";
  case 29: callsub OnBuyItem,7065,1000,720,100,950,300,7038,400,7562,3,978,10,0,"SZeny",5556,1,"announce";
  case 30: callsub OnBuyItem,5011,1,7069,1000,7507,500,7352,20,7353,20,7354,20,7355,20,0,"SZeny",5212,1,"announce";
  case 31: callsub OnBuyItem,7100,500,7198,500,7194,500,7186,50,0,"SZeny",5511,1,"announce";
  case 32: callsub OnBuyItem,2280,1,930,1000,7442,100,7207,300,983,5,0,"SZeny",5579,1,"announce";
  case 33: callsub OnBuyItem,5042,1,7095,200,7202,1000,960,1000,14557,5,0,"SZeny",5473,1,"announce";		
    }
}

Anyone help me...this script can't show the required item but..the the item can be load in my npc...

ex :

if i Buy item 5473 (nipper crab hairpin)

case 33: callsub OnBuyItem,5042,1,7095,200,7202,1000,960,1000,14557,5,0,"SZeny",5473,1,"announce"; -->NPC Can't show what i must collect to get nipper crab hairpin..

anyone can you help me..T_T

last week i make 6 NPC like this ,Success ! but now ,i wanna make one more NPC like that --> my script can't be load T_T please help me..

May 13, 2012

how to create script in my pvp warper like this..

ini this warper they can count how many player in this room...

Help me please

May 12, 2012

I got this error when I have a pet and a homunculus together in a dungeon/field with monsters. It is caused by missing lua files in the AI folder.

This AI folder fixed the error for me.

Thanks Eurydice Nice Code For your Lua File

Open it with your client exe file and under the PE Header tab, go to File Header. See the "Time Date Stamp" . There should be a date located beside the textbox.

Something like this :

That means it's 2011-08-10 client.

aha....got it now..Thanks Shadows..

May 12, 2012

http://www.supportmi...ls/PEViewer.exe

what file i must be open?

May 12, 2012

where i checked my client date?

May 12, 2012

My Problem : ALL Homunculus can't move to attack,but if homunculus at the city is normal condition. i think i must check lua files..but i don't know where's the Ai.lua file put...anyone can help me?

(sorry if my English bad.)

May 10, 2012

i wanna request to my vending city, like this...

I wanna all my player , vending in one line same with Ghostring

May 7, 2012

Sorry i wanna ask 1 question :

1. where i found/download texture (if you right click on the item, it will be show image of the item and description. i need the image on description) and sprite of ICE_PICK(@item 1230), thanks for helping me...

Sorry if i wrong post in this topic

May 7, 2012

Sorry i wanna ask 1 question :

1. where i found/download texture (if you right click on the item, it will be show image of the item and description. i need the image on description) and sprite of ICE_PICK(@item 1230), thanks for helping me...

Sorry if i wrong post in this topic

May 2, 2012

case 1: callsub OnBuyItem,50,"SZeny",501,1,"announce";
case 2: callsub OnBuyItem,502,1,0,"SZeny",502,1;
case 3: callsub OnBuyItem,502,1,1000,"Zeny",504,1,501,1;
case 4: callsub OnBuyItem,923,20,1000,"SZeny",2284,1,501,1,"announce";
case 5:.......
case 6: ......

the link to the original topic already giving you the guide on how to add item..

thanks...it's really help...

May 1, 2012

http://www.eathena.w...howtopic=216870

do you have the easier script... so i can understanding clearly x_X

http://www.eathena.w...howtopic=216870

in your link i read this script

[spoiler=script]

- shop quest_shop -1,501:50

prontera,164,168,4, script Mall CP 777,{

set @i,0;

mes "[MALL CP]";

mes "Which item do you wish to obtain?";

mes "Select only one.";

callshop "quest_shop",1;

npcshopattach "quest_shop";

end;

OnBuyItem:

if(.BuildQuest) {

for(set .e,0; !compare(getarg(.e+1),"Zeny"); set .e,.e+2) {}

npcshopadditem "quest_shop",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_shop",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,50,"SZeny",501,1,"announce";

case 2: callsub OnBuyItem,502,1,0,"SZeny",502,1;

case 3: callsub OnBuyItem,502,1,1000,"Zeny",504,1,501,1;

case 4: callsub OnBuyItem,923,20,1000,"SZeny",2284,1,501,1,"announce";

}

i don't know, where i put my stuff on this shop... which line?? help me please.. T_T

Sign In

Profiles

Forums

Downloads

Jobs Available

Server Database

Third-Party Services

Top Guides

Store

Crowdfunding

Posts posted by President