传奇天气脚本

逍遥De风流

[@改变天气]
{
#say

我这里可以让你改变系统天气，是不是非常酷，不过需要花费你1个积分。\
还要提醒你，如果你开了WG请选择使用天气控制系统默认。\
<比奇白天/@开始换天气(0,Day,比奇城,1,白天)>\
<比奇起雾/@开始换天气(0,Fog,比奇城,1,起雾)>\
<比奇下雨/@开始换天气(0,Rain,比奇城,1,下雨)>\
<比奇下雪/@开始换天气(0,SNOW,比奇城,1,下雪)>\
<比奇天晴/@开始换天气(0,Clean,比奇城,1,天晴)>\\
<关闭[url=]/@exit[/url]>

[@开始换天气()]
  
#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}\\
<关  闭[url=]/@exit>\\[/url]

zmhtx

谢谢楼主分享

776wf

谢谢，看看啥意思

漫步

看看呢学习下

feitianfen

居然还要用挂机脚本

黑色幽默

这个有什么用啊？？？

寂寞男人

没听说过 看看

枫哥哥哥

dddddddddddddddddddddddddd

简单玩家

天气？吸引哦！！看看

猪都笑了

1# 逍遥De风流


学习下，看看什么

玫瑰暧昧

1# 逍遥De风流


1111

虚心

什么意思来的？？？？？？？？？？？？？？？

风间子

ddddddddddddd

一起传奇吧

[@己调整]
{
#IF
#say

zzmao

这个是什么呀  。。。。

沉默年代

比较喜欢天气的， 这样会有3D的感觉。。

斌斌

1# 逍遥De风流


是脚本吗

酷狼

天气脚本？看看先!

分手

似的、、445552

李倩周

1# 逍遥De风流


k 2看女哈