传奇一屌丝 发表于 2025-6-19 06:55:36

红包系统功能脚本-blue引擎

blue引擎红包系统功能:1.添加D:\mirserver\Mir200\Envir\MapQuest_defQManage.txt文本内容,2.添加D:\mirserver\Mir200\Envir\Market_Def传奇红包-3.txt功能文本,3.添加D:\mirserver\Mir200\EnvirMerChant.txt文本NPC坐标代码,4.添加D:\mirserver\Mir200\Envir\QuestDiary kancq.cn红包系统    文件夹,5.检查功能文本代码路径是否正确,修正运行测试。

(@@InPutInteger @@InPutString )[@main]#IFCHECKVAR HUMAN 个人红包名字 =CHECKVAR HUMAN 个人红包类型 =#ACTCALCVAR HUMAN 个人红包名字 = 发全服红包SAVEVAR HUMAN 个人红包名字 ..\QuestDiary\kancq.cn红包系统\个人变量.txtCALCVAR HUMAN 个人红包类型 = 拼手气红包SAVEVAR HUMAN 个人红包类型 ..\QuestDiary\kancq.cn红包系统\个人变量.txt
#IFCHECKLEVELEX > 0#ACTMOV S40 <$HUMAN(个人红包人数)><$GLOBAL(实时排名空格)>MOV S41 <$HUMAN(个人红包金额)><$GLOBAL(实时排名空格)>DEC S40 7 500DEC S41 7 500
#IF#SAY<color=clFuchsia 玩家介绍:><color=clOlive 相信大家都玩过微信红包,咱们的玩法与微信一模一样。>\<color=clOlive 选择要发放的红包后,在选择><color=clLime [拼手气抢红包]><color=clOlive 或者><color=clLime [普通抢红包]><color=clOlive 。>\<color=clFuchsia 拼手气抢:><color=clOlive 系统会把红包金额分成你设定人数的份数,金额不同>\<color=clFuchsia 普通红包:><color=clOlive 系统会把红包金额分成你设定人数的份数,金额相同>\<color=clGreen ------------------------------------------------------------>\<选择红包/@选择红包>:<color=clFuchsia [> <$HUMAN(个人红包名字)> <color=clFuchsia ]> <color=clAqua 红包两个:><color=clOlive 发全服红包发行会红包>\<选择类型/@选择类型>:<color=clFuchsia [> <$HUMAN(个人红包类型)> <color=clFuchsia ]> <color=clAqua 类型两个:><color=clOlive 拼手气红包普通抢红包>\<输入人数/@@InPutInteger36>:<color=clFuchsia [> <$STR(S40)>人数 <color=clFuchsia ]> <color=clAqua 人数规定:><color=clOlive 人数最大100> [<发起行会红包/@发起行会红包>]\<输入金额/@@InPutInteger37>:<color=clFuchsia [> <$STR(S41)>元宝 <color=clFuchsia ]> <color=clAqua 金额介绍:><color=clOlive 红包最少500> [<发起全服红包/@发起全服红包>]\
[@发起全服红包]#IFCHECKVAR HUMAN 个人红包名字 = 发行会红包#ACTMessageBox [错误提示]:你选择的是[发行会红包]点错了。BREAK
#IFCHECKVAR HUMAN 个人红包人数 < 1#ACTMessageBox [错误提示]:抢红包人数必须大于0。BREAK
#IFCHECKVAR HUMAN 个人红包金额 < 500#ACTMessageBox [错误提示]:红包金额必须大于499。BREAK
#IFCHECKVAR HUMAN 个人红包人数 > <$HUMAN(个人红包金额)>#ACTMessageBox [错误提示]:人数必须小于红包金额才能发起红包BREAK
#IFCHECKVAR GLOBAL 已发红包金额 > 49#ACTMessageBox [错误提示]:稍等上轮还未结束。系统会在5秒后在次发送红包活动。CALCVAR GLOBAL 已发红包人数 = <$USERCOUNT>SAVEVAR GLOBAL 已发红包人数 ..\QuestDiary\kancq.cn红包系统\固定变量.txtDelayCall 5000 @在次提问全服红包BREAK
#IFCHECKVAR HUMAN 个人红包名字 = 发全服红包CHECKVAR HUMAN 个人红包类型 = 拼手气红包CHECKGAMEGOLD > <$HUMAN(个人红包金额)>#ACTgamegold - <$HUMAN(个人红包金额)>CALCVAR GLOBAL 已发红包名字 = <$HUMAN(个人红包名字)>SAVEVAR GLOBAL 已发红包名字 ..\QuestDiary\kancq.cn红包系统\固定变量.txtCALCVAR GLOBAL 已发红包人数 = <$HUMAN(个人红包人数)>SAVEVAR GLOBAL 已发红包人数 ..\QuestDiary\kancq.cn红包系统\固定变量.txtCALCVAR GLOBAL 已发红包类型 = <$HUMAN(个人红包类型)>SAVEVAR GLOBAL 已发红包类型 ..\QuestDiary\kancq.cn红包系统\固定变量.txtCALCVAR GLOBAL 已发红包金额 = <$HUMAN(个人红包金额)>SAVEVAR GLOBAL 已发红包金额 ..\QuestDiary\kancq.cn红包系统\固定变量.txtSENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>],总金额[<$HUMAN(个人红包金额)>]元宝,先抢先得。 255 252 8SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>]元宝,先抢先得。 255 252 8SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>]元宝,先抢先得。 255 252 8SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>]元宝,先抢先得。 255 252 8SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>]元宝,先抢先得。 255 252 8SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252GMEXECUTE 开始提问 @全服手气BREAK
#IFCHECKVAR HUMAN 个人红包名字 = 发全服红包CHECKVAR HUMAN 个人红包类型 = 普通抢红包CHECKGAMEGOLD > <$HUMAN(个人红包金额)>#ACTgamegold - <$HUMAN(个人红包金额)>CALCVAR GLOBAL 已发红包名字 = <$HUMAN(个人红包名字)>SAVEVAR GLOBAL 已发红包名字 ..\QuestDiary\kancq.cn红包系统\固定变量.txtCALCVAR GLOBAL 已发红包人数 = <$HUMAN(个人红包人数)>SAVEVAR GLOBAL 已发红包人数 ..\QuestDiary\kancq.cn红包系统\固定变量.txtCALCVAR GLOBAL 已发红包类型 = <$HUMAN(个人红包类型)>SAVEVAR GLOBAL 已发红包类型 ..\QuestDiary\kancq.cn红包系统\固定变量.txtCALCVAR GLOBAL 已发红包金额 = <$HUMAN(个人红包金额)>SAVEVAR GLOBAL 已发红包金额 ..\QuestDiary\kancq.cn红包系统\固定变量.txtSENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>],总金额[<$HUMAN(个人红包金额)>]元宝,先抢先得。 255 252 8SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>]元宝,先抢先得。 255 252 8SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>]元宝,先抢先得。 255 252 8SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>]元宝,先抢先得。 255 252 8SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>]元宝,先抢先得。 255 252 8SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 土豪玩家[%s]发起了全服[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252GMEXECUTE 开始提问 @全服普通#ELSEACTMessageBox [错误提示]:你的元宝不足或者人数不大于0人。
[@发起行会红包]#IFHAVEGUILD#ACT
#IFCHECKVAR HUMAN 个人红包名字 = 发全服红包#ACTMessageBox [错误提示]:你选择的是[发全服红包]点错了。BREAK
#IFCHECKVAR HUMAN 个人红包人数 < 1#ACTMessageBox [错误提示]:抢红包人数必须大于0。BREAK
#IFCHECKVAR HUMAN 个人红包金额 < 500#ACTMessageBox [错误提示]:红包金额必须大于499。BREAK
#IFCHECKVAR HUMAN 个人红包人数 > <$HUMAN(个人红包金额)>#ACTMessageBox [错误提示]:人数必须小于红包金额才能发起红包BREAK
#IFCHECKVAR HUMAN 个人红包名字 = 发行会红包CHECKVAR HUMAN 个人红包类型 = 拼手气红包CHECKGAMEGOLD > <$HUMAN(个人红包金额)>#ACTgamegold - <$HUMAN(个人红包金额)>CALCVAR GUILD 行会红包名字 = <$HUMAN(个人红包名字)>SAVEVAR GUILD 行会红包名字 ..\QuestDiary\kancq.cn红包系统\行会变量.txtCALCVAR GUILD 行会红包人数 = <$HUMAN(个人红包人数)>SAVEVAR GUILD 行会红包人数 ..\QuestDiary\kancq.cn红包系统\行会变量.txtCALCVAR GUILD 行会红包类型 = <$HUMAN(个人红包类型)>SAVEVAR GUILD 行会红包类型 ..\QuestDiary\kancq.cn红包系统\行会变量.txtCALCVAR GUILD 行会红包金额 = <$HUMAN(个人红包金额)>SAVEVAR GUILD 行会红包金额 ..\QuestDiary\kancq.cn红包系统\行会变量.txtCALCVAR GUILD 行会行会名字 = <$HUMAN(个人行会名字)>SAVEVAR GUILD 行会行会名字 ..\QuestDiary\kancq.cn红包系统\行会变量.txtSENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>],总金额[<$HUMAN(个人红包金额)>] 255 252 8SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>] 255 252 8SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>] 255 252 8SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>] 255 252 8SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>] 255 252 8SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了行会[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252GMEXECUTE 开始提问 @行会手气BREAK
#IFCHECKVAR HUMAN 个人红包名字 = 发行会红包CHECKVAR HUMAN 个人红包类型 = 普通抢红包CHECKGAMEGOLD > <$HUMAN(个人红包金额)>#ACTgamegold - <$HUMAN(个人红包金额)>CALCVAR GUILD 行会红包名字 = <$HUMAN(个人红包名字)>SAVEVAR GUILD 行会红包名字 ..\QuestDiary\kancq.cn红包系统\行会变量.txtCALCVAR GUILD 行会红包人数 = <$HUMAN(个人红包人数)>SAVEVAR GUILD 行会红包人数 ..\QuestDiary\kancq.cn红包系统\行会变量.txtCALCVAR GUILD 行会红包类型 = <$HUMAN(个人红包类型)>SAVEVAR GUILD 行会红包类型 ..\QuestDiary\kancq.cn红包系统\行会变量.txtCALCVAR GUILD 行会红包金额 = <$HUMAN(个人红包金额)>SAVEVAR GUILD 行会红包金额 ..\QuestDiary\kancq.cn红包系统\行会变量.txtCALCVAR GUILD 行会行会名字 = <$HUMAN(个人行会名字)>SAVEVAR GUILD 行会行会名字 ..\QuestDiary\kancq.cn红包系统\行会变量.txtSENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>],总金额[<$HUMAN(个人红包金额)>] 255 252 8SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>] 255 252 8SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>] 255 252 8SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>] 255 252 8SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,设定人数[<$HUMAN(个人红包人数)>]总金额[<$HUMAN(个人红包金额)>] 255 252 8SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252SENDMSG 0 [<$HUMAN(个人行会名字)>]行会成员[%s]发起了[<$HUMAN(个人红包类型)>]抢红包,总金额[<$HUMAN(个人红包金额)>] 255 252GMEXECUTE 开始提问 @行会普通#ELSEACTMessageBox [错误提示]:你的元宝不足或者人数不大于0人。
[@@InPutInteger36]#IF#ActDelayGoto 1 @InPutInteger36
[@InPutInteger36]#IfLARGE M36 0#ACTCALCVAR HUMAN 个人红包人数 = <$STR(M36)>SAVEVAR HUMAN 个人红包人数 ..\QuestDiary\kancq.cn红包系统\个人变量.txtgoto @main#ELSEACTMessageBox 人数必须大于0人。
[@@InPutInteger37]#IFCHECKGAMEGOLD > 0#ActDelayGoto 1 @InPutInteger37#ELSEActMessageBox 你的元宝数量不足!请冲值。
[@InPutInteger37]#IfCHECKGAMEGOLD > <$STR(M37)>small M37 10000000LARGE M37 <$STR(M36)>LARGE M37 499#ACTCALCVAR HUMAN 个人红包金额 = <$STR(M37)>SAVEVAR HUMAN 个人红包金额 ..\QuestDiary\kancq.cn红包系统\个人变量.txtgoto @main#ELSEACTMessageBox 输入的红包金额必须大于人数。红包金额最大9999999W元宝 最小10元宝。
[@选择类型] \ \ \ \          <拼手气红包/@拼手气红包>      <普通抢红包/@普通抢红包>
[@选择红包] \ \ \ \          <发全服红包/@发全服红包>      <发行会红包/@发行会红包>

