网站首页 > 学技术 > 正文页面
热度:

官位捐献脚本\带效果图

 

官位捐献脚本

官位捐献脚本


(@buy @sell @upgradenow @getbackupgnow @repair @s_repair @@InPutString @@InPutInteger @ReclaimItem )

%100

+10

+11

+15

[@main]

#IF

#ACT

GetRandomText .\QuestDiary\元宝捐款\第一排名.txt S21

GetRandomText .\QuestDiary\元宝捐款\第二排名.txt S22

GetRandomText .\QuestDiary\元宝捐款\第三排名.txt S23

GetRandomText .\QuestDiary\元宝捐款\第四排名.txt S24

GetRandomText .\QuestDiary\元宝捐款\第五排名.txt S25

GetRandomText .\QuestDiary\元宝捐款\第一排名元宝数.txt S31

GetRandomText .\QuestDiary\元宝捐款\第二排名元宝数.txt S32

GetRandomText .\QuestDiary\元宝捐款\第三排名元宝数.txt S33

GetRandomText .\QuestDiary\元宝捐款\第四排名元宝数.txt S34

GetRandomText .\QuestDiary\元宝捐款\第五排名元宝数.txt S35

MOV A200

MOV A201

MOV A202

MOV A203

MOV A204

MOV G200

MOV G201

MOV G202

MOV G203

MOV G204

GOTO @main1

BREAK

 

[@main1]

 \

<【 scolor="242">

   

 

[@必读]

\  \ 

合区后因2个区同时存在排行,所以排行显示是主区排行 \

但是您原来的区的捐赠数量不会减少,只要你重新捐赠一次 \

系统将自动检测您的再合并后游戏中的排行,并进行调整 \

假如不捐赠您的排行默认为第六名! \

合区后假如您的名字后面加a,b,c,d后就无任何排名! \

所以建议大家在不同区建立不同人物防止重复,谢谢支持\

 

 

[@JKPM]

只公布排行前五名捐献名单、玩家可以查看详情介绍捐款奖励及捐款说明\ \

 

[@查看]

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第六排名.txt

#SAY

╔═══════════════════════════╗\

║                           ║\

║         感谢您对本服的支持          ║\

║    

║                           ║\

║                     

╚═══════════════════════════╝\

#ELSEACT

messagebox 对不起,捐献排行里没有您的名单!

GOTO @WYJK

BREAK

 

 

[@SHUOM]

\

 

[@WYJK]

 \

<每次捐款最少为 scolor="250">

 

[@InPutInteger15]

#IF

EQUAL N15

#ACT

messagebox 请输入捐款金额!

GOTO @WYJK

BREAK

 

#IF

SMALL N15 50

#ACT

messagebox 对不起您没有足够的元宝!

GOTO @WYJK

BREAK

 

#IF

CHECKGAMEGOLD >

#ACT

GOTO @JKKS

BREAK

 

#IF

CHECKGAMEGOLD =

#ACT

GOTO @JKKS

BREAK

#ELSEACT

messagebox 您没有那么多的元宝!

BREAK

 

[@JKKS]

#IF

#ACT

GAMEGOLD -

CALCVAR HUMAN JK +

SAVEVAR HUMAN JK ..\QuestDiary\数据文件\元宝捐款.txt

GOTO @JKJC

BREAK

 

[@JKJC]

#IF

CHECKVAR HUMAN JK > 49

CHECKNAMELIST ..\QuestDiary\元宝捐款\第六排名.txt

#ACT

GOTO @JKPAIM

BREAK

 

#IF

CHECKVAR HUMAN JK > 49

#ACT

Addnamelist ..\QuestDiary\元宝捐款\第六排名.txt

GOTO  @开始封号

MESSAGEBOX 感谢您对本服大力支持,您现在可以享受俸禄待遇了!

BREAK

close

#ELSEACT

MESSAGEBOX 感谢您对本服大力支持,您现在可以享受俸禄待遇了!

BREAK

close

 

[@JKPAIM]

#IF

CHECKVAR HUMAN JK >

#ACT

GOTO @BAOCUN

MESSAGEBOX 感谢您对本服大力支持,您现在可以享受俸禄待遇了!

GOTO  @开始封号

BREAK

close

#ELSEACT

GOTO @JKPAIM1

BREAK

 

[@JKPAIM1]

