Sonny's P2P Kill

Please Register to submit score.

Average Score	5.0
Scores Submitted	1
Date Added	May 11, 2008
Last Updated	May 14, 2008
Tags	kill p2p simple

Introduction

simple p2p kill with a list, and a timer for which i really didn't feel necassary, but i included it anyway ; lol. Also has an on join msg, that notifies the person that the p2p kill is on when they jon, unless the person is in your p2plist. I didn't make it so it halts on yourself, so that when you join a new channel, it still notifies everyone that p2p kill is on.

Grab the Code

#p2pkill off
On !*:Open:?:*:{ 
  set %p2pkill ON 
  set %p2pnick $nick 
  If (%p2pnick isin $read(p2plist.txt,w,%p2pnick)) { Halt } 
  If (%p2pkill == OFF) { Halt }
  Elseif (%p2pkill == ON) { set %killcnt $calc(%killcnt + 1) 
  kill %p2pnick I Told You P2P Kill Was On - Must Be Listed.(Kill Count( $+ %killcnt $+ ) }
}
#p2pkill off
on *:JOIN:#:{ If (%p2pnick isin $read(p2plist.txt,w,%p2pnick)) { Halt }
  Elseif (%p2pkill == ON) { .notice $nick [ 4,1[12,1P2PKILL Is ON4,1]6,1X4,1[12,1Must Be Listed To P2P Me4,1] ] }
  close -m %p2pnick
}
On *:text:*:{ If ($1 == !p2plist) {
    var %p2p.list 1
    while (%p2p.list <= $lines(p2plist.txt)) { 
      echo -a $read(p2plist.txt,%p2p.list))
      inc %p2p.list 
    }
  }
}
menu menubar,channel { 
  -
  P2P Kill
  .On:{ IF (%p2pkill == ON) { echo -a P2PKILL Is Already On | Halt } 
    Else set %p2pkill ON | .enable #p2pkill 
    .notice $ [ 4,1[12,1SERVER NOTICE4,1]6,1X4,1[12,1From4,1]6,1X4,1[12,1Sonny12,14,1]6,1X4,1[12,1P2PKILL Is ON4,1]6,1X4,1[12,1Must Be Listed To P2P Me4,1] ]
    .timer1 0 1200 .notice $ [ 4,1[12,1SERVER NOTICE4,1]6,1X4,1[12,1From4,1]6,1X4,1[12OWNER4,1:12,1Sonny12,14,1]6,1X4,1[12,1P2PKILL Is ON4,1]6,1X4,1[12,1Must Be Listed To P2P Me4,1] ]
  }
  .Off:{ If (%p2pkill == OFF) { echo -a P2PKILL Isn't On | Halt }
    Else set %p2pkill OFF | .disable #p2pkill | .timer1 off | .notice $ [ 4,1[12,1SERVER NOTICE4,1]6,1X4,1[12,1From4,1]6,1X4,1[12,1Sonny4,1]6,1X4,1[12,1P2PKILL Is OFF4,1] ]
  }
  .P2P List:{ var %p2p.list 1
    while (%p2p.list <= $lines(p2plist.txt)) { 
      echo -a $read(p2plist.txt,%p2p.list))
      inc %p2p.list 
    }
  }
  .View Kills:amsg 4,1(12,1P2P Kills Count6,1- $+ %killcnt $+ -4,1)
  .Reset Kills:set %killcnt 0 | amsg 4,1(12,1P2P Kills Count Has Been Reset6,1- $+ %killcnt $+ -12,1)
}

alias addp2pa { 
  write p2plist.txt $1 
}
alias delp2pa { 
  write -ds $+ $1 p2plist.txt $1 
}

Comments

(10) RSS

Go to Bottom

Comments: 834

mIRC Snippet: Sonny's P2P Kill
Posted on May 12, 2008 5:57 am

Looks good altho i don't see a reason for the global var when your enabling you group and place a dot before ''enable'' so it silencs it so you dont see ''group(s) enabled'' and disabled.The on join event is a bad idea only cause it can get floody an even worse its exploitable and your amsg on a timer should be a /notice $ <-- server notice so everyone gets it reguardless where they are an does /msg yournick.Ahh and you count var %killcnt you can just ''inc %killcnt | kill %p2pnick I Told You P2P Kill Was On - Must Be Listed.(Kill Count( $+ %killcnt $+ )''.I didn't test it all the way i don't haev time atm but looks good with some more work it can be better.`-.-´

~Sonny

Comments: 14

mIRC Snippet: Sonny's P2P Kill
Posted on May 12, 2008 6:07 am

Thanks Dan

Comments: 834

mIRC Snippet: Sonny's P2P Kill
Posted on May 12, 2008 6:20 am

Np yw.`-.-´

Eugenio

Comments: 474

mIRC Snippet: Sonny's P2P Kill
Posted on May 12, 2008 6:23 am

I see you 2 have kissed and made up
;)

Comments: 834

mIRC Snippet: Sonny's P2P Kill
Posted on May 12, 2008 6:26 am

Er i didn't notice that you didn't add the close after the kill after your ill add ''close -m %p2pnick'' <-- closes the window with the person after they are killed this way u dotn have open windows to close manually.The -m switch stands for query/message.That will auto close for ya.`-.-´

Comments: 834

mIRC Snippet: Sonny's P2P Kill
Posted on May 12, 2008 6:26 am

ROFL gene stfuN an go play with your barbie dolls or some #$%:P

Eugenio

Comments: 474

mIRC Snippet: Sonny's P2P Kill
Posted on May 12, 2008 6:38 am

lmfao
/me plays with barbie dolls

Comments: 834

mIRC Snippet: Sonny's P2P Kill
Posted on May 12, 2008 1:08 pm

/me quotes

SnoooP

Comments: 348

mIRC Snippet: Sonny's P2P Kill
Posted on May 14, 2008 8:47 pm

Eugene ....

Barbie Dolls....

Nothing new there :P

Comments: 834

mIRC Snippet: Sonny's P2P Kill
Posted on May 15, 2008 12:50 am

ROFL:P sup shnooooooooooooooooooooooooooooooooooooooooooooooooooopa

~Sonny

		Webmaster of http://35kchat.com 3@\|27\|-\| =p
Last seen: Jun 02, 2008 Profile \| Website Friends (1) Snippets (5) Images (1) Comments Received (47) Comments Submitted (14)

My Snippet Tags

Contact

Add to Friends

Send Private Message

Yahoo YIM:

MSN: snt.sonny@hotmail.com

Friends (1)

AdrianF

View All

Sonny's P2P Kill

Introduction

Grab the Code

Comments

~Sonny

My Snippet Tags

Contact

Friends (1)

Sponsors