社区服务 统计排行
  • 2460阅读
  • 0回复
gm研究 离线

级别: 编辑

  • UID8
  • 精华 0
  • 发帖4230
  • 铜币1530 枚
  • 威望0 点
  • 贡献值209 点
  • 银元0 个
  • 好评度0 点
  • 在线时间457(时)
  • 注册时间2019-03-09
  • 最后登录2020-09-18
正序阅读   只看楼主      0楼 发表于: 2019-03-10
更多操作

[技术研究] 传三自动排冲级赛发奖品系统脚本

本帖被 admin 从 【传三】 移动到本区(2019-03-25)
自动排冲级赛发奖品系统脚本
[@main]
#if
checknamelist maxman.txt
#say
你已经领过领奖品了,做人不要太黑心了!不信你看排名榜
#act
LoadValue A1 "QuestDiary冲级比赛.txt" 战士领取 [战士1]
LoadValue A2 "QuestDiary冲级比赛.txt" 战士领取 [战士2]
LoadValue A3 "QuestDiary冲级比赛.txt" 战士领取 [战士3]
LoadValue A4 "QuestDiary冲级比赛.txt" 法师领取 [法师1]
LoadValue A5 "QuestDiary冲级比赛.txt" 法师领取 [法师2]
LoadValue A6 "QuestDiary冲级比赛.txt" 法师领取 [法师3]
LoadValue A7 "QuestDiary冲级比赛.txt" 道士领取 [道士1]
LoadValue A8 "QuestDiary冲级比赛.txt" 道士领取 [道士2]
LoadValue A9 "QuestDiary冲级比赛.txt" 道士领取 [道士3]
#say
现在战士前三名已经排满 排名如下:
======== 战 士 ================= 法 师 ============== 道 士 ======
__第一名:<$output(A1)>____第一名:<$output(A4)>____第一名:<$output(A7)>
___第二名:<$output(A2)>____第二名:<$output(A5)>____第二名:<$output(A8)>
_____第三名:<$output(A3)>____第三名:<$output(A6)>____第三名:<$output(A9)>
#elseact
goto @jclevel
[@jclevel]
#if
checklevel 55
#act
goto @zyce
[@zyce]
#if
checkjob warr
#act
goto @zhans
break
#if
checkjob wizard
#act
goto @fas
break
#if
checkjob taos
#act
goto @taos
break

[@zhans]
#act
LoadValue D0 "QuestDiary冲级比赛.txt" 战士领取 [战士]
LoadValue A1 "QuestDiary冲级比赛.txt" 战士领取 [战士1]
LoadValue A2 "QuestDiary冲级比赛.txt" 战士领取 [战士2]
LoadValue A3 "QuestDiary冲级比赛.txt" 战士领取 [战士3]
#if
equal D0 3
#say
现在战士前三名已经排满 排名如下:
________第一名:<$output(A1)>
_________第二名:<$output(A2)>
___________第三名:<$output(A3)>

<退出/@exit>
#elseact
goto @zhansn
[@zhansn]
#act
LoadValue D0 "QuestDiary冲级比赛.txt" 战士领取 [战士]
#if
EQUAL D0 0
#act
goto @zhans0
break
#if
equal D0 1
#act
goto @zhans1
break
#if
equal D0 2
#act
goto @zhans2
break
#IF
EQUAL D0 3
#act
goto @zhans
break
[@zhans0]
#if
checklevel 55
#act
mov A1 %USERNAME
LoadValue D0 "QuestDiary冲级比赛.txt" 战士领取 [战士]
#if
EQUAL D0 0
#say
你是第一个来我这里领奖品的也恭喜你第一个冲到55级:

<我要领取/@zhans0g>
<退出/@exit>
[@zhans0g]
#if
#act
LoadValue D0 "QuestDiary冲级比赛.txt" 战士领取 [战士]
#if
EQUAL D0 0
#act
LoadValue D0 "QuestDiary冲级比赛.txt" 战士领取 [战士]
SaveValue "QuestDiary冲级比赛.txt" 战士领取 战士 1
SaveValue "QuestDiary冲级比赛.txt" 战士领取 战士1 [%USERNAME]
addnamelist MAXman.txt
goto @givez1
#say
你领取了诺玛屠龙一把,六棱戒一个,200点积分,1000W金币!!!
#elseact
goto @zhans1
[@zhans1]
#act
LoadValue D0 "QuestDiary冲级比赛.txt" 战士领取 [战士]
LoadValue A1 "QuestDiary冲级比赛.txt" 战士领取 [战士1]
#if
EQUAL D0 1
#say
你是第二名来我这里领奖品的也恭喜你呵呵:
________第一名:<$output(A1)>
<好的谢谢/@zhans1g>
<退出/@exit>