#IF

CHECKVAR HUMAN JK >

#ACT

GOTO @BAOCUN1

GOTO  @开始封号

MESSAGEBOX 感谢您对本服大力支持,您现在可以享受俸禄待遇了!

BREAK

close

#ELSEACT

GOTO @JKPAIM2

BREAK

 

[@JKPAIM2]

#IF

CHECKVAR HUMAN JK >

#ACT

GOTO @BAOCUN2

GOTO  @开始封号

MESSAGEBOX 感谢您对本服大力支持,您现在可以享受俸禄待遇了!

BREAK

close

#ELSEACT

GOTO @JKPAIM3

BREAK

 

[@JKPAIM3]

#IF

CHECKVAR HUMAN JK >

#ACT

GOTO @BAOCUN3

GOTO  @开始封号

MESSAGEBOX 感谢您对本服大力支持,您现在可以享受俸禄待遇了!

BREAK

close

#ELSEACT

GOTO @JKPAIM4

BREAK

 

[@JKPAIM4]

#IF

CHECKVAR HUMAN JK >

#ACT

GOTO @BAOCUN4

GOTO  @开始封号

MESSAGEBOX 感谢您对本服大力支持,您现在可以享受俸禄待遇了!

BREAK

close

#ELSEACT

MESSAGEBOX 感谢您对本服大力支持,您现在可以享受俸禄待遇了!

BREAK

close

 

[@BAOCUN]

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第一排名.txt

#ACT

ClearNameList ..\QuestDiary\元宝捐款\第一排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第一排名.txt

Addnamelist ..\QuestDiary\元宝捐款\第一排名.txt

AddTextList .\QuestDiary\元宝捐款\第一排名元宝数.txt

BREAK

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第二排名.txt

#ACT

ClearNameList ..\QuestDiary\元宝捐款\第一排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第一排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名.txt

Addnamelist ..\QuestDiary\元宝捐款\第一排名.txt

AddTextList .\QuestDiary\元宝捐款\第二排名.txt

AddTextList .\QuestDiary\元宝捐款\第一排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第二排名元宝数.txt

BREAK

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第三排名.txt

#ACT

ClearNameList ..\QuestDiary\元宝捐款\第一排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第一排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第一排名.txt

AddTextList .\QuestDiary\元宝捐款\第二排名.txt

AddTextList .\QuestDiary\元宝捐款\第一排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第二排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第三排名.txt

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

BREAK

 

 

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第四排名.txt

#ACT

ClearNameList ..\QuestDiary\元宝捐款\第一排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第一排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第一排名.txt

AddTextList .\QuestDiary\元宝捐款\第二排名.txt

AddTextList .\QuestDiary\元宝捐款\第一排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第二排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第三排名.txt

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第四排名.txt

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

BREAK

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第五排名.txt

#ACT

ClearNameList ..\QuestDiary\元宝捐款\第一排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第一排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第一排名.txt

AddTextList .\QuestDiary\元宝捐款\第一排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第二排名.txt

AddTextList .\QuestDiary\元宝捐款\第二排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第三排名.txt

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第四排名.txt

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第五排名.txt

AddTextList .\QuestDiary\元宝捐款\第五排名元宝数.txt

BREAK

 

 

 

 

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第六排名.txt

#ACT

ClearNameList ..\QuestDiary\元宝捐款\第一排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第一排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第一排名.txt

AddTextList .\QuestDiary\元宝捐款\第一排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第二排名.txt

AddTextList .\QuestDiary\元宝捐款\第二排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第三排名.txt

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第四排名.txt

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第五排名.txt

AddTextList .\QuestDiary\元宝捐款\第五排名元宝数.txt

AddTextList .\QuestDiary\元宝捐款\第六排名.txt

BREAK

 

 

 

 

 

 

 

 

[@BAOCUN1]

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第二排名.txt

#ACT

ClearNameList ..\QuestDiary\元宝捐款\第二排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名.txt

Addnamelist ..\QuestDiary\元宝捐款\第二排名.txt

AddTextList .\QuestDiary\元宝捐款\第二排名元宝数.txt

BREAK

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第三排名.txt

#ACT

 

ClearNameList ..\QuestDiary\元宝捐款\第二排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第二排名.txt 

AddTextList .\QuestDiary\元宝捐款\第二排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第三排名.txt

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

