mrlongshen

@lulu so its will annouce only on map guild_vs1 ?

// ________________________________________________________ // / \ // | _ _ _ _ | // | | |__ _ __ / \ | |_| |__ ___ _ __ __ _ | // | | '_ \| '__/ _ \| __| '_ \ / _ \ '_ \ / _` | | // | | |_) | | / ___ \ |_| | | | __/ | | | (_| | | // | |_.__/|_|/_/ \_\__|_| |_|\___|_| |_|\__,_| | // | | // | brAthena Script | // |--------------------------------------------------------| // | Name of Script: Rotative PVP | // |--------------------------------------------------------| // | Created by: Neko | // |--------------------------------------------------------| // | Version rA/brA: 1.0 | // |--------------------------------------------------------| // | Description: PVP NPC | // | - An NPC that alternates the current PVP map from time | // | to time, the chosen map for rotation are configured by | // | the administrator in the script. The idea is to have | // | multiple pvp rooms, without having to divide the players| // | of your server among them, this way pvps are more crowded| // | and funnier. | // |--------------------------------------------------------| // | Changelog: | // | 1.0 Script Created [Neko] | // |--------------------------------------------------------| // | - Note: | // | *There is a temporary global variable named $@lista$ in| // | this NPC, watch out for global variables with the same | // | name in other NPCs of yours. | // |--------------------------------------------------------| // | Any problem with this NPC please report directly to me.| // \________________________________________________________/ - script PvpRotative -1,{ OnInit: // ====================================== // Configurations *********************** // ====================================== // Which map will be on the rotation? setarray .lista$[0],"guild_vs1","guild_vs2","guild_vs3","guild_vs4","guild_vs5"; // From how much time to time will the maps change? (Standard value 30 minutes/18000000) // WARNING, DO NOT SET VALUES HERE SMALLER THAN 60000 (1 Minute). set .rotatetime, 18000000; // ====================================== set $@lista$, ""+.lista$[0]+""; set .count, getarraysize(.lista$); for( set .@i,0; .@i < .count; set .@i, .@i+1 ){ sleep .rotatetime-60000; mapannounce ""+.lista$[.@i]+"","The PVP map will change in 30 seconds.",8; sleep 30000; mapannounce ""+.lista$[.@i]+"","The PVP map will change in 20 seconds.",8; sleep 20000; mapannounce ""+.lista$[.@i]+"","The PVP map will change in 10 seconds.",8; sleep 10000; if(.lista$[.@i] == .lista$[.count-1]){ mapwarp ""+.lista$[.@i]+"",""+.lista$[0]+"",0,0; set $@lista$, ""+.lista$[0]+""; set .@i,-1; } else{ mapwarp ""+.lista$[.@i]+"",""+.lista$[.@i+1]+"",0,0; set $@lista$, ""+.lista$[.@i+1]+""; } } } prontera.gat,145,188,5 script PvP Keeper 459,{ mes "[PvP Keeper]"; mes "Ready for a bloody"; mes "and glorious battle today?"; mes "Remember no GTB card allowed in PVP room to be fair :)"; if (select("Enter PVP. ["+getmapusers(""+$@lista$+"") +"]:I'm out of potions today.") == 1) { warp ""+$@lista$+"",0,0; announce ""+strcharinfo(0)+" Has Enter PvP Room !! Come on coward! Lets face to face !",bc,0xDF01A5; end; } next; mes "[PvP Keeper]"; mes "Haha!~"; mes "It's okay to be scared!!"; mes "HAHAHAHAHAHA!"; close; } OnPCKillEvent: if ( strcharinfo(3) == "guild_vs1" ) announce strcharinfo(0)+ " killed " +rid2name(killedrid); end; i got this error How to fix it ? BTW. how to config this script annouce on all map which i have set in setarray .lista$[0],"guild_vs1","guild_vs2","guild_vs3","guild_vs4","guild_vs5"; ??

yes what you post is my edit one. xD thx bro. +1 for u. topic solved xD

its have end sir T_T

//Quest Warper prontera,164,162,4 script Questing Warper 790,{ warp "que_temsky" ,99,141; OnInit: waitingroom "[ Questing Room ]",0; end; } Every time I click on the npc this error appear. How to fix it ?

