传奇科举考试脚本

显示全部楼层 · 3 小时前

[@科举考试]
{
#IF
checklevelex > 64
#act
BREAK
#SAY
该活动暂时只对低于65级的玩家开放!

#IF
checklevelex > 29
#act
#SAY
欢迎参加首届科举考试,大侠有胆量挑战一下吗?\ \
参加科举,不仅能获得大量丰厚经验,还能获得"状元"等封号!\ \
\
\
\
\
\
支持:runmang.om\
;\
#ELSESAY
参加科举考试需要等级30级以上！
[@我要挑战您]
#if
dayofweek sun
#act
goto @检测周7科考
break
#if
dayofweek mon
#act
goto @检测周1科考
break
#if
dayofweek tue
#act
goto @检测周2科考
break
#if
dayofweek wed
#act
goto @检测周3科考
break
#if
dayofweek thu
#act
goto @检测周4科考
break
#if
dayofweek fri
#act
goto @检测周5科考
break
#if
dayofweek sat
#act
goto @检测周6科考
break
[@检测周7科考]
#IF
check [537] 0
#act
reset [537] 7
set [537] 1
;收费科考次数初始化
CALCVAR HUMAN KKCS = 0
SAVEVAR HUMAN KKCS ..\QuestDiary\数据文件\科举考试\科考次数Save.txt
goto @进行免费科考
#ELSEact
goto @进行收费科考
[@检测周1科考]
#IF
check [538] 0
#act
reset [537] 7
set [538] 1
;收费科考次数初始化
CALCVAR HUMAN KKCS = 0
SAVEVAR HUMAN KKCS ..\QuestDiary\数据文件\科举考试\科考次数Save.txt
goto @进行免费科考
#ELSEact
goto @进行收费科考
[@检测周2科考]
#IF
check [538] 0
#act
reset [537] 7
set [538] 1
;收费科考次数初始化
CALCVAR HUMAN KKCS = 0
SAVEVAR HUMAN KKCS ..\QuestDiary\数据文件\科举考试\科考次数Save.txt
goto @进行免费科考
#ELSEact
goto @进行收费科考
[@检测周3科考]
#IF
check [540] 0
#act
reset [537] 7
set [540] 1
;收费科考次数初始化
CALCVAR HUMAN KKCS = 0
SAVEVAR HUMAN KKCS ..\QuestDiary\数据文件\科举考试\科考次数Save.txt
goto @进行免费科考
#ELSEact
goto @进行收费科考
[@检测周4科考]
#IF
check [541] 0
#act
reset [537] 7
set [541] 1
;收费科考次数初始化
CALCVAR HUMAN KKCS = 0
SAVEVAR HUMAN KKCS ..\QuestDiary\数据文件\科举考试\科考次数Save.txt
goto @进行免费科考
#ELSEact
goto @进行收费科考
[@检测周5科考]
#IF
check [542] 0
#act
reset [537] 7
set [542] 1
;收费科考次数初始化
CALCVAR HUMAN KKCS = 0
SAVEVAR HUMAN KKCS ..\QuestDiary\数据文件\科举考试\科考次数Save.txt
goto @进行免费科考
#ELSEact
goto @进行收费科考
[@检测周6科考]
#IF
check [543] 0
#act
reset [537] 7
set [543] 1
;收费科考次数初始化
CALCVAR HUMAN KKCS = 0
SAVEVAR HUMAN KKCS ..\QuestDiary\数据文件\科举考试\科考次数Save.txt
goto @进行免费科考
#ELSEact
goto @进行收费科考
;-----------------------------------------------------------------------------------------------
[@进行免费科考]
#IF
check [544] 1
#act
#SAY
\
您还没有领取上一轮的考试奖励!\ \
请领到奖励后才可以开始下一轮科举考试!\ \
\
#ACT
break
#if
;检测院试已经标题标题题目数量
CHECKVAR HUMAN YSTS < 10
;检测是否属于第一轮免费考试
CHECKVAR HUMAN KKCS = 0
#ACT
CALCVAR HUMAN EXPBS = 1
SAVEVAR HUMAN EXPBS ..\QuestDiary\数据文件\科举考试\经验倍数Save.txt
goto @院试随机抽题
break
;-----------------------------------------------------------------------------------------------
[@进行收费科考]
#IF
check [544] 1
#act
#SAY
\
您还没有领取上一轮的考试奖励!\ \
请领到奖励后才可以开始下一轮科举考试!\ \
\
#ACT
break
#if
;检测院试已经标题标题题目数量
CHECKVAR HUMAN YSTS > 0
CHECKVAR HUMAN YSTS < 10
#ACT
goto @院试随机抽题
break
#if
;检测院试已经标题标题题目数量
CHECKVAR HUMAN YSTS = 10
#ACT
goto @检测院试成绩
break
#IF
;检测院试已经标题标题题目数量
CHECKVAR HUMAN YSTS = 0
;科考次数
CHECKVAR HUMAN KKCS = 0
#ACT
goto @院试随机抽题
break
#IF
;检测院试已经标题标题题目数量
CHECKVAR HUMAN YSTS = 0
;科考次数
CHECKVAR HUMAN KKCS > 0
#ACT
goto @进行收费科考A
[@进行收费科考A]
#IF
;科考次数
CHECKVAR HUMAN KKCS > 0
#SAY
您已经免费进行过今天的科举考试了! \
如果你想继续考试,请使用科举考试入场令牌!\
:根据考试成绩,获得100%经验量!\
:根据考试成绩,获得200%经验量!\
:根据考试成绩,获得600%经验量!\
  \
  \
  \
\[/url]
#ACT
break
[@青铜补考]
#IF
checkitem 青铜入场令牌 1
#SAY
您做好准备了吗,马上开始新的一轮考试了!\  \

#ELSESAY
噢,您没有青铜入场令牌啊?\
哎,这次上面抓得很严啊,不是我不帮您\
等明天再来考试吧\
[@青铜补考A]
#IF
checkitem 青铜入场令牌 1
#ACT
TAKE 青铜入场令牌 1
CALCVAR HUMAN EXPBS = 1
SAVEVAR HUMAN EXPBS ..\QuestDiary\数据文件\科举考试\经验倍数Save.txt
goto @院试随机抽题
#ELSESAY
穷鬼,还要骗我,当我老眼昏花啊!\
还想补考?门都没有!滚!\
;------------------------------------------------------------------------------------
[@白银补考]
#IF
checkitem 白银入场令牌 1
#SAY
您做好准备了吗,马上开始新的一轮考试了!\  \

#ELSESAY
噢,您没有白银入场令牌啊?\
哎,这次上面抓得很严啊,不是我不帮您\
等明天再来考试吧\
[@白银补考A]
#IF
checkitem 白银入场令牌 1
#ACT
TAKE 白银入场令牌 1
CALCVAR HUMAN EXPBS = 2
SAVEVAR HUMAN EXPBS ..\QuestDiary\数据文件\科举考试\经验倍数Save.txt
goto @院试随机抽题
#ELSESAY
穷鬼,还要骗我,当我老眼昏花啊!\
还想补考?门都没有!滚!\
;------------------------------------------------------------------------------------
[@黄金补考]
#IF
checkitem 黄金入场令牌 1
#SAY
您做好准备了吗,马上开始新的一轮考试了!\  \

#ELSESAY
噢,您没有黄金入场令牌啊?\
哎,这次上面抓得很严啊,不是我不帮您\
等明天再来考试吧\
[@黄金补考A]
#IF
checkitem 黄金入场令牌 1
#ACT
TAKE 黄金入场令牌 1
CALCVAR HUMAN EXPBS = 6
SAVEVAR HUMAN EXPBS ..\QuestDiary\数据文件\科举考试\经验倍数Save.txt
goto @院试随机抽题
#ELSESAY
穷鬼,还要骗我,当我老眼昏花啊!\
还想补考?门都没有!滚!\
;------------------------------------------------------------------------------------------------
[@院试随机抽题]
#if
;检测院试已经标题标题题目数量
CHECKVAR HUMAN YSTS < 10
#ACT
set [545] 0
MOV D3 0
MOV D3 20
CALCVAR HUMAN YSTS + 1
SAVEVAR HUMAN YSTS ..\QuestDiary\数据文件\科举考试\院试题数Save.txt
GetRandomText .\QuestDiary\科举考试\院试题库.txt S15
DelayCall 1000 @院试1分钟计时
#SAY
院试第道标题标题题目:　　　　　　　　　　　倒计时：\ \
\

#ELSEACT
goto @检测院试成绩
[@院试1分钟计时]
#IF
CHECK [545] 1
#ACT
BREAK
#IF
LARGE D3 0
#ACT
DEC D3 1
DelayCall 1000 @院试1分钟计时
#SAY
院试第道标题标题题目:　　　　　　　　　　　倒计时：\ \
\
#ELSEact
#ELSESAY
　\
院试第道标题标题题目,!\ \
下一道试题要速度一点哦!\
做好准备了吗?马上要开始下一道试题考试\ \

[@检测院试成绩]
#IF
#ACT
MOV D0 0
MUL D0  10
goto @检测院试成绩A
[@检测院试成绩A]
#IF
LARGE D0 50
#ACT
set [544] 1
#SAY
本轮科举考试的院试部分结束!\
院试10试题,您一共答对了:道,正确率:%\
果然才高八斗,聪颖过人!\ \
\
#ELSEACT
set [544] 1
#ELSESAY
本轮科举考试的院试部分结束!\
院试10试题,您一共答对了:道,正确率:%\
不错,下次努力,争取更好的成绩!\ \
\
;-----------------------------------------------------------------------------------------------------
[@领取考试奖励]
#IF
CHECK [544] 1
#ACT
goto @领取考试奖励A
#ELSEact
#ELSESAY
您已经领取过奖励或是您的考试还没有结束!
[@领取考试奖励A]
#IF
CHECKLEVELEX > 55
#ACT
;经验系数,表示一题能获得100W经验.
MOV D13 0
MOV D13 4000000
;SendMsg 5 检测D13:
GOTO @领取考试奖励B
BREAK
#IF
CHECKLEVELEX > 50
#ACT
MOV D13 0
MOV D13 3000000
;SendMsg 5 检测D13:
GOTO @领取考试奖励B
BREAK
#IF
CHECKLEVELEX > 45
#ACT
MOV D13 0
MOV D13 2500000
;SendMsg 5 检测D13:
GOTO @领取考试奖励B
BREAK
#IF
CHECKLEVELEX > 0
#ACT
MOV D13 0
MOV D13 1500000
;SendMsg 5 检测D13:
GOTO @领取考试奖励B
BREAK
[@领取考试奖励B]
#IF
CHECKLEVELEX > 0
#ACT
;SendMsg 5 检测D13:
MOV D0 0
MOV D4 0
MOV D5 0
MOV D6 0
MOV D7 0
MUL D0  10
MUL D4
MUL D4
MOV D6
;SendMsg 5 检测D4:
#IF
#ACT
DelayCall 100 @领取考试奖励D
[@领取考试奖励D]
#IF
#act
#SAY
科举考试成绩:\
院试10试题,您一共答对了:道,正确率:%\
你的经验倍数为:倍\
根据院试成绩,以及人物等级\
您在本轮科举考试总共获得:点经验\
同时您在本轮考试中获得:点才气 \

[@我现在就领取]
#IF
#ACT
SET [544] 0
CALCVAR HUMAN EXPBS = 1
SAVEVAR HUMAN EXPBS ..\QuestDiary\数据文件\科举考试\经验倍数Save.txt
CALCVAR HUMAN KKCS + 1
SAVEVAR HUMAN KKCS ..\QuestDiary\数据文件\科举考试\科考次数Save.txt
CALCVAR HUMAN YSTS = 0
SAVEVAR HUMAN YSTS ..\QuestDiary\数据文件\科举考试\院试题数Save.txt
CALCVAR HUMAN YSZQ = 0
SAVEVAR HUMAN YSZQ ..\QuestDiary\数据文件\科举考试\院试正确Save.txt
CHANGEEXP +
;科考积分------------
;SendMsg 5 检测科考才气值:
INC HUMAN KKJF
SAVEVAR HUMAN KKJF ..\QuestDiary\数据文件\科举考试\科考积分Save.txt
SendMsg 5 当前才气值:
GuildNoticeMsg 255 219 [经验]:[]在科举考试中获得经验!
MOV D1 0
MOV D2 0
MOV D3 0
MOV D4 0
MOV D5 0
MOV D6 0
MOV D7 0
#CALL [\科举考试\科考积分.txt] @科考积分
;---------------------------------------------------------------------------------------
;---------------------------------------------------------------------------------------
[@正确]
#if
;检测院试已经标题标题题目数量
;CHECKVAR HUMAN YSTS < 9
#ACT
set [545] 1
CALCVAR HUMAN YSZQ + 1
SAVEVAR HUMAN YSZQ ..\QuestDiary\数据文件\科举考试\院试正确Save.txt
#SAY
　\
院试第道标题标题题目,!\[/url] \
做好准备了吗?马上要开始下一道试题考试\ \

[@错误A]
#IF
#ACT
goto @错误
[@错误B]
#IF
#ACT
goto @错误
[@错误C]
#IF
#ACT
goto @错误
[@错误]
#IF
#ACT
set [545] 1
#SAY
　\
院试第道标题标题题目,!\ \
下一道试题看仔细点哦!\
做好准备了吗?马上要开始下一道试题考试\ \

;------------------------------------------------------------------------------
;------------------------------------------------------------------------------
[@讲规则]
#IF
#ACT
#SAY
科举考试分为院试、乡试、会试、殿试四个部分，目前科举考试\
开放院试。通过每轮科考的考生可获得“生员、秀才、举人、\
贡士、进士、探花、榜眼、状元”称号。\
科考奖励：大量的经验奖励是您无法想象的!\
　　考试部分\
　　一、院试 \
　　　　院试部分一共十道试题。　　　　　　　　　　\
[@讲规则1]
#IF
#ACT
#SAY
　　每题答题时间为２０秒，如果时间内没有提交答案，则\
视该题为错误．\
　　二、乡试(目前未开放) \
　　如果院试答对６道以上，可以进行乡试，否则考试结束！\
　　乡试部分共２０道试题，每题答题时间为２０秒．\
　　乡试答完后，一轮考试结束，系统根据考试成绩给出奖励！\
　　每答对一题，获得１点才气值．科举学位根据才气值评定！\
　　科举考试中，能获得大量的经验奖励，院试考题经验为乡试\
　　考题经验的二倍．　　　　　　　　　　　　　　　\
}