传奇拉人奖励脚本

传奇拉人奖励脚本



[@main]

#act

CloseBigDialogBox

#say

?  <为了增加sf游戏的人气，本服鼓励各位拉朋友进服玩游戏，但凡拉/SCOLOR=253>\

<到一名朋友进服玩游戏，达到相应级别会给予你丰厚的奖励！/SCOLOR=253>\

<奖励制度如下>：\

<1、><新人玩家42级时，/SCOLOR=150><引荐人可以获得/SCOLOR=250> <100元宝><的奖励；/SCOLOR=250><2名可领取金钻/@神秘>\

<2、><新人玩家46级时，/SCOLOR=150><引荐人可以获得/SCOLOR=250> <300元宝><+/SCOLOR=250><神秘礼品的奖励/AUTOCOLOR=254,251,167,191,250,70,245,249,253>\

<3、><新人玩家50级时，/SCOLOR=150><引荐人可以获得/SCOLOR=250><1000元宝><+/SCOLOR=250><神秘礼品的奖励/AUTOCOLOR=254,251,167,191,250,70,245,249,253>\

拉来的人<越多>，奖励则<越多>，欢迎各位玩家拉朋友过来玩！\

<提示：><拉来的玩家在本服的/SCOLOR=254><『任一游戏分区』><登记都能有效领取奖励！/SCOLOR=254>\

<提示：><散人玩家想要获得金钻会员，可以自建两个号登记在自己名下领取！/SCOLOR=254>\


  <Img:><领取拉人奖励/@奖励><Img:>      <Img:><新人登记/@报到><Img:>    <Img:><超级神秘大奖查看/@神秘><Img:>\

<注意：><在本区至少有一名玩家登记在您的名下才能激活奖励！/SCOLOR=250>\

[@报到]

<亲爱的[/SCOLOR=150><$USERNAME><]，欢迎来到本游戏！/SCOLOR=150>\

<你应感谢带你来此的朋友，从此让你的生活有了激情！为了/SCOLOR=254><回馈>\

<奖励你的朋友，请在此输入/SCOLOR=254><你朋友><的名字进行登记！/SCOLOR=254>\

<注意>：<你只有一次登记的机会，千万别把名字弄错了哦！/SCOLOR=253>\

╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\

┆　　　　　　<请正确输入引荐你的朋友名字/@@InPutString78>　　　　　┆\

╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\

<提示：><登记的新人玩家需在40级前来此办理登记手续！/SCOLOR=250>

【<返回上页/@main>】\


[@CallInPutString78]

#if

equal G280 1

#act

MESSAGEBOX [失败]：这是测试区，请在新区开放时登记！！

break

#if

CHECKLEVELEX > 39

#act

MESSAGEBOX [失败]：你的等级已起过新人限度40级了!

break

#if

check [68] 1

#act

MESSAGEBOX [失败]：你已登记过了!

break

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\成功登记检查.txt <$USERID><$USERNAME>

#act

MESSAGEBOX [失败]：全服相同的角色名字只允许登记一次\在本服其它分区有与你相同的名字与账号存在，你不能登记！\如果你要登记，必须更换角色名字！！

break

#if

equal S78 <$USERNAME>

#act

MESSAGEBOX [失败]：你不能将自己当成引荐人！

break

#elsesay

<亲爱的[/SCOLOR=150><$USERNAME><]，欢迎来到本游戏！/SCOLOR=150>\ \

<引荐您来此的玩家名字叫：/SCOLOR=254>『<$STR(S78)>』\

<注意>：<你只有一次登记的机会，千万别把你朋友的账号弄错了哦！/SCOLOR=241>\

<最后一步：>\

╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\

┆　　★★★★<请正确输入引荐你的朋友游戏账号/@@InPutString79>★★★┆\

╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\

<提示：><这里的账号是指推荐你来此的朋友游戏账号/SCOLOR=250>

【<返回上页/@报到>】\


[@CallInPutString79]

#if

equal S79 <$USERID>

#act

MESSAGEBOX [失败]：你不能将自己当成引荐人！

break

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\拉人登记检查.txt <$STR(S79)><$STR(S78)>

#act

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\成功登记检查.txt <$USERID><$USERNAME> 0

