agamanaros

I got it to work now sir, thank you @kins

Thanks for sharing your observations! Initially, I encountered the same issue where SC_DEFENDER wasn’t inherited by the party member on the first cast of Devotion. The Paladin needed to manually recast Defender for the buff to apply properly. Through further testing, I noticed another peculiar behavior: when spamming Devotion, the Defender icon appears on the party member, but the damage reduction effect doesn’t trigger. Instead of reduced damage, the party member takes 100% damage, suggesting that the effect itself isn't being properly inherited, only the visual status icon. My current exploration has led me to suspect that there's a deeper issue with how SC_DEFENDER is initialized or propagated through Devotion. It might require a forced recalculation or proper flag handling to ensure that both the icon and effects apply consistently.

Hello everyone, I'm currently working on a custom fix for an issue with the Devotion skill and its interaction with Defender on my private server. After numerous tests, I've run into a roadblock that I can't seem to resolve. The problem is that on the first cast of Devotion while Defender is active, the party member receiving Devotion does not inherit the Defender buff. For the buff to apply, I need to deactivate and reactivate Defender after casting Devotion. This behavior is inconsistent and problematic during gameplay, particularly when the party member is dispelled by Clown or Professor. Even if I recast Devotion immediately, Defender is not inherited until I toggle it off and on again. Here are the key tests I've performed: Initial Devotion with Defender Active: The party member does not receive the Defender buff on the first cast. Toggling Defender Off and On: After manually toggling Defender, the party member successfully inherits the buff. Post-Dispel Scenario: If the party member is dispelled, reapplying Devotion alone does not reinstate Defender; I need to recast Defender first. I have tried integrating various code adjustments, including forced status updates and reapplications, but the issue persists. If anyone has encountered a similar problem or has suggestions on how to ensure Defender properly inherits on the first Devotion cast, I would greatly appreciate the assistance. Thanks in advance for your help! Here is my status.cpp BEFORE: case SC_DEVOTION: { struct block_list *d_bl; struct status_change *d_sc; if( (d_bl = map_id2bl(val1)) && (d_sc = status_get_sc(d_bl)) && d_sc->count ) { // Inherits Status From Source const enum sc_type types[] = { SC_AUTOGUARD, SC_DEFENDER, SC_REFLECTSHIELD, SC_ENDURE }; int i = (map_flag_gvg2(bl->m) || map_getmapflag(bl->m, MF_BATTLEGROUND))?2:3; while( i >= 0 ) { enum sc_type type2 = types[i]; if( d_sc->data[type2] ) status_change_start(d_bl, bl, type2, 10000, d_sc->data[type2]->val1, 0, 0, (type2 == SC_REFLECTSHIELD ? 1 : 0), skill_get_time(status_sc2skill(type2),d_sc->data[type2]->val1), (type2 == SC_DEFENDER) ? SCSTART_NOAVOID : SCSTART_NOAVOID|SCSTART_NOICON); i--; } } break; } And my status.cpp AFTER: case SC_DEVOTION: { struct block_list *d_bl; struct status_change *d_sc; // Get the devotion target (party member) and their status change structure if ((d_bl = map_id2bl(val1)) && (d_sc = status_get_sc(d_bl)) && d_sc->count) { struct status_change *src_sc = status_get_sc(bl); // Paladin's status changes if (src_sc) { // Check if Paladin has Defender active if (src_sc->data[SC_DEFENDER]) { // Get the level of Paladin's Defender int defender_level = src_sc->data[SC_DEFENDER]->val1; // Check if the devoted target already has Defender if (!d_sc->data[SC_DEFENDER]) { // Apply Defender to the devotion target on the first cast status_change_start( d_bl, bl, SC_DEFENDER, 10000, defender_level, 0, 0, 0, skill_get_time(status_sc2skill(SC_DEFENDER), defender_level), SCSTART_NOAVOID ); } else { // If target already has Defender, update the timer and level struct status_change_entry *sce = d_sc->data[SC_DEFENDER]; if (sce->timer != INVALID_TIMER) { // If the timer is active, update the Defender level and reset the timer delete_timer(sce->timer, status_change_timer); } sce->val1 = defender_level; // Update Defender level sce->timer = add_timer( gettick() + skill_get_time(status_sc2skill(SC_DEFENDER), defender_level), status_change_timer, d_bl->id, SC_DEFENDER ); } } // Check and apply other buffs (Autoguard, Reflectshield, Endure) const enum sc_type types[] = { SC_AUTOGUARD, SC_REFLECTSHIELD, SC_ENDURE }; int i = 0; while (i < sizeof(types)/sizeof(types[0])) { enum sc_type type = types[i]; if (src_sc->data[type]) { struct status_change_entry *sce = src_sc->data[type]; int level = sce->val1; // Get the level of the buff // Check if the target already has the status if (!d_sc->data[type]) { // Apply the status to the target (1st time cast) status_change_start( d_bl, bl, type, 10000, level, 0, 0, (type == SC_REFLECTSHIELD ? 1 : 0), skill_get_time(status_sc2skill(type), level), SCSTART_NOAVOID ); } else { // Update the status on target (for all buffs except Defender) struct status_change_entry *target_sce = d_sc->data[type]; target_sce->val1 = level; if (target_sce->timer != INVALID_TIMER) { delete_timer(target_sce->timer, status_change_timer); } target_sce->timer = add_timer( gettick() + skill_get_time(status_sc2skill(type), level), status_change_timer, d_bl->id, type ); } } i++; } } } break; }

Hello everyone, I'm currently working on a custom fix for an issue with the Devotion skill and its interaction with Defender on my private server. After numerous tests, I've run into a roadblock that I can't seem to resolve. The problem is that on the first cast of Devotion while Defender is active, the party member receiving Devotion does not inherit the Defender buff. For the buff to apply, I need to deactivate and reactivate Defender after casting Devotion. This behavior is inconsistent and problematic during gameplay, particularly when the party member is dispelled by Clown or Professor. Even if I recast Devotion immediately, Defender is not inherited until I toggle it off and on again. Here are the key tests I've performed: Initial Devotion with Defender Active: The party member does not receive the Defender buff on the first cast. Toggling Defender Off and On: After manually toggling Defender, the party member successfully inherits the buff. Post-Dispel Scenario: If the party member is dispelled, reapplying Devotion alone does not reinstate Defender; I need to recast Defender first. I have tried integrating various code adjustments, including forced status updates and reapplications, but the issue persists. If anyone has encountered a similar problem or has suggestions on how to ensure Defender properly inherits on the first Devotion cast, I would greatly appreciate the assistance. Thanks in advance for your help! This is my status.cpp BEFORE: case SC_DEVOTION: { struct block_list *d_bl; struct status_change *d_sc; if( (d_bl = map_id2bl(val1)) && (d_sc = status_get_sc(d_bl)) && d_sc->count ) { // Inherits Status From Source const enum sc_type types[] = { SC_AUTOGUARD, SC_DEFENDER, SC_REFLECTSHIELD, SC_ENDURE }; int i = (map_flag_gvg2(bl->m) || map_getmapflag(bl->m, MF_BATTLEGROUND))?2:3; while( i >= 0 ) { enum sc_type type2 = types[i]; if( d_sc->data[type2] ) status_change_start(d_bl, bl, type2, 10000, d_sc->data[type2]->val1, 0, 0, (type2 == SC_REFLECTSHIELD ? 1 : 0), skill_get_time(status_sc2skill(type2),d_sc->data[type2]->val1), (type2 == SC_DEFENDER) ? SCSTART_NOAVOID : SCSTART_NOAVOID|SCSTART_NOICON); i--; } } break; } And this is my status.cpp AFTER: case SC_DEVOTION: { struct block_list *d_bl; struct status_change *d_sc; // Get the devotion target (party member) and their status change structure if ((d_bl = map_id2bl(val1)) && (d_sc = status_get_sc(d_bl)) && d_sc->count) { struct status_change *src_sc = status_get_sc(bl); // Paladin's status changes if (src_sc) { // Check if Paladin has Defender active if (src_sc->data[SC_DEFENDER]) { // Get the level of Paladin's Defender int defender_level = src_sc->data[SC_DEFENDER]->val1; // Check if the devoted target already has Defender if (!d_sc->data[SC_DEFENDER]) { // Apply Defender to the devotion target on the first cast status_change_start( d_bl, bl, SC_DEFENDER, 10000, defender_level, 0, 0, 0, skill_get_time(status_sc2skill(SC_DEFENDER), defender_level), SCSTART_NOAVOID ); } else { // If target already has Defender, update the timer and level struct status_change_entry *sce = d_sc->data[SC_DEFENDER]; if (sce->timer != INVALID_TIMER) { // If the timer is active, update the Defender level and reset the timer delete_timer(sce->timer, status_change_timer); } sce->val1 = defender_level; // Update Defender level sce->timer = add_timer( gettick() + skill_get_time(status_sc2skill(SC_DEFENDER), defender_level), status_change_timer, d_bl->id, SC_DEFENDER ); } } // Check and apply other buffs (Autoguard, Reflectshield, Endure) const enum sc_type types[] = { SC_AUTOGUARD, SC_REFLECTSHIELD, SC_ENDURE }; int i = 0; while (i < sizeof(types)/sizeof(types[0])) { enum sc_type type = types[i]; if (src_sc->data[type]) { struct status_change_entry *sce = src_sc->data[type]; int level = sce->val1; // Get the level of the buff // Check if the target already has the status if (!d_sc->data[type]) { // Apply the status to the target (1st time cast) status_change_start( d_bl, bl, type, 10000, level, 0, 0, (type == SC_REFLECTSHIELD ? 1 : 0), skill_get_time(status_sc2skill(type), level), SCSTART_NOAVOID ); } else { // Update the status on target (for all buffs except Defender) struct status_change_entry *target_sce = d_sc->data[type]; target_sce->val1 = level; if (target_sce->timer != INVALID_TIMER) { delete_timer(target_sce->timer, status_change_timer); } target_sce->timer = add_timer( gettick() + skill_get_time(status_sc2skill(type), level), status_change_timer, d_bl->id, type ); } } i++; } } } break; }

Hi! thanks this works!

I manage to find an older version of the official hd_refiner. And it works well on my ra version now. Thanks!

Hi sir, really appreciate you responding to my query. I'am trying to implement rathena official hd_refiner script however Im having hard time adjusting the refine limit from +7~+9 I need it to be +4~+10.

Good day! Im seeking for your kindest assistance regarding my refine NPC. I'm using a refine NPC I just got of from rathena. As you can you in the image below. Im using a refine script from the link below. It works fine but the npc is reading the equip position wrong. Thank you and more power! //===================================================================================== // Refine from +5 to +10 //===================================================================================== skycity,127,240,5 script HD Refiner 826,{ callfunc "refinenew2","Safety Upgrade",0; OnInit: waitingroom " HD Refiner",0; end; } //============================================================ //= To allow auto safe refining/multiple refining set the //= second argument to '1' in the function call. //============================================================ function script refinenew2 { set .@features,getarg(1); mes "[" + getarg(0) + "]"; mes "I'm Bestri brother."; mes "I can refine all kinds of weapons, armor and equipment, so let me"; mes "know what you want me to refine."; next; setarray .@position$[1], "Head","Body","Left hand","Right hand","Robe","Shoes","Accessory 1","Accessory 2","Head 2","Head 3"; set .@menu$,""; for( set .@i,1; .@i <= 7; set .@i,.@i+1 ) { if( getequipisequiped(.@i) ) set .@menu$, .@menu$ + .@position$[.@i] + "-" + "[" + getequipname(.@i) + "]"; set .@menu$, .@menu$ + ":"; } set .@part,select(.@menu$); if(!getequipisequiped(.@part)) { mes "[" + getarg(0) + "]"; mes "You're not wearing"; mes "anything there that"; mes "I can refine."; close; } //Check if the item is refinable... if(!getequipisenableref(.@part)) { mes "[" + getarg(0) + "]"; mes "I don't think I can"; mes "refine this item at all..."; close; } //Check to see if the items is between +5 and +10 if(getequiprefinerycnt(.@part) >= 10) { mes "[" + getarg(0) + "]"; mes "I can't refine this"; mes "any more. This is as"; mes "refined as it gets!"; close; } if(getequiprefinerycnt(.@part) <= 3) { mes "[" + getarg(0) + "]"; mes "I can't refine this yet."; mes "Upgrade it to ^0000FFatleast +4^000000"; mes "before you bring it to me."; close; } set .@refineitemid, getequipid(.@part); // save id of the item set .@refinerycnt, getequiprefinerycnt(.@part); //save refinery count switch(getequipweaponlv(.@part)){ case 0: //Refine Armor set .@price,20000; set .@material,30205; set .@safe,4; break; case 1: //Refine Level 1 Weapon set .@price,20000; set .@material,30205; set .@safe,7; break; case 2: //Refine Level 2 Weapon set .@price,20000; set .@material,30205; set .@safe,6; break; case 3: //Refine Level 3 Weapon set .@price,20000; set .@material,30205; set .@safe,5; break; case 4: //Refine Level 4 Weapon set .@price,20000; set .@material,30205; set .@safe,4; break; case 5: //Refine other stuff? set .@price,20000; set .@material,30205; set .@safe,4; break; } if(.@features != 1) { mes "[" + getarg(0) + "]"; mes "To refine this I need"; mes "one ^003366"+getitemname(.@material)+"^000000 and"; mes "a service fee of " + .@price + " Zeny."; mes "Do you really wish to continue?"; next; if(select("Yes:No") == 2){ mes "[" + getarg(0) + "]"; mes "Yeah..."; mes "There's no need to"; mes "rush. Take your time."; close; } if(getequippercentrefinery(.@part) < 100) { mes "[" + getarg(0) + "]"; mes "Oh no! If I continue to"; mes "refine this, there's a risk it could"; mes "be ^FF0000downgraded by 1 levels!^000000"; mes "Do you still want to refine?"; next; if(select("Yes:No") == 2){ mes "[" + getarg(0) + "]"; mes "I completely agree..."; mes "I might be a great refiner, but sometimes even I make mistakes."; close; } } if((countitem(.@material) < 1) || (Zeny < .@price)) { mes "[" + getarg(0) + "]"; mes "You don't seem to have"; mes "enough Zeny or "+getitemname(.@material)+"..."; mes "Go get some more. I'll be"; mes "here all day if you need me."; close; } set Zeny,Zeny-.@price; delitem .@material,1; if(getequipisequiped(.@part) == 0) { // hacker has removed the item (not changed, why?) mes "[" + getarg(0) + "]"; mes "Look here... you don't have any Items on..."; close; } if(getequiprefinerycnt(.@part) != .@refinerycnt || getequipid(.@part) != .@refineitemid) { // hacker has changed the item mes "[" + getarg(0) + "]"; mes "Wait a second..."; mes "Do you think I'm stupid?!"; mes "You switched the item while I wasn't looking! Get out of here!"; close; } if(getequippercentrefinery(.@part) <= rand(100)) { //getitem2 getequipid(.@part),1,1,getequiprefinerycnt(.@part)-1,0,getequipcardid(.@part,0),getequipcardid(.@part,1),getequipcardid(.@part,2),getequipcardid(.@part,3); downrefitem .@part; mes "[" + getarg(0) + "]"; set .@emo,rand(1,5); if (.@emo == 1) { } else { } set .@lose,rand(1,2); if (.@lose == 1) { mes "OH! MY GOD!"; mes "Damn it! Not again!"; mes "I'm terribly sorry, but you know practice does make perfect."; mes "Um, right? Heh heh..."; } else { mes "Crap!"; mes "It couldn't take"; mes "much more tempering!"; mes "Sorry about this..."; } close; } mes "["+getarg(0)+"]"; successrefitem .@part; set .@win,rand(1,3); if (.@win == 1) { mes "Perfect!"; mes "Heh heh!"; mes "Once again,"; mes "flawless work"; mes "from the master~"; } else if(.@win == 2) { mes "Success...!"; mes "Yet again, my amazing"; mes "talent truly dazzles"; mes "and shines today."; } else { mes "Heh heh!"; mes "I'm all done."; mes "No doubt, my work is"; mes "to your satisfaction."; mes "Sheer, utter perfection~"; } } // New Refining Functions ======================== mes "[" + getarg(0) + "]"; mes "I can refine this to the limit or a desired number of times... it's your choice..."; next; switch(select("I'll decide how many times.","I've changed my mind...")) { case 1: mes "[" + getarg(0) + "]"; mes "So how many times would you like me to refine your item?"; next; input .@refinecnt; set .@refinecheck,.@refinecnt + getequiprefinerycnt(.@part); if (.@refinecnt < 1 || .@refinecheck > 20) { mes "[" + getarg(0) + "]"; mes "I can't refine this item that many times."; close; } if(.@refinecheck > .@safe) { set .@refinecheck,.@refinecheck - .@safe; mes "[" + getarg(0) + "]"; mes "This will try to refine the equipment " + .@refinecheck + " times past the safe limit. Your equipment may be ^FF0000downgraded by 1 levels^000000 if i fail... is that ok?"; next; if(select("Yes...","No...") == 2){ mes "[" + getarg(0) + "]"; mes "You said so..Hmm so be it..."; close; } } break; case 2: mes "[" + getarg(0) + "]"; mes "You said so..Hmm so be it..."; close; } set .@fullprice,.@price * .@refinecnt; mes "[" + getarg(0) + "]"; mes "That will cost you " + .@refinecnt + " " + getitemname(.@material) + " and " + .@fullprice + " Zeny. Is that ok?"; next; if(select("Yes","No...") == 2){ mes "[" + getarg(0) + "]"; mes "You said so..Hmm so be it..."; close; } if(countitem(.@material) < .@refinecnt || Zeny < .@fullprice) { mes "[" + getarg(0) + "]"; mes "Is that all you got? Unfortunately I can't work for you at a lower price. Try putting yourself in my shoes."; close; } set Zeny,Zeny - .@fullprice; delitem .@material,.@refinecnt; while(.@refinecnt){ if (getequipisequiped(.@part) == 0) { mes "[" + getarg(0) + "]"; mes "Look here... you don't have any Items on..."; close; } if (getequipid(.@part) != .@refineitemid || (.@menu2 == 1 && getequippercentrefinery(.@part) < 100)) { mes "[" + getarg(0) + "]"; mes "Clan... No, but Did you imagine I could be so stupid !?!"; mes "You have changed it..."; mes "Go out before I stun you with my Hammer!!!"; close; } mes "Clang, clang!!!"; if(getequippercentrefinery(.@part) <= rand(100)) { //getitem2 getequipid(.@part),1,1,getequiprefinerycnt(.@part)-1,0,getequipcardid(.@part,0),getequipcardid(.@part,1),getequipcardid(.@part,2),getequipcardid(.@part,3); downrefitem .@part; mes "[" + getarg(0) + "]"; mes "WAHHHH!!! I'm so sorry... I warned you this could happen..."; set .@refinecnt,.@refinecnt - 1; if(.@refinecnt == 0) close; mes "Here's the unused Zeny and Material back..."; getitem .@material,.@refinecnt; set .@fullprice,.@refinecnt * .@price; set Zeny,Zeny + .@fullprice; close; } successrefitem .@part; set .@refinecnt,.@refinecnt - 1; next; } mes "[" + getarg(0) + "]"; mes "All finished... Come again soon."; close; } // // NORMAL REFINER /// skycity,131,240,5 script Normal Refiner 826,{ callfunc "refinemain","Hollgrehenn",1; end; OnInit: waitingroom " Normal Refiner",0; end; }

Hi Good day, I am posting this hoping someone could help me updating my goldroom script. I'm trying to add timer of 8 hours daily limit in my gold room and was able to do so, however if I logout and try to re-enter the npc, Npc rejects. script is posted below, Thank you and more power. skycity,117,217,6 script Piso Dungeon 540,{ mes "[Piso Dungeon]"; mes "You only have 8 hours per day to farm inside my dungeon"; next; mes "Do you want to go inside?"; if( select("Enter Piso Dungeon:Cancel") == 1 ) if( #Daily == gettime(5)|| query_sql("SELECT login.account_id FROM login LEFT JOIN `char` ON login.account_id=`char`.account_id WHERE login.last_ip=(SELECT last_ip FROM login WHERE account_id="+getcharid(3)+") AND `char`.online=1", .@account_id) > 0 ) next; mes "You've already consumed your 8 hours today. Pleace come back tomorrow."; else{ mes "[Piso Dungeon]"; mes "Please be reminded that all card effects are disabled in this map."; next; set #Daily,gettime(5); addtimer 28800000,strnpcinfo(0)+"::OnTimeLimit"; atcommand "@alootid reset"; atcommand "@alootid +35405"; atcommand "@autostore 15"; warp "ba_lib",160,6; } close; OnTimeLimit: message strcharinfo(0),"Time's Up."; sleep2 3000; warp "SavePoint",0,0; end; OnInit: waitingroom " Piso Dungeon",0; end; }

Already resolved this problem on my end. Code is inserted below. Thank you //===== rAthena Script ======================================= //= Disguise Event //===== By: ================================================== //= GmOcean //===== Current Version: ===================================== //= 5.1 //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= Guess a monster name correctly for prizes. //= //= NOTE: Requires PCRE library installed. //===== Additional Comments: ================================= //= 5.0 Last update by GmOcean. //= 5.1 Cleaned and standardized, mostly. [Euphy] //============================================================ skycity,184,210,4 script Disguise Event 795,{ // Currently set to run every two hours. // To change times, edit the OnClock labels below. set .@GMLevel,60; // GM level required to access NPC. set .@n$,"[^0000FFDisguise NPC^000000]"; if (getgmlevel()>=.@GMLevel) { mes .@n$; mes "Select an option."; next; switch(select("Turn ON/OFF Event:Event Settings")) { case 1: mes .@n$; if (.EventON) { mes "The Event is currently: [^0000FFON^000000]"; mes "Would you like to turn it OFF?"; } else { mes "The Event is currently: [^FF0000OFF^000000]"; mes "Would you like to turn it ON?"; } if(select("Yes:No")==2) close; if (.EventON) { set .EventON,0; set .Timer,0; setnpctimer 0; stopnpctimer; announce "A GM has decided to turn the Disguise Event off. As a result no further prizes will be given.",bc_map | bc_blue; // deletepset 1; setnpcdisplay "Disguise Event",795; close; } set .EventON,1; set .Timer,1; setnpctimer 0; initnpctimer; set .ResetCounter,.ResetCounter+1; announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue; announce "The Event is being held in Sky City (skycity 184 210).",bc_all | bc_blue; close; case 2: mes .@n$; mes "Pick a setting to modify."; next; switch(select("Monster Display:Number of Rounds:Prize Settings")) { case 1: setarray .@r$[0],"Disguise as all monsters.","Disguise as MVPs only."; mes .@n$; mes "Choose a disguise rule."; next; set .Rule, select(implode(.@r$,":")); mes .@n$; mes "The Disguise Rule has been set:"; mes " > ^0055FF"+.@r$[.Rule-1]+"^000000"; close; case 2: mes .@n$; mes "Input the number of rounds you want the event to last."; mes "Current number: [^0000FF"+.Rounds+"^000000]"; next; input .@Rounds; set .Rounds,.@Rounds; mes .@n$; mes "The number of rounds has been changed to "+.Rounds+"."; close; case 3: mes .@n$; mes "Input the Item ID of the prize given each round."; mes "Current item: [^0000FF"+getitemname(.Prize)+"^000000] (ID #"+.Prize+")"; next; input .@Prize; mes .@n$; if (getitemname(.@Prize)=="" || getitemname(.@Prize)=="null") { mes "That item does not exist. Please try again."; close; } set .Prize,.@Prize; mes "Input the amount to be given."; next; input .@amount; mes .@n$; if (.@amount<=0 || .@amount>=10000) { mes "That amount is invalid. Using default amount of 1."; set .@amount,1; next; mes .@n$; } set .PrizeAmt,.@amount; mes "The Prize has been changed successfully."; mes "Prize: "+.PrizeAmt+"x [^0000FF"+getitemname(.Prize)+"^000000]"; close; } } } if (.EventON) end; mes .@n$; mes "Welcome."; mes "How may I be of assistance?"; if(select("Information:Nothing, just passing through.")==2) close; next; mes .@n$; mes "This event is quite simple."; mes "At the start of the event, I will"; mes "disguise myself as a random"; mes "monster. You have to shout"; mes "that monster's name out loud."; next; mes "If you are correct, you will receive"; mes "a prize. If not, keep trying!"; mes "That's all that there is to this event."; close; OnInit: set .EventON,0; set .Wait,0; set .Winner,0; set .ResetCounter,0; set .Rounds,10; set .Prize1,7539; set .PrizeAmt1,3; set .Prize2,35405; set .PrizeAmt2,1; set .Rule,1; setarray .MVP[0],1038,1039,1046,1059,1086,1087,1112,1115,1147,1150,1157,1159,1190,1251,1252,1272,1312,1373, 1389,1399,1418,1492,1502,1511,1583,1623,1630,1646,1647,1648,1649,1650,1651,1658,1685,1688, 1708,1719,1734,1751,1768,1779,1785,1802,1832,1871,1874,1885,1917,1980,2022,2068,2087,2131, 2156,2165; set .BlackList$, "1003,1006,1017,1021,1022,1027,1043,1075,1136,1137,1168," + "1171,1172,1173,1181,1187,1210,1217,1218,1222,1223,1224,1225,1226,1227,1228," + "1233,1284,1407,1411,1414,1495,1501,1900,1996,2000,2001,2002,2003,2004," + "2005,2006,2007,2011,2012,2025,2028,2029,2030,2031,2032,2033,2034,2035," + "2036,2037,2038,2039,2040,2041,2042,2043,2044,2045,2046,2047,2048,2049," + "2050,2051,2052,2053,2054,2055,2056,2057,2058,2059,2060,2061,2062,2063," + "2064,2065,2066,2067,2075,2076,2077,2078,2079,2080,2081,2083,2084,2085," + "2086,2087,2088,2089,2090,2091,2092,2093,2094,2095,2096,2097,2098,2099," + "2100,2101,2012,2103,2104,2105,2106,2107,2108,2109,2110,2111,2112,2113," + "2114,2115,2116,2117,2118,2119,2120,2121,2123,2124,2125,1496,"; end; OnMinute40: set .ResetCounter,.ResetCounter+1; set .EventON,1; set .Timer,1; set .Wait,1; announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue; announce "The Event is being held in Sky City (skycity 184 210).",bc_all | bc_blue; setnpctimer 0; initnpctimer; end; OnTimer10000: if (.Timer || .Change) end; set .Wait,0; goto iDisguise; end; OnTimer30000: if (.Timer) end; set .Change,0; setnpcdisplay "Disguise Event",795; npctalk "Disguise Event : You took too long to guess what I was. Please wait 10 seconds while I disguise again."; specialeffect EF_DETECT2; set $MonsterName$,""; // deletepset 1; stopnpctimer; setnpctimer 0; set .RoundCount,.RoundCount+1; if (.RoundCount>=.Rounds) { setnpcdisplay "Disguise Event",795; set .RoundCount,0; set .Change,0; set .EventON,0; setnpctimer 0; stopnpctimer; npctalk "Disguise Event : Thank you all for playing. That was the last round of the Disguise Event. Come play again later."; end; } initnpctimer; end; OnTimer60000: if (.Timer!=1) end; announce "The Disguise Event will begin in 2 minutes.",bc_all | bc_blue; announce "The Event is being held in Sky City (skycity 184 210).",bc_all | bc_blue; end; OnTimer120000: if (.Timer!=1) end; announce "The Disguise Event will begin 1 minute.",bc_all | bc_blue; announce "The Event is being held in Sky City (skycity 184 210).",bc_all | bc_blue; end; OnTimer180000: if (.Timer!=1) end; announce "The Disguise Event has begun!",bc_all | bc_blue; announce "The Event is being held in Sky City (skycity 184 210).",bc_all | bc_blue; set .Timer,0; stopnpctimer; setnpctimer 0; initnpctimer; iDisguise: if (.Rule==1) { set .Winner,0; set .Monster,1000+rand(1,995); if (compare(","+.BlackList$+"," , ","+.Monster+",")) goto iDisguise; if (.Monster==.LastMonster) goto iDisguise; set .LastMonster,.Monster; set $MonsterName$,getmonsterinfo(.Monster,0); } if (.Rule==2) { set .Winner,0; set .Monster,rand(49); set $MonsterName$,getmonsterinfo(.MVP[.Monster],0); } // deletepset 1; defpattern 1,"([^:]+):.\\s*"+$MonsterName$+".*", "iCorrect"; activatepset 1; if (.Rule==1) setnpcdisplay "Disguise Event",.Monster; if (.Rule==2) setnpcdisplay "Disguise Event",.MVP[.Monster]; set .Change,1; setnpctimer 0; end; iCorrect: if (.Winner) { dispbottom "Someone has already won this round."; end; } set .Winner,1; set .RoundCount,.RoundCount+1; // deletepset 1; activatepset 1; getitem .Prize1,.PrizeAmt1; getitem .Prize2,.PrizeAmt2; announce strcharinfo(0)+" is correct! I was disguised as: "+$MonsterName$+"",bc_map | bc_blue; if (.RoundCount>=.Rounds) { setnpcdisplay "Disguise Event",795; set .RoundCount,0; set .Change,0; set .EventON,0; setnpctimer 0; stopnpctimer; npctalk "Disguise Event : Thank you all for playing. That was the last round of the Disguise Event. Come play again later."; end; } setnpcdisplay "Disguise Event",795; set .Change,0; setnpctimer 0; end; }

Good day! I am seeking for your assistance regarding my gold room. If anyone can help me implementing strict 1 ip per person inside the goldroom. My script is inserted below. Thank you very much. skycity,117,217,6 script Piso Dungeon 540,{ mes "[Piso Dungeon]"; mes "Do you want to enter my Piso Dungeon?"; menu "Ok",-,"No thanks.",L_No; mes "Awesome!"; next; mes "I wish you all the luck! Happy Hunting!"; atcommand "@alootid reset"; atcommand "@alootid +35405"; atcommand "@autostore 15"; warp "ba_lib",0,0; close; L_No: close; OnInit: waitingroom " Piso Dungeon",0; end; } //============Spawns================= ba_lib,0,0,0,0 monster Dark Jose Rizal 3020,100,3600000 // Dokebi with drop ba_lib,0,0,0,0 monster Dark Jose Rizal 3021,500,600000 // Dokebi without drop ba_lib,0,0,0,0 monster Dark Jose Rizal 3021,500,600000 // Dokebi without drop // Exit ba_lib,160,3,0 warp phptotown#1 1,1,skycity,149,259 //mapflags ba_lib.gat mapflag nobranch ba_lib.gat mapflag noicewall ba_lib.gat mapflag noreturn ba_lib.gat mapflag nosave ba_lib.gat mapflag noskill ba_lib.gat mapflag noteleport ba_lib.gat mapflag nowarp ba_lib.gat mapflag nowarpto

Good day! I would like to seek for your assistance regarding with hourly disguise. I was hoping if its possible to set 2 .prize and .prizeamount. I tried doing some revisions in the script but so far no luck. Script is inserted below. Thank you ? //===== rAthena Script ======================================= //= Disguise Event //===== By: ================================================== //= GmOcean //===== Current Version: ===================================== //= 5.1 //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= Guess a monster name correctly for prizes. //= //= NOTE: Requires PCRE library installed. //===== Additional Comments: ================================= //= 5.0 Last update by GmOcean. //= 5.1 Cleaned and standardized, mostly. [Euphy] //============================================================ skycity,184,210,4 script Disguise Event 795,{ // Currently set to run every two hours. // To change times, edit the OnClock labels below. set .@GMLevel,60; // GM level required to access NPC. set .@n$,"[^0000FFDisguise NPC^000000]"; if (getgmlevel()>=.@GMLevel) { mes .@n$; mes "Select an option."; next; switch(select("Turn ON/OFF Event:Event Settings")) { case 1: mes .@n$; if (.EventON) { mes "The Event is currently: [^0000FFON^000000]"; mes "Would you like to turn it OFF?"; } else { mes "The Event is currently: [^FF0000OFF^000000]"; mes "Would you like to turn it ON?"; } if(select("Yes:No")==2) close; if (.EventON) { set .EventON,0; set .Timer,0; setnpctimer 0; stopnpctimer; announce "A GM has decided to turn the Disguise Event off. As a result no further prizes will be given.",bc_map | bc_blue; // deletepset 1; setnpcdisplay "Disguise Event",795; close; } set .EventON,1; set .Timer,1; setnpctimer 0; initnpctimer; set .ResetCounter,.ResetCounter+1; announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue; announce "The Event is being held in Sky City (skycity 184 210).",bc_all | bc_blue; close; case 2: mes .@n$; mes "Pick a setting to modify."; next; switch(select("Monster Display:Number of Rounds:Prize Settings")) { case 1: setarray .@r$[0],"Disguise as all monsters.","Disguise as MVPs only."; mes .@n$; mes "Choose a disguise rule."; next; set .Rule, select(implode(.@r$,":")); mes .@n$; mes "The Disguise Rule has been set:"; mes " > ^0055FF"+.@r$[.Rule-1]+"^000000"; close; case 2: mes .@n$; mes "Input the number of rounds you want the event to last."; mes "Current number: [^0000FF"+.Rounds+"^000000]"; next; input .@Rounds; set .Rounds,.@Rounds; mes .@n$; mes "The number of rounds has been changed to "+.Rounds+"."; close; case 3: mes .@n$; mes "Input the Item ID of the prize given each round."; mes "Current item: [^0000FF"+getitemname(.Prize)+"^000000] (ID #"+.Prize+")"; next; input .@Prize; mes .@n$; if (getitemname(.@Prize)=="" || getitemname(.@Prize)=="null") { mes "That item does not exist. Please try again."; close; } set .Prize,.@Prize; mes "Input the amount to be given."; next; input .@amount; mes .@n$; if (.@amount<=0 || .@amount>=10000) { mes "That amount is invalid. Using default amount of 1."; set .@amount,1; next; mes .@n$; } set .PrizeAmt,.@amount; mes "The Prize has been changed successfully."; mes "Prize: "+.PrizeAmt+"x [^0000FF"+getitemname(.Prize)+"^000000]"; close; } } } if (.EventON) end; mes .@n$; mes "Welcome."; mes "How may I be of assistance?"; if(select("Information:Nothing, just passing through.")==2) close; next; mes .@n$; mes "This event is quite simple."; mes "At the start of the event, I will"; mes "disguise myself as a random"; mes "monster. You have to shout"; mes "that monster's name out loud."; next; mes "If you are correct, you will receive"; mes "a prize. If not, keep trying!"; mes "That's all that there is to this event."; close; OnInit: set .EventON,0; set .Wait,0; set .Winner,0; set .ResetCounter,0; set .Rounds,10; set .Prize,7539; set .PrizeAmt,3; set .Rule,1; setarray .MVP[0],1038,1039,1046,1059,1086,1087,1112,1115,1147,1150,1157,1159,1190,1251,1252,1272,1312,1373, 1389,1399,1418,1492,1502,1511,1583,1623,1630,1646,1647,1648,1649,1650,1651,1658,1685,1688, 1708,1719,1734,1751,1768,1779,1785,1802,1832,1871,1874,1885,1917,1980,2022,2068,2087,2131, 2156,2165; set .BlackList$, "1003,1006,1017,1021,1022,1027,1043,1075,1136,1137,1168," + "1171,1172,1173,1181,1187,1210,1217,1218,1222,1223,1224,1225,1226,1227,1228," + "1233,1284,1407,1411,1414,1495,1501,1900,1996,2000,2001,2002,2003,2004," + "2005,2006,2007,2011,2012,2025,2028,2029,2030,2031,2032,2033,2034,2035," + "2036,2037,2038,2039,2040,2041,2042,2043,2044,2045,2046,2047,2048,2049," + "2050,2051,2052,2053,2054,2055,2056,2057,2058,2059,2060,2061,2062,2063," + "2064,2065,2066,2067,2075,2076,2077,2078,2079,2080,2081,2083,2084,2085," + "2086,2087,2088,2089,2090,2091,2092,2093,2094,2095,2096,2097,2098,2099," + "2100,2101,2012,2103,2104,2105,2106,2107,2108,2109,2110,2111,2112,2113," + "2114,2115,2116,2117,2118,2119,2120,2121,2123,2124,2125,1496,"; end; OnMinute40: set .ResetCounter,.ResetCounter+1; set .EventON,1; set .Timer,1; set .Wait,1; announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue; announce "The Event is being held in Sky City (skycity 184 210).",bc_all | bc_blue; setnpctimer 0; initnpctimer; end; OnTimer10000: if (.Timer || .Change) end; set .Wait,0; goto iDisguise; end; OnTimer30000: if (.Timer) end; set .Change,0; setnpcdisplay "Disguise Event",795; npctalk "Disguise Event : You took too long to guess what I was. Please wait 10 seconds while I disguise again."; specialeffect EF_DETECT2; set $MonsterName$,""; // deletepset 1; stopnpctimer; setnpctimer 0; set .RoundCount,.RoundCount+1; if (.RoundCount>=.Rounds) { setnpcdisplay "Disguise Event",795; set .RoundCount,0; set .Change,0; set .EventON,0; setnpctimer 0; stopnpctimer; npctalk "Disguise Event : Thank you all for playing. That was the last round of the Disguise Event. Come play again later."; end; } initnpctimer; end; OnTimer60000: if (.Timer!=1) end; announce "The Disguise Event will begin in 2 minutes.",bc_all | bc_blue; announce "The Event is being held in Sky City (skycity 184 210).",bc_all | bc_blue; end; OnTimer120000: if (.Timer!=1) end; announce "The Disguise Event will begin 1 minute.",bc_all | bc_blue; announce "The Event is being held in Sky City (skycity 184 210).",bc_all | bc_blue; end; OnTimer180000: if (.Timer!=1) end; announce "The Disguise Event has begun!",bc_all | bc_blue; announce "The Event is being held in Sky City (skycity 184 210).",bc_all | bc_blue; set .Timer,0; stopnpctimer; setnpctimer 0; initnpctimer; iDisguise: if (.Rule==1) { set .Winner,0; set .Monster,1000+rand(1,995); if (compare(","+.BlackList$+"," , ","+.Monster+",")) goto iDisguise; if (.Monster==.LastMonster) goto iDisguise; set .LastMonster,.Monster; set $MonsterName$,getmonsterinfo(.Monster,0); } if (.Rule==2) { set .Winner,0; set .Monster,rand(49); set $MonsterName$,getmonsterinfo(.MVP[.Monster],0); } // deletepset 1; defpattern 1,"([^:]+):.\\s*"+$MonsterName$+".*", "iCorrect"; activatepset 1; if (.Rule==1) setnpcdisplay "Disguise Event",.Monster; if (.Rule==2) setnpcdisplay "Disguise Event",.MVP[.Monster]; set .Change,1; setnpctimer 0; end; iCorrect: if (.Winner) { dispbottom "Someone has already won this round."; end; } set .Winner,1; set .RoundCount,.RoundCount+1; // deletepset 1; activatepset 1; getitem .Prize,.PrizeAmt; announce strcharinfo(0)+" is correct! I was disguised as: "+$MonsterName$+"",bc_map | bc_blue; if (.RoundCount>=.Rounds) { setnpcdisplay "Disguise Event",795; set .RoundCount,0; set .Change,0; set .EventON,0; setnpctimer 0; stopnpctimer; npctalk "Disguise Event : Thank you all for playing. That was the last round of the Disguise Event. Come play again later."; end; } setnpcdisplay "Disguise Event",795; set .Change,0; setnpctimer 0; end; }

Hi Sir @Poring King,I tried your script and it works perfectly however Im just wondering if its possible that instead of choosing which headgear to disable, once @hidehg is called all of the headgear views will be 0? Thank you sir and more power!

Hi @BigBurrito, Your script works fine however, I'm wondering if its possible to keep this script running while still inside the woe map? Please check the video to fully understand my query. Thank you and more power! 2021-02-15 00-49-17.mkv

2020-11-20 04-43-39.mkv 2020-11-20 04-45-35.mkv 2020-11-20 04-56-16.mkv

Good day! I would like to seek anyone's opinion about my problem. And my apologies if Im in the wrong section however, Im not sure if the problem is on the script or sprite. So the problem all started when, I tried installing @autoattack feature in my server however upon checking when using @autoattack and @jump at the same time it shows a sprite error. However, If I use a GM account in a GM suit it doesn't show any errors when using @autoattack and @jump at the same time. I tried literally all jobs if any jobs work but all we're having the same error. I even tried making a custom item/costume that has a GM Suit(GM Suit Costume), And still it shows the same error. I included a video of my problem below. I could really need a help right now. Thank you! ^^ 2020-11-20 04-45-35.mkv 020-11-20 04-56-16.mkv 2020-11-20 04-43-39.mkv

Good day! I would like to seek anyone's opinion about my problem. I tried installing @autoattack feature in my server however upon checking when using @autoattack and @jump at the same time it shows a sprite error. However, If I use a GM account in a GM suit it doesn't show any errors when using @autoattack and @jump at the same time. I tried literally all jobs if any jobs work but all we're having the same error. I even tried making a custom item/costume that has a GM Suit(GM Suit Costume), And still it shows the same error. I included a video of my problem below. I could really need a help right now. Thank you! ^^ 2020-11-20 04-43-39.mkv 2020-11-20 04-45-35.mkv 2020-11-20 04-56-16.mkv

Good day, I'd like to know if its possible to loop a script function called by item script. And script will run a loop while item is equipped? I'm trying to make a simple function script that would do @jump every 10 seconds while item 35815 is equipped. function script autojump { OnInit: while(1) { warp strcharinfo(3),0,0; } end; } 35815,Auto_Attack_Floater,Auto Attack Floater,5,20,,150,,6,,1,0xFFFFFFFF,63,2,2048,,1,1,4249,{},{ callfunc "autojump"; },{ callfunc "autojump"; } Thank you and more power!

Hi! I was able to make cell_pk work however I'd like to know if there's way for an npc script that would display a message to the character when he/she goes in/or in that specific cell? here's my script below, - script FreePKZone -1,{ OnInit: setcell "prontera", 185, 161, 193, 169, cell_pk, 1; end; } Thank you and more power to us all!

Hi sir I would like to know if its possible to convert this mod to the latest git. I tried using your mod however it doesn't work in the latest git. Thank you and more power! .

Hi sir do you mind sharing this url to me? Thanks in advance!

Good day, I would like to ask if it possible to create an that would let the players request a song that can be pulled out from youtube? The thought would be like players will talk to the npc and type in a title of the song then the npc will search that song in youtube and will play it in prontera/maintown. Thank you and more power!

Good day! I'm posting this message to seek for anyone's assistance regarding my npc script. I'm trying to do a OnClock Trigger however for whatever reason its not triggering. There's no error in maps and the more weird thing is if I use OnMinute to trigger npc to show and hide it works.

I tried adding mes " "; before the end; however that doesn't seem to do the trick. ?

Is it possible sir to add like a 2 seconds delay time once the progress bar is complete before it executes the script again? Then adding setpcblock PCBLOCK_MOVE while progressbar is still casting? so they'll have time to move before the progressbar recast again? Thanks sir!