//===== rAthena Script ======================================= //= Hunting Missions //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.3a //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= //= Random hunting missions. //= Rewards are based on quest difficulty. //===== Additional Comments: ================================= //= 1.0 Initial script. //= 1.1 Small improvements and fixes. //= 1.2 Added party support and replaced blacklists with an //= SQL query, both thanks to AnnieRuru. //= 1.3 Re-added a blacklist adapted for the SQL query. //= 1.3a Added mission reset options. //============================================================ que_temsky,101,149,4 script Hunting Missions 951,{ function Chk; function Cm; mes "[Hunting Missions]"; mes "Hello, "+strcharinfo(0)+"!"; if (!#Mission_Delay) { next; mes "[Hunting Missions]"; mes "I can't find any records..."; mes "You must be new here!"; emotion e_omg; next; callsub Mission_Info; emotion e_go; set #Mission_Delay,1; close; } mes rand(2)?"Working hard, as always...":"Not slacking, I hope..."; mes "Is there anything I can help"; mes "you with?"; mes " "; mes "^777777~ You've completed ^0055FF"+Mission_Total+"^777777 mission"+((Mission_Total == 1)?"":"s")+". ~^000000"; next; switch(select(((!Mission0)?" ~ New Mission::":": ~ Mission Status: ~ Abandon Mission")+": ~ Information: ~ Mission Shop: ~ View Top Hunters: ~ ^777777Cancel^000000")) { case 1: mes "[Hunting Missions]"; if (#Mission_Count) { mes "You've started a mission"; mes "on another character."; close; } if (#Mission_Delay > gettimetick(2) && .Delay) { set .@i, #Mission_Delay-gettimetick(2); if (.@i > 3600) set .@j$, (.@i/3600)+" hour"+(((.@i/3600) == 1)?"":"s"); else if (.@i > 60) set .@j$, (.@i/60)+" minute"+(((.@i/60) == 1)?"":"s"); else set .@j$, (.@i)+" second"+((.@i == 1)?"":"s"); mes "I'm afraid you'll have to wait "+.@j$+" before taking another mission."; close; } mes "You must hunt:"; query_sql("SELECT ID FROM `mob_db` WHERE left(Sprite, 4) != 'meta' AND left(Sprite, 2) != 'E_' AND ~Mode & 32 AND EXP > 0 AND MVP1id = 0 AND DropCardid > 4000 AND DropCardid < 5000 AND ID < 2000 AND instr('"+.Blacklist$+"',ID) = 0 ORDER BY rand() LIMIT "+.Quests, .@mob); for (set .@i,0; .@i<.Quests; set .@i,.@i+1) { setd "Mission"+.@i, .@mob[.@i]; setd "Mission"+.@i +"_",0; } set #Mission_Count, rand(.Count[0],.Count[1]); callfunc "Mission_Status"; next; mes "[Hunting Missions]"; mes "Report back when"; mes "you've finished."; mes "Good luck!"; close; case 2: mes "[Hunting Missions]"; mes "Mission status:"; callfunc "Mission_Status"; close; case 3: mes "[Hunting Missions]"; mes "Do you really want to"; mes "abandon your mission?"; if (.Reset < 0 && .Delay) mes "Your delay time will not be reset."; else if (.Reset > 0) mes "It will cost "+Cm(.Reset)+" Zeny."; next; switch(select(" ~ Abandon...: ~ ^777777Cancel^000000")) { case 1: if (.Reset > 0) { if (Zeny < .Reset) { mes "[Hunting Missions]"; mes "You don't have enough"; mes "Zeny to drop this mission."; emotion e_sry; close; } set Zeny, Zeny-.Reset; emotion e_cash; } mes "[Hunting Missions]"; mes "Alright, I've dropped"; mes "your current mission."; specialeffect2 EF_STORMKICK4; for(set .@i,0; .@i<.Quests; set .@i,.@i+1) { setd "Mission"+.@i,0; setd "Mission"+.@i+"_",0; } set #Mission_Count,0; if (.Reset < 0 && .Delay) set #Mission_Delay, gettimetick(2)+(.Delay*3600); close; case 2: mes "[Hunting Missions]"; mes "I knew you were kidding!"; mes "Keep up the good work."; emotion e_heh; close; } case 4: callsub Mission_Info; close; case 5: mes "[Hunting Missions]"; mes "You have ^0055FF"+#Mission_Points+"^000000 Mission Points."; mes "Use them well!"; callshop "mission_shop",1; npcshopattach "mission_shop"; end; case 6: mes "[Hunting Missions]"; mes "The top hunters are:"; query_sql("SELECT char_id AS id, (SELECT `name` FROM `char` WHERE char_id = id),`value` FROM `global_reg_value` WHERE str = 'Mission_Total' ORDER BY CAST(`value` AS SIGNED) DESC LIMIT 5",.@id,.@name$,.@val); for(set .@i,0; .@i<5; set .@i,.@i+1) mes " [Rank "+(.@i+1)+"] "+((.@name$[.@i] == "")?"^777777none":"^0055FF"+.@name$[.@i]+"^000000 : ^FF0000"+.@val[.@i]+" pt.")+"^000000"; close; case 7: mes "[Hunting Missions]"; mes "Nothing? Okay..."; emotion e_hmm; close; } Mission_Status: set @f,0; deletearray .@j[0], getarraysize(.@j); for(set .@i,0; .@i<.Quests; set .@i,.@i+1) { set .@j[.@i], getd("Mission"+.@i); set .@j[.Quests], .@j[.Quests]+strmobinfo(3,.@j[.@i]); set .@j[.Quests+1], .@j[.Quests+1]+(strmobinfo(6,.@j[.@i])/(getbattleflag("base_exp_rate")/100)*.Modifier[0]); set .@j[.Quests+2], .@j[.Quests+2]+(strmobinfo(7,.@j[.@i])/(getbattleflag("job_exp_rate")/100)*.Modifier[1]); mes " > "+Chk(getd("Mission"+.@i+"_"),#Mission_Count)+strmobinfo(1,.@j[.@i])+" ("+getd("Mission"+.@i+"_")+"/"+#Mission_Count+")^000000"; } // Reward formulas: set .@Mission_Points, 3+(.@j[.Quests]/.Quests/6); set .@Base_Exp, #Mission_Count*.@j[.Quests+1]/5; set .@Job_Exp, #Mission_Count*.@j[.Quests+2]/5; set .@Zeny, #Mission_Count*.Quests*.@j[.@i]*.Modifier[2]; next; mes "[Hunting Missions]"; mes "Mission rewards:"; mes " > Mission Points: ^0055FF"+.@Mission_Points+"^000000"; mes " > Base Experience: ^0055FF"+Cm(.@Base_Exp)+"^000000"; mes " > Job Experience: ^0055FF"+Cm(.@Job_Exp)+"^000000"; mes " > Zeny: ^0055FF"+Cm(.@Zeny)+"^000000"; if (@f) { set @f,0; return; } next; mes "[Hunting Missions]"; mes "Oh, you're done!"; mes "Good work."; mes "Here's your reward."; emotion e_no1; specialeffect2 EF_ANGEL; specialeffect2 EF_TRUESIGHT; set #Mission_Points, #Mission_Points+.@Mission_Points; set BaseExp, BaseExp+.@Base_Exp; set JobExp, JobExp+.@Job_Exp; set Zeny, Zeny+.@Zeny; for(set .@i,0; .@i<.Quests; set .@i,.@i+1) { setd "Mission"+.@i,0; setd "Mission"+.@i+"_",0; } set #Mission_Count,0; if (.Delay) set #Mission_Delay, gettimetick(2)+(.Delay*3600); set Mission_Total, Mission_Total+1; if (Mission_Total == 1) query_sql("INSERT INTO `global_reg_value` (`char_id`,`str`,`value`,`type`,`account_id`) VALUES ("+getcharid(0)+",'Mission_Total','1',3,0)"); else query_sql("UPDATE `global_reg_value` SET `value` = "+Mission_Total+" WHERE char_id = "+getcharid(0)+" AND `str` = 'Mission_Total'"); close; Mission_Info: mes "[Hunting Missions]"; mes "If you so choose, I can assign"; mes "you a random hunting quest."; mes "Some are easier than others, but"; mes "the rewards increase with difficulty."; next; mes "[Hunting Missions]"; mes "Missions points are shared"; mes "amongst all your characters."; if (.Delay) mes "Delay time is, too."; mes "You can't take missions on"; mes "multiple characters at once."; next; mes "[Hunting Missions]"; mes "You can start a quest"; if (.Delay) mes "every "+((.Delay == 1)?"hour.":.Delay+" hours."); else mes "whenever you want."; mes "That's everything~"; return; function Chk { if (getarg(0) < getarg(1)) { set @f,1; return "^FF0000"; } else return "^00FF00"; } function Cm { set .@str$, getarg(0); for(set .@i,getstrlen(.@str$)-3; .@i>0; set .@i,.@i-3) set .@str$, insertchar(.@str$,",",.@i); return .@str$; } OnBuyItem: set @cost,0; for(set .@i,0; .@i<getarraysize(@bought_nameid); set .@i,.@i+1) for(set .@j,0; .@j<getarraysize(.Shop); set .@j,.@j+2) if (@bought_nameid[.@i] == .Shop[.@j]) { set @cost, @cost+(.Shop[.@j+1]*@bought_quantity[.@i]); break; } mes "[Hunting Missions]"; if (@cost > #Mission_Points) mes "You don't have enough Mission Points."; else { for(set .@i,0; .@i<getarraysize(@bought_nameid); set .@i,.@i+1) { getitem @bought_nameid[.@i], @bought_quantity[.@i]; dispbottom "Purchased "+@bought_quantity[.@i]+"x "+getitemname(@bought_nameid[.@i])+"."; } set #Mission_Points, #Mission_Points-@cost; mes "Deal completed."; emotion e_cash; } set @cost,0; deletearray @bought_nameid[0], getarraysize(@bought_nameid); deletearray @bought_quantity[0], getarraysize(@bought_quantity); close; OnNPCKillEvent: if (!getcharid(1) || !.Party) { if (!#Mission_Count || !Mission0) end; for (set .@i, 0; .@i<.Quests; set .@i,.@i+1) { if (strmobinfo(1,killedrid) == strmobinfo(1,getd("Mission"+.@i))) { if (getd("Mission"+.@i+"_") < #Mission_Count) { dispbottom "[Hunting Mission] Killed "+(set(getd("Mission"+.@i+"_"),getd("Mission"+.@i+"_")+1))+" of "+#Mission_Count+" "+strmobinfo(1,killedrid)+"."; end; } } } } else if (.Party) { set .@mob, killedrid; getmapxy(.@map1$,.@x1,.@y1,0); getpartymember getcharid(1),1; getpartymember getcharid(1),2; for(set .@i,0; .@i<$@partymembercount; set .@i,.@i+1) { if (isloggedin($@partymemberaid[.@i], $@partymembercid[.@i])) { attachrid $@partymemberaid[.@i]; if (#Mission_Count && Mission0 && HP > 0) { getmapxy(.@map2$,.@x2,.@y2,0); if ((.@map1$ == .@map2$ || .Party == 1) && (distance(.@x1,.@y1,.@x2,.@y2) <= 30 || .Party < 3)) { for(set .@j,0; .@j<.Quests; set .@j,.@j+1) { if (strmobinfo(1,.@mob) == strmobinfo(1,getd("Mission"+.@j))) { if (getd("Mission"+.@j+"_") < #Mission_Count) { dispbottom "[Hunting Mission] Killed "+(set(getd("Mission"+.@j+"_"),getd("Mission"+.@j+"_")+1))+" of "+#Mission_Count+" "+strmobinfo(1,.@mob)+"."; break; } } } } } } } } end; OnInit: delwaitingroom; waitingroom "Hunting Mission",0; set .Delay,1; // Quest delay, in hours (0 to disable). set .Quests,4; // Number of subquests per mission (increases rewards). set .Party,3; // Party options: 0 (exclude party kills), 1 (include party kills), 2 (same map only), 3 (screen area only) set .Reset,0; // Reset options: -1 (abandoning mission sets delay time), 0 (no delay time), [Zeny] (cost to abandon mission, no delay time) setarray .Count[0], // Min and max monsters per subquest (increases rewards). 50,100; setarray .Modifier[0], // Multipliers for Base Exp, Job Exp, and Zeny rewards. getbattleflag("base_exp_rate")/100,getbattleflag("job_exp_rate")/100,60; setarray .Shop[0], // Reward items: <ID>,<point cost> (about 10~20 points per hunt). 26302,30,26303,60,26301,90; set .Blacklist$, // Blacklisted mob IDs. "1062,1088,1183,1186,1200,1212,1220,1221,1234,1235,"+ "1244,1245,1250,1268,1290,1293,1294,1296,1298,1299,"+ "1300,1301,1303,1304,1305,1306,1308,1309,1311,1313,"+ "1515,1588,1618,1676,1677,1678,1679,1796,1797,1974,"+ "1975,1976,1977,1978,1979"; npcshopdelitem "mission_shop",512; for(set .@i,0; .@i<getarraysize(.Shop); set .@i,.@i+2) npcshopadditem "mission_shop", .Shop[.@i], .Shop[.@i+1]; end; } - shop mission_shop -1,512:-1 Im using this script. i change the callsub Mission_Status with callfunc "Mission_Status", then add a new script: - script Mission_Command -1,{ OnInit: bindatcmd("hms",strnpcinfo(0)+"::OnAtcmd"); end; OnAtcmd: callfunc "Mission_Status"; close; } After that i load the script. and @reloadscript. I found this error.. [Error]: script:callfunc: function not found! [Mission_Status] [Debug]: Source (NPC): Mission_Command (invisible/not on a map) How to fix it ? how the top hunter works ? 10pts means ? 10 mission or ? can someone explain to me ?

