Someone

block load
{
  es_msg Landmines has been loaded.
  es_regclientcmd +mine landmine/plant "Plant landmines"
  es_regclientcmd -mine landmine/abort "Abort Planting Mines"
  es_regcmd __mine_explode landmine/explode "Kaboom!"
  es_regcmd __mine_progress landmine/progress "HudHint Progresion"

  keygroupremove landmine_progress
  es_keygroupcreate landmine_progress


  //progress vars & messages

  es_set lm_dismsg 0
  es_set lm_chkr 0
  es_set landmine_name 0
  es_set landmine_userid 0
  es_set lm_cnt 0
  es_set lmmsg 0
  es_set lm_id 0
  es_set lm_mineid 0

  keygroupremove landmine_msgs
  es_keygroupcreate landmine_msgs
  es_keycreate landmine_msgs 0
  es_keysetvalue landmine_msgs 0 lmmsg "Planting mine   00% [--]"
  es_keycreate landmine_msgs 1
  es_keysetvalue landmine_msgs 1 lmmsg "Planting mine   16% [/]"
  es_keycreate landmine_msgs 2
  es_keysetvalue landmine_msgs 2 lmmsg "Planting mine   32% [|]"
  es_keycreate landmine_msgs 3
  es_keysetvalue landmine_msgs 3 lmmsg "Planting mine   48% [\]"
  es_keycreate landmine_msgs 4
  es_keysetvalue landmine_msgs 4 lmmsg "Planting mine   64% [--]"
  es_keycreate landmine_msgs 5
  es_keysetvalue landmine_msgs 5 lmmsg "Planting mine   80% [/]"
  es_keycreate landmine_msgs 6
  es_keysetvalue landmine_msgs 6 lmmsg "Planting mine   96% [|]"
  es_keycreate landmine_msgs 7
  es_keysetvalue landmine_msgs 7 lmmsg "Planting mine  100% [*]"


 //Mine planting vars

  es_set lm_x 0
  es_set lm_y 0
  es_set lm_z 0
  es_set lm_z2 0
  es_set lm_loc 0
  es_set lm_temp 0
  es_set lm_badboy 0
  es_set lm_command 0
  es_set tmpformat 0
}

event round_start
{
  es_xset lm_id 0
}


block plant
{
  es_xset landmine_user 0
  es_getcmduserid landmine_userid
  es_keycreate landmine_progress server_var(landmine_userid)
  es_keysetvalue landmine_progress server_var(landmine_userid) progress 0
  es __mine_progress server_var(landmine_userid)
}

block progress
{
  es_getargv landmine_userid 1
  es_exists lm_chkr key landmine_progress server_var(landmine_userid)
  ifx true(lm_chkr) do
  {
    es_keygetvalue lm_cnt landmine_progress server_var(landmine_userid) progress
    es_keygetvalue lm_dismsg landmine_msgs server_var(lm_cnt) lmmsg
    es_getplayername landmine_name server_var(landmine_userid)
    //es usermsg hudhint event_var(userid) "You have received a hudhint\nmessage!"
    es usermsg hudhint server_var(landmine_userid) server_var(lm_dismsg)
    es_xmath lm_cnt + 1
    es_keysetvalue landmine_progress server_var(landmine_userid) progress server_var(lm_cnt)
    
    es_getplayerlocation lm_x lm_y lm_z server_var(landmine_userid)
    es est_effect 10 #a 0 "sprites/lgtning.vmt" server_var(lm_x) server_var(lm_y) server_var(lm_z) 0 125 1 1 1 1 0 255 0 255 0

    if (server_var(lm_cnt) >= 8) do
    {
      es_xdoblock landmine/mine
    }
    else do
    {
        es_delayed 0.3 __mine_progress server_var(landmine_userid)
    }
  }
}

block abort
{
  es_keydelete landmine_progress server_var(landmine_userid)
}

block mine
{
      es_math lm_id + 1
      es_msg server_var(lm_id)
      if (server_var(lm_id) equalto 1) do
      {
        es_give server_var(landmine_userid) point_servercommand
        es est_setentname server_var(eventscripts_lastgive) command_giver
      }
      es_set lm_wire_id 0
      es_set lm_mine_id 0
      es_format lm_wire_id "w_%1" server_var(lm_id)
      es_format lm_mine_id "m_%1" server_var(lm_id)
      es_createvectorstring lm_loc server_var(lm_x) server_var(lm_y) server_var(lm_z)
      es_give server_var(landmine_userid) env_beam
      es est_setentname server_var(eventscripts_lastgive) server_var(lm_wire_id)
      es_setindexprop server_var(eventscripts_lastgive) "CBeam.m_fWidth" "200"
      es_setindexprop server_var(eventscripts_lastgive) "CBeam.m_fEndWidth" "200"
      es_setindexprop server_var(eventscripts_lastgive) "CBeam.m_vecOrigin" server_var(lm_loc)
      es_xsetinfo lm_temp 0
      es_splitvectorstring lm_x lm_y lm_z server_var(lm_loc)
      es_xmath lm_z2 + 50
      es_createvectorstring lm_temp server_var(lm_x) server_var(lm_y) server_var(lm_z2)
      es_setindexprop server_var(eventscripts_lastgive) "CBeam.m_vecEndPos" server_var(lm_temp)
      es_fire server_var(landmine_userid) server_var(lm_wire_id) addoutput "TouchType 1"
      es_format lm_command "OnTouchedByEntity command_giver,command,es __mine_explode %1 %2" server_var(landmine_userid) server_var(lm_mine_id)
      es_fire server_var(landmine_userid) server_var(lm_wire_id) addoutput server_var(lm_command)
      es_fire server_var(landmine_userid) server_var(lm_wire_id) addoutput "OnTouchedByEntity !self,kill"
      es_tell server_var(landmine_userid) "Mine planted - You have 5seconds to move away."
      es_delayed 5 es_fire server_var(landmine_userid) server_var(lm_wire_id) TurnOn

      es_give server_var(landmine_userid) env_explosion
      es est_setentname server_var(eventscripts_lastgive) server_var(lm_mine_id)
      es_xset lm_owner 0
      es_getplayerhandle lm_owner server_var(landmine_userid)
      es_setindexprop server_var(eventscripts_lastgive) CBaseEntity.m_hOwnerEntity server_var(lm_owner)
      es_fire server_var(landmine_userid) env_explosion addoutput "imagnitude 100"
}

block explode
{
   es_getargv lm_badboy 1
   es_getargv lm_mineid 2
   //es_msg server_var(lm_badboy)
   es es_xfire server_var(lm_badboy) server_var(lm_mineid) explode
}