传奇农场登陆检测脚本

[@农场登陆]
{
#IF
CHECKVAR GLOBAL 农场开关 = 0
#ACT
BREAK
#ELSEACT
GetRandomText .\QuestDiary\测试.txt S11 1

#IF
CHECKVAR HUMAN 下线检测 = 1
#ACT
DELTextList .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\开通农场名单.TXT <$USERNAME>
AddTextListEx .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\开通农场名单.TXT <$USERNAME> 0
#ELSEACT
GOTO @继续计时
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\开通农场名单.TXT
#ACT
MOV N88 <$GLOBAL(农场计时)>
DEC N88 <$HUMAN(下线时间记录)>
MOV N10 <$GLOBAL(成熟时间)>
INC N10 1
#ELSEACT
BREAK

#IF
SMALL N88 <$HUMAN(一号计时器)>
#ACT
CALCVAR HUMAN 一号计时器 - <$STR(N88)>
SAVEVAR HUMAN 一号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SetOnTimer 12 60
GOTO @二号
#ELSEACT
GOTO @一号成熟检测
GOTO @二号
BREAK

#IF
CHECKVAR HUMAN 一号种植情况 = 1
CHECKVAR HUMAN 一号计时器 < <$STR(N10)>
#ACT
CALCVAR HUMAN 第一块地种植 = 开花的<$HUMAN(第一块地播种)>
SAVEVAR HUMAN 第一块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
BREAK

[@二号]
#IF
SMALL N88 <$HUMAN(二号计时器)>
#ACT
CALCVAR HUMAN 二号计时器 - <$STR(N88)>
SAVEVAR HUMAN 二号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SetOnTimer 13 60
GOTO @三号
#ELSEACT
GOTO @二号成熟检测
GOTO @三号
BREAK

#IF
CHECKVAR HUMAN 二号种植情况 = 1
CHECKVAR HUMAN 二号计时器 < <$STR(N10)>
#ACT
CALCVAR HUMAN 第二块地种植 = 开花的<$HUMAN(第二块地播种)>
SAVEVAR HUMAN 第二块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
BREAK

[@三号]
#IF
SMALL N88 <$HUMAN(三号计时器)>
#ACT
CALCVAR HUMAN 三号计时器 - <$STR(N88)>
SAVEVAR HUMAN 三号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SetOnTimer 14 60
GOTO @四号
#ELSEACT
GOTO @三号成熟检测
GOTO @四号
BREAK

#IF
CHECKVAR HUMAN 三号种植情况 = 1
CHECKVAR HUMAN 三号计时器 < <$STR(N10)>
#ACT
CALCVAR HUMAN 第三块地种植 = 开花的<$HUMAN(第三块地播种)>
SAVEVAR HUMAN 第三块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
BREAK

[@四号]
#IF
SMALL N88 <$HUMAN(四号计时器)>
#ACT
CALCVAR HUMAN 四号计时器 - <$STR(N88)>
SAVEVAR HUMAN 四号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SetOnTimer 15 60
GOTO @五号
#ELSEACT
GOTO @四号成熟检测
GOTO @五号
BREAK

#IF
CHECKVAR HUMAN 四号种植情况 = 1
CHECKVAR HUMAN 四号计时器 < <$STR(N10)>
#ACT
CALCVAR HUMAN 第四块地种植 = 开花的<$HUMAN(第四块地播种)>
SAVEVAR HUMAN 第四块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
BREAK

[@五号]
#IF
SMALL N88 <$HUMAN(五号计时器)>
#ACT
CALCVAR HUMAN 五号计时器 - <$STR(N88)>
SAVEVAR HUMAN 五号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SetOnTimer 16 60
GOTO @六号
#ELSEACT
GOTO @五号成熟检测
GOTO @六号
BREAK

#IF
CHECKVAR HUMAN 五号种植情况 = 1
CHECKVAR HUMAN 五号计时器 < <$STR(N10)>
#ACT
CALCVAR HUMAN 第五块地种植 = 开花的<$HUMAN(第五块地播种)>
SAVEVAR HUMAN 第五块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
BREAK

[@六号]
#IF
SMALL N88 <$HUMAN(六号计时器)>
#ACT
CALCVAR HUMAN 六号计时器 - <$STR(N88)>
SAVEVAR HUMAN 六号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SetOnTimer 17 60
GOTO @七号
#ELSEACT
GOTO @六号成熟检测
GOTO @七号
BREAK

#IF
CHECKVAR HUMAN 六号种植情况 = 1
CHECKVAR HUMAN 六号计时器 < <$STR(N10)>
#ACT
CALCVAR HUMAN 第六块地种植 = 开花的<$HUMAN(第六块地播种)>
SAVEVAR HUMAN 第六块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
BREAK

[@七号]
#IF
SMALL N88 <$HUMAN(七号计时器)>
#ACT
CALCVAR HUMAN 七号计时器 - <$STR(N88)>
SAVEVAR HUMAN 七号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SetOnTimer 18 60
GOTO @八号
#ELSEACT
GOTO @七号成熟检测
GOTO @八号
BREAK

#IF
CHECKVAR HUMAN 七号种植情况 = 1
CHECKVAR HUMAN 七号计时器 < <$STR(N10)>
#ACT
CALCVAR HUMAN 第七块地种植 = 开花的<$HUMAN(第七块地播种)>
SAVEVAR HUMAN 第七块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
BREAK

[@八号]
#IF
SMALL N88 <$HUMAN(八号计时器)>
#ACT
CALCVAR HUMAN 八号计时器 - <$STR(N88)>
SAVEVAR HUMAN 八号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SetOnTimer 19 60
MOV N88 0
CALCVAR HUMAN 下线检测 = 0
SAVEVAR HUMAN 下线检测 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
#ELSEACT
GOTO @八号成熟检测
CALCVAR HUMAN 下线检测 = 0
SAVEVAR HUMAN 下线检测 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
BREAK

#IF
CHECKVAR HUMAN 八号种植情况 = 1
CHECKVAR HUMAN 八号计时器 < <$STR(N10)>
#ACT
CALCVAR HUMAN 第八块地种植 = 开花的<$HUMAN(第八块地播种)>
SAVEVAR HUMAN 第八块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
BREAK

[@一号成熟检测]
#IF
CHECKVAR HUMAN 一号种植情况 = 1
CHECKVAR HUMAN 第一块地检测 = 0
#ACT
CALCVAR HUMAN 第一块地检测 = 1
SAVEVAR HUMAN 第一块地检测 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOVR N11 <$GLOBAL(最低收成数量)> <$GLOBAL(最高收成数量)>
CALCVAR HUMAN 第一块地产量 = <$STR(N11)>
SAVEVAR HUMAN 第一块地产量 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOV N11 0
CALCVAR HUMAN 一号种植情况 = 0
SAVEVAR HUMAN 一号种植情况 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 一号计时器 = 0
SAVEVAR HUMAN 一号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 第一块地种植 = 成熟的<$HUMAN(第一块地播种)>
SAVEVAR HUMAN 第一块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SENDMSG 7 你种植的<$HUMAN(第一块地播种)>成熟了,可以收成了.
SENDMSG 0 『<$USERNAME>』种植的『<$HUMAN(第一块地播种)>』成熟了,可以收割了,大家抓紧时间.
AddTextListEx .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\最新动态.txt [<$HOUR>:<$MONTH>:<$SECOND>]　『<$USERNAME>』种植的『<$HUMAN(第一块地播种)>』成熟了,可以收割了,大家抓紧时间. 0

[@二号成熟检测]
#IF
CHECKVAR HUMAN 二号种植情况 = 1
CHECKVAR HUMAN 第二块地检测 = 0
#ACT
CALCVAR HUMAN 第二块地检测 = 1
SAVEVAR HUMAN 第二块地检测 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOVR N12 <$GLOBAL(最低收成数量)> <$GLOBAL(最高收成数量)>
CALCVAR HUMAN 第二块地产量 = <$STR(N12)>
SAVEVAR HUMAN 第二块地产量 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOV N12 0
CALCVAR HUMAN 二号种植情况 = 0
SAVEVAR HUMAN 二号种植情况 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 二号计时器 = 0
SAVEVAR HUMAN 二号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 第二块地种植 = 成熟的<$HUMAN(第二块地播种)>
SAVEVAR HUMAN 第二块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SENDMSG 7 你种植的<$HUMAN(第二块地播种)>成熟了,可以收成了.
SENDMSG 0 『<$USERNAME>』种植的『<$HUMAN(第二块地播种)>』成熟了,可以收割了,大家抓紧时间.
AddTextListEx .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\最新动态.txt [<$HOUR>:<$MONTH>:<$SECOND>]　『<$USERNAME>』种植的『<$HUMAN(第二块地播种)>』成熟了,可以收割了,大家抓紧时间. 0

[@三号成熟检测]
#IF
CHECKVAR HUMAN 三号种植情况 = 1
CHECKVAR HUMAN 第三块地检测 = 0
#ACT
CALCVAR HUMAN 第三块地检测 = 1
SAVEVAR HUMAN 第三块地检测 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOVR N13 <$GLOBAL(最低收成数量)> <$GLOBAL(最高收成数量)>
CALCVAR HUMAN 第三块地产量 = <$STR(N13)>
SAVEVAR HUMAN 第三块地产量 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOV N13 0
CALCVAR HUMAN 三号种植情况 = 0
SAVEVAR HUMAN 三号种植情况 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 三号计时器 = 0
SAVEVAR HUMAN 三号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 第三块地种植 = 成熟的<$HUMAN(第三块地播种)>
SAVEVAR HUMAN 第三块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SENDMSG 7 你种植的<$HUMAN(第三块地播种)>成熟了,可以收成了.
SENDMSG 0 『<$USERNAME>』种植的『<$HUMAN(第三块地播种)>』成熟了,可以收割了,大家抓紧时间.
AddTextListEx .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\最新动态.txt [<$HOUR>:<$MONTH>:<$SECOND>]　『<$USERNAME>』种植的『<$HUMAN(第三块地播种)>』成熟了,可以收割了,大家抓紧时间. 0

[@四号成熟检测]
#IF
CHECKVAR HUMAN 四号种植情况 = 1
CHECKVAR HUMAN 第四块地检测 = 0
#ACT
CALCVAR HUMAN 第四块地检测 = 1
SAVEVAR HUMAN 第四块地检测 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOVR N14 <$GLOBAL(最低收成数量)> <$GLOBAL(最高收成数量)>
CALCVAR HUMAN 第四块地产量 = <$STR(N14)>
SAVEVAR HUMAN 第四块地产量 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOV N14 0
CALCVAR HUMAN 四号种植情况 = 0
SAVEVAR HUMAN 四号种植情况 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 四号计时器 = 0
SAVEVAR HUMAN 四号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 第四块地种植 = 成熟的<$HUMAN(第四块地播种)>
SAVEVAR HUMAN 第四块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SENDMSG 7 你种植的<$HUMAN(第四块地播种)>成熟了,可以收成了.
SENDMSG 0 『<$USERNAME>』种植的『<$HUMAN(第四块地播种)>』成熟了,可以收割了,大家抓紧时间.
AddTextListEx .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\最新动态.txt [<$HOUR>:<$MONTH>:<$SECOND>]　『<$USERNAME>』种植的『<$HUMAN(第四块地播种)>』成熟了,可以收割了,大家抓紧时间. 0

[@五号成熟检测]
#IF
CHECKVAR HUMAN 五号种植情况 = 1
CHECKVAR HUMAN 第五块地检测 = 0
#ACT
CALCVAR HUMAN 第五块地检测 = 1
SAVEVAR HUMAN 第五块地检测 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOVR N15 <$GLOBAL(最低收成数量)> <$GLOBAL(最高收成数量)>
CALCVAR HUMAN 第五块地产量 = <$STR(N15)>
SAVEVAR HUMAN 第五块地产量 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOV N15 0
CALCVAR HUMAN 五号种植情况 = 0
SAVEVAR HUMAN 五号种植情况 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 五号计时器 = 0
SAVEVAR HUMAN 五号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 第五块地种植 = 成熟的<$HUMAN(第五块地播种)>
SAVEVAR HUMAN 第五块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SENDMSG 7 你种植的<$HUMAN(第五块地播种)>成熟了,可以收成了.
SENDMSG 0 『<$USERNAME>』种植的『<$HUMAN(第五块地播种)>』成熟了,可以收割了,大家抓紧时间.
AddTextListEx .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\最新动态.txt [<$HOUR>:<$MONTH>:<$SECOND>]　『<$USERNAME>』种植的『<$HUMAN(第五块地播种)>』成熟了,可以收割了,大家抓紧时间. 0

[@六号成熟检测]
#IF
CHECKVAR HUMAN 六号种植情况 = 1
CHECKVAR HUMAN 第六块地检测 = 0
#ACT
CALCVAR HUMAN 第六块地检测 = 1
SAVEVAR HUMAN 第六块地检测 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOVR N16 <$GLOBAL(最低收成数量)> <$GLOBAL(最高收成数量)>
CALCVAR HUMAN 第六块地产量 = <$STR(N16)>
SAVEVAR HUMAN 第六块地产量 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOV N16 0
CALCVAR HUMAN 六号种植情况 = 0
SAVEVAR HUMAN 六号种植情况 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 六号计时器 = 0
SAVEVAR HUMAN 六号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 第六块地种植 = 成熟的<$HUMAN(第六块地播种)>
SAVEVAR HUMAN 第六块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SENDMSG 7 你种植的<$HUMAN(第六块地播种)>成熟了,可以收成了.
SENDMSG 0 『<$USERNAME>』种植的『<$HUMAN(第六块地播种)>』成熟了,可以收割了,大家抓紧时间.
AddTextListEx .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\最新动态.txt [<$HOUR>:<$MONTH>:<$SECOND>]　『<$USERNAME>』种植的『<$HUMAN(第六块地播种)>』成熟了,可以收割了,大家抓紧时间. 0

[@七号成熟检测]
#IF
CHECKVAR HUMAN 七号种植情况 = 1
CHECKVAR HUMAN 第七块地检测 = 0
#ACT
CALCVAR HUMAN 第七块地检测 = 1
SAVEVAR HUMAN 第七块地检测 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOVR N17 <$GLOBAL(最低收成数量)> <$GLOBAL(最高收成数量)>
CALCVAR HUMAN 第七块地产量 = <$STR(N17)>
SAVEVAR HUMAN 第七块地产量 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOV N17 0
CALCVAR HUMAN 七号种植情况 = 0
SAVEVAR HUMAN 七号种植情况 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 七号计时器 = 0
SAVEVAR HUMAN 七号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 第七块地种植 = 成熟的<$HUMAN(第七块地播种)>
SAVEVAR HUMAN 第七块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SENDMSG 7 你种植的<$HUMAN(第七块地播种)>成熟了,可以收成了.
SENDMSG 0 『<$USERNAME>』种植的『<$HUMAN(第七块地播种)>』成熟了,可以收割了,大家抓紧时间.
AddTextListEx .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\最新动态.txt [<$HOUR>:<$MONTH>:<$SECOND>]　『<$USERNAME>』种植的『<$HUMAN(第七块地播种)>』成熟了,可以收割了,大家抓紧时间. 0

[@八号成熟检测]
#IF
CHECKVAR HUMAN 八号种植情况 = 1
CHECKVAR HUMAN 第八块地检测 = 0
#ACT
CALCVAR HUMAN 第八块地检测 = 1
SAVEVAR HUMAN 第八块地检测 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOVR N18 <$GLOBAL(最低收成数量)> <$GLOBAL(最高收成数量)>
CALCVAR HUMAN 第八块地产量 = <$STR(N18)>
SAVEVAR HUMAN 第八块地产量 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
MOV N18 0
CALCVAR HUMAN 八号种植情况 = 0
SAVEVAR HUMAN 八号种植情况 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 八号计时器 = 0
SAVEVAR HUMAN 八号计时器 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 第八块地种植 = 成熟的<$HUMAN(第八块地播种)>
SAVEVAR HUMAN 第八块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SENDMSG 7 你种植的<$HUMAN(第八块地播种)>成熟了,可以收成了.
SENDMSG 0 『<$USERNAME>』种植的『<$HUMAN(第八块地播种)>』成熟了,可以收割了,大家抓紧时间.
AddTextListEx .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\最新动态.txt [<$HOUR>:<$MONTH>:<$SECOND>]　『<$USERNAME>』种植的『<$HUMAN(第八块地播种)>』成熟了,可以收割了,大家抓紧时间. 0
MOV N88 0
BREAK

[@继续计时]
#IF
CHECKVAR HUMAN 一号计时器 > 0
#ACT
SetOnTimer 12 60

#IF
CHECKVAR HUMAN 二号计时器 > 0
#ACT
SetOnTimer 13 60

#IF
CHECKVAR HUMAN 三号计时器 > 0
#ACT
SetOnTimer 14 60

#IF
CHECKVAR HUMAN 四号计时器 > 0
#ACT
SetOnTimer 15 60

#IF
CHECKVAR HUMAN 五号计时器 > 0
#ACT
SetOnTimer 16 60

#IF
CHECKVAR HUMAN 六号计时器 > 0
#ACT
SetOnTimer 17 60

#IF
CHECKVAR HUMAN 七号计时器 > 0
#ACT
SetOnTimer 18 60

#IF
CHECKVAR HUMAN 八号计时器 > 0
#ACT
SetOnTimer 19 60
}