CreateFile ..\..\..\GM起点\ALLTY\拉人系统\个人的引荐人\<$USERID><$USERNAME>.txt

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\个人的引荐人\<$USERID><$USERNAME>.txt <$STR(S79)><$STR(S78)> 0

close

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\登记列表\<$STR(S79)><$STR(S78)>.txt <$USERNAME> 0

set [68] 1

MESSAGEBOX 已成功登记你的引荐人！

SENDMSG 0 [<$STR(S78)>]为本服又带来了一名玩家[<$USERNAME>]，系统将会有丰厚的奖励送给他，预祝他们玩得开心！

SENDMSG 0 [<$STR(S78)>]为本服又带来了一名玩家[<$USERNAME>]，系统将会有丰厚的奖励送给他，预祝他们玩得开心！

break

#if

CheckOnline <$STR(S78)>

#act

S78.mov S5 <$STR(S79)>

S78.mov S6 <$USERNAME>

S78.goto @检查账号信息

#elsesay

\ \

<Img:2><登记失败！>\

引荐你的朋友名字为：『<$STR(S78)>』  账号为：『<$STR(S79)>』!\

<原因一：>你的引荐人不在线！\

<原因二：>你输入的朋友信息有误！！\

<原因三：>你的引荐人不在本区，他需要在所在区激活拉人奖励\ \

请通知你的引荐人登陆游戏或激活拉人奖励！


[@检查账号信息]

#if

equal S5 <$USERID>

#act

S6.goto @可以登记

#elseact

S6.close

S6.MESSAGEBOX 对不起！登记失败！！\你朋友的信息可能登记错误!!!\请问清楚后再试！！\

break

[@可以登记]

#act

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\成功登记检查.txt <$USERID><$USERNAME> 0

CreateFile ..\..\..\GM起点\ALLTY\拉人系统\个人的引荐人\<$USERID><$USERNAME>.txt

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\个人的引荐人\<$USERID><$USERNAME>.txt <$STR(S79)><$STR(S78)> 0

CreateFile ..\..\..\GM起点\ALLTY\拉人系统\登记列表\<$STR(S79)><$STR(S78)>.txt

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\登记列表\<$STR(S79)><$STR(S78)>.txt <$USERNAME> 0

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\登记列表\<$STR(S79)><$STR(S78)>.txt GM起点zmx 2

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\拉人登记检查.txt <$STR(S79)><$STR(S78)> 0

set [68] 1

S78.set [69] 1

S78.MESSAGEBOX 恭喜你的拉人奖励已激活！\?\请找拉人奖励NPC查看拉人清单！！

MESSAGEBOX 已成功登记你的引荐人！

SENDMSG 0 [<$STR(S78)>]为本服又带来了一名玩家[<$USERNAME>]，系统将会有丰厚的奖励送给他，预祝他们玩得开心！

SENDMSG 0 [<$STR(S78)>]为本服又带来了一名玩家[<$USERNAME>]，系统将会有丰厚的奖励送给他，预祝他们玩得开心！

mov S79

mov S78

close

break

[@奖励]

#if

check [69] 1

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\拉人登记检查.txt <$USERID><$USERNAME>

#act

mov N2

mov N4

mov N6

mov N8

mov N10

goto @检查显

goto @显示啦

#elsesay

<对不起，你的拉人奖励名单没有〖激活〗，无法查看！/SCOLOR=150>\ \

<你没有介绍任何玩家来本服!/SCOLOR=254>\

<或者你朋友还没有来此/SCOLOR=254><报到>\ \

<激活提示：><在本分区至少需一名玩家登记在你的名下才可激活拉人奖励/SCOLOR=253>\

[@检查显]

#if

check [69] 1

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\登记列表\<$USERID><$USERNAME>.txt GM起点zmx

mov N1 <$STR(N0)>

mov N2 <$STR(N0)>

mov S11

goto @查登记

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\160检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\160级列表\<$USERID><$USERNAME>.txt GM起点zmx

mov N4 <$STR(N0)>

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\160领完\160领完检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\160领完\<$USERID><$USERNAME>.txt GM起点zmx

mov N3 <$STR(N0)>

mov S12

goto @查160

#elseact

mov S12 暂无，尽快带他们升级

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\180检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\180级列表\<$USERID><$USERNAME>.txt GM起点zmx

