diff options
| -rw-r--r-- | conf/login_athena.conf | 9 | ||||
| -rw-r--r-- | doc/effect_list.txt | 58 | ||||
| -rw-r--r-- | doc/md5_hashcheck.txt | 82 | ||||
| -rw-r--r-- | npc/custom/quests/hunting_missions.txt | 576 |
4 files changed, 360 insertions, 365 deletions
diff --git a/conf/login_athena.conf b/conf/login_athena.conf index fcad206e9..fa963a14c 100644 --- a/conf/login_athena.conf +++ b/conf/login_athena.conf @@ -136,13 +136,14 @@ account.engine: auto //account.sql.accreg_db: global_reg_value // Client MD5 hash check -// Check client hash? +// If turned on, the login server will check if the client's hash matches +// the value below, and will not connect tampered clients. +// Note: see doc\md5_hashcheck.txt for more details. client_hash_check: off -// Put your client hashes here, a player can login into the server using -// a hash with a group_id equal or lower the account group_id +// Client MD5 hashes +// A player can login with a client hash at or below the account group_id. // Format: group_id, hash -// Examples: client_hash: 0, 113e195e6c051bb1cfb12a644bb084c5 client_hash: 99, cb1ea78023d337c38e8ba5124e2338ae diff --git a/doc/effect_list.txt b/doc/effect_list.txt index b93d4bf8a..5c1b48e9b 100644 --- a/doc/effect_list.txt +++ b/doc/effect_list.txt @@ -739,14 +739,14 @@ Number Description 720. Yellow version of Soul Breaker 721. Adoramus (lightning bolt) 722. Ignition Break (big explosion) -723. Noise Sound +723. Hundred Spear (sound effect) 724. Green version of Detecting -725. Detecting +725. Oratorio (like Detecting) 726. Frost Misty (blue vapor and bubbles) -727. Comet +727. Crimson Rock 728. Small fire (part of Hell Inferno) 729. Marsh of Abyss (like Close Confine) -730. Small, cartoony explosion +730. Small, cartoony explosion (part of Soul Expansion) 731. Dragon Howling (blinking, expanding circle) 732. Spike from the ground 733. Fluffy Ball flying by @@ -755,35 +755,35 @@ Number Description 736. (Nothing) 737. (Nothing) 738. (Nothing) -739. Small pod appearing -740. Different small pod -741. Different small pod -742. Different small pod -743. Different small pod +739. Old Magenta Trap +740. Old Cobald Trap +741. Old Maize Trap +742. Old Verdure Trap +743. White Ranger Trap 744. Camouflage 745. Aimed Bolt (crosshairs) 746. Arrow Storm 747. Falling white feathers 748. Falling blue feathers -749. Shields +749. Millennium Shield 750. Detonator (blue sparkles) -751. Shots from a direction -752. Some blinking filter -753. Sparkles +751. Releasing summoned warlock spheres +752. Like Energy Coat, but not as dark +753. Clearance 754. Green warp portal (root of Epiclesis) 755. Oratio (spinning blue symbol) 756. Enchant Blade (like Berserk Potion) -757. Stargate-like wormhole animation -758. Rolling Cutter (1) -759. Rolling Cutter (2) -760. Rolling Cutter (3) -761. Rolling Cutter (4) -762. Rolling Cutter (5) -763. Rolling Cutter (6) -764. Rolling Cutter (7) -765. Rolling Cutter (8) -766. Rolling Cutter (9) -767. Rolling Cutter (10) +757. Third Class Aura (Middle) +758. Rolling Cutter - Spin Count 1 +759. Rolling Cutter - Spin Count 2 +760. Rolling Cutter - Spin Count 3 +761. Rolling Cutter - Spin Count 4 +762. Rolling Cutter - Spin Count 5 +763. Rolling Cutter - Spin Count 6 +764. Rolling Cutter - Spin Count 7 +765. Rolling Cutter - Spin Count 8 +766. Rolling Cutter - Spin Count 9 +767. Rolling Cutter - Spin Count 10 768. Blinking 769. Cross Ripper Slasher (flying knives) 770. Strip sound @@ -791,10 +791,10 @@ Number Description 772. Poison particles 773. Expanding purple aura (part of Phantom Menace) 774. Axe Boomerang -775. Spin -776. Half-automatic gunshots +775. Spinning character sprite +776. Like Desperado sound effect 777. Faded light from the ground [S] -778. Expanding white aura +778. Expanding white aura (like Clearance) 779. Faded light from the ground [S] 780. Expanding red aura (from Infrared Scan) 781. Magnetic Field (purple chains) @@ -805,8 +805,8 @@ Number Description 786. Symbol with bleeping sound [S] 787. Flare Launcher (line of fire) 788. Venom Impress (green skull) -789. Two Ancillas -790. Flame symbol +789. Freezing Status Effect (two ancillas) +790. Burning Status Effect (flame symbol) 791. Two ice shots 792. Upward streaming white particles 793. Same, but more brief diff --git a/doc/md5_hashcheck.txt b/doc/md5_hashcheck.txt index 13cda2bb9..9c2f3b8b5 100644 --- a/doc/md5_hashcheck.txt +++ b/doc/md5_hashcheck.txt @@ -1,44 +1,38 @@ -//===== rAthena Documentation ================================
-//= Login Server's MD5 Hash Check
-//===== By: ==================================================
-//= rAthena Dev Team
-//===== Current Version: =====================================
-//= 20120921
-//===== Description: =========================================
-//= This file outlines how the built-in MD5 Hash Check is
-//= used and steps enable it.
-//============================================================
-
-In revision r16771, the login server received an update that allows it to perform
-a server-side check of the client to find out it's MD5 hash. This update is an
-effort towards ensuring that a user has either:
-a.) not been tampered with the client
-b.) using the client specific to that particular server
-
-At present, we know that the client can only send the correct MD5 hash to the server
-when using particular server types, so a diff is required to ensure that any client
-can send the hash. A link to the required diff plugin for WeeDiffGen can be found at:
-http://rathena.org/board/topic/70841-r16771-client-md5-hash-check/
-
-Check conf/login_athena.conf for instruction on how to enable it.
-
-In conf/login_athena.conf you will find the following:
-// Client MD5 hash check
-// Check client hash?
-client_hash_check: off
-
-This setting simply accepts on or off.
-
-
-// Put your client hashes here, a player can login into the server using
-// a hash with a group_id equal or lower the account group_id
-// Format: group_id, hash
-// Examples:
-client_hash: 0, 113e195e6c051bb1cfb12a644bb084c5
-client_hash: 99, cb1ea78023d337c38e8ba5124e2338ae
-
-Once enabled, you would use those lines to configure this feature (or even as an example).
-The group_id can be any of the groups in conf/groups.conf and can be particularly useful
-if, for example, you wanted to restrict normal players from dual-clienting and use a lower
-number for chat flooding, but wanted to allow dual-clienting and 255 lines before the chat
-flood kicks in for your GMs.
\ No newline at end of file +//===== rAthena Documentation ================================ +//= MD5 Hash Check +//===== By: ================================================== +//= rAthena Dev Team +//===== Current Version: ===================================== +//= 20120921 +//===== Description: ========================================= +//= This file outlines the login server's MD5 hash check. +//============================================================ + +The login server is able to perform a check of the client's MD5 hash. +This will ensure that a user has not tampered with the client and that +the client is the one specific to your server. + +The client can only send the correct MD5 hash to the server on certain +server types, so a client diff is required to ensure the hash is sent. +A link containing the required WeeDiffGen plugin can be found at: +http://rathena.org/board/topic/70841-r16771-client-md5-hash-check/ + +The settings for the hash check are located in conf\login_athena.conf: + +// Client MD5 hash check +// If turned on, the login server will check if the client's hash matches +// the value below, and will not connect tampered clients. +// Note: see doc\md5_hashcheck.txt for more details. +client_hash_check: off + +// Client MD5 hashes +// A player can login with a client hash at or below the account group_id. +// Format: group_id, hash +client_hash: 0, 113e195e6c051bb1cfb12a644bb084c5 +client_hash: 99, cb1ea78023d337c38e8ba5124e2338ae + +To enable MD5 hash checks, set 'client_hash_check' to 'on'. +The 'client_hash' group_id can be any of the groups in conf\groups.conf, +and is particularly useful if you wanted to allow GMs a different client +than normal players; for example, a GM client could be hexed differently +with dual-clienting enabled and chat flood disabled.
\ No newline at end of file diff --git a/npc/custom/quests/hunting_missions.txt b/npc/custom/quests/hunting_missions.txt index 31ee872ca..a3e16f229 100644 --- a/npc/custom/quests/hunting_missions.txt +++ b/npc/custom/quests/hunting_missions.txt @@ -1,289 +1,289 @@ -//===== rAthena Script =======================================
-//= Hunting Missions
-//===== By: ==================================================
-//= Euphy
-//===== Current Version: =====================================
-//= 1.1a
-//===== Compatible With: =====================================
-//= rAthena SVN
-//===== Description: =========================================
-//= Random hunting missions.
-//= Rewards are based on quest difficulty.
-//============================================================
-
-prontera,152,187,6 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(((!Mission1)?" ~ 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:";
- freeloop(1);
- set .@size, getarraysize(.NoRange);
- for (set .@i,0; .@i<.Quests; set .@i,.@i+1) {
- set .@valid,0;
- while (!.@valid) {
- set .@valid,1;
- set .@mob, rand(1001,1999);
- // Is mob ID blacklisted?
- if (compare(.Restrict$[0],""+.@mob) || compare(.Restrict$[1],""+.@mob)) set .@valid,0;
- // Is mob ID interval blacklisted?
- if (.@valid) for(set .@j,0; .@j<.@size; set .@j,.@j+2)
- if (.@mob > .NoRange[.@j] && .@mob < .NoRange[.@j+1]) {
- set .@valid,0;
- break;
- }
- // Is mob a duplicate?
- if (.@valid) for(set .@j,0; .@j<.@i; set .@j,.@j+1)
- if (strmobinfo(1,.@mob) == strmobinfo(1,getd("Mission"+.@j))) {
- set .@valid,0;
- break;
- }
- // Is mob an MVP?
- if (.@valid) if (getmonsterinfo(.@mob,22)) set .@valid,0;
- }
- setd "Mission"+.@i, .@mob;
- setd "Mission"+.@i+"_",0;
- }
- set #Mission_Count, rand(.Count[0],.Count[1]);
- freeloop(0);
- callsub Mission_Status;
- set @f,0;
- next;
- mes "[Hunting Missions]";
- mes "Report back when";
- mes "you've finished.";
- mes "Good luck!";
- close;
- case 2:
- mes "[Hunting Missions]";
- mes "Mission status:";
- callsub Mission_Status;
- if (@f) { set @f,0; close; }
- next;
- mes "[Hunting Missions]";
- mes "Oh, you're done!";
- mes "Good work.";
- mes "Here's your reward.";
- emotion e_no1;
- specialeffect2 377;
- 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]);
- set .@j[.Quests+2], .@j[.Quests+2]+strmobinfo(7,.@j[.@i]);
- setd "Mission"+.@i,0;
- setd "Mission"+.@i+"_",0;
- }
- set #Mission_Points, #Mission_Points+(3+(.@j[.Quests]/.Quests/6));
- getexp (#Mission_Count*.@j[.Quests+1]/5),(#Mission_Count*.@j[.Quests+2]/5);
- set Zeny, Zeny+(#Mission_Count*.Quests*.@j[.@i]*.Multiplier);
- 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;
- case 3:
- mes "[Hunting Missions]";
- mes "Do you really want to";
- mes "abandon your mission?";
- if (.Delay) mes "Your delay time will not be reset.";
- next;
- switch(select(" ~ Abandon...: ~ ^777777Cancel^000000")) {
- case 1:
- mes "[Hunting Missions]";
- mes "Alright, I've dropped";
- mes "your current mission.";
- specialeffect2 462;
- 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);
- 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 `name`,CAST(`value` AS SIGNED) FROM `global_reg_value` LEFT JOIN `char` ON `global_reg_value`.char_id = `char`.char_id WHERE `global_reg_value`.str = 'Mission_Total' ORDER BY CAST(`value` AS SIGNED) DESC LIMIT 5",.@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]);
- set .@j[.Quests+2], .@j[.Quests+2]+strmobinfo(7,.@j[.@i]);
- mes " > "+Chk(getd("Mission"+.@i+"_"),#Mission_Count)+strmobinfo(1,.@j[.@i])+" ("+getd("Mission"+.@i+"_")+"/"+#Mission_Count+")^000000";
- }
- 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]*.Multiplier;
- 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";
- return;
-
-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 (!#Mission_Count || !Mission1) 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) {
- set .@j, getd("Mission"+.@i+"_")+1;
- setd "Mission"+.@i+"_", .@j;
- dispbottom "[Hunting Mission] Killed "+.@j+" of "+#Mission_Count+" "+strmobinfo(1,killedrid)+".";
- }
- break;
- }
- }
- end;
-
-OnInit:
- set .Delay,12; // Quest delay, in hours (0 to disable).
- set .Quests,4; // Number of subquests per quest (increases rewards).
- set .Multiplier,60; // Multiplier for Zeny reward calculation.
- setarray .Count[0], // Min and max monsters per subquest (increases rewards).
- 40,70;
- setarray .Shop[0], // Reward items: <ID>,<point cost> (about 10~20 points per hunt).
- 512,1,513,1,514,1,538,5,539,5,558,10,561,10;
- setarray .Restrict$[0], // Blacklisted mob IDs.
- "1003,1006,1017,1021,1022,1027,1043,1062,1075,1096,"+
- "1108,1120,1136,1137,1168,1171,1172,1173,1198,1200,"+
- "1203,1204,1205,1210,1212,1217,1218,1244,1245,1247,",
- "1250,1259,1262,1268,1270,1311,1313,1388,1407,1411,"+
- "1414,1496,1501,1502,1515,1618,1624,1625,1626,1629,"+
- "1669,1674,1675,1676,1677,1678,1679,1681,1834,1835,"+
- "1868,1990,1991,1996,1997,1998";
- setarray .NoRange[0], // Blacklisted mob ID ranges.
- 1077,1094, 1180,1188, 1219,1242, 1282,1310, 1323,1365,
- 1392,1400, 1417,1493, 1517,1613, 1639,1652, 1657,1668,
- 1682,1692, 1703,1713, 1718,1769, 1784,1829, 1838,1864,
- 1870,1986;
-
- npcshopdelitem "mission_shop",512;
- for(set .@i,0; .@i<getarraysize(.Shop); set .@i,.@i+2)
- npcshopadditem "mission_shop", .Shop[.@i], .Shop[.@i+1];
- end;
-}
+//===== rAthena Script ======================================= +//= Hunting Missions +//===== By: ================================================== +//= Euphy +//===== Current Version: ===================================== +//= 1.1a +//===== Compatible With: ===================================== +//= rAthena SVN +//===== Description: ========================================= +//= Random hunting missions. +//= Rewards are based on quest difficulty. +//============================================================ + +prontera,152,187,6 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(((!Mission1)?" ~ 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:"; + freeloop(1); + set .@size, getarraysize(.NoRange); + for (set .@i,0; .@i<.Quests; set .@i,.@i+1) { + set .@valid,0; + while (!.@valid) { + set .@valid,1; + set .@mob, rand(1001,1999); + // Is mob ID blacklisted? + if (compare(.Restrict$[0],""+.@mob) || compare(.Restrict$[1],""+.@mob)) set .@valid,0; + // Is mob ID interval blacklisted? + if (.@valid) for(set .@j,0; .@j<.@size; set .@j,.@j+2) + if (.@mob > .NoRange[.@j] && .@mob < .NoRange[.@j+1]) { + set .@valid,0; + break; + } + // Is mob a duplicate? + if (.@valid) for(set .@j,0; .@j<.@i; set .@j,.@j+1) + if (strmobinfo(1,.@mob) == strmobinfo(1,getd("Mission"+.@j))) { + set .@valid,0; + break; + } + // Is mob an MVP? + if (.@valid) if (getmonsterinfo(.@mob,22)) set .@valid,0; + } + setd "Mission"+.@i, .@mob; + setd "Mission"+.@i+"_",0; + } + set #Mission_Count, rand(.Count[0],.Count[1]); + freeloop(0); + callsub Mission_Status; + set @f,0; + next; + mes "[Hunting Missions]"; + mes "Report back when"; + mes "you've finished."; + mes "Good luck!"; + close; + case 2: + mes "[Hunting Missions]"; + mes "Mission status:"; + callsub Mission_Status; + if (@f) { set @f,0; close; } + next; + mes "[Hunting Missions]"; + mes "Oh, you're done!"; + mes "Good work."; + mes "Here's your reward."; + emotion e_no1; + specialeffect2 377; + 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]); + set .@j[.Quests+2], .@j[.Quests+2]+strmobinfo(7,.@j[.@i]); + setd "Mission"+.@i,0; + setd "Mission"+.@i+"_",0; + } + set #Mission_Points, #Mission_Points+(3+(.@j[.Quests]/.Quests/6)); + getexp (#Mission_Count*.@j[.Quests+1]/5),(#Mission_Count*.@j[.Quests+2]/5); + set Zeny, Zeny+(#Mission_Count*.Quests*.@j[.@i]*.Multiplier); + 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; + case 3: + mes "[Hunting Missions]"; + mes "Do you really want to"; + mes "abandon your mission?"; + if (.Delay) mes "Your delay time will not be reset."; + next; + switch(select(" ~ Abandon...: ~ ^777777Cancel^000000")) { + case 1: + mes "[Hunting Missions]"; + mes "Alright, I've dropped"; + mes "your current mission."; + specialeffect2 462; + 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); + 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 `name`,CAST(`value` AS SIGNED) FROM `global_reg_value` LEFT JOIN `char` ON `global_reg_value`.char_id = `char`.char_id WHERE `global_reg_value`.str = 'Mission_Total' ORDER BY CAST(`value` AS SIGNED) DESC LIMIT 5",.@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]); + set .@j[.Quests+2], .@j[.Quests+2]+strmobinfo(7,.@j[.@i]); + mes " > "+Chk(getd("Mission"+.@i+"_"),#Mission_Count)+strmobinfo(1,.@j[.@i])+" ("+getd("Mission"+.@i+"_")+"/"+#Mission_Count+")^000000"; + } + 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]*.Multiplier; + 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"; + return; + +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 (!#Mission_Count || !Mission1) 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) { + set .@j, getd("Mission"+.@i+"_")+1; + setd "Mission"+.@i+"_", .@j; + dispbottom "[Hunting Mission] Killed "+.@j+" of "+#Mission_Count+" "+strmobinfo(1,killedrid)+"."; + } + break; + } + } + end; + +OnInit: + set .Delay,12; // Quest delay, in hours (0 to disable). + set .Quests,4; // Number of subquests per quest (increases rewards). + set .Multiplier,60; // Multiplier for Zeny reward calculation. + setarray .Count[0], // Min and max monsters per subquest (increases rewards). + 40,70; + setarray .Shop[0], // Reward items: <ID>,<point cost> (about 10~20 points per hunt). + 512,1,513,1,514,1,538,5,539,5,558,10,561,10; + setarray .Restrict$[0], // Blacklisted mob IDs. + "1003,1006,1017,1021,1022,1027,1043,1062,1075,1096,"+ + "1108,1120,1136,1137,1168,1171,1172,1173,1198,1200,"+ + "1203,1204,1205,1210,1212,1217,1218,1244,1245,1247,", + "1250,1259,1262,1268,1270,1311,1313,1388,1407,1411,"+ + "1414,1496,1501,1502,1515,1618,1624,1625,1626,1629,"+ + "1669,1674,1675,1676,1677,1678,1679,1681,1834,1835,"+ + "1868,1990,1991,1996,1997,1998"; + setarray .NoRange[0], // Blacklisted mob ID ranges. + 1077,1094, 1180,1188, 1219,1242, 1282,1310, 1323,1365, + 1392,1400, 1417,1493, 1517,1613, 1639,1652, 1657,1668, + 1682,1692, 1703,1713, 1718,1769, 1784,1829, 1838,1864, + 1870,1986; + + 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
\ No newline at end of file |