将　以下代码　替换　原　模拟器　scripts目录下的　startup.tcl　中　那段代码
可以防止　玩家利用npc　来练级 

proc DamageReduction { player mob armor } {
  
      set flags [GetNpcflags $mob]  # 此处是　获得被玩家伤害的对象的npcflags参数
      if {$flags>0} {return -10000}　#如果　npcflags>0 也就是说　对象是npc　则给玩家10000伤害系数　具体实际伤害是多少　还与　伤害对象的原来的damage有关
        set level [GetLevel $mob]
        set denominator [expr {($level *85.0) +400.0 +$armor}]
        set damage_reduction [expr { $armor /$denominator}]
        if {$damage_reduction <0.0} { set damage_reduction 0.0 }
        if {$damage_reduction >1.0} { set damage_reduction 1.0 }
        return $damage_reduction
    }

代码的缺陷是　　低等级的NPC　可能　来不及还手　杀玩家