[@拼手气红包]#ACTCALCVAR HUMAN 个人红包类型 = 拼手气红包SAVEVAR HUMAN 个人红包类型 ..\QuestDiary\kancq.cn红包系统\个人变量.txtgoto @main
[@普通抢红包]#ACTCALCVAR HUMAN 个人红包类型 = 普通抢红包SAVEVAR HUMAN 个人红包类型 ..\QuestDiary\kancq.cn红包系统\个人变量.txtgoto @main

[@发全服红包]#ACTCALCVAR HUMAN 个人红包名字 = 发全服红包SAVEVAR HUMAN 个人红包名字 ..\QuestDiary\kancq.cn红包系统\个人变量.txtgoto @main
[@发行会红包]#IFHAVEGUILD#ACTCALCVAR HUMAN 个人行会名字 = <$GUILDNAME>SAVEVAR HUMAN 个人行会名字 ..\QuestDiary\kancq.cn红包系统\个人变量.txtCALCVAR HUMAN 个人红包名字 = 发行会红包SAVEVAR HUMAN 个人红包名字 ..\QuestDiary\kancq.cn红包系统\个人变量.txtgoto @main#ELSEACTMessageBox 你当前没有行会,无法发起行会红包。


[@在次提问全服红包]#IF#actGMEXECUTE 开始提问 @全服普通
为防止数据被破坏,本站暂开放QQ登录,注册账号,回复评论本帖即可下载隐藏资源。
**** Hidden Message *****


页: [1]
查看完整版本: 红包系统功能脚本-blue引擎