admintianyu 发表于 2011-12-8 21:47:40

传世私服_最详细的_脚本解释

[@登陆脚本]
{
#IF
LARGE G0 0      检测GO变量是否大于0
#ACT
GOTO @内测信息    脚本跳转到@内测信息


#IF
!PosEx $USERNAME .\QuestDiary\数据文件\文本数据\玩家帐号.txt   检测玩家的名字在这个文本里是否存在不存咋执行#ACT
#ACT
MOV S7 $USERACCOUNT    把玩家的账号赋值给S7
INC S7 |       给S7 的后面加上一个竖线
INC S7 $USERNAME    把玩家名字加载竖线后面
ADDVARLIST $STR(S7) ..\QuestDiary\数据文件\文本数据\玩家帐号.txt    把S7数据添加进这个TXT 里
ADDNAMELIST ..\QuestDiary\数据文件\文本数据\心魔名字.txt   把玩家的名字添加进这个TXT
CALCVAR HUMAN 登陆时间 = $DATETIME    把当前系统时间给玩家变量
SAVEVAR HUMAN 登陆时间 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt保存变量的数值
#IF
PosEx $USERNAME .\QuestDiary\数据文件\文本数据\玩家帐号.txt   玩家账号存在玩家名字执行 #ACT
#ACT
DELAY 1 @登陆信息脚本一秒钟后跳转登陆信息
#IF
random 1
#ACT
MOV S0 $USERNAME   把玩家名字给S0
INC S0 |   给S0后面加个|
#IF
!PosEx $STR(S0) .\QuestDiary\数据文件\离线时间.txt   S0变量不存在执行#act
#ACT
FORMATSTR S10 %s|0|%s|%s <$USERNAME>|<$STR(G5)>|<$STR(G4)>把后面的变量合成字符串赋值给S10
ADDVARLIST $STR(S10) ..\QuestDiary\数据文件\离线时间.txt把S10 变量添加进去TXT
#IF
random 1
#ACT
MOV S0 $USERNAME
INC S0 |
#IF
PosEx $STR(S0) .\QuestDiary\数据文件\离线时间.txt S1   txt里面存在字符串 把字符串读取给S1
#ACT
GETVALIDSTR $STR(S1) | S2 S3    拆分S1 第一部分给 S2 剩下的给S3
GETVALIDSTR $STR(S3) | P0 S4拆分S3 第一部分给 P0 剩下的给S4
GETVALIDSTR $STR(S4) | P1 P3拆分 S4 第一部分给P1 剩下的给P3
MOV P2 $STR(G5)    把G5 的数值赋值给 P2
DEC P2 $STR(P1)   P2减去P1 把结果赋值给P2
MOV P10 $STR(G4)   G4的值 给 P10
DEC P10 $STR(P3)    P10 减去P3结果给P10
MUL P10 8   P10*8结果给P10
MUL P10 60   P10乘60
#IF
LARGE P2 $STR(P10)如果P2大于平P10
#ACT
MOV P2 $STR(P10)把P10的值给P2
#IF
random 1
#ACT
INC P2 $STR(P0)   把P2加上p0结果给P2
#IF
LARGE P2 18000如果P2大于18000
#ACT
MOV P2 18000   P2 赋值 18000
#IF
random 1
#ACT
FORMATSTR S10 %s|%s|%s|%s <$USERNAME>|<$STR(P2)>|<$STR(G5)>|<$STR(G4)>把这些变量组成字符串
DELVARLIST $STR(S1) ..\QuestDiary\数据文件\离线时间.txt删除S1字符串
ADDVARLIST $STR(S10) ..\QuestDiary\数据文件\离线时间.txt   添加S10字符串
#IF
LARGE P2 60如果P2大于60
#ACT
MOV P80 $STR(P2)    P2的值给P80
DIV P80 60    P80除60结果给P80
SENDXLD $STR(P80) 1 4 10 30   显示仙灵丹的界面
#IF
SMALL P2 60    如果P2小于60
#ACT
SENDXLD 0 1 4 10 30   显示 仙灵丹界面
#IF
CHECKNAMELIST ..\QuestDiary\数据文件\魂珠维护.txt如果名字存在TXT里执行#ACT
#ACT
GOTO @魂珠每天维护脚本跳转@魂珠每天维护
break

[@魂珠每天维护]
#IF
CHECKNAMELIST ..\QuestDiary\数据文件\魂珠维护.txt如果名字存在
#ACT
Break中断脚本执行
#IF
CHECKUSEITEM 14检测是否佩戴魂珠
#ACT
MOV P0 $ItemEx.$USEITEMMAKEINDEX(14).13   把魂珠的13号属性的值赋值给P0
MOV P1 $ItemEx.$USEITEMMAKEINDEX(14).8585号值 赋值给P2
MOV S0 $ItemExN.$USEITEMMAKEINDEX(14).NAME把魂珠的名字给S0
INC S0 维护   魂珠名字后面加上维护
#IF
random 1
#ACT
MOV S1 $STR(P0)   P0的值给S1
INC S1 |    给S1加上一条|
#IF
PosEx $STR(S1) ..\QuestDiary\数据文件\文本数据\<$STR(S0)>.txt S2检测真(仙)魂珠维护.Txt 存在的数据,读取赋值给S2
#ACT
GETVALIDSTR $STR(S2) | P2 P3拆分S2第一部分给P2剩下的给P3
#IF
SMALL P1 $STR(P3)P3大于P1执行 #ACT
#ACT
UPGRADEUSERITEM 14 11 = 1   调整魂珠属性
SENDMSG 5 魂珠修炼值不足,魂珠功能进入关闭状态!
break
#ELSEACT
UPGRADEUSERITEM 14 85 - $STR(P3)   调整魂珠85属性-去 P3值
ADDNAMELIST ..\QuestDiary\数据文件\魂珠维护.txtv把名字添加进去
break

[@内测信息]
#SAY
       <COLOR=red 【>{Color=green 《<$SERVERNAME>》开区公告}<COLOR=red】>\\
<Color=orange 开区时间>:{Color=green <$STR(G97)>月<$STR(G96)>日<$STR(A88)>正式开区。}\
<Color=orange 游戏版本>:完美仿盛大1.981版\
<Color=orange 注意事项>:<COLOR=red 内测数据将在开区前全部删除,只保留登陆帐号>\
<Color=orange 内测说明>:装备和书籍全部在红袖处购买,第二分身在玄玄\
老人处获得。<COLOR=green 老兵可以查看到开区及内测活动。>\
<Color=orange 飞升系统>:<COLOR=yellow 等级65级就可以飞升使用特效技能,天人封号>\
<Color=orange 虎王系统>:<COLOR=yellow 佩戴虎王盾,可以召唤啸天虎,升级可以学技能>


[@登陆信息]
#ACT
SENDMSG 14 <$BANKACCOUNT7>   发布站string.ini里设置的$BANKACCOUNT7
SENDMSG 5 <$BANKACCOUNT7>   同上
GOTO @HCCwool   脚本跳转 @hccwool
SENDMSG 5 您的元宝还有:<$GAMEGOLD>个。红字说你还有多少元白
SENDMSG 20 尊敬的<$USERNAME>,您上次登陆游戏的时间:<$HUMAN(登陆时间)>。 255 70
CALCVAR HUMAN 登陆时间 = $DATETIME
SAVEVAR HUMAN 登陆时间 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
break

[@HCCwool]
#IF
CHECKVAR HUMAN 绑定帐号 = 0   如果不是绑定账号 就执行#ACT
#ACT
SENDMSG 20 您还没有申请QQ捆绑游戏帐号,立即去落霞岛(243.239)网络文明宣传员申请,凡是申请捆绑玩家都可以获得千万升级经验奖励。 255 5
GOTO @HCwool   脚本跳转 @hccwool


[@HCwool]
#IF
CHECKVAR HUMAN 炼狱 > 3600   检测炼狱时间是否大于3600秒
#ACT
MOV P5 $HUMAN(炼狱)   把炼狱时间给P5
MOV P6 $HUMAN(炼狱)把脸与时间给P6
DIV P5 3600P5变量除3600结果给P5
MOV P7 3600   P7赋值3600
MUL P7 $STR(P5)   P7乘以P5结果给P7
DEC P6 $STR(P7)   P6-P7结果给P6
SENDMSG 5 "您帐号的剩余游戏时间为: <$STR(P5)>小时 <$STR(P6)>秒"
break
#IF
CHECKVAR HUMAN 炼狱 < 3600
#ACT
SENDMSG 5 "您帐号的剩余游戏时间为: <$HUMAN(炼狱)>秒"
break


海总001 发表于 2012-1-13 21:15:22

好啊楼主,没想到啊,太好了











static/image/common/sigline.gif
最新电视剧推荐:我的娜塔莎在线观看

funyeser 发表于 2012-1-19 19:20:43

支持一下吧,确实是不错的贴子。











static/image/common/sigline.gif
瘦小腿的最快方法 http://soutui.b008.com

765593142 发表于 2012-1-27 22:40:46

路过,看不懂

kjrhh 发表于 2012-1-29 14:56:42

谢谢楼主了,楼主辛苦了,呵呵











static/image/common/sigline.gif
www.ip293.com,传奇1.76金币版,94wow.com,传奇行会名字,传奇sf1.76

今夜星光灿烂 发表于 2012-1-30 00:30:09

一起交流!楼主给咱们提供机会了

今夜星光灿烂 发表于 2012-1-30 18:19:44

版主好强大,顶

玻璃屋小女孩 发表于 2012-2-7 01:21:17

初来乍到,请多多关照。











static/image/common/sigline.gif
最新电视剧推荐:湖南卫视在线直播

学无止镜 发表于 2012-2-11 16:27:04

努力啊!!!!!











static/image/common/sigline.gif
www,cs9an,com  长沙久安网络 QQ 370886621 建站,SEO

最近写了一个CMS内容管理系统

用了后排名靠前了许多。长沙网站推广 排到了首页。

udcyy 发表于 2012-3-6 19:53:33

我喜欢啊,请继续 支持你











static/image/common/sigline.gif
单机游戏 单机游戏下载 3dmgame.com goyimi.in
goanmian.in gomazui.in 治疗乙肝的药 ganbing.in 治疗乙肝的药yigan8.in 乙肝吃什么好 yigankang.in 治疗乙肝偏方 yiganyao.in
乙肝 yigan.in
页: [1] 2 3
查看完整版本: 传世私服_最详细的_脚本解释

本站2000人超级群:100021678,小窍门:点击右边的图标可以直接申请加入本群点击这里加入此群
联系管理员(删违规/投诉/建议/办理会员等),请点击右边的图标: 点击这里给我发消息(备注:不闲聊,直奔主题)
抵制不良游戏,拒绝盗版游戏。注意自我保护,谨防上当受骗。适度游戏益脑,沉迷游戏伤身。合理安排时间,享受健康生活。
声明:本站不会开发与代理任何引擎,登陆器,外挂等,与任何私服工作室无任何关系!
网站的一切东西仅为兴趣爱好!如果您觉得本站侵犯了您的利益,可以电邮:307319058@QQ.COM,我们将在收到邮件后30分钟关闭网站!

image image image image image