antyvfl 发表于 2022-10-8 23:29:57

传奇一条龙王城诏令脚本

近日,中州王城频遭魔军怪物作乱,传世英雄
与恶魔的大战即将全面爆发!为帮助勇士们快
速提高战斗能力,国王命禁军教头每天发布10
个训练任务。完成每个任务都可以得到奖赏,
如果能够完成全部10个任务,传奇一条龙更能得到超级经
验大奖!还有机会获得各种极品装备!
(记住:每位勇士每天只能领取10个任务,不要轻言放弃)
任务种类如下:
一、消灭附近洞窟魔怪(灭魔任务);
二、收集各类材料(收集任务);
<我要接任务/@Daily10Task_acceptDailytask>
<领取任务奖励/@mainright_Daily10Task_getPrize>
<离开/@exit>

[@Daily10Task_acceptDailytask]
#IF
CheckLevelEx < 15
#ACT
break
#SAY
年轻人,外面的世界充满了很多危险。
等你到了15级之后再来吧。
<好,后会有期/@exit>

#IF
equal $Task(43) -1
equal $Task(44) -1
equal $Task(45) -1
equal $Task(50) -1
#SAY
<王城诏令/@_RW_taskDesp_4007>

<离开/@exit>
#ELSESAY
您已有任务在身,还是完成上一个诏令
再来接新的任务吧!
<再 见/@exit>

[@_RW_taskDesp_4007]
让我看看今天有什么任务可以交给你的,不用害怕,任务通
常都不会太难。每次任务可能是让你去
消灭几只怪物,可能是要帮助收集某些物品。具体的在任务
栏里可以就看到,祝你成功!
每日任务由10个任务组成一轮,时间为每天早上8 点至第二
天早上8点,每人每天只能完成一轮任务。
<接受任务/@mainright_RW_accept_4012>                <离开/@exit>

[@mainright_Daily10Task_getPrize]
#IF
!equal $Task(43) -1
!equal $Task(44) -1
!equal $Task(45) -1
!equal $Task(50) -1
#SAY
请您接过诏令再来吧。
<再 见/@exit>
#ELSEACT
goto @mainright_交任务

[@mainright_RW_accept_4012]
#IF
checknamelist ..QuestDiary游戏数据王城诏令.txt
#ACT
break
#SAY
今天你已经完成过一轮任务了,还是休息一下,
明天再来找我吧!
<再 见/@exit>

#IF
CHECKVAR HUMAN 王城诏令次数 > 9
#ACT
break
#SAY
勇士已经接过不少任务了,还是休息一下,
明天再来找我吧!
<再 见/@exit>

#IF
random 1
#ACT
CALCVAR HUMAN 王城诏令次数 + 1

#IF
random 10
#ACT
goto @特殊任务
break

#IF
random 6
#ACT
goto @收集任务
break

#IF
random 1
#ACT
goto @灭魔任务
break

[@灭魔任务]
#IF
random 1
#ACT
CALCVAR HUMAN RENWU003 = 0
movr P0 42
inc P0 1
AddTask 43
UpdateTask 43 $STR(P0)

