;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@BadManMainRootin]
{
#IF
#ACT
FormatStr "FLD_LOGINID='%s'" %USERID
Mov A7 %A9
ReadValueSql "TBL_BadMan" %A7 "FLD_LOGINID,FLD_OK" [@BadManCheckDBConnect]

[@BadManCheckDBConnect()]
#ACT
mov A8 %ARG(1)
mov D0 %ARG(2)
mov A6 %USERMAP

#IF
Equal A8 %USERID
Equal A6 "7"
#ACT
break

#IF
Equal A8 %USERID
Equal A6 "D1802"
#ACT
break

#IF
Equal A8 %USERID
!Equal D0 0
#ACT
LoadValue A7 [Convert_Def\QuestDiary\System\BadManSystem.txt] [Convert] [Msg0]
SysMsg %A7
Map 7
Map 7
break
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;