diff options
| -rw-r--r-- | npc/026-3/ctrl.c | 3 | ||||
| -rw-r--r-- | npc/026-4/ctrl.c | 1 | ||||
| -rw-r--r-- | npc/026-5/ctrl.c | 119 |
3 files changed, 120 insertions, 3 deletions
diff --git a/npc/026-3/ctrl.c b/npc/026-3/ctrl.c index 10d0c8787..4ecacfa93 100644 --- a/npc/026-3/ctrl.c +++ b/npc/026-3/ctrl.c @@ -73,8 +73,7 @@ OnInit: } -// TODO: Miller system (otherwise, you can't reach the switches & platforms) - +// Miller system (otherwise, you can't reach the switches & platforms) 026-3,21,69,0 script #0263WA+ NPC_FANCY_CIRCLE,0,0,{ end; OnTouch: diff --git a/npc/026-4/ctrl.c b/npc/026-4/ctrl.c index a81192025..424f1b8cc 100644 --- a/npc/026-4/ctrl.c +++ b/npc/026-4/ctrl.c @@ -70,6 +70,7 @@ function _moveNpc { } + // The switches main code 000-0,0,0,0, script #026-4Switch_1 NPC_SWITCH_OFFLINE,{ // Retrieve my own metadata diff --git a/npc/026-5/ctrl.c b/npc/026-5/ctrl.c index 24a204ad1..cf1dcc910 100644 --- a/npc/026-5/ctrl.c +++ b/npc/026-5/ctrl.c @@ -9,6 +9,7 @@ // This script must set 026-5 up on init, and refresh it when needed // This one also contains a blackbox - script Impregnable#B5F NPC_HIDDEN,{ + function _moveNpc; end; // On Tuesday, the map changes @@ -30,7 +31,123 @@ OnInit: debugmes "Impregnable Fortress B5F (%d): Init OK", .InstId; MazeMobs(145, false, 7, "026-5"); // Initiate Lv 145 mobs setmapflag("026-5", mf_zone, "SuperMMO"); - // TODO: Add the utilities + end; + +OnClock1843: + if (!.InstId) end; + // Movement will need to happen here (daily modifications) + // We need however to validate the coordinates they're jumping to... + _moveNpc("026-5"); + unitwarp(getnpcid("#026-5Switch_1"), "026-5", .npc_x, .npc_y); + _moveNpc("026-5"); + unitwarp(getnpcid("#026-5Switch_2"), "026-5", .npc_x, .npc_y); + _moveNpc("026-5"); + unitwarp(getnpcid("#026-5Switch_3"), "026-5", .npc_x, .npc_y); + _moveNpc("026-5"); + unitwarp(getnpcid("#026-5Switch_4"), "026-5", .npc_x, .npc_y); + _moveNpc("026-5"); + unitwarp(getnpcid("#026-5Switch_5"), "026-5", .npc_x, .npc_y); + _moveNpc("026-5"); + unitwarp(getnpcid("#026-5Gate"), "026-5", .npc_x, .npc_y); + end; + +function _moveNpc { + // Try to warp randomly, up to 30 attempts + .@e=0; + .@mx=getmapinfo(MAPINFO_SIZE_X, getarg(0))-20; + .@my=getmapinfo(MAPINFO_SIZE_Y, getarg(0))-20; + do { + if (.@e >= 30) + break; + .npc_x = rand2(20, .@mx); + .npc_y = rand2(20, .@my); + .@e+=1; + } while (!checknpccell(getarg(0), .npc_x, .npc_y, cell_chkpass)); + return; +} // _moveNpc + +} +// The switches main code +000-0,0,0,0, script #026-5Switch_1 NPC_SWITCH_OFFLINE,{ + // Retrieve my own metadata + .@n$=strnpcinfo(0, "_0"); + explode(.@ni$, .@n$, "_"); + .@id=atoi(.@ni$[1]); + .@bit = (2 ** (.@id - 1)); + // Do not react if already done + if (getq(General_Fortress) != 6) + end; + // If already flipped, then don't do pointless things + if (getq2(General_Fortress) & .@bit) { + dispbottom l("I already flipped this switch, no point flipping it again."); + end; + } + // After used by someone, can't be used by others for ~30 seconds + if (getnpcclass() == NPC_SWITCH_ONLINE) + end; + // The Riddled Switch: Assign random question (Miller + char ID + Switch ID) + // Maze mobs should count (and qualify for mob points) + // All target mobs should be Lv 100+ + .@minKills = 10; + mesn l("The Riddled Switch"); + mes l("Our master respects %s, so those whom wish to meet him, the following shall they prove:", b(l("knowledge"))); + // Blackbox will question and validate the answer + if (!0235_Riddle_BlackBox(.@id)) + close; + next; + // Mark this switch as done + setq2 General_Fortress, getq2(General_Fortress) | .@bit; + dispbottom l("You hear a *clank*, it must have worked."); + // Check if this was the last switch + if (getq2(General_Fortress) == 31) { + dispbottom l("This was the last one of them. Now to find the door..."); + setq General_Fortress, 7, 0, 0; + specialeffect(FX_MGWARP, SELF, getcharid(3)); + } + // Final decorators + closeclientdialog; + setnpcdisplay .name$, NPC_SWITCH_ONLINE; + sleep(30000); // Detach the player (instead of sleep2) + setnpcdisplay .name$, NPC_SWITCH_OFFLINE; + end; +OnInit: + .distance=3; + end; +} + +000-0,0,0,0 duplicate(#026-5Switch_1) #026-5Switch_2 NPC_SWITCH_OFFLINE +000-0,0,0,0 duplicate(#026-5Switch_1) #026-5Switch_3 NPC_SWITCH_OFFLINE +000-0,0,0,0 duplicate(#026-5Switch_1) #026-5Switch_4 NPC_SWITCH_OFFLINE +000-0,0,0,0 duplicate(#026-5Switch_1) #026-5Switch_5 NPC_SWITCH_OFFLINE + +// The main NPC which lets you out of here +000-0,0,0,0, script #026-5Gate NPC_ICE_CAGE,0,0,{ + if (getq(General_Fortress) > 6) goto L_Warp; + dispbottom l("After flipping all %s switches, I should go there.", l("five")); + end; +OnTouch: + if (getq(General_Fortress) > 6) goto L_Warp; + mesc l(".:: Impregnable Fortress, %sF ::.", "B5"), 3; + msObjective(getq(General_Fortress) == 7, l("* Flip all five switches")); + msObjective($MK_TEMPVAR >= MKIF_LV_B6F, l("Minimum wins: %d/%d", $MK_TEMPVAR, MKIF_LV_B6F)); + mes ""; + mesc l("Hint: The Riddled Switches."); + close; + +L_Warp: + // Not unlocked + if ($GAME_STORYLINE >= 3 && $MK_TEMPVAR < MKIF_LV_B6F) { + mesc l("The gate is sealed shut."), 1; + mesc l("The monster army is still strong on this floor!"), 1; + mesc l("Minimum wins: %d/%d", $MK_TEMPVAR, MKIF_LV_B6F), 1; + close; + } + //warp "026-6", X, Y; // TODO: These coords actually NOT OK + dispbottom l("Coming Soon, in Moubootaur Legends!"); + end; + +OnInit: + .distance=3; end; } |