diff options
Diffstat (limited to 'npc/025-1/ctrl.c')
| -rw-r--r-- | npc/025-1/ctrl.c | 34 |
1 files changed, 32 insertions, 2 deletions
diff --git a/npc/025-1/ctrl.c b/npc/025-1/ctrl.c index d163986d4..50e7c23d6 100644 --- a/npc/025-1/ctrl.c +++ b/npc/025-1/ctrl.c @@ -415,9 +415,39 @@ OnInit: ///////////////////////////////////////////////////////// -// TODO: 100,20 - The Impregnable Fortress Gate -// And don't forget the curse timer +// The Impregnable Fortress Gate +025-1,99,20,0 script The Impregnable Fortress NPC_NO_SPRITE,3,1,{ + // Operation not permitted + if (!$FORTRESS_STATE || $@FORTRESS_STATUE) + end; + // Not unlocked + if ($GAME_STORYLINE >= 3 && $MK_TEMPVAR < MKIF_LV_0F) { + 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_0F), 1; + close; + } + mesc l("Visit the Impregnable Fortress, 0F?"); + mesc l("Minimum wins: %d/%d", $MK_TEMPVAR, MKIF_LV_0F); + if (askyesno() == ASK_YES) + warp "025-3", 100, 178; + closeclientdialog; + close; + +OnTouch: + // Operation not permitted + if (!$FORTRESS_STATE || $@FORTRESS_STATUE) + end; + // Not unlocked + if ($GAME_STORYLINE >= 3 && $MK_TEMPVAR < MKIF_LV_0F) + end; + warp "025-3", 100, 178; + end; +OnInit: + .distance=4; + end; +} ///////////////////////////////////////////////////////// |