mov N6 <$STR(N0)>

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\180领完\180领完检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\180领完\<$USERID><$USERNAME>.txt GM起点zmx

mov N5 <$STR(N0)>

mov S13

goto @查180

#elseact

mov S13 暂无

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\200检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\200级列表\<$USERID><$USERNAME>.txt GM起点zmx

mov N8 <$STR(N0)>

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\200领完\200领完检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\200领完\<$USERID><$USERNAME>.txt GM起点zmx

mov N7 <$STR(N0)>

mov S14

goto @查200

#elseact

mov S14 暂无


[@查登记]

#if

equal N1 0

#act

break

#elseact

GetRandomText .\..\..\..\GM起点\ALLTY\拉人系统\登记列表\<$USERID><$USERNAME>.txt S10 <$STR(N1)>

dec N1 1

inc S11 〖

inc S11 <$STR(S10)>

inc S11 〗

goto @查登记

[@查160]

#if

equal N3 0

#act

break

#elseact

GetRandomText .\..\..\..\GM起点\ALLTY\拉人系统\160领完\<$USERID><$USERNAME>.txt S10 <$STR(N3)>

dec N3 1

inc S12 〖

inc S12 <$STR(S10)>

inc S12 〗

goto @查160

[@查180]

#if

equal N5 0

#act

break

#elseact

GetRandomText .\..\..\..\GM起点\ALLTY\拉人系统\180领完\<$USERID><$USERNAME>.txt S10 <$STR(N5)>

dec N5 1

inc S13 〖

inc S13 <$STR(S10)>

inc S13 〗

goto @查180

[@查200]

#if

equal N7 0

#act

break

#elseact

GetRandomText .\..\..\..\GM起点\ALLTY\拉人系统\200领完\<$USERID><$USERNAME>.txt S10 <$STR(N7)>

dec N7 1

inc S14 〖

inc S14 <$STR(S10)>

inc S14 〗

goto @查200


[@显示啦]

#say

<你目前拉来的玩家有:『/SCOLOR=150><$STR(N2)><』人 /SCOLOR=150>  <拉来的玩家名单如下：/SCOLOR=254>\

?<$STR(S11)>\

<能领取的42级拉人奖励有:『/SCOLOR=150><$STR(N4)><』人 /SCOLOR=150>          <Img:><领取奖励/@奖11><Img:>\

<已领名单：/SCOLOR=254><$STR(S12)>\

<能领取的46级拉人奖励有:『/SCOLOR=150><$STR(N6)><』人 /SCOLOR=150>          <Img:><领取奖励/@奖12><Img:>\

<已领名单：/SCOLOR=254><$STR(S13)>\

<能领取的50级拉人奖励有:『/SCOLOR=150><$STR(N8)><』人 /SCOLOR=150>          <Img:><领取奖励/@奖13><Img:>\

<已领名单：/SCOLOR=254><$STR(S14)>\ \

<Img:><为了奖励，我要去拉更多的人过来！/@exit><Img:>    <Img:><神秘奖励领取/@神秘><Img:>\

<提示：><除了以上元宝奖励外，还有神秘奖品领取哦！！！/SCOLOR=250>


[@神秘]

<为了感谢为本服/SCOLOR=150><拉人气><的玩家，我们不旦给予元宝的奖励，还/SCOLOR=150>\

<决定/SCOLOR=150><加重奖励><的力度，那就是/SCOLOR=150><超级神秘奖/AUTOCOLOR=253,252,168,191,253,70,245,249,254><！！希望大家涌跃参与！/SCOLOR=150>\ \

<超级/SCOLOR=150><神秘大奖><设置如下：/SCOLOR=150>\

<有 2名引荐玩家达到/SCOLOR=254><42><级时/SCOLOR=254>  <奖励>:    <金钻服务卡1个/AUTOCOLOR=253,252,168,191,253,70,245,249,254>  <Img:><领取/@领4><Img:>\

<有10名引荐玩家达到/SCOLOR=254><42><级时/SCOLOR=254>  <奖励>:    <六大新衣1件/AUTOCOLOR=253,252,168,191,253,70,245,249,254>    <Img:><领取/@领3><Img:>\

<有10名引荐玩家达到/SCOLOR=254><46><级时/SCOLOR=254>  <奖励>:    <苍月武器1把/AUTOCOLOR=253,252,168,191,253,70,245,249,254>    <Img:><领取/@领1><Img:>\

