Help里加入:
传送员.txt
我是别苑大总管.我可以帮你吗? copyright dedecms
关闭
返回
内容来自dedecms
『犀牛林』
『帝王陵』
『石棺洞』
『帝王石谷』
『狐狸洞』
『参善堂』
『极乐洞一馆』
『极乐洞二馆』
『石头山』
『关帝庙』
『双华店』
『太极剑门』 本文来自织梦
换东西.txt dedecms.com
可以用点数来换取物品
内容来自dedecms
关闭 copyright dedecms
换取「物品」
换取「武功秘籍」
换取「武器」
换取「装备」 dedecms.com
本文来自织梦
客服.txt
关闭
返回 dedecms.com
本总管理管理泡点服务!!我来自哈哈! 织梦好,好织梦
申请泡点服务 本文来自织梦
领取『点数』 织梦内容管理系统
『点数』换取物品 copyright dedecms
武功.txt
织梦好,好织梦
可以用点数来换取武功秘籍 织梦内容管理系统
关闭 copyright dedecms
用10点点数换取「兰花拂穴手」
用30点点数换取「风满长空」
用30点点数换取「吸星大法」
用30点点数换取「吸魂夺魄」
用30点点数换取「乾坤大挪移」
用30点点数换取「会心一击」
用30点点数换取「混天气功」 dedecms.com
织梦好,好织梦
武器.txt 织梦好,好织梦
可以用点数来换取武器
关闭 copyright dedecms
用50点点数换取「北海冰玉」
用30点点数换取「北海连环弓」
用25点点数换取「金丝斗甲」
用30点点数换取「无敌铁手」
用30点点数换取「百济玉女枪」
用30点点数换取「金鳞神剑」
用30点点数换取「花郎吟」
用30点点数换取「昆仑巨神斧」
dedecms.com
物品.txt
可以用点数来换取物品
copyright dedecms
关闭 织梦好,好织梦
用10点点数换取「真气珠(100点)」
用5点点数换取「千年山参」
用20点点数换取「太极明珠三」
用60点点数换取「玉露丸1000 」
用50点点数换取「5个生死梦幻丹」 dedecms.com
copyright dedecms
大总管.txt 织梦好,好织梦
关闭 织梦内容管理系统
『传送服务』
内容来自dedecms
『兑换真气』
织梦好,好织梦
『祝福系统』 织梦好,好织梦
『泡点客服』
copyright dedecms
真气.txt
内容来自dedecms
关闭 本文来自织梦
红色真珠兑换真气比例1:10;
绿色真珠兑换真气比例1:100;
蓝色真珠兑换真气比例1:1000; 织梦好,好织梦
红色真珠换真气
绿色真珠换真气 dedecms.com
蓝色真珠换真气
本文来自织梦
祝福.txt
dedecms.com
关闭 织梦好,好织梦
你想征婚伴侣格式如下:征婚
你想祝福别人格式如下:祝福 你的内容
你想恭喜别人格式如下:恭喜 你的内容
你想收购物品格式如下:收购 物品名称
你想出售物品格式如下:出售 物品名称
你想向人求婚格式如下:求婚 人物名称
你想追杀别人格式如下:追杀 人物名称
你想感谢别人格式如下:感谢 人物名称
你想向人道歉格式如下:道歉 人物名称
本文来自织梦
装备.txt dedecms.com
可以用点数来换取装备 织梦好,好织梦
关闭 织梦内容管理系统
用40点点数换取「女子花郎帽」
用40点点数换取「男子花郎帽」
用40点点数换取「女子花郎护腕」
用40点点数换取「男子花郎护腕」
用40点点数换取「女子花郎靴」
用40点点数换取「男子花郎靴」
用60点点数换取「女子花郎道袍」
用60点点数换取「男子花郎道袍」 内容来自dedecms
织梦好,好织梦
本文来自织梦
Init里加入 dedecms.com
Item.sdb:
证明书,证明书,36,申请泡点的证明书,,,,,,,,FALSE,213,,,,,,,,,,3000,3000,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,TRUE,TRUE,TRUE,TRUE,TRUE,800,,7,,,1,
泡点中,泡点中,36,泡点中,,,,,,,,FALSE,458,,,,,,,,,,3000,3000,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,TRUE,1440,6000,1,,,,TRUE,TRUE,TRUE,TRUE,TRUE,,,7,,,1,
点数,点数,5,泡点的点数,,,,,,,TRUE,FALSE,217,,,,,,,,1,,100,100,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,TRUE,TRUE,TRUE,,,,,,,,
真珠10,真珠,4,交换真气的凭证!可以交换10点真气,,,,,,,TRUE,FALSE,88,,,,,,5,,,,300,300,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,1000,
真珠100,真珠,4,交换真气的凭证!可以交换100点真气,,,,,,,TRUE,FALSE,88,,,,,,2,,,,3000,3000,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,100,
真珠1000,真珠,4,交换真气的凭证!可以交换1000点真气,,,,,,,TRUE,FALSE,88,,,,,,30,,,,30000,30000,,,,,4429,4828,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,10
织梦内容管理系统
Npc.sdb:
无忧大总管,大总管,0,,,TRUE,,,,,,,62,81,235,0,0,,,,20000,0,0,0,0,,4,,,,,,,,,,,,,,,TRUE, 织梦好,好织梦
copyright dedecms
Script里加入
Script.SDB:134,大总管.txt,,
大总管.txt
unit 大总管; 内容来自dedecms
interface 织梦内容管理系统
function GetToken(aStr, aToken, aSep: string): string;
function CompareStr(aStr1, aStr2: string): Boolean;
function callfunc(aText: string): string;
procedure print(aText: string);
function Random(aScope: integer): integer;
function Length(aText: string): integer;
procedure Inc(aInt: integer);
procedure Dec(aInt: integer);
function StrToInt(astr: string): integer;
function IntToStr(aInt: integer): string;
procedure exit; 织梦内容管理系统
procedure OnLeftClick(aStr: string);
procedure OnGetResult(aStr: string);
procedure OnHear(aStr: string); 内容来自dedecms
implementation dedecms.com
procedure OnLeftClick(aStr: string);
var
Str: string;
Race: Integer;
begin
Str := callfunc('getsenderrace');
Race := StrToInt(Str);
if Race = 1 then begin
print('showwindow .\help\大总管.txt 0');
exit;
end;
end;
procedure OnGetResult(aStr: string);
var
Str, Name: string;
begin
if aStr = 'close' then begin
exit;
end;
copyright dedecms
if aStr = 'chuansong' then begin
print('showwindow .\help\传送员.txt 0');
exit;
end; 织梦好,好织梦
Str := callfunc('getsenderitemexistence 钱币:10000');
if Str = 'false' then begin
print('say 钱币不足');
exit;
end;
if aStr = 'goroom1' then begin
print('getsenderitem 钱币:10000');
Name := callfunc('getsendername');
Str := 'movespace ' + Name;
Str := Str + ' user 1 744 585';
print(Str);
exit;
end;
if aStr = 'goroom2' then begin
print('getsenderitem 钱币:10000');
Name := callfunc('getsendername');
Str := 'movespace ' + Name;
Str := Str + ' user 3 38 62';
print(Str);
exit;
end;
if aStr = 'goroom3' then begin
print('getsenderitem 钱币:10000');
Name := callfunc('getsendername');
Str := 'movespace ' + Name;
Str := Str + ' user 31 33 33';
print(Str);
exit;
end;
if aStr = 'goroom4' then begin 内容来自dedecms
print('getsenderitem 钱币:10000');
Name := callfunc('getsendername');
Str := 'movespace ' + Name;
Str := Str + ' user 46 30 48';
print(Str);
exit;
end;
if aStr = 'goroom5' then begin
print('getsenderitem 钱币:10000');
Name := callfunc('getsendername');
Str := 'movespace ' + Name;
Str := Str + ' user 19 49 127';
print(Str);
exit;
end;
if aStr = 'goroom6' then begin
print('getsenderitem 钱币:10000');
Name := callfunc('getsendername');
Str := 'movespace ' + Name;
Str := Str + ' user 26 18 27';
print(Str);
exit;
end;
if aStr = 'goroom7' then begin
print('getsenderitem 钱币:10000'); dedecms.com
Name := callfunc('getsendername');
Str := 'movespace ' + Name;
Str := Str + ' user 27 54 54';
print(Str);
exit;
end;
if aStr = 'goroom8' then begin
print('getsenderitem 钱币:10000');
Name := callfunc('getsendername');
Str := 'movespace ' + Name;
Str := Str + ' user 28 54 54';
print(Str);
exit;
end;
if aStr = 'goroom9' then begin
print('getsenderitem 钱币:10000');
Name := callfunc('getsendername');
Str := 'movespace ' + Name;
Str := Str + ' user 1 745 201';
print(Str);
exit;
end;
if aStr = 'goroom10' then begin
print('getsenderitem 钱币:10000');
Name := callfunc('getsendername');
if aStr = 'zhenqi' then begin
print('showwindow .\help\真气.txt 0');
exit;
end;
内容来自dedecms
if aStr = 'jh10' then begin
Str := callfunc('getsenderitemexistence 真珠10:1');
if Str = 'false' then begin
print('say 没有红色真珠,不能增加真气!!');
exit;
end;
if Str = 'true' then begin
print('getsenderitem 真珠10:1');
print('addaddablestatepoint 10');
print('say 恭喜大侠!交换10点真气成功。');
exit;
end;
end;
本文来自织梦
if aStr = 'jh100' then begin
Str := callfunc('getsenderitemexistence 真珠100:1');
if Str = 'false' then begin
print('say 没有绿色真珠,不能增加真气!!');
exit;
end; 织梦内容管理系统
if Str = 'true' then begin
print('getsenderitem 真珠100:1');
print('addaddablestatepoint 100');
print('say 恭喜大侠!交换100点真气成功。');
exit;
end;
end; copyright dedecms
if aStr = 'jh1000' then begin
Str := callfunc('getsenderitemexistence 真珠1000:1');
if Str = 'false' then begin
print('say 没有蓝色真珠,不能增加真气!!');
exit;
end;
if Str = 'true' then begin
print('getsenderitem 真珠1000:1');
print('addaddablestatepoint 1000');
print('say 恭喜大侠!交换1000点真气成功。');
exit;
end;
end; 内容来自dedecms
if aStr = 'zhufu' then begin
print('showwindow .\help\祝福.txt 0');
exit;
end; dedecms.com
if aStr = 'paodian' then begin
print('showwindow .\help\客服.txt 0');
exit;
end;
copyright dedecms
if aStr = 'shenqing' then begin
Str := callfunc('getsenderitemexistence 金元:100');
if Str = 'false' then begin
print('say 你没有100个金元,不能申请');
exit;
end;
Str := callfunc('getsenderitemexistence 泡点中:1');
if Str = 'true' then begin
print('say 你已经申请了.');
exit;
end;
Str := callfunc('checkenoughspace 2');
if Str = 'false' then begin
print('say 你没袋子装咯~');
exit;
end;
print('getsenderitem 金元:100');
print('putsendermagicitem 泡点中:1 @客服 4');
print('putsendermagicitem 证明书:1 @客服 4'); 本文来自织梦
exit;
end;
if aStr = 'ling' then begin
Str := callfunc('getsenderitemexistence 证明书:1');
if Str = 'false' then begin
print('say 你还没申请呢!');
exit;
end;
Str := callfunc('getsenderitemexistence 泡点中:1');
if Str = 'true' then begin
print('say 你的泡点时间还没到。不能领点数');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 你没格子装咯~');
exit;
end;
print('getsenderitem 证明书:1');
print('putsendermagicitem 点数:30 @客服 4');
exit;
end; 内容来自dedecms
if aStr = 'huandx' then begin
print('showwindow .\help\换东西.txt 0');
exit;
end;
if aStr = 'wupin' then begin
print('showwindow .\help\物品.txt 0');
exit;
end;
if aStr = 'wugong' then begin
print('showwindow .\help\武功.txt 0');
exit;
end;
if aStr = 'wuqi' then begin
print('showwindow .\help\武器.txt 0');
exit;
end;
if aStr = 'zhuangbei' then begin
print('showwindow .\help\装备.txt 0');
exit;
end;
if aStr = 'wupin1' then begin
Str := callfunc('getsenderitemexistence 点数:10');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:10');
print('putsendermagicitem 真珠100 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
if aStr = 'wupin2' then begin
Str := callfunc('getsenderitemexistence 点数:5');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:5');
print('putsendermagicitem 千年山参 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; dedecms.com
if aStr = 'wupin3' then begin
Str := callfunc('getsenderitemexistence 点数:20');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:20');
print('putsendermagicitem 太极明珠三 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; 织梦好,好织梦
if aStr = 'wupin4' then begin
Str := callfunc('getsenderitemexistence 点数:60');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:60');
print('putsendermagicitem 玉露丸:1000 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
if aStr = 'wupin5' then begin
Str := callfunc('getsenderitemexistence 点数:50');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:50');
print('putsendermagicitem 生死梦幻丹:5 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; 内容来自dedecms
if aStr = 'wugong1' then begin
Str := callfunc('getsenderitemexistence 点数:10');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:10');
print('putsendermagicitem 兰花拂穴手 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; 织梦好,好织梦
if aStr = 'wugong2' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 风满长空 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; 本文来自织梦
if aStr = 'wugong3' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 吸星大法 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
织梦好,好织梦
if aStr = 'wugong4' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 吸魂夺魄 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
copyright dedecms
if aStr = 'wugong5' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 乾坤大挪移 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; 内容来自dedecms
if aStr = 'wugong6' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 会心一击 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
if aStr = 'wugong7' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 混天气功 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
if aStr = 'wuqi1' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 北海连环弓 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
dedecms.com
if aStr = 'wuqi2' then begin
Str := callfunc('getsenderitemexistence 点数:25');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:25');
print('putsendermagicitem 金丝斗甲 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
织梦内容管理系统
if aStr = 'wuqi3' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 无敌铁手 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
if aStr = 'wuqi4' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 百济玉女枪 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; 织梦内容管理系统
if aStr = 'wuqi5' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 金鳞神剑 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
if aStr = 'wuqi6' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 花郎吟 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; 本文来自织梦
if aStr = 'wuqi7' then begin
Str := callfunc('getsenderitemexistence 点数:30');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:30');
print('putsendermagicitem 昆仑巨神斧 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
织梦好,好织梦
if aStr = 'wuqi8' then begin
Str := callfunc('getsenderitemexistence 点数:50');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:50');
print('putsendermagicitem 北海冰玉 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; 内容来自dedecms
if aStr = 'zhuangbei1' then begin
Str := callfunc('getsenderitemexistence 点数:40');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:40');
print('putsendermagicitem 女子花郎帽 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
内容来自dedecms
if aStr = 'zhuangbei2' then begin
Str := callfunc('getsenderitemexistence 点数:40');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:40');
print('putsendermagicitem 男子花郎帽 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
dedecms.com
if aStr = 'zhuangbei3' then begin
Str := callfunc('getsenderitemexistence 点数:40');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:40');
print('putsendermagicitem 女子花郎护腕 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; 织梦好,好织梦
if aStr = 'zhuangbei4' then begin
Str := callfunc('getsenderitemexistence 点数:40');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:40');
print('putsendermagicitem 男子花郎护腕 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
if aStr = 'zhuangbei5' then begin
Str := callfunc('getsenderitemexistence 点数:40');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:40');
print('putsendermagicitem 女子花郎靴 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; 本文来自织梦
if aStr = 'zhuangbei6' then begin
Str := callfunc('getsenderitemexistence 点数:40');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:40');
print('putsendermagicitem 男子花郎靴 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
if aStr = 'zhuangbei7' then begin
Str := callfunc('getsenderitemexistence 点数:60');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:60');
print('putsendermagicitem 女子花郎道袍 @客服 4');
print('say 这个给你。。请保管好');
exit;
end; copyright dedecms
if aStr = 'zhuangbei8' then begin
Str := callfunc('getsenderitemexistence 点数:60');
if Str = 'false' then begin
print('say 你的点数不够....');
exit;
end;
Str := callfunc('checkenoughspace');
if Str = 'false' then begin
print('say 包包满哩~');
exit;
end;
print('getsenderitem 点数:60');
print('putsendermagicitem 男子花郎道袍 @客服 4');
print('say 这个给你。。请保管好');
exit;
end;
织梦内容管理系统
if aStr = 'fanhui' then begin
print('showwindow .\help\大总管.txt 0');
exit;
end;
end; 内容来自dedecms
procedure OnHear(aStr: string);
var
Str, Name, StrA, StrB,StrC: string;
n: Integer;
begin
Str := GetToken(astr, StrA, '_');
Str := GetToken(Str, StrB, '_');
Name := callfunc('getsendername');
StrC := 'sendsendertopmsg ' + Name;
if StrA = '祝福' then begin
Str := callfunc('getsenderitemexistence 金元:100');
if Str = 'false' then begin
print('sendsenderchatmessage 没钱就不要喊吗,真是的。');
exit;
end;
print('getsenderitem 金元:100');
Str := StrC + ' 祝福【';
Str := Str + StrB;
Str := Str + '】';
print(Str);
exit;
end;
if StrA = '恭喜' then begin
Str := callfunc('getsenderitemexistence 金元:100');
if Str = 'false' then begin copyright dedecms
print('sendsenderchatmessage 没钱就不要喊吗,真是的。');
exit;
end;
print('getsenderitem 金元:100');
Str := StrC + ' 恭喜【';
Str := Str + StrB;
Str := Str + '】';
print(Str);
exit;
end;
if StrA = '收购' then begin
Str := callfunc('getsenderitemexistence 金元:100');
if Str = 'false' then begin
print('sendsenderchatmessage 没钱就不要喊吗,真是的。');
exit;
end;
print('getsenderitem 金元:100');
Str := StrC + ' 正在收购【';
Str := Str + StrB;
Str := Str + '】,有的快@@@@@死他';
print(Str); 织梦内容管理系统
exit;
end;
if StrA = '出售' then begin
Str := callfunc('getsenderitemexistence 金元:100');
if Str = 'false' then begin
print('sendsenderchatmessage 没钱就不要喊吗,真是的。');
exit;
end;
print('getsenderitem 金元:100');
Str := StrC + ' 正在出售【';
Str := Str + StrB;
Str := Str + '】,有要快@@@@@死他';
print(Str);
exit;
end;
if StrA = '求婚' then begin
Str := callfunc('getsenderitemexistence 金元:100');
if Str = 'false' then begin
print('sendsenderchatmessage 没钱就不要喊吗,真是的。');
exit;
end;
print('getsenderitem 金元:100');
内容来自dedecms
Setting里加入
CreateNpc1.sdb:1,大总管,517,460,1,1,134,, 织梦好,好织梦
四大功能集合于一体
dedecms.com
1.76精品传奇_1.76天下毁灭_1.76复古传奇_英雄合击_中变靓装传奇_无忧传奇
传奇花屏补丁,花屏补丁,土城花屏补丁,盟重土城花屏补丁下载,土城花屏补丁下载,沙巴克花屏补丁,传奇土城花屏补丁下载
网站每天发布最新、最好的传奇版本下载和与传奇服务端配套开区传奇模版,网游技术教程全部免费下载!
无忧网络是目前唯一家所有的传奇服务端,传奇私服花屏补丁,盟重花屏补丁和传奇客户端下载都经过站长亲自测试并配有真实测试图!
所有的工具软件和传奇版本在发布之前,都会经过站长亲自测试,保证chuanqisf可以进入游戏,所有软件都无毒无插件!
本站声明:本站所有技术资料与下载资源均为网络搜集整理,并不代表本站的观点与立场,如有侵犯您的权益,请来信指出,本站将立即改正Copyright © 2002-2014 无忧网络 版权所有蜀ICP备09041899号