DC++ only (more accurate) - Page 2
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

DC++ only (more accurate)

Started by blackwings, 15 June, 2005, 19:15:57

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

BeeR

#25
QuoteOriginally posted by GeceBekcisi
It'll only allow Operators to connect without DC++

And that is not good :(
Vip's should always be unchecked
A cold BeeR is stunning !!

blackwings

QuoteOriginally posted by BeeR
QuoteOriginally posted by GeceBekcisi
It'll only allow Operators to connect without DC++

And that is not good :(
Vip's should always be unchecked
just change =
if not curUser.bOperator then
to =
if not (curUser.bOperator or curUser.iProfile==2) then


BeeR

QuoteOriginally posted by blackwings
QuoteOriginally posted by BeeR
QuoteOriginally posted by GeceBekcisi
It'll only allow Operators to connect without DC++

And that is not good :(
Vip's should always be unchecked
just change =
if not curUser.bOperator then
to =
if not (curUser.bOperator or curUser.iProfile==2) then

okidoki ,, give it a try

tnx :]
A cold BeeR is stunning !!

BeeR

#28
--Anti rmDC++ script for PtokaX 0.3.3.0 Lua 5.0.2 by PPK
--CHANGED: modded to become a dc++ only script
----version 1.0
-- Moded by Madman
-- Added Redirect option

--//Start of Config
Bot = frmHub:GetHubBotName()

DcVer = "0.674"
Redir = 1 -- 1 for on, nil for off
--//End of Config

function NewUserConnected(curUser)
   if not (curUser.bOperator or curUser.iProfile==2) then
      if curUser.bHasTag then
         if curUser.sClient=="DC++" then
            if tonumber(curUser.sClientVersion) < tonumber(DcVer) then
               curUser:SendData(Bot,"You aren't using DC++, go away")
               if Redir then
                  curUser:Redirect(frmHub:GetRedirectAddress())
               end
               curUser:Disconnect()
               return 1
            end
         else
            if Redir then
               curUser:Redirect(frmHub:GetRedirectAddress())
            end
            curUser:Disconnect()
         end
      else
         if Redir then
            curUser:Redirect(frmHub:GetRedirectAddress())
         end
         curUser:Disconnect()
      end
   end
end


function SupportsArrival(curUser, sData)
   if string.sub(sData, 10, 11) == "  " then
      curUser:SendData( Bot.."Buggy client, go away!")
      SendPmToNick(Bot, " rmDC++ from IP: "..curUser.sIP.." trying to login... he is his wasting time")
      if Redir then
         curUser:Redirect(frmHub:GetRedirectAddress())
      end
      curUser:Disconnect()
      return 1
   elseif not string.find(sData, "Supports UserCommand NoGetINFO NoHello UserIP2 TTHSearch GetZBlock")then
      curUser:SendData( Bot.."You aren't useing DC++, go away")
      SendPmToNick(Bot, " Non-DC++ client from IP: "..curUser.sIP.." trying to login... he is his wasting time")
      if Redir then
         curUser:Redirect(frmHub:GetRedirectAddress())
      end
      curUser:Disconnect()
      return 1
   end
end

it wont let me in with my dcdm in my own hub ,, i'm redirected =((
[01:24:59] *** Connecting to Xhub.myftp.biz...
[01:24:59] *** Connected
[01:24:59] PtokaXYou aren't useing DC++, go away
[01:24:59] You are redirected to xxx.no-ip.org

i must stop the script to get in
A cold BeeR is stunning !!

blackwings

try this =
--Anti rmDC++ script for PtokaX 0.3.3.0 Lua 5.0.2 by PPK
--CHANGED: modded to become a dc++ only script
----version 1.0
-- Moded by Madman
-- Added Redirect option

--//Start of Config
Bot = frmHub:GetHubBotName()

DcVer = "0.674"
Redir = 1 -- 1 for on, nil for off
--//End of Config

function NewUserConnected(curUser)
	if not (curUser.bOperator or curUser.iProfile==2) then
		if curUser.bHasTag then
			if curUser.sClient=="DC++" then
				if tonumber(curUser.sClientVersion) < tonumber(DcVer) then
					curUser:SendData(Bot,"You aren't using DC++, go away")
					if Redir then
						curUser:Redirect(frmHub:GetRedirectAddress())
					end
					curUser:Disconnect()
					return 1
				end
			else
				if Redir then
					curUser:Redirect(frmHub:GetRedirectAddress())
				end
				curUser:Disconnect()
			end
		else
			if Redir then
				curUser:Redirect(frmHub:GetRedirectAddress())
			end
			curUser:Disconnect()
		end 
	end
end


function SupportsArrival(curUser, sData)
	if not curUser.bOperator then
		if string.sub(sData, 10, 11) == "  " then
			curUser:SendData( Bot, "Buggy client, go away!")
			SendPmToNick(Bot, " rmDC++ from IP: "..curUser.sIP.." trying to login... he is his wasting time")
			if Redir then
				curUser:Redirect(frmHub:GetRedirectAddress())
			end
			curUser:Disconnect()
			return 1
		elseif not string.find(sData, "Supports UserCommand NoGetINFO NoHello UserIP2 TTHSearch GetZBlock")then
			curUser:SendData( Bot, "You aren't useing DC++, go away")
			SendPmToNick(Bot, " Non-DC++ client from IP: "..curUser.sIP.." trying to login... he is his wasting time")
			if Redir then
				curUser:Redirect(frmHub:GetRedirectAddress())
			end
			curUser:Disconnect()
			return 1
		end
	then
end


BeeR

scripts\DC++only.LUA:62: `end' expected (to close `function' at line 43) near `'
A cold BeeR is stunning !!

SMF spam blocked by CleanTalk