<有8名引荐玩家达到/SCOLOR=254><50><级时/SCOLOR=254>   <奖励>:  <麻痹戒指或神之武器/AUTOCOLOR=254,253,168,250,245,249,252> <Img:><领取/@领2><Img:>\ \

<Img:><为了奖励，我要去拉更多的人过来！/@exit><Img:>\

<提示：><散人玩家想要获得金钻会员，可以自建两个号登记在自己名下领取！/SCOLOR=254>\

[@领4]

#if

Check [69] 1

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\160领完\160领完检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\160领完\<$USERID><$USERNAME>.txt GM起点zmx

mov N1 <$STR(N0)>

LOADVAR HUMAN LRJ3 ..\..\..\..\GM起点\ALLTY\拉人系统\拉人变量.txt

#elseact

MESSAGEBOX [失败]：看清楚领奖条件再找我吧！

break

#if

CHECKVAR HUMAN LRJ4 = 1

#act

MESSAGEBOX [失败]：你领过了还想再来领？？当我老眼昏花啊！！！

break

#if

CHECKVAR HUMAN LRJ3 = 0

LARGE N1 1

#act

close

give 金钻服务 1

SendCenterMsg 0 253  【拉人奖励】:『%S』引荐的玩家有2人达到42级，现奖励★金钻服务卡★一个!! 1 40

sendmsg 1 【拉人奖励】:恭喜『%S』引荐的玩家有2人达到42级，现奖励★金钻服务卡★一个!!

sendmsg 1 【拉人奖励】:恭喜『%S』引荐的玩家有2人达到42级，现奖励★金钻服务卡★一个!!

sendmsg 1 【拉人奖励】:恭喜『%S』引荐的玩家有2人达到42级，现奖励★金钻服务卡★一个!!

CALCVAR HUMAN LRJ4 = 1

SAVEVAR HUMAN LRJ4 ..\..\..\..\GM起点\ALLTY\拉人系统\拉人变量.txt

#elseact

MESSAGEBOX [失败]：无法领取!\你引荐的玩家目前还没有2人达到42级！！

break

[@领1]

#if

Check [69] 1

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\180领完\180领完检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\180领完\<$USERID><$USERNAME>.txt GM起点zmx

mov N1 <$STR(N0)>

LOADVAR HUMAN LRJ1 ..\..\..\..\GM起点\ALLTY\拉人系统\拉人变量.txt

#elseact

MESSAGEBOX [失败]：看清楚领奖条件再找我吧！

break

#if

CHECKVAR HUMAN LRJ1 = 1

#act

MESSAGEBOX [失败]：你领过了还想再来领？？当我老眼昏花啊！！！

break

#if

CHECKVAR HUMAN LRJ1 = 0

LARGE N1 9

#act

close

goto @给武器

SendCenterMsg 0 253  恭喜『%S』引荐的玩家有10人达到46级，现奖励☆☆★苍月武器★☆☆一把!! 1 40

GuildNoticeMsg 254 252 恭喜『%S』引荐的玩家有10人达到46级，现奖励☆☆★苍月武器★☆☆一把!!

GuildNoticeMsg 254 252 恭喜『%S』引荐的玩家有10人达到46级，现奖励☆☆★苍月武器★☆☆一把!!

GuildNoticeMsg 254 252 恭喜『%S』引荐的玩家有10人达到46级，现奖励☆☆★苍月武器★☆☆一把!!

CALCVAR HUMAN LRJ1 = 1

SAVEVAR HUMAN LRJ1 ..\..\..\..\GM起点\ALLTY\拉人系统\拉人变量.txt

#elseact

MESSAGEBOX [失败]：无法领取!\你引荐的玩家目前还没有10人达到46级！！

break

[@给武器]

#if

CheckJob Warrior

#act

give 屠龙 1

break

#IF

CheckJob Taoist

#act

give 霸者之刃 1

break

#IF

CheckJob Wizard

#act

give 嗜魂法杖 1

break

[@领2]

<你引荐的玩家有8人达到50级了吗？/SCOLOR=254>\ \

<如果达到了以上条件，那么恭喜你能领取好东西1件/SCOLOR=253>\ \