BREAK

 

 

 

 

 

 

 

 

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第四排名.txt

#ACT

 

ClearNameList ..\QuestDiary\元宝捐款\第二排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第二排名.txt 

AddTextList .\QuestDiary\元宝捐款\第二排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第三排名.txt

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

 

 

AddTextList .\QuestDiary\元宝捐款\第四排名.txt

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

BREAK

 

 

 

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第五排名.txt

#ACT

 

ClearNameList ..\QuestDiary\元宝捐款\第二排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第五排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第二排名.txt 

AddTextList .\QuestDiary\元宝捐款\第二排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第三排名.txt

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

 

 

AddTextList .\QuestDiary\元宝捐款\第四排名.txt

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第五排名.txt

AddTextList .\QuestDiary\元宝捐款\第五排名元宝数.txt

BREAK

 

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第六排名.txt

#ACT

 

ClearNameList ..\QuestDiary\元宝捐款\第二排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第二排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第五排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第二排名.txt 

AddTextList .\QuestDiary\元宝捐款\第二排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第三排名.txt

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

 

 

AddTextList .\QuestDiary\元宝捐款\第四排名.txt

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第五排名.txt

AddTextList .\QuestDiary\元宝捐款\第五排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第六排名.txt

BREAK

 

 

 

[@BAOCUN2]

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第三排名.txt

#ACT

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

Addnamelist ..\QuestDiary\元宝捐款\第三排名.txt

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

BREAK

 

 

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第四排名.txt

#ACT

 

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第三排名.txt 

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第四排名.txt

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

BREAK

 

 

 

 

 

 

 

 

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第五排名.txt

#ACT

 

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

 

 

ClearNameList ..\QuestDiary\元宝捐款\第五排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名.txt

 

 

Addnamelist ..\QuestDiary\元宝捐款\第三排名.txt 

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第四排名.txt

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

 

 

AddTextList .\QuestDiary\元宝捐款\第五排名.txt

AddTextList .\QuestDiary\元宝捐款\第五排名元宝数.txt

BREAK

 

 

 

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第六排名.txt

#ACT

 

 

 

ClearNameList ..\QuestDiary\元宝捐款\第三排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第三排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第五排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第三排名.txt 

AddTextList .\QuestDiary\元宝捐款\第三排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第四排名.txt

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

 

 

AddTextList .\QuestDiary\元宝捐款\第五排名.txt

AddTextList .\QuestDiary\元宝捐款\第五排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第六排名.txt

BREAK

 

 

[@BAOCUN3]

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第四排名.txt

#ACT

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

Addnamelist ..\QuestDiary\元宝捐款\第四排名.txt

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

 

BREAK

 

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第五排名.txt

#ACT

 

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第五排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第四排名.txt 

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第五排名.txt

AddTextList .\QuestDiary\元宝捐款\第五排名元宝数.txt

BREAK

 

 

 

 

 

 

 

 

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第六排名.txt

#ACT

 

ClearNameList ..\QuestDiary\元宝捐款\第四排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第四排名.txt

 

ClearNameList ..\QuestDiary\元宝捐款\第五排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第四排名.txt 

AddTextList .\QuestDiary\元宝捐款\第四排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第六排名.txt

BREAK

 

 

 

[@BAOCUN4]

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第五排名.txt

#ACT

ClearNameList ..\QuestDiary\元宝捐款\第五排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名.txt

Addnamelist ..\QuestDiary\元宝捐款\第五排名.txt

AddTextList .\QuestDiary\元宝捐款\第五排名元宝数.txt

BREAK

 

 

 

#IF

CHECKNAMELIST ..\QuestDiary\元宝捐款\第六排名.txt

#ACT

 

 

 

ClearNameList ..\QuestDiary\元宝捐款\第五排名元宝数.txt

ClearNameList ..\QuestDiary\元宝捐款\第五排名.txt

 

Addnamelist ..\QuestDiary\元宝捐款\第五排名.txt 

AddTextList .\QuestDiary\元宝捐款\第五排名元宝数.txt

 

AddTextList .\QuestDiary\元宝捐款\第六排名.txt

BREAK

 

[@开始封号]

#IF

#ACT

#CALL [\元宝捐款\爵位封号.txt] @爵位封号

传奇爱好者原创技术文章,您还可以把下载来看