[@zhans1g]
#if
checklevel 55
#act
mov A1 %USERNAME
LoadValue D0 "QuestDiary冲级比赛.txt" 战士领取 [战士]
#if
EQUAL D0 1
#act
LoadValue D0 "QuestDiary冲级比赛.txt" 战士领取 [战士]
SaveValue "QuestDiary冲级比赛.txt" 战士领取 战士 2
SaveValue "QuestDiary冲级比赛.txt" 战士领取 战士2 [%USERNAME]
addnamelist MAXman.txt
goto @givez2
#say
你领取了诺玛屠龙一把,六棱戒一个100点积分,1000W金币!!!
#elseact
goto @zhans2
[@zhans2]
#act
LoadValue D0 "QuestDiary冲级比赛.txt" 战士领取 [战士]
LoadValue A1 "QuestDiary冲级比赛.txt" 战士领取 [战士1]
LoadValue A2 "QuestDiary冲级比赛.txt" 战士领取 [战士2]
#if
EQUAL D0 2
#say
你是第三名来我这里领奖品的也恭喜你呵呵:
________第一名:<$output(A1)>
_________第二名:<$output(A2)>
<好的谢谢/@zhans2g>
<退出/@exit>

[@zhans2g]
#if
checklevel 55
#act
mov A1 %USERNAME
LoadValue D0 "QuestDiary冲级比赛.txt" 战士领取 [战士]
#if
EQUAL D0 2
#act
LoadValue D0 "QuestDiary冲级比赛.txt" 战士领取 [战士]
SaveValue "QuestDiary冲级比赛.txt" 战士领取 战士 3
SaveValue "QuestDiary冲级比赛.txt" 战士领取 战士3 [%USERNAME]
addnamelist MAXman.txt
goto @givez3
#say
你领取了诺玛屠龙,六棱戒,50点积分1000W金币!!!
#elsesay
对不起,现在战士已经有三名了!你已经比他们领取的慢了!真的不好意思

[@givez1]
#if
checknamelist maxman.txt
#act
give 诺玛屠龙
give 六棱戒
give 游戏点卷 20
[@givez2]
#if
checknamelist maxman.txt
#act
give 诺玛屠龙
give 六棱戒
give 游戏点卷 10
[@givez3]
#if
checknamelist maxman.txt
#act
give 诺玛屠龙
give 六棱戒
give 游戏点卷 5
[@fas]
#act
LoadValue D1 "QuestDiary冲级比赛.txt" 法师领取 [法师]
LoadValue A4 "QuestDiary冲级比赛.txt" 法师领取 [法师1]
LoadValue A5 "QuestDiary冲级比赛.txt" 法师领取 [法师2]
LoadValue A6 "QuestDiary冲级比赛.txt" 法师领取 [法师3]
#if
equal D1 3
#say
现在法师前三名已经排满 排名如下:
________第一名:<$output(A4)>
_________第二名:<$output(A5)>
___________第三名:<$output(A6)>

<退出/@exit>
#elseact
goto @fasn
[@fasn]
#act
LoadValue D1 "QuestDiary冲级比赛.txt" 法师领取 [法师]
#if
EQUAL D1 0
#act
goto @fas0
break
#if
equal D1 1
#act
goto @fas1
break
#if
equal D1 2
#act
goto @fas2
break
#IF
EQUAL D1 3
#act
goto @fas
break
[@fas0]
#if
checklevel 55
#act
LoadValue D1 "QuestDiary冲级比赛.txt" 法师领取 [法师]
#if
EQUAL D1 0
#say
你是第一个来我这里领奖品的也恭喜你第一个冲到55级:

