npc.sdb 同 item 为资料数据库,不起关键作用 但后边涉及人物没有,就会出问题,即便设错也不会出现内存地址错误不能启动问题。假如启动时出现内存地址道错误,建议先从其他几项中查错。 dedecms.com
1,,tgs1000\Init\Npc.sdb 渔村捕盗大将 ★help中 渔村捕盗大将.txt
代码:渔村捕盗大将,捕盗大将,0,,渔村捕盗大将.txt,TRUE,,TRUE,TRUE,,,TRUE,13,23,181,700,200,,,,7500,0,0,0,0,,4,,4020,4023,,4022,,,,白龙手套:1:50:雕火龙套:1:30,,,,,,,,
2,,tgs1000\Help\渔村捕盗大将.txt(买卖拜师) NPC交易内容 并在\NpcSetting 中加入 渔村捕盗大将.txt
3,,tgs1000\Script\Script.sdb 调用外形,序号调用(179) NPC交易选项Script.SDB/179,渔村捕盗大将.txt,,
4,,tgs1000\Script\渔村捕盗大将.txt NPC活动方式 修改语句,交易内容
5,,tgs1000\Setting\CreateNpc0.sdb(179,渔村捕盗大将.txt,,) 位置 24,渔村捕盗大将,283,271,1,3,179,,
6,,tgs1000\NpcSetting 可以加入任何已有物品,自动获取价格 NpcSetting删除也不会出错误
7,,tgs1000\Init\Item.sdb 包含物品
1,,tgs1000\Init\Npc.sdb ★,,(渔村捕盗大将).txt,TRUE,
渔村捕盗大将,捕盗大将,0,,渔村捕盗大将.txt,TRUE,,TRUE,TRUE,,,TRUE,13,23,181,700,200,,,,7500,0,0,0,0,,4,,4020,4023,,4022,,,,白龙手套:1:50:雕火龙套:1:30,,,,,,,, 织梦内容管理系统
2,,tgs1000\Help\渔村白捕校.txt
<trade>
<title>捕盗大将</title>
<image name=z23 value=181>
<text>
出售拳法武功密笈。
</text>
<command send='close'>关闭</command>
<command send="buy">出售物品</command> 对应Script\渔村捕盗大将.txt 中 'buy' then begin \NpcSetting 渔村捕盗大将.txt 中 SELLTITLE:渔村捕盗大将
<command send="sell">买拳法密笈</command> 对应Script\渔村捕盗大将.txt 中 'sell' then begin \NpcSetting BUYTITLE:渔村捕盗大将
<command send="baishi">申请拜师</command>
</trade>
dedecms.com
3,,tgs1000\Setting\CreateNpc0.sdb
内容:24,渔村捕盗大将,283,271,1,3,179,, dedecms.com
4,,tgs1000\Script\Script.sdb
Script.sdb内容:179,渔村捕盗大将.txt,,
5,,tgs1000\Script\渔村捕盗大将.txt
unit 捕盗大将;
本文来自织梦
interface
dedecms.com
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 OnGetResult (aStr : String);
procedure OnLeftClick (aStr : String);
本文来自织梦
implementation 织梦内容管理系统
procedure OnLeftClick (aStr : String);
var
Str : String;
Race : Integer;
begin
Str := callfunc ('getsenderrace');
Race := StrToInt (Str);
if Race = 1 then begin
Str := 'showwindow .\help\渔村捕盗大将.txt 1';
print (Str);
exit;
end;
end;
procedure OnGetResult (aStr : String);
var
Str, Name : String;
begin
if aStr = 'close' then begin
exit;
end;
if aStr = 'sell' then begin
Name := callfunc ('getsendername');
Str := 'tradewindow ' + Name;
Str := Str + ' 0';
print (Str);
exit;
end;
if aStr = 'buy' then begin
Name := callfunc ('getsendername');
Str := 'tradewindow ' + Name;
Str := Str + ' 1';
print (Str);
exit;
end;
if aStr = 'baishi' then begin
Str := callfunc ('getsenderitemexistence 拜师申请书:1');
if Str = 'false' then begin
Str := 'getsenderitem 拜师申请书:1';
print (Str);
Str := 'putsendermagicitem 无影脚:1 @渔村捕盗大将 4';
print (Str);
Str := 'putsendermagicitem 旋风脚:1 @渔村捕盗大将 4';
print (Str);
Str := 'putsendermagicitem 骨架击:1 @渔村捕盗大将 4';
print (Str);
Str := 'putsendermagicitem 少林长拳:1 @渔村捕盗大将 4';
print (Str);
织梦好,好织梦
织梦好,好织梦
end. 内容来自dedecms
6,,tgs1000\NpcSetting 可以加入任何已有物品,自动获取价格
注意:SELLTITLE:渔村捕盗大将,为引用名
渔村捕盗大将.txt中SELLIMAGE:181 = Help\渔村白捕校.txt 中 value=181(注:这是捕盗大将特有的,和别的NPC一定要区分)
SELLTITLE:渔村捕盗大将
SELLCAPTION:出售拳法武功密笈.
SELLIMAGE:181
SELLITEM:无影脚
SELLITEM:旋风脚
SELLITEM:太极拳
SELLITEM:骨架击
SELLITEM:少林长拳
SELLITEM:如来金刚拳
BUYTITLE:渔村捕盗大将
BUYCAPTION:有东西要出售吗?
BUYIMAGE:181
BUYITEM:九法手套1
BUYITEM:九法手套2
BUYITEM:青龙手套
BUYITEM:擒拿手
BUYITEM:轰岩手套
BUYITEM:黄金手套
BUYITEM:白龙手套
BUYITEM:黑龙手套
BUYITEM:雕火龙套
本文来自织梦
7,,tgs1000\Init\Item.sdb
Item 中包含上列物品
1.76精品传奇_1.76天下毁灭_1.76复古传奇_英雄合击_中变靓装传奇_无忧传奇
传奇花屏补丁,花屏补丁,土城花屏补丁,盟重土城花屏补丁下载,土城花屏补丁下载,沙巴克花屏补丁,传奇土城花屏补丁下载
网站每天发布最新、最好的传奇版本下载和与传奇服务端配套开区传奇模版,网游技术教程全部免费下载!
无忧网络是目前唯一家所有的传奇服务端,传奇私服花屏补丁,盟重花屏补丁和传奇客户端下载都经过站长亲自测试并配有真实测试图!
所有的工具软件和传奇版本在发布之前,都会经过站长亲自测试,保证chuanqisf可以进入游戏,所有软件都无毒无插件!
本站声明:本站所有技术资料与下载资源均为网络搜集整理,并不代表本站的观点与立场,如有侵犯您的权益,请来信指出,本站将立即改正Copyright © 2002-2014 无忧网络 版权所有蜀ICP备09041899号