|
|
[@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
|
|
发表于 2016-3-15 22:33:21
发表于 2019-12-27 02:55:46
