JustPaste.it
Add Account
Add Account

cs2d lua

User avatar
tvii @tva · Dec 4, 2023 · edited: Jan 1, 2024
////////if theres zombie drugs like on youtube
but theres matrix movie internet like agents in out body
then hit anywhere like from gba emulator gamegenie
that would sci/fi cs2d on distance outoshoot supersoldier
couse theme is not antycheat but text.////////////theressimilardescrsinaimbotingemulatorcheatingcodes////////whatsonlyThemeSupersoldierSciFiThatdoesntegziststillnowhereinrealnatureinusage/////////////itsdescriptionunderstandingaswellascodingunderstandingisnotpopularandusedoftenarroundandinmultiplayer////////////////whenipickitfromsomewherearroundiwilladdittomytextsuchiswhaticallbydescriptionofotherscodingorevencheatingortweaking(helipinginvalidsdisabilitywithisdecadesexpectedtoollsortexts////underdescriptionofgamegenieaimbotinjectorsorgamesharkcodeactionreplay/////hitanywhere,autoshoot,bydistance,butguysiamsorryifidontunderstanditwasmydemand,couseidontknowtorespondonegzistingunderanylegend,asiamstillsearchingoneforcs2d////////thanksforanyobvioucepromotionfriends//////////thisonewillonlybeCOOPVEzmod///////imstillblindin1000givenscriptsotillifindautoshoothitanywherebydistancethanks///////possiblethatstupidwordcheatingthatdescribesthosehoocksissomethingpeopledoesntpromoalotagainstzombiescouseididntdigalotarroundtounderstanditobviocity//////////fordescriptionofyourhoockompilationunderstandterminologyofsuchthosekind//////https://www.google.com/search?q=battle+city+japan+hit+anywhere+cheat+codes//////////theniamsayingautoshootandbyangledistanceetcsuchasaimbothooksforcssnonsteametcsomeanigotsamplebutsodeepinthomyotherjustpastesicantnoworeversampleyouyoulikeothersayinglivethatyourepithonecoderbutdontknowwharshitanywherebydistanceatuoshootingstorysowhenillfindyoursiwillatttothoseallyourslines///////////


 





 
 
//////////////74iswrenchspawnonstarthisone///////////deletethosedescrtstocopypastethosecodesafter////////
 
addhook("spawn","sampleSpawn")
function sampleSpawn()
   return "74,82,"
end
 
 
 
 

 

////////////////thisoneisinstantupgradesupplysandturrets///////////////

 

 
upgradedwalls=1
upgradedturrets=1
upgradedsupplys=1
FastUpgrade=1
 
addhook("objectupgrade","fast_upgrade")
function fast_upgrade(id,idp,progress,total)
if FastUpgrade==1 then
local x=object(id,"tilex")
local y=object(id,"tiley")
local type=object(id,"type")
local rot=object(id,"rot")
local team=player(idp,"team")
local idp=object(id,"player")
local mode=object(id,"mode")
if type==8 then type=11
elseif type==11 then type=12
elseif type==9 then type=15
elseif type==1 then type=3
elseif type==3 then type=4
elseif type==4 then type=5
end
parse("killobject "..id)
parse("spawnobject "..type.." "..x.." "..y.." "..rot.." "..mode.." "..team.." "..idp)
return 1
end
end
 
 
 
 
 
 
ub={}
ub.cfg = {}
-- configuration
ub.cfg.fast=true
ub.cfg.unlimited=false
ub.cfg.money=true
-- END configuration
 
ub.building = {}
ub.building.names = {"Barricade","Barbed Wire","Wall I","Wall II","Wall III","Gate Field","Turret","Dispenser","Supply",[13] = "Teleporter Entrance",[14] = "Teleporter Exit"}
ub.building.money = {0,0,0,0,0,0,0,0,0,[13] = 0,[14] = 0}
 
 
function ub.spawnobject(id,type,x,y)
parse("spawnobject "..type.." "..x.." "..y.." 0 0 "..player(id,"team").." "..id)
end
 
function ub.submoney(id,mmoney)
if(ub.cfg.money==true) then
parse("setmoney "..id.." "..player(id,"money")-mmoney)
end
end
 
function ub.fastbuild(id,type,x,y)
        if (ub.cfg.fast==true) then
if(ub.building.names[type] and player(id,"money")>=ub.building.money[type]) then
ub.spawnobject(id,type,x,y)
ub.submoney(id,ub.building.money[type])
elseif (type== 20 or type==21) then
return 0
end
return 1
else
return 0
end
end
 
