Ресурсы

Гусь_01 · 19 Март 2022

Я взял у кого то кфг и переделал под себя
double tap-mouse5
fake duck-alt
hide shots-H
peek assistance-mouse4
ensure lean-j
body aim-caps
override damage-n
safe points-t

Scøuτ · 19 Март 2022

Lua:

return (function(BD,gD,wD,RD,CD,cD,FD,AD,jD,GD,PD,pD,iD,bD,SD,tD,zD,hD,MD,Xn,JD,ZD,YD,mD,dD,DD,uD,HD,ID,LD,yD,nD,oD,kn,lD,ED,QD,WD,VD,UD,TD,fn,OD,rD,Yn,vn,xn,aD,KD,un,qD,sD,jn,eD,ND,...)local J=(YD);local X=iD;local Y,j=uD,gD;local x,f=oD,(ED);local v=LD;local t,c=BD,(JD);local E,S,L=tD,cD[VD],(UD);local u=cD[dD];local g,o=cD[CD],(cD[ND]);local V=(AD or ID[lD]);local U,d=GD,(HD);local p=((d and d()or mD));local C,N,A,I=sD,sD,sD,sD;local kD=(4);repeat if(not(kD<=1))then if(not(kD<=2))then if(kD~=3)then do kD=0;end;else N=1;kD=2;end;else kD=1;end;else if(kD~=0)then kD=5;else do C={};end;kD=3;end;end;until(kD>4);do kD=1;end;local l,G,H,m,s,T,O=sD,sD,sD,sD,sD,sD,(sD);do repeat if(not(kD<=3))then if(kD<=5)then if(kD~=4)then s=2147483648;do kD=7;end;else do m=function()local bW,CW,vW,NW=sD,sD,sD,(sD);local dW=(1);repeat if(not(dW<=0))then do if(dW~=1)then do return NW*16777216+vW*ZD+CW*256+bW;end;else bW,CW,vW,NW=u(l,N,N+3);do dW=0;end;end;end;else N=N+4;dW=2;end;until(hD);end;end;kD=5;end;else if(kD~=6)then T=FD;do kD=2;end;else do kD=0;end;end;end;else if(not(kD<=1))then if(kD~=2)then H=function()local fk=0;local Mk=sD;repeat if(not(fk<=0))then if(fk~=1)then N=N+1;fk=1;else do return Mk;end;end;else do Mk=u(l,N,N);end;fk=2;end;until(hD);end;kD=4;else O=2^52;do break;end;end;else do if(kD==0)then l=E(SD(l,5),TD,function(Hp)if(u(Hp,2)~=72)then local kT=(g(v(Hp,16)));if(G)then local ru=(1);local Su=sD;while(rD)do if(not(ru<=0))then if(ru==1)then do Su=o(kT,G);end;ru=0;else return Su;end;else do G=sD;end;do ru=2;end;end;end;else do return kT;end;end;else local wn=(1);repeat if(wn~=0)then do G=v(SD(Hp,1,1));end;wn=0;else return OD;end;until(hD);end;end);kD=3;else l=eD;kD=6;end;end;end;end;until(hD);end;kD=5;local h,r,e,Z,F=sD,sD,sD,sD,(sD);do while(kD<=5)do if(not(kD<=2))then if(not(kD<=3))then if(kD~=4)then do h={[0]=1};end;kD=0;else do e=function()local vG,wG=sD,sD;for cz=0,2 do if(cz<=0)then vG,wG=m(),m();else do if(cz==1)then if(not(wG>=s))then else wG=wG-T;end;else return wG*T+vG;end;end;end;end;end;end;kD=2;end;else r=function(cP,WP,bP)local sP,tP=1,(sD);repeat do if(not(sP<=0))then do if(sP~=1)then return tP;else tP=(bP/h[cP])%h[WP];sP=0;end;end;else tP=tP-tP%1;sP=2;end;end;until(hD);end;do kD=4;end;end;else if(not(kD<=0))then if(kD~=1)then Z=function()local aZ=m();local jZ=m();if(aZ==0 and jZ==0)then return 0;end;local GZ=(-1)^r(31,1,jZ);local qZ,TZ,eZ=sD,sD,(sD);local hZ=3;do repeat if(not(hZ<=1))then if(not(hZ<=2))then if(hZ~=3)then if(qZ==0)then if(TZ~=0)then qZ=1;eZ=0;else return GZ*0;end;elseif(qZ~=2047)then else do if(TZ==0)then do return GZ*(0/0);end;else do return GZ*(1/0);end;end;end;end;hZ=0;else qZ=r(20,11,jZ);hZ=1;end;else eZ=1;hZ=4;end;else if(hZ~=0)then TZ=r(0,20,jZ)*T+aZ;hZ=2;else do return GZ*(2^(qZ-1023))*(TZ/O+eZ);end;end;end;until(hD);end;end;kD=1;else F={[0]={[0]=0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15},{[0]=1,0,3,2,5,4,7,6,9,8,11,10,13,12,15,14},{[0]=2,3,0,1,6,7,4,5,10,11,8,9,14,15,12,13},{[0]=3,2,1,0,7,6,5,4,11,10,9,8,15,14,13,12},{[0]=4,5,6,7,0,1,2,3,12,13,14,15,8,9,10,11},{[0]=5,4,7,6,1,0,3,2,13,12,15,14,9,8,11,10},{[0]=6,7,4,5,2,3,0,1,14,15,12,13,10,11,8,9},{[0]=7,6,5,4,3,2,1,0,15,14,13,12,11,10,9,8},{[0]=8,9,10,11,12,13,14,15,0,1,2,3,4,5,6,7},{[0]=9,8,11,10,13,12,15,14,1,0,3,2,5,4,7,6},{[0]=10,11,8,9,14,15,12,13,2,3,0,1,6,7,4,5},{[0]=11,10,9,8,15,14,13,12,3,2,1,0,7,6,5,4},{[0]=12,13,14,15,8,9,10,11,4,5,6,7,0,1,2,3},{[0]=13,12,15,14,9,8,11,10,5,4,7,6,1,0,3,2},{[0]=14,15,12,13,10,11,8,9,6,7,4,5,2,3,0,1},{[0]=15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0}};kD=6;end;else do local ZR=sD;for lf=0,1 do do if(lf==0)then ZR=2;else do for d6=1,31 do do (h)[d6]=ZR;end;ZR=ZR*2;end;end;end;end;end;end;kD=3;end;end;end;end;local Q=(QD or nD);local z=(Q and Q[zD]or function(fR,pR)local AR,uR=sD,(sD);local iR=(0);do while(iR<=4)do if(not(iR<=1))then if(not(iR<=2))then if(iR~=3)then while(fR>0 and pR>0)do local Lx,Nx,Mx=0,sD,sD;while(Lx~=6)do if(not(Lx<=2))then if(not(Lx<=3))then if(Lx~=4)then uR=uR+F[Nx][Mx]*AR;do Lx=3;end;else AR=AR*16;do Lx=6;end;end;else fR=(fR-Nx)/16;do Lx=2;end;end;else if(Lx<=0)then Nx=fR%16;Lx=1;else if(Lx~=1)then do pR=(pR-Mx)/16;end;Lx=4;else Mx=pR%16;Lx=5;end;end;end;end;end;iR=5;else AR=1;iR=2;end;else uR=0;iR=4;end;else do if(iR~=0)then pR=pR%T;iR=3;else fR=fR%T;iR=1;end;end;end;end;end;return uR+fR*AR+pR*AR;end);local a=(Q and Q[aD]or function(ae,Pe)local Re=(2);while(rD)do if(not(Re<=0))then if(Re~=1)then ae=ae%T;do Re=1;end;else do Pe=Pe%T;end;Re=0;end;else return ((ae+Pe)-z(ae,Pe))/2;end;end;end);local b=(Q and Q[bD]or function(xk,qk)local tk=1;repeat if(not(tk<=0))then if(tk==1)then xk=xk%T;tk=0;else return T-a(T-xk,T-qk);end;else qk=qk%T;tk=2;end;until(hD);end);local W,q=Q and Q[yD],(Q and Q[WD]);local y=Q and Q[qD]or function(Ii)return T-(Ii%T);end;W=W or function(ar,Tr)for JR=0,1 do if(JR~=0)then if(not(Tr<0))then else return q(ar,-Tr);end;else if(not(Tr>=32))then else return 0;end;end;end;do return (ar*h[Tr])%T;end;end;local D,P,w,M,K,R,xD,fD,vD,XD=sD,sD,sD,sD,sD,sD,sD,sD,sD,(sD);for tj=0,14 do if(tj<=6)then do if(not(tj<=2))then if(tj<=4)then if(tj~=3)then I=H();else A=H();end;else do if(tj==5)then w={};else for BM=1,H() do local dM=(sD);local FM=(1);while(FM<2)do if(FM~=0)then dM={};FM=0;else (w)[BM-1]=dM;FM=2;end;end;for HO=1,H() do local XO,VO,NO=1,sD,(sD);repeat if(not(XO<=1))then if(XO~=2)then NO=(HO-1)*2;XO=2;else dM[NO]=r(0,4,VO);XO=0;end;else do if(XO==0)then do (dM)[NO+1]=r(4,4,VO);end;do XO=4;end;else do VO=H();end;XO=3;end;end;end;until(XO>3);end;end;end;end;end;else do if(not(tj<=0))then do if(tj~=1)then P=function(u2)local v2,Y2,E2=2,sD,sD;while(rD)do if(not(v2<=1))then if(v2<=2)then do Y2=m();end;v2=1;else if(v2~=3)then for MJ=1,Y2,7997 do local ZJ,gJ,nJ=4,sD,(sD);repeat if(not(ZJ<=1))then if(ZJ<=2)then for XA=1,#nJ do do (nJ)[XA]=z(nJ[XA],A);end;A=(u2*A+11)%256;end;do ZJ=1;end;else if(ZJ~=3)then gJ=MJ+7997-1;ZJ=0;else nJ={u(l,N+MJ-1,N+gJ-1)};do ZJ=2;end;end;end;else if(ZJ~=0)then E2=E2..g(V(nJ));ZJ=5;else if(not(gJ>Y2))then else gJ=Y2;end;ZJ=3;end;end;until(ZJ==5);end;do v2=3;end;else N=N+Y2;v2=0;end;end;else if(v2~=0)then E2=OD;v2=4;else return E2;end;end;end;end;else D=function(UO)local rO,vO,WO,KO,dO=2,sD,sD,sD,(sD);while(rO<=4)do if(not(rO<=1))then do if(not(rO<=2))then if(rO~=3)then N=N+4;rO=3;else WO=z(vO[1],I);do rO=1;end;end;else vO={u(l,N,N+3)};rO=4;end;end;else do if(rO~=0)then KO=z(vO[2],I);do rO=0;end;else do dO=z(vO[3],I);end;rO=5;end;end;end;end;local sO=(z(vO[4],I));do rO=0;end;do while(rD)do if(rO~=0)then return sO*16777216+dO*65536+KO*256+WO;else I=(DD*I+UO)%256;rO=1;end;end;end;end;end;end;else do q=q or function(r_,I_)do if(not(I_>=32))then else return 0;end;end;if(not(I_<0))then else do return W(r_,-I_);end;end;local B_=(sD);for Qi=0,1 do if(Qi~=0)then return B_-B_%1;else do B_=(r_%T/h[I_]);end;end;end;end;end;end;end;end;end;else do if(tj<=10)then if(not(tj<=8))then if(tj~=9)then xD={};else R=1;end;else if(tj~=7)then do K={};end;else do M=function(...)return f(PD,...),{...};end;end;end;end;else if(not(tj<=12))then if(tj~=13)then XD=vD();else function vD()local xv=(3);local nv,Lv,vv,uv=sD,sD,sD,sD;repeat do if(xv<=2)then if(not(xv<=0))then if(xv~=1)then (nv)[3]=H();xv=7;else do nv={{},{},sD,sD,sD,{},sD,sD,sD};end;xv=0;end;else Lv={};xv=5;end;else if(not(xv<=4))then if(xv~=5)then (nv)[18]=H();xv=2;else do vv={};end;do xv=4;end;end;else if(xv~=3)then do uv=1;end;xv=6;else xv=1;end;end;end;end;until(xv>6);local Wv=(m());xv=12;local Iv,Yv,hv,gv,Tv=sD,sD,sD,sD,sD;while(xv<=12)do do if(not(xv<=5))then if(not(xv<=8))then if(not(xv<=10))then if(xv==11)then for FQ=1,Iv do local lQ,TQ,LQ=1,sD,sD;while(lQ<2)do if(lQ~=0)then TQ={sD,sD,sD,sD,sD,sD,sD,sD,sD,sD};lQ=0;else LQ=D(Yv);lQ=2;end;end;lQ=15;do while(lQ<=16)do do if(not(lQ<=7))then do if(not(lQ<=11))then if(not(lQ<=13))then if(not(lQ<=14))then do if(lQ~=15)then TQ[17]=r(24,24,LQ);lQ=14;else (TQ)[9]=r(14,9,LQ);lQ=12;end;end;else TQ[2]=r(14,18,LQ);do lQ=3;end;end;else if(lQ~=12)then TQ[7]=r(6,8,LQ);lQ=5;else (TQ)[7]=r(6,8,LQ);lQ=5;end;end;else if(lQ<=9)then if(lQ~=8)then do TQ[4]=H();end;lQ=8;else do (TQ)[18]=r(11,27,LQ);end;do lQ=7;end;end;else do if(lQ~=10)then TQ[20]=r(13,5,LQ);lQ=14;else (TQ)[13]=r(30,26,LQ);lQ=11;end;end;end;end;end;else if(not(lQ<=3))then if(not(lQ<=5))then if(lQ~=6)then do TQ[15]=r(30,8,LQ);end;lQ=17;else TQ[15]=r(30,8,LQ);lQ=14;end;else if(lQ~=4)then TQ[8]=r(23,9,LQ);lQ=10;else TQ[15]=r(30,8,LQ);lQ=15;end;end;else do if(not(lQ<=1))then if(lQ~=2)then TQ[17]=r(24,24,LQ);do lQ=9;end;else (TQ)[4]=H();do lQ=17;end;end;else do if(lQ~=0)then TQ[15]=r(30,8,LQ);lQ=9;else do TQ[7]=r(6,8,LQ);end;lQ=9;end;end;end;end;end;end;end;end;end;(nv[2])[FQ]=TQ;end;xv=10;else for EO=1,Wv do nv[6][EO-1]=vD();end;xv=3;end;else do if(xv~=9)then nv[13]=H();xv=4;else Yv=H();xv=11;end;end;end;else do if(xv<=6)then do nv[13]=H();end;do xv=1;end;else if(xv~=7)then Tv=H()~=0;do xv=7;end;else for Ji=1,hv do local ni=sD;local vi=(H());local fi=1;do while(fi~=4)do if(not(fi<=1))then do if(fi~=2)then if(vi==187)then ni=SD(P(gv),Z()+m());elseif(vi==120)then do ni=hD;end;elseif(vi==7)then do ni=Z()+m();end;elseif(vi==36)then do ni=e();end;elseif(vi==jn)then do ni=Z();end;elseif(vi==135)then do ni=SD(P(gv),H());end;elseif(vi==61)then do ni=rD;end;elseif(vi==193)then ni=e();elseif(vi==106)then do ni=SD(P(gv),2);end;end;fi=1;else if(vi==187)then do ni=SD(P(gv),Z()+m());end;elseif(vi==120)then do ni=hD;end;elseif(vi==7)then ni=Z()+m();elseif(vi==36)then do ni=e();end;elseif(vi==119)then ni=Z();elseif(vi==135)then ni=SD(P(gv),H());elseif(vi==61)then do ni=rD;end;elseif(vi==193)then ni=e();elseif(vi==Yn)then do ni=SD(P(gv),2);end;end;fi=2;end;end;else do if(fi~=0)then if(vi==187)then ni=SD(P(gv),Z()+m());elseif(vi==Xn)then ni=hD;elseif(vi==7)then ni=Z()+m();elseif(vi==36)then do ni=e();end;elseif(vi==119)then ni=Z();elseif(vi==135)then do ni=SD(P(gv),H());end;elseif(vi==61)then ni=rD;elseif(vi==193)then ni=e();elseif(vi~=106)then else ni=SD(P(gv),2);end;f…

Scøuτ · 19 Март 2022

Lua:

local aahaha = false
local tank = Render.LoadImage(Http.Get("https://i.imgur.com/CwtoNXY.png"), Vector2.new(205, 128))

local orig_move = {0, 0, 0}

local sincos = function(ang)
    return Vector2.new(math.cos(ang), math.sin(ang))
end

local AngleToVector = function(angles)
    local fr, rt = Vector.new(0, 0, 0), Vector.new(0, 0, 0)

    local pitch = sincos(angles.pitch * 0.017453292519943)
    local yaw = sincos(angles.yaw * 0.017453292519943)
    local roll = sincos(angles.roll * 0.017453292519943)

    fr.x = pitch.x * yaw.x
    fr.y = pitch.x * yaw.y

    rt.x = -1 * roll.y * pitch.y * yaw.x + -1 * roll.x * -yaw.y
    rt.y = -1 * roll.y * pitch.y * yaw.y + -1 * roll.x * yaw.x

    return fr / #fr, rt / #rt
end

local function fixmove(cmd)
    local front_left, roght_lefthyh = AngleToVector(orig_move[3])
    local front_center, roght_centerhyh = AngleToVector(cmd.viewangles)

    local center = front_left * orig_move[1] + roght_lefthyh * orig_move[2]
    local div = roght_centerhyh.y * front_center.x - roght_centerhyh.x * front_center.y

    cmd.sidemove = (front_center.x * center.y - front_center.y * center.x) / div
    cmd.forwardmove = (roght_centerhyh.y * center.x - roght_centerhyh.x * center.y) / div
end

local lerp = function(start,end_pos,time,do_extraanim)
    if not do_extraanim then
        if math.abs(start-end_pos)<math.min(end_pos,start)/10 then return end_pos end
    end
    time = GlobalVars.frametime * (time * 175)
    if time < 0 then
      time = 0.01
    elseif time > 1 then
      time = 1
    end
    local delta = end_pos - start
    delta = delta * time
    delta = delta + start
    return delta
end

local load_time = -1
local name = {"к", "р", "а", "н", "в", "а", "г", "н"}

local once = false
local font = Render.InitFont("Tahoma", 25, {'b'})
local set_clan_tag_fn = ffi.cast("int(__fastcall*)(const char*, const char*)", Utils.PatternScan("engine.dll", "53 56 57 8B DA 8B F9 FF 15"))
local set_clan_tag = function(tag)
    set_clan_tag_fn(tag, tag)
end

local ui = {
    junk_text = Menu.Text("Kranvagn AA ", ("Привет, %s! Как дела? Используй подсказки на элементах меню, если что-то не понятно. По всем вопросам обращаться в дискорд lenin#6076. Хорошего дня!"):format(Cheat.GetCheatUserName())),
    junk_text1 = Menu.Text("Kranvagn AA ", "!!! Using other AA luas may cause bugs !!!"),
    junk_text2= Menu.Text("Kranvagn AA ", "Highly recommended using roll AAs without jitters and with Hide Shots on."),

    enable = Menu.Switch("Kranvagn AA", "Roll Anti-Aim", true, "Включает антиаимы"),

    always = Menu.Switch("Kranvagn AA", "Always On (not recommended)", false, "Роллы включены всегда. Мануалы оверрайдят это."),
    on_slowwalk = Menu.Switch("Kranvagn AA", "On Slowwalk", false, "Включает роллы на слоуволке"),
    manuals = Menu.Combo("Kranvagn AA", "Manual", {"None", "Left", "Right"}, 0, "Бинди это для ролл аа на мануалы"),

    jfajkfja = Menu.Text("Kranvagn AA", ""),

    indication = Menu.SwitchColor("Kranvagn AA", "Indication", true, Color.new(1,1,1,1), "Легендарный индикатор кранвагн аа"),
    clantag = Menu.Switch("Kranvagn AA", "Clan Tag", false, "Легендарный клантек кранвагн аа"),
}

local function ui_vis(val)
    ui.manuals:SetVisible(val)
    ui.on_slowwalk:SetVisible(val)
    ui.jfajkfja:SetVisible(val)
    ui.indication:SetVisible(val)
    ui.always:SetVisible(val)
    ui.clantag:SetVisible(val)
end
ui.enable:RegisterCallback(ui_vis)
ui_vis(ui.enable:Get())

local backups = {
    ya = -1,
    ym = -1,
    fo = -1,
    lm = -1,
    fs = -1,
    ds = -1,
}
local ya = Menu.FindVar("Aimbot", "Anti Aim", "Main", "Yaw Add")
local ym = Menu.FindVar("Aimbot", "Anti Aim", "Main", "Yaw Modifier")
local fo = Menu.FindVar("Aimbot", "Anti Aim", "Fake Angle", "Fake Options")
local lm = Menu.FindVar("Aimbot", "Anti Aim", "Fake Angle", "LBY Mode")
local fs = Menu.FindVar("Aimbot", "Anti Aim", "Fake Angle", "Freestanding Desync")
local ds = Menu.FindVar("Aimbot", "Anti Aim", "Fake Angle", "Desync On Shot")
Menu.FindVar("Aimbot", "Anti Aim", "Fake Angle", "Enable Fake Angle"):Set(true)
local function ui_backups()
    if backups.ya == -1 then
        backups.ya = ya:Get()
    end
    ya:Set(0)

    if backups.ym == -1 then
        backups.ym = ym:Get()
    end
    ym:Set(0)

    if backups.fo == -1 then
        backups.fo = fo:Get()
    end
    fo:Set(0)

    if backups.lm == -1 then
        backups.lm = lm:Get()
    end
    lm:Set(1)

    if backups.fs == -1 then
        backups.fs = fs:Get()
    end
    fs:Set(0)

    if backups.ds == -1 then
        backups.ds = ds:Get()
    end
    ds:Set(1)
end

local function reset_backups()
    if backups.ya ~= -1 then
        ya:Set(backups.ya)
        backups.ya = -1
    end

    if backups.ym ~= -1 then
        ym:Set(backups.ym)
        backups.ym = -1
    end

    if backups.fo ~= -1 then
        fo:Set(backups.fo)
        backups.fo = -1
    end

    if backups.lm ~= -1 then
        lm:Set(backups.lm)
        backups.lm = -1
    end

    if backups.fs ~= -1 then
        fs:Set(backups.fs)
        backups.fs = -1
    end

    if backups.ds ~= -1 then
        ds:Set(backups.ds)
        backups.ds = -1
    end
end

local function indicators()
    if not ui.enable:Get() or not ui.indication:Get() then
        load_time = -1
        return
    end
    if load_time == -1 then load_time = GlobalVars.tickcount end
    
    local screen_sz = EngineClient.GetScreenSize()
    local screen_cr = screen_sz / 2

    local start = Vector2.new(screen_cr.x - 130, screen_sz.y - 60)

    local clr = ui.indication:GetColor()

    local diff = once and 350 or math.min(350, GlobalVars.tickcount - load_time)
    for i = 1, #name do
        local this = i * 36
        if this < diff or diff > 300 or once then
            Render.Text(name[i], Vector2.new(start.x + 10 + i * 20, start.y + 25), clr, 25, font, true)
        end
    end
    if diff == 350 then once = true end
    Render.Image(tank, Vector2.new(start.x + 10 + diff / 1.9, start.y), Vector2.new(102, 64), clr)
end

local function build_tag(tag)
    local arr = {}
    for i = 1, #tag do
        arr[#arr+1] = tag:sub(1, i)
    end
    return arr
end

local tag_anim = build_tag(" kranvagn.aa          ")
local symbol = "☛"

local once1 = false
local function tag()
    if not ui.enable:Get() or not ui.clantag:Get() then
        if once1 then
            set_clan_tag("")
            once1 = false
        end
        return
    end

    once1 = true
    local curtime = math.floor(GlobalVars.curtime * 3)
    if old_time ~= curtime then
        set_clan_tag(symbol .. tag_anim[curtime % #tag_anim + 1])
        old_time = curtime
    end
end

Cheat.RegisterCallback("draw", function()
    indicators()
    tag()
end)

local sw = Menu.FindVar("Aimbot", "Anti Aim", "Misc", "Slow Walk")
local hs = Menu.FindVar("Aimbot", "Ragebot", "Exploits", "Hide Shots")
local fl = Menu.FindVar("Aimbot", "Anti Aim", "Fake Lag", "Limit")

local rol = 0
local fl_backup = -1
Cheat.RegisterCallback("pre_prediction", function(cmd)
    aahaha = false

    if fl_backup ~= -1 then
        fl:Set(fl_backup)
        fl_backup = -1
    end

    if not ui.enable:Get() then return reset_backups() end

    ui_backups()

    local lp = EntityList.GetLocalPlayer()
    if not lp then return end

    local manual = ui.manuals:Get()
    if manual > 0 then
        AntiAim.OverrideInverter(true)
        AntiAim.OverrideYawOffset(manual == 1 and -90 or 90)
        cmd.viewangles.roll = 44
        rol = 44
        aahaha = true
        return
    end

    if ui.always:Get() or (sw:Get() and ui.on_slowwalk:Get()) then
        cmd.viewangles.roll = not AntiAim.GetInverterState() and -44 or 44
        rol = cmd.viewangles.roll
        aahaha = true
    end

    if aahaha then
        AntiAim.OverrideLimit(AntiAim.GetMaxDesyncDelta())

        if hs:Get() then
            if fl_backup == -1 then
                fl_backup = fl:Get()
            end

            fl:Set(1)
        end
    end
end)

Cheat.RegisterCallback("destroy", function()
    reset_backups()

    if once1 then
        set_clan_tag("")
        once1 = false
    end

    if fl_backup ~= -1 then
        fl:Set(fl_backup)
        fl_backup = -1
    end
end)

Cheat.RegisterCallback("console", function(text)
    if text:find("quit") or text:find("exit") then reset_backups() end
end)

Cheat.RegisterCallback("aahaha", function(cmd)
    orig_move = {cmd.forwardmove, cmd.sidemove, QAngle(0, cmd.viewangles.yaw, 0)}
    fixmove(cmd)
end)

Scøuτ · 19 Март 2022

Lua:

local get_username = Cheat.GetCheatUserName()
local username = 0
local screen_size = EngineClient.GetScreenSize()
local center_x, center_y = screen_size.x / 2, screen_size.y / 2
local w_anim = 0
local k_anim = 0
local cs_anim_start = 0
local cs_anim_end = 0
local cheatname = 0
local idt_override = false
local idt_cache = 0
local keybind_pos_x, keybind_pos_y = center_x, center_y
local any_bind = false
local verdana = Render.InitFont("Verdana", 25, {'b'})

Cheat.AddNotify("Hello " ..get_username.. "!", "Don't Forget To Join Our Discord Server!")

--menu
local switch_idealtick = Menu.Switch("Ragebot", "Settings", "Ideal Tick", false, "Double Tap On Auto Peek Works Better, DO NOT BIND")

local switch_antiaim = Menu.Switch("Anti Aim", "Settings", "Enable Anti Aim", false)
local combo_yawmodifier = Menu.Combo("Anti Aim", "Settings", "Yaw Modifier", {"Off", "Jitter", "Choke"}, 0)
local sliderint_modifierdegree = Menu.SliderInt("Anti Aim",  "Settings", "Modifier Degree", 0, 0, 180)
local combo_desynctype = Menu.Combo("Anti Aim", "Settings", "Desync Type", {"Off", "Jitter", "Opposite"}, 0)
local combo_desyncfreestand = Menu.Combo("Anti Aim", "Settings", "Desync Freestand", {"Off", "Peek Fake", "Peek Real"}, 0)
local switch_chokeconditions = Menu.Switch("Anti Aim", "Settings", "Choke", false)
local combo_desyncanglechoke = Menu.MultiCombo("Anti Aim", "Settings", "Choke Conditions", {"On Shot", "On Peek"}, 0)

local combo_windows = Menu.MultiCombo("Visual", "Settings", "Windows", { "Watermark", "Status", "Keybinds"}, 0)
local combo_theme = Menu.Combo("Visual", "Settings", "Theme", {"Dark Blue", "Light", "Dark", "Custom"}, 0, "Tooltip")
local coloredit_watercolor = Menu.ColorEdit("Visual", "Settings", "Main color", Color.new(1.0, 1.0, 1.0, 1.0))
local textbox_cusername = Menu.TextBox("Visual", "Settings", "Username", 10, "", "Custom Username")
local textbox_ccheatname = Menu.TextBox("Visual", "Settings", "Cheat name", 15, "", "Custom Cheat name")

local switch_custom_scope = Menu.Switch("Visual", "Settings", "Custom Scope", false)
local coloredit_scope_start = Menu.ColorEdit("Visual", "Settings", "Start Color", Color.new(1.0, 1.0, 1.0, 1.0))
local coloredit_scope_end = Menu.ColorEdit("Visual", "Settings", "End Color", Color.new(1.0, 1.0, 1.0, 0))
local sliderint_scope_length = Menu.SliderInt("Visual", "Settings", "Length", 0, 10, 80)
local sliderint_scope_pos = Menu.SliderInt("Visual", "Settings", "Offset Position", 0, 0, 130)

local text_welcome = Menu.Text("Visual", "Information", "Welcome back, " ..get_username.. "!\n\nBe shure you joined to the our discord server")

Cheat.RegisterCallback("draw", function()
        
    local local_player_index    = EngineClient.GetLocalPlayer()
    local local_player          = EntityList.GetClientEntity(local_player_index)
    local is_scoped = EntityList.GetClientEntity(EngineClient.GetLocalPlayer()):GetProp("m_bIsScoped")
    local cscope_color_start = coloredit_scope_start:Get()
    local cscope_color_end = coloredit_scope_end:Get()
    local cs_start_a = coloredit_scope_start:Get().a
    local cs_end_a = coloredit_scope_end:Get().a
    local mouse_pos = Cheat.GetMousePos()
    local chrg = Exploits.GetCharge()
    local w_transperancy = 255
    local k_transperancy = 255
    local w_color = 0
    local w_linec = 0
    local w_text = 0
    local k_color = 0
    local k_linec = 0
    local k_text = 0
    local charge_color = 0
    
    if chrg == 1 then
        charge_color = Color.new(1, 1, 1, 1)
    else
        charge_color = Color.new(1, 0, 0, 1)
    end
    
    if Cheat.IsKeyDown(0x1) == true and mouse_pos.x > keybind_pos_x - 230 and mouse_pos.x < keybind_pos_x + 230 and mouse_pos.y > keybind_pos_y - 50 and mouse_pos.y < keybind_pos_y + 50 then
        keybind_pos_x, keybind_pos_y = mouse_pos.x, mouse_pos.y
    else
        keybind_pos_x, keybind_pos_y = keybind_pos_x, keybind_pos_y
    end
    
    if textbox_cusername:Get() == "" then
        username = get_username
    else
        username = textbox_cusername:Get()
    end
    
    if textbox_ccheatname:Get() == "" then
        cheatname = "neverlose.cc"
    else
        cheatname = textbox_ccheatname:Get()
    end
        
    if combo_theme:Get() == 0 then
        w_color = Color.new(3/255, 13/255, 26/255, w_anim)
        w_linec = Color.new(3/255, 168/255, 245/255, 255/255)
        w_text = Color.new(1, 1, 1, 1)
        w_transperancy = 0.8
        
        k_color =  Color.new(3/255, 13/255, 26/255, k_anim)
        k_linec = Color.new(3/255, 168/255, 245/255, 255/255)
        k_transperancy = 0.8
    elseif combo_theme:Get() == 1 then
        w_color = Color.new(255/255, 255/255, 255/255, w_anim)
        w_linec = Color.new(89/255, 154/255, 255/255, 255/255)
        w_text = Color.new(31/255, 31/255, 31/255, 255/255)
        w_transperancy = 0.8
        
        k_color =  Color.new(255/255, 255/255, 255/255, k_anim)
        k_linec = Color.new(89/255, 154/255, 255/255, 255/255)
        k_transperancy = 0.8
    elseif combo_theme:Get() == 2 then
        w_color = Color.new(0, 0, 0, w_anim)
        w_linec = Color.new(89/255, 154/255, 255/255, 255/255)
        w_text = Color.new(1, 1, 1, 1)
        w_transperancy = 0.8
        
        k_color = Color.new(0, 0, 0, k_anim)
        k_linec = Color.new(89/255, 154/255, 255/255, 255/255)
        k_transperancy = 0.8
    else
        w_transperancy = coloredit_watercolor:Get().a
        w_color = Color.new(0, 0, 0, w_anim)
        w_linec =  Color.new(coloredit_watercolor:Get().r, coloredit_watercolor:Get().g, coloredit_watercolor:Get().b, 255)
        w_text = Color.new(1, 1, 1, 1)
        
        k_color = Color.new(0, 0, 0, k_anim)
        k_linec = Color.new(coloredit_watercolor:Get().r, coloredit_watercolor:Get().g, coloredit_watercolor:Get().b, 255)
        k_transperancy = coloredit_watercolor:Get().a
    end
    
    
    
    if  combo_windows:Get() == 1 or combo_windows:Get() == 5 or combo_windows:Get() == 3 or combo_windows:Get() == 7 then
        textbox_cusername:SetVisible(true)
        textbox_ccheatname:SetVisible(true)
        
        w_anim = math.min(w_anim + 0.1, w_transperancy)
        Render.BoxFilled(Vector2.new(center_x * 1.70, center_y - 530), Vector2.new(center_x * 1.7 * 1.17 , center_y - 533), w_linec)
        Render.BoxFilled(Vector2.new(center_x * 1.70, center_y - 530), Vector2.new(center_x * 1.7 * 1.17 , center_y - 508), w_color)
        Render.Text(cheatname.. " | " ..username, Vector2.new(center_x * 1.71, center_y - 528), w_text, 15)
    else
        
        textbox_cusername:SetVisible(false)
        textbox_ccheatname:SetVisible(false)
        
        Render.BoxFilled(Vector2.new(keybind_pos_x, center_y - 530), Vector2.new(center_x * 1.7 * 1.17 , center_y - 508), w_color)
        w_anim = math.max(w_anim - 0.1, 0)
    end
    
    if combo_windows:Get() == 4 or combo_windows:Get() == 5 or combo_windows:Get() == 7 then
        cs_anim = math.min(k_anim + 0.1, cscope_color:Get().a )
        Render.BoxFilled(Vector2.new(keybind_pos_x,  keybind_pos_y), Vector2.new(keybind_pos_x + 140,  keybind_pos_y - 4), k_linec)
        Render.BoxFilled(Vector2.new(keybind_pos_x,  keybind_pos_y), Vector2.new(keybind_pos_x + 140,  keybind_pos_y + 25), k_color)
        Render.Text("keybinds", Vector2.new(keybind_pos_x + 35,  keybind_pos_y + 3), w_text, 15)
        
        -- keybind system
        local color_active      = Color.new(1, 1, 1, 1)
        local render_position   = Vector2.new(25, 550)

        if not local_player then
            return
        end

        local render_offset = 0

        local render_keybind = function(bind)
            if not bind:IsActive() then
                return
            end

            local bind_name             = bind:GetName()

            Render.Text(bind:GetName(), Vector2.new(keybind_pos_x, keybind_pos_y + 25 + render_offset), Color.new(1, 1, 1, 1), 15, false)

            render_offset = render_offset + 20 --  Offset our render position a bit
        end

        local binds = Cheat.GetBinds()
        for i = 1, #binds do --  Iterate over our binds...
        render_keybind(binds[i])   --  And handle them using our render_keybind function
        end
    else
        k_anim = math.max(k_anim - 0.1, 0)
        Render.BoxFilled(Vector2.new(keybind_pos_x,  keybind_pos_y), Vector2.new(keybind_pos_x + 140,  keybind_pos_y + 25), k_color)
    end
    
    if combo_windows:Get() == 2 or combo_windows:Get() == 5 or combo_windows:Get() == 7 then
        if Menu.FindVar("Aimbot", "Ragebot", "Exploits", "Double Tap"):Get() == true then
             Render.GradientBoxFilled(Vector2.new(15, center_y), Vector2.new(70, center_y + 28), Color.new(0, 0, 0, 0.3), Color.new(0, 0, 0, 0), Color.new(0, 0, 0, 0.3), Color.new(0, 0, 0, 0))
            Render.Text("DT", Vector2.new(20, center_y), charge_color, 25, verdana)
        end
    end
    
    if is_scoped == true and switch_custom_scope:Get() == true then
        cs_anim_start = math.min(cs_anim_start + 0.025, cs_start_a)
        cs_anim_end = math.min(cs_anim_end + 0.025, cs_end_a)
        
        Render.GradientBoxFilled(Vector2.new(screen_size.x / 2 + sliderint_scope_pos:Get(), screen_size.y / 2 - 2), Vector2.new(screen_size.x / 2 + sliderint_scope_length:Get() * 5 + sliderint_scope_pos:Get(), screen_size.y / 2 + 2), Color.new(cscope_color_start.r, cscope_color_start.g, cscope_color_start.b, cs_anim_start) , Color.new(cscope_color_end.r, cscope_color_end.g, cscope_color_end.b, cs_anim_end), Color.new(cscope_color_start.r, cscope_color_start.g, cscope_color_start.b, cs_anim_start), Color.new(cscope_color_end.r, cscope_color_end.g, cscope_color_end.b, cs_anim_end) )
        Render.GradientBoxFilled(Vector2.new(screen_size.x / 2 - sliderint_scope_pos:Get(), screen_size.y / 2 - 2), Vector2.new(screen_size.x / 2 - sliderint_scope_length:Get() * 5 - sliderint_scope_pos:Get(), screen_size.y / 2 + 2), Color.new(cscope_color_start.r, cscope_color_start.g, cscope_color_start.b, cs_anim_start) , Color.new(cscope_color_end.r, cscope_color_end.g, cscope_color_end.b, cs_anim_end), Color.new(cscope_color_start.r, cscope_color_start.g, cscope_color_start.b, cs_anim_start), Color.new(cscope_color_end.r, cscope_color_end.g, cscope_color_end.b, cs_anim_end))

        Render.GradientBoxFilled(Vector2.new(screen_size.x / 2 - 2, screen_size.y / 2 + sliderint_scope_pos:Get()), Vector2.new(screen_size.x / 2 + 2, screen_size.y / 2 + sliderint_scope_length:Get() * 5 + sliderint_scope_pos:Get() ), Color.new(cscope_color_start.r, cscope_color_start.g, cscope_color_start.b, cs_anim_start) , Color.new(cscope_color_start.r, cscope_color_start.g, cscope_color_start.b, cs_anim_start), Color.new(cscope_color_end.r, cscope_color_end.g, cscope_color_end.b, cs_anim_end), Color.new(cscope_color_end.r, cscope_color_end.g, cscope_color_end.b, cs_anim_end))
        Render.GradientBoxFilled(Vector2.new(screen_size.x / 2 - 2, screen_size.y / 2 - sliderint_scope_pos:Get()), Vector2.new(screen_size.x / 2 + 2, screen_size.y / 2 - sliderint_scope_length:Get() * 5 - sliderint_scope_pos:Get() ), Color.new(cscope_color_start.r, cscope_color_start.g, cscope_color_start.b, cs_anim_start) , Color.new(cscope_color_start.r, cscope_color_start.g, cscope_color_start.b, cs_anim_start), Color.new(cscope_color_end.r, cscope_color_end.g, cscope_color_end.b, cs_anim_end), Color.new(cscope_color_end.r, cscope_color_end.g, cscope_color_end.b, cs_anim_end))
    else
        cs_anim_start = 0
        cs_anim_end = 0
    end
end)

Cheat.RegisterCallback("createmove", function()
    if switch_idealtick:Get() == true then
        if Menu.FindVar("Miscellaneous", "Main", "Movement", "Auto Peek"):Get() == true then
            if not idt_override then
                idt_cache = {
                    yaw_base = Menu.FindVar("Aimbot", "Anti Aim", "Main", "Yaw Base"):Get(),
                    min_dmg = Menu.FindVar("Aimbot", "Ragebot", "Accuracy", "Minimum Damage", "SSG-08"):Get(),
                    conditions = Menu.FindVar("Aimbot", "Ragebot", "Misc", "Conditions", "SSG-08"):Get(),
                }
                
                Menu.FindVar("Aimbot", "Anti Aim", "Main", "Yaw Base"):SetInt(5)
                Menu.FindVar("Aimbot", "Ragebot", "Accuracy", "Minimum Damage", "SSG-08"):SetInt(60)
                Menu.FindVar("Aimbot", "Ragebot", "Misc", "Conditions", "SSG-08"):SetInt(4)
                Exploits.OverrideDoubleTapSpeed(16)
                idt_override = true
                
                if idt_cache.yaw_base == 2 or 3 then
                    idt_cache.yaw_base = 4
                end
            end
        else
            if idt_override then
                Menu.FindVar("Aimbot", "Anti Aim", "Main", "Yaw Base"):SetInt(idt_cache.yaw_base)
                Menu.FindVar("Aimbot", "Ragebot", "Accuracy", "Minimum Damage", "SSG-08"):SetInt(idt_cache.min_dmg)
                Menu.FindVar("Aimbot", "Ragebot", "Misc", "Conditions", "SSG-08"):SetInt(idt_cache.conditions)
                Exploits.OverrideDoubleTapSpeed(13)
                idt_override = false
            end
        end
    end
end)

Cheat.RegisterCallback("prediction", function()
    if switch_antiaim:Get() == true then
        if combo_yawmodifier:Get() == 1 then
            Menu.FindVar("Aimbot", "Anti Aim", "Main", "Yaw Modifier"):SetInt(0)
            sliderint_modifierdegree:SetVisible(true)
            if GlobalVars.tickcount % 4 > 1 then
                Menu.FindVar("Aimbot", "Anti Aim", "Main", "Yaw Add"):SetInt( sliderint_modifierdegree:Get() )
            else
                Menu.FindVar("Aimbot", "Anti Aim", "Main", "Yaw Add"):SetInt( sliderint_modifierdegree:Get() * -1 )
            end
        elseif combo_yawmodifier:Get() == 2 then
                if GlobalVars.tickcount % 3 > 1 then
                    Menu.FindVar("Aimbot", "Anti Aim", "Main", "Yaw Add"):SetInt( sliderint_modifierdegree:Get() + math.random(1, 2) )
                else
                    Menu.FindVar("Aimbot", "Anti Aim", "Main", "Yaw Add"):SetInt( sliderint_modifierdegree:Get() * -1 - math.random(1, 2) )
                end
        else
            sliderint_modifierdegree:SetVisible(false)
        end
        
        if combo_desynctype:Get() == 1 then
            if GlobalVars.tickcount % 4 > 1 then
                AntiAim.OverrideInverter(false)
                AntiAim.OverrideLBYOffset(40 + math.random(1, 10) )
            else
                AntiAim.OverrideInverter(true)
                AntiAim.OverrideLBYOffset(40 + math.random(1, 10) )
            end
        end
    end
end)

st1vaha333 · 18 Март 2022

leak cfg by The

KuCJloTa

Scøuτ · 18 Март 2022

Скрипт не мой, почти сделан в стиле скита, но не совсем похоже, посижу ночью, переделаю их прям в точь точь миссы логи скита.

(А вот и обновил логи, сделать точь в точь, только шрифт говно, нема)

JavaScript:

var logs = [];
var logs_time = [];
var logs_alpha = [];

function removeLog() {
    if (logs.length > 6) {
        logs.shift();
        logs_time.shift();
    }

    if (logs_time[0] + 6.5 < global_vars.curtime()) {
        logs_alpha[0] -= global_vars.frametime() * 600;
        if (logs_alpha[0] < 0) {
            logs.shift();
            logs_time.shift();
            logs_alpha.shift();
        }
    }
}

function logsAdd(text) {
    cheat.print_to_console("[gamesense] ", [0, 255, 127]);
    cheat.print_to_console(text + "\n", [255, 255, 255]);

    logs.push(text);
    logs_time.push(global_vars.curtime());
    logs_alpha.push(255);
}

function renderLog() {
    if (!entity.get_local_player()) return;

    for (i = 0; i < logs.length; i++) {
        render.text([7, 7 + 13 * i], [230, 230, 230, logs_alpha[i]], 12, 0, logs[i]);
    }
}

register_callback('player_hurt', function() {
    var userid = entity.get_player_for_user_id(current_event.get_int("userid"))
    var attacker = entity.get_player_for_user_id(current_event.get_int("attacker"))
    var target_health = current_event.get_int("health")
    var userid_info = entity.get_player_info(userid);
    var attacker_info = entity.get_player_info(attacker);

    var hitgroup = current_event.get_int("hitgroup");

    switch (hitgroup)
    {
    case 1:
        hitgroup = "head";
        break;
    case 2:
        hitgroup = "chest";
        break;
    case 3:
        hitgroup = "stomach";
        break;
    case 4:
        hitgroup = "left arm";
        break;
    case 5:
        hitgroup = "right arm";
        break;
    case 6:
        hitgroup = "right leg";
        break;
    case 7:
        hitgroup = "left leg";
        break;
    default:
        hitgroup = "generic";
    }

    if (attacker == entity.get_local_player() && userid != entity.get_local_player())
        logsAdd("Hit " + userid_info.name + " in the " + hitgroup + " for " + current_event.get_int("dmg_health")+ " damage" + " ("+target_health.toString()+" health remaining)");
});

register_callback('ragebot_miss', function() {
    var userid = entity.get_player_for_user_id(current_event.get_int('player_index'));
    var userid_info = entity.get_player_info(userid);

    var hitgroup = current_event.get_int('hitbox');

    switch (hitgroup)
    {
    case 1:
        hitgroup = "head";
        break;
    case 2:
        hitgroup = "chest";
        break;
    case 3:
        hitgroup = "stomach";
        break;
    case 4:
        hitgroup = "left arm";
        break;
    case 5:
        hitgroup = "right arm";
        break;
    case 6:
        hitgroup = "right leg";
        break;
    case 7:
        hitgroup = "left leg";
        break;
    default:
        hitgroup = "generic";
    }

    if (userid != entity.get_local_player())
        logsAdd("Missed shot due to " + ((current_event.get_string('resolver_mode') == "") ? "spread" : "resolver"));
});

register_callback("render", function() {
    removeLog();
    renderLog();
});

Masha · 18 Март 2022

un très bonne addon pour administrer

Павел Ветров · 17 Март 2022

Известный аддон на метоварщика с моей локализацией
Очень выгоден для быстрой загрузки, т.к. не требует контента
GitHub(без перевода)

st1vaha333 · 17 Март 2022

RAWETRIP CFG ОТ n0yfam

Jock · 17 Март 2022

Информация:

F4 взял с сборки VSRP
Пусть Установки в - garrysmod\gamemodes\darkrp\gamemode\core\ui\vgui\f4

Скриншот F4:

st1vaha333 · 17 Март 2022

mercury cfg leak

ZAKAT · 17 Март 2022

Конфиг не мой, взял чей-то кфг и чуть переделал. В кд на серверах выхожу. Если кого тепает , на некоторых серверах может - оффайте static desync. Скар пенит. Дигл нужно чуть поднастроить , скаут убивает. Удачи !

hellix · 17 Март 2022

by hellixtop1#1234
вроде бы ласт
пруфов нет но вы держитесь

nvrlscc · 17 Март 2022

полные настройки конфига мауча, самый последний апдейт
Nlv2
Reworking ragebot and anti-aims
15.03.2022 17:31

saymonq · 17 Март 2022

Сливаю свой личный cfg [+ js] с продажи, продавал в шопе за 3 бакса, решил слить так как он больше не продается.
--------------------------------------------------------------------------------------------------------------------
В кфг настроены все оружия, так же нужно юзать его с js из архива

Пишите свое мнение по поводу конфига, как недостатки так и положительные качества

Ресурсы

Ресурсы

Показывать только:

CFG Cfg for weave

FATALITY LUA Yeetyaw

NEVERLOSE LUA Kranvagan

NEVERLOSE LUA Delta.lua

CFG leak cfg by The KuCJloTa

JS Miss logs for weave v2

LUA Mode admin Gmod

LUA Enchanced Meth Lab

CFG RAWETRIP CFG ОТ n0yfam

LUA F4 VSRP

CFG mercury cfg leak

CFG cfg weawe.sosu

ONETAP v4 CFG onetap by yapa leak

NEVERLOSE CFG CFG MAU4 FULL SETTINGS

ONETAP v4 CFG Слив кфг с продажи за [3$]

Команда форума онлайн

Пользователи онлайн

Статистика форума