diff options
Diffstat (limited to 'npc')
-rw-r--r-- | npc/014-4/kamelot.txt | 57 | ||||
-rw-r--r-- | npc/042-2/boss.txt | 1 |
2 files changed, 58 insertions, 0 deletions
diff --git a/npc/014-4/kamelot.txt b/npc/014-4/kamelot.txt index a233be4da..b075ad165 100644 --- a/npc/014-4/kamelot.txt +++ b/npc/014-4/kamelot.txt @@ -113,5 +113,62 @@ OnTouch: if (is_admin()) warp "042-0@"+.@g, any(59, 60), 80; end; + +// Debug is only allowed if server is in override mode +OnDebug: + if (!$@GM_OVERRIDE) end; + .@g=getcharid(2); + if (.@g < 1) end; + mes "Kamelot Debug"; + select + l("Abort"), + l("Reset"), + l("Reset & Destroy"), + l("Quest: Skip Weapons Room"), + l("Quest: Skip Krukan fight"), + "", + "", + "", + "", + l("Warp: Jump to Entrance"), // 10 + l("Warp: Jump to Weapon Room"), + l("Warp: Jump to Basement"), + l("Warp: Jump to Jail"); + mes ""; + switch (@menu) { + case 2: + KamelotCleanup(.@g); + break; + case 3: + instance_destroy($@KAMELOT_ID[.@g]); + KamelotCleanup(.@g); + break; + case 4: + $KAMELOT_KEYMASK[.@g]=$KAMELOT_KEYMASK[.@g]|16; + break; + case 5: + // FIXME: Can a variable really be named "$@GTEMP_042-2@10"? + .@m$=("042-2@"+.@g); + setd("$@GTEMP_"+.@m$, 0); + setd("$@GTEMP_HP_"+.@m$, 0); + setd("$@GTEMP_PC_"+.@m$, 0); + setd("$@GTEMP_MX_"+.@m$, 0); + $KAMELOT_QUEST[.@g]=$KAMELOT_QUEST[.@g]|4; + mes "WARNING: This skips jail as well."; + break; + case 10: + warp "042-0@"+.@g, 60, 40; break; + case 11: + warp "042-1@"+.@g, 40, 65; break; + case 12: + warp "042-2@"+.@g, 44, 45; break; + case 13: + warp "042-3@"+.@g, 60, 130; break; + } + close; + +OnInit: + bindatcmd "kamelotdebug", "#KamelotEnter::OnDebug", 99, 100, 1; + end; } diff --git a/npc/042-2/boss.txt b/npc/042-2/boss.txt index 7681afc0c..7a3ef4599 100644 --- a/npc/042-2/boss.txt +++ b/npc/042-2/boss.txt @@ -190,6 +190,7 @@ OnKillMob: end; OnKillBoss: + .@m$=instance_mapname("042-2"); setd("$@GTEMP_"+.@m$, 0); setd("$@GTEMP_HP_"+.@m$, 0); setd("$@GTEMP_PC_"+.@m$, 0); |