Scripting Community

Hy guys ... I need a good service script ... I searched all google but I find just crap

I need something like this


!adduser
!deluser
!op
!deop
!kick
!ban
!unban
!blacklist
!users
!whois
!help / !commands / !cmds
!protection ( hard )
!access,
!autolimit
!mytrigger
!invite
!join
!part
!status ( protection )
!ao
!av
!topic
!bitchmode,
!copyright ( for author )


something like this ...

i got a new script in yesterday, and i have many problem, but now its fine.. and ONLY now i have 1 problem.. and its

Code: Select all

[10:59:17 - 01:07:2010] (|Initio|) ¤  BNC added ¤  Ident: Futz0r ¤  Name: Justtesting ¤  Host: x1-6-00-26-f2-66-3f-92.k129.webspeed.dk ¤ 
[10:59:48 - 01:07:2010] (|Initio|) ¤  BNC deleted ¤  Ident: Futz0r ¤  Host was not from denmark (x1-6-00-26-f2-66-3f-92.k129.webspeed.dk).) ¤ 

funny right ? - i'll make a bnc script, so its only "Scandinavian" they ...

http://paster.testmax.dk/p4239.htm

Hi guys.. i need help to finding a commands to this quest.. atm i know

"Nickname" status

Code: Select all

[06:11:32 - 30:06:2010] (@Futz0r) |Initio| status
[06:11:32 - 30:06:2010]  ›› [|Initio| (holmskov@Sutdenopfraslap.users.quakenet.org)] [Status] Futz0r you are (owner)

"Nickname" guard on/off

Code: Select all

[05:59:03 - 30:06:2010] (@Futz0r) |Initio| guard off
[05:59:03 - 30:06:2010] (@|Initio|) [Guard] Going: (off)

"Nickname" clones on/off

Code: Select all

[05:59:18 - 30:06:2010] (@Futz0r) |Initio| clone off
[05:59:18 - 30:06:2010] (@|Initio|) [Clone] Going: (off)

...

Hey.

Here's a simple whois script I've made since I got bored of the looks of the default whois :)

Updates:

2010-07-25:
* Removed the common channels by r0t3n and added another common channels by r0t3n.
The common channels are now in the same line as channels, bolded.

2010-07-02:
* Fixed the "address" part where some of the nicks addresses wouldnt show.
* Added "counter" at the ...

Hey.


Got bored and since I'm on default mIRC, I made this to make my work easier.

Usage:
Right-click a nick to add them to Q or something similar.
Right click the channel window to see channel statistics etc.


menu nicklist {
.Q commands
..Change Q flags:.msg Q chanlev $active $$1 $?"What flags do you want to give $$1 $+ ?"
..Del user:.msg Q removeuser $active $$1
..Show access:.msg Q chanlev $active $$1
..Q whois:.msg ...

Code: Select all

on *:part:#MoW:{
  if (%flyby. [ $+ [ $chan ] $+ ] . [ $+ [ $address($nick,1) ] ]) {
    notice $nick 4,1µ0,1 FlyBy! 4,1µ0,1 Ban 5 minutter 4,1µ0,1
    msg $chan 4,1µ0,1 Flyby detected 4,1µ0,1 $nick banned i 5 minutter! 4,1µ0,1
    /msg Q BAN $chan $address($nick,3)
    timer 1 120 .msg q bandel $chan $address($nick,3)
  }
}

This is quite old script made by me. It works only when you have mIRC user level 9 (/auser 9 nick)
Some features are maybe useless :D

Note: Log-feature can cause problems if script does'nt have permission for creating new file to mIRC folder

;
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
; X MSL debug v1.5 by teppuli
; X DON'T TOUCH AUTHOR/COPYRIGHT/VERSION WITHOUT AUTHOR'S
; X PERMISSION
; ...

i have this code.

on @*:JOIN:#:{
if ($readini(ulist\op.ini,$mknickfn($nick),$chan) && $readini(ulist\voice.ini,$mknickfn($nick),$chan) == $address($nick,2)) {
aline -p @Userlist $+([,$fulldate,]) $+([14,$chan,]) Performing +vo on $+(7,$nick,)
mode $chan +vo $nick $nick
return
}
if ($readini(ulist\voice.ini,$mknickfn($nick),$chan) == $address($nick,2)) {
aline -p @Userlist $+([,$fulldate,]) $+([14,$chan,]) Performing +v on $+(7,$nick,)
mode $chan +v $nick
}
if ($readini(ulist\op.ini,$mknickfn($nick),$chan) == $address($nick,2)) {
aline -p @Userlist $+([,$fulldate,]) $+([14,$chan,]) Performing +o on $+(7,$nick,)
mode $chan +o $nick
}
}
alias open.voice { run ulist\voice.ini }
alias ...

I'm missing a script that checks if the person is on atleast 4 channels

so i hope you can help me


; set %debug990 1
; unset %debug990

on *:TEXT:^bnc*:#pracc.bnc:{
if (!%spam) {
set -u30 %spam 1
if ($2 == $null) {
msg $chan %logo Wrong Syntax in: < $+ $1- $+ > %logo The syntax is ^bnc <Your Ident> %logo
}
if ($lines(idents.txt) >= %totalusers) {
msg $chan %logo Sorry, no more free slots ...

Open by pressing F1

When the dialog opens it will list all the nicks,
which are in channels you are in.

When you start typing a nick into the edit field,
it will list nicks matching the given nick.

If you double click a nick in the list,
it will open a query window.


/*
Nick Search
By PuNkTuReD
http://www.sassirc.com
*/

alias F1 dialog -dm _nick.center _nick.center
dialog _nick.center {
title "Nick Search"
size ...