<我要领取/@fas0g>
<退出/@exit>
[@fas0g]
#if
#act
LoadValue D1 "QuestDiary冲级比赛.txt" 法师领取 [法师]
#if
EQUAL D1 0
#act
LoadValue D1 "QuestDiary冲级比赛.txt" 法师领取 [法师]
SaveValue "QuestDiary冲级比赛.txt" 法师领取 法师 1
SaveValue "QuestDiary冲级比赛.txt" 法师领取 法师1 [%USERNAME]
addnamelist MAXman.txt
goto @givef1
#say
你领取了诺玛嗜魂一杷,心魔戒指200点积分+1000W金币!!!
#elseact
goto @fas1
[@fas1]
#act
LoadValue D1 "QuestDiary冲级比赛.txt" 法师领取 [法师]
LoadValue A4 "QuestDiary冲级比赛.txt" 法师领取 [法师1]
#if
EQUAL D1 1
#say
你是第二名来我这里领奖品的也恭喜你呵呵:
________第一名:<$output(A4)>
<好的谢谢/@fas1g>
<退出/@exit>

#2  
[@fas1g]
#if
checklevel 55
#act
LoadValue D1 "QuestDiary冲级比赛.txt" 法师领取 [法师]
#if
EQUAL D1 1
#act
LoadValue D1 "QuestDiary冲级比赛.txt" 法师领取 [法师]
SaveValue "QuestDiary冲级比赛.txt" 法师领取 法师 2
SaveValue "QuestDiary冲级比赛.txt" 法师领取 法师2 [%USERNAME]
addnamelist MAXman.txt
goto @givef2
#say
你领取了诺玛嗜魂一杷,心魔戒指,100点积分 1000W金币等奖品!!!
#elseact
goto @fas2
[@fas2]
#act
LoadValue D1 "QuestDiary冲级比赛.txt" 法师领取 [法师]
LoadValue A4 "QuestDiary冲级比赛.txt" 法师领取 [法师1]
LoadValue A5 "QuestDiary冲级比赛.txt" 法师领取 [法师2]
#if
EQUAL D1 2
#say
你是第三名来我这里领奖品的也恭喜你呵呵:
________第一名:<$output(A4)>
_________第二名:<$output(A5)>
<好的谢谢/@fas2g>
<退出/@exit>

[@fas2g]
#if
checklevel 55
#act
LoadValue D1 "QuestDiary冲级比赛.txt" 法师领取 [法师]
#if
EQUAL D1 2
#act
LoadValue D1 "QuestDiary冲级比赛.txt" 法师领取 [法师]
SaveValue "QuestDiary冲级比赛.txt" 法师领取 法师 3
SaveValue "QuestDiary冲级比赛.txt" 法师领取 法师3 [%USERNAME]
addnamelist MAXman.txt
goto @givef3
#say
你领取了诺玛嗜魂一杷,心魔戒指,50点积分,1000W金币等奖品!!!
#elsesay
对不起,现在法师已经有三名了!你已经比他们领取的慢了!真的不好意思

[@givef1]
#if
checknamelist maxman.txt
#act
give 诺玛嗜魂法杖 1
give 心魔戒指 1
give 游戏点卷 20
[@givef2]
#if
checknamelist maxman.txt
#act
give 诺玛嗜魂法杖 1
give 心魔戒指 1
give 游戏点卷 10
[@givef3]
#if
checknamelist maxman.txt
#act
give 诺玛嗜魂法杖 1
give 心魔戒指 1
give 游戏点卷 5
[@taos]
#act
LoadValue D2 "QuestDiary冲级比赛.txt" 道士领取 [道士]
LoadValue A7 "QuestDiary冲级比赛.txt" 道士领取 [道士1]
LoadValue A8 "QuestDiary冲级比赛.txt" 道士领取 [道士2]
LoadValue A9 "QuestDiary冲级比赛.txt" 道士领取 [道士3]
#if
equal D2 3
#say
现在道士前三名已经排满 排名如下:
________第一名:<$output(A7)>
_________第二名:<$output(A8)>
___________第三名:<$output(A9)>

