﻿// CheeTaH
// Admins
// Pretty much a copy of my Admins/Rules,
// But pawnd wanted one just for admins.
//
// Enjoy.. :o]
//
block config
{
    // Command To Open !admins menu: (default = !admins)
    cadmins_comm !admins

    
    // Message for online admins..
    // You can now easily customize the message shown in menu..
    //
    // %1 = SteamID
    // %2 = Name in DB
    // %3 = Current Name
    //
    // Default = "%1 - %2 - Online With The Name: %3"
    //
    cadmins_admin_msg_online "%1 - %2 - Online With The Name: %3"
    
    
    // Message for online admins..
    // You can now easily customize the message shown in menu..
    //
    // %1 = SteamID
    // %2 = Name in DB
    //
    // Default = "%1 - %2 - Offline"
    //
    cadmins_admin_msg_offline "%1 - %2 - Offline"
    
    
    // Youre done configuring this file.
    // For more configuring, check es_cadmins_db.txt
}

block load
{
    es_xset cadmins_name 0
    es_xset cadmins_comm 0
    es_xset cadmins_timer 0
    es_xset cadmins_person 0
    es_xset cadmins_format 0
    es_xset cadmins_exists 0
    es_xset cadmins_enable 0
    es_xset cadmins_onliners 0
    es_xset cadmins_total 0
    es_xset cadmins_admin_name 0
    es_xset cadmins_admin_list 0
    es_xset cadmins_admin_list 0
    es_xset cadmins_person_list 0
    es_xset cadmins_admin_format 0
    es_xset cadmins_admin_msg_online 0
    es_xset cadmins_admin_msg_offline 0

    es_xload corelib
    es_xload popup

    es_xsetinfo cadmins_version "v1.2CheeTaH"
    es_xmakepublic cadmins_version

    es_xkeygroupload cadmins |cadmins

    es_xmsg #multi #green[CheeTaH Admins] #defaultLoaded
    es_xdoblock cadmins/config
    es_regclientcmd server_var(cadmins_comm) cadmins/send

    es echo [CAdmins] cadmins_comm set to server_var(cadmins_comm)
}

event player_say
{
    if (event_var(text) = server_var(cadmins_comm)) then es_cexec event_var(userid) event_var(text)
}

block doadminblock
{
    es popup close cadmins_admin server_var(_popup_userid)
    es popup send cadmins_admin server_var(_popup_userid)
}

block listemonline
{
    es_keygetvalue cadmins_name admins server_var(cadmins_person_list) admname
    es_set cadmins_admin_name server_var(cadmins_name)
    es_xset cadmins_admin_state 0
    es_set cadmins_id server_var(cadmins_name)
    es_getuserid cadmins_admin_state server_var(cadmins_person_list)
    ifx true(cadmins_admin_state) do
    {
        es_getplayername cadmins_admin_name server_var(cadmins_admin_state)
        es_format cadmins_admin_format server_var(cadmins_admin_msg_online) server_var(cadmins_person_list) server_var(cadmins_id) server_var(cadmins_admin_name)
        es popup addoption cadmins_admin "1" server_var(cadmins_admin_format) 1
    }
}

block listemoffline
{
    es_keygetvalue cadmins_name admins server_var(cadmins_person_list) admname
    es_set cadmins_admin_name server_var(cadmins_name)
    es_xset cadmins_admin_state 0
    es_set cadmins_id server_var(cadmins_name)
    es_getuserid cadmins_admin_state server_var(cadmins_person_list)
    ifx false(cadmins_admin_state) do
    {
        es_format cadmins_admin_format server_var(cadmins_admin_msg_offline) server_var(cadmins_person_list) server_var(cadmins_id)
        es popup addoption cadmins_admin "1" server_var(cadmins_admin_format) 0
    }
}

block send
{
    es_xgetcmduserid cadmins_person
    popup exists cadmins_admin cadmins_exists
    if (server_var(cadmins_exists) = 1) do
    {
        popup delete cadmins_admin
    }
    es_xset cadmins_onliners 0
    es_xset cadmins_total 0
    popup easymenu cadmins_admin cadmins_admin_choice cadmins/doadminblock
    keygroupsort admins admname asc #alpha
    es_xforeachkey cadmins_admin_list in admins "es_set cadmins_person_list server_var(cadmins_admin_list) ; es_doblock cadmins/listemonline"
    es_xforeachkey cadmins_admin_list in admins "es_set cadmins_person_list server_var(cadmins_admin_list) ; es_doblock cadmins/listemoffline"
    es_set cadmins_procent server_var(cadmins_total)
    es_math cadmins_procent / server_var(cadmins_onliners)
    es_format cadmins_format "Server Admins      [%p/%t]"
    es popup setvar cadmins_admin c_titleformat server_var(cadmins_format)
    es popup close cadmins_admin server_var(cadmins_person)
    es popup send cadmins_admin server_var(cadmins_person)
}

block unload
{
    es_xmsg #multi #green[CheeTaH Admins] #defaultUnloaded
    es_unregclientcmd server_var(cadmins_comm)
    popup unsendname cadmins_admin #all
    popup delete cadmins_admin
}