晏乃欣 发表于 2025-7-21 14:54:16

传奇改变天气脚本

[@改变天气]
{
#say
我这里可以让你改变系统天气，是不长短常酷，不外需要花费你1个积分。\
还要提醒你，假如你开了外挂请选择使用天气控制系统默认。\
\
\
\
\
\\

[@开始换天气()]
   #ACT
         Mov      A1       %ARG(1)
         Mov      A2       %ARG(2)
         Mov      A3       %ARG(3)
         Mov      D1       %ARG(4)
         Mov      A7       %ARG(5)
         Delaygoto 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
    EqualA4   ""      
#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" " 施加了天气魔法，开始了。" 10015
   SysMsg" 你花费了点积分。还剩余点积分！"
   break
#ELSESAY
{FCOLOR/1}你没有足够的积分！{FCOLOR/10}\\
\\
}

神皇火龙 发表于 2025-7-21 15:31:29

我擦！我要沙发！

谕三刀沉默 发表于 2025-7-21 15:31:29

我擦！我要沙发！

问道天下专属 发表于 2025-7-21 15:31:29

顶起出售广告位

虎克合击 发表于 2025-7-21 15:31:29

我只是路过，不发表意见

召唤之皇 发表于 2025-7-21 15:31:29

小白一个 顶一下

虱伋鞘 发表于 2025-7-21 15:31:29

好，很好，非常好！

最快的刀 发表于 2025-7-21 15:50:00

佩服佩服！

正版烈斩 发表于 2025-7-21 16:13:31

打酱油的人拉，回复下赚取积分

狗暱 发表于 2025-7-21 17:52:55

前排，哇咔咔
页: [1] 2 3 4
查看完整版本: 传奇改变天气脚本