无度站

[@动车]

{
#IF
!CHECKNAMELIST ..\QuestDiary\数据文件\cp名单.txt
#ACT
CALCVAR HUMAN 下注元宝 = 0
CALCVAR HUMAN 下注号码 =
break
#IF
CHECKVAR HUMAN 下注元宝 > 0
!CHECKVAR HUMAN 下注号码 =
CHECKNAMELIST ..\QuestDiary\数据文件\cp名单.txt
#ELSEACT
BREAK
;///下数字的
#IF
CHECKNAMELIST ..\QuestDiary\数据文件\cp名单.txt
CHECKVAR HUMAN 下注号码 = $STR(I51)
CHECKVAR HUMAN 下注元宝 > 0
#ACT
MOV P90 $HUMAN(下注元宝)
MULT P90 8
GAMEGOLD + $STR(P90)
SENDMSG 5 你本次cp下注中的<$STR(P90)>个元宝，再接再厉！
SENDMSG 0 玩家%S购买了cp中奖获得了<$STR(P90)>个元宝
FORMATSTR S10 cp元宝增加%S个,元宝总数量%S，时间：%S <$STR(P90)>|<$GAMEGOLD>|<$DATETIME>
ADDVARLIST $STR(S10) ..\QuestDiary\日志文件\元宝操作\<$USERNAME>.txt
CALCVAR HUMAN 下注元宝 = 0
CALCVAR HUMAN 下注号码 =
DELNAMELIST ..\QuestDiary\数据文件\cp名单.txt
break
;///下大的

#IF
CHECKNAMELIST ..\QuestDiary\数据文件\cp名单.txt
SMALL I51 5
CHECKVAR HUMAN 下注号码 = 小
CHECKVAR HUMAN 下注元宝 > 0
#ACT
MOV P90 $HUMAN(下注元宝)
MULT P90 2
GAMEGOLD + $STR(P90)
SENDMSG 5 你本次cp下注中的<$STR(P90)>个元宝，再接再厉！
SENDMSG 0 玩家%S购买了cp中奖获得了<$STR(P90)>个元宝
FORMATSTR S10 cp元宝增加%S个,元宝总数量%S，时间：%S <$STR(P90)>|<$GAMEGOLD>|<$DATETIME>
ADDVARLIST $STR(S10) ..\QuestDiary\日志文件\元宝操作\<$USERNAME>.txt
CALCVAR HUMAN 下注元宝 = 0
CALCVAR HUMAN 下注号码 =
DELNAMELIST ..\QuestDiary\数据文件\cp名单.txt
break


;///下大的

#IF
CHECKNAMELIST ..\QuestDiary\数据文件\cp名单.txt
LARGE I51 5
CHECKVAR HUMAN 下注号码 = 大
CHECKVAR HUMAN 下注元宝 > 0
#ACT
MOV P90 $HUMAN(下注元宝)
MULT P90 2
GAMEGOLD + $STR(P90)
SENDMSG 5 你本次cp下注中的<$STR(P90)>个元宝，再接再厉！
SENDMSG 0 玩家%S购买了cp中奖获得了<$STR(P90)>个元宝
FORMATSTR S10 cp元宝增加%S个,元宝总数量%S，时间：%S <$STR(P90)>|<$GAMEGOLD>|<$DATETIME>
ADDVARLIST $STR(S10) ..\QuestDiary\日志文件\元宝操作\<$USERNAME>.txt
CALCVAR HUMAN 下注元宝 = 0
CALCVAR HUMAN 下注号码 =
DELNAMELIST ..\QuestDiary\数据文件\cp名单.txt
break
#IF
TRUE
#ACT
SENDMSG 5
CALCVAR HUMAN 下注元宝 = 0
CALCVAR HUMAN 下注号码 =
DELNAMELIST ..\QuestDiary\数据文件\cp名单.txt
SENDMSG 5 很遗憾，本次cp下注，你没有中的任何奖励，再接再厉，也许下次你就能获得大奖！
break
}