[@main]
#if CHECKLEVELEX > 0 #ACT GOTO @REFUSH GMEXECUTE 开始提问 @reSetValue_ms MOV S1 MOV S10 MOV S11 MOV N1 0 MOV S20 <$STR(A232)> MOV S21 <$STR(A233)> MOV S22 <$STR(A234)> MOV S23 <$STR(G232)> MOV S24 <$STR(G233)> MOV S25 <$STR(G234)> SetStringBlank S20 16 0 SetStringBlank S21 16 0 SetStringBlank S22 16 0 SetStringBlank S23 6 1 SetStringBlank S24 6 1 SetStringBlank S25 6 1 #SAY <Img:459:0:0:0> <玫瑰情人/SCOLOR=254> <Hot~/SCOLOR=249> <您的魅力值:/SCOLOR=71> {<$HUMAN(MG)>朵玫瑰/SCOLOR=253} <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13> <魅力第①名:/SCOLOR=71> {<$STR(S20)>/SCOLOR=253} <玫瑰数量:/SCOLOR=71>{<$STR(S23)> 朵玫瑰/SCOLOR=253} <魅力第②名:/SCOLOR=71> {<$STR(S21)>/SCOLOR=253} <玫瑰数量:/SCOLOR=71>{<$STR(S24)> 朵玫瑰/SCOLOR=253} <魅力第③名:/SCOLOR=71> {<$STR(S22)>/SCOLOR=253} <玫瑰数量:/SCOLOR=71>{<$STR(S25)> 朵玫瑰/SCOLOR=253} <每朵鲜花需消耗/SCOLOR=71><100元宝/SCOLOR=250>，<接收人可得到/SCOLOR=71><25元宝/SCOLOR=250><,更有几率抽取到/SCOLOR=71> <幸运鲜花/SCOLOR=250><,获取最高/SCOLOR=71><1000倍本金/SCOLOR=250><的奖励哦!/SCOLOR=71> <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13> <开始赠送鲜花/@赠送> <关闭对话/@exit> <魅力值前三的玩家分别获得全属性3-3 , 2-2 , 1-1/SCOLOR=151> [@赠送] #if #ACT MOV S10 <$STR(S1)> MOV S11 <$STR(N1)> INC S11 朵玫瑰 SetStringBlank S10 16 0 SetStringBlank S11 16 0 #SAY <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13> <Img:459:0:0:0> <玫瑰情人/SCOLOR=254> <Hot~/SCOLOR=249> <谁是英雄?谁是狗熊?比比就知道!/SCOLOR=31> <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13> <当前接收鲜花的玩家名字:/SCOLOR=151> {<$STR(S10)>/SCOLOR=253} 『<修改/@@inputstring1>』 <当前赠送对方的鲜花数量:/SCOLOR=151> {<$STR(S11)>/SCOLOR=253} 『<修改/@@INPUTINTEGER1>』 <┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13> <确定赠送/@赠送_ok> <返回首页/@main> <关闭对话/@exit> [@赠送_ok] #if EQUAL S1 #ACT MESSAGEBOX [错误]:请输入你要赠送的玩家的名字! GOTO @赠送 BREAK #if SMALL N1 10 #ACT MESSAGEBOX 最少10朵起送! MOV N1 0 GOTO @赠送 Break #If CheckLevelEx > 0 #Act MOV N3 <$STR(N1)> MUL N3 100 ;SENDMSG 6 <$STR(N1)>:<$STR(P1)> #IF CHECKGAMEGOLD < <$STR(N3)> #ACT MESSAGEBOX 错误:你没有足够的元宝,无法赠送! Break #iF CHECKONLINE <$STR(S1)> #ACT MOV N3 <$STR(N1)> Gmexecute showeffect 84 GOTO @开始_赠送 #ELSEACT MESSAGEBOX 你要赠送的玩家不在线! MOV S1 GOTO @赠送 [@开始_赠送] #if CHECKONLINE <$STR(S1)> #ELSEACT MESSAGEBOX 你要赠送的玩家不在线! bREAK #IF CHECKGAMEGOLD < 100 #ACT MESSAGEBOX 你的元宝数量不够! bREAK #IF LARGE N3 0 #ACT GAMEGOLD – 100 DEC N3 1 ;Sendmsg 6 一共向<$STR(S1)>赠送<$STR(N1)>朵玫瑰,现在还有<$STR(N3)>朵等待送出! S1.MOV S0 <$USERNAME> S1.MOV S1 <$STR(N1)> S1.GOTO @ADD_MG DELAYCALL 100 @开始_赠送 bREAK #IF #ACT ClearDelayGoto Break [@ADD_MG] #IF Random 100 #ACT GAMEGOLD + 1000 GUILDNOTICEMSG 250 252 恭喜<$USERNAME>获得幸运玫瑰,得到1000元宝额外奖励! #IF #ACT GAMEGOLD + 25 CALCVAR HUMAN MG + 1 SAVEVAR HUMAN MG ..QuestDiary迷失脚本玫瑰情人玫瑰数量.txt GUILDNOTICEMSG 253 246 玩家【<$STR(S0)>】向【<$USERNAME>】赠送了[<$STR(S1)>]朵玫瑰，他一共收到[<$HUMAN(MG)>]朵玫瑰 bREAK [@@InPutInteger1] #If CheckLevelEx > 0 #Act DelayGoto 1 ~InPutInteger1 [~InPutInteger1] #if LARGE N1 9 #ACT GOTO @赠送 #ELSEACT MESSAGEBOX 最少10朵起送! MOV N1 0 GOTO @赠送 [@CALLinputstring1] #IF #ACT DELAYCALL 1 ~inputstring1 [~inputstring1] #IF EQUAL S1 #act GOTO @赠送 MESSAGEBOX 你要赠送的玩家不在线! Break #iF CHECKONLINE <$STR(S1)> #ACT GOTO @赠送 #ELSEACT MESSAGEBOX 你要赠送的玩家不在线! MOV S1 GOTO @赠送 [@赠送_ok] #if EQUAL S1 #ACT MESSAGEBOX [错误]:请输入你要赠送的玩家的名字! GOTO @赠送 BREAK #if EQUAL S1 <$USERNAME> #ACT MESSAGEBOX [错误]:如果你要赠送给自己,请选择匿名赠送! GOTO @赠送 BREAK [@REFUSH] #CALL [迷失脚本玫瑰情人读取排行.txt] @MS_MG_PH
