Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Feature]Admin Panel
#9
doomteam1 Wrote:thanks robin i forgot to add that part ill put that in

I'd make it require an access also. So people don't just find out about it randomly.(Even though the buttons require access)

EDIT:

Code:
If KeyCode = vbKeyF1 then
        If GetPlayerAccess(MyIndex) >= ADMIN_MAPPER Then
            frmAdminPanel.visible = true
            If GetPlayerAccess(MyIndex) < ADMIN_CREATOR Then
                btnBan.Enabled = False
                btnSetAccess.Enabled = False
            End If
            If GetPlayerAccess(MyIndex) < ADMIN_DEVELOPER Then
                btnEditSpell.Enabled = False
                bntEditItem.Enabled = False
                btnEditShop.Enabled = False
                btnEditNPC.Enabled = False
            End If
            If GetPlayerAccess(MyIndex) < ADMIN_MONITOR Then
                btnKick.Enabled = False
            End If
            If GetPlayerAccess(MyIndex) < ADMIN_MAPPER Then
                btnWarpMeTo.Enabled = False
                btnLoc.Enabled = False
                btnRespawn.Enabled = False
                btnWarpTo.Enabled = False
                btnSetSprite.Enabled = False
                btnPlayerSprite.Enabled = False
                btnMapEditor.Enabled = False
            End If
        End If
    End If

Untested. SHOULD work?
Reply


Messages In This Thread

Forum Jump:


Users browsing this thread: 1 Guest(s)