<你是想要〖神之武器〗还是〖麻痹戒指〗呢？？/SCOLOR=253>\

<Img:><我要武器/@要武器><Img:>               <Img:><我要麻痹/@要麻痹><Img:>\

<友情提示：><推荐选择武器，因特殊戒指爆率高点/SCOLOR=250>\

[@要麻痹]

#if

Check [69] 1

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\200领完\200领完检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\200领完\<$USERID><$USERNAME>.txt GM起点zmx

mov N1 <$STR(N0)>

LOADVAR HUMAN LRJ2 ..\..\..\..\GM起点\ALLTY\拉人系统\拉人变量.txt

#elseact

MESSAGEBOX [失败]：看清楚领奖条件再找我吧！

break

#if

CHECKVAR HUMAN LRJ2 = 1

#act

MESSAGEBOX [失败]：你领过了还想再来领？？当我老眼昏花啊！！！

break

#if

CHECKVAR HUMAN LRJ2 = 0

LARGE N1 7

#act

close

give 麻痹戒指

SendCenterMsg 0 253  【拉人奖励】:恭喜『%S』引荐的玩家有8人达到50级，现奖励☆☆麻痹戒指☆☆一个!! 1 40

GuildNoticeMsg 0 253 【拉人奖励】:恭喜『%S』引荐的玩家有8人达到50级，现奖励☆☆麻痹戒指☆☆一个!!

GuildNoticeMsg 0 253 【拉人奖励】:恭喜『%S』引荐的玩家有8人达到50级，现奖励☆☆麻痹戒指☆☆一个!!

GuildNoticeMsg 0 253 【拉人奖励】:恭喜『%S』引荐的玩家有8人达到50级，现奖励☆☆麻痹戒指☆☆一个!!

CALCVAR HUMAN LRJ2 = 1

SAVEVAR HUMAN LRJ2 ..\..\..\..\GM起点\ALLTY\拉人系统\拉人变量.txt

#elseact

MESSAGEBOX [失败]：无法领取!\你引荐的玩家目前还没有8人达到50级！！

break

[@要武器]

#if

Check [69] 1

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\200领完\200领完检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\200领完\<$USERID><$USERNAME>.txt GM起点zmx

mov N1 <$STR(N0)>

LOADVAR HUMAN LRJ2 ..\..\..\..\GM起点\ALLTY\拉人系统\拉人变量.txt

#elseact

MESSAGEBOX [失败]：看清楚领奖条件再找我吧！

break

#if

CHECKVAR HUMAN LRJ2 = 1

#act

MESSAGEBOX [失败]：你领过了还想再来领？？当我老眼昏花啊！！！

break

#if

CHECKVAR HUMAN LRJ2 = 0

LARGE N1 7

#act

close

goto @要终极武器

SendCenterMsg 0 253  【拉人奖励】:恭喜『%S』引荐的玩家有8人达到50级，现奖励☆☆终极神之武器☆☆一把!! 1 40

GuildNoticeMsg 0 253 【拉人奖励】:恭喜『%S』引荐的玩家有8人达到50级，现奖励☆☆终极神之武器☆☆一把!!

GuildNoticeMsg 0 253 【拉人奖励】:恭喜『%S』引荐的玩家有8人达到50级，现奖励☆☆终极神之武器☆☆一把!!

GuildNoticeMsg 0 253 【拉人奖励】:恭喜『%S』引荐的玩家有8人达到50级，现奖励☆☆终极神之武器☆☆一把!!

CALCVAR HUMAN LRJ2 = 1

SAVEVAR HUMAN LRJ2 ..\..\..\..\GM起点\ALLTY\拉人系统\拉人变量.txt

#elseact

MESSAGEBOX [失败]：无法领取!\你引荐的玩家目前还没有8人达到50级！！

break

[@要终极武器]

#if

CheckJob Warrior

#act

give 神之屠龙 1

break

#IF

CheckJob Taoist

#act

give 神之霸者 1

break

#IF

CheckJob Wizard

#act

give 神之嗜魂 1

break

[@领3]

#if

Check [69] 1

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\160领完\160领完检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\160领完\<$USERID><$USERNAME>.txt GM起点zmx

mov N1 <$STR(N0)>