#IF
equal $Task(43) 1
#ACT
CALCVAR HUMAN RENWU005 = 20
break
#SAY
这次你要完成的任务是找到20只毒蜘蛛,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 2
#ACT
CALCVAR HUMAN RENWU005 = 15
break
#SAY
这次你要完成的任务是去蛇魔谷蛇之骸找到15只红蛇妖并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 3
#ACT
CALCVAR HUMAN RENWU005 = 6
break
#SAY
此次任务地点是二道廊线,如果你能消灭6个火烈鸟。就算你首功一件。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 4
#ACT
CALCVAR HUMAN RENWU005 = 8
break
#SAY
金刚人一般出现在中枢大殿及炼狱八层地图,如果你能够消灭8个金刚人。就算你首功一件。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 5
#ACT
CALCVAR HUMAN RENWU005 = 5
break
#SAY
这次你要完成的任务是找到5只巨蟒,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 6
#ACT
CALCVAR HUMAN RENWU005 = 5
break
#SAY
这次你要完成的任务是找到5只巨猿,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 7
#ACT
CALCVAR HUMAN RENWU005 = 3
break
#SAY
猛魔枪卒这种怪在地下魔域有很多,如果你能够消灭3个猛魔枪卒。就算你首功一件。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 8
#ACT
CALCVAR HUMAN RENWU005 = 18
break
#SAY
目前,逆魔雕像分布在逆魔古刹、炼狱十七层、炼狱魔境七层,如果你能够消灭18个逆魔雕像。就算你首功一件。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 9
#ACT
CALCVAR HUMAN RENWU005 = 15
break
#SAY
对,你要杀的就是那些可恶的逆魔弓箭手,你必须前往炼狱魔境七层地图消灭它。如果你能够消灭15个逆魔弓箭手,就算你首功一件。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 10
#ACT
CALCVAR HUMAN RENWU005 = 15
break
#SAY
这次任务地点在逆魔古刹四层,如果你能够消灭15个逆魔卫士。就算你首功一件完。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 11
#ACT
CALCVAR HUMAN RENWU005 = 20
break
#SAY
这次你要完成的任务是找到20只沙怪,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 12
#ACT
CALCVAR HUMAN RENWU005 = 2
break
#SAY
尸王一般出现在落霞岛矿洞的尸王殿里,如果你能够消灭2个尸王。就算你首功一件。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 13
#ACT
CALCVAR HUMAN RENWU005 = 5
break
#SAY
这次你要完成的任务是去将军坟二层找到5只尸卫勇士,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 14
#ACT
CALCVAR HUMAN RENWU005 = 20
break
#SAY
这次你要完成的任务是找到10只尸卫勇士,并且将它们击倒。它们可能藏匿在将军坟东内。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 15
#ACT
CALCVAR HUMAN RENWU005 = 15
break
#SAY
对,你要杀的就是那些可恶的尸卫战将,本次的任务地点在中州将军坟三层。这些家伙不杀他几十个难解心头恨。如果你能够杀死15个就算你首功一件。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 16
#ACT
CALCVAR HUMAN RENWU005 = 5
break
#SAY
这次你要完成的任务是去机关洞中枢大殿找到5只石人,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 17
#ACT
CALCVAR HUMAN RENWU005 = 20
break
#SAY
这次你要完成的任务是找到20只食人花,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 18
#ACT
CALCVAR HUMAN RENWU005 = 1
break
#SAY
此次任务地点是四方擂台,如果你能消灭1个兽骑兵。就算你首功一件。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 19
#ACT
CALCVAR HUMAN RENWU005 = 1
break
#SAY
庞大的兽骑统领分布在通天塔四层以上、炼狱魔境九层,如果你能够消灭1个兽骑统领就算你首功一件。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 20
#ACT
CALCVAR HUMAN RENWU005 = 8
break
#SAY
这次你要完成的任务是去炼狱魔境三层找到8只铜人,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 21
#ACT
CALCVAR HUMAN RENWU005 = 20
break
#SAY
这次你要完成的任务是找到20只土狼,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 22
#ACT
CALCVAR HUMAN RENWU005 = 20
break
#SAY
这次你要完成的任务是找到20只沙蝎,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 23
#ACT
CALCVAR HUMAN RENWU005 = 8
break
#SAY
这次你要完成的任务是去炼狱魔境三层找到8只青铜兽,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 24
#ACT
CALCVAR HUMAN RENWU005 = 2
break
#SAY
这次你要完成的任务是去将军坟三层找到2只尸卫战将,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 25
#ACT
CALCVAR HUMAN RENWU005 = 12
break
#SAY
这次你要完成的任务是找到12只洞蛆,并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 26
#ACT
CALCVAR HUMAN RENWU005 = 15
break
#SAY
对,你要杀的就是那些可恶的幽魂,本次的任务地点在炼狱魔境沼泽。这些家伙不杀他几十个难解心头恨。如果你能够杀死15个就算你首功一件。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 27
#ACT
CALCVAR HUMAN RENWU005 = 10
break
#SAY
这次你要完成的任务是去地下魔域一层找到10只鬼方火卒并且将它们击倒。完成任务后回到这里,还能得到奖励。<离开/@exit>

