;;不要删掉此行

[@Main]
#ACT
Mov D2 6
GoTo @SetVitalPoint

[@SetVitalPoint]
#ACT
Loadvalue D1 "QuestDiary\System\VitalPoints.txt" [Points] %USERNAME
INC D1 %D2
SaveValue "QuestDiary\System\VitalPoints.txt" [Points] %USERNAME %D1
LoadValue A6 "QuestDiary\System\VitalPoints.txt" [Convert] [Msg1]
SysMsg %A6
SysMsg %A7
GoTo @CheckDailyQuest

;---------------------------------------------

[@CheckDailyQuest]

;---------------------------------------------

;;不要删掉此行