如何读写个人变量、行会变量及全局变量

procedure Main(Npc: TNormNPC; Player: TPlayObject; Args: TArgs);

begin

//个人变量读写

if Player.VarDateTime(‘最后登陆时间’).AsDateTime < Now then //如果最后登陆时间小于当前系统时间

begin

Player.VarDateTime(‘最后登陆时间’).AsDateTime := Now; //将最后登陆时间置为当前时间

Player.VarDateTime(‘最后登陆时间’).Save; //保存

end;

Player.VarString(‘黄金黑店元宝刷新累计’).AsInteger := Player.VarString(‘黄金黑店元宝刷新累计’).AsInteger + 100;

Player.VarString(‘黄金黑店元宝刷新累计’).Save;

//行会变量读写

if Player.Guild <> nil then

begin

Player.Guild.VarInteger(‘帮会资金’).AsInteger := Player.Guild.VarInteger(‘帮会资金’).AsInteger + 10000; //帮会变量”帮会资金”增加

Player.Guild.VarInteger(‘帮会资金’).Save; //保存

end;

//系统变量读写

Gamelib.VarString(‘天下第一战’).AsString := ‘CC’;

Gamelib.VarString(‘天下第一战’).Save;

//声明变量但不保存,则该变量只在M2运行期有效

Gamelib.VarString(‘临时变量’).AsString := ‘xxxx’; //该变量不调用Save函数将不会被保存到文件

end;

注:所有的变量不需要特殊声明,使用的时候不需要判断变量是否存在,变量的原则是使用就有没使用就没有,变量赋值后如果不调用Save函数,则变量不会被更新到文件,但是其值在M2运行期是有效的

声明:本站所有文章,如无特殊说明或标注,均为本站原创发布。任何个人或组织,在未征得本站同意时,禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。