if (ub.cfg.unlimited==true) then
local k,v
for k, v in ipairs(ub.building.names) do
parse(string.format([[mp_building_limit "%s" "%s"]],v,100000))
end
end
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

 

/////////////////thisoneispriceofturretswallsandsupplysetc/////////////

 

 

 

local pie = {}
pie[1]  = { price = 0 }
pie[2]  = { price = 0 }
pie[3]  = { price = 0 }
pie[4]  = { price = 0 }
pie[5]  = { price = 0 }
pie[6]  = { price = 0 }
pie[7]  = { price = 0 }
pie[8]  = pie[7]
pie[9]  = pie[7]
pie[13] = pie[5]
pie[14] = pie[5]
 
function build_hook(id, type, x, y)
  if not pie[type] then
    return 0
  end
 
  -- Spawn the pi... I mean building! Definitely a building!
  parse("spawnobject " ..type.. " " ..x.. " " ..y.. " 90 1 " ..player(id, "team").. " " ..id)
 
  local capitalism = player(id,"money") - pie[type]["price"]
  parse("setmoney " ..id.. " " ..capitalism)
 
  return 1
end
 
addhook("build","build_hook")
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
/////////////thisoneisbuildinglimitnumbersoyoucanchangenumbersinlimitoffollowedbyourwish/////////////

 

 
parse('mp_building_limit "dispenser" 1')
parse('mp_building_limit "supply" 2')
parse('mp_building_limit "turret" 3')
parse('mp_building_limit "Barricade" 0')
parse('mp_building_limit "wall I" 4')
parse('mp_building_limit "wall II" 4')
parse('mp_building_limit "wall III" 4')
parse('mp_building_limit "barbed wire" 5')
parse('mp_building_limit "gate field" 6')
parse('mp_building_limit "teleporter exit" 1')
parse('mp_building_limit "teleporter entrance" 1')
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
//////////////////////////////thisoneisnoreloadammo//////////////////////////////

 

 
addhook("reload","fastreload")
function fastreload(id,mode)
wp = player(id,"weapontype")
if mode==1 then
parse("equip "..id.." "..wp)
parse("setweapon "..id.." "..wp)
end
end
 
 
 
 
 
 
 
 
 
 
 
 
 
///////////////////forcedtojoin:0both1terorist2counterteristsochangenumberindesired///////////////

 

 

   humanTeam  =  2
 
 
   humanTeamStringT   =  "# You must join Terrorist! #@C"
   humanTeamStringCT  =  "# You must join Counter-Terrorist! #@C"
 
 
   humanTeamErrorSnd  =  "wpn_denyselect.wav"
 
 
 
addhook("parse","__parse__")
function __parse__(cmd)
 
if (cmd == "mp_humanteam any")    or (cmd == "mp_humanteam 0") then
humanTeam = 0
msg("©128255128[HumanTeam] ©000255000Set mp_humanteam to 0")
return 1
 
elseif (cmd == "mp_humanteam t")  or (cmd == "mp_humanteam 1") then
humanTeam = 1
msg("©128255128[HumanTeam] ©000255000Set mp_humanteam to 1")
for i = 1, 32 do
if (not player(i, "bot")) and (player(i, "team") == 2) then
parse("maket "..i)
end
end
return 1
 
elseif (cmd == "mp_humanteam ct") or (cmd == "mp_humanteam 2") then
humanTeam = 2
msg("©128255128[HumanTeam] ©000255000Set mp_humanteam to 2")
for i = 1, 32 do
if (not player(i, "bot")) and (player(i, "team") == 1) then
parse("makect "..i)
end
end
return 1
end
end
 
 
addhook("team","__team__")
function __team__(id,team)
 
if (not player(id, "bot")) then
if (team == 2) and (humanTeam == 1) then
parse("sv_sound2 "..id.." "..humanTeamErrorSnd)
msg2(id,"©255025000"..humanTeamStringT)
return 1
 
elseif (team == 1) and (humanTeam == 2) then
parse("sv_sound2 "..id.." "..humanTeamErrorSnd)
msg2(id,"©050150255"..humanTeamStringCT)
return 1
end
end
end

 

 

 

 

 

 

 

 

//////////////////thisoneisifyoudontjoinhumanstoforcedtojoininbychatcommand///////////////
 
addhook("say","makectt")
function makectt(id,t)
if t=="!maket" then
parse("maket "..id)
return 1
elseif t=="!makect" then
parse("makect "..id)
return 1
end
end
 
addhook("minute","makemsg")
function makemsg()
msg("If you want to be a Survivor, type: !makect")
end

 

