传奇部落

DBC2000 通区检测重名 + 自动改名脚本制作教程

[复制链接]
发表于 2026-5-25 19:41:22 | 显示全部楼层 |阅读模式
检测内容分两个部分一个新登录时名字没有其他人使用,就记录下来名字账号和所有在区服正常游戏,二是检测到有相同名字后且不是相同区服和相同ID时,就要弹出改名NPC改名后正常游戏
% h; I/ K5 c! e$ j8 ]: [如果引擎没有使用通用数据库作为账号数据而是使用DBC2000这个脚本就可以用。
) n2 T% v! S. @$ q& P如果引擎使用通用数据库如MSSQL MYSQL等S/C模式的数据库可以让其他IP存取数据就不需要这个脚本。
1 D! D% S, r. n这个脚本原本不需要但是某些引擎在合区时发现无限制仓库在遇到两个相同名字时会丢失一个角色的仓库数据$ _$ q9 S9 V5 Q% p
这个脚本可以在玩家登录后检测名字是否与其他区的玩家重复
7 Y" P$ |' h% k然后改名来确保无限制仓库在合区时不出现BUG。如果引擎没这个问题这个脚本无意义。
; `5 y( i2 g5 T5 z2 p& c  M: [6 p
2 |8 N2 _, w7 N
: Y& [5 y- }$ a' E) b8 e' ~
[@名称检测]+ P, S  a* C7 Q$ H# B
{
/ G* y+ ]+ k  A3 t' S+ g#IF! M4 D4 Z# A" G+ }
NOT checknamelist ..\..\..\同名检测\游戏名称表.txt
/ D2 h4 U% h7 r2 i3 L2 {#ACT;
( N: h. I9 ?' d& W! k) faddnamelist ..\..\..\同名检测\游戏名称表.txt, R* j* t2 V2 B% r9 @
AddTextListEx ..\..\..\同名检测\游戏ID号.txt <$USERNAME>:<$USERID>:<$SERVERNAME>:X1 e% h# c5 F, |* Y, N' y' c
BREAK( g/ Z' f6 L& ?

: G6 g) f2 H0 x

- y+ f% A' E; ?#IF' |* _8 H' y5 F0 W
checknamelist ..\..\..\同名检测\游戏名称表.txt
* W% }" I9 ]0 h3 j3 F' x#ACT8 Q, u+ }8 J7 \
MOV S90 <$USERNAME>:<$USERID>:<$SERVERNAME>:X- y  K) x5 u6 P; S2 z% d/ u
5 {3 X; d* e+ c

/ e) j0 A$ I! S$ E#IF7 i; P9 s1 i% g. g3 K  p4 u
checknamelist ..\..\..\同名检测\游戏名称表.txt
7 H7 M7 d2 r; iNOT CheckTextList ..\..\..\同名检测\游戏ID号.txt <$STR(S90)>
/ p; k$ _; Q% u. R5 w( `8 T#ACT; z, z& {& D0 E3 N
;这里加锁定脚本,可以限制玩家移动来强制玩家改名============
9 d; O! F5 d! o* D#SAY/ L# p' e, r& L5 _1 p: K4 [' F
< >\   \6 [9 O8 a* e+ v% y6 j/ |2 M
游戏中名字应该是唯一,你的名字已经有人使用了<!!!!>\  \
6 W' {% j: _2 }- Q& Z1 s" S  o<输入修改名字/@@InPutString6>\\' M% ]8 C2 u, g7 i  @) S7 G
9 Z8 o3 v  [/ ^) Z) q* |

