mIRC Home    About    Download    Register    News    Help

Print Thread
#235435 17/12/11 05:52 PM
Joined: Jan 2010
Posts: 51
L
Lenooox Offline OP
Babel fish
OP Offline
Babel fish
L
Joined: Jan 2010
Posts: 51
hello

possible to create a script
on join counter and Location? In QuakeNet?


(\__/)
(='.'=)
(")_(")
Bunny Hopp

QuakeNet@ #Lenoox <> visit http://www.insaneboard.comeze.com
Lenooox #235436 17/12/11 06:39 PM
Joined: Feb 2003
Posts: 3,432
S
Hoopy frood
Offline
Hoopy frood
S
Joined: Feb 2003
Posts: 3,432
Everyone joining including you

on *:JOIN:#: inc %join_counter

If you only want to count your own joins.

on $me:JOIN:#: inc %join_counter

If you want to count everyone but your self.

on *:JOIN:#:if ($nick != $me) { inc %join_counter }

one of this codes goes in your remote, ALT + R in mirc.

The location i dont know what you mean, but look at http://www.mircscripts.org/ if you can find anything that do what you want there.


if ($me != tired) { return } | else { echo -a Get a pot of coffee now $+($me,.) }
sparta #235439 17/12/11 07:35 PM
Joined: Jan 2010
Posts: 51
L
Lenooox Offline OP
Babel fish
OP Offline
Babel fish
L
Joined: Jan 2010
Posts: 51
i think of this

i tried to make one ! but dunno why not work frown

Code:
alias resolve {
  set %resolve.ip $$1
  sockopen resolve.ip www.topwebhosts.org 80
  .timer 1 3 sockclose resolve.ip
}
on *:sockopen:resolve.ip: {
  var %a = sockwrite -n $sockname
  %a GET $+(/tools/ip-locator.php?query=,%resolve.ip) HTTP/1.1
  %a HOST: topwebhosts.org
  %a $crlf
}
on *:sockread:resolve.ip: {
  sockread %sockread
  if (href='http://www.ip2location.com'> isin %sockread) { 

    ; Geolocation data from IP2Location (Product: DB4)
    set %resolve.country1 $remove($gettok($gettok(%sockread,17,47),3-,62),$+($chr(60),img src,$chr(61),$chr(39)))

    ; Geolocation data from IPligence (Product: Max)
    set %resolve.country2 Country: $remove($gettok($gettok(%sockread,50,47),3-,62),$+($chr(60),img src,$chr(61),$chr(39)))
  }
  if (Registry Information for isin %sockread) { 
    if ($gettok($regsubex(%sockread,/^[^<]*>|<[^>]*>|<[^>]*$/g,),4,32) == %resolve.ip) { 
      msg $($+(%,join.chan),2) Welcome to $($+(%,join.chan),2) $($+(%,join.nick),2) $+ . We are glad to have a visitor from $iif(%resolve.country1,%resolve.country1,%resolve.country2) $+ . $&
        You are the $ord($($+(%,$($+(%,join.chan),2),joinstotal),2)) visitor and it's your $ord($($+(%,$($+(%,join.nick),2),$($+(%,join.chan),2),joins),2)) join here in %join.chan $+ .
    }
  }
  if (is not a valid IP address isin %sockread) { 
    msg $($+(%,join.chan),2) Welcome to $($+(%,join.chan),2) $($+(%,join.nick),2) $+ . We are glad to have a visitor from $iif(%resolve.country1,%resolve.country1,%resolve.country2) $+ . $&
      You are the $ord($($+(%,$($+(%,join.chan),2),joinstotal),2)) visitor and it's your $ord($($+(%,$($+(%,join.nick),2),$($+(%,join.chan),2),joins),2)) join here in %join.chan $+ .
  }
}

on *:join:#: {
  set %join.chan $chan
  set %join.nick $nick
  inc $+(%,#,joinstotal) 1
  inc $+(%,$nick,#,joins) 1 
  userip $nick
}
raw 340:*: { resolve $gettok($$1-,2,64) }
raw 340:*: { resolve $gettok($$1-,2,64) }


(\__/)
(='.'=)
(")_(")
Bunny Hopp

QuakeNet@ #Lenoox <> visit http://www.insaneboard.comeze.com
Lenooox #235445 18/12/11 06:38 PM
Joined: Jan 2010
Posts: 51
L
Lenooox Offline OP
Babel fish
OP Offline
Babel fish
L
Joined: Jan 2010
Posts: 51
nobody? :s


(\__/)
(='.'=)
(")_(")
Bunny Hopp

QuakeNet@ #Lenoox <> visit http://www.insaneboard.comeze.com
sparta #235464 20/12/11 08:07 AM
Joined: Jul 2007
Posts: 1,129
T
Hoopy frood
Offline
Hoopy frood
T
Joined: Jul 2007
Posts: 1,129
Originally Posted By: sparta
on $me:JOIN:#:
That is the wrong format. The correct one is:
Code:
on me:*:join:#:

Tomao #235474 20/12/11 03:43 PM
Joined: Jan 2010
Posts: 51
L
Lenooox Offline OP
Babel fish
OP Offline
Babel fish
L
Joined: Jan 2010
Posts: 51
yes i know it smile
but i want creat an on join Location and join counter script.
i tried , but mine version dont respond for me :s
see above the script


(\__/)
(='.'=)
(")_(")
Bunny Hopp

QuakeNet@ #Lenoox <> visit http://www.insaneboard.comeze.com
Lenooox #235492 21/12/11 03:37 PM
Joined: Dec 2011
Posts: 3
M
Self-satisified door
Offline
Self-satisified door
M
Joined: Dec 2011
Posts: 3
wawww help... I don't speak english but I'll try... if a person speak french i will be happy... I have a big problem... when I want to enter in mirc , I have a message... Infected with a virus or trojan, please clean your system. Cleaner @ http://www.moosoft.com .... the problem its I DON'T HAVE ANY VIRUS OR TROJAN... I had clean my computer yesterday by my technician... help me please

Lenooox #235493 21/12/11 03:40 PM
Joined: Dec 2011
Posts: 3
M
Self-satisified door
Offline
Self-satisified door
M
Joined: Dec 2011
Posts: 3
I know... my english is beurk!

MarieHelene1 #235494 21/12/11 04:39 PM
Joined: Oct 2004
Posts: 8,330
Hoopy frood
Offline
Hoopy frood
Joined: Oct 2004
Posts: 8,330
NOTE: Instead of replying, you should create a new message so we keep the different topics separated.

To answer your question, in most cases, this error message means that someone with a similar IP address was banned and they included a range of IP addresses that happens to include yours. The best thing to do is go to the network's website and email them. You can use Google to find their website. For example, searching for Undernet will tell you that their website is www.undernet.org . Their website should include contact information. Just email them and tell them about your problem and give them your IP address and they should be able to help you.


Invision Support
#Invision on irc.irchighway.net
Lenooox #235495 21/12/11 05:18 PM
Joined: Dec 2011
Posts: 3
M
Self-satisified door
Offline
Self-satisified door
M
Joined: Dec 2011
Posts: 3
thxxx

MarieHelene1 #235496 21/12/11 05:20 PM
Joined: Jan 2010
Posts: 51
L
Lenooox Offline OP
Babel fish
OP Offline
Babel fish
L
Joined: Jan 2010
Posts: 51
and can anyone help me? :$


(\__/)
(='.'=)
(")_(")
Bunny Hopp

QuakeNet@ #Lenoox <> visit http://www.insaneboard.comeze.com

Link Copied to Clipboard