#IF
equal $Task(43) 28
#ACT
CALCVAR HUMAN RENWU005 = 2
break
#SAY
枣红马一般出现在中州地图大地表,如果你能够消灭2个枣红马。就算你首功一件。到时你将领取丰厚的奖励。当前你已经消灭了<$HUMAN(RENWU003)>/2个枣红马。<离开/@exit>

#IF
equal $Task(43) 29
#ACT
CALCVAR HUMAN RENWU005 = 8
break
#SAY
此次任务地点是一手遮天,如果你能消灭8个火烈鸟。就算你首功一件。到时你将领取丰厚的奖励。<离开/@exit>

#IF
equal $Task(43) 30
#ACT
CALCVAR HUMAN RENWU005 = 1
break
#SAY
五蛇殿最近出现许多凶猛的白蛇妖,如果你能够消灭1个白蛇妖。就算你首功一件。到时你能够领取丰厚的奖励。当前你已经消灭了<$HUMAN(RENWU003)>/1白蛇妖。<离开/@exit>

#IF
equal $Task(43) 31
#ACT
CALCVAR HUMAN RENWU005 = 15
break
#SAY
炼狱魔境八层、禁地练功区地图,如果你你能够消灭15个藤妖的话。就算你首功一件。到时你将领取丰厚的奖励。当前你已经消灭了<$HUMAN(RENWU003)>/15个藤妖。<离开/@exit>

#IF
equal $Task(43) 32
#ACT
CALCVAR HUMAN RENWU005 = 1
break
#SAY
沙鱼王一般出现在跃马平原及未知暗殿,如果你能够消灭1个沙鱼王。就算你首功一件。到时你将领取丰厚的奖励。当前你已经消灭了<$HUMAN(RENWU003)>1个沙鱼王。<离开/@exit>

#IF
equal $Task(43) 33
#ACT
CALCVAR HUMAN RENWU005 = 15
break
#SAY
这次你要完成的任务是去机关洞神工堂找10只铜锤手,并且将它们击倒。完成任务后回到这里,还能得到奖励。当前你已经消灭了<$HUMAN(RENWU003)>/10个铜锤手。<离开/@exit>

#IF
equal $Task(43) 34
#ACT
CALCVAR HUMAN RENWU005 = 10
break
#SAY
这次你要完成的任务是去机关洞角斗场找到10只青铜兽,并且将它们击倒。完成任务后回到这里,还能得到奖励。当前你已经消灭了<$HUMAN(RENWU003)>/10个青铜兽。<离开/@exit>

#IF
equal $Task(43) 35
#ACT
CALCVAR HUMAN RENWU005 = 5
break
#SAY
这次你要完成的任务是找到5只毒妖,并且将它们击倒。完成任务后回到这里,还能得到奖励。当前你已经消灭了<$HUMAN(RENWU003)>/5个毒妖。<离开/@exit>

#IF
equal $Task(43) 36
#ACT
CALCVAR HUMAN RENWU005 = 15
break
#SAY
这次你要完成的任务是去热砂荒漠找到15只大土蛇,并且将它们击倒。完成任务后回到这里,还能得到奖励。当前你已经消灭了<$HUMAN(RENWU003)>/15只大土蛇。<离开/@exit>

#IF
equal $Task(43) 37
#ACT
CALCVAR HUMAN RENWU005 = 15
break
#SAY
这次你要完成的任务是找到15只僵尸,并且将它们击倒。完成任务后回到这里,还能得到奖励。当前你已经消灭了<$HUMAN(RENWU003)>/15只僵尸。<离开/@exit>

#IF
equal $Task(43) 38
#ACT
CALCVAR HUMAN RENWU005 = 20
break
#SAY
目前,尸卫勇士分布在将军坟东、南;炼狱一层、二层;炼狱魔境一层、二层,如果你能够消灭20个尸卫勇士。就算你首功一件。到时你将领取丰厚的奖励。当前你已经消灭了<$HUMAN(RENWU003)>/20个尸卫勇士。<离开/@exit>

