传奇智力风暴脚本

[@参加智力风暴流动]
#if
CheckLevelEx > 0
#act
mov D10 21
dec D10 <$STR(G10)>
#IF
large G10 0
#ACT
dec D10 1
#IF
#SAY
只要你等级达到38级就可以来我这里参加智力风暴流动。\
我会随机给你10道题，标题题目涉及各个领域。\
每答对<1道题>就可以获得<10元宝>的奖励。\
\ \
<留意>：本流动只有20个名额，现在剩余<$STR(D10)>个名额\
\ \
<开始答题/@答题检测>\
<返回[url=]/@main[/url]>
[@答题检测]
#if
CheckNameList ..\QuestDiary\14587.com\智力风暴.txt
#ACT
MessageBox [失败]你已经答过题了！
break
#IF
large G10 20
#ACT
MessageBox [失败]智力风暴获得的名额已满！
break
#IF
CheckLevelEx > 37
#ACT
inc G10 1
AddNameList ..\QuestDiary\14587.com\智力风暴.txt
MOV D3 0
GOTO @开始答题
#ELSEACT
MessageBox [失败]你的等级未到38级不能进行答题！
[@开始答题]
#IF
large D3 9
#ACT
CLEARDELAYGOTO
MessageBox 10道题你已经全部答完了，谢谢你的介入！
break
close
#IF
CheckLevelEx > 0
#ACT
inc D3 1
movr D1 100
#call [\14587.com\智力风暴标题题目.txt] @智力风暴标题题目
movr D10 4
mov D1 20
goto @显示标题题目
[@显示标题题目]
#IF
equal D10 0
#say
<题号>：第<$STR(d3)>题\
<标题题目>：<$STR(S14)>\
\ \
　　　<选择A/@HD2>.<$STR(S16)>\
　　　<选择B/@HD1>.<$STR(S15)>\
　　　<选择C/@HD4>.<$STR(S18)>\
　　　<选择D/@HD3>.<$STR(S17)>\
\ \
　　　<抛却回答/@开始答题>　剩余答题时间：<$STR(D1)> 秒\
#ACT
DELAYGOTO 1 @时间控制
break
#IF
equal D10 1
#say
<题号>：第<$STR(d3)>题\
<标题题目>：<$STR(S14)>\
\ \
　　　<选择A/@HD3>.<$STR(S17)>\
　　　<选择B/@HD1>.<$STR(S15)>\
　　　<选择C/@HD2>.<$STR(S16)>\
　　　<选择D/@HD4>.<$STR(S18)>\
\ \
　　　<抛却回答/@开始答题>　剩余答题时间：<$STR(D1)> 秒\
#ACT
DELAYGOTO 1 @时间控制
break
#IF
equal D10 2
#say
<题号>：第<$STR(d3)>题\
<标题题目>：<$STR(S14)>\
\ \
　　　<选择A/@HD1>.<$STR(S15)>\
　　　<选择B/@HD3>.<$STR(S17)>\
　　　<选择C/@HD4>.<$STR(S18)>\
　　　<选择D/@HD2>.<$STR(S16)>\
\ \
　　　<抛却回答/@开始答题>　剩余答题时间：<$STR(D1)> 秒\
#ACT
DELAYGOTO 1 @时间控制
break
#IF
equal D10 3
#say
<题号>：第<$STR(d3)>题\
<标题题目>：<$STR(S14)>\
\ \
　　　<选择A/@HD1>.<$STR(S15)>\
　　　<选择B/@HD2>.<$STR(S16)>\
　　　<选择C/@HD3>.<$STR(S17)>\
　　　<选择D/@HD4>.<$STR(S18)>\
\ \
　　　<抛却回答/@开始答题>　剩余答题时间：<$STR(D1)> 秒\
#ACT
DELAYGOTO 1 @时间控制
break
[@时间控制]
#IF
equal D10 0
#ACT
SENDMSG 6 〖提示〗答题时间已过，自动进去下一题！
goto @开始答题
#ELSEACT
dec d1 1
goto @显示标题题目
[@HD1]
#IF
equal D2 1
#ACT
GOTO @准确
#ELSEACT
GOTO @错误
[@HD2]
#IF
equal D2 2
#ACT
GOTO @准确
#ELSEACT
GOTO @错误
[@HD3]
#IF
equal D2 3
#ACT
GOTO @准确
#ELSEACT
GOTO @错误
[@HD4]
#IF
equal D2 4
#ACT
GOTO @准确
#ELSEACT
GOTO @错误
[@准确]
#if
CheckLevelEx > 0
#ACT
GameGold + 10
SENDMSG 6 〖提示〗获得：元宝　数目：10
SENDMSG 2 恭喜%s在智力风暴流动中回答准确，获得了10个元宝的奖励！
SENDMSG 4 恭喜%s在智力风暴流动中回答准确，获得了10个元宝的奖励！
goto @开始答题
[@错误]
#if
CheckLevelEx > 0
#ACT
SENDMSG 6 〖提示〗很遗憾，回答错误！
goto @开始答题