[@MAIN]
#IF
#ACT
MOV S$到期时间
MOV S$剩余时间
#IF
EQUAL S$到期时间
EQUAL S$剩余时间
CHECKNAMEDATETIMELIST ..\QuestDiary\会员系统\年卡会员数据.txt 1 S$时间 N$天数 N$小时 N$分钟
#ACT
MOV S$到期时间 <$STR(S$时间)>
MOV S$剩余时间 <$STR(N$天数)>天:<$STR(N$小时)>小时:<$STR(N$分钟)>分钟(年卡)
#IF
EQUAL S$到期时间
EQUAL S$剩余时间
CHECKNAMEDATETIMELIST ..\QuestDiary\会员系统\月卡会员数据.txt 1 S$时间 N$天数 N$小时 N$分钟
#ACT
MOV S$到期时间 <$STR(S$时间)>
MOV S$剩余时间 <$STR(N$天数)>天:<$STR(N$小时)>小时:<$STR(N$分钟)>分钟(月卡)
#IF
EQUAL S$到期时间
EQUAL S$剩余时间
CHECKNAMEDATETIMELIST ..\QuestDiary\会员系统\周卡会员数据.txt 1 S$时间 N$天数 N$小时 N$分钟
#ACT
MOV S$到期时间 <$STR(S$时间)>
MOV S$剩余时间 <$STR(N$天数)>天:<$STR(N$小时)>小时:<$STR(N$分钟)>分钟(周卡)
#IF
EQUAL S$到期时间
EQUAL S$剩余时间
#ACT
MOV S$到期时间 已过期
MOV S$剩余时间 00:00:00
|
|