#IF
equal $Task(43) 39
#ACT
CALCVAR HUMAN RENWU005 = 8
break
#SAY
金刚人一般出现在中枢大殿及炼狱八层地图,如果你能够消灭8个金刚人。就算你首功一件。到时你将领取丰厚的奖励。当前你已经消灭了<$HUMAN(RENWU003)>/20个尸卫勇士。<离开/@exit>

#IF
equal $Task(43) 40
#ACT
CALCVAR HUMAN RENWU005 = 10
break
#SAY
对,你要杀的就是那些可恶的魔甲虫,你必须要前往炼狱魔镜四层消灭它们。这些家伙不杀他几十个难解心头恨。如果你能够杀死10个就算你首功一件。到时你将领取丰厚的奖励。当前你已经消灭了<$HUMAN(RENWU003)>/10个魔甲虫。<离开/@exit>

#IF
equal $Task(43) 41
#ACT
CALCVAR HUMAN RENWU005 = 16
break
#SAY
这次你要完成的任务是去地下魔域一层找到16只鬼方火卒并且将它们击倒。完成任务后回到这里,还能得到奖励。当前你已经消灭了<$HUMAN(RENWU003)>/16个鬼方火卒。<离开/@exit>

#IF
equal $Task(43) 42
#ACT
CALCVAR HUMAN RENWU005 = 16
break
#SAY
这次你要完成的任务是找到20只蟒,并且将它们击倒。完成任务后回到这里,还能得到奖励。当前你已经消灭了<$HUMAN(RENWU003)>/20只蟒。<离开/@exit>

[@收集任务]
#IF
random 1
#ACT
movr P0 25
inc P0 1
AddTask 44
UpdateTask 44 $STR(P0)
#SAY
传世大陆近日来妖孽横行,魔焰嚣张,中州王城急需扩充军用物资。作为王城的新兵,请你花费些许时间出城搜寻

#IF
equal $Task(44) 1
#SAY
3块纯度15以上的铜矿

#IF
equal $Task(44) 2
#SAY
6份品质12以上的鹿肉

#IF
equal $Task(44) 3
#SAY
3份品质6以上的木材

#IF
equal $Task(44) 4
#SAY
5份品质8以上的木材

#IF
equal $Task(44) 5
#SAY
5份蛆卵

#IF
equal $Task(44) 6
#SAY
3枚蛆卵和5条蟾酥

#IF
equal $Task(44) 7
#SAY
3块纯度恰好为8的铁矿

#IF
equal $Task(44) 8
#SAY
3块纯度15以上的铁矿

#IF
equal $Task(44) 9
#SAY
2块纯度恰好为12的铜矿

#IF
equal $Task(44) 10
#SAY
10份蝎尾

#IF
equal $Task(44) 11
#SAY
5枚牙齿和5条蝎尾

#IF
equal $Task(44) 12
#SAY
2块纯度恰好为12的铁矿

#IF
equal $Task(44) 13
#SAY
5份蟾酥

#IF
equal $Task(44) 14
#SAY
5份牙齿

#IF
equal $Task(44) 15
#SAY
5颗果实和5块品质在10以上的猪肉

#IF
equal $Task(44) 16
#SAY
5颗果实和8块品质在10以上的猪肉

#IF
equal $Task(44) 17
#SAY
3块纯度15以上的铁矿

#IF
equal $Task(44) 18
#SAY
6份品质12以上的猪肉

#IF
equal $Task(44) 19
#SAY
3块纯度10以上的黑铁矿石

#IF
equal $Task(44) 20
#SAY
2块纯度恰好为15的铜矿

#IF
equal $Task(44) 21
#SAY
10片叶子和8块品质在12以上的鹿肉

#IF
equal $Task(44) 22
#SAY
15份蟾酥

#IF
equal $Task(44) 23
#SAY
6份品质4以上的兔肉

#IF
equal $Task(44) 24
#SAY
4枚蛆卵和10条蝎尾

#IF
equal $Task(44) 25
#SAY
20份牙齿

