夜游神论坛,传奇一条龙,GM论坛,GM部落

 找回密码
 立即注册

QQ登录

只需一步,快速开始

安全 WRIDC 996 php 88A
查看: 1165|回复: 0

传奇私服脚本-改变天气脚本

[复制链接]

签到天数: 814 天

[LV.10]以坛为家III

3137

主题

3887

帖子

3万

钻石

Rank: 9Rank: 9Rank: 9

积分
7024

最佳新人活跃会员推广达人以坛为家灌水之王热心会员

QQ
发表于 2018-10-29 16:56:52 | 显示全部楼层 |阅读模式
传奇私服-改变天气脚本

[@改变天气]
{
#say
我这里可以让你改变系统天气,是不长短常酷,不外需要花费你1个积分。
还要提醒你,假如你开了外挂请选择使用天气控制系统默认。
<比奇白天/@开始换天气(0,Day,比奇城,1,白天)>
<比奇起雾/@开始换天气(0,Fog,比奇城,1,起雾)>
<比奇下雨/@开始换天气(0,Rain,比奇城,1,下雨)>
<比奇下雪/@开始换天气(0,SNOW,比奇城,1,下雪)>
<比奇天晴/@开始换天气(0,Clean,比奇城,1,天晴)>
<关闭/@exit>
[@开始换天气()]
   #ACT
           Mov        A1       %ARG(1)
           Mov        A2       %ARG(2)
           Mov        A3       %ARG(3)
           Mov        D1       %ARG(4)
           Mov        A7       %ARG(5)
           Delaygoto [local] 5 @进行换天气
SysMsg " 请稍后,系统正在处理数据... "
[@进行换天气]
#act
    FormatStr "FLD_USERID='%s'" %USERID
    ReadValueSql  "TBL_RELATPOINT"  %A9  "FLD_USERID,FLD_POINT"  [@换天气检测]
[@换天气检测()]
#ACT
    mov    A4      %ARG(1)
    mov    D0      %ARG(2)
#IF
    Equal  A4   ""      
#ACT
    goto @积分查询
    break
#IF
    elarge D0 %D1
#ACT
    FormatStr "FLD_USERID='%s'" %USERID
    mov   A6       %A9
    DEC   D0       %D1
    mov   D8       %D0
    FormatStr "FLD_POINT='%s'" %D8
    UPDATEVALUESQL "TBL_RELATPOINT" %A6 %A9
      ChangeMapAttr "%A1" "%A2"
   EventMsg "%A1" "<$USERNAME> 施加了天气魔法<$OUTPUT(A3)>,开始<$OUTPUT(A7)>了。" 10015
   SysMsg  " 你花费了<$OUTPUT(D1)>点积分。还剩余<$OUTPUT(D8)>点积分!"
   break
#ELSESAY
{FCOLOR/1}你没有足够的积分!{FCOLOR/10}
<关  闭/@exit>
}






上一篇:通用所有传奇开区服务端里在线红包脚本
下一篇:传奇SF幻境宝藏脚本
锄禾日当午,签到不辛苦...
回复

使用道具 举报

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

本版积分规则

传奇广告代理|传奇脚本|微变传奇|单职业传奇|热血传奇|传奇私服|GM论坛|英雄合击|小黑屋|百度统计|夜游神论坛 |网站地图

Powered by Discuz! X3.4© 2001-2013 Comsenz Inc.