如何给传奇服务器添加能量抽奖功能
[@MAIN]#IF
CHECKLEVELEX > 0
#ACT
CloseBigDialogBox
#SAY
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
<能量抽奖/SCOLOR=254> <Hot~/SCOLOR=249> <玩家福利送不停，您敢玩，我敢送!/SCOLOR=31>\
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
<在土城安全区活动，每分钟可获得1点能量点，能量点可进行/SCOLOR=69>\
<幸运大抽奖，每天抽奖消耗上限为400点。离线挂机无效!/SCOLOR=250>\
{目前你拥有能量点：<$CREDIT>点/SCOLOR=253}\
<请选择您要抽奖的类型：/SCOLOR=151>\
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
#if
CHECKLEVELEX > 34
#SAY
<10点一次/@10能量点><50点一次/@50能量点><100点一次/@100能量点> <关闭对话/@exit>
#elsesay
你必须等级到达35级才可以抽奖! <关闭对话/@exit>
[@10能量点]
#IF
CHECKLEVELEX > 0
#ACT
MOV M0 400
DEC M0 <$HUMAN($Mrrp_能量兑换数量)>
#IF
LARGE M0 9
#ELSEACT
GOTO @MAIN
MESSAGEBOX 今天你能兑换的剩余能量点不足10点，每天最高只能兑换400点
break
#IF
CheckNationCredit > 9
#ACT
ChangeNationCredit - 10
CALCVAR HUMAN $Mrrp_能量兑换数量 + 10
SAVEVAR HUMAN $Mrrp_能量兑换数量 ..\QuestDiary\Mrrp系列脚本\Mrrp_能量兑换变量数据.txt
GetRandomText .\QuestDiary\Mrrp系列脚本\能量抽奖\10点一次.txt S10
GIVE <$STR(S10)> 1
SENDMSG 0 玩家[%s]使用10点能量点抽奖获得了1个<$STR(S10)>...
GOTO @MAIN
#ELSEACT
GOTO @MAIN
MESSAGEBOX 你能量点不足10点
[@50能量点]
#IF
CHECKLEVELEX > 0
#ACT
MOV M0 400
DEC M0 <$HUMAN($Mrrp_能量兑换数量)>
#IF
LARGE M0 49
#ELSEACT
GOTO @MAIN
MESSAGEBOX 今天你能兑换的剩余能量点不足50点，每天最高只能兑换400点
break
#IF
CheckNationCredit > 49
#ACT
ChangeNationCredit - 50
CALCVAR HUMAN $Mrrp_能量兑换数量 + 50
SAVEVAR HUMAN $Mrrp_能量兑换数量 ..\QuestDiary\Mrrp系列脚本\Mrrp_能量兑换变量数据.txt
GetRandomText .\QuestDiary\Mrrp系列脚本\能量抽奖\50点一次.txt S10
GIVE <$STR(S10)> 1
SENDMSG 0 玩家[%s]使用50点能量点抽奖获得了1个<$STR(S10)>...
GOTO @MAIN
#ELSEACT
GOTO @MAIN
MESSAGEBOX 你能量点不足50点
[@100能量点]
#IF
CHECKLEVELEX > 0
#ACT
MOV M0 400
DEC M0 <$HUMAN($Mrrp_能量兑换数量)>
#IF
LARGE M0 99
#ELSEACT
GOTO @MAIN
MESSAGEBOX 今天你能兑换的剩余能量点不足100点，每天最高只能兑换400点
break
#IF
CheckNationCredit > 99
#ACT
ChangeNationCredit - 100
CALCVAR HUMAN $Mrrp_能量兑换数量 + 100
SAVEVAR HUMAN $Mrrp_能量兑换数量 ..\QuestDiary\Mrrp系列脚本\Mrrp_能量兑换变量数据.txt
GetRandomText .\QuestDiary\Mrrp系列脚本\能量抽奖\100点一次.txt S10
GIVE <$STR(S10)> 1
SENDMSG 0 玩家[%s]使用100点能量点抽奖获得了1个<$STR(S10)>...
GOTO @MAIN
#ELSEACT
GOTO @MAIN
MESSAGEBOX 你能量点不足100点
页:
[1]