彩虹引擎短信验证系统，抛砖引玉做个示范。

最新的引擎0702已经支持短信验证码功能 需要使用的可以联系QQ：674883388
本脚本仅做功能演示。
请根据自己实际情况进一步完善。
不提供任何技术指导。

也可以做短信收集，等到时候开别的服的时候可以短信通知所有登录过的玩家手机号

自定义表:
SJDXSJH:INT  YZM:INT YZSJ:INT  DXID:CHAR


[@main]
彩虹引擎短信验证系统，抛砖引玉做个示范。\
①<填写手机号/@填写>     <后台设置短信ID/@短信ID>\
②<发送验证码/@发送>\
③<绑定手机号/@绑定>\
④<修改手机号/@修改> \
\
短信验证码：<$TABLE(SJDX).YZM> \
两次验证间隔时间也是验证码有效时间：<$TABLE(SJDX).YZSJ>\
手机号:<$TABLE(SJDX).SJH>\


[@短信ID]
#ACT
QUERYVAL 5 0 20 @填写短信ID 请输入短信ID:
break

[@填写短信ID]
#ACT
TABLE SJDX DXID = $STR(S5)
SENDMSG 7 短信ID设置为：<$TABLE(SJDX).DXID>。
break

[@填写]
#IF
LARGE $TABLE(SJDX).SJH 0
#ACT
QUERYVAL 6 1 14 @填写手机号 请输手机号码:
brak
#ELSEACT
MESSAGEBOX 您早已经绑定过手机号了


[@填写手机号]
#IF
#ACT
TABLE SJDX SJH = $STR(M6)
SENDMSG 5 您的手机号填写完毕<$STR(M6)>
break



[@修改]
#IF
EQUAL $TABLE(SJDX).SJH
#ACT
messagebox 请先填写手机号
break
#IF
!EQUAL $TABLE(SJDX).SJH
#ACT
QUERYVAL 9 1 14 @修改_验证码 请输入验证码:
break

[@修改_验证码]
#IF
EQUAL $TABLE(SJDX).YZM $STR(M9)
#ACT
QUERYVAL 8 1 14 @填写新手机 请输入新手机:
break
#ELSEACT
MESSAGEBOX 验证码有误,请重新输入

[@填写新手机]
#IF
!EQUAL $TABLE(SJDX).SJH
#ACT
QUERYVAL 7 1 14 @再次填写新手机 请再次输入新手机:
break
[@再次填写新手机]
#IF
!EQUAL $STR(M8) $STR(M7)
#ACT
MESSAGEBOX 两次输入手机号不一致,请重新输入.
break
#IF
CHECKLEVELEX > 0
#ACT
TABLE SJDX SJH = $STR(M7)
SENDMSG 5 您绑定手机已经修改成功
break

[@发送]
#IF
EQUAL $TABLE(SJDX).SJH 0
#ACT
messagebox 请先填写手机号
break
#IF
EQUAL $TABLE(SJDX).YZSJ 0
#ACT
TABLE SJDX YZSJ = 59
MOVR P12 123456  ;//验证码
TABLE SJDX YZM = $STR(P12)
SENDVALIDSMS $TABLE(SJDX).SJH $TABLE(SJDX).YZM $TABLE(SJDX)DXID
SENDMSG 5 尊敬的游戏玩家，我们已向您的手机号<$TABLE(SJDX).SJH>发送验证码，请注意查收！
SENDMSG 7 验证码发送成功，有效期1分钟！过期请重新发送验证码！
DELAYCALL 1 @YZJSJ
break
#ELSEACT
MESSAGEBOX 每次发送验证码请等待<$TABLE(SJDX).YZSJ>秒
break


[@YZJSJ]
#IF
SMALL $TABLE(SJDX).YZSJ 1
#ACT
TABLE SJDX YZM = 0
TABLE SJDX YZSJ = 0
break
#IF
SMALL $TABLE(SJDX).YZSJ 60
#ACT
TABLE SJDX YZSJ - 1
DELAYCALL 1 @YZJSJ
break


[@绑定]
#IF
large $TABLE(SJDX).SJH 0
#ACT
QUERYVAL 10 1 14 @对比验证 请输入验证码:
break
#ELSEACT
MESSAGEBOX 请先填写手机号.


[@对比验证]
#IF
EQUAL $TABLE(SJDX).YZM $STR(M10)
#ACT
CHANGEMOBILEPHONE <$TABLE(SJDX).SJH>
SENDMSG 5 手机号码<$TABLE(SJDX).SJH>绑定成功！
messagebox 对比通过!
#ELSEACT
MESSAGEBOX 验证码错误!














来源：网络转载

---