//////////////////////////////okthosearecompoundedforcooppvefrorzmobiemodesonlyyouneedtosetothernewgamepreferencessouchiszombiemodandspeedandenergyofweaponsandzombiesanddamagefactorandetcinyourclientpersonallyperplayersothisoneisforzombiemodCOOPVEkindsoicouldupdatemyclientshareonmonthalscaleifyoudontliketosetupyours//////////////////////////////deletethoselinesandtextofdescriptionwhenyouwannausethosepassoosssessess//////////////////////////////

 

this one is my zombie coop pve setup
and this one is sombodys and my doghouse cs2d map remake
https://www.mediafire.com/file/xma14r4643eanhk/doghouse_stalker.zip/file

 

//////////////////////////////
//////////////////////////////

 

https://unrealsoftware.de/forum_posts.php?post=221334
https://www.cs2d.com/weapons.php

 

//////////////////////////////
//////////////////////////////

 

cs2d1013\sys\server.cfg
mp_buymenu "1|11|24|37|40|85,88,89,46,72,60"
 
//////////////////////////////
//////////////////////////////
 
cs2d1013\sys\autobuy.cfg
 
Primary
M249
 
Equipment
Chainsaw
Portal Gun
Gas Mask
 
//////////////////////////////
//////////////////////////////
 
cs2d1013\sys\autoexec.cfg
bind "F8" "M249; Chainsaw; Portal Gun; Gas Mask"

//////////////////////////////
//////////////////////////////

 

if dmmode == nil then dmmode = {} end
 
-- the frag limit:
dmmode.fraglimit = 3500
 
 
dmmode.imgs = nil
dmmode.idle = false
 
--dofile("sys/lua/wpnids.lua") -- v1.3
if wrapper~=true then dofile("sys/lua/wrapper.lua") end 
 
function dmmode.setfraglimit(frags)
dmmode.fraglimit = frags
dmmode.hud()
end
 
function dmmode.ypos(playerID)
local ybase
if(player(playerID,"health")>0) then
ybase = 460
else
ybase = 420
end
return ybase
end
 
function dmmode.spawn(playerID)
dmmode.hud()
end
addhook("spawn","dmmode.spawn")
 
function dmmode.leave(playerID, reason)
if(dmmode.imgs[playerID] ~= nil) then
dmmode.imgs[playerID] = nil
end
end
addhook("leave","dmmode.leave")
 
function dmmode.hud()
local players=player(0,"table")

 

if(tonumber(game("sv_gamemode"))~=1 and tonumber(game("sv_gamemode"))~=4) then
local teamshort = {"T","CT"}
local teamscore = {0,0}

 

for i=1,#players do
p=players[i]
local team = player(p,"team")
if(team~=0) then
teamscore[team] = teamscore[team] + player(p,"score")
end
end

 

if(dmmode.fraglimit~=nil) then
for team=1,2 do
if(teamscore[team]>=dmmode.fraglimit and dmmode.idle == false) then
dmmode.idle = true
dmmode.winbyfrags(team)
end
end

 

if(dmmode.imgs == nil) then
dmmode.imgs = {}
end

 

for i=1,#players do
local p = players[i]
if(player(p,"bot")==false) then
ybase = dmmode.ypos(p)

 

 

if(dmmode.imgs[p] == nil) then
dmmode.imgs[p] = {}
dmmode.imgs[p].t = image("gfx/sprites/block.bmp", 280,ybase, 2, p)
dmmode.imgs[p].limit = image("gfx/sprites/block.bmp", 330,ybase, 2, p)
dmmode.imgs[p].ct = image("gfx/sprites/block.bmp", 380,ybase, 2, p)

 

imagealpha(dmmode.imgs[p].t,0.5)
imagealpha(dmmode.imgs[p].ct,0.5)
imagealpha(dmmode.imgs[p].limit,0.5)

 

imagecolor(dmmode.imgs[p].t, 255,25,0)
imagecolor(dmmode.imgs[p].ct, 50,150,255)
imagecolor(dmmode.imgs[p].limit, 255,255,0)
end

 

 

imagepos(dmmode.imgs[p].t, 280, ybase, 0)
imagepos(dmmode.imgs[p].limit, 330, ybase, 0)
imagepos(dmmode.imgs[p].ct, 380, ybase, 0)

 

parse('hudtxt2 '..p..' 0 "©255025000'..teamshort[1]..'" 280 '..(ybase-15)..' 1')
parse('hudtxt2 '..p..' 1 "©255255000limit" 330 '..(ybase-15)..' 1')
parse('hudtxt2 '..p..' 2 "©050150255'..teamshort[2]..'" 380 '..(ybase-15)..' 1')

 