+ P0 W7 }4 B, u! V[@InPutString6]
; k/ l$ E9 y7 A! A2 {# h& k#IF
( K, K! I: N* Q+ iNOT CheckTextList  ..\..\..\同名检测\游戏名称表.txt <$STR(S6)>
1 }8 j. Z% I, N( ^. q3 S#ACT
) ?2 Y( J2 q+ w, n;角色名称<$username>修改为<$str(s6)>; Z, ]& l0 V4 S& H/ U
CHANGEHUMNAME <$username> <$str(s6)>
1 Q. O5 j* |; h$ E7 Iaddnamelist ..\..\..\同名检测\游戏名称表.txt
( J7 Y- H- Y% b- L3 {4 jAddTextListEx ..\..\..\同名检测\游戏ID号.txt <$USERNAME>:<$USERID>:<$SERVERNAME>:X  K; o: l" k8 }# R* }
;添加解除锁定脚本,玩家正常游戏==============
0 V1 k5 D% e) }7 L1 ~# \! B7 xBREAK% D4 S" B8 \5 V" M
. C& T+ F1 c, h
5 I, ~& E+ `* C! F
#IF- o! m) _% A- S7 S3 ]3 ^  L
CheckTextList  ..\..\..\同名检测\游戏名称表.txt <$STR(S6)>! x9 G. Y$ k. r3 g, E; u
#SAY2 Z2 M1 X+ Q; s3 f$ v
\  \( Y1 N  y9 Z1 t( l* g6 N" s
【<$str(s6)>】已经被人使用了!!!!!\  \
$ a, [6 I, R* `" Z1 b* \& z# i<重新输入新名字/@@InPutString6>\\; M: n& T- U$ O
7 [# L: Q- m0 c3 c, C5 h
3 s0 S+ ^( q3 ~" |, \( K
[@ChangeHumNameOK]; ^) y) z+ E! X5 ]  Z
#act8 O0 v7 A. H. I$ I+ Z! h1 Q
SENDMSG 0 【名字修改成功】
7 n* h/ p2 u( _" Q3 g9 RCLOSE+ }. g4 U, l% I6 i$ S
;CLOSE可以关闭NPC
+ O2 d; D- _9 v+ F4 f1 G+ `6 n[@ChangeHumNameFail]
: L! O+ f$ |! h#act
+ r1 x' N5 z' r$ z$ LSENDMSG 0 名字修改失败  P7 ?% i: L& e! M0 P
}/ C) V3 f6 l$ _$ ]5 g# R

+ L. \4 d5 p2 n# W( _7 U

7 I, ~) Y. ?- v4 V6 c===改为单文件检测==================================
1 s! T1 i9 S( ]+ w8 G% l) W[@名称检测]( t0 K  m) U0 b+ U) H! b! u& C
{
$ X/ X8 ^0 O2 D2 X& s4 s) q#IF
$ }( v6 ?. F; X( ENOT CheckTextList ..\..\..\同名检测\游戏ID号.txt <$USERNAME>
: m" _' K% l+ ~6 G#ACT. H- ~' I+ ^4 h
AddTextListEx ..\..\..\同名检测\游戏ID号.txt <$USERNAME>:<$USERID>:<$SERVERNAME>:X3 Y) n' x2 h) m! [( m
BREAK
. }/ W6 a6 H# @$ ~) [2 Y3 }& z4 O3 {( _8 y# D3 U! h
7 B* Z% \) x  H& l9 j3 d6 R
#IF) w$ o: r+ A, ]  Z
;检测到有这个名字,但不是在同个服务区和ID时,要改名。如果有相同ID和区,就正常游戏
+ z" j! R4 G8 `& v( [( bCheckTextList ..\..\..\同名检测\游戏ID号.txt <$USERNAME>
8 b6 c- o7 |! A* D# ?- @2 ?NOT CheckTextList ..\..\..\同名检测\游戏ID号.txt <$USERNAME>:<$USERID>:<$SERVERNAME>:X
6 a- D2 W6 n& J5 A) l! D7 E9 ~( Y( `: p#ACT
. K, D( H' F/ s4 ^+ A- y+ s;这里加锁定脚本,可以限制玩家移动来强制玩家改名============
, o* O% E! q7 p8 R& W  i#SAY% \) F& Q, H6 |" S. ?
< >\   \
6 u0 d+ o" c4 _9 ^8 I游戏中名字应该是唯一,你的名字已经有人使用了<!!!!>\  \! J  j: V5 f: Y) L& Z' C, ~. t
<输入修改名字/@@InPutString6>\\
) Y8 \8 O" m, p, ~
% N7 w5 x" }# S8 b5 V3 }) Q/ S' Q

# @0 f  s4 u: Q[@InPutString6]9 B! Y! \) G% b3 y  F1 E7 z  s5 [/ z
#IF$ E* j9 ?9 ^5 q' X0 r4 G
NOT CheckTextList  ..\..\..\同名检测\游戏ID号.txt <$STR(S6)>
7 t) v$ B* v! I. R#ACT
1 O' E$ S1 g  n: k& w6 p2 h;角色名称<$username>修改为<$str(s6)>6 H  G6 w4 G) b% L1 l" f
CHANGEHUMNAME <$username> <$str(s6)>+ J! n7 E! g9 o# ]
AddTextListEx ..\..\..\同名检测\游戏ID号.txt <$USERNAME>:<$USERID>:<$SERVERNAME>:X
. j- P* Y: [8 ~8 `% b;添加解除锁定脚本,玩家正常游戏==============
' M8 I% o8 l7 ]BREAK
$ c" U& d' y4 N+ t) v4 H" [- O; K5 D' A6 P

9 Q# m9 x1 e/ j6 S( a1 @. @1 A* B& J#IF
. J( I6 b6 `) u3 {, b# xCheckTextList  ..\..\..\同名检测\游戏名称表.txt <$STR(S6)>& j5 U8 s) C* @
#SAY
# g" B2 o! s+ _! U\  \3 [% a. Y0 f5 c2 `0 X8 ]8 p2 E
【<$str(s6)>】已经被人使用了!!!!!\  \, x2 Q: }! U4 X
<重新输入新名字/@@InPutString6>\\
# F0 m" e7 |; ~$ z# ?' H
' W& v3 M0 _, I" Y9 S( E8 V( {

" G+ C: n) N% A# J" w8 a[@ChangeHumNameOK]
- z% h: \5 E& [" m#act0 L+ v+ L2 S/ G& x- H% }9 L
SENDMSG 0 【名字修改成功】  v, a* m, _. G- ]5 t
CLOSE) O4 V1 W# f, J( J9 Y. |; t1 d
;CLOSE可以关闭NPC  j5 D% @0 h$ v" v5 v  n4 r8 p
[@ChangeHumNameFail]
* B: B# A2 T% }#act' _* G1 T6 `# l  U5 [) ~) ~
SENDMSG 0 名字修改失败
0 [3 ^2 k4 c. ]4 ], \6 D" k}
# X. B: ^) l' l' N3 t+ K* j  H' B1 [8 l5 @2 y4 D
站长承接传奇一切业务,小问题免费咨询。站长QQ137919001
回复

使用道具 举报

发表于 2026-9-26 23:36:30 | 显示全部楼层
111111111111111111111111
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|网站地图|皖ICP备18020244号-7|传奇部落

GMT+8, 2026-11-2 10:33 , Processed in 皖公网安备:34112402000394号 0.243396 second(s), 24 queries .