#IF
#SAY
,然后到我这里登记。<离开/@exit>

[@特殊任务]
#IF
random 1
#ACT
movr P0 8
inc P0 1
AddTask 50
UpdateTask 50 $STR(P0)
CALCVAR HUMAN 王城诏令次数 - 1

#IF
equal $Task(50) 2
#ACT
break
#SAY
  自古以来,只有使用高纯度的铁矿、金矿等矿石才可打
造出绝世武器。听说最近铁匠正在打造一把极品裁决,需要
很多金矿做为材料,我等好友都要顶力相助。
  你如果能帮我找一块纯度在35以上的银矿来,我将给
你丰富的报酬做为答谢。

<离开/@exit>

#IF
equal $Task(50) 3
#ACT
break
#SAY
  自古以来,只有使用高纯度的铁矿、金矿等矿石才可打
造出绝世武器。听说最近铁匠正在打造一把极品裁决,需要
很多金矿做为材料,我等好友都要顶力相助。
  你如果能帮我找一块纯度在38以上的黑铁矿石来,我将给
你丰富的报酬做为答谢。

<离开/@exit>


[@mainright_交任务]
#IF
HasTask 43
equal $HUMAN(RENWU003) $HUMAN(RENWU005)
#ACT
goto @mainright_奖励
break

#IF
HasTask 44
#ACT
goto @收集类
break

#IF
HasTask 50
#ACT
goto @特殊类
break
#ELSESAY
任务还未完成,勇士尚需努力啊!
<再 见/@exit>

[@收集类]
#IF
!checkbagsize 6
#ACT
break
#SAY
您的包裹空间不足!
<再 见/@exit>

#IF
equal $Task(44) 1
CHECKITEMDURE 铜矿 15000 3
#ACT
TAKEDUREITEM 铜矿 15000 3
goto @mainright_奖励
break

#IF
equal $Task(44) 2
CHECKITEMDURE 鹿肉 12000 6
#ACT
TAKEDUREITEM 鹿肉 12000 6
goto @mainright_奖励
break

#IF
equal $Task(44) 3
CHECKITEMDURE 木材 6000 3
#ACT
TAKEDUREITEM 木材 6000 3
goto @mainright_奖励
break

#IF
equal $Task(44) 4
CHECKITEMDURE 木材 8000 5
#ACT
TAKEDUREITEM 木材 8000 5
goto @mainright_奖励
break

#IF
equal $Task(44) 5
checkitem 蛆卵 5
#ACT
take 蛆卵 5
goto @mainright_奖励
break

#IF
equal $Task(44) 6
checkitem 蛆卵 3
checkitem 蟾酥 5
#ACT
take 蛆卵 3
take 蟾酥 5
goto @mainright_奖励
break

#IF
equal $Task(44) 7
CHECKITEMDURE 铜矿 7000 3
!CHECKITEMDURE 铜矿 9000 3
#ACT
TAKEDUREITEM 铜矿 8000 3
goto @mainright_奖励
break

#IF
equal $Task(44) 8
CHECKITEMDURE 铁矿 15000 3
#ACT
TAKEDUREITEM 铁矿 15000 3
goto @mainright_奖励
break

#IF
equal $Task(44) 9
CHECKITEMDURE 铜矿 11000 2
!CHECKITEMDURE 铜矿 13000 2
#ACT
TAKEDUREITEM 铜矿 12000 2
goto @mainright_奖励
break

#IF
equal $Task(44) 10
checkitem 蝎尾 10
#ACT
take 蝎尾 10
goto @mainright_奖励
break

#IF
equal $Task(44) 11
checkitem 牙齿 5
checkitem 蝎尾 5
#ACT
take 牙齿 5
take 蝎尾 5
goto @mainright_奖励
break

#IF
equal $Task(44) 12
CHECKITEMDURE 铁矿 12000 2
!CHECKITEMDURE 铁矿 14000 2
#ACT
TAKEDUREITEM 铁矿 13000 2
goto @mainright_奖励
break

