procedure TBaseObject.DamageSpell(nSpellPoint: Integer); //004BE50C
begin
if nSpellPoint > 0 then begin
if (m_WAbil.MP - nSpellPoint) > 0 then
Dec(m_WAbil.MP,nSpellPoint)
else m_WAbil.MP:=0;
end else begin
if (m_WAbil.MP - nSpellPoint) < m_WAbil.MaxMP then
Dec(m_WAbil.MP,nSpellPoint)
else m_WAbil.MP:=m_WAbil.MaxMP;
end;
end;
if (nSpellPoint > 0) and (m_Master<>nil) then begin
if m_Master.m_WAbil.MP >0 then begin
m_Master.DamageSpell(nSpellPoint); //减少蓝血
m_Master.HealthSpellChanged();
end else wHitMode:=RM_HIT;
end;
if( m_btRaceServer = RC_YSBJE