[Руководство] [V34, LUA]***New Antiban - DezHack***[Четыре функции]

[InfectedXMP]

Цитата: функция спама в чате обходит протект плагин, который блочит такой вид спама. и почему кстати блочит, если нормально спамлю то тект попадает в чат, а через прогу это - не пашет спам, пингхак кстати работает

Нет, спам в /r/r/r/r/r последовательности идет, и поэтому ник не видно в чате, только в консоле.

[Alp€rium]

А вот и исходник Чистый, без ascll и без различных других)

SpamDelay = "7000"

AntibanStart = io.open("cstrike/addons/LSS.txt", "r"):read()

function newLine(text, allowClear)
	if allowClear == 1 then
		cmd('clear')
		wait(50)
	end
	cmd('echo "'..text..'"')
end

function SplitArgsSkill(str, pat)
   local t = {}
   local fpat = "(.-)" .. pat
   local last_end = 1
   local s, e, cap = str:find(fpat, 1)
   while s do
      if s ~= 1 or cap ~= "" then
    table.insert(t,cap)
      end
      last_end = e+1
      s, e, cap = str:find(fpat, last_end)
   end
   if last_end <= #str then
      cap = str:sub(last_end)
      table.insert(t, cap)
   end
   return t
end

if args=="" then
	newLine('******************************************************************      ',1)
	newLine('                                        ',0)
	newLine('******************************************************************      ',0)
	newLine('                              Error                                     ',0)
	newLine('******************************************************************      ',0)
	newLine('  Creators:                                   ',0)
	newLine('  Team:                                                   ',0)
	newLine('******************************************************************      ',0)
	newLine('  Write to arguments nickname1, nickname2, ping and spam!               ',0)
	newLine("  Example: "..AntibanStart.." "..AntibanName.." 'nick1,nick2,5,spam'    ",0)
	newLine('  P.S. Ping must be specified to disable enter 0!                       ',0)
	newLine('  P.S.S. Servers activate strictly in the late rounds!                  ',0)
	newLine('******************************************************************      ',0)
	newLine('  Script features:                                                      ',0)
	newLine('  1. StandartAntiban                                                    ',0)
	newLine('  2. SteamHider                                                         ',0)
	newLine('  3. PingHack                                                           ',0)
	newLine('  4. Spammer                                                            ',0)
	newLine('******************************************************************      ',0)
	newLine('                     Powered                           ',0)
	newLine('                                                      ',0)
	newLine('******************************************************************      ',0)
else
    NickNameSplit = SplitArgsDez(args,",")
	Hide = "\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t"
	NewLine = "\r\r\r\r\r\r\r\r\r\r"
	if NickNameSplit[3]~="0" then
		setCVar('net_fakelag',NickNameSplit[3]);
	else
		NickNameSplit[3] = "Disable"
	end
	cmd('alias name ""')
	wait(100)
    cmd('setinfo name "'..NickNameSplit[1]..''..NewLine..'"')
    wait(100)
    cmd('setinfo name "'..NickNameSplit[2]..''..Hide..'"')
	wait(150)
	newLine('******************************************************************',1)
	newLine('                                      ',0)
	newLine('******************************************************************',0)
	newLine('  Script successfully activated!                                  ',0)
	newLine('  NickName #1: '..NickNameSplit[1]..'                             ',0)
	newLine('  NickName #2: '..NickNameSplit[2]..'                             ',0)
	newLine('  Ping-Hack: '..NickNameSplit[3]..'                               ',0)
	newLine('  Spammer: '..NickNameSplit[4]..'                                 ',0)
	newLine('  SteamHider - Status: Activated!                                 ',0)
	newLine('******************************************************************',0)
	newLine('                                           ',0)
	newLine('                                                ',0)
	newLine('******************************************************************',0)
	while keyDown(36) == 0 do
		cmd('say "=> '..NickNameSplit[4]..' <=  :"')
		wait(SpamDelay)
	end
end

[zxcv124]

Цитата: Сообщение от Alp€rium А вот и исходник Чистый, без ascll и без различных других) SpamDelay = "7000" AntibanStart = io.open("cstrike/addons/LSS.txt", "r"):read() function newLine(text, allowClear) if allowClear == 1 then cmd('clear') wait(50) end cmd('echo "'..text..'"') end function SplitArgsSkill(str, pat) local t = {} local fpat = "(.-)" .. pat local last_end = 1 local s, e, cap = str:find(fpat, 1) while s do if s ~= 1 or cap ~= "" then table.insert(t,cap) end last_end = e+1 s, e, cap = str:find(fpat, last_end) end if last_end <= #str then cap = str:sub(last_end) table.insert(t, cap) end return t end if args=="" then newLine('****************************************************************** ',1) newLine(' ',0) newLine('****************************************************************** ',0) newLine(' Error ',0) newLine('****************************************************************** ',0) newLine(' Creators: ',0) newLine(' Team: ',0) newLine('****************************************************************** ',0) newLine(' Write to arguments nickname1, nickname2, ping and spam! ',0) newLine(" Example: "..AntibanStart.." "..AntibanName.." 'nick1,nick2,5,spam' ",0) newLine(' P.S. Ping must be specified to disable enter 0! ',0) newLine(' P.S.S. Servers activate strictly in the late rounds! ',0) newLine('****************************************************************** ',0) newLine(' Script features: ',0) newLine(' 1. StandartAntiban ',0) newLine(' 2. SteamHider ',0) newLine(' 3. PingHack ',0) newLine(' 4. Spammer ',0) newLine('****************************************************************** ',0) newLine(' Powered ',0) newLine(' ',0) newLine('****************************************************************** ',0) else NickNameSplit = SplitArgsDez(args,",") Hide = "\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t" NewLine = "\r\r\r\r\r\r\r\r\r\r" if NickNameSplit[3]~="0" then setCVar('net_fakelag',NickNameSplit[3]); else NickNameSplit[3] = "Disable" end cmd('alias name ""') wait(100) cmd('setinfo name "'..NickNameSplit[1]..''..NewLine..'"') wait(100) cmd('setinfo name "'..NickNameSplit[2]..''..Hide..'"') wait(150) newLine('******************************************************************',1) newLine(' ',0) newLine('******************************************************************',0) newLine(' Script successfully activated! ',0) newLine(' NickName #1: '..NickNameSplit[1]..' ',0) newLine(' NickName #2: '..NickNameSplit[2]..' ',0) newLine(' Ping-Hack: '..NickNameSplit[3]..' ',0) newLine(' Spammer: '..NickNameSplit[4]..' ',0) newLine(' SteamHider - Status: Activated! ',0) newLine('******************************************************************',0) newLine(' ',0) newLine(' ',0) newLine('******************************************************************',0) while keyDown(36) == 0 do cmd('say "=> '..NickNameSplit[4]..' <= :"') wait(SpamDelay) end end

Почему не работает этот исходник? Вот что пишет когда запускаю скрипт в ксс v34 :
cstrike/lua/Antiban.lua:52: attempt to call global 'SplitArgsDez' (a nil value)
Как это исправить?