#IF
equal $Task(44) 13
checkitem 蟾酥 5
#ACT
take 蟾酥 5
goto @mainright_奖励
break

#IF
equal $Task(44) 14
checkitem 牙齿 5
#ACT
take 牙齿 5
goto @mainright_奖励
break

#IF
equal $Task(44) 15
checkitem 果实 5
CHECKITEMDURE 猪肉 10000 5
#ACT
take 果实 5
TAKEDUREITEM 猪肉 10000 5
goto @mainright_奖励
break

#IF
equal $Task(44) 16
checkitem 果实 5
CHECKITEMDURE 猪肉 10000 8
#ACT
take 果实 5
TAKEDUREITEM 猪肉 10000 8
goto @mainright_奖励
break

#IF
equal $Task(44) 17
CHECKITEMDURE 黑铁矿石 15000 5
#ACT
TAKEDUREITEM 黑铁矿石 15000 5
goto @mainright_奖励
break

#IF
equal $Task(44) 18
CHECKITEMDURE 猪肉 12000 6
#ACT
TAKEDUREITEM 猪肉 12000 6
goto @mainright_奖励
break

#IF
equal $Task(44) 19
CHECKITEMDURE 黑铁矿石 10000 3
#ACT
TAKEDUREITEM 黑铁矿石 10000 3
goto @mainright_奖励
break

#IF
equal $Task(44) 20
CHECKITEMDURE 铜矿 14000 2
!CHECKITEMDURE 铜矿 16000 2
#ACT
TAKEDUREITEM 铜矿 15000 2
goto @mainright_奖励
break

#IF
equal $Task(44) 21
checkitem 叶子 10
CHECKITEMDURE 鹿肉 12000 8
#ACT
take 叶子 10
TAKEDUREITEM 鹿肉 12000 8
goto @mainright_奖励
break

#IF
equal $Task(44) 22
checkitem 蟾酥 15
#ACT
take 蟾酥 15
goto @mainright_奖励
break

#IF
equal $Task(44) 23
CHECKITEMDURE 兔肉 4000 6
#ACT
TAKEDUREITEM 兔肉 4000 6
goto @mainright_奖励
break

#IF
equal $Task(44) 24
checkitem 蛆卵 4
checkitem 蝎尾 10
#ACT
take 蛆卵 4
take 蝎尾 10
goto @mainright_奖励
break

#IF
equal $Task(44) 25
checkitem 牙齿 20
#ACT
take 牙齿 20
goto @mainright_奖励
break
#ELSESAY
任务还未完成,勇士尚需努力啊!
<再 见/@exit>

[@特殊类]
#IF
!checkbagsize 6
#ACT
break
#SAY
您的包裹空间不足!
<再 见/@exit>


[@mainright_奖励]
#IF
#SAY
恭喜你勇士,你已经完成了国王下达的指令。
你可以获得丰厚的回报!你还愿意接取国王
颁布的其他任务吗?说不定下一个任务,国
王将给予你一份厚礼哦。

<我要接取任务/@Daily10Task_acceptDailytask>
<我要离开/@exit>

#IF
CheckLevelEx < 30
#ACT
give 金币 1000
CHANGEEXP + 5000

#IF
CheckLevelEx > 29
CheckLevelEx < 40
#ACT
give 金币 1000
CHANGEEXP + 10000

#IF
CheckLevelEx > 39
CheckLevelEx < 50
#ACT
give 金币 1000
CHANGEEXP + 20000

#IF
CheckLevelEx > 49
#ACT
give 金币 1000
CHANGEEXP + 50000

#IF
HasTask 50
#ACT
goto @特殊奖励

#IF
CHECKVAR HUMAN 王城诏令次数 > 9
#ACT
goto @一轮奖励

#IF
random 1
#ACT
EndTask 43
EndTask 44
EndTask 45
EndTask 50
mov P0 10
dec P0 $HUMAN(王城诏令次数)

#IF
large P0 0
#ACT
SENDMSG 5 每日任务由10个连续任务组成一轮,你只需再做<$STR(P0)>个任务即可领取高额奖励。每天只能完成一轮每日任务。