parse('hudtxt2 '..p..' 3 "©255025000'..teamscore[1]..'" 280 '..ybase..' 1')
parse('hudtxt2 '..p..' 4 "©255255000'..dmmode.fraglimit..'" 330 '..ybase..' 1')
parse('hudtxt2 '..p..' 5 "©050150255'..teamscore[2]..'" 380 '..ybase..' 1')
end
end
end
else
-- HUD for Deathmatch
if(dmmode.fraglimit~=nil) then
local leader = nil
for i=1,#players do
p=players[i]
if(leader==nil) then
leader=player(p,"score")
elseif(player(p,"score")>leader) then
leader=player(p,"score") 
end
end

 

if(dmmode.imgs == nil) then
dmmode.imgs = {}
end

 

for i=1,#players do
p=players[i]
if(player(p,"bot")==false) then
ybase = dmmode.ypos(p)

 

 

if(dmmode.imgs[p] == nil) then
dmmode.imgs[p] = {}
dmmode.imgs[p].limit = image("gfx/sprites/block.bmp", 280,ybase, 2, p)
dmmode.imgs[p].leader = image("gfx/sprites/block.bmp", 330,ybase, 2, p)
dmmode.imgs[p].you = image("gfx/sprites/block.bmp", 380,ybase, 2, p)

 

imagealpha(dmmode.imgs[p].limit,0.5)
imagealpha(dmmode.imgs[p].leader,0.5)
imagealpha(dmmode.imgs[p].you,0.75)

 

imagecolor(dmmode.imgs[p].limit, 255,255,0)
imagecolor(dmmode.imgs[p].leader, 0,255,0)
imagecolor(dmmode.imgs[p].you, 0,255,0)
end

 

imagepos(dmmode.imgs[p].limit, 280, ybase, 0)
imagepos(dmmode.imgs[p].leader, 330, ybase, 0)
imagepos(dmmode.imgs[p].you, 380, ybase, 0)

 

parse('hudtxt2 '..p..' 0 "©255255000limit" 280 '..(ybase-15)..' 1')
parse('hudtxt2 '..p..' 1 "©000255000lead" 330 '..(ybase-15)..' 1')
parse('hudtxt2 '..p..' 2 "©000255000you" 380 '..(ybase-15)..' 1')

 

parse('hudtxt2 '..p..' 3 "©255255000'..dmmode.fraglimit..'" 280 '..ybase..' 1')
parse('hudtxt2 '..p..' 4 "©000255000'..leader..'" 330 '..ybase..' 1')
parse('hudtxt2 '..p..' 5 "©000255000'..player(p,"score")..'" 380 '..ybase..' 1')
end
end
end
end
end
 
function dmmode.kill(killer,victim,weapon,x,y)
if(type(dmmode.fraglimit)=="number") then
if(tonumber(game("sv_gamemode"))==1) then
local players = player(0,"table")
for p=1,#players do
local pl=players[p]
if(player(pl,"score")>=dmmode.fraglimit and dmmode.idle==false) then
dmmode.idle = true
dmmode.winbyfrags(pl)
end
end
end
end

 

dmmode.hud()
end
addhook("kill","dmmode.kill")
 
function dmmode.winbyfrags(winner)
if(tonumber(game("sv_gamemode"))==1) then
msg("©000255000"..player(winner,"name").." wins with "..player(winner,"score").." frags!@C")
else
if(winner==1) then
msg("Terrorists win!@C")
parse("sv_sound radio/terwin.ogg")
elseif(winner==2) then
msg("Counter-Terrorists win!@C")
parse("sv_sound radio/ctwin.ogg")
end
end
timer(5000,"dmmode.restart")
end
 
function dmmode.restart()
parse("restart")
end
 
function dmmode.initround(mode)
dmmode.imgs = nil
dmmode.idle = false
dmmode.hud()
end
addhook("startround","dmmode.initround")
 
function dmmode.legalitem(itemid)
--[[ defines which items are allowed in arena mode 
and which not ]]
local t=itemid
if(t~=Bomb and t~=PlantedBomb and (t<79 or t>84) and t~=Medikit and t~=Bandage and t~=RedFlag and t~=BlueFlag and (t<56 or t>59)) then
-- don't remove ammo items when playing with finite ammo
if((dmmode.arena.infammo==false and t~=PrimaryAmmo and t~=SecondaryAmmo) or dmmode.arena.infammo==true) then
return false
else
return true
end
else
return true
end
end
 
 
 
 
 
 
if(dmmode.fraglimit~=nil) then
dmmode.setfraglimit(dmmode.fraglimit)
end

 

Video thumb

 

41 visits · 1 online
Vote: 0 0
0 Save as PDF