########################################################################### ########################################################################## ## ## ## Shitfuck Inc. - IRC ## 0.2 (pr) ## ## ## ## + 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! ## ## ## Thanks to: You know who you are. ## ## ######################################################################## ######################################################################### ## Editing tools ## #  #  #  #  ## Cleaning IRC ## dump all # NOW WE ARE CLEAN ;) # ## Logo ## ECHO ECHO ECHO Shitfuck Inc. ECHO ECHO ## 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 * -vvvvvv $0-} ALIAS DOP {mode * -oooooo $0-} ALIAS DEOP {mode * -oooooo $0-} ALIAS ELIST {mode * +e} ALIAS ILIST {mode * +I} ALIAS INVITE {if ([$1]) {//invite $0 $1} {//invite $0 $C}} ALIAS L {list *} ALIAS MO {mode $C $*} 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 * +oooooo $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 V {mode * +vvv $0-} ALIAS VERCHAN {ctcp * version} ALIAS VOICE {mode * +vvvvvv $0-} ALIAS W {who *} ALIAS WII {whois $0 $0} ALIAS RELOAD {load shitfuck.irc} ALIAS WW {whowas $0} ALIAS UNTOPIC { topic -$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 ## IGNORE *!*@*.JP ALL IGNORE *!*@*.LV ALL IGNORE *!*MeetIRC@* ALL IGNORE *!*@*.IT CTCPS ## Ons (joins, parts, quits, actions, msgs, notices etc.) ## ON ^ACTION "* % *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) * $0 $2-} ON ^CTCP "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) $banner $0 requested $2 from $1} ON ^CTCP_REPLY "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) $banner CTCP $2 reply from $0 : $3-} ON ^DCC_CHAT "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) [$0\(dcc\)] $1-} ON #-DCC_CHAT 55 "* *" {^tk.addmsg \=$0 $tk.msglist} ON ^JOIN "* * % *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) $banner $0 \[$2\] has joined $1} ON ^KICK "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) $banner $0 was kicked off channel $2 by $1 \($3-\) } ON ^LEAVE "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) $banner $0 \[$2\] has left $1 \($3-\)} ON ^MODE "* % *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) $banner Modechange/$1 \($2-\) by $0} ON ^MSG "*" xecho \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) [$0\($userhost()\)] $1- ON ^MSG_GROUP "*" xecho [$0\($userhost()\)] $2- \($1\) ON #-MSG 55 "* *" {^tk.addmsg $0 $tk.msglist} ON ^NOTICE "*" xecho \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) -$0\($userhost()\)- $1- ON ^NOTICE_GROUP "*" xecho -$0\($userhost()\)- $2- \($1\) ON ^NOTIFY_SIGNOFF "*" xecho -b $0 signed off at $Z ON ^NOTIFY_SIGNON "*" xecho -b $0 [$1] signed on at $Z ON ^PUBLIC "* % *" { if \(match\(*${N}* $$2-\)\){ /echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) <${ischanop($0-1) ? [@] : ischanvoice($0-1) ? [+] : []}$0> $2-} {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) <${ischanop($0-1) ? [@] : ischanvoice($0-1) ? [+] : []}$0> $2-} } ON ^SEND_ACTION "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) * $N $1-} ON #-SEND_DCC_CHAT 55 "* *" {^tk.addmsg \=$0 $tk.msglist} ON ^SEND_DCC_CHAT "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) [dcc\($0\)] $1-} ON ^SEND_MSG "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) [msg\($0\)] $1-} ON #-SEND_MSG 55 "* *" {^tk.addmsg $0 $tk.msglist} ON ^CHANNEL_NICK "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) $banner $1 is now known as $2} ON ^SEND_NOTICE "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) [notice\($0\)] $1-} ON ^SEND_PUBLIC "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) ${ischanop($N $0)?[\(@$N\)${iscurchan($0)?[]:[/$rest(1 $0)]}]:[${ischanvoice($N $0)?[\(+$N\)${iscurchan($0)?[] :[/$rest(1 $0)]}]:[\($N\)${iscurchan($0)?[]:[/$rest(1 $0)]}] }]} $1-} ON ^CHANNEL_SIGNOFF "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) $banner $1 has quit \($2-\)} ON ^TOPIC "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) $banner $0 has changed the topic on channel $1 to: $2-} ON ^PUBLIC_NOTICE "* *" {/echo \($left(2 $stime($time()))$mid(11 5 $stime($time()))\) -$0:$1- $2-} ## Settings ## SET AUTO_RECONNECT ON SET AUTO_RECONNECT_DELAY 300 SET AUTO_REJOIN OFF SET AUTO_WHOWAS OFF SET BANNER ::: 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 ON SET INPUT_PROMPT ::$T> SET LASTLOG 8192 SET MAIL 0 SET MIRC_BROKEN_DCC_RESUME ON SET REALNAME LEWsER SET SCROLLBACK 8192 SET STATUS_AWAY (zZzZ) SET STATUS_NOTIFY [ Act: %F ] SET STATUS_QUERY (: %Q) SET STATUS_USER SET STATUS_WINDOW + SET USER_INFORMATION EPIC4 - shitfuck inc. SET WORD_BREAK - ,.;: SET QUIT_MESSAGE ircII %s -/- Get the best, fuck the rest! # # ripped and customozied code (and my own =) # THANKS THANKS THANKS # ## Cannot join channel ## on ^471 "*" xecho -b [$1] cannot join channel (+l) there's no room for you! on ^473 "*" xecho -b [$1] cannot join channel (+i) THERE'S A PRIVATE PARTY!! on ^474 "*" xecho -b [$1] cannot join channel (+b) your ass is banned! on ^475 "*" xecho -b [$1] cannot join channel (+k) you must give the magic word! # /Cannot join channel # ## Away ## on ^306 "*" xecho -b You have been marked as being away [ $servername($lastserver()) / $Z ] on ^305 "*" xecho -b You are no longer marked as being away [ $servername($lastserver()) / $Z ] # /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