<退出/@exit>
#elseact
goto @taosn
[@taosn]
#act
LoadValue D2 "QuestDiary冲级比赛.txt" 道士领取 [道士]
#if
EQUAL D2 0
#act
goto @taos0
break
#if
equal D2 1
#act
goto @taos1
break
#if
equal D2 2
#act
goto @taos2
break
#IF
EQUAL D2 3
#act
goto @taos
break
[@taos0]
#if
checklevel 55
#act
LoadValue D2 "QuestDiary冲级比赛.txt" 道士领取 [道士]
#if
EQUAL D2 0
#say
你是第一个来我这里领奖品的也恭喜你第一个冲到55级:

<我要领取/@taos0g>
<退出/@exit>
[@taos0g]
#if
#act
LoadValue D2 "QuestDiary冲级比赛.txt" 道士领取 [道士]
#if
EQUAL D2 0
#act
LoadValue D2 "QuestDiary冲级比赛.txt" 道士领取 [道士]
SaveValue "QuestDiary冲级比赛.txt" 道士领取 道士 1
SaveValue "QuestDiary冲级比赛.txt" 道士领取 道士1 [%USERNAME]
addnamelist MAXman.txt
goto @gived1
#say
你领取了诺玛龙纹一杷,虚空道环一个,200点积分+1000W金币!!!
#elseact
goto @taos1
[@taos1]
#act
LoadValue D2 "QuestDiary冲级比赛.txt" 道士领取 [道士]
LoadValue A7 "QuestDiary冲级比赛.txt" 道士领取 [道士1]
#if
EQUAL D2 1
#say
你是第二名来我这里领奖品的也恭喜你呵呵:
________第一名:<$output(A7)>
<好的谢谢/@taos1g>
<退出/@exit>

[@taos1g]
#if
checklevel 55
#act
LoadValue D2 "QuestDiary冲级比赛.txt" 道士领取 [道士]
#if
EQUAL D2 1
#act
LoadValue D2 "QuestDiary冲级比赛.txt" 道士领取 [道士]
SaveValue "QuestDiary冲级比赛.txt" 道士领取 道士 2
SaveValue "QuestDiary冲级比赛.txt" 道士领取 道士2 [%USERNAME]
addnamelist MAXman.txt
goto @gived2
#say
你领取了诺玛龙纹一杷,虚空道环一个,100点积分+1000W金币!!!
#elseact
goto @taos2
[@taos2]
#act
LoadValue D2 "QuestDiary冲级比赛.txt" 道士领取 [道士]
LoadValue A8 "QuestDiary冲级比赛.txt" 道士领取 [道士1]
LoadValue A9 "QuestDiary冲级比赛.txt" 道士领取 [道士2]
#if
EQUAL D2 2
#say
你是第三名来我这里领奖品的也恭喜你呵呵:
________第一名:<$output(A7)>
_________第二名:<$output(A8)>
<好的谢谢/@taos2g>
<退出/@exit>

[@taos2g]
#if
checklevel 55
#act
LoadValue D2 "QuestDiary冲级比赛.txt" 道士领取 [道士]
#if
EQUAL D2 2
#act
LoadValue D2 "QuestDiary冲级比赛.txt" 道士领取 [道士]
SaveValue "QuestDiary冲级比赛.txt" 道士领取 道士 3
SaveValue "QuestDiary冲级比赛.txt" 道士领取 道士3 [%USERNAME]
addnamelist MAXman.txt
goto @gived3
#say
你领取了诺玛龙纹一杷,虚空道环一个,50点积分+1000W金币!!!!!!
#elsesay
对不起,现在道士已经有三名了!你已经比他们领取的慢了!真的不好意思

[@gived1]
#if
checknamelist maxman.txt
#act
give 诺玛龙纹 1
give 虚空道环 1
give 游戏点卷 20
[@gived2]
#if
checknamelist maxman.txt
#act
give 诺玛龙纹 1
give 虚空道环 1
give 游戏点卷 10
[@gived3]
#if
checknamelist maxman.txt
#act
give 诺玛龙纹 1
give 虚空道环 1
give 游戏点卷 5
注意  要在 market_DEF文件夹里建一个 maxman.txt 文件  
描述
快速回复

如果您提交过一次失败了,可以用”恢复数据”来恢复帖子内容
认证码:

验证问题:
本站地址是? 正确答案:1opk.com
 回复后跳转到最后一页