fix(pkuxkx): 修复万安塔进入时没有战斗标志的问题

mud/pkuxkx/plugins/basic/char/gmcp.tin

@@ -187,13 +187,7 @@ event.Define {char/nofight} {无参} {$MODULE} {角色脱离战斗};
         event.Emit char/hpbrief;
     };
 
-    #if     { $hasScore }           {event.Emit char/score};
-
-    #if     { "$busy" == "true" }   {event.Emit char/busy};
-    #elseif { "$busy" == "false" }  {event.Emit char/nobusy};
-
-    #if     { "$fight" == "true" }  {event.Emit char/fight};
-    #elseif { "$fight" == "false" } {event.Emit char/nofight};
+    #if { $hasScore } {event.Emit char/score};
 };
 
 #action {^GMCP 频道收听汇总：$E} {

mud/pkuxkx/plugins/basic/char/hp.tin

@@ -633,7 +633,7 @@ hp -neili 格式：
 // ## char.MarkFight <布尔值>
 //    设置角色的战斗状态。
 // };
-#alias {char.MarkFight} {char.set-flag 战斗中 false};
+#alias {char.MarkFight} {char.set-flag 战斗中 true};
 
 ///=== {
 // ## char.UnmarkFight <布尔值>

mud/pkuxkx/plugins/basic/map/dungeon.tin

@@ -21,6 +21,8 @@ event.HandleOnce {map/init} {map/dungeon} {map} {map.Dungeon.Init};
 #alias {map.EnterDungeon.notice} {
     #if { "%1" == "idle" } {
         warnLog 你来到了「$gCurrentDungeon」，你不忙。;
+        #nop 万安塔进入的时候会丢失 GMCP 战斗标志。;
+        #if { "$gCurrentDungeon" == "万安塔" } {char.MarkFight};
     };
     #else {
         warnLog 你来到了「$gCurrentDungeon」。;