| 比较好用的删除回城的脚本 |
|
| 作者：佚名 文章来源:本站原创 阅读： 更新时间:2007-9-24 2:46:30 |
这个是强行全部删除，如果有人用外挂坐药，你就把他拉到你自己设计的地图里，让他在里面劳改。想删他什么就删他什么。
'getsenderallitem 删除玩家身上所有同名的物品。不论数量
unit 删除回城;
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 oncreate (astr : string);
implementation
procedure oncreate (astr : string);
var str : string;
race : integer;
begin str := callfunc ('getsenderrace');
race := strtoint (str);
if race = 1 then begin
print ('getsenderallitem 回城卷');
print ('getsenderallitem 玉露丸');
end;
exit;
end;
end. |
| 【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
| 文章录入：黑鹰 责任编辑：ceo |
|
| 版权声明：严禁商业网站和媒体未经授权对本站内容进行转载、摘编、复制或建立镜像；非商业网站转载本站文章必须标注原作者和“转载自无忧网络网游技术网”字样。文章版权属原作者所有。 |
|
|
|
|
设为首页 加入收藏 
网站地图 