dont want hahaha Why So Mean? pwetty pwease? lol. forgot where i save. let me check

dont want hahaha

this script work perfectly, but my player can use it. huhu. please add the gm function sir. Love it !

@capuche, we cannot set the time on the npc instead of script sir ? oh i forgot, the GM level must 90 above

To give a rental item, use npc script or an usable item @capuche can u make me some simple script so when i entered the ID its will be a rent item. also can i send the rent item to specific user instead of trade ?

@capuche. thx now its fix

26180,Hellstone_Wing_Of_Lord,Hellstone Wing Of Lord,5,5,0,10,,0,,0,0xFFFFFFFF,7,2,4096,,1,1,2180,{ bonus bAllStats,40; bonus2 bAddRace,RC_DemiHuman,50; bonus2 bAddRace,RC_Boss,50; },{},{} can i make this upper script a rental item ? can i put like this ? 26180,Hellstone_Wing_Of_Lord,Hellstone Wing Of Lord,5,5,0,10,,0,,0,0xFFFFFFFF,7,2,4096,,1,1,2180,{ rentitem 26180; bonus bAllStats,40; bonus2 bAddRace,RC_DemiHuman,50; bonus2 bAddRace,RC_Boss,50; },{},{}

oh ok.. securegrf is good. can u make full tutorial with a SS ? using thor patcher.

