千年新章服务端步法特效跟随人物方向修正方法

用delphi7 打开CharCls.pas文件

1、Ctrl + F查找“TBgEffect = class”

在 private 添加两个变量：

  Realdir : integer;

  ii : integer;

2、查找procedure TBgEffect.Paint(aRealx, aRealy, adir: integer);

在begin添加：

  if Realdir <> adir then begin

        Realdir := adir ;

  end;

3、查找procedure TBgEffect.SetFrame(CurTick: integer);