Jump to content

pojiejapan

Members
  • Posts

    126
  • Joined

  • Last visited

Everything posted by pojiejapan

  1. Is it possible to increase the HP amount for a character. Let say a basic 99/70 LK no item no stats is 10870 HP. Can I somehow double this amount or even triple it? I have check the job_db. Does the HP multiplicator has anything to do with this?
  2. In my server, when a player whisper to another player, a pop up box will appear. How to disable it?
  3. Hello, as the title say, my server using 3CeaM. But recently I found that my server have some problem with that, You can level up and add skill level to homu and guild skill (there's no skill picture) when you click it, it crash. Does anyone know how to fix this? bump?
  4. pojiejapan

    DoTA Runes

    Is this script ready? Got any full released?
  5. -Wno-pointer-sign -Wno-switch -DHAVE_SETRLIMIT -Wno-unused -Wno-parentheses -DPCRE_SUPPORT -I/usr/include/mysql -I../common -I/usr/include -c -o obj_sql/atcommand.o atcommand.c atcommand.c: In function âatcommand_autolootitemâ: atcommand.c:6342: error: âAUTOLOOTITEM_SIZEâ undeclared (first use in this function) atcommand.c:6342: error: (Each undeclared identifier is reported only once atcommand.c:6342: error: for each function it appears in.) atcommand.c:6342: error: subscripted value is neither array nor pointer atcommand.c:6347: error: subscripted value is neither array nor pointer atcommand.c:6352: error: subscripted value is neither array nor pointer atcommand.c:6357: error: subscripted value is neither array nor pointer atcommand.c:6362: error: subscripted value is neither array nor pointer atcommand.c:6371: error: subscripted value is neither array nor pointer atcommand.c:6378: error: subscripted value is neither array nor pointer atcommand.c:6380: error: subscripted value is neither array nor pointer atcommand.c:6381: error: subscripted value is neither array nor pointer atcommand.c:6390: warning: passing argument 1 of âmemsetâ makes pointer from integer without a cast make[1]: *** [obj_sql/atcommand.o] Error 1 make[1]: Leaving directory `/home/dota4090/3CeaM/src/map' make: *** [map_sql] Error 2 I've delete and copy the script but I got this error when compiling. Can anyone help me?
  6. Hello can I request a command @alootid but a player can autoloot 3 different item at once. ? this is the basic alootid, what i must do? /*========================================== * @alootid *------------------------------------------*/ ACMD_FUNC(autolootitem) { struct item_data *item_data = NULL; if (!message || !*message) { if (sd->state.autolootid) { sd->state.autolootid = 0; clif_displaymessage(fd, "Autolootitem has been turned OFF."); } else clif_displaymessage(fd, "Please, enter item name or it's ID (usage: @alootid <item_name_or_ID>)."); return -1; } if ((item_data = itemdb_exists(atoi(message))) == NULL) item_data = itemdb_searchname(message); if (!item_data) { // No items founds in the DB with Id or Name clif_displaymessage(fd, "Item not found."); return -1; } sd->state.autolootid = item_data->nameid; // Autoloot Activated sprintf(atcmd_output, "Autolooting item: '%s'/'%s' (%d)", item_data->name, item_data->jname, item_data->nameid); clif_displaymessage(fd, atcmd_output); return 0; }
  7. mr key, if i want to change the day. for example anothe NPC is only to be open in tuesday, do i need to alter your script or leave it alone?
  8. Thanks a lot u guys . Really help me
  9. Emistry is there any command to give someone an amount of kafra points?
  10. Like this sir? } // Enabling OnClock0655: // 06:55 AM if(GetTime(4) == 5) // Tuesday EnableNPC("Mrs.Friday"); End(); // Enabling OnClock1805: // 06:05 PM if(GetTime(4) == 5) // Tuesday DisableNPC("Mrs.Friday"); End(); OnInit: // not friday or before 06:55 or after 1805, hide the npc if ( gettime(4) != 5 || gettime(3) * 100 + gettime(2) < 655 || gettime(3) * 100 + gettime(2) > 1805 ) DisableNPC("Mrs.Friday"); }
  11. Sir KeyWorld. So the full script will be like this? odin_tem03,193,300,5 script Mrs.Friday 811,{ //=========================== Settings ==================================== set .@changername$,"[ Mrs.Friday ]";// YOU MAY CHANGE THE NAME OF THE NPC set .tcgid,20104; set @tcgamount,1; //======================= Settings End ==================================== //************************************************************************* mes .@changername$; mes "??"; mes "???"; mes "????"; next; switch(select("Hello Mrs. Friday:Cancel")) { case 1: if (countitem(20103) > 0) { mes .@changername$; mes "Hello "+strcharinfo(0)+" ,"; mes "What business do you have with me?"; mes "I am very busy, there's evil need to be wipe"; mes "Mankind like you won't even stand a chance"; next; mes "Hmm. Is that stone from Mr. Thursday?"; mes "I see you have meet all my family then."; mes "It means you are seeking a stone to make a powerful item."; next; switch(select("How do you know?:Cancel")) { case 1: mes .@changername$; mes "You are seeking the corpse of Icefrog right?"; mes "To make the legendary DoTA Weapon"; mes "It's a very powerfull weapon and in the wrong hand can cause a destruction"; next; switch(select("I will help you perish the evil:Cancel")) { case 1: mes .@changername$; mes "Then if you are worthy enough, go and find me something in return"; mes "Make me one ^FF0000 Valkyrie Helm ^000000"; mes "All my family ask for material but I'm asking for the equipment"; mes "and I need 20 ^0000FF TCG ^000000"; next; switch(select("I have it right now:Cancel")) { case 1: mes .@changername$; mes "Okay let me check if"; mes "you have the material"; next; mes .@changername$; mes "Rustle... Rustle..."; if((countitem(5171) > 0) && (countitem(7227) > 19)) { delitem 5171,1; //delitem 7063,99; delitem 7227,20; //delitem 982,1; next; mes .@changername$; getitem .tcgid,@tcgamount; //Change to next Item! mes "Here take this and go at the second last level of Endless Tower"; mes "There you will the coffin of IceFrog!"; close; } else { mes .@changername$; mes "Sorry you have to get the items first!"; close; } case 2: mes .@changername$; mes "Okay goodbye!"; close; } case 2: mes .@changername$; mes "Okay goodbye!"; close; } case 2: mes .@changername$; mes "Okay goodbye!"; close; } } else { mes .@changername$; mes "How rude you young man!"; mes "Try to cheat on me"; close; } case 2: mes .@changername$; mes "Okay goodbye!"; close; } OnInit: // not friday or before 06:55 or after 1805, hide the npc if ( gettime(4) != 5 || gettime(3) * 100 + gettime(2) < 655 || gettime(3) * 100 + gettime(2) > 1805 ) DisableNPC("Mrs.Friday"); } [/codeBOX]
  12. Hello, as the title say, I have installed a Poring catcher event and when a winner pick a correct poring he/she will trigger this command all everybody dies. But in my server donaters GM level 1 (so they get extra buff) and normal player is Level 0. The problem is when the event, when a normal player win, donaters will not die. Can somebody alter this script so everbody dies regardless GM Level. or make a new src script. Like @hdoom (highess Doom) This is the normal doom ACMD_FUNC(doom) { struct map_session_data* pl_sd; struct s_mapiterator* iter; nullpo_retr(-1, sd); iter = mapit_getallusers(); for( pl_sd = (TBL_PC*)mapit_first(iter); mapit_exists(iter); pl_sd = (TBL_PC*)mapit_next(iter) ) { if (pl_sd->fd != fd && pc_isGM(sd) >= pc_isGM(pl_sd)) { status_kill(&pl_sd->bl); clif_specialeffect(&pl_sd->bl,450,AREA); clif_displaymessage(pl_sd->fd, msg_txt(61)); // The holy messenger has given judgement. } } mapit_free(iter); clif_displaymessage(fd, msg_txt(62)); // Judgement was made. return 0; }
  13. Here is my script. It supposed only shows at friday between 12 hour only right? Its not working. It's on everyday odin_tem03,193,300,5 script Mrs.Friday 811,{ //=========================== Settings ==================================== set .@changername$,"[ Mrs.Friday ]";// YOU MAY CHANGE THE NAME OF THE NPC set .tcgid,20104; set @tcgamount,1; //======================= Settings End ==================================== //************************************************************************* mes .@changername$; mes "??"; mes "???"; mes "????"; next; switch(select("Hello Mrs. Friday:Cancel")) { case 1: if (countitem(20103) > 0) { mes .@changername$; mes "Hello "+strcharinfo(0)+" ,"; mes "What business do you have with me?"; mes "I am very busy, there's evil need to be wipe"; mes "Mankind like you won't even stand a chance"; next; mes "Hmm. Is that stone from Mr. Thursday?"; mes "I see you have meet all my family then."; mes "It means you are seeking a stone to make a powerful item."; next; switch(select("How do you know?:Cancel")) { case 1: mes .@changername$; mes "You are seeking the corpse of Icefrog right?"; mes "To make the legendary DoTA Weapon"; mes "It's a very powerfull weapon and in the wrong hand can cause a destruction"; next; switch(select("I will help you perish the evil:Cancel")) { case 1: mes .@changername$; mes "Then if you are worthy enough, go and find me something in return"; mes "Make me one ^FF0000 Valkyrie Helm ^000000"; mes "All my family ask for material but I'm asking for the equipment"; mes "and I need 20 ^0000FF TCG ^000000"; next; switch(select("I have it right now:Cancel")) { case 1: mes .@changername$; mes "Okay let me check if"; mes "you have the material"; next; mes .@changername$; mes "Rustle... Rustle..."; if((countitem(5171) > 0) && (countitem(7227) > 19)) { delitem 5171,1; //delitem 7063,99; delitem 7227,20; //delitem 982,1; next; mes .@changername$; getitem .tcgid,@tcgamount; //Change to next Item! mes "Here take this and go at the second last level of Endless Tower"; mes "There you will the coffin of IceFrog!"; close; } else { mes .@changername$; mes "Sorry you have to get the items first!"; close; } case 2: mes .@changername$; mes "Okay goodbye!"; close; } case 2: mes .@changername$; mes "Okay goodbye!"; close; } case 2: mes .@changername$; mes "Okay goodbye!"; close; } } else { mes .@changername$; mes "How rude you young man!"; mes "Try to cheat on me"; close; } case 2: mes .@changername$; mes "Okay goodbye!"; close; } // Enabling OnClock0655: // 06:55 AM if(GetTime(4) == 5) // Tuesday EnableNPC("Mrs.Friday"); End(); // Enabling OnClock1805: // 06:05 PM if(GetTime(4) == 5) // Tuesday DisableNPC("Mrs.Friday"); End(); } [/codeBOX] This is the On Clock part [code] // Enabling OnClock0655: // 06:55 AM if(GetTime(4) == 5) // Tuesday EnableNPC("Mrs.Friday"); End(); // Enabling OnClock1805: // 06:05 PM if(GetTime(4) == 5) // Tuesday DisableNPC("Mrs.Friday"); End(); [/code]
  14. emistry, how a normal player to know how many kafra point did he get.
  15. Is there any script that can give some point to Player for playing longer. Not including afk and vending. Thanks in regards I've found this script : //===== Hourly Points Script ========================================= //===== By: ========================================================== //= GorthexTiger modified by Nibi //===== Current Version: ============================================= //= 1.0 //===== Compatible With: ============================================= //= Any eAthena Version //===== Description: ================================================= //= Get Points every successful hours of gameplay, you cannot get //= the points even if you miss a second or a minute. A player will //= get a very big bonus if they played 12 hours consecutively //= or without logging out of the game. If the player is vending //= the script will then stop. //===== Additional Comments: ========================================= //= You can modify the script to your liking. //= The default points is Kafrapoints change it anyway if you like. //= 1.1 = Check Chatting too //= 1.2 = 5 Minute Idle Check & @at/@autotrade check. //= 1.3 = Corrected the current balance line on 12 Hours Consecutive //==================================================================== - script hourlypoints -1,{ //--Start of the Script OnPCLoginEvent: attachnpctimer ""+strcharinfo(0)+""; initnpctimer; end; OnTimer30000: //Check if Vending (normal or @at) if(checkvending() >= 1 || checkchatting() == 1) { dispbottom "The hourly points event stopped because you were vending / chatting. Please relog if you wish to start again."; stopnpctimer; end; } //Check if Idle getmapxy( .@map$, .@x, .@y, 0 ); if(@map$ == .@map$ && @x == .@x && @y == .@y) { set @afk, @afk + 1; } //If move timer resets else { set @afk, 0; } set @map$, .@map$; set @x, .@x; set @y, .@y; //Idle Check for 5 Minutes if(@afk == 5) { dispbottom "The hourly points event stopped because you were idle for 5 minutes. Please relog if you wish to start again."; stopnpctimer; end; } end; OnTimer60000: set @minute, @minute + 1; //Check for 1 Minute if(@minute == 60){ set @minute,0; set .@point_amt, 10; //Points to get every hour (default: 10) set #KAFRAPOINTS, #KAFRAPOINTS + .@point_amt; dispbottom "You received "+.@point_amt+" Kafrapoints by staying ingame for 1 hour"; dispbottom "Current Balance = "+#KAFRAPOINTS+" Kafrapoints"; set @consecutive_hour, @consecutive_hour + 1; } //Check for 12 hours consecutive if(@consecutive_hour == 12) { set @consecutive_hour,0; set .@cpoint_amt, 50; //Points to get for 12 Consecutive hours (default: 50) set #KAFRAPOINTS, #KAFRAPOINTS + .@cpoint_amt; dispbottom "You receive "+.@cpoint_amt+" Kafrapoints in playing for 12 consecutive hours"; dispbottom "Current Balance = "+#KAFRAPOINTS+" Kafrapoints"; } stopnpctimer; initnpctimer; end; } //--End of the Script how to add an NPC that is using Kafra point as currency?
  16. Sir im confused. Which files should I download? The Version 5 Link and the +10 Link (For Example) Then where is the NPC Location?
  17. Sory. Im using this Jumper event. //==========================================================// //========= Script by RyCHIRO =========// //========= http://reincarnation-network.com =========// //========= http://chiyan-ro.com =========// //==========================================================// - script jumpevent -1,{ OnWhisperGlobal: if ( getgmlevel() < 99 ) end; L_JumpAdmin: mes "[Manager]"; mes "^FF0000~Hi GM " + strcharinfo(0) + "!~^000000"; mes "^FF0000The Current Prize is:^000000"; mes "^FF00001. Random Prize:^000000 ^008000"+$jmp_item_amount1+" "+getitemname($jmp_item_id1)+"^000000"; mes "^FF00002. Random Prize:^000000 ^008000"+$jmp_item_amount2+" "+getitemname($jmp_item_id2)+"^000000"; mes "^FF00003. Random Prize:^000000 ^008000"+$jmp_item_amount3+" "+getitemname($jmp_item_id3)+"^000000"; switch(select("Start Jump Event?:Set Prize:Not today Fellas!")){ case 1: next; if( $@JumpStart == 1 ){ mes "[Manager]"; mes "I Can't Start The Event!!"; mes "The Event is still ON!!"; next; goto L_JumpAdmin; } next; mes "[Manager]"; mes "^FF0000~Sure thing!~^000000"; close2; goto L_StartJmp; case 2: next; mes "[Manager]"; mes "^FF0000~What should the prize for winning be? Please input the ID.~^000000"; menu "Set Prize 1",SP1,"Set Prize 2",SP2,"Set Prize 3",SP3,"Go Back to main",L_JumpAdmin; SP1: next; mes "[Manager]"; mes "^FF0000~What should the prize for winning be? Please input the ID.~^000000"; input $jmp_item_id1; next; mes "[Manager]"; mes "^FF0000~How many if this item should I give away?~^000000"; input $jmp_item_amount1; next; mes "[Manager]"; mes "^FF0000~So, the prize is^000000 ^008000"+ $jmp_item_amount1 +" "+ getitemname($jmp_item_id1) +"^000000? ^FF0000Great.~^000000"; next; goto L_JumpAdmin; SP2: next; mes "[Manager]"; mes "^FF0000~What should the prize for winning be? Please input the ID.~^000000"; input $jmp_item_id2; next; mes "[Manager]"; mes "^FF0000~How many if this item should I give away?~^000000"; input $jmp_item_amount2; next; mes "[Manager]"; mes "^FF0000~So, the prize is^000000 ^008000"+ $jmp_item_amount2 +" "+ getitemname($jmp_item_id2) +"^000000? ^FF0000Great.~^000000"; next; goto L_JumpAdmin; SP3: next; mes "[Manager]"; mes "^FF0000~What should the prize for winning be? Please input the ID.~^000000"; input $jmp_item_id3; next; mes "[Manager]"; mes "^FF0000~How many if this item should I give away?~^000000"; input $jmp_item_amount3; next; mes "[Manager]"; mes "^FF0000~So, the prize is^000000 ^008000"+ $jmp_item_amount3 +" "+ getitemname($jmp_item_id3) +"^000000? ^FF0000Great.~^000000"; next; goto L_JumpAdmin; Case 3: next; mes "[Manager]"; mes "Bye!!"; close; }// End Admin Manager... OnMinute25: L_StartJmp: announce "Jumper Event : will begin in 20 seconds",bc_blue; sleep2 5000; announce "Jumper Event : I'm Going to JUMP somewhere..!!",bc_blue; sleep2 5000; announce "Jumper Event : By the way I'm going to disguise into a random monster.!!",bc_blue; sleep2 10000; announce "Jumper Event : Last 10 seconds",bc_blue; sleep2 10000; set $@ran, rand(1,10); if ($@ran == 10) set $@jmpmap$,"hugel"; if ($@ran == 9) set $@jmpmap$,"yuno"; if ($@ran == 8) set $@jmpmap$,"comodo"; if ($@ran == 7) set $@jmpmap$,"xmas"; if ($@ran == 6) set $@jmpmap$,"aldebaran"; if ($@ran == 5) set $@jmpmap$,"izlude"; if ($@ran == 4) set $@jmpmap$,"payon"; if ($@ran == 3) set $@jmpmap$,"geffen"; if ($@ran == 2) set $@jmpmap$,"morocc"; if ($@ran == 1) set $@jmpmap$,"prontera"; announce "Jumper Event : Go Find me!! I'm here in "+$@jmpmap$+"!!!",bc_blue; set $@JmpRnd,10; goto OnStart; OnStart: if ($@JmpRnd == 0){ stopnpctimer; set $@JumpStart,0; sleep2 3000; announce "Jumper Event : is now OVER!!",bc_blue; sleep2 15000; movenpc "Jumper"+$@ran+"",1,1; //move the NPC setnpcdisplay "Jumper"+$@ran+"",1002; end; } if ($@JmpRnd == 10){ goto OnStart2; } stopnpctimer; sleep2 3000; announce "Jumper Event : Next Round will begin in 15 seconds...",bc_blue; sleep2 15000; setnpcdisplay "Jumper"+$@ran+"",1002; movenpc "Jumper"+$@ran+"",1,1; //move the NPC set $@ran, rand(1,10); if ($@ran == 10) set $@jmpmap$,"hugel"; if ($@ran == 9) set $@jmpmap$,"yuno"; if ($@ran == 8) set $@jmpmap$,"comodo"; if ($@ran == 7) set $@jmpmap$,"xmas"; if ($@ran == 6) set $@jmpmap$,"aldebaran"; if ($@ran == 5) set $@jmpmap$,"izlude"; if ($@ran == 4) set $@jmpmap$,"payon"; if ($@ran == 3) set $@jmpmap$,"geffen"; if ($@ran == 2) set $@jmpmap$,"morocc"; if ($@ran == 1) set $@jmpmap$,"prontera"; announce "Jumper Event : Go Find me!! I'm here in "+$@jmpmap$+"!!!",bc_blue; goto OnStart2; OnStart2: set $monster, rand(1001,1995); if($monster == 1003 || $monster == 1218 || $monster == 1006 || $monster == 1017 || $monster == 1021 || $monster == 1022 || $monster == 1027 || $monster == 1043 || $monster == 1006 || $monster == 1136 || $monster == 1137 || $monster == 1168 || $monster == 1171 || $monster == 1172 || $monster == 1173 || $monster == 1181 || $monster == 1210 || $monster == 1223 || $monster == 1284 || ($monster >= 1324 && $monster <= 1363) || $monster == 1006 || $monster == 1407 || $monster == 1411 || $monster == 1414 || $monster == 1496 || $monster == 1501 || $monster == 1900){ goto OnStart2; end; } while(1) { //Initiate an infinite loop set $@jx,rand(0,300); //Set a randon X coordinate set $@jy,rand(0,300); //Set a random Y coordinate if(checkcell(""+$@jmpmap$+"",$@jx,$@jy,cell_chkpass)) break; //If cell is walkable break out of the loop } initnpctimer; set $@JumpStart,1; movenpc "Jumper"+$@ran+"",$@jx,$@jy; //move the NPC setnpcdisplay "Jumper"+$@ran+"",$monster; set $@JmpRnd,$@JmpRnd-1; end; OnTimer60000: set $@JumpStart,0; announce "Jumper Event : WOW no One Found ME!! I'm here in "+$@jmpmap$+" "+$@jx+" "+$@jy+"!!",bc_blue; sleep2 3000; donpcevent "jumpevent::OnStart"; end; }//End Script - script Jumper -1,{ if( $@JumpStart == 0 ){ mes "[Jumper]"; mes "I'm sorry, Someone Found me.."; close; } set $@prize, rand(1,100); if ( $@prize <= 50 ){ set $@JumpStart,0; getitem $jmp_item_id1,$jmp_item_amount1; announce "Jumper Event : "+strcharinfo(0)+" is the WINNER!! I'm here in "+$@jmpmap$+" "+$@jx+" "+$@jy+"!!",bc_blue; donpcevent "jumpevent::OnStart"; mes "[Jumper]"; mes "WOW you found me!!"; mes "Take this as a REWARD!!"; mes "You got ^008000"+ $jmp_item_amount1 +" "+ getitemname($jmp_item_id1) +"^000000"; close; end; } set $@prize, rand(1,100); if ( $@prize <= 49 ){ set $@JumpStart,0; getitem $jmp_item_id2,$jmp_item_amount2; announce "Jumper Event : "+strcharinfo(0)+" is the WINNER!! I'm here in "+$@jmpmap$+" "+$@jx+" "+$@jy+"!!",bc_blue; donpcevent "jumpevent::OnStart"; mes "[Jumper]"; mes "WOW you found me!!"; mes "Take this as a REWARD!!"; mes "You got ^008000"+ $jmp_item_amount2 +" "+ getitemname($jmp_item_id2) +"^000000"; close; end; } set $@prize, rand(1,100); if ( $@prize <= 48 ){ set $@JumpStart,0; getitem $jmp_item_id3,$jmp_item_amount3; announce "Jumper Event : "+strcharinfo(0)+" is the WINNER!! I'm here in "+$@jmpmap$+" "+$@jx+" "+$@jy+"!!",bc_blue; donpcevent "jumpevent::OnStart"; mes "[Jumper]"; mes "WOW you found me!!"; mes "Take this as a REWARD!!"; mes "You got ^008000"+ $jmp_item_amount3 +" "+ getitemname($jmp_item_id3) +"^000000"; close; end; } }//End Script prontera,1,1,1 duplicate(Jumper) Jumper1 1002 morocc,1,1,1 duplicate(Jumper) Jumper2 1002 geffen,1,1,1 duplicate(Jumper) Jumper3 1002 payon,1,1,1 duplicate(Jumper) Jumper4 1002 izlude,1,1,1 duplicate(Jumper) Jumper5 1002 aldebaran,1,1,1 duplicate(Jumper) Jumper6 1002 xmas,1,1,1 duplicate(Jumper) Jumper7 1002 comodo,1,1,1 duplicate(Jumper) Jumper8 1002 yuno,1,1,1 duplicate(Jumper) Jumper9 1002 hugel,1,1,1 duplicate(Jumper) Jumper10 1002
  18. How to setting the Jumper Event ? What do I whisper to the NPC?
  19. Thanks a lot. I was searching for this command. Thanks
  20. Is there any command that can do that? If there's none can I request one? A command to know all the player status, item in hand and the details of equipment he/she wearing
  21. argh!. my server does not have custom item for 2 handed sword. Do you think this is still imbalance if I changed the percentage of parry chance all level by halved. therefore the max level is 25%
  22. Actually I have custom item and it's only for one handed. I dont want to change that. Example if a player have made that item and he want to use skill parry. How can I change parry does not required a 2 handed sword.
  23. Is there any way we want to change it does not need 2 handed sword ? Can someone tell me where to edit it and how? Thanks
  24. Can you copy the Doppelganger Card scripts in the Item_DB? Check at item_db.txt and find the code for doppelganger card ID
×
×
  • Create New...