Pride
-
Posts
41 -
Joined
-
Last visited
-
Days Won
1
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Crowdfunding
Posts posted by Pride
-
-
Just now, Takuyakii said:
Well this idea or script are from herc. https://board.herc.ws/topic/15975-custom-unit-hp-bar-system/ this is the script or the actual.
sleep2 100; -> maybe try Playing with this
while (.@HP_Bar != 0) { .@U_HP = .@unitdata[UMOB_HP]; .@P_HP = (.@U_HP*100)/.@U_MAXHP; cutin(.@P_HP+"", 1); sleep2 100; }
-
2 minutes ago, Takuyakii said:
Wow thank you it works, no error on map now!
but can i ask question why the cutin are not properly working on this script? thanks. it supposed to when i attack the monster the cutin should move by the monster hp?Give me more details. I have not used this script xD
-
payon,147,229,4 script Test#HPbar 1_F_MARIA,{ if (.@HP_Bar == 0) { .@HP_Bar = 1; monster ("payon",148,226,"[T] HP Test",1031,1,strnpcinfo(0)+"::OnMobDie"); .mid =$@mobid; getunitdata .mid, .@unitdata; setunitdata .mid,UMOB_MAXHP,4000; setunitdata .mid,UMOB_HP,4000; .@count = getmapunits(BL_PC, "payon", .@units); for (.@i = 0; .@i < .@count; .@i++) { attachrid .@units[.@i]; addtimer(0,strnpcinfo(0)+"::OnHPBar"); } } end; OnMobDie: .@HP_Bar = 0; end; OnHPBar: .getunitdata .mid,.@unitdata; .@U_MAXHP = .@unitdata[UMOB_MAXHP]; while (.@HP_Bar != 0) { .@U_HP = .@unitdata[UMOB_HP]; .@P_HP = (.@U_HP*100)/.@U_MAXHP; cutin(.@P_HP+"", 1); sleep2 100; } cutin("0", 1); sleep2 5000; //Delay to hide HP Bar cutin("", 255); end; }
-
1
-
-
Just now, Takuyakii said:
payon,147,229,4 script Test#HPbar 1_F_MARIA,{ if (.@HP_Bar == 0) { .@HP_Bar = 1; .@mobGID = monster ("payon",148,226,"[T] HP Test",1031,1,strnpcinfo(0)+"::OnMobDie"); .@mid =$@mobid[.@i]; setunitdata .@mobGID,UMOB_MAXHP,4000; setunitdata .@mobGID,UMOB_HP,4000; .@count = getmapunits(BL_PC, "payon", .@units); for (.@i = 0; .@i < .@count; .@i++) { attachrid .@units[.@i]; addtimer(0,strnpcinfo(0)+"::OnHPBar"); } } end; OnMobDie: .@HP_Bar = 0; end; OnHPBar: .getunitdata .@mid,.@unitdata; .@U_MAXHP = .@unitdata[UMOB_MAXHP]; while (.@HP_Bar != 0) { .@U_HP = .@unitdata[UMOB_HP]; .@P_HP = (.@U_HP*100)/.@U_MAXHP; cutin(.@P_HP+"", 1); sleep2 100; } cutin("0", 1); sleep2 5000; //Delay to hide HP Bar cutin("", 255); end; }
-
28 minutes ago, Takuyakii said:
@Pride Line 26
Changed into this
after that there's no error on map but when im talking to npc to summon the monster, i got this error buildin_getunitdata: Error in Argument! Please give a variable to store value in.@U_MAXHP = getunitdata (.@mid, UMOB_MAXHP); while (.@HP_Bar != 0) { .@U_HP = getunitdata (.@mid, UMOB_HP); .@P_HP = (.@U_HP*100)/.@U_MAXHP;
OnHPBar: .getunitdata .@mid,.@unitdata; .U_MAXHP = .@unitdata[UMOB_MAXHP]; while (.HP_Bar != 0) { .U_HP = .@unitdata[UMOB_HP]; .P_HP = (.U_HP*100)/.U_MAXHP; cutin(""+.P_HP+"", 1); sleep2 100; }
This should solve it
-
Which Line???
-
/*========================================== * @dropequip [FE] * Drop spesific equipment to the ground *------------------------------------------*/ ACMD_FUNC(dropequip) { int i; unsigned short position; nullpo_retr(-1, sd); if (!message || !*message) { clif_displaymessage(fd, "Please enter equip location: @dropequip <equip_location>"); clif_displaymessage(fd, " 1: Head Low 2: Hand Right 4: Garment 8: Acc Left"); clif_displaymessage(fd, " 16: Armor 32: Hand Left 64: Shoes 128: Acc Right"); clif_displaymessage(fd, "256: Head Top 512: Head Mid"); return -1; } position = atoi(message); for (i = 0; i < MAX_INVENTORY; i++) { if (sd->inventory.u.items_inventory[i].amount && sd->inventory_data[i]->equip & position) { if(sd->inventory.u.items_inventory[i].equip & position) { pc_unequipitem(sd, i, 3); pc_dropitem(sd, i, sd->inventory.u.items_inventory[i].amount); } //-Delete code below if you only want to drop an equipped item--- else if (!sd->inventory.u.items_inventory[i].equip) pc_dropitem(sd, i, sd->inventory.u.items_inventory[i].amount); //--------------------------------------------------------------- } } return 0; }
I have tried to update the codes to 2021. Please try and let me know if you have errors. Thank you
-
payon,147,229,4 script Test#HPbar 1_F_MARIA,{ if (.@HP_Bar == 0) { .@HP_Bar = 1; .@mid = monster ("payon",148,226,"[T] HP Test",1031,1,strnpcinfo(0)+"::OnMobDie"); getunitdata .@mid, .@unitdata; setunitdata .@mid,UMOB_MAXHP,4000; setunitdata .@mid,UMOB_HP,4000; .@count = getmapunits(BL_PC, "payon", .@units); for (.@i = 0; .@i < .@count; .@i++) { attachrid .@units[.@i]; addtimer(0,strnpcinfo(0)+"::OnHPBar"); } } end; OnMobDie: .@HP_Bar = 0; end; OnHPBar: .@U_MAXHP = getunitdata .@mid, UMOB_MAXHP; while (.@HP_Bar != 0) { .@U_HP = getunitdata .@mid, UMOB_HP; .@P_HP = (.@U_HP*100)/.@U_MAXHP; cutin(.@P_HP+"", 1); sleep2 100; } cutin("0", 1); sleep2 5000; //Delay to hide HP Bar cutin("", 255); end; }
Try this. i have not tested it but let me know if it worked
-
does that appear when you kill MVP with party or without party ?
Try checking the maps listed on the array? -
// =================== MVP KILL =============== // ====== MVP will drop an item only ========== // ====== at specific maps. =================== // ====== if players are on a party =========== // ====== item will be given randomly ========= // ====== to any online party members ========= // ============== by : pajodex ================ // ==== Additional Comments: ================== // 1.0 - Initial release (MVP Kill standalone) // 1.1 - used setarray function to optimize script // 1.2 - Added modified Euphy MVP ladder // slight rework on the script // 1.3 - Fixed on reset function (Report by: celeron0134) // ============================================ - script #mvp_kill -1,{ OnInit: setarray .p_rwd, 607,1; // Party reward <item>,<amount> setarray .s_rwd, 607,1; // Solo reward <item>,<amount> .chance = 50; // Drop rate chances % .gm = 10; // Prevents gm level and above to trigger the event // MVP Map list setarray .t_maps$[0],"moc_pryd06","lhz_dun03","gld2_prt","abbey02","ayo_dun02","lhz_dun04","ra_fild02","xmas_fild01","dic_dun02","beach_dun","iz_dun05","tur_dun04","lhz_dun02","jupe_core","moc_fild22","anthell02","odin_tem03","gon_dun03","gef_fild02","thana_boss","gef_fild10","ein_dun02","gef_fild14","moc_pryd04","dew_dun01","in_sphinx5","niflheim","moc_fild17","xmas_dun02","ice_dun03","kh_dun02","treasure02","moc_prydn2","pay_dun04","ra_san05","mosk_dun03","ama_dun03","thor_v03","gef_dun01","mjolnir_04","abyss_03","dic_dun03","prt_sewb4","pay_fild11","gef_dun02","gl_chyard","ra_fild03","ra_fild04","ve_fild01","ve_fild02","lou_dun03","prt_maze03","bra_dun02","gld_dun01_2","ba_lib","ba_lost","niflheim","ba_2whs01","ba_pw03","ba_pw01","ba_pw02"; end; OnNPCKillEvent: if (getgmlevel() >= .gm ) end; // If gm = event wont happen if ( getmonsterinfo( killedrid, MOB_MVPEXP )) { for (.@a = 0; .@a < getarraysize(.t_maps$); .@a++) { if ( strcharinfo(3) == instance_mapname("06guild_01") ) end; if ( strcharinfo(3) == instance_mapname("force_1-1") ) end; if ( strcharinfo(3) == .t_maps$[.@a]) { if ( getcharid(1) ) { getpartymember getcharid(1), 1; getpartymember getcharid(1), 2; for ( .@i = 0; .@i < $@partymembercount; .@i++ ) { if ( isloggedin( $@partymemberaid[.@i], $@partymembercid[.@i] ) ) { .@partymemberaid[.@c] = $@partymemberaid[.@i]; .@c++; } } if (rand(100) < .chance) getitem .p_rwd[0], .p_rwd[1], .@partymemberaid[ rand( .@c ) ]; mapannounce .t_maps$[.@a],"[ System ] : Player ["+ strcharinfo(0) +"] of party ["+ strcharinfo(1) +"] has killed "+ getmonsterinfo( killedrid, MOB_NAME ) +" at "+ strcharinfo(3), bc_all; } else { if (rand(100) < .chance) getitem .s_rwd[0], .s_rwd[1]; mapannounce .t_maps$[.@a],"[ System ] : Player ["+ strcharinfo(0) +"] has killed "+ getmonsterinfo( killedrid, MOB_NAME ) +" alone at "+ strcharinfo(3), bc_all; } MVPKills = MVPKills+1; dispbottom "---------------------------------------------------"; dispbottom "You killed a total of "+MVPKills+" MVP"+((MVPKills == 1)?"":"s")+"."; dispbottom "---------------------------------------------------"; end; } } if ( getcharid(1) ) { mapannounce .t_maps$[.@a],"[ System ] : Player ["+ strcharinfo(0) +"] of party ["+ strcharinfo(1) +"] has killed "+ getmonsterinfo( killedrid, MOB_NAME ) +" at "+ strcharinfo(3), bc_all; } else { mapannounce .t_maps$[.@a], "[ System ] : Player ["+ strcharinfo(0) +"] has killed "+ getmonsterinfo( killedrid, MOB_NAME ) +" alone at "+ strcharinfo(3), bc_all; } end; } } prontera,148,170,6 script MVP Ladder#Euphy 891,{ mes "[Rank MVP]"; mes "Hello."; mes "What are you doing here"; next; switch(select("Check Ranking.", "My stats.",( getgmlevel() >= 99 ) ? "RESET":"","Nothing...")) { case 1: mes "[Rank MVP]"; query_sql("SELECT char_id, CAST(`value` AS SIGNED) FROM `char_reg_num` WHERE `key` = 'MVPKills' ORDER BY CAST(`value` AS SIGNED) DESC LIMIT 20",.@cid,.@value); for(set .@i,0; .@i<getarraysize(.@cid); set .@i,.@i+1) { query_sql("SELECT `name` FROM `char` WHERE char_id = "+.@cid[.@i]+";",.@j$); set .@name$[.@i], .@j$; } if (!getarraysize(.@cid)) mes "The rankings are empty."; else for(set .@i,0; .@i<getarraysize(.@cid); set .@i,.@i+1) mes "["+(.@i+1)+"] "+.@name$[.@i]+" ~ "+.@value[.@i]+" kills"; close; case 2: mes "[Rank MVP]"; mes "You killed "+((MVPKills)?"^0055FF"+MVPKills:"no")+"^000000 MVP"+((MVPKills == 1)?".":"s."); close; case 3: if ( select( "Confirm","Cancel" ) == 1 ) { query_sql("UPDATE `char_reg_num` SET `value` = '0' WHERE `key` ='MVPKills'"); addrid(0); MVPKills = 0; } close; default: close; } OnInit: waitingroom "MVP LADDER!",0; end; }
Give this a try ive not tested it . i just changed the announce line to mapannounce with ur map array-
1
-
-
@meyraw Since your the creator of ANDRO maybe if you provide good service and more upgraded features i think people will still try to avail your services so you need not have to worry about others. This piracy and reselling of codes has become so common but one thing we cannot change and that is the service and content that the Creator provides cannot be provided by resellers. Lesson learnt and next time secure codes and try provide best service and cool features. People dont usually care about the price if they get something cool so its worth buying it
-
i think this will make ur server to crash if @killmonster command is used so be careful since clif_broadcast needs to have player attached
ok small update on the codes to prevent mapcrash//A Rare Drop Global Announce by Lupus if( mvp_sd && drop_rate <= battle_config.rare_drop_announce ) { char message[128]; sprintf (message, msg_txt(NULL,541), mvp_sd->status.name, md->name, it->ename.c_str(), (float)drop_rate/100); //MSG: "'%s' won %s's %s (chance: %0.02f%%)" if(&sd->bl == NULL) continue; clif_broadcast(&sd->bl, message, strlen(message) + 1, BC_DEFAULT, ALL_SAMEMAP); } -
goto src -> map -> mob.cpp
Find //A Rare Drop Global Announce by Lupus
paste the below codes//A Rare Drop Global Announce by Lupus if( mvp_sd && drop_rate <= battle_config.rare_drop_announce ) { char message[128]; sprintf (message, msg_txt(NULL,541), mvp_sd->status.name, md->name, it->ename.c_str(), (float)drop_rate/100); //MSG: "'%s' won %s's %s (chance: %0.02f%%)" clif_broadcast(&sd->bl, message, strlen(message) + 1, BC_DEFAULT, ALL_SAMEMAP); }the one your showing is pc.cpp item drop by steal skill.
-
@ meyraw Sir i think you are mistaken about Skyzone Hosting. They are not reselling your works or any other works for profit. Anyone can approach them and try to become their partner for free. Skyzone Hosting is one of the place where u can get many contacts it may be streamer services or spriting services or any other thing. They personally dont make any profit out of this. If you want to accuse about your stolen codes or whatever you should try to contact PANDRO makers and try to sort things out with them. You creating a Thread and accusing Skyzone for stealing codes or theft is not good. Go catch the real culprits if you can. Dont make allegations against skyzone because hes not the one developing your stolen codes
-
1
-
-
hi Guys i wanted to add custom jobs.
i Followed the guides from here How to add custom job on rAthena Rv.17704 - General Support - rAthena
but it turned out that it was an old guide can someone make a New guide for Adding Custom jobs ??
it would be cool. Thank You
Question please.
in Installation Support
Posted
You can try to follow this guide. I hope this might help you