BNC script

Paste Your code(s) here, and state your problem.

BNC script

Postby Futz0r » Mon May 18, 2009 8:57 pm

Hello there.
I need help to this script
I need a scanner to ip'erne who log on, even if it takes 2 IPs should self delete them both.

but how do I do that?

Sumsar have helping me to make this script here.
so its only authed ppl can requeste, but now i need "cloner/ip/auth"scanner if you understand :)

Code: Select all
; set %debug990 1
; unset %debug990

on *:TEXT:.bnc*:#Futz0r.dk:{
  if (!%spam) {
    set -u30 %spam 1
    if ($2 == $null) {
      msg $chan %logo Wrong Syntax in: < $+ $1- $+ > %ls The syntax is .bnc <Your Ident> %ls
    }
    if ($lines(idents.txt) >= %totalusers) {
      msg $chan %logo Sorry, no more free slots %logo
      return
    }
    if ($2) {
      if (%debug990 == 1) {
        echo -st $nick Requested a bnc, checking requirements.
      }
      set %ident $2
      set %chan $chan
      .who $nick n%nat,990
    }
  }
}
raw 354:*: {
  if ($2 == 990) {
    if ($4 != 0) {
      CreateBnc $3 %ident
      unset %ident
      if (%debug990 == 1) {
        echo -st $3 is authed as $4 $+ .
      }
    }
    else {
      if (%debug990 == 1) {
        echo -st $3 is not authed.
      }
    }
  }
}
alias -l CreateBnc {
  set %password $remove($($str($!rand(a,z) $+ $chr(32), 3),2),$chr(32)) $+ $remove($($str($!rand(0,9) $+ $chr(32), 2),2),$chr(32)) $+ $remove($($str($!rand(a,z) $+ $chr(32), 3),2),$chr(32))
  set %bnctojoin $2      
  write idents.txt $2      
  sbnc adduser $2 %password
  msg %chan %logo Next request is in 30seconds %ls
  timer 1 30 msg %chan %logo Requesting is now on again %ls
  sbnc simul $2 sbnc set realname BNC by #Futz0r.dk - www.you-aimbot.info
  sbnc simul $2 join &partyline
  sbnc simul $2 sbnc set server irc.quakenet.org 6667
  timer 1 4 msg $1 %logo You have been added with ident: $2 - and password: %password %ls
  timer 1 5 msg $1 %logo The hostname of the server is: bnc.fra.quickbnc.dk - port: 6006 %ls
  timer 1 6 msg $1 %logo For quickconnect, type: /server bnc.fra.quickbnc.dk:6006 %password -i $2 $2 $+ ^ $+($2,@Futz0r.bnc) $2 %ls
  timer 1 7 msg $1 %logo Remember to idle on #Futz0r.dk !! %ls
  unset %password
  if (%debug990 == 1) {
    echo -st Creating bnc for $1 alias ident $2
  }
}
Futz0r
 

Re: BNC script

Postby jonlar » Mon May 18, 2009 9:18 pm

Well, i got what u are looking for, but for eggdrops, and its all in german
jonlar
 

Re: BNC script

Postby Futz0r » Mon May 18, 2009 10:17 pm

jonlar wrote:Well, i got what u are looking for, but for eggdrops, and its all in german



its fine, i'll make it to english :)
if i can understand it :D hah - my best friend will help me to get it in english :)

btw. i have eggdrop too ;)
Futz0r
 

Re: BNC script

Postby Futz0r » Tue May 19, 2009 8:16 pm

jonlar wrote:Well, i got what u are looking for, but for eggdrops, and its all in german




Is that something you want to share with us?
Futz0r
 

Re: BNC script

Postby jonlar » Mon Sep 07, 2009 4:33 pm

Shure. Sry, seems i forgot to post the Link ;)
http://dev.alexanderb.info/
Look for sbnc
Single sbnc.tcl and sbnc_load.tcl needs to be uploaded into the sbnc /scripts/ folder. Then just upload sbnc.tcl and sbnc_load.tcl into your sbnc /scripts/ folder and add source "scripts/sbnc_load.tcl" into your MAIN sbnc.tcl. Dont forget to edit the sbnc_load.tcl to your needs before!!!!
Type in IRC (when connected to sbnc) /sbnc tcl :source scripts/sbnc-load.tcl and your sBNC "bot" will join your Channel.
Enter .sbnc to get a cmd List.
jonlar
 


Return to Mirc Scripting Help

Who is online

Users browsing this forum: No registered users and 0 guests