LOADVAR HUMAN LRJ3 ..\..\..\..\GM起点\ALLTY\拉人系统\拉人变量.txt

#elseact

MESSAGEBOX [失败]：看清楚领奖条件再找我吧！

break

#if

CHECKVAR HUMAN LRJ3 = 1

#act

MESSAGEBOX [失败]：你领过了还想再来领？？当我老眼昏花啊！！！

break

#if

CHECKVAR HUMAN LRJ3 = 0

LARGE N1 9

#act

close

goto @领取新衣服

SendCenterMsg 0 253  【拉人奖励】:『%S』引荐的玩家有10人达到42级，现奖励★新衣★一件!! 1 40

sendmsg 1 【拉人奖励】:恭喜『%S』引荐的玩家有10人达到42级，现奖励☆☆★新衣★☆☆一件!!

sendmsg 1 【拉人奖励】:恭喜『%S』引荐的玩家有10人达到42级，现奖励☆☆★新衣★☆☆一件!!

sendmsg 1 【拉人奖励】:恭喜『%S』引荐的玩家有10人达到42级，现奖励☆☆★新衣★☆☆一件!!

CALCVAR HUMAN LRJ3 = 1

SAVEVAR HUMAN LRJ3 ..\..\..\..\GM起点\ALLTY\拉人系统\拉人变量.txt

#elseact

MESSAGEBOX [失败]：无法领取!\你引荐的玩家目前还没有10人达到180级！！

break

[@领取新衣服]

#if

gender man

CheckJob Warrior

#act

give 天魔神甲 1

break

#IF

gender man

CheckJob Taoist

#act

give 天尊道袍 1

break

#IF

gender man

CheckJob Wizard

#act

give 法神披风 1

break

#if

gender WOMAN

CheckJob Warrior

#act

give 圣战宝甲 1

break

#IF

gender WOMAN

CheckJob Taoist

#act

give 天师长袍 1

break

#IF

gender WOMAN

CheckJob Wizard

#act

give 霓裳羽衣 1

break


[@奖11]

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\160检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\160级列表\<$USERID><$USERNAME>.txt GM起点zmx

mov N4 <$STR(N0)>

#elseact

MESSAGEBOX 领取失败！！\?\你拉来的朋友目前无人超过42级！！\?\请尽快带他们升级！！

break

#if

equal N4 0

#act

MESSAGEBOX 领取失败！！\?\你拉来的朋友目前无人超过42级！！\?\有的朋友或许已超过了42级！！

break

#elseact

goto @奖160

[@奖160]

#if

equal N4 0

#act

goto @奖励

break

#elseact

GetRandomText .\..\..\..\GM起点\ALLTY\拉人系统\160级列表\<$USERID><$USERNAME>.txt S80 <$STR(N4)>

goto @奖160领完

give 100元宝 1

DelTextList .\..\..\..\GM起点\ALLTY\拉人系统\160级列表\<$USERID><$USERNAME>.txt <$STR(S80)>

SendCenterMsg 150 249  【拉人奖励】:恭喜推荐人[<$USERNAME>]成功领取拉人奖励〖100元宝〗 1 20

GuildNoticeMsg 151 0 【拉人奖励】:玩家『<$STR(S80)>』达到42级，恭喜[<$USERNAME>]领取奖励〖100元宝〗!!

GuildNoticeMsg 151 0 【拉人奖励】:玩家『<$STR(S80)>』达到42级，恭喜[<$USERNAME>]领取奖励〖100元宝〗!!

mov S80

dec N4 1

goto @奖160

break

[@奖160领完]

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\160领完\160领完检查.txt <$USERID><$USERNAME>

#act

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\160领完\<$USERID><$USERNAME>.txt <$STR(S80)> 0

#elseact

CreateFile ..\..\..\GM起点\ALLTY\拉人系统\160领完\<$USERID><$USERNAME>.txt

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\160领完\<$USERID><$USERNAME>.txt GM起点zmx 0

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\160领完\<$USERID><$USERNAME>.txt <$STR(S80)> 0

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\160领完\160领完检查.txt <$USERID><$USERNAME> 0

break

[@奖12]

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\180检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\180级列表\<$USERID><$USERNAME>.txt GM起点zmx

mov N6 <$STR(N0)>

#elseact

