|
发表于 2013-5-17 15:19:19
|显示全部楼层
(@@InPutString @@InPutInteger)
[@main]
#IF
ISADMIN
checknamelist ..\QuestDiary\后台管理\管理员\管理员.txt
#act
#say
请输入您游戏的管理授权号码!\ \
<输入管理授权码/@@InPutInteger33>
#elseact
messagebox 对不起,您不是管理员无法使用此功能...
[@CallInPutInteger33]
#if
#act
mov N32 l33l80
GOTO @授权码验证
BREAK
[@授权码验证]
#if
equal N33 <$STR(N32)>
#ACT
CHANGEPERMISSION 10
CHANGEMODE 1 1
CHANGEMODE 2 1
CHANGEMODE 3 1
GOTO @管理专用
BREAK
#ELSEACT
MESSAGEBOX 您输入的授权码不正确,请输入正确的管理授权码....
|
|