rendered paste body// ******************************
// Ven's Landmine Script V0.03
// for Counter-Strike: Source
//
// * Description:
// Players can plant landmines which explode when an enemy sets on it.
//
// * Install instructions:
// http://forums.mattie.info/cs/forums/
//
//
// * Requirements:
// EventScripts v1.1.0.005 or higher
// Mani Admin Plugin v1.1.0w or higher
// * To Do:
// Find way to make mines visable to planter and/or teammates
// Change !plantmine to +plant and add progress/delay bar for planting.
// Fix so that you can plant more than 1 mine each.
// Optimize performance.
// Thank Mattie for helping me write this and bearing with me and my annoyances. <3
// ******************************
block load
{
// create a variable (default to on)
es_setinfo ven_landmine 1
es_setinfo landmine_announce 1
// enable eventscripts_noisy if not already enabled
es_load corelib
es_doblock corelib/noisy_on
// make it public so we can see it via HLSW
es_makepublic ven_landmine
es_keygroupdelete landmine
es_keygroupcreate landmine
es_keygroupdelete landmine_progress
es_keygroupcreate landmine_progress
// Announce it.
es_setinfo lm_temp "Ven's Landmine script has been enabled."
es_msg #multi #green[Landmine]#default server_var(lm_temp)
es_setinfo mine_cnt 0
es_setinfo mine_hudmsg 0
}
block unload
{
es_setinfo ven_landmine 0
es_keygroupdelete landmine
es_doblock corelib/noisy_off
}
event player_spawn
{
es_fire event_var(userid) env_explosion kill
}
// This event is called whenever a new round begins.
event round_start
{
if (server_var(ven_landmine) = 1) do
{
if (server_var(landmine_announce) = 1) do
{
es_msg #multi #green[LandMine] #defaultUse !plantmine to plant landmines.
es_keygroupdelete landmine
es_keygroupcreate landmine
}
}
}
// This event is called whenever a player uses !plantmine".
event player_say
{
if (event_var(text) equalto "!plantmine") do
{
es_msg server_var(mine_cnt) Starts here
es_setinfo lm_lm 0
es_exists lm_lm key landmine event_var(es_steamid)
if (server_var(lm_lm) equalto 0) do
{
es_keycreate landmine_progress event_var(es_steamid)
es_keysetvalue landmine_progress event_var(es_steamid) progress 0
es_setinfo landmine_user event_var(es_steamid)
es_xdoblock landmine/progress
//while "server_var(mine_cnt) < 8" "es_xdoblock landmine/progress"
}
else do
{
es_tell event_var(userid) #multi #green[LandMine] #defaultYou may only plant 1 mine at a time.
}
}
if (event_var(text) equalto "!removemine") do
{
es_setinfo lm_lmx 0
es_exists lm_lmx key landmine event_var(es_steamid)
if (server_var(lm_lmx) equalto 1) do
{
es_keydelete landmine event_var(es_steamid)
es_delayed 3.0 es_tell event_var(userid) #multi #green[LandMine] #defaultYou have removed your landmine.
}
else do
{
es_tell event_var(userid) #multi #green[LandMine] #defaultYou have not planted a landmine.
}
}
}
block progress
{
es_keygetvalue mine_cnt landmine_progress server_var(landmine_user) progress
if (server_var(mine_cnt) = 0) do
{
es_format mine_hudmsg "message Planting mine"
}
if (server_var(mine_cnt) = 1) do
{
es_format mine_hudmsg "message Planting mine o"
}
if (server_var(mine_cnt) = 2) do
{
es_format mine_hudmsg "message Planting mine oo"
}
if (server_var(mine_cnt) = 3) do
{
es_format mine_hudmsg "message Planting mine ooo"
}
if (server_var(mine_cnt) = 4) do
{
es_format mine_hudmsg "message Planting mine oooo"
}
if (server_var(mine_cnt) = 5) do
{
es_format mine_hudmsg "message Planting mine ooooo"
}
if (server_var(mine_cnt) = 6) do
{
es_format mine_hudmsg "message Planting mine oooooo"
}
if (server_var(mine_cnt) = 7) do
{
es_format mine_hudmsg "message Planting mine ooooooo"
}
if (server_var(mine_cnt) >= 8) do
{
es_format mine_hudmsg "message Mine Planted"
}
es_setinfo lastmine_userid 0
es_setinfo lastmine_name 0
es_getuserid lastmine_userid server_var(lastmine_user)
es_getplayername lastmine_name server_var(lastmine_userid)
es_give server_var(lastmine_userid) env_hudhint
es_fire server_var(lastmine_userid) env_hudhint addoutput server_var(mine_hudmsg)
es_fire server_var(lastmine_userid) env_hudhint ShowHudHint
es_math mine_cnt + 1
es_keysetvalue landmine_progress server_var(landmine_user) progress server_var(mine_cnt)
if (server_var(mine_cnt) >= 8) do
{
es_xdoblock landmine/plant
es_keydelete landmine_progress server_var(landmine_user)
}
else do
{
es_delayed 1 es_xsetinfo landmine_user server_var(landmine_user)
es_delayed 1 es_xdoblock landmine/progress
}
}
block plant
{
es_setinfo lm_agx 0
es_setinfo lm_agy 0
es_setinfo lm_agz 0
es_setinfo lm_rgx 0
es_setinfo lm_rgy 0
es_setinfo lm_ugz 0
es_setinfo lm_lgx 0
es_setinfo lm_lgy 0
es_setinfo lm_dgz 0
es_getplayerlocation lm_agx lm_agy lm_agz server_var(lastmine_userid)
es_setinfo lm_rgx server_var(lm_agx)
es_setinfo lm_rgy server_var(lm_agy)
es_setinfo lm_ugz server_var(lm_agz)
es_setinfo lm_lgx server_var(lm_agx)
es_setinfo lm_lgy server_var(lm_agy)
es_setinfo lm_dgz server_var(lm_agz)
es_setinfo lm_ugz server_var(lm_ugz)
es_setinfo lm_dgz server_var(lm_dgz)
//form 'cube' around mine plant spot.
es_math lm_rgx + 30
es_math lm_rgy + 30
es_math lm_ugz + 30
es_math lm_lgx - 30
es_math lm_lgy - 30
es_math lm_dgz - 30
es_keycreate landmine server_var(landmine_user)
es_keysetvalue landmine server_var(landmine_user) "lx" server_var(lm_lgx)
es_keysetvalue landmine server_var(landmine_user) "rx" server_var(lm_rgx)
es_keysetvalue landmine server_var(landmine_user) "ly" server_var(lm_lgy)
es_keysetvalue landmine server_var(landmine_user) "ry" server_var(lm_rgy)
es_keysetvalue landmine server_var(landmine_user) "uz" server_var(lm_ugz)
es_keysetvalue landmine server_var(landmine_user)) "dz" server_var(lm_dgz)
es_keysetvalue landmine server_var(landmine_user) "nme" server_var(lastmine_name)
}
event player_footstep
{
es_foreachkey lm_miners in landmine "es_xdoblock landmine/looper"
}
// This block loops through the landmines to see if you are near any of them.
block looper
{
es_setinfo lm_rgxx 0
es_setinfo lm_lgxx 0
es_setinfo lm_rgyy 0
es_setinfo lm_lgyy 0
es_setinfo lm_ugzz 0
es_setinfo lm_dgzz 0
es_setinfo lm_att 0
es_keygetvalue lm_lgxx "landmine" server_var(lm_miners) "lx"
es_keygetvalue lm_rgxx "landmine" server_var(lm_miners) "rx"
es_keygetvalue lm_lgyy "landmine" server_var(lm_miners) "ly"
es_keygetvalue lm_rgyy "landmine" server_var(lm_miners) "ry"
es_keygetvalue lm_dgzz "landmine" server_var(lm_miners) "dz"
es_keygetvalue lm_ugzz "landmine" server_var(lm_miners) "uz"
es_keygetvalue lm_att "landmine" server_var(lm_miners) "nme"
es_setinfo lm_cgx 0
es_setinfo lm_cgy 0
es_setinfo lm_cgz 0
es_getplayerlocation lm_cgx lm_cgy lm_cgz event_var(userid)
//This is probably the worst part of my script. But atleast it halfway works.
if (server_var(lm_cgx) <= server_var(lm_rgxx)) do
{
if (server_var(lm_cgx) >= server_var(lm_lgxx)) do
{
if (server_var(lm_cgy) <= server_var(lm_rgyy)) do
{
if (server_var(lm_cgy) >= server_var(lm_lgyy)) do
{
if (server_var(lm_cgz) >= server_var(lm_dgzz)) do
{
if (server_var(lm_cgz) <= server_var(lm_ugzz)) do
{
es_give event_var(userid) env_explosion
es_fire event_var(userid) env_explosion addoutput "imagnitude 80"
es_fire event_var(userid) env_explosion explode
es_soon es_keydelete landmine server_var(lm_miners)
es_msg #multi #green[landMine] #default server_var(lm_att) has just blown up event_var(es_username) with a mine!
}
}
}
}
}
}
}
event round_end
{
}