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