UID2472
阅读权限110
威望 点
积分1822
注册时间2009-8-10
最后登录1970-1-1
听众
收听
升级
100%
群组: JRO日本客户端
|
发表于 2019-4-24 11:22:42
|
显示全部楼层
/----------------------------------------------
// 名称 随身菜单
// 版本 V1.0b
// 作者 xuwujun
// 1、P点菜单 2、自动拾取 3、经验显示 4、世界聊天
// P点菜单包括(随身仓库,随身商店,装备修理,宠物功能,卡片拆除,彩色喇叭等)
// 继续更新中...
//----------------------------------------------
- shop 综合消耗品商店#1 -1,20143:500,7524:800,522:8500,523:500,610:-1,611:-1,601:-1,602:-1,645:-1,656:-1,657:-1,678:500000,715:-1,716:-1,717:-1,7134:-1,7135:30000,7136:30000,7137:30000,7138:30000,7139:30000,7521:-1,7522:-1,7523:-1,13250:-1,13251:-1,13252:-1,13253:-1,13254:-1,13255:-1,13256:-1,13257:-1,13258:-1,13259:-1,13200:-1,13201:-1,13202:-1,13203:-1,13204:-1,13205:-1,13206:-1,13207:-1,1750:-1,1751:-1,1752:-1,1753:-1,1754:-1,1755:-1,1756:-1,1757:-1,1758:-1,1759:-1,1760:-1,1761:-1,1762:-1,1763:-1,1765:-1,1766:-1,1767:-1
function script renwushouce {
set @record,query_sql ("select cash from `vip_char` where `account_id` = '"+getcharid(3)+"'",@cash);
if(@record <1){
query_sql "insert into `vip_char` (account_id,use_cash,cash) values ('"+getcharid(3)+"',0,0)";
}
if(@use_cash<1000) set @viplevel$,"普通玩家";
if(@use_cash>=1000 && @use_cash<=3000) set @viplevel$,"初阶玩家";
if(@use_cash>=3000 && @use_cash<=6000) set @viplevel$,"进阶玩家";
if(@use_cash>=6000 && @use_cash<=10000) set @viplevel$,"高阶玩家";
if(@use_cash>10000) set @viplevel$,"终级玩家";
mes "^5000A0[随身菜单]^000000";
mes "------------------------------";
mes "- 亲爱的[ ^0088FF"+strcharinfo(0)+"^000000 ],你好";
mes "- 当前时间为[ ^FF0000" +gettimestr("%H : %M",50) +"^000000 ]";
mes "- 你的玩家称号是[ ^6600ff"+@viplevel$+"^000000 ]";
mes "- 你的帐号P点值为[ ^3300FF"+@cash+"^000000 ]点";
query_sql ("select point from `oro_point` where `account_id` = '"+getcharid(3)+"'",@jifen);
mes "- 你的帐号积分值为[ ^0033FF"+@jifen+"^000000 ]点";
mes "- 服务器当前共有[ ^6a7f9e"+ getusers(1) + "^000000 ]人在线";
mes "------------------------------";
next;
switch(select("01-> ^0088FFP点功能菜单^000000","02-> ^6600ff自动拾取^000000[打开/关闭","03-> ^770011打怪经验^000000[打开/关闭]","04-> ^bb0088世界聊天^000000[打开/关闭]","05-> ^007777帐号锁定^000000[打开/关闭]","退出")){
case 1:
callfunc "F_vip";
end;
case 2:
mes "^5000A0[随身菜单]^000000";
if(autoloot == 0){
atcommand @autoloot;
set autoloot,1;
mes "自动拾取物品[ ^0000ff开启^000000 ]!";
}else{
atcommand @autoloot;
set autoloot,0;
mes "自动拾取物品[ ^ff0000关闭^000000 ]!";
}
close;
我有一个 太长了 发不出来 |
|