########################################################################### ########################################################################## ## ## ## mIRK ## 2.20 ## ## ## ## + IRC: benny@IRCnet - Email: benny@ricecows.org + ## ## ########################################################################## ########################################################################## ## ## ## If you want to edit this, you should use nano, pico, vi, joe etc. ## for editing and customizing your EPIC/ircII. ## ## ## Sorry for those basic ircII users, your shitty client ## doesn't support colors or anything good. ## START USING EPIC! ## ## ## ######################################################################## ######################################################################### ## Editing tools ## #  #  ## Logo ## ECHO ECHO ECHO 14Shitfuck In14c. ECHO ECHO ## Cleaning IRC ## dumb all # NOW WE ARE CLEAN ;) # ## Aliasses ## ALIAS ADDNICK {if ([$1]) { addnick $1- };tk.addmsg $0 $tk.msglist} ALIAS BLIST {mode * +b} ALIAS CL {clear} ALIAS CLA {clear all} ALIAS DEV {mode * -vvv $0-} ALIAS DOP {mode * -ooo $0-} ALIAS DEOP {mode * -ooo $0-} ALIAS ELIST {mode * +e} ALIAS ILIST {mode * +I} ALIAS INV {invite $0 *} ALIAS L {list *} ALIAS HMODE {^assign fakechan $1;^assign fakemode $3-;^assign fakedid $2;^assign fakewhattodo $0;hfake${fakewhattodo} 7ù0í7ù mode14/10${fakechan} 14[0${fakemode}14] by 0${fakedid};^assign -fakechan;^assign -fakedid;^assign -fakemode} ALIAS MMODE {quote mode $0-} ALIAS MODEREPLY {@ :modechangg = [$5];if (modechangg == [+i]) ;^assign unrestrlist $unrestrlist $4 $4} ALIAS N {names *} ALIAS NECHO {^xecho -level crap $ni $0-} ALIAS NICKLIST {echo 4+6|4+ Nickname List: $tk.msglist} ALIAS NOTWORD {if ([$0] > 0) {if (([$0] > 1) && ([$0] < rmatch($~ $1-))) { @ nw.sep = [ ] } { @ nw.sep = [] };@ function_return = [$(1-${[$0]-1})] ## [$nw.sep] ## [$(${[$0]+1}-)]} {@ function_return = [$1-]}} ALIAS OP {mode * +ooo $0-} ALIAS Q {query $0} ALIAS P {part *} ALIAS PECHO {echo} ALIAS PCHAN {PING *} ALIAS SECRET{mode $0 +s} ALIAS TK.ADDMSG {@ tk.matched = rmatch($0 $^\1-);if (tk.matched) {@ tk.msglist = [$(0-${tk.matched-1}) $(${tk.matched+1}-)]} { @ tk.msglist = [$(0-${tk.msgmax-1})] };@ tk.msgcnt = 0;^assign -tk.matched} ALIAS TK.DELNICK {if (tk.msgcnt == 0) {echo 4+6|4+ Nickname: $word(0 $tk.msglist) removed.;@ tk.msglist = [$notword(1 $tk.msglist)]} {echo 4+6|4+ Nickname: $word(${tk.msgcnt-1} $tk.msglist) removed.;@ tk.msglist = [$notword($tk.msgcnt $tk.msglist)]};type ^U} ALIAS TK.GETMSG {@ tk.msgcnt = tk.msgcnt + [$0];if ( #tk.msglist < tk.msgcnt ) {@ tk.msgcnt = 1};if (tk.msgcnt <= 0) {@ tk.msgcnt = #tk.msglist};@ tk.junk = K ## [msg];type ^U$tk.junk $^\^^{[$($tk.msgcnt)]} } ALIAS UNTOPIC { topic -$0 } ALIAS V {mode * +vvv $0-} ALIAS VERCHAN {ctcp * version} ALIAS VOICE {mode * +vvv $0-} ALIAS W {who *} ALIAS WII {whois $0 $0} ALIAS WW {whowas $0} ## Assings ## ASSIGN TK.MSGMAX 5 ## Bindigs ## BIND ^B SELF_INSERT BIND ^I PARSE_COMMAND ^tk.getmsg 1 $tk.msglist BIND ^R PARSE_COMMAND ^tk.getmsg -1 $tk.msglist BIND ^V REVERSE BIND ^W NEXT_WINDOW BIND z SELF_INSERT BIND ^[1 PARSE_COMMAND window REFNUM_OR_SWAP 1 BIND ^[2 PARSE_COMMAND window REFNUM_OR_SWAP 2 BIND ^[3 PARSE_COMMAND window REFNUM_OR_SWAP 3 BIND ^[4 PARSE_COMMAND window REFNUM_OR_SWAP 4 BIND ^[5 PARSE_COMMAND window REFNUM_OR_SWAP 5 BIND ^[6 PARSE_COMMAND window REFNUM_OR_SWAP 6 BIND ^[7 PARSE_COMMAND window REFNUM_OR_SWAP 7 BIND ^[8 PARSE_COMMAND window REFNUM_OR_SWAP 8 BIND ^[9 PARSE_COMMAND window REFNUM_OR_SWAP 9 BIND ^[0 PARSE_COMMAND window REFNUM_OR_SWAP 10 BIND ^[q PARSE_COMMAND window REFNUM_OR_SWAP 11 BIND ^[w PARSE_COMMAND window REFNUM_OR_SWAP 12 BIND ^[e PARSE_COMMAND window REFNUM_OR_SWAP 13 BIND ^[r PARSE_COMMAND window REFNUM_OR_SWAP 14 BIND ^[t PARSE_COMMAND window REFNUM_OR_SWAP 15 BIND ^[y PARSE_COMMAND window REFNUM_OR_SWAP 16 BIND ^[u PARSE_COMMAND window REFNUM_OR_SWAP 17 BIND ^[i PARSE_COMMAND window REFNUM_OR_SWAP 18 BIND ^[o PARSE_COMMAND window REFNUM_OR_SWAP 19 BIND ^[a PARSE_COMMAND window REFNUM_OR_SWAP 20 ## LOAD "$",8 ## LOAD tabkey # /LOAD # ## Notifys ## NOTIFY ## Ignore (I know that all of you hate those poland assholes ;) ## IGNORE *!*@*.JP ALL IGNORE *!*@*.LV ALL IGNORE *!*MeetIRC@* ALL IGNORE *!*@*.IT CTCPS IGNORE *!*@*.PL ALL ## Ons (joins, parts, quits, actions, msgs, notices etc.) ## ON ^ACTION "* % *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) * $0 $2-} # - ctcp's - ON ^CTCP "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) $banner $0 requested $2 from $1} ON ^CTCP_REPLY "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) $banner CTCP $2 reply from $0 : $3-} # - dcc's - ON ^DCC_CHAT "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) 14[5$014\(9dcc14\)] $1-} ON #-DCC_CHAT 55 "* *" {^tk.addmsg \=$0 $tk.msglist} # - ON ^JOIN "* * % *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) $banner $0 14\[10$214\] has joined $1} ON ^KICK "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) $banner $0 was kicked off channel $2 by $1: $3-} ON ^LEAVE "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) $banner $0 14\[10$214\] has left $1 14\($3-14\)} ON ^MODE "* % *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) $banner Modechange/$1 14\($2-14\) by $0} ON ^MSG "*" xecho 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) 14[9$014\(3$userhost()14\)] $1- ON ^MSG_GROUP "*" xecho [$0\($userhost()\)] $2- \($1\) ON #-MSG 55 "* *" {^tk.addmsg $0 $tk.msglist} ON ^NOTICE "*" xecho 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) 14-6$014\(13$userhost()14\)- $1- ON ^NOTICE_GROUP "*" xecho 14-6$014\(13$userhost()14\)- $2- \($1\) ON ^NOTIFY_SIGNOFF "*" xecho -b $0 signed off at $Z ON ^NOTIFY_SIGNON "*" xecho -b 16$0 14[$114] signed on at 16$Z ON ^PUBLIC_NOTICE "*" xecho 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) 14-13$014:16$114- $2- ON ^NOTICE "*" xecho 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) 14-6$014\(13$userhost()14\)- $1- ON ^SEND_ACTION "* *" {/echo \(3$left(2 $stime($time()))$mid(11 5 $stime($time()))\14) * $N $1-} ON #-SEND_DCC_CHAT 55 "* *" {^tk.addmsg \=$0 $tk.msglist} ON ^SEND_DCC_CHAT "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) 14[9dcc14\(5$014\)] $1-} ON ^SEND_MSG "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) 14[3msg14\(9$014\)] $1-} ON #-SEND_MSG 55 "* *" {^tk.addmsg $0 $tk.msglist} ON ^CHANNEL_NICK "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) $banner 10$1 is now known as 11$2} ON ^SEND_NOTICE "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) 14[9notice14\(3$014\)] $1-} # - stuff@channel - ON ^PUBLIC "* % *" { if \(match\(*${N}* $$2-\)\) { /echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) 14<${ischanop($0-1) ? [@] : ischanvoice($0-1) ? [+] : []}3$014> $2-} {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) 14<${ischanop($0-1) ? [@] : ischanvoice($0-1) ? [+] : []}$014> $2-} } ON ^SEND_PUBLIC "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) ${ischanop($N $0)?[14\(@16$N14\)${iscurchan($0)?[]:[/$rest(1 $0)]}]:[${ischanvoice($N $0)?[14\(+16$N14\)${iscurchan($0)?[] :[/$rest(1 $0)]}]:[14\(16$N14\)${iscurchan($0)?[]:[/$rest(1 $0)]}] }]} $1-} ON ^TOPIC "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) $banner 10$0 has changed the topic on channel $1 to: $2-} ON ^CHANNEL_SIGNOFF "* *" {/echo 14\(3$left(2 $stime($time()))$mid(11 5 $stime($time()))14\) $banner $1 has quit 14\($2-14\)} ## Settings ## SET AUTO_RECONNECT ON SET AUTO_RECONNECT_DELAY 300 SET AUTO_REJOIN OFF SET AUTO_WHOWAS OFF SET BANNER 3:9:3: SET BEEP OFF SET CLIENT_INFORMATION / - Get the best, fuck the rest! SET CLOCK_24HOUR ON SET CMDCHARS / SET CONTINUED_LINE SET DCC_TIMEOUT 600 SET DCC_STORE_PATH SET FLOOD_AFTER 6 SET FLOOD_RATE 2 SET FLOOD_USERS 5 SET FLOOD_WARNING OFF SET HIGH_BIT_ESCAPE 0 SET HELP_PATH /usr/share/epic4/help/ SET HELP_PROMPT ON SET HELP_WINDOW OFF SET LASTLOG 8192 SET MAIL 0 SET MIRC_BROKEN_DCC_RESUME ON SET REALNAME LEWsER SET SCROLLBACK 8192 SET STATUS_AWAY .: zZzZ :. SET STATUS_FORMAT %T [%R] %*%=%@%N%#%S %H%B%Q%C%A%+%I%O%M%F%L %D %W SET STATUS_NOTIFY [ Act: %F ] SET STATUS_QUERY (: %Q) SET STATUS_WINDOW +++++++++++++++++++++++++ SET INPUT_PROMPT :$T: SET USER_INFORMATION EPIC4 - Miksen tunne mitään? SET WORD_BREAK - ,.;: SET QUIT_MESSAGE ircII %s -/- Saattoväki toivottaa hyvää matkaa # # ripped and customozied code (and my own =) # THANKS THANKS THANKS # ## Cannot join channel ## on ^471 "*" xecho -b 14[$114] cannot join channel 14(+l14) there's no room for you! on ^473 "*" xecho -b 14[$114] cannot join channel 14(+i14) THERE'S A PRIVATE PARTY!! on ^474 "*" xecho -b 14[$114] cannot join channel 14(+b14) your ass is banned! on ^475 "*" xecho -b 14[$114] cannot join channel 14(+k14) you must give the magic word! # /Cannot join channel # ## Away ## on ^306 "*" xecho -b You are marked as being away 14[ $servername($lastserver()) / $Z 14] on ^305 "*" xecho -b You are no longer marked as being away 14[ $servername($lastserver()) / $Z 14] # /Away # ## Kick and ban commands (special thanks goes to mc once again ;) ## # /k [reason] # kicks on the current channel alias k { ^kick * $0 $1- } # /nb # bans and deops if necessary alias banb { IF (ischanop($0 $C) == [1]) { ^mode $C -o+b $0 $mask(3 $0!$userhost($0)) } ELSE { ^mode $C +b $mask(3 $0!$userhost($0)) } } # /kb [reason] # kicks and bans. alias kb { IF (onchannel($0 $C) == [1]) { ^ban $0 ^kick $C $0 $1- } ELSE { xecho -b -c $0 is not on channel $C (anymore)! } } # /tkb