行会冲级奖励的脚本

传奇服务端

(@buy @sell @repair @s_repair @@offlinemsg @@InPutInteger1 )
%100
[@main]
这里是<行会冲级奖励>服务，当你加入<行会>并且达到一定的<等级>后，\
你可以申请给你的行会加<积分>，当积分达到一定数量时<行会老大>可以\
领取相对应的积分装备<奖励/@看奖励>\
<加入行会冲级活动[url=]/@jifen[/url]> | <清除所有数据/@清除> | \
<查看行会冲级奖励/@看奖励> | <查看剩余奖励名额/@看名额>\
<退出[url=]/@exit>\[/url]
[@看名额]
通过这里可以查看目前的奖励剩余情况\
一等奖已产生[<$STR(G98)>]个，总数是1个名额\
二等奖已产生[<$STR(G97)>]个，总数是2个名额\
三等奖已产生[<$STR(G96)>]个，总数是3个名额\
[@看奖励]
行会积分达到20积分时可领取：秒〓杀套、金砖10个。\
行会积分达到40积分时可领取：狂〓嗨套、金砖10个。\
行会积分达到60积分时可领取：狂〓嗨①套、金砖10个。\
<注意，行会领取奖励不能重复，列如：行会累计到20分时，领取>\
<了三等奖的话。就算你行会积分到后来累计到60分，也不能再领>\
<取二等奖和一等奖了，本次活动共设立了一个一等奖，二个二等>\
<奖和三个三等奖的<名额/@看名额>，例如，当有三个行会都领取了三等奖后>\
<其他行会就算积分达到20分也无法在领取三等奖了>\
<返回[url=]/@main[/url]>  |  <退出[url=]/@exit>\[/url]
[@清除]
#if
isadmin
#act
set [111] 0
mov G0 0
mov G1 0
mov G2 0
mov G3 0
mov G4 0
mov G5 0
mov G6 0
mov G7 0
mov G8 0
mov G9 0
mov G10 0
mov G11 0
mov G12 0
mov G13 0
mov G14 0
mov G15 0
mov G16 0
mov G17 0
mov G18 0
mov G19 0
mov G20 0
mov G21 0
mov G22 0
mov G23 0
mov G24 0
mov G25 0
mov G26 0
mov G27 0
mov G28 0
mov G29 0
mov G30 0
mov G96 0
mov G97 0
mov G98 0
#ELSESAY
权限不够！\ \
[@jifen]
#IF
HAVEGUILD
#ACT
goto @hanghuiming
#ELSESAY
对不起，你还没加入行会！只有加入行会后才可以参加活动！\
[@hanghuiming]
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单1.txt
#act
#CALL [\\冲级奖励\OK1装备领取.txt] @OK1
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单2.txt
#act
#CALL [\\冲级奖励\OK2装备领取.txt] @OK2
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单3.txt
#act
#CALL [\\冲级奖励\OK3装备领取.txt] @OK3
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单4.txt
#act
#CALL [\\冲级奖励\OK4装备领取.txt] @OK4
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单5.txt
#act
#CALL [\\冲级奖励\OK5装备领取.txt] @OK5
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单6.txt
#act
#CALL [\\冲级奖励\OK6装备领取.txt] @OK6
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单7.txt
#act
#CALL [\\冲级奖励\OK7装备领取.txt] @OK7
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单8.txt
#act
#CALL [\\冲级奖励\OK8装备领取.txt] @OK8
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单9.txt
#act
#CALL [\\冲级奖励\OK9装备领取.txt] @OK9
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单10.txt
#act
#CALL [\\冲级奖励\OK10装备领取.txt] @OK10
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单11.txt
#act
#CALL [\\冲级奖励\OK11装备领取.txt] @OK11
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单12.txt
#act
#CALL [\\冲级奖励\OK12装备领取.txt] @OK12
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单13.txt
#act
#CALL [\\冲级奖励\OK13装备领取.txt] @OK13
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单14.txt
#act
#CALL [\\冲级奖励\OK14装备领取.txt] @OK14
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单15.txt
#act
#CALL [\\冲级奖励\OK15装备领取.txt] @OK15
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单16.txt
#act
#CALL [\\冲级奖励\OK16装备领取.txt] @OK16
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单17.txt
#act
#CALL [\\冲级奖励\OK17装备领取.txt] @OK17
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单18.txt
#act
#CALL [\\冲级奖励\OK18装备领取.txt] @OK18
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单19.txt
#act
#CALL [\\冲级奖励\OK19装备领取.txt] @OK19
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单20.txt
#act
#CALL [\\冲级奖励\OK20装备领取.txt] @OK20
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单21.txt
#act
#CALL [\\冲级奖励\OK21装备领取.txt] @OK21
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单22.txt
#act
#CALL [\\冲级奖励\OK22装备领取.txt] @OK22
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单23.txt
#act
#CALL [\\冲级奖励\OK23装备领取.txt] @OK23
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单24.txt
#act
#CALL [\\冲级奖励\OK24装备领取.txt] @OK24
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单25.txt
#act
#CALL [\\冲级奖励\OK25装备领取.txt] @OK25
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单26.txt
#act
#CALL [\\冲级奖励\OK26装备领取.txt] @OK26
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单27.txt
#act
#CALL [\\冲级奖励\OK27装备领取.txt] @OK27
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单28.txt
#act
#CALL [\\冲级奖励\OK28装备领取.txt] @OK28
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单29.txt
#act
#CALL [\\冲级奖励\OK29装备领取.txt] @OK29
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\行会名单30.txt
#act
#CALL [\\冲级奖励\OK30装备领取.txt] @OK30
break
#if
CHECKGUILDLIST ..\QuestDiary\冲级奖励\已获奖励名单.txt
#act
#say
你的行会已经领取了奖励，不能再参与活动了！
#ElseAct
GOTO @jianli
[@jianli]
#IF
equal G0 0
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单1.txt
GOTO @hanghuiming
break
#IF
equal G0 1
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单2.txt
GOTO @hanghuiming
break
#IF
equal G0 2
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单3.txt
GOTO @hanghuiming
break
#IF
equal G0 3
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单4.txt
GOTO @hanghuiming
break
#IF
equal G0 4
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单5.txt
GOTO @hanghuiming
break
#IF
equal G0 5
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单6.txt
GOTO @hanghuiming
break
#IF
equal G0 6
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单7.txt
GOTO @hanghuiming
break
#IF
equal G0 7
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单8.txt
GOTO @hanghuiming
break
#IF
equal G0 8
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单9.txt
GOTO @hanghuiming
break
#IF
equal G0 9
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单10.txt
GOTO @hanghuiming
break
#IF
equal G0 10
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单11.txt
GOTO @hanghuiming
break
#IF
equal G0 11
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单12.txt
GOTO @hanghuiming
break
#IF
equal G0 12
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单13.txt
GOTO @hanghuiming
break
#IF
equal G0 13
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单14.txt
GOTO @hanghuiming
break
#IF
equal G0 14
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单15.txt
GOTO @hanghuiming
break
#IF
equal G0 15
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单16.txt
GOTO @hanghuiming
break
#IF
equal G0 16
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单17.txt
GOTO @hanghuiming
break
#IF
equal G0 17
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单18.txt
GOTO @hanghuiming
break
#IF
equal G0 18
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单19.txt
GOTO @hanghuiming
break
#IF
equal G0 19
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单20.txt
GOTO @hanghuiming
break
#IF
equal G0 20
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单21.txt
GOTO @hanghuiming
break
#IF
equal G0 21
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单22.txt
GOTO @hanghuiming
break
#IF
equal G0 22
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单23.txt
GOTO @hanghuiming
break
#IF
equal G0 23
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单24.txt
GOTO @hanghuiming
break
#IF
equal G0 24
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单25.txt
GOTO @hanghuiming
break
#IF
equal G0 25
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单26.txt
GOTO @hanghuiming
break
#IF
equal G0 26
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单27.txt
GOTO @hanghuiming
break
#IF
equal G0 27
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单28.txt
GOTO @hanghuiming
break
#IF
equal G0 28
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单29.txt
GOTO @hanghuiming
break
#IF
equal G0 29
#ACT
inc G0 1
ADDGUILDLIST ..\QuestDiary\冲级奖励\行会名单30.txt
GOTO @hanghuiming
break
#IF
equal G0 30
#ACT
#say
行会冲级名单已满！