@capuche. there are some problem on your script. there are alphabet A on B list. there are alphabet A on C list there are alphabet D on E list there are alphabet D on F list until alphabet W,T and S are on list Z please fix it sir...

louyang,218,112,4 script Linker 811,{ switch ( basejob ) { case Job_Alchemist: set .@spirit, 445; break; case Job_Monk: set .@spirit, 447; break; case Job_Star_Gladiator: set .@spirit, 448; break; case Job_Sage: set .@spirit, 449; break; case Job_Crusader: set .@spirit, 450; break; case Job_SuperNovice: set .@spirit, 451; break; case Job_Knight: set .@spirit, 452; break; case Job_Wizard: set .@spirit, 453; break; case Job_Priest: set .@spirit, 454; break; case Job_Bard: case Job_Dancer: set .@spirit, 455; break; case Job_Rogue: set .@spirit, 456; break; case Job_Assassin: set .@spirit, 457; break; case Job_Blacksmith: set .@spirit, 458; break; case Job_Hunter: set .@spirit, 460; break; case Job_Soul_Linker: set .@spirit, 461; break; default: if ( upper == 1 && baselevel < 70 ) set .@spirit, 494; } if ( .@spirit ) { sc_start4 sc_spirit, 360000, 5, .@spirit,0,0; skilleffect .@spirit, 5; } end; } where to add sir? can u give me a fullscript ? Bump post

ohhh. have u try use encypt using this ? http://rathena.org/board/files/file/2766-grf-editor/ i hope u try. its much easy. hoho

got a budget. ? it cheap miss. no need run on your laptop. I'm not sure that my server will be good, so I wont buy a VPS nvm, just bought a vps server only 5USD permonth. ahhh damn so cheap. you can run without any problem. so u can enjoy testing and development your server

im using it, and my char stuck. why? its like cursed. black and cannot move.

got a budget. ? it cheap miss. no need run on your laptop.

Please add slideshow image. Gotm Potm

Add custom weapon sgt melecehkan.

Sir. If i encrypt the text file. What will happen ??? #securegrf

Woargh girl xD

LoL. Spammer !!