Gom引擎全民智能推广系统脚本「完整版」

(@@InPutString @@InPutInteger )
[@main]
#IF
CHECKLEVELEX > 0
#ACT
MOV S26
GetListString ..\QuestDiary\花木郎君\全民推广系统\推广人数排行.txt 0 S21 N21
GetListString ..\QuestDiary\花木郎君\全民推广系统\推广人数排行.txt 1 S22 N22
GetListString ..\QuestDiary\花木郎君\全民推广系统\推广人数排行.txt 2 S23 N23
GetListString ..\QuestDiary\花木郎君\全民推广系统\推广人数排行.txt 3 S24 N24
GetListString ..\QuestDiary\花木郎君\全民推广系统\推广人数排行.txt 4 S25 N25
#IF
LARGE N21 0
#ACT
SetStringBlank S21 14 0
#ELSEACT
MOV S21 　
SetStringBlank S21 14 0
#IF
LARGE N22 0
#ACT
SetStringBlank S22 14 0
#ELSEACT
MOV S22 　
SetStringBlank S22 14 0
#IF
LARGE N23 0
#ACT
SetStringBlank S23 14 0
#ELSEACT
MOV S23 　
SetStringBlank S23 14 0
#IF
LARGE N24 0
#ACT
SetStringBlank S24 14 0
#ELSEACT
MOV S24 　
SetStringBlank S24 14 0
#IF
LARGE N25 0
#ACT
SetStringBlank S25 14 0
#ELSEACT
MOV S25 　
SetStringBlank S25 14 0

#IF
CHECKVAR HUMAN 推广人 = 暂无
#ELSEACT
GOTO @被推广人界面
BREAK

#IF
CHECKVAR HUMAN 被推广人 = 暂无
#ACT
GOTO @开始显示界面
#ELSEACT
GOTO @推广人界面
BREAK

[@被推广人界面]
#IF
CheckOnline <$HUMAN(推广人)>
#ACT
INC S26 <【你当前是被推广的人】→>　<我的推广人是：/AUTOCOLOR=254>
INC S26 <$HUMAN(推广人)>
INC S26 　<是否在线：/AUTOCOLOR=250>在线\
INC S26 <(万一你的推广人一直不在线,导致你因无法领奖而不能推广他人,可选择终止被推广)/AUTOCOLOR=229><《终止被推广》/@终止被推广>
GOTO @开始显示界面
#ELSEACT
INC S26 <【你当前是被推广的人】→>　<我的推广人是：/AUTOCOLOR=254>
INC S26 <$HUMAN(推广人)>
INC S26 　<是否在线：/AUTOCOLOR=250>不在线\
INC S26 <(万一你的推广人一直不在线,导致你因无法领奖而不能推广他人,可选择终止被推广)/AUTOCOLOR=229><《终止被推广》/@终止被推广>
GOTO @开始显示界面

[@推广人界面]
#IF
CheckOnline <$HUMAN(被推广人)>
#ACT
MOV S81 <$HUMAN(被推广人)>
S81.GOTO @读取推广人等级
GetListString ..\QuestDiary\花木郎君\全民推广系统\临时数据\<$USERNAME>.txt 0 S91
INC S26 <【你当前是推广人】→>　<最新推广的人是：/AUTOCOLOR=254>
INC S26 <$HUMAN(被推广人)>
INC S26 　<目前等级是：/AUTOCOLOR=243>
INC S26 <$STR(S91)>
INC S26 级
INC S26 　<是否在线：/AUTOCOLOR=250>在线
GOTO @开始显示界面
#ELSEACT
INC S26 <【你当前是推广人】→>　<最新推广的人是：/AUTOCOLOR=254>
INC S26 <$HUMAN(被推广人)>
INC S26 　<是否在线：/AUTOCOLOR=250>不在线
GOTO @开始显示界面

[@读取推广人等级]
#IF
CHECKLEVELEX > 0
#ACT
CreateFile ..\QuestDiary\花木郎君\全民推广系统\临时数据\<$HUMAN(推广人)>.txt
AddTextList ..\QuestDiary\花木郎君\全民推广系统\临时数据\<$HUMAN(推广人)>.txt <$LEVEL>

游客，如果您要查看本帖隐藏内容请回复

RE: Gom引擎全民智能推广系统脚本

Gom引擎全民智能推广系统脚本

的顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶

灌灌灌灌灌

看看能不能用

顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶

的点点滴滴多多多多多多

这个脚本不错