summaryrefslogtreecommitdiff
path: root/npc/003-1/events.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/003-1/events.txt')
-rw-r--r--npc/003-1/events.txt499
1 files changed, 0 insertions, 499 deletions
diff --git a/npc/003-1/events.txt b/npc/003-1/events.txt
deleted file mode 100644
index d6843d1..0000000
--- a/npc/003-1/events.txt
+++ /dev/null
@@ -1,499 +0,0 @@
-// TMW2 scripts.
-// Author:
-// Jesusalva
-// Description:
-// Controls events, part of Aurora Event System
-//
-// See also: functions/aurora.txt, functions/seasons.txt, command/event.txt,
-// event.txt, functions/soulmenhir.txt and, of course, the event maps (if any).
-//
-// Script Variables:
-// Q_AuroraEvent
-// Quest Variable: FYEVENT_CYCLE, Score, ClaimedControl
-//
-// TODO: Use duplicate() command to make it available in other towns as well
-
-// Easter
-003-1,47,53,0 script Aurora NPC_FEMALE,{
- function handleEaster;
- function handleValentine;
- function handleStPatrick;
-
- // Aurora Event functions
- function auroraRankings;
- function auroraCurrentRankings;
- function auroraSubmit;
- function auroraListRewards;
-
- // Handle annuals
- //.@v_stday = getvariableofnpc(.valentine_stday, "#EventCore");
- //.@v_stmon = getvariableofnpc(.valentine_stmon, "#EventCore");
- .@v_endday = getvariableofnpc(.valentine_endday, "#EventCore");
- .@v_endmon = getvariableofnpc(.valentine_endmon, "#EventCore");
-
- //.@e_stday = getvariableofnpc(.easter_stday, "#EventCore");
- //.@e_stmon = getvariableofnpc(.easter_stmon, "#EventCore");
- .@e_endday = getvariableofnpc(.easter_endday, "#EventCore");
- .@e_endmon = getvariableofnpc(.easter_endmon, "#EventCore");
-
- .@dy=gettime(GETTIME_DAYOFMONTH);
- .@mo=gettime(GETTIME_MONTH);
-
- // Debug Overrides
- if ($@DEBUG_OD)
- .@dy=$@DEBUG_OD;
- if ($@DEBUG_OM)
- .@mo=$@DEBUG_OM;
-
- // Annual rewards can only be claimed until the month ends
- if ($EVENT$ == "Patrick")
- handleStPatrick();
- else if (.@mo == .@v_endmon && .@dy > .@v_endday)
- handleValentine();
- else if (.@mo == .@e_endmon && .@dy > .@e_endday)
- handleEaster();
-
- // Another event is going on, smoothly handle it
- if ($EVENT$ != "")
- goto L_Aurora;
- else
- mesc l("Currently, there is no event going on."), 1;
- close;
-
-
-// OnRestore causes OnInit to start again
-OnRestore:
- setnpcdisplay .name$, "Aurora", NPC_FEMALE;
-OnInit:
- .@npcId = getnpcid(.name$);
- setunitdata(.@npcId, UDT_HEADTOP, MiniSkirt);
- setunitdata(.@npcId, UDT_HEADMIDDLE, RedStockings);
- //setunitdata(.@npcId, UDT_HEADBOTTOM, BlueRoseHat);
- setunitdata(.@npcId, UDT_WEAPON, UglyChristmasSweater); // (Blue) Bathrobe?
- setunitdata(.@npcId, UDT_HAIRSTYLE, any(8, 8, 8, 20, 20, 11));
- setunitdata(.@npcId, UDT_HAIRCOLOR, 7);
- .sex = G_FEMALE;
- .distance = 5;
- end;
-
-// Override for Valentine Day - There should be no Aurora
-OnValentine:
- .@npcId = getnpcid(.name$);
- setnpcdisplay .name$, "Demure#ValentineFinal", NPC_FEMALE;
- //.@npcId = getnpcid(.name$);
- setunitdata(.@npcId, UDT_HEADTOP, Cap);
- setunitdata(.@npcId, UDT_HEADMIDDLE, RedStockings);
- setunitdata(.@npcId, UDT_HEADBOTTOM, BunnyEars);
- setunitdata(.@npcId, UDT_WEAPON, GMRobe);
- setunitdata(.@npcId, UDT_HAIRSTYLE, 14);
- setunitdata(.@npcId, UDT_HAIRCOLOR, 18);
- end;
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-/////////////////////////////////////////////////////////////////////////////////
-function handleEaster {
- // Handle rewards before anything else
- if (EASTER_YEAR != gettime(GETTIME_YEAR)) {
- EASTER_YEAR=gettime(GETTIME_YEAR);
- if (strcharinfo(0) == $@easter_name$[0]) {
- makepet BhopFluffy;
- mesn;
- mesc l("For the first place in Easter, you gained a Bhopper Fluffy."), 3;
- mesc l("Remember to give it a balanced diet of Aquadas to make it happy."), 3;
- next;
- } else {
- .@pos=array_find($@easter_name$, strcharinfo(0));
- // 0 (aka top 1) is not an appliable winner
- if (.@pos > 0) {
- // Reverse it so top 10 value is 2, and top 2 value is 10.
- .@pos=11-.@pos;
- getitem StrangeCoin, .@pos*10;
- }
- }
- }
- mesn;
- mesq l("Easter is over! I am the last chance to get rid of eggs!!");
- mesc l("Note: Golden and Silver Eggs are deleted after the next event end."), 1;
- // Heartbeat
- select
- l("Trade Silver Eggs"),
- l("Trade Golden Eggs"),
- l("View LeaderBoard"),
- l("Thanks Lilica.");
- mes "";
- switch (@menu) {
- case 1:
- openshop "#eastershop1";
- closedialog;
- break;
- case 2:
- openshop "#eastershop2";
- closedialog;
- break;
- case 3:
- mesn l("Easter @@", gettime(GETTIME_YEAR));
- mes("1."+$@easter_name$[0]+" ("+$@easter_value[0]+")");
- mes("2."+$@easter_name$[1]+" ("+$@easter_value[1]+")");
- mes("3."+$@easter_name$[2]+" ("+$@easter_value[2]+")");
- mes("4."+$@easter_name$[3]+" ("+$@easter_value[3]+")");
- mes("5."+$@easter_name$[4]+" ("+$@easter_value[4]+")");
- mes("6."+$@easter_name$[5]+" ("+$@easter_value[5]+")");
- mes("7."+$@easter_name$[6]+" ("+$@easter_value[6]+")");
- mes("8."+$@easter_name$[7]+" ("+$@easter_value[7]+")");
- mes("9."+$@easter_name$[8]+" ("+$@easter_value[8]+")");
- mes("10."+$@easter_name$[9]+" ("+$@easter_value[9]+")");
- break;
- }
- return;
-}
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-/////////////////////////////////////////////////////////////////////////////////
-function handleValentine {
- mesn;
- mesq l("Valentine Day is over!");
- next;
- mes "##B"+l("Top 10 - Valentine Day")+"##b";
- mes("1." +$@valentine_name$[0]+" ("+$@valentine_value[0]+")");
- mes("2." +$@valentine_name$[1]+" ("+$@valentine_value[1]+")");
- mes("3." +$@valentine_name$[2]+" ("+$@valentine_value[2]+")");
- mes("4." +$@valentine_name$[3]+" ("+$@valentine_value[3]+")");
- mes("5." +$@valentine_name$[4]+" ("+$@valentine_value[4]+")");
- mes("6." +$@valentine_name$[5]+" ("+$@valentine_value[5]+")");
- mes("7." +$@valentine_name$[6]+" ("+$@valentine_value[6]+")");
- mes("8." +$@valentine_name$[7]+" ("+$@valentine_value[7]+")");
- mes("9." +$@valentine_name$[8]+" ("+$@valentine_value[8]+")");
- mes("10."+$@valentine_name$[9]+" ("+$@valentine_value[9]+")");
-
- if (#VALENTINE_SENT+#VALENTINE_OPENED <= 0)
- return;
- next;
-
- // Handle rewards
- #VALENTINE_SENT=0;
- #VALENTINE_OPENED=0;
- #VALENTINE_RECEIVED=0;
- copyarray(.@name$[0], $@valentine_name$[0], 10);
- if (strcharinfo(0) == .@name$[0]) {
- makepet DoggyDog;
- getitem PrismGift, 1;
- getitem StrangeCoin, 10;
- } else if (strcharinfo(0) == .@name$[1] || strcharinfo(0) == .@name$[2]) {
- getitem PrismGift, 1;
- getitem GoldenGift, 1;
- getitem StrangeCoin, 10;
- } else if (strcharinfo(0) == .@name$[3] || strcharinfo(0) == .@name$[4]) {
- getitem GoldenGift, 1;
- getitem SilverGift, 1;
- getitem StrangeCoin, 10;
- } else if (strcharinfo(0) == .@name$[5] || strcharinfo(0) == .@name$[6]) {
- getitem SilverGift, 1;
- getitem BronzeGift, 1;
- getitem StrangeCoin, 10;
- } else if (strcharinfo(0) == .@name$[7] || strcharinfo(0) == .@name$[8] || strcharinfo(0) == .@name$[9]) {
- getitem BronzeGift, 1;
- getitem StrangeCoin, 10;
- } else {
- getitem StrangeCoin, 5;
- }
-
- getexp #VALENTINE_SENT+#VALENTINE_RECEIVED, #VALENTINE_SENT;
- Zeny=Zeny+#VALENTINE_OPENED;
-
- if (strcharinfo(0) == .@name$[0])
- mesc l("You gained a @@ for the #1 place on the event. Remember to feed it @@, or it may run away from you.", getitemlink(DoggyDog), getitemlink(AnimalBones));
- return;
-}
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-/////////////////////////////////////////////////////////////////////////////////
-function handleStPatrick {
- // Check if St. Patrick day is over D:
- if ($EVENT$ != "Patrick")
- goto OnRestore;
- // Okay, it is still St. Patrick :3
- mesn;
- mesc l("It's St. Patrick Event!"), 3;
- mes l("At 00:00, 06:00, 12:00, 15:00, 18:00 and 21:00 server time");
- mes l("Several special clovers will show up at forests.");
- next;
- mes l("They have 10x more chance to drop a @@, so it is a great deal!", getitemlink(FourLeafClover));
- mes l("Also, hidden in a forest which is not hot nor cold, is the Gold Pot Cauldron...");
- mes l("You can get daily something from it, but unless you're green like me, you will have no luck...");
- next;
- return;
-}
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-/////////////////////////////////////////////////////////////////////////////////
-L_Aurora:
- // Define script variables
- .@WHAT$=l("event");
-
- // Fill them with specific details, if available
- if ($EVENT$ == "Expo") {
- .@WHAT$=l("world expo");
- } else if ($EVENT$ == "Fishing") {
- .@WHAT$=l("golden fish hunt");
- } else if ($EVENT$ == "Kamelot") {
- .@WHAT$=l("kamelot raid");
- } else if ($EVENT$ == "Regnum") {
- .@WHAT$=l("regnum's blessing");
- } else if ($EVENT$ == "Mining") {
- .@WHAT$=l("miners union request");
- } else if ($EVENT$ == "Candor") {
- .@WHAT$=l("candor battle season");
- } else if ($EVENT$ == "Celestia") {
- .@WHAT$=l("yeti king hunt season");
- } else if ($EVENT$ == "Gemini") {
- .@WHAT$=l("gemini season");
- } else if ($EVENT$ == "Rebirth") {
- .@WHAT$=l("rebirth season");
- } else if ($EVENT$ == "Tower") {
- .@WHAT$=l("dream tower apparition");
- } else if ($EVENT$ == "Raid") {
- .@WHAT$=l("boss raid");
- } else if ($EVENT$ == "Olympics") {
- .@WHAT$=l("magic olympics");
- }
-
- mesn;
- mesq l("Hello! I am Aurora, and I oversee the %s!", .@WHAT$);
- next;
- mesn;
- mesq l("So, how can I help you today?");
- do
- {
- next;
- select
- l("Event Details"),
- l("Event Ranking Rewards"),
- rif(FYEventUsesRanking(), l("Current Rankings")),
- rif(FYEventUsesRanking(), l("List & Claim rewards")),
- l("That's all, thanks!");
- mes "";
- switch (@menu) {
- case 1:
- EventHelp();
- if (FYEventUsesRanking()) {
- mesc l("You must claim all rewards and use any event item BEFORE it ends."), 1;
- mesc l("Left-overs will be deleted shortly after."), 1;
- mesc l("Any eventual ranking reward will be sent by the banker's mail."), 1;
- } else {
- mesn;
- mesq l("Have fun!");
- }
- break;
-
- case 2:
- auroraRankings();
- break;
-
- case 3:
- auroraCurrentRankings();
- break;
-
- case 4:
- auroraSubmit();
- auroraListRewards();
- break;
-
- default:
- close;
- }
- // The code block is done
- } while (true);
-close;
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-/////////////////////////////////////////////////////////////////////////////////
-function auroraRankings {
- setnpcdialogtitle l("Aurora Events")+" - "+$EVENT$;
- setskin "aurora_"+$EVENT$;
- mes "There is no ranking information available for this event.";
- select("Ok");
- setskin "";
- clear;
- auroraCurrentRankings(); // More to silence a bug than whatelse
- return;
-}
-
-
-function auroraCurrentRankings {
- if (FYEventUsesRanking()) {
- HallOfAurora();
- } else {
- mesn;
- mesq l("Personally, I like unranked events more than ranked ones...");
- }
- return;
-}
-
-
-function auroraListRewards {
- .@s=getq2(Q_AuroraEvent);
- .@r=getq3(Q_AuroraEvent);
- mesn;
- freeloop(true);
- for (.@i=0; .@i < getarraysize($FYREWARD_PT); .@i++) {
- mes l("%s %d pts - %d %s",
- (.@r > .@i ? "%%A" : (.@r == .@i ? "%%E" : "%%B")), // Status Indicator
- $FYREWARD_PT[.@i], $FYREWARD_AM[.@i], getitemlink($FYREWARD_ID[.@i]));
- // You're at this milestone? Hmm
- if (.@r == .@i) {
- // Your score is enough: rank you up
- if (.@s >= $FYREWARD_PT[.@i]) {
- inventoryplace $FYREWARD_ID[.@i], $FYREWARD_AM[.@i];
- getitem $FYREWARD_ID[.@i], $FYREWARD_AM[.@i];
- .@r+=1;
- setq3 Q_AuroraEvent, .@r;
- }
- }
- }
- freeloop(false);
- return;
-}
-
-
-function auroraSubmit {
- .@q2=getq2(Q_AuroraEvent);
- FYE_Submit();
- mesc l("Event score: %d -> %d", .@q2, getq2(Q_AuroraEvent));
- return;
-}
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-// DO NOT REMOVE
-}
-
generated by cgit v1.2.3-60-g2f50 (git 2.42.0) at 2024-06-02 05:52:27 +0000