MESSAGEBOX 领取失败！！\?\你拉来的朋友目前无人超过46级！！\?\请尽快带他们升级！！

break

#if

equal N6 0

#act

MESSAGEBOX 领取失败！！\?\你拉来的朋友目前无人超过46级！！\?\有的朋友或许已超过了46级！！

break

#elseact

goto @奖180

[@奖180]

#if

equal N6 0

#act

goto @奖励

break

#elseact

GetRandomText .\..\..\..\GM起点\ALLTY\拉人系统\180级列表\<$USERID><$USERNAME>.txt S80 <$STR(N6)>

goto @奖180领完

give 100元宝 3

DelTextList .\..\..\..\GM起点\ALLTY\拉人系统\180级列表\<$USERID><$USERNAME>.txt <$STR(S80)>

SendCenterMsg 150 249  【拉人奖励】:恭喜推荐人[<$USERNAME>]成功领取拉人奖励〖300元宝〗 1 30

GuildNoticeMsg 151 0 【拉人奖励】:玩家『<$STR(S80)>』达到46级，恭喜[<$USERNAME>]领取奖励〖300元宝〗!!

GuildNoticeMsg 151 0 【拉人奖励】:玩家『<$STR(S80)>』达到46级，恭喜[<$USERNAME>]领取奖励〖300元宝〗!!

mov S80

dec N6 1

goto @奖180

break

[@奖180领完]

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\180领完\180领完检查.txt <$USERID><$USERNAME>

#act

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\180领完\<$USERID><$USERNAME>.txt <$STR(S80)> 0

#elseact

CreateFile ..\..\..\GM起点\ALLTY\拉人系统\180领完\<$USERID><$USERNAME>.txt

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\180领完\<$USERID><$USERNAME>.txt GM起点zmx 0

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\180领完\<$USERID><$USERNAME>.txt <$STR(S80)> 0

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\180领完\180领完检查.txt <$USERID><$USERNAME> 0

break


[@奖13]

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\200检查.txt <$USERID><$USERNAME>

#act

GetStringPos .\..\..\..\GM起点\ALLTY\拉人系统\200级列表\<$USERID><$USERNAME>.txt GM起点zmx

mov N8 <$STR(N0)>

#elseact

MESSAGEBOX 领取失败！！\?\你拉来的朋友目前无人超过50级！！\?\请尽快带他们升级！！

break

#if

equal N8 0

#act

MESSAGEBOX 领取失败！！\?\你拉来的朋友目前无人超过50级！！\?\有的朋友或许已超过了50级！！

break

#elseact

goto @奖200

[@奖200]

#if

equal N8 0

#act

goto @奖励

break

#elseact

GetRandomText .\..\..\..\GM起点\ALLTY\拉人系统\200级列表\<$USERID><$USERNAME>.txt S80 <$STR(N8)>

goto @奖200领完

gamegold + 1000

DelTextList .\..\..\..\GM起点\ALLTY\拉人系统\200级列表\<$USERID><$USERNAME>.txt <$STR(S80)>

SendCenterMsg 150 249  【拉人奖励】:恭喜推荐人[<$USERNAME>]成功领取拉人奖励〖1000元宝〗 1 30

GuildNoticeMsg 151 0 【拉人奖励】:玩家『<$STR(S80)>』达到50级，恭喜[<$USERNAME>]领取奖励〖1000元宝〗!!

GuildNoticeMsg 151 0 【拉人奖励】:玩家『<$STR(S80)>』达到50级，恭喜[<$USERNAME>]领取奖励〖1000元宝〗!!

mov S80

dec N8 1

goto @奖200

break

[@奖200领完]

#if

CheckTextList .\..\..\..\GM起点\ALLTY\拉人系统\200领完\200领完检查.txt <$USERID><$USERNAME>

#act

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\200领完\<$USERID><$USERNAME>.txt <$STR(S80)> 0

#elseact

CreateFile ..\..\..\GM起点\ALLTY\拉人系统\200领完\<$USERID><$USERNAME>.txt

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\200领完\<$USERID><$USERNAME>.txt GM起点zmx 0

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\200领完\<$USERID><$USERNAME>.txt <$STR(S80)> 0

AddTextListEx .\..\..\..\GM起点\ALLTY\拉人系统\200领完\200领完检查.txt <$USERID><$USERNAME> 0

break