[@特殊奖励]
#IF
random 50
CheckLevelEx < 50
#ACT
CHANGELEVEL + 1
SENDMSG 5 恭喜你获得直升1级的奖励
break

#IF
random 20
#ACT
goto @技能书
break

#IF
random 10
#ACT
CHANGEEXP + 1000000
SENDMSG 5 恭喜你获得100万经验
break

#IF
random 5
#ACT
give 金币 100000
SENDMSG 5 恭喜你获得100万金币
break

#IF
random 1
#ACT
CHANGEEXP + 500000
SENDMSG 5 恭喜你获得50万经验
break

[@技能书]
#IF
random 3
#ACT
give 遁地 1
SENDMSG 5 恭喜你获得遁地
break

#IF
random 2
#ACT
give 移形换影 1
SENDMSG 5 恭喜你获得移形换影
break

#IF
random 1
#ACT
give 化身蝙蝠 1
SENDMSG 5 恭喜你获得化身蝙蝠
break

[@一轮奖励]
#IF
random 1
#ACT
addnamelist ..QuestDiary游戏数据王城诏令.txt
give 金币 1000

#IF
random 5
#ACT
goto @禁地首饰
goto @公告

#IF
random 1
#ACT
give 神佑 1
give 天之神铁 1
give 金币 1000

#IF
CheckLevelEx < 30
#ACT
CHANGEEXP + 50000
break

#IF
CheckLevelEx < 40
#ACT
CHANGEEXP + 100000
break

#IF
CheckLevelEx < 50
#ACT
CHANGEEXP + 200000
break

#IF
CheckLevelEx > 49
#ACT
CHANGEEXP + 500000
break

[@公告]
#ACT
SendMsg 10 恭喜玩家%s在每日任务中获得了特别大奖<$STR(S0)>!

[@禁地首饰]
#ACT
mov P0 18

#IF
equal P0 0
#ACT
mov S0 圣战头盔
break

#IF
equal P0 1
#ACT
mov S0 圣战项链
break

#IF
equal P0 2
#ACT
mov S0 圣战手镯
break

#IF
equal P0 3
#ACT
mov S0 圣战戒指
break

#IF
equal P0 4
#ACT
mov S0 圣战腰带
break

#IF
equal P0 5
#ACT
mov S0 圣战靴子
break

#IF
equal P0 6
#ACT
mov S0 法神头盔
break

#IF
equal P0 7
#ACT
mov S0 法神项链
break

#IF
equal P0 8
#ACT
mov S0 法神手镯
break

#IF
equal P0 9
#ACT
mov S0 法神戒指
break

#IF
equal P0 10
#ACT
mov S0 法神腰带
break

#IF
equal P0 11
#ACT
mov S0 法神靴子
break

#IF
equal P0 12
#ACT
mov S0 天尊头盔
break

#IF
equal P0 13
#ACT
mov S0 天尊项链
break

#IF
equal P0 14
#ACT
mov S0 天尊手镯
break

#IF
equal P0 15
#ACT
mov S0 天尊戒指
break

#IF
equal P0 16
#ACT
mov S0 天尊腰带
break

#IF
equal P0 17
#ACT
mov S0 天尊道靴
break
}

?落雪、无痕 发表于 2022-10-9 00:35:09

真是难得给力的帖子啊。

nzwennet2011 发表于 2022-10-9 11:13:05

楼主加油,我们都看好你哦。

shbc2008 发表于 2022-10-11 06:57:15

真是难得给力的帖子啊。

php_z 发表于 2022-10-16 17:30:57

真是被感动的痛哭流涕……

383082654 发表于 2022-10-16 23:51:37

我只是路过打酱油的。

gj6tty 发表于 2022-10-17 19:54:27

看到这帖子真是高兴!

51daxiang 发表于 2022-10-17 21:09:15

激动人心,无法言表!

agshy 发表于 2022-10-17 23:54:56

无回帖,不论坛,这才是人道。

108426382 发表于 2022-10-19 09:13:40

感恩无私的分享与奉献 :)
页: [1] 2
查看完整版本: 传奇一条龙王城诏令脚本