Date: Mon, 3 Oct 2005 00:16:30 -0400 (EDT) From: zak@ircii.org (Zak) -license update/info -credits info/updates. -move some files around. remove uptime.m merged into hooks.m -some other changes. read diff/changelog. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sun Oct 2 14:20:18 2005 +++ amn/CHANGES Mon Oct 3 00:12:51 2005 @@ -164,3 +164,13 @@ -sync E5-KNOWNBUGS from -HEAD //zak -update EPIC-BUGS info after having some time to debug the $finditem() problems this morning a bit. //zak + +10.3.05 +-add a BSD like license with a clause.. see COPYRIGHT for info. //zak +-add credits in README if i happen to be missing someone or if someone + thinks they should be in the credits drop me an e-mail or msg online. //zak +-remove uptime.m merge it into hooks.m //zak +-sync most files with the COPYRIGHT info. //zak +-some other minor changes. //zak +-move UPGRADE into doc/ //zak +-move NOTES into doc/ //zak diff -aruN amn.orig/COPYRIGHT amn/COPYRIGHT --- amn.orig/COPYRIGHT Wed Dec 31 19:00:00 1969 +++ amn/COPYRIGHT Mon Oct 3 00:06:40 2005 @@ -0,0 +1,45 @@ +/* + * Copyright (c) 2003-2005 Amnesiac Project + * Copyright (c) 2003-2005 EPIC Software Labs + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in + * the documentation and/or other materials provided with the + * distribution. + + * 3. Products derived from this software may not be called "Amnesiac" + * nor may "Amnesiac" appear in their names without prior written + * permission of the Amnesiac Project. + + * 4. Redistributions of any form whatsoever must retain the following + * acknowledgment: + * "This product includes software developed by the Amnesiac Project + * for use with EPIC software Labs (http://amnesiac.ircii.org/)" + * + * THIS SOFTWARE IS PROVIDED BY THE Amnesiac PROJECT `AS IS'' AND ANY + * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR + * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE Amnesiac PROJECT OR + * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, + * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT + * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; + * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, + * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED + * OF THE POSSIBILITY OF SUCH DAMAGE. + * + * The licence and distribution terms for any publically available version + * or derivative of this code cannot be changed. i.e. this code cannot + * simply be copied and put under another distribution licence + * [including the GNU Public Licence.] + * + */ diff -aruN amn.orig/INSTALL amn/INSTALL --- amn.orig/INSTALL Thu Sep 1 08:20:11 2005 +++ amn/INSTALL Sun Oct 2 22:53:49 2005 @@ -1,4 +1,6 @@ -(amnesiac) +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + before installing amnesiac remember this script is for epic it's not a bitchx and or scrollz script or any other ircii based client but epic first you should get epic from www.epicsol.org download it and compile it. diff -aruN amn.orig/NOTES amn/NOTES --- amn.orig/NOTES Fri Sep 16 19:20:35 2005 +++ amn/NOTES Wed Dec 31 19:00:00 1969 @@ -1,53 +0,0 @@ -## various notes/documents about some common problems known in -## amnesiac/epic. - - -## ansi/ibm437 hardcoding fonts/ugly looking etc.. --this is not a bug per se, it's just how the font handles ansi codes. - i do not know what fonts really support them, these are some of the - things you can try if your theme/colors/ansi etc.. in the client looks - screwed up, also for european/non western languages users. there is a - /latin1 alias which should fix your terminal to fix your native language - characters however you cannot use an ansi theme (in most cases) - best to use the vanilla or epic theme. for non-western language encodings. - /ibm437 will try and enable ansi-like encodings on your terminal/putty/ - xterm/whatever. it is best to have a font that supports this, one such - font i do know that supports it for rxvt/aterm/etc.. is the vga11x19 - font, most people do not like this font as this is huge on small screens - ie; 1024x768 or 15" or less monitors, it can be grabbed from - http://amnesiac.ircii.org/misc/ - there are also some other fonts in there as well which may or may not work. - -## terminfo/termcap info. --terminfo/termcap issues on FreeBSD not sure about DragonFly... possible fix - ln -s /usr/compat/linux/usr/share/terminfo /usr/share/misc - and cross your fingers? - help from |Rain| (naturally i presume this - requires the linux-compat libs installed.) - -## multiserver in amnesiac. --there has been some improvements since 1.1 release - it's been tested and known to work, major complaints are no mjoin for - multiple servers, and no auto-reconnect(there is but highly not recommended) - and no auto_rejoin_on_connect. - -## output_rewrite formatting changes. --There are times i have came across people requesting indenting on long txt - from someone and others who want's it at beginning of next line, to adjust - the value for your choice of poison. - -/set output_rewrite output_rewrite $_paste($1-)$1- -[sample long txt output] <-- this sample is non-default -17:24:16|<@crapple> i wonder if i should test out the aggressive states on - nocturnal - -/set output_rewrite output_rewrite $_paste($1-) $1- -[sample long txt output with wrapping to beginning of line] <-- default. -17:24:16|<@crapple> i wonder if i should test out the aggressive states on -nocturnal -note: this will also wrap other formats as well ie: private msg. -/orw - indenting, non-default as of 9.8.05 -/orww - extended with wrappings. -default behavior. -## end output_rewrite formatting note. - -//crapple -//zak@ircii.org diff -aruN amn.orig/README amn/README --- amn.orig/README Fri Sep 16 19:06:44 2005 +++ amn/README Mon Oct 3 00:06:26 2005 @@ -1,3 +1,6 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + * THE AMNESIAC HOME PAGE IS: http://amnesiac.ircii.org THE AMNESIAC IRC CHANNEL IS: #amnesiac on EFNet * Amnesiac is still extremely ALPHA, some things may break/not work/or even @@ -26,3 +29,28 @@ (crapple) (kreca) (skullY) + +I would like to thank the following people for contributing +in some way to this project. + + Jeremy Nelson + Brian Weiss + Xavier + Jonas Trollvik + Zach White + Eli Sand + Void + ryan + krimson + violence + adam + eater + twez + azel + Mike Garrison + David B. Kratter + Trenton Petrasek + Whitney Green + Kristian Paulsen + +if you beleive your name should be on this list drop me an e-mail. diff -aruN amn.orig/UPGRADE amn/UPGRADE --- amn.orig/UPGRADE Sun Oct 2 13:38:22 2005 +++ amn/UPGRADE Wed Dec 31 19:00:00 1969 @@ -1,23 +0,0 @@ -here i will note from time to time on the 'upgrade' howto, for the changes -you need to make or remove to update without restarting your client using -/adump. first off in order to use adump you must have an ~/.epicrc which -loads your amn.epic from somewhere(since amnesiac does not have to be -placed in ~/amn it could be in ~/irc/amnesiac/ or whatever. and savefiles -will always go in ~/.amn now we got that covered. let's move on. -(this is not for the faint of heart this is for people who have a big ego -about their irc client uptimes *ahem*) - -## upgrade info -## any to 1.1d r/* (in theory) -rm -rf /path/to/amn -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.fsetsave - -## 1.1d r/5 > r/7 -rm -rf /path/to/amn -rm -rf ~/.amn/.mod.save -tar zxvf newver.tgz (in your home dir or dir you want it) -or -tar zxvf newver.tgz -C /path/to/where/you/want/it -lastly -/adump (in the client) diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Sun Oct 2 13:39:28 2005 +++ amn/amn.epic Sun Oct 2 22:56:48 2005 @@ -1,3 +1,6 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + /* amnesiac by crapple mods/bugfixes by kreca pr0pz and thanks go to void!, xavier!, fudd, BlackJac, hop, criminal, krimson, twez, azel, violence, whitney, skullY, Alien88, kreca, eater, grimzy, adam, diff -aruN amn.orig/core/action.m amn/core/action.m --- amn.orig/core/action.m Tue Aug 30 10:42:46 2005 +++ amn/core/action.m Sun Oct 2 22:57:49 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage action + ## action hooks ## helper function that'll make /me output to the correct window during a diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Sat Oct 1 20:55:46 2005 +++ amn/core/alias.m Sun Oct 2 22:57:58 2005 @@ -1,3 +1,6 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + subpackage alias ## last modified by crapple 10.1.05 diff -aruN amn.orig/core/arrays.m amn/core/arrays.m --- amn.orig/core/arrays.m Wed Sep 14 17:01:15 2005 +++ amn/core/arrays.m Sun Oct 2 22:58:36 2005 @@ -1,5 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# last modified: 9.07.05 - crapple subpackage arrays -## last modified: 9.07.05 - crapple ## msg formats @ delarray(mform) diff -aruN amn.orig/core/banner.m amn/core/banner.m --- amn.orig/core/banner.m Fri Jun 10 11:12:05 2005 +++ amn/core/banner.m Sun Oct 2 22:59:08 2005 @@ -1,4 +1,6 @@ -/* modified to throw away crappy ansi */ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + /* 2005 crapple */ alias banner.head {awecho ------------------------------------------------------------------} diff -aruN amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Tue Aug 30 00:22:19 2005 +++ amn/core/bans.m Sun Oct 2 22:59:36 2005 @@ -1,3 +1,6 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + subpackage bans ## Robohak's tban and takeall alias diff -aruN amn.orig/core/bind.m amn/core/bind.m --- amn.orig/core/bind.m Sun Sep 18 00:09:23 2005 +++ amn/core/bind.m Sun Oct 2 22:59:55 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage binds + ## binds alias breset {bind -defaults} diff -aruN amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Fri Sep 30 02:58:51 2005 +++ amn/core/channel.m Sun Oct 2 23:00:19 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage channel ## op/oper commands. diff -aruN amn.orig/core/color.m amn/core/color.m --- amn.orig/core/color.m Tue Aug 30 02:12:21 2005 +++ amn/core/color.m Sun Oct 2 23:00:43 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage color + alias colour color $* alias color { diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Fri Sep 30 03:11:15 2005 +++ amn/core/compat.m Sun Oct 2 23:01:17 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage compat + ## compat/missing functions/things to make the script work well with epic5. if (word(2 $loadinfo()) != [pf]) { load -pf $word(1 $loadinfo()); diff -aruN amn.orig/core/config amn/core/config --- amn.orig/core/config Sat Oct 1 20:51:33 2005 +++ amn/core/config Sun Oct 2 23:01:33 2005 @@ -1,3 +1,6 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + cleararray oper cleararray away cleararray protect diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Sat Oct 1 20:49:18 2005 +++ amn/core/config.m Sun Oct 2 23:01:47 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage config + alias setumode if (![$0]) {xecho -v [a+c] current usermode set to: $getumode}{@ getumode = [$0];xecho -v [a+c] usermodes set to: $getumode} alias config { @ :choice = [$1-] diff -aruN amn.orig/core/country.m amn/core/country.m --- amn.orig/core/country.m Tue Aug 30 01:23:23 2005 +++ amn/core/country.m Sun Oct 2 23:02:07 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage country alias addcountry { diff -aruN amn.orig/core/dcc.m amn/core/dcc.m --- amn.orig/core/dcc.m Tue Sep 20 20:00:09 2005 +++ amn/core/dcc.m Sun Oct 2 23:02:22 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage dcc ## binds. diff -aruN amn.orig/core/ehelp.m amn/core/ehelp.m --- amn.orig/core/ehelp.m Fri Sep 30 02:51:32 2005 +++ amn/core/ehelp.m Sun Oct 2 23:02:42 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage ehelp + alias ehelp { if (!$[0]) { diff -aruN amn.orig/core/eimodes.m amn/core/eimodes.m --- amn.orig/core/eimodes.m Tue Aug 30 01:31:29 2005 +++ amn/core/eimodes.m Sun Oct 2 23:02:57 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage eimodes ## simple aliases. diff -aruN amn.orig/core/exec.m amn/core/exec.m --- amn.orig/core/exec.m Sat Oct 1 09:15:22 2005 +++ amn/core/exec.m Sun Oct 2 23:03:18 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage exec + ## dns stuff. alias dns { if (match(*.* $0)) { diff -aruN amn.orig/core/fkey.m amn/core/fkey.m --- amn.orig/core/fkey.m Fri Sep 2 18:08:03 2005 +++ amn/core/fkey.m Sun Oct 2 23:03:33 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage fkey + alias fkeys { load $(loadpath)ans/fkeys.ans } diff -aruN amn.orig/core/format.m amn/core/format.m --- amn.orig/core/format.m Wed Sep 7 12:53:30 2005 +++ amn/core/format.m Sun Oct 2 23:03:49 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage format + alias format { if ([$#]) { switch ($0) { diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Fri Sep 30 00:27:03 2005 +++ amn/core/fsets.m Sun Oct 2 23:04:05 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage fsets + @fwords=[format_scan_onjoin_nicks_border format_scan_nicks_border format_scan_onjoin_nicks format_scan_users_op format_scan_users_non format_scan_users_voc format_scan_users format_scan_header format_scan_nicks format_scan_footer format_timestamp_some format_who format_who_footer format_whois_signon format_whois_actual format_who format_whois_header format_whois_admin format_whois_nick format_whois_name format_whois_channels format_whois_server format_whois_away format_whois_operator format_whois_idle format_whois_unknown format_whois_footer format_whowas_header format_whowas_nick format_whowas_name format_whowas_unknown format_whowas_footer format_sort format_user_non format_chops format_bwall format_msg format_send_msg format_public format_send_public format_public_other format_signoff format_join format_leave format_mode format_notice format_public_notice format_send_notice format_send_dcc_chat format_dcc_chat format_topic format_ctcp format_send_ctcp format_nick_comp format_sv format_wall format_away format_back format_action format_action_other format_desc format_send_desc format_wallop format_nickname format_invite format_dcc_connect format_dcc_request format_kick format_ctcp_reply format_server_notice format_dcc_lost_chat format_dcc_lost_file format_dcc_done_file] ^on ^set "format_*" { if ([$0]) { diff -aruN amn.orig/core/getusers.m amn/core/getusers.m --- amn.orig/core/getusers.m Fri Sep 2 22:25:07 2005 +++ amn/core/getusers.m Sun Oct 2 23:04:18 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage getusers ## some parts are questionable. will need more pruning in the future. //zak diff -aruN amn.orig/core/help.m amn/core/help.m --- amn.orig/core/help.m Sun Sep 18 00:18:07 2005 +++ amn/core/help.m Sun Oct 2 23:04:47 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage help + @hwords=[rn rk vocs bantype fset ban mko mkn massk orignick ub sping bkt dldir ps ls cd dns nslookup fkeys format q bans banstat wii mdop mdeop dop dv v scano scanv scann t k umode m j l wi ver c nochat chat bk op voice deop mop cycle mreop readlog wall user chops sv frelm tsave freln away back format config color sbcolor dict fsave sbar scan wk wlk wn wp wj wc csave banstat bankick cig cops devoice fctcp iban inv kickban kb links lk lsay mdv more mv mw nops not partall qk staynick supt theme tig unban untheme winhelp] alias ahelp if (![$0]) { banner.head diff -aruN amn.orig/core/hooks.m amn/core/hooks.m --- amn.orig/core/hooks.m Sun Sep 18 00:05:56 2005 +++ amn/core/hooks.m Sun Oct 2 23:15:13 2005 @@ -1,4 +1,8 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage hooks + +## exit hook on #-exit 000 "*" { @ex.signon=stime($time()) xecho -v -b Signon time : $ex.signon @@ -7,13 +11,24 @@ xecho -v -b signoff: $N \($*\) } +## chanalone hook ^on #-leave 123 "% % *" { if ([$0] != servernick() && remw($0 $chanusers($1)) == servernick()) { timer 1 xecho -b You are the only user left on $1 } } +## uptime hooks. +on #-msg 22 * {@lrm=[$1-];@lrmn=[$0]} +on #-send_msg 22 * {@lsm=[$1-];@lsmn=[$0]} + +on #-notice 22 * {@lrn=[$1-];@lrnn=[$0]} + +on #-send_notice 22 * {@lsn=[$1-];@lsnn=[$0]} + +alias uptime {/load $(loadpath)ans/uptime.ans} + ## umode hook on #-connect 50 * { if (!_pubnick) { @@ -69,8 +84,8 @@ abecho $2- } -#disable certain servnumerics here. -##/End of MOTD +## disable certain servnumerics here. +#/End of MOTD ^on ^376 * # ## disable you've got mail!. diff -aruN amn.orig/core/ignore.m amn/core/ignore.m --- amn.orig/core/ignore.m Thu Sep 8 19:18:35 2005 +++ amn/core/ignore.m Sun Oct 2 23:05:20 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage ignore ## some short aliases. diff -aruN amn.orig/core/lag.m amn/core/lag.m --- amn.orig/core/lag.m Tue Aug 30 00:17:58 2005 +++ amn/core/lag.m Sun Oct 2 23:05:56 2005 @@ -1,6 +1,8 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage lag + ## from psykotyk's orb -## lagbitz alias _orb.relag { @ _ass.rlt = time() quote ping $S diff -aruN amn.orig/core/lusers.m amn/core/lusers.m --- amn.orig/core/lusers.m Sun Oct 2 13:09:28 2005 +++ amn/core/lusers.m Sun Oct 2 23:07:33 2005 @@ -1,10 +1,13 @@ -subpackage lusers +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# ## last modified by skullY on 2005 Aug 11. ## modded a bit to remove cruft by crapple on 2005 Oct 2 -## stolen from argon cause of sheer leetness. +## idea originally taken from argon. ## fixed by skullY because it was broked with the new math parser. ## It's still all ugly and there's at least one new hack, but really, who ## cares that much about lusers? <-- Alien88 does apparently ;( -crapple. +subpackage lusers on ^001 * # on ^002 * # diff -aruN amn.orig/core/mod.m amn/core/mod.m --- amn.orig/core/mod.m Fri Sep 16 20:08:08 2005 +++ amn/core/mod.m Sun Oct 2 23:07:49 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage mod alias emod {/load $(loadpath)ans/modules.ans} diff -aruN amn.orig/core/modeshow.m amn/core/modeshow.m --- amn.orig/core/modeshow.m Wed Aug 31 09:43:29 2005 +++ amn/core/modeshow.m Sun Oct 2 23:08:03 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage modeshow + alias modeshow vocop $* alias showmodes vocop $* alias vocop { diff -aruN amn.orig/core/more.m amn/core/more.m --- amn.orig/core/more.m Tue Aug 30 04:08:25 2005 +++ amn/core/more.m Sun Oct 2 23:08:51 2005 @@ -1,5 +1,8 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# this taken from EPIC4 dist written by archon subpackage more -## this taken from EPIC4 dist written by archon + alias more { if ([$0]) diff -aruN amn.orig/core/notify.m amn/core/notify.m --- amn.orig/core/notify.m Fri Sep 2 17:54:05 2005 +++ amn/core/notify.m Sun Oct 2 23:09:30 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage notify + ^on ^notify_signon * { awecho $G $(c1)signon $(cl)by $(c1)$0$(hblk)!$(cl)$sar(g/@/$(hblk)@$(cl)/$1-) at $Z } diff -aruN amn.orig/core/paste.m amn/core/paste.m --- amn.orig/core/paste.m Tue Aug 30 01:43:13 2005 +++ amn/core/paste.m Sun Oct 2 23:10:33 2005 @@ -1,6 +1,9 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# hops little paste script so you can paste shit without worrying about +# commands....ctrl-p to toggle.. /set paste for some other shit. subpackage paste -##hops little paste script so you can paste shit without worrying about -##commands....ctrl-p to toggle.. /set paste for some other shit. + @ paste.on = 0 @ paste.strip = 0 @ paste.delay = 30 diff -aruN amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Sat Oct 1 20:47:49 2005 +++ amn/core/save.m Sun Oct 2 23:10:44 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage save + alias asave { @savefile=[$(savepath).a.save] @rename($savefile $savefile~) diff -aruN amn.orig/core/sbar.m amn/core/sbar.m --- amn.orig/core/sbar.m Fri Sep 2 20:01:16 2005 +++ amn/core/sbar.m Sun Oct 2 23:10:55 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage sbar + @ sbar.max = 14 alias sbar if ([$0] && ([$0] <= sbar.max)) { @statbar=[stat.$0] diff -aruN amn.orig/core/sbcolor.m amn/core/sbcolor.m --- amn.orig/core/sbcolor.m Tue Aug 30 01:41:18 2005 +++ amn/core/sbcolor.m Sun Oct 2 23:11:05 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage sbcolor + alias sbcolour sbcolor $* alias sbcolor { @:clear = [$(cl)] diff -aruN amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Tue Aug 30 23:52:33 2005 +++ amn/core/scan.m Sun Oct 2 23:11:18 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage scan + ^on ^names * #- alias fix.scan if ([$0]) { @_t=[$[10]0] diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Sat Oct 1 21:33:13 2005 +++ amn/core/sets.m Sun Oct 2 23:11:29 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage sets ## colour vars. diff -aruN amn.orig/core/sync.m amn/core/sync.m --- amn.orig/core/sync.m Tue Aug 30 00:16:33 2005 +++ amn/core/sync.m Sun Oct 2 23:11:47 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage sync + ## rain's utime_sub alias alias utime_sub { @:first=[$0.$pad(-6 0 $1)] diff -aruN amn.orig/core/theme.m amn/core/theme.m --- amn.orig/core/theme.m Wed Sep 7 13:05:57 2005 +++ amn/core/theme.m Sun Oct 2 23:12:18 2005 @@ -1,6 +1,9 @@ -subpackage theme +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. ## codelogic's theme module, thanx to robohak for help w/ padding ## modified crapple/kreca 05 +subpackage theme + alias tsave if ([$1]) { @ blahfile = $0 if (fexist($(loadpath)themes/$0.th)) { diff -aruN amn.orig/core/trickle.m amn/core/trickle.m --- amn.orig/core/trickle.m Fri Sep 2 14:51:54 2005 +++ amn/core/trickle.m Sun Oct 2 23:12:33 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage trickle + alias trickle { diff -aruN amn.orig/core/update.m amn/core/update.m --- amn.orig/core/update.m Fri Sep 2 19:43:06 2005 +++ amn/core/update.m Sun Oct 2 23:12:44 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage update + alias update.f { ^eval load $(loadpath)stats/$statbar ^eval load $(loadpath)sc/scan.$snf diff -aruN amn.orig/core/uptime.m amn/core/uptime.m --- amn.orig/core/uptime.m Tue Aug 30 01:32:28 2005 +++ amn/core/uptime.m Wed Dec 31 19:00:00 1969 @@ -1,10 +0,0 @@ -subpackage uptime -on #-msg 22 * {@lrm=[$1-];@lrmn=[$0]} - -on #-send_msg 22 * {@lsm=[$1-];@lsmn=[$0]} - -on #-notice 22 * {@lrn=[$1-];@lrnn=[$0]} - -on #-send_notice 22 * {@lsn=[$1-];@lsnn=[$0]} - -alias uptime {/load $(loadpath)ans/uptime.ans} diff -aruN amn.orig/core/users.m amn/core/users.m --- amn.orig/core/users.m Fri Sep 2 06:45:42 2005 +++ amn/core/users.m Sun Oct 2 23:15:55 2005 @@ -1,5 +1,8 @@ -subpackage users +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. ## last modified by crapple on 9.1.05 +subpackage users + alias chops { if (![$0]) { @:chan = [$1] ? [$1] : [$C] diff -aruN amn.orig/core/version.m amn/core/version.m --- amn.orig/core/version.m Wed Aug 31 08:18:13 2005 +++ amn/core/version.m Sun Oct 2 23:16:33 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage version + alias svf { msg $T $fparse(format_sv); diff -aruN amn.orig/core/wall.m amn/core/wall.m --- amn.orig/core/wall.m Tue Aug 30 00:18:26 2005 +++ amn/core/wall.m Sun Oct 2 23:17:05 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage wall ## old wall diff -aruN amn.orig/core/whois.m amn/core/whois.m --- amn.orig/core/whois.m Tue Aug 30 01:15:58 2005 +++ amn/core/whois.m Sun Oct 2 23:17:22 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage whois + alias 1format { switch ($0) { (1) {@_whois=1;^eval load ${loadpath}wis/whois.1} diff -aruN amn.orig/core/window.m amn/core/window.m --- amn.orig/core/window.m Sat Oct 1 21:27:04 2005 +++ amn/core/window.m Sun Oct 2 23:18:23 2005 @@ -1,6 +1,8 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# last modified by crapple 9.2.05 +# windowing stuff subpackage window -## last modified by crapple 9.2.05 -## windowing stuff ## more complex windowing stuff here. alias channame if (left(1 $0)==[#] || left(1 $0)==[&]) { return $0 }{ return #$0 } diff -aruN amn.orig/core/winhelp.m amn/core/winhelp.m --- amn.orig/core/winhelp.m Fri Sep 2 14:50:13 2005 +++ amn/core/winhelp.m Sun Oct 2 23:18:34 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage winhelp + alias winhelp { if (!$[0]) { diff -aruN amn.orig/docs/NOTES amn/docs/NOTES --- amn.orig/docs/NOTES Wed Dec 31 19:00:00 1969 +++ amn/docs/NOTES Fri Sep 16 19:20:35 2005 @@ -0,0 +1,53 @@ +## various notes/documents about some common problems known in +## amnesiac/epic. + + +## ansi/ibm437 hardcoding fonts/ugly looking etc.. +-this is not a bug per se, it's just how the font handles ansi codes. + i do not know what fonts really support them, these are some of the + things you can try if your theme/colors/ansi etc.. in the client looks + screwed up, also for european/non western languages users. there is a + /latin1 alias which should fix your terminal to fix your native language + characters however you cannot use an ansi theme (in most cases) + best to use the vanilla or epic theme. for non-western language encodings. + /ibm437 will try and enable ansi-like encodings on your terminal/putty/ + xterm/whatever. it is best to have a font that supports this, one such + font i do know that supports it for rxvt/aterm/etc.. is the vga11x19 + font, most people do not like this font as this is huge on small screens + ie; 1024x768 or 15" or less monitors, it can be grabbed from + http://amnesiac.ircii.org/misc/ + there are also some other fonts in there as well which may or may not work. + +## terminfo/termcap info. +-terminfo/termcap issues on FreeBSD not sure about DragonFly... possible fix + ln -s /usr/compat/linux/usr/share/terminfo /usr/share/misc + and cross your fingers? - help from |Rain| (naturally i presume this + requires the linux-compat libs installed.) + +## multiserver in amnesiac. +-there has been some improvements since 1.1 release + it's been tested and known to work, major complaints are no mjoin for + multiple servers, and no auto-reconnect(there is but highly not recommended) + and no auto_rejoin_on_connect. + +## output_rewrite formatting changes. +-There are times i have came across people requesting indenting on long txt + from someone and others who want's it at beginning of next line, to adjust + the value for your choice of poison. + +/set output_rewrite output_rewrite $_paste($1-)$1- +[sample long txt output] <-- this sample is non-default +17:24:16|<@crapple> i wonder if i should test out the aggressive states on + nocturnal + +/set output_rewrite output_rewrite $_paste($1-) $1- +[sample long txt output with wrapping to beginning of line] <-- default. +17:24:16|<@crapple> i wonder if i should test out the aggressive states on +nocturnal +note: this will also wrap other formats as well ie: private msg. +/orw - indenting, non-default as of 9.8.05 +/orww - extended with wrappings. -default behavior. +## end output_rewrite formatting note. + +//crapple +//zak@ircii.org diff -aruN amn.orig/docs/UPGRADE amn/docs/UPGRADE --- amn.orig/docs/UPGRADE Wed Dec 31 19:00:00 1969 +++ amn/docs/UPGRADE Sun Oct 2 13:38:22 2005 @@ -0,0 +1,23 @@ +here i will note from time to time on the 'upgrade' howto, for the changes +you need to make or remove to update without restarting your client using +/adump. first off in order to use adump you must have an ~/.epicrc which +loads your amn.epic from somewhere(since amnesiac does not have to be +placed in ~/amn it could be in ~/irc/amnesiac/ or whatever. and savefiles +will always go in ~/.amn now we got that covered. let's move on. +(this is not for the faint of heart this is for people who have a big ego +about their irc client uptimes *ahem*) + +## upgrade info +## any to 1.1d r/* (in theory) +rm -rf /path/to/amn +rm -rf ~/.amn/.mod.save +rm -rf ~/.amn/.a.fsetsave + +## 1.1d r/5 > r/7 +rm -rf /path/to/amn +rm -rf ~/.amn/.mod.save +tar zxvf newver.tgz (in your home dir or dir you want it) +or +tar zxvf newver.tgz -C /path/to/where/you/want/it +lastly +/adump (in the client) diff -aruN amn.orig/modules/abot/abot.m amn/modules/abot/abot.m --- amn.orig/modules/abot/abot.m Sat Jul 9 18:45:27 2005 +++ amn/modules/abot/abot.m Sun Oct 2 23:18:57 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage autobot + @ bsavefile = [$(savepath).bot.save] @ botprompt = [$cparse($(c1)auto)$cparse($(c2)bot)$(hblk):$(cl)] alias ismask {return ${pass(!@ $0) ? 1 : 0}} diff -aruN amn.orig/modules/adcc/adcc.m amn/modules/adcc/adcc.m --- amn.orig/modules/adcc/adcc.m Fri Sep 2 21:45:50 2005 +++ amn/modules/adcc/adcc.m Sun Oct 2 23:19:17 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage adcc + alias cdcc adcc alias xdcc adcc alias adcc { diff -aruN amn.orig/modules/aol/aol.m amn/modules/aol/aol.m --- amn.orig/modules/aol/aol.m Sun Oct 2 13:33:24 2005 +++ amn/modules/aol/aol.m Sun Oct 2 23:20:12 2005 @@ -1,7 +1,9 @@ -subpackage aol -# nutbar -# elite aol text stuff +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# taken from enigma. nutbar. # moved lsay here on 10.2.05 - crapple +subpackage aol + @ setitem(aol 0 ALL OREAND THE GIFCHERRY BUSH DA BOON CHASED DA WHEASELGIFPASTECLITNUGGET SHIT) @ setitem(aol 1 WH0A WHUT W00D PEEPUHL THEEENK IF DAY GN00 EYE WUZ A JEEEZUS FREEEK?!) @ setitem(aol 2 EYE WENT TO THE TRAK TO WAATCH THE PONYNUGGETS RHUN AROUND THE GIFPASTE) diff -aruN amn.orig/modules/away/away.m amn/modules/away/away.m --- amn.orig/modules/away/away.m Tue Aug 30 03:44:29 2005 +++ amn/modules/away/away.m Sun Oct 2 23:20:37 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage away + alias mlog {config b $*} alias clog {config c $*} alias nlog {config d $*} diff -aruN amn.orig/modules/bwk/bwk.m amn/modules/bwk/bwk.m --- amn.orig/modules/bwk/bwk.m Fri Sep 2 22:39:27 2005 +++ amn/modules/bwk/bwk.m Sun Oct 2 23:20:55 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage bwk @wordsfile=[$(savepath).a.words.save] diff -aruN amn.orig/modules/clones/clones.m amn/modules/clones/clones.m --- amn.orig/modules/clones/clones.m Tue Aug 30 04:12:11 2005 +++ amn/modules/clones/clones.m Sun Oct 2 23:21:44 2005 @@ -1,5 +1,8 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# taken from cypress //zak subpackage clones -## ripped from cypress; it appears to be ok. //zak + alias getclones { @ delarray(clones) @ setitem(clones 0) diff -aruN amn.orig/modules/dict/dict.m amn/modules/dict/dict.m --- amn.orig/modules/dict/dict.m Tue Aug 30 04:12:37 2005 +++ amn/modules/dict/dict.m Sun Oct 2 23:22:31 2005 @@ -1,6 +1,9 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# most of this taken from crackrock and made a lot better. server var +# taken from pv. subpackage dict -## most of this taken from crackrock and made a lot better. server var -## taken from pv. + @ dict.serv = [dict.org] @ dict.port = 2628 alias processdict { diff -aruN amn.orig/modules/flood/flood.m amn/modules/flood/flood.m --- amn.orig/modules/flood/flood.m Tue Aug 30 04:13:11 2005 +++ amn/modules/flood/flood.m Sun Oct 2 23:22:46 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage flood + ^on #-msg 1 * if (msgflood != 1) { @msgs++ //timer -refnum 5001 3 {@msgs = 0} diff -aruN amn.orig/modules/mjoin/mjoin.m amn/modules/mjoin/mjoin.m --- amn.orig/modules/mjoin/mjoin.m Thu Sep 8 18:52:39 2005 +++ amn/modules/mjoin/mjoin.m Sun Oct 2 23:22:59 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage mjoin + ## some aliases for mjoin alias listc listchan alias addjoin ajoin $* diff -aruN amn.orig/modules/ncomp/ncomp.m amn/modules/ncomp/ncomp.m --- amn.orig/modules/ncomp/ncomp.m Tue Aug 30 04:13:59 2005 +++ amn/modules/ncomp/ncomp.m Sun Oct 2 23:23:15 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage ncomp + ^on ^input "*" { if (strlen($before(: $0)) > 1&&right(1 $0)==[:]) { @ txt = before(: $0) diff -aruN amn.orig/modules/netsplit/netsplit.m amn/modules/netsplit/netsplit.m --- amn.orig/modules/netsplit/netsplit.m Tue Aug 30 04:14:11 2005 +++ amn/modules/netsplit/netsplit.m Sun Oct 2 23:25:30 2005 @@ -1,4 +1,5 @@ -subpackage netsplit +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. # Taken from the base epic5/scripts. # # NETSPLIT 7 - This script does it's best to suppress the excessive @@ -17,6 +18,10 @@ # CONVERTED for ircII2.2pre8 # Version V by poxaV (cgw@unt.edu), from Daemon's code # modified last 7-03-93 +# +# integration into amnesiac by crapple/kreca some simplifications. +# crapple/kreca 05 +subpackage netsplit #shows the current time in HH:MM:SS format ^alias currtime @ function_return = strftime(%T) diff -aruN amn.orig/modules/nlog/nlog.m amn/modules/nlog/nlog.m --- amn.orig/modules/nlog/nlog.m Fri Sep 16 17:49:59 2005 +++ amn/modules/nlog/nlog.m Sun Oct 2 23:25:44 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage nlog + @nsolog=[off] @nfile=[$(savepath).a.notify.save] @nlogfile=[$(savepath)notify.log] diff -aruN amn.orig/modules/oper/oper.m amn/modules/oper/oper.m --- amn.orig/modules/oper/oper.m Thu Sep 8 18:47:37 2005 +++ amn/modules/oper/oper.m Sun Oct 2 23:25:55 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage oper + @ bindctl(sequence ^E set parse_command _spageu) @ bindctl(sequence ^D set parse_command _spaged) diff -aruN amn.orig/modules/orignick/orignick.m amn/modules/orignick/orignick.m --- amn.orig/modules/orignick/orignick.m Thu Sep 1 20:26:58 2005 +++ amn/modules/orignick/orignick.m Sun Oct 2 23:26:06 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage orignick + ^timer -del 45 alias orignick { if (![$0]) { diff -aruN amn.orig/modules/query/query.m amn/modules/query/query.m --- amn.orig/modules/query/query.m Sat Oct 1 21:30:04 2005 +++ amn/modules/query/query.m Sun Oct 2 23:27:04 2005 @@ -1,10 +1,11 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage query /* * Copyright (c) 2003 Brian Weiss * All rights reserved. * - * This script uses serial number 835 for all /ON hooks. */ /****** CONFIG SECTION ******/ diff -aruN amn.orig/modules/relay/relay.m amn/modules/relay/relay.m --- amn.orig/modules/relay/relay.m Sun Oct 2 00:49:17 2005 +++ amn/modules/relay/relay.m Sun Oct 2 23:27:33 2005 @@ -1,6 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# last modified by crapple 10.2.05 - added /rel(smn) -l hacks for xavier. subpackage relay - -## last modified by crapple 10.2.05 - added /rel(smn) -l hacks for xavier. alias lpaste msg $T $line(${[$0]?[$0]:1}) alias lp lpaste diff -aruN amn.orig/modules/services/services.m amn/modules/services/services.m --- amn.orig/modules/services/services.m Sat Sep 3 15:48:17 2005 +++ amn/modules/services/services.m Sun Oct 2 23:28:01 2005 @@ -1,5 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# nickserv/chanserv/operserv etc.. module. subpackage services -## nickserv/chanserv/operserv etc.. module. #both way aliases chanserv/nickserv. diff -aruN amn.orig/modules/shitlist/shitlist.m amn/modules/shitlist/shitlist.m --- amn.orig/modules/shitlist/shitlist.m Thu Sep 1 20:52:21 2005 +++ amn/modules/shitlist/shitlist.m Sun Oct 2 23:28:50 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage shitlist alias listshit shitlist diff -aruN amn.orig/modules/sprot/sprot.m amn/modules/sprot/sprot.m --- amn.orig/modules/sprot/sprot.m Tue Aug 30 04:15:27 2005 +++ amn/modules/sprot/sprot.m Sun Oct 2 23:29:05 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage sprot @kicklogo=[off] diff -aruN amn.orig/modules/tab/tab.m amn/modules/tab/tab.m --- amn.orig/modules/tab/tab.m Tue Jun 21 04:44:09 2005 +++ amn/modules/tab/tab.m Sun Oct 2 23:29:27 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage tab @ bindctl(sequence ^I set parse_command get.msg) diff -aruN amn.orig/modules/userlist/userlist.m amn/modules/userlist/userlist.m --- amn.orig/modules/userlist/userlist.m Thu Sep 1 20:37:14 2005 +++ amn/modules/userlist/userlist.m Sun Oct 2 23:29:58 2005 @@ -1,8 +1,10 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# based on void/codelogic's autobot 98 +# modded by crapple 05 +# taken from epic dist scripts dir subpackage userlist -## based on void/codelogic's autobot 98 -## modded by crapple 05 -## taken from epic dist scripts dir ^alias clean foreach $0 ii { ^assign -$0[$ii] } # /purge diff -aruN amn.orig/modules/vanilla/vanilla.m amn/modules/vanilla/vanilla.m --- amn.orig/modules/vanilla/vanilla.m Fri Sep 9 03:52:14 2005 +++ amn/modules/vanilla/vanilla.m Sun Oct 2 23:30:37 2005 @@ -1,5 +1,7 @@ -subpackage vanilla +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. # Make amnesiac behave a bit more like default epic with tc and netsplit # loaded, just the way skullY likes it +subpackage vanilla @ bindctl(sequence ^D set parse_command listsplit) diff -aruN amn.orig/modules/xy/xy.m amn/modules/xy/xy.m --- amn.orig/modules/xy/xy.m Sat Jun 4 00:57:53 2005 +++ amn/modules/xy/xy.m Sun Oct 2 23:31:02 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage xy + alias xy msg x@channels.undernet.org $* alias x xy $* alias xlogin xy login $* diff -aruN amn.orig/pasture/topwin/topwin.m amn/pasture/topwin/topwin.m --- amn.orig/pasture/topwin/topwin.m Fri Apr 29 04:18:38 2005 +++ amn/pasture/topwin/topwin.m Sun Oct 2 23:31:26 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage topwin + alias fixtopic { @cwin=winchan($0) if ( cwin != -1) { diff -aruN amn.orig/sc/scan.1 amn/sc/scan.1 --- amn.orig/sc/scan.1 Tue Aug 30 04:17:06 2005 +++ amn/sc/scan.1 Sun Oct 2 23:32:24 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage scan1 @format_scan_users=[$$(hblk)[$$(cl)ops\\\($$(hwht)$$1$$(cl\\\))$$(hblk)] $$(hblk)[$$(cl)non\\\($$(hwht)$$2$$(cl)\\\)$$(hblk)] $$(hblk)[$$(cl)voc\\\($$(hwht)$$3$$(cl)\\\)$$(hblk)]] diff -aruN amn.orig/sc/scan.2 amn/sc/scan.2 --- amn.orig/sc/scan.2 Tue Aug 30 04:17:15 2005 +++ amn/sc/scan.2 Sun Oct 2 23:32:35 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage scan2 @format_scan_users=[ $$(hblk)[$$(c1)o$$(hblk)!$$(wht)$$1$(cl)$$(hblk)] $$(hblk)[$$(c1)n$$(hblk)!$$(wht)$$2$$(hblk)] $$(hblk)[$$(c1)v$$(hblk)!$$(wht)$$3$$(hblk)]] diff -aruN amn.orig/sc/scan.3 amn/sc/scan.3 --- amn.orig/sc/scan.3 Tue Aug 30 04:17:22 2005 +++ amn/sc/scan.3 Sun Oct 2 23:32:42 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage scan3 + @format_scan_users=[ Users on $$4 \\\(o:$$1) \\\(n:$$2) \\\(v:$$3) @format_scan_width=15 ^assign -format_scan_header diff -aruN amn.orig/sc/scan.4 amn/sc/scan.4 --- amn.orig/sc/scan.4 Tue Aug 30 04:17:28 2005 +++ amn/sc/scan.4 Sun Oct 2 23:32:50 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage scan4 @format_scan_users=[ $$(hblk)[$$(c1)o$$(hblk)!$$(wht)$$1$$(cl)$$(hblk)] $$(hblk)[$$(c1)n$$(hblk)!$$(wht)$$2$$(hblk)] $$(hblk)[$$(c1)v$$(hblk)!$$(wht)$$3$$(hblk)]] diff -aruN amn.orig/sc/scan.5 amn/sc/scan.5 --- amn.orig/sc/scan.5 Tue Aug 30 04:17:34 2005 +++ amn/sc/scan.5 Sun Oct 2 23:32:59 2005 @@ -1,4 +1,7 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage scan5 + @format_scan_users=[*** Users on $$4] @format_scan_width=1 ^assign -format_scan_header diff -aruN amn.orig/sc/scan.6 amn/sc/scan.6 --- amn.orig/sc/scan.6 Tue Aug 30 04:17:40 2005 +++ amn/sc/scan.6 Sun Oct 2 23:33:14 2005 @@ -1,3 +1,5 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage scan6 @format_scan_users=[ $$4 [o!$$1] [n!$$2] [v!$$3]] Date: Mon, 3 Oct 2005 22:14:50 -0400 (EDT) From: zak@ircii.org (Zak) -sync EPIC-BUGS to reality. -sync E5-KNOWNBUGS to reality. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Oct 3 00:12:51 2005 +++ amn/CHANGES Mon Oct 3 22:13:56 2005 @@ -174,3 +174,4 @@ -some other minor changes. //zak -move UPGRADE into doc/ //zak -move NOTES into doc/ //zak +-sync EPIC-BUGS E5-KNOWNBUGS to reality //zak diff -aruN amn.orig/EPIC-BUGS amn/EPIC-BUGS --- amn.orig/EPIC-BUGS Sun Oct 2 14:19:20 2005 +++ amn/EPIC-BUGS Mon Oct 3 22:11:06 2005 @@ -1,3 +1,6 @@ +All bugs reported here has been fixed in cvs id 1302. the file will just +stay here as a reference until the next epic5 release comes out. + ircII EPIC5-0.0.6 (Commit id: 1288) (Date of release: 20050809) -FIXED - ircII EPIC5-0.0.6 (Commit id: 1300) (Date of release: 20050809) nonblocking dns problems are gone now many thanks to hop for fixing this. @@ -42,183 +45,33 @@ that. 00:04|(hop!jnelson@epic.user) therefore, i shall make it a high priority to finish that part of the code right away, so you can continue testing. =) -^^ so hopefully a fix regarding this will come soon ;) +^^ FIXED. -discussed the below with hop somewhat on 10.2.05 -it's kinda hard to reproduce.. i will update more on this when i get time. - ircII EPIC5-0.0.6 (Commit id: 1292) (Date of release: 20050809) +FIXED: 10.3.05 ircII EPIC5-0.0.6 (Commit id: 1302) (Date of release: 20050809) + 21:22|(hop!jnelson@epic.user) the karll array stuff rqeuires a call to + qsort() occasionally, and qsort()'s 3rd argument asks how big each item in + the array is. + 21:22|(hop!jnelson@epic.user) so we passed sizeof(long *) to qsort + 21:22|(hop!jnelson@epic.user) but in the qsort callback function, we were + casting the argument to (int *) and not (long *) + 21:23|(hop!jnelson@epic.user) this caused the qsort callback to do +incorrect comparisons + 21:23|(hop!jnelson@epic.user) the reason this doesn't come up in amd64 is + because sparc is big endian and amd64, like all pc's, is little endian + 21:23|(hop!jnelson@epic.user) for example, if i have 4 and 8 byte integers, + and i assign 10 to each of them + 21:23|(hop!jnelson@epic.user) on amd64, it is 10 00 00 00 [00 00 00 00] + 21:23|(hop!jnelson@epic.user) so whether i cast it to (long *) or (int *) i + still get 10 + 21:24|(hop!jnelson@epic.user) but on sparc, it's [00 00 00 00] 00 00 00 10 + 21:24|(hop!jnelson@epic.user) so if i cast to (int *), i get 0! and if i + -finditem() seems to be broken, however the behavior seems hard to reproduce among the different commit id and release versions of epic5, sample code that usually guarantees a reproduce. -alias addcountry { - @:i = numitems(countryIndex) - @setitem(countryIndex $i $toupper($0)) - @setitem(countryName $i $1-) -} - -alias country { - @:i= finditem(countryIndex $toupper($0)) - if ( i > -1) { - @function_return=getitem(countryName $i) - } { - @function_return =[Unknown] - } -} - -@addcountry(ZR Zaire) -@addcountry(ZW Zimbabwe) -@addcountry(COM Internic Commercial) -@addcountry(EDU Educational Institution) -@addcountry(ARPA Reverse DNS) - -/eval echo $country(ZR) <-- works -/eval echo $country(COM) <-- 3/4 letter finds don't seem to work. -^^ fix i did for the above in amnesiac is to use matchitem() instead of - finditem() - --> debug 7 output for broken $finditem() --> even more confusing/unpredictable as of 10.2.05 //zak -## test .com //works oddly. - -Executing [0] /eval echo $country(com) -Expanded [com] to [com] -Expanded [@:i= finditem(countryIndex $toupper($0));if ( i > -1) -+{@function_return=getitem(countryName $i)} {@function_return =[Unknown]}] -to -+[@:i= finditem(countryIndex $toupper($0))] -Executing [1] @:i= finditem(countryIndex $toupper($0)) -Expanded [:i] to [:i] -Expanded [finditem(countryIndex $toupper($0))] to [finditem(countryIndex -+$toupper($0))] -Expanded [$0] to [com] -Function TOUPPER(com) returned COM -Expanded [countryIndex $toupper($0)] to [countryIndex COM] -Function FINDITEM(countryIndex COM) returned 2 -Expanded [if ( i > -1) {@function_return=getitem(countryName $i)} -+{@function_return =[Unknown]}] to [if ( i > -1) -+{@function_return=getitem(countryName $i)} {@function_return =[Unknown]}] -Executing [1] if ( i > -1) {@function_return=getitem(countryName $i)} -+{@function_return =[Unknown]} -Expanded [-1] to [-1] -Expanded [i] to [i] -Expanded [1] to [1] -IF expression expands to: (1) -IF expression expands to: (1) -Expanded [@function_return=getitem(countryName $i)] to -+[@function_return=getitem(countryName $i)] -Executing [2] @function_return=getitem(countryName $i) -Expanded [function_return] to [function_return] -Expanded [getitem(countryName $i)] to [getitem(countryName $i)] -Expanded [countryName $i] to [countryName 2] -Function GETITEM(countryName 2) returned Internic Commercial -Function COUNTRY(com) returned Internic Commercial -Expanded [echo $country(com)] to [echo Internic Commercial] -Executing [1] echo Internic Commercial -Internic Commercial - -## testing arpa. //broken. -Executing [0] /eval echo $country(arpa) -Expanded [arpa] to [arpa] -Expanded [@:i= finditem(countryIndex $toupper($0));if ( i > -1) -+{@function_return=getitem(countryName $i)} {@function_return =[Unknown]}] -to -+[@:i= finditem(countryIndex $toupper($0))] -Executing [1] @:i= finditem(countryIndex $toupper($0)) -Expanded [:i] to [:i] -Expanded [finditem(countryIndex $toupper($0))] to [finditem(countryIndex -+$toupper($0))] -Expanded [$0] to [arpa] -Function TOUPPER(arpa) returned ARPA -Expanded [countryIndex $toupper($0)] to [countryIndex ARPA] -Function FINDITEM(countryIndex ARPA) returned -2 -Expanded [if ( i > -1) {@function_return=getitem(countryName $i)} -+{@function_return =[Unknown]}] to [if ( i > -1) -+{@function_return=getitem(countryName $i)} {@function_return =[Unknown]}] -Executing [1] if ( i > -1) {@function_return=getitem(countryName $i)} -+{@function_return =[Unknown]} -Expanded [-1] to [-1] -Expanded [i] to [i] -Expanded [0] to [0] -IF expression expands to: (0) -Expanded [@function_return =[Unknown]] to [@function_return =[Unknown]] -Executing [2] @function_return =[Unknown] -Expanded [function_return] to [function_return] -Expanded [Unknown] to [Unknown] -Function COUNTRY(arpa) returned Unknown -Expanded [echo $country(arpa)] to [echo Unknown] -Executing [1] echo Unknown -Unknown - -## test .edu //works. -Executing [0] /eval echo $country(edu) -Expanded [edu] to [edu] -Expanded [@:i= finditem(countryIndex $toupper($0));if ( i > -1) -+{@function_return=getitem(countryName $i)} {@function_return =[Unknown]}] -to -+[@:i= finditem(countryIndex $toupper($0))] -Executing [1] @:i= finditem(countryIndex $toupper($0)) -Expanded [:i] to [:i] -Expanded [finditem(countryIndex $toupper($0))] to [finditem(countryIndex -+$toupper($0))] -Expanded [$0] to [edu] -Function TOUPPER(edu) returned EDU -Expanded [countryIndex $toupper($0)] to [countryIndex EDU] -Function FINDITEM(countryIndex EDU) returned 3 -Expanded [if ( i > -1) {@function_return=getitem(countryName $i)} -+{@function_return =[Unknown]}] to [if ( i > -1) -+{@function_return=getitem(countryName $i)} {@function_return =[Unknown]}] -Executing [1] if ( i > -1) {@function_return=getitem(countryName $i)} -+{@function_return =[Unknown]} -Expanded [-1] to [-1] -Expanded [i] to [i] -Expanded [1] to [1] -IF expression expands to: (1) -Expanded [@function_return=getitem(countryName $i)] to -+[@function_return=getitem(countryName $i)] -Executing [2] @function_return=getitem(countryName $i) -Expanded [function_return] to [function_return] -Expanded [getitem(countryName $i)] to [getitem(countryName $i)] -Expanded [countryName $i] to [countryName 3] -Function GETITEM(countryName 3) returned Educational Institution -Function COUNTRY(edu) returned Educational Institution -Expanded [echo $country(edu)] to [echo Educational Institution] -Executing [1] echo Educational Institution -Educational Institution - -## test .zw //broken this is confusing. -Executing [0] /eval echo $country(zw) -Expanded [zw] to [zw] -Expanded [@:i= finditem(countryIndex $toupper($0));if ( i > -1) -+{@function_return=getitem(countryName $i)} {@function_return =[Unknown]}] -to -+[@:i= finditem(countryIndex $toupper($0))] -Executing [1] @:i= finditem(countryIndex $toupper($0)) -Expanded [:i] to [:i] -Expanded [finditem(countryIndex $toupper($0))] to [finditem(countryIndex -+$toupper($0))] -Expanded [$0] to [zw] -Function TOUPPER(zw) returned ZW -Expanded [countryIndex $toupper($0)] to [countryIndex ZW] -Function FINDITEM(countryIndex ZW) returned -2 -Expanded [if ( i > -1) {@function_return=getitem(countryName $i)} -+{@function_return =[Unknown]}] to [if ( i > -1) -+{@function_return=getitem(countryName $i)} {@function_return =[Unknown]}] -Executing [1] if ( i > -1) {@function_return=getitem(countryName $i)} -+{@function_return =[Unknown]} -Expanded [-1] to [-1] -Expanded [i] to [i] -Expanded [0] to [0] -IF expression expands to: (0) -Expanded [@function_return =[Unknown]] to [@function_return =[Unknown]] -Executing [2] @function_return =[Unknown] -Expanded [function_return] to [function_return] -Expanded [Unknown] to [Unknown] -Function COUNTRY(zw) returned Unknown -Expanded [echo $country(zw)] to [echo Unknown] -Executing [1] echo Unknown -Unknown +^^ fixed in cvs id 1302 10.3.05 ## proposals on the ugly getaddrinfo(3) and other things for epic itself. ## this is just here for reference material at this time, no it doesn't mean diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Sun Oct 2 13:43:25 2005 +++ amn/docs/E5-KNOWNBUGS Mon Oct 3 22:13:01 2005 @@ -788,3 +788,4 @@ * Use buffer type -2 for reading nonblocking dns addrs, fixes probs on solaris. * Fix alignment issues on sparc. Thanks to crapple for his assistance! * Convert the other users of mangle_line() to new_normalize_string (*gulp!*) +* Fix another 32-bit/64-bit cast problem with karll arrays (rb crapple) Date: Wed, 5 Oct 2005 22:02:00 -0400 (EDT) From: zak@ircii.org (Zak) -update TODO-BUGS. //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Sun Oct 2 13:19:59 2005 +++ amn/TODO-BUGS Wed Oct 5 22:01:15 2005 @@ -15,6 +15,14 @@ $ /dict word, doesn't explictly close telnet in the background on some OS's. resulting in a nice spiked race condition. mebe need to add a kill -9? +## highest priority TODO. +-remove usages of $stripansi() $stripcrap() since -cvs uses mangle_display + thus removing those functions. +-adjust our 'poor mans' thuttup to be more reasonable. +-fixdouble/fixwin or equiv for doublestats +-check into the new windowing stuff in -cvs. and correct aliases/add + aliases if needs to be. + ## Higher priority requests. @ add a topiclock alias (like bitchx) for xavier. @ add a module to bwk involving. Date: Thu, 6 Oct 2005 02:13:49 -0400 (EDT) From: zak@ircii.org (Zak) -update TODO-BUGS. //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Wed Oct 5 22:01:15 2005 +++ amn/TODO-BUGS Thu Oct 6 02:13:12 2005 @@ -22,6 +22,16 @@ -fixdouble/fixwin or equiv for doublestats -check into the new windowing stuff in -cvs. and correct aliases/add aliases if needs to be. +-cleanup statbars to be compatable with the new mangle_display esp with + last commit id 1307 passing \r charcode 5 +note -> 01:37|(hop!jnelson@epic.user) the problem was the \r character, +which was being sent, was incorrectly being permitted to pass through to the +display. + 01:37|(hop!jnelson@epic.user) since epic does a "clear-to-end-of-line" when + it's done writing a line, "foobar\r\n" yields a blank line because \r +moves the cursor back and then clear_to_eol() -> zap + 01:37|(hop!jnelson@epic.user) i have changed \r to be a "never printable +ever under any circumstances" characters (type 5) ## Higher priority requests. @ add a topiclock alias (like bitchx) for xavier. Date: Thu, 6 Oct 2005 22:49:45 -0400 (EDT) From: zak@ircii.org (Zak) -sync documents to reality. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Oct 3 22:13:56 2005 +++ amn/CHANGES Thu Oct 6 22:48:41 2005 @@ -175,3 +175,7 @@ -move UPGRADE into doc/ //zak -move NOTES into doc/ //zak -sync EPIC-BUGS E5-KNOWNBUGS to reality //zak + +10.6.05 +-sync TODO-BUGS to reality. //zak +-sync E5-KNOWNBUGS from -HEAD //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Thu Oct 6 02:13:12 2005 +++ amn/TODO-BUGS Thu Oct 6 22:42:56 2005 @@ -22,16 +22,6 @@ -fixdouble/fixwin or equiv for doublestats -check into the new windowing stuff in -cvs. and correct aliases/add aliases if needs to be. --cleanup statbars to be compatable with the new mangle_display esp with - last commit id 1307 passing \r charcode 5 -note -> 01:37|(hop!jnelson@epic.user) the problem was the \r character, -which was being sent, was incorrectly being permitted to pass through to the -display. - 01:37|(hop!jnelson@epic.user) since epic does a "clear-to-end-of-line" when - it's done writing a line, "foobar\r\n" yields a blank line because \r -moves the cursor back and then clear_to_eol() -> zap - 01:37|(hop!jnelson@epic.user) i have changed \r to be a "never printable -ever under any circumstances" characters (type 5) ## Higher priority requests. @ add a topiclock alias (like bitchx) for xavier. diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Mon Oct 3 22:13:01 2005 +++ amn/docs/E5-KNOWNBUGS Thu Oct 6 22:44:33 2005 @@ -6,7 +6,8 @@ * /CTCPs over /DCCs don't match up with their queries very well. * Revamp of /who -realname * alias foo {package x;load script} carries 'x' into 'script' ??? -* Unify mangle_line() and normalize_string(). +* Remove support for "highlighted ignores" because they annoy me. +* Change direct manipulations of to_window with calls to message_to(). LOOK FOR IN THE FUTURE ----------------------- @@ -17,6 +18,7 @@ * Turn unified symbol table into an inode table (name, entry), entry in array * /window noserv causes bad fd loop. (can't reproduce?) * DBM support. +* Is there some way to set what ^O resets to, a la mirc? [See http://www.epicsol.org/PROJECTS for things to come in the future] [See http://www.epicsol.org/CHANGELOG5 for things that changed in the past] @@ -789,3 +791,40 @@ * Fix alignment issues on sparc. Thanks to crapple for his assistance! * Convert the other users of mangle_line() to new_normalize_string (*gulp!*) * Fix another 32-bit/64-bit cast problem with karll arrays (rb crapple) +* Include if we can, for no particular reason... +* Nix now unused mangle_line(). yay! +* Use (intptr_t) instead of (intmax_t) to treat pointers as integers... +* Try to handle failures from the dns helpers with more grace. +* Add the idea of a "visible" and "invisible" lastlog entry +* Always skip "invisible" lastlog entries, handle them when trimming, etc. +* Rename remove_from_lastlog() to trim_lastlog() and have it do looping +* Unconditionally keep every item in the lastlog, even if it's "hidden". +* When screen changes width, purge+recreate all window's scrollback +* Add /window rebuild_scrollback to manually invoke this process. +* For now, auto-recreate unholds all, and cancels scrollback +* Add /window auto_scrollback to opt-out of auto-recreate feature +* Store each window's width individually, don't refer to server +* Use each window's personal width to re-break lines (more on this later) +* Fix so "/window lastlog foo" doesn't delete your lastlog! +* Change all the builtin functions to use new_normalize_string(). +* Change the input prompt to use new_normalize_string(). +* Add /set mangle_display. HUZZAH! +* Change the display stuff to new_normalize_string() and /set mangle_display +* Whack the now unused normalize_string(). HUZZAH! HUZZAH! HUZZAH! +* Change the seperator of the mangler-type-parser to be spaces and not commas. +* Start keeping a monotonically increasing refnum for all lastlog items +* Change add_to_lastlog() to return the lastlog refnum +* Change add_to[_window]_scrollback]() to take the lastlog refnum +* Cross-link scrollback items with the corresponding lastlog refnum. +* Save scrollback/hold position across scrollback rebuilds +* This means rebuilding doesn't affect scrollback/hold users! HUZZAH! +* Whack the now unnecessary /window auto_scrollback (mis)feature. +* Don't unconditionally unclear after rebuild, if everything still fits. +* Fix /xecho -x +* Remove /set alt_charset, blink_video, bold_video, color, display_ansi +* Remove /set display_pc_characters, inverse_video, underline_video. HUZZAH! +* Force \r (carriage return) to be type 5 char (never printable ever) +* Handle \f as a special case in new_normalize_string for the status bar. +* Do some re-org in screen.c, screen.h +* Roll window_disp() into its only caller, add_to_window(). +* Change create_new_screen() into a void function Date: Fri, 7 Oct 2005 11:36:23 -0400 (EDT) From: zak@ircii.org (Zak) -mostly changes on how the script adds sets, and new file for it also allow for ~/.amnrc which loads at proper time for /sets. requested by adam. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Oct 6 22:48:41 2005 +++ amn/CHANGES Fri Oct 7 11:06:03 2005 @@ -175,7 +175,20 @@ -move UPGRADE into doc/ //zak -move NOTES into doc/ //zak -sync EPIC-BUGS E5-KNOWNBUGS to reality //zak - 10.6.05 -sync TODO-BUGS to reality. //zak -sync E5-KNOWNBUGS from -HEAD //zak + +10.7.05 +-move client adjustable on both epic4/5 sets to amn/settings for ppl who + wish to edit the file, however will be overriden on new client versions. + //zak +-allow usage for ~/.amnrc to prevent amnesiac from overriding users sets. + added a sample.amnrc in docs/ +-some cleanups of sets and merged some sets from compat.m to amn.epic which + are epic5 only so users can see what's available (for those who actually + looks at the script) //zak +^^ all of the above was requested by adam@efnet to make the annoying static + that seemingly comes out in txt from his nick stop hopefully ;) +-increment development version to .8 probably a release sometime by the + weekend. if all goes ok. seems stable thus far. //zak diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Sun Oct 2 22:56:48 2005 +++ amn/amn.epic Fri Oct 7 10:55:26 2005 @@ -24,40 +24,31 @@ ^eval ^load $(loadpath)core/compat.m ## compiling sets... addset auto_rejoin bool; + addset history_circleq bool; + addset history_save_file str; + addset history_remove_dupes bool; + addset history_save_position bool; + addset history_timestamp bool; xaddset auto_rejoin_delay int; xaddset num_of_whowas int; xaddset show_end_of_msgs bool; xaddset show_who_hopcount bool; - + ## epic5 must sets here. + set auto_reconnect off; + set history_save_file ~/.epic_history; + set history_remove_dupes on; + set history_save_position on; + set history_timestamp on; } +## allow for user customizable settings. +^eval ^load $(loadpath)settings -## various sets -set floating_point_math on -set high_bit_esc 0 -set insert_mode on -set -continued_line -set dcc_sliding_window 1024 -set dcc_timeout 600 -set auto_rejoin on -set auto_rejoin_delay 5 -set auto_reconnect off -set num_of_whowas 2 -set auto_whowas on -set indent on -set show_who_hopcount on -set show_channel_names off -set mode_stripper on -set client_information I get my kicks on channel six -set user_information Are you from the FBI? -set notify_on_termination off -set new_server_lastlog_level none -set switch_channels_between_windows off +## remove certain sets for cosmetics. other cosmetic adjustments here. set -status_user set -status_format1 set -status_format2 set quit_message $tolower($J) - $randread($(loadpath)quit.reasons) - -window 1 level none +window 1 level none window 1 name - ## hack to not break URLS. eval set word_break $strip(. $word_break) @@ -76,6 +67,8 @@ ^on ^yell * # ##end poor mans THUTTUP. +## allow for permanent settings via ~/.amnrc +^eval ^load ~/.amnrc ^eval ^load $(loadpath)core/sets.m #progress bar diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Sun Oct 2 23:01:17 2005 +++ amn/core/compat.m Fri Oct 7 10:35:57 2005 @@ -469,10 +469,6 @@ set history 150; -addset history_circleq bool; - -set history_circleq on; - addset history_persistent bool { if (*0 == [on]) { ^on #-exit 2 "*" { @@ -484,22 +480,6 @@ }; set history_persistent off; - -addset history_save_file str; - -set history_save_file ~/.epic_history; - -addset history_remove_dupes bool; - -set history_remove_dupes on; - -addset history_save_position bool; - -set history_save_position on; - -addset history_timestamp bool; - -set history_timestamp on; if (history_persistent == [on] && fexist($history_save_file) == 1) { @ historyctl(read $history_save_file); diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Sun Oct 2 23:11:29 2005 +++ amn/core/sets.m Fri Oct 7 11:06:31 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[7] +@rel_id=[8] @a.rel=[1.1d r/$rel_id] @a.date=[20050903] @_ss=[15] diff -aruN amn.orig/docs/sample.amnrc amn/docs/sample.amnrc --- amn.orig/docs/sample.amnrc Wed Dec 31 19:00:00 1969 +++ amn/docs/sample.amnrc Fri Oct 7 11:00:58 2005 @@ -0,0 +1,7 @@ +## sample ~/.amnrc file to prevent amnesiac from overriding your +## customized settings. +set history_circleq off +set dcc_sliding_window 512 +set auto_rejoin off +set auto_rejoin_delay 10 +set num_of_whowas 1 diff -aruN amn.orig/settings amn/settings --- amn.orig/settings Wed Dec 31 19:00:00 1969 +++ amn/settings Fri Oct 7 10:53:46 2005 @@ -0,0 +1,22 @@ +## you may edit this file to tune your desired settings. +## or create a ~/.amnrc with your default settings which will not be +## overriden with new script versions. or via script. +set history_circleq on +set high_bit_esc 0 +set insert_mode on +set -continued_line +set dcc_sliding_window 1024 +set dcc_timeout 600 +set auto_rejoin on +set auto_rejoin_delay 5 +set num_of_whowas 2 +set auto_whowas on +set indent on +set show_who_hopcount on +set show_channel_names off +set mode_stripper on +set client_information I get my kicks on channel six +set user_information Are you from the FBI? +set notify_on_termination off +set new_server_lastlog_level none +set switch_channels_between_windows off Date: Fri, 7 Oct 2005 12:43:09 -0400 (EDT) From: zak@ircii.org (Zak) -sync TODO-BUGS to reality. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 7 11:06:03 2005 +++ amn/CHANGES Fri Oct 7 12:41:35 2005 @@ -192,3 +192,4 @@ that seemingly comes out in txt from his nick stop hopefully ;) -increment development version to .8 probably a release sometime by the weekend. if all goes ok. seems stable thus far. //zak +-sync todo-bugs to reality. //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Thu Oct 6 22:42:56 2005 +++ amn/TODO-BUGS Fri Oct 7 12:41:00 2005 @@ -16,8 +16,6 @@ resulting in a nice spiked race condition. mebe need to add a kill -9? ## highest priority TODO. --remove usages of $stripansi() $stripcrap() since -cvs uses mangle_display - thus removing those functions. -adjust our 'poor mans' thuttup to be more reasonable. -fixdouble/fixwin or equiv for doublestats -check into the new windowing stuff in -cvs. and correct aliases/add From: Kreca Date: Mon, 10 Oct 2005 11:47:10 +0200 (CEST) -big cleanup to tab.m. Remove old useless crap and insert the msg tab completion into our new switch. the old command_completion is now ripped out since it's marked obsolete and hasnt worked at all in epic5. //kreca diff -aruN /home/kreca/cvs/amn.orig/CHANGES /home/kreca/cvs/amn/CHANGES --- /home/kreca/cvs/amn.orig/CHANGES Fri Oct 7 18:41:35 2005 +++ /home/kreca/cvs/amn/CHANGES Mon Oct 10 11:44:39 2005 @@ -193,3 +193,6 @@ -increment development version to .8 probably a release sometime by the weekend. if all goes ok. seems stable thus far. //zak -sync todo-bugs to reality. //zak + +10.10.05 +-big cleanup to tab.m. Remove old useless crap and insert the msg tab completion into our new switch. the old command_completion is now ripped out since it's marked obsolete and hasnt worked at all in epic5. //kreca diff -aruN /home/kreca/cvs/amn.orig/modules/tab/tab.m /home/kreca/cvs/amn/modules/tab/tab.m --- /home/kreca/cvs/amn.orig/modules/tab/tab.m Mon Oct 3 05:29:27 2005 +++ /home/kreca/cvs/amn/modules/tab/tab.m Mon Oct 10 11:42:48 2005 @@ -34,21 +34,6 @@ ^assign -_nlist;^assign -_nlist2;^assign -uulist; } -alias add.msg { - - - @keywords=[/msg /m] - if (match($0 $keywords) >= 1) { - if (rmatchitem(tabs $1) < 0) { - @setitem(tabs $numitems(tabs) $^\^^1) - } - if (numitems(tabs) == 20) { - @delitem(tabs 0) - } - } -} - -@equ=[\=] alias get.msg { if ( #L > 0 && left(1 $L) != [$(K)] && right(1 $L) != [ ] ) { @@ -114,163 +99,106 @@ } - return; } -} -/* After this point all is old */ - switch ($L) { - () ($(K)m${[ ]}) ($(K)m %${[ ]}) ($(K)msg${[ ]}) ($(K)msg %${[ ]}) { - if (getitem(tabs $_tabnum)==[]) { - type ^U/msg$chr(32) - }{ - type ^U/msg $getitem(tabs $_tabnum)$chr(32) - if (_tabnum != -1) { - @_tabnum-- - } + () + ($(K)m${[ ]}) + ($(K)m %${[ ]}) + ($(K)msg${[ ]}) + ($(K)msg %${[ ]}) + { + /* msg completion */ + if (getitem(tabs $_tabnum)==[]) { + parsekey erase_line + xtype -l /msg$chr(32) + }{ + parsekey erase_line + xtype -l /msg $getitem(tabs $_tabnum)$chr(32) if (_tabnum == -1) { - @_tabnum = [${numitems(tabs)-1}] - } + @_tabnum = [${numitems(tabs)-1}] + } { + @_tabnum-- + } + } } } - ($(K)$sar(g$chr(1)$K$chr(1 1)$(K)$word(0 $L))${[ ]}$word(1 $L)) { +} - @txt = word(1 $L) - if (pattern($txt* $chanusers($C))) { - - @ per = word(0 $pattern($txt* $chanusers($C))) - type ^U$word(0 $L) $^\^^per - } - if (!pattern($txt* $chanusers($C)) && pattern(*$txt* $chanusers($C))) { - @ per = word(0 $pattern(*$txt* $chanusers($C))) - type ^U$word(0 $L) $^\^^per - } - if (match(*#* $txt)) { - @chanper = word(0 $pattern(*$txt* $mychannels())) - type ^U$word(0 $L) $^\^^chanper - } - } - -($(K)%) ($K$(K)%) { - ^push comwords $hwords - ^push comwords $tolower($getcommands()) - @comwords2=remws(m msg odcc / $comwords) - fe ($pattern($after(/ $L)* $comwords2)) n1 n2 n3 n4 { - xecho -b $[10]n1 $[10]n2 $[10]n3 $[10]n4 - } - if ([$#pattern($after(/ $L)* $comwords2)]==1) { - type ^U$(K)$^\^^pattern($after(/ $L)* $comwords2) - } - ^assign -comwords2;^assign -comwords -} -($(K)cdcc${[ ]}send${[ ]}$word(2 $L)${[ ]}$word(3 $L)) ($(K)odcc${[ ]}send${[ ]}$word(2 $L)${[ ]}$word(3 $L)) ($(K)xdcc${[ ]}send${[ ]}$word(2 $L)${[ ]}$word(3 $L)) { - @ctxt = twiddle($word(3 $L)) - if (pattern(*$ctxt* $glob($ctxt*)) && ctxt) { - @ cper = glob($ctxt*) - type ^U$(K)odcc send $^\^^word(2 $L) $^\^^cper +alias add.msg { + @keywords=[/msg /m] + if (match($0 $keywords) >= 1) { + if (rmatchitem(tabs $1) < 0) { + @setitem(tabs $numitems(tabs) $^\^^1) + } + if (numitems(tabs) == 20) { + @delitem(tabs 0) } + } } -($(K)cdcc${[ ]}send${[ ]}$word(2 $L)) ($(K)odcc${[ ]}send${[ ]}$word(2 $L)) ($(K)xdcc${[ ]}send${[ ]}$word(2 $L)${[ ]}) { - @ctxt2 = word(2 $L) - if (pattern(*$ctxt2* $chanusers($C))) { - @ per = word(0 $pattern(*$ctxt2* $chanusers($C))) - type ^U$(K)odcc send $^\^^per - } - if (match(*#* $ctxt2)) { - @chanper = word(0 $pattern(*$ctxt2* $mychannels())) - type ^U$word(0 $L) $^\^^chanper - } -} - - - ($word(0 $L)) ($word(0 $L) $afterw($word(0 $L) $L)${[ ]}) ($word(0 $L) $afterw($word(0 $L) $L)) { - @ntxt = sar(g/://$word(0 $L)) - @ntxt2 = word(0 $L) - if ([$[1]ntxt] == K) { - parsekey command_completion - - } - if (pattern($ntxt* $chanusers($C)) && match(*:* $ntxt2)) { - @ per = pattern($ntxt* $chanusers($C)) - if (numwords($per) > 1) { - xecho -b Ambiguous matches: $per - sendline $* - }{ - type ^U$^\^^per$format_nick_comp $afterw($word(0 $L) $L) - }} - if (pattern(*$ntxt* $chanusers($C)) && !pattern($ntxt* $chanusers($C)) && match(*:* $ntxt2)) { - @ per = pattern(*$ntxt* $chanusers($C)) - if (numwords($per) > 1) { - xecho -b Ambiguous matches: $per - sendline $* - }{ - type ^U$^\^^per$format_nick_comp $afterw($word(0 $L) $L) - - } } - - } +@equ=[\=] - } -} on #-msg 2 * { if (rmatchitem(tabs $0) >= 0) { - @delitem(tabs $rmatchitem(tabs $0)) + @delitem(tabs $rmatchitem(tabs $0)) } - ^add.msg /msg $0;@_tabnum = rmatchitem(tabs $0) + ^add.msg /msg $0; + @_tabnum = rmatchitem(tabs $0) } on #-send_msg 2 * { if (rmatchitem(tabs $0) >= 0) { - @delitem(tabs $rmatchitem(tabs $0)) + @delitem(tabs $rmatchitem(tabs $0)) } - ^add.msg /msg $0;@_tabnum = rmatchitem(tabs $0) + ^add.msg /msg $0; + @_tabnum = rmatchitem(tabs $0) } on #-send_dcc_chat 2 * { if (rmatchitem(tabs \=$0) >= 0) { - @delitem(tabs $rmatchitem(tabs $(equ)$0)) + @delitem(tabs $rmatchitem(tabs $(equ)$0)) } - ^add.msg /msg \=$0;@_tabnum=[${numitems(tabs)-1}] - + ^add.msg /msg \=$0; + @_tabnum=[${numitems(tabs)-1}] } on #-dcc_chat 2 * { if (rmatchitem(tabs $(equ)$0) >= 0) { - @delitem(tabs $rmatchitem(tabs $(equ)$0)) + @delitem(tabs $rmatchitem(tabs $(equ)$0)) } - ^add.msg /msg \=$0;@_tabnum=[${numitems(tabs)-1}] + ^add.msg /msg \=$0; + @_tabnum=[${numitems(tabs)-1}] } on #-dcc_connect 2 "% CHAT *" { if (rmatchitem(tabs $(equ)$0) >= 0) { - @delitem(tabs $rmatchitem(tabs $(equ)$0)) + @delitem(tabs $rmatchitem(tabs $(equ)$0)) } - ^add.msg /msg \=$0;@_tabnum=[${numitems(tabs)-1}] - + ^add.msg /msg \=$0; + @_tabnum=[${numitems(tabs)-1}] } on #-dcc_request 2 "% CHAT*" { if (rmatchitem(tabs $(equ)$0) >= 0) { - @delitem(tabs $rmatchitem(tabs $(equ)$0)) + @delitem(tabs $rmatchitem(tabs $(equ)$0)) } - ^add.msg /msg \=$0;@_tabnum=[${numitems(tabs)-1}] - + ^add.msg /msg \=$0; + @_tabnum=[${numitems(tabs)-1}] } on #-dcc_offer 2 "% % CHAT *" { if (rmatchitem(tabs $(equ)$0) >= 0) { - @delitem(tabs $rmatchitem(tabs $(equ)$0)) + @delitem(tabs $rmatchitem(tabs $(equ)$0)) } - ^add.msg /msg \=$0;@_tabnum=[${numitems(tabs)-1}] - -} + ^add.msg /msg \=$0; + @_tabnum=[${numitems(tabs)-1}] +} From zwhite@ircii.org Mon Oct 10 15:40:38 2005 -Fix output_rewrite rules to not add an extra space at the beginning of every line. //skullY -vanilla.m: Remove ^W map so switching windows with ^W alone is done quickly. //skully -Fix some code formatting. //skullY -Change all instances of echo to //echo, to allow echo to be aliased. //skullY -vanilla.m: alias echo to output ot the current window. diff /home/zwhite/amn.orig/CHANGES /home/zwhite/amn/CHANGES --- /home/zwhite/amn.orig/CHANGES Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/CHANGES Mon Oct 10 19:38:43 2005 @@ -194,5 +194,16 @@ weekend. if all goes ok. seems stable thus far. //zak -sync todo-bugs to reality. //zak +2005 Oct 9 +-Fix output_rewrite rules to not add an extra space at the beginning of + every line. //skullY +-vanilla.m: Remove ^W map so switching windows with ^W alone is done quickly. + //skully +-Fix some code formatting. //skullY + 10.10.05 --big cleanup to tab.m. Remove old useless crap and insert the msg tab completion into our new switch. the old command_completion is now ripped out since it's marked obsolete and hasnt worked at all in epic5. //kreca \ No newline at end of file +-big cleanup to tab.m. Remove old useless crap and insert the msg tab completion into our new switch. the old command_completion is now ripped out since it's marked obsolete and hasnt worked at all in epic5. //kreca + +2005 Oct 10 +-Change all instances of echo to //echo, to allow echo to be aliased. //skullY +-vanilla.m: alias echo to output ot the current window. diff /home/zwhite/amn.orig/ans/fkeys.ans /home/zwhite/amn/ans/fkeys.ans --- /home/zwhite/amn.orig/ans/fkeys.ans Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/ans/fkeys.ans Mon Oct 10 18:53:43 2005 @@ -1,10 +1,10 @@ -eval echo ----------------------------= function keys =----------------------- -eval echo f1 $[25]fke1 | f2 $[25]fke2 -eval echo f3 $[25]fke3 | f4 $[25]fke4 -eval echo f5 $[25]fke5 | f6 $[25]fke6 -eval echo f7 $[25]fke7 | f8 $[25]fke8 -eval echo f9 $[25]fke9 | f10 $[25]fke10 -eval echo f11 $[25]fke11 | f12 $[25]fke12 -eval echo -eval echo fkey <1-12> -eval echo --------------------------------------------------------------------- +eval //echo ----------------------------= function keys =----------------------- +eval //echo f1 $[25]fke1 | f2 $[25]fke2 +eval //echo f3 $[25]fke3 | f4 $[25]fke4 +eval //echo f5 $[25]fke5 | f6 $[25]fke6 +eval //echo f7 $[25]fke7 | f8 $[25]fke8 +eval //echo f9 $[25]fke9 | f10 $[25]fke10 +eval //echo f11 $[25]fke11 | f12 $[25]fke12 +eval //echo +eval //echo fkey <1-12> +eval //echo --------------------------------------------------------------------- diff /home/zwhite/amn.orig/ans/modlist.ans /home/zwhite/amn/ans/modlist.ans --- /home/zwhite/amn.orig/ans/modlist.ans Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/ans/modlist.ans Mon Oct 10 18:53:43 2005 @@ -1,12 +1,12 @@ -eval echo --------------------= Available Modules =------------------------ -eval echo [abot] [*] [away] [*] [dict] [*] -eval echo [mjoin] [*] [oper] [*] [relay] [*] -eval echo [tab] [*] [netsplit] [*] [orignick] [*] -eval echo [clones] [M] [ncomp] [M] [adcc] [M] -eval echo [flood] [M] [nlog] [M] [query] [M] -eval echo [sprot] [M] [aol] [M] [bwk] [M] -eval echo [xy] [M] [shitlist] [M] [userlist] [M] -eval echo [services] [M] -eval echo -eval echo [*] Default [M] Non-default /mhelp for more info. -eval echo ------------------------------------------------------------------- +eval //echo --------------------= Available Modules =------------------------ +eval //echo [abot] [*] [away] [*] [dict] [*] +eval //echo [mjoin] [*] [oper] [*] [relay] [*] +eval //echo [tab] [*] [netsplit] [*] [orignick] [*] +eval //echo [clones] [M] [ncomp] [M] [adcc] [M] +eval //echo [flood] [M] [nlog] [M] [query] [M] +eval //echo [sprot] [M] [aol] [M] [bwk] [M] +eval //echo [xy] [M] [shitlist] [M] [userlist] [M] +eval //echo [services] [M] +eval //echo +eval //echo [*] Default [M] Non-default /mhelp for more info. +eval //echo ------------------------------------------------------------------- diff /home/zwhite/amn.orig/ans/modules.ans /home/zwhite/amn/ans/modules.ans --- /home/zwhite/amn.orig/ans/modules.ans Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/ans/modules.ans Mon Oct 10 18:53:43 2005 @@ -1,27 +1,27 @@ -eval echo -----------------= Module Description =------------------- -eval echo [*] Default [M] Non-default /mhelp for more info. -eval echo [abot] - auto-bot [*] -eval echo [away] - away/away-log [*] -eval echo [dict] - dictionary [*] -eval echo [mjoin] - mass join/auto-join [*] -eval echo [oper] - IRC oper/opervision/commands [*] -eval echo [relay] - paste/relm/reln etc.. buffer [*] -eval echo [tab] - extended tab completion [*] -eval echo [netsplit] - netsplit detector [*] -eval echo [orignick] - orignick/jupenick [*] -eval echo [clones] - scan for clones in current chan [M] -eval echo [ncomp] - nick completion [M] -eval echo [adcc] - xdcc/dcc pack/offers [M] -eval echo [flood] - msg flood protection [M] +eval //echo -----------------= Module Description =------------------- +eval //echo [*] Default [M] Non-default /mhelp for more info. +eval //echo [abot] - auto-bot [*] +eval //echo [away] - away/away-log [*] +eval //echo [dict] - dictionary [*] +eval //echo [mjoin] - mass join/auto-join [*] +eval //echo [oper] - IRC oper/opervision/commands [*] +eval //echo [relay] - paste/relm/reln etc.. buffer [*] +eval //echo [tab] - extended tab completion [*] +eval //echo [netsplit] - netsplit detector [*] +eval //echo [orignick] - orignick/jupenick [*] +eval //echo [clones] - scan for clones in current chan [M] +eval //echo [ncomp] - nick completion [M] +eval //echo [adcc] - xdcc/dcc pack/offers [M] +eval //echo [flood] - msg flood protection [M] input_char "menu paused hit the ANY key to continue " pause -eval echo [nlog] - notify logging [M] -eval echo [query] - auto-query window [M] -eval echo [sprot] - self-protection aka unbanself [M] -eval echo [aol] - aol say [M] -eval echo [bwk] - banwordkick k/bk user on said word [M] -eval echo [xy] - undernet xy services helper [M] -eval echo [shitlist] - shitlist user [M] -eval echo [userlist] - friends/userlist protection [M] -eval echo [services] - nickserv/memoserv/chanserv helper [M] -eval echo ------------------------------------------------------------- +eval //echo [nlog] - notify logging [M] +eval //echo [query] - auto-query window [M] +eval //echo [sprot] - self-protection aka unbanself [M] +eval //echo [aol] - aol say [M] +eval //echo [bwk] - banwordkick k/bk user on said word [M] +eval //echo [xy] - undernet xy services helper [M] +eval //echo [shitlist] - shitlist user [M] +eval //echo [userlist] - friends/userlist protection [M] +eval //echo [services] - nickserv/memoserv/chanserv helper [M] +eval //echo ------------------------------------------------------------- diff /home/zwhite/amn.orig/ans/uptime.ans /home/zwhite/amn/ans/uptime.ans --- /home/zwhite/amn.orig/ans/uptime.ans Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/ans/uptime.ans Mon Oct 10 18:53:43 2005 @@ -1,17 +1,17 @@ -eval echo --------------------------= Amnesiac Uptime =------------------- -eval echo $uname(%s %r) \($uname(%m)\) -eval echo Client Version: ircII $J \($V\) [$info(i)] "$info(r)" -eval echo Client Running Since $stime($F) -eval echo Client Uptime: $tdiff2(${time() - F}) - PID: $pid(), PPID: $ppid() -eval echo $info(c) -eval echo Compile-time options: $info(o); -eval echo Amnesiac release id: $rel_id -eval echo Last Recv Message: \($lrmn\) $lrm -eval echo Last Recv Notice: \($lrnn\) $lrn -eval echo Last Sent Msg: $lsm -eval echo Last Sent Notice: $lsn -eval echo Last Channel invited to: $I -eval echo Last person seen via notify ${D} -eval echo Current server version: ${R} -eval echo Current Servername: ${S} -eval echo ----------------------------------------------------------------- +eval //echo --------------------------= Amnesiac Uptime =------------------- +eval //echo $uname(%s %r) \($uname(%m)\) +eval //echo Client Version: ircII $J \($V\) [$info(i)] "$info(r)" +eval //echo Client Running Since $stime($F) +eval //echo Client Uptime: $tdiff2(${time() - F}) - PID: $pid(), PPID: $ppid() +eval //echo $info(c) +eval //echo Compile-time options: $info(o); +eval //echo Amnesiac release id: $rel_id +eval //echo Last Recv Message: \($lrmn\) $lrm +eval //echo Last Recv Notice: \($lrnn\) $lrn +eval //echo Last Sent Msg: $lsm +eval //echo Last Sent Notice: $lsn +eval //echo Last Channel invited to: $I +eval //echo Last person seen via notify ${D} +eval //echo Current server version: ${R} +eval //echo Current Servername: ${S} +eval //echo ----------------------------------------------------------------- diff /home/zwhite/amn.orig/core/action.m /home/zwhite/amn/core/action.m --- /home/zwhite/amn.orig/core/action.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/core/action.m Mon Oct 10 18:53:43 2005 @@ -37,9 +37,9 @@ } on ^send_action "*" { switch ( $0 ) { - ( $C ) { echo $fparse(format_action $N $0 $1-) } - ( #* ) { echo $fparse(format_action_other $N $0 $1-) } - ( * ) { echo $fparse(format_send_desc $0 $N $1-)} + ( $C ) { //echo $fparse(format_action $N $0 $1-) } + ( #* ) { //echo $fparse(format_action_other $N $0 $1-) } + ( * ) { //echo $fparse(format_send_desc $0 $N $1-)} } } diff /home/zwhite/amn.orig/core/alias.m /home/zwhite/amn/core/alias.m --- /home/zwhite/amn.orig/core/alias.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/core/alias.m Mon Oct 10 18:53:43 2005 @@ -9,7 +9,7 @@ alias sc scan $* alias quit bye $* alias ismask {return ${pass(!@ $0) ? 1 : 0}} -alias recho eval echo $* +alias recho eval //echo $* alias save saveall alias settings config $* @@ -57,9 +57,9 @@ ## script echo ##still need to clean some of this up. alias abwecho xecho -b -v $cparse($*) alias awecho xecho -v $cparse($*) -alias aecho echo $cparse($*) +alias aecho //echo $cparse($*) alias abecho xecho -b -- $cparse($*) -alias ce echo $cparse("$*") +alias ce //echo $cparse("$*") ## to be annoying like xavier. alias blinky msg $T $cparse("%F%G$*") @@ -135,16 +135,16 @@ ## static timestamping format. alias indent orw alias orw { -^set -output_rewrite -^set output_rewrite $_paste($1-)$1- -xecho -v [a+c] output indent set to "on" + ^set -output_rewrite + ^set output_rewrite $_paste($1-)$1- + xecho -v [a+c] output indent set to "on" } alias wrap orww alias orww { -^set -output_rewrite -^set output_rewrite $_paste($1-) $$1- -xecho -v [a+c] output linewrap set to "on" + ^set -output_rewrite + ^set output_rewrite $_paste($1-)$1- + xecho -v [a+c] output linewrap set to "on" } ## end output_rewrite sillyness. @@ -160,14 +160,14 @@ ## long complex aliases below here. alias fixterm { - exec echo '$chr(27)\(U' + exec //echo '$chr(27)\(U' xecho -r $chr(27)\(U } alias ibm437 fixterm alias latin1 { - exec echo '$chr(27)\(B' + exec //echo '$chr(27)\(B' xecho -r $chr(27)\(B } @@ -175,7 +175,7 @@ if ([$#]) { @:ansifile = open($0 R T) while (!eof($ansifile)) { - echo $read($ansifile) + //echo $read($ansifile) } @close($ansifile) } @@ -185,7 +185,7 @@ if ([$#]) { @:ansifile = open($0 R T) while (!eof($ansifile)) { - eval echo $read($ansifile) + eval //echo $read($ansifile) } @close($ansifile) } diff /home/zwhite/amn.orig/core/arrays.m /home/zwhite/amn/core/arrays.m --- /home/zwhite/amn.orig/core/arrays.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/core/arrays.m Mon Oct 10 18:53:43 2005 @@ -717,6 +717,7 @@ @ setitem(nickform 13 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%c$$1 %K-> %m$$2%K\\\)) @ setitem(nickform 14 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%W$$1 %K-> %m$$2%K\\\)) @ setitem(nickform 15 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%W$$1 %K-> %W$$2%K\\\)) +@ setitem(nickform 16 $$G $$1 is now known as $$2) ## timestamp formats -crapple @ delarray(timeform) diff /home/zwhite/amn.orig/core/bans.m /home/zwhite/amn/core/bans.m --- /home/zwhite/amn.orig/core/bans.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/core/bans.m Mon Oct 10 18:53:43 2005 @@ -15,7 +15,7 @@ @chan=[$2] for (@:xx=0,xx config setting>} + (*) {load $(loadpath)core/config;^//echo $G usage -> config setting>} }} ## auto-bot password show toggle. undocumented unless ppl read this. alias bot_tog { if (showtype==1) { @ showtype = 2 - xecho -v (abot).. now showing passwords. + xecho -b (abot).. now showing passwords. }{ @ showtype = 1 - xecho -v (abot).. not showing passwords + xecho -b (abot).. not showing passwords } } ## end auto-bot pass toggle. @@ -52,14 +52,14 @@ ## window double toggle. alias _double { if (![$0]) { - xecho -v [a+c] double fixed window set to $toupper($windowdoubles) + xecho -b double fixed window set to $toupper($windowdoubles) } if (match($0 on off)) { @windowdoubles = [$0] - xecho -v [a+c] double fixed window set to $toupper($windowdoubles) + xecho -b double fixed window set to $toupper($windowdoubles) }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } @@ -107,15 +107,15 @@ ## timestamp some. timestamp all has been removed. alias _tsmps { if (![$0]) { - xecho -v [a+c] timestamp is set to "$_tss" + xecho -b timestamp is set to "$_tss" } if (match($0 on off)) { @_tss = [$0] _timestampsome $_tss - xecho -v [a+c] timestamp msgs,not,walls,pubs,dcc,signoff,oper set to "$_tss" + xecho -b timestamp msgs,not,walls,pubs,dcc,signoff,oper set to "$_tss" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } @@ -138,15 +138,15 @@ ## bantype config. [Norm/Better/Host/Domain] alias bantype if (![$0]) { - xecho -v [a+c] bantype set to $bt_ - xecho -v [a+c] /bantype + xecho -b bantype set to $bt_ + xecho -b /bantype }{ switch ($0) { - (normal) {@bt_=[normal];@_bt=6;xecho -v [a+c] bantype set to normal (n!*u@h.d n!*u@d.h)} - (better) {@bt_=[better];@_bt=3;xecho -v [a+c] bantype set to better (*!*u@*.d *!*u@d.*)} - (host) {@bt_=[host];@_bt=2;xecho -v [a+c] bantype set to host (*!*@h.d *!*@d.h)} - (domain) {@bt_=[domain];@_bt=4;xecho -v [a+c] bantype set to domain (*!*@*.d *!*@d.*)} + (normal) {@bt_=[normal];@_bt=6;xecho -b bantype set to normal (n!*u@h.d n!*u@d.h)} + (better) {@bt_=[better];@_bt=3;xecho -b bantype set to better (*!*u@*.d *!*u@d.*)} + (host) {@bt_=[host];@_bt=2;xecho -b bantype set to host (*!*@h.d *!*@d.h)} + (domain) {@bt_=[domain];@_bt=4;xecho -b bantype set to domain (*!*@*.d *!*@d.*)} } } @@ -155,37 +155,36 @@ ## auto-responses /resp1 /resp2 /resp3 /resp4 alias _pubn { if (![$0]) { - xecho -v [a+c] primary auto-response set to "$_pubnick" - }{ - xecho -v [a+c] primary auto-response set to "$*" + abecho primary auto-response set to "$_pubnick" + }{ + abecho primary auto-response set to "$*" @_pubnick=[$*] } - } alias _r2 { if (![$0]) { - xecho -v [a+c] 2nd auto-response set to "$_r2" + xecho -b 2nd auto-response set to "$_r2" }{ - xecho -v [a+c] 2nd auto-response set to "$*" + xecho -b 2nd auto-response set to "$*" @_r2=[$*] } } alias _r3 { if (![$0]) { - xecho -v [a+c] 3rd auto-response set to "$_r3" + xecho -b 3rd auto-response set to "$_r3" }{ - xecho -v [a+c] 3rd auto-response set to "$*" + xecho -b 3rd auto-response set to "$*" @_r3=[$*] } } alias _r4 { if (![$0]) { - xecho -v [a+c] 4th auto-response set to "$_r4" + xecho -b 4th auto-response set to "$_r4" }{ - xecho -v [a+c] 4th auto-response set to "$*" + xecho -b 4th auto-response set to "$*" @_r4=[$*] } } diff /home/zwhite/amn.orig/core/ehelp.m /home/zwhite/amn/core/ehelp.m --- /home/zwhite/amn.orig/core/ehelp.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/core/ehelp.m Mon Oct 10 18:53:43 2005 @@ -7,22 +7,22 @@ echo -------------------------= Extended Help =---------------------------- - echo uhelp <userlist help> userlist help menu. [module] - echo shelp <shitlist help> shitlist help menu. [module] - echo bwhelp <bwk help> banwordkick help menu. [module] - echo mjhelp <mjoin help> mjoin/ajoin help menu. [module] - echo abhelp <abot help> autobot help menu. [module] - echo ohelp <oper help> operview/oper help menu [module] - echo rhelp <relay help> relay/paste help menu. [module] - echo svhelp <services help> nserv/cserv/etc.. help menu. [module] - echo chelp <config help> config shortcut help menu. [core] - echo fhelp <look/feel help> amnesiac look/feel help menu. [core] - echo ghelp <general help> general client/user cmds help. [core] - echo mhelp <module help> module help menu. [core] - echo winhelp <window help> window shortcuts help menu. [core] - echo dcchelp <dcc help> dcc usage/binds help menu. [core] - echo smhelp <special modes> exempt modes cmds help menu. [core] - echo thelp <trickle help> the irc swiss army knife menu. [core] + //echo uhelp <userlist help> userlist help menu. [module] + //echo shelp <shitlist help> shitlist help menu. [module] + //echo bwhelp <bwk help> banwordkick help menu. [module] + //echo mjhelp <mjoin help> mjoin/ajoin help menu. [module] + //echo abhelp <abot help> autobot help menu. [module] + //echo ohelp <oper help> operview/oper help menu [module] + //echo rhelp <relay help> relay/paste help menu. [module] + //echo svhelp <services help> nserv/cserv/etc.. help menu. [module] + //echo chelp <config help> config shortcut help menu. [core] + //echo fhelp <look/feel help> amnesiac look/feel help menu. [core] + //echo ghelp <general help> general client/user cmds help. [core] + //echo mhelp <module help> module help menu. [core] + //echo winhelp <window help> window shortcuts help menu. [core] + //echo dcchelp <dcc help> dcc usage/binds help menu. [core] + //echo smhelp <special modes> exempt modes cmds help menu. [core] + //echo thelp <trickle help> the irc swiss army knife menu. [core] echo ---------------------------------------------------------------------- } diff /home/zwhite/amn.orig/core/eimodes.m /home/zwhite/amn/core/eimodes.m --- /home/zwhite/amn.orig/core/eimodes.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/core/eimodes.m Mon Oct 10 18:53:43 2005 @@ -24,7 +24,7 @@ @chan=[$2] for (@:xx=0,xx%n") kreca$format_nick_comp hi! + //echo $G $cparse("%K<%ncrapple%K>%n") kreca$format_nick_comp hi! xecho -v -b this is your new nick completion, /fsave to save. @ncomp = [$0] }{ @@ -605,7 +605,7 @@ alias svform if ([$0]) { if (isnumber($0)&&[$0] 0) { @thenick=[$(hwht)$0$(cl)] } - echo $fparse(format_public_other $(extravar)$(thenick) $1 $2-) + //echo $fparse(format_public_other $(extravar)$(thenick) $1 $2-) } @@ -72,8 +72,8 @@ } } if (winchan($0)==-1 || winchan($winchan($0)) != [$0] ) { - echo $fparse(format_send_public ${extravar}$N:$0 $1-) + //echo $fparse(format_send_public ${extravar}$N:$0 $1-) } else { - echo $fparse(format_send_public ${extravar}$N $1-) + //echo $fparse(format_send_public ${extravar}$N $1-) } } diff /home/zwhite/amn.orig/core/theme.m /home/zwhite/amn/core/theme.m --- /home/zwhite/amn.orig/core/theme.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/core/theme.m Mon Oct 10 18:53:43 2005 @@ -77,15 +77,15 @@ # thanks to ttb for some original help w/ read(), but it still didn't work :P alias theme if (![$0]) { - echo file name author description - echo + //echo file name author description + //echo fe ($glob($(loadpath)themes\/*.th)) th { @ :thfile = open($th R T) @ :auth = after(: $read($thfile)) @ :desc = after(: $read($thfile)) @ :name = after(: $read($thfile)) @ close($thfile) - echo $[10]name $[12]auth $desc$repeat(${20-strlen($strip( $stripansicodes($desc)))} ) + //echo $[10]name $[12]auth $desc$repeat(${20-strlen($strip( $stripansicodes($desc)))} ) } xecho -v [a+c] current theme is $scdesc }{ diff /home/zwhite/amn.orig/core/wall.m /home/zwhite/amn/core/wall.m --- /home/zwhite/amn.orig/core/wall.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/core/wall.m Mon Oct 10 18:53:43 2005 @@ -12,14 +12,14 @@ fe ($lusers) o1 o2 o3 o4 o5 o6 o7 o8 { ^quote NOTICE $o1,$o2,$o3,$o4,$o5,$o6,$o7,$o8 :\[Wall/$C\] $* } - echo $fparse(format_bwall $0-) + //echo $fparse(format_bwall $0-) ^assign -lusers } ## new wall alias wall { quote notice @$C :\[Wall/$C\] $* - echo $fparse(format_bwall $0-) + //echo $fparse(format_bwall $0-) } ## robohaks wall.bx pr0pz diff /home/zwhite/amn.orig/core/winhelp.m /home/zwhite/amn/core/winhelp.m --- /home/zwhite/amn.orig/core/winhelp.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/core/winhelp.m Mon Oct 10 18:53:43 2005 @@ -7,30 +7,30 @@ echo --------------------= Windowing Help =----------------------------- - echo wc <window create> creates new hidden window - echo wj <window join> creates new hidden window and joins specified channel - echo wk <window kill> kills current window - echo wlk <window leave kill> kills current window and parts channel - echo cls <clear screen> clears notices/dcc/publics/etc in current window. - echo wn <window next> window next switches to next hidden window - echo wp <window prev> switches to previous hidden window - echo mv <msg window> -hidden|split|kill - echo wq <window query> /wq nick creates a query window with the nick - echo wka <window kill all_hidden> attempts to kill all hidden windows. - echo wko <window kill others> attempts to kill other windows on the screen if visible. - echo wsl <window swap last> swaps to your last window. + //echo wc <window create> creates new hidden window + //echo wj <window join> creates new hidden window and joins specified channel + //echo wk <window kill> kills current window + //echo wlk <window leave kill> kills current window and parts channel + //echo cls <clear screen> clears notices/dcc/publics/etc in current window. + //echo wn <window next> window next switches to next hidden window + //echo wp <window prev> switches to previous hidden window + //echo mv <msg window> -hidden|split|kill + //echo wq <window query> /wq nick creates a query window with the nick + //echo wka <window kill all_hidden> attempts to kill all hidden windows. + //echo wko <window kill others> attempts to kill other windows on the screen if visible. + //echo wsl <window swap last> swaps to your last window. input_char "menu paused hit the ANY key to continue " pause - echo wsa <window swap act> swaps to your activity window(s) from statbar. ie: act(3,4) - echo wl <window list> lists windows in use - echo wsg <window grow> grows current window ie: /wsg 7 - echo wss <window shrink> shrinks current window ie: /wss 7 - echo 1-25 <swap windows> swap windows ie: /1 for window 1 /2 for window 2 etc.. - echo wlog <window log> toggles window logging - echo wflush <window flush> window flush the scroll back epic5-0.0.6 and higher. - echo wlevel <window levels> changes level of current window - echo msgwin <msg window> wsl's then it wc's a window bound to msgs,notices + //echo wsa <window swap act> swaps to your activity window(s) from statbar. ie: act(3,4) + //echo wl <window list> lists windows in use + //echo wsg <window grow> grows current window ie: /wsg 7 + //echo wss <window shrink> shrinks current window ie: /wss 7 + //echo 1-25 <swap windows> swap windows ie: /1 for window 1 /2 for window 2 etc.. + //echo wlog <window log> toggles window logging + //echo wflush <window flush> window flush the scroll back epic5-0.0.6 and higher. + //echo wlevel <window levels> changes level of current window + //echo msgwin <msg window> wsl's then it wc's a window bound to msgs,notices echo --------------------------------------------------------------------------- } -} \ No newline at end of file +} diff /home/zwhite/amn.orig/modules/bwk/bwk.m /home/zwhite/amn/modules/bwk/bwk.m --- /home/zwhite/amn.orig/modules/bwk/bwk.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/modules/bwk/bwk.m Mon Oct 10 18:53:43 2005 @@ -123,16 +123,16 @@ ^wordsload alias bwkhelp bwhelp alias bwhelp { - echo -----------------------= Wordkick Help =-------------------------- - echo addword /addword /addword word #chan [type] to bk a word in - echo specified channel... type is either bk or kick. Default is bk. - echo delword /delword will delete specified word from list. - echo listword /listword will list words in bankick word list. - echo wordssave /wordssave will save the word list in bankick word list. - echo -= Wordkick Quick Aliases =- - echo unword/delword delbwk/delword - echo addw/addword addbwk/addword - echo bwk/listword - echo ------------------------------------------------------------------- + //echo -----------------------= Wordkick Help =-------------------------- + //echo addword /addword /addword word #chan [type] to bk a word in + //echo specified channel... type is either bk or kick. Default is bk. + //echo delword /delword will delete specified word from list. + //echo listword /listword will list words in bankick word list. + //echo wordssave /wordssave will save the word list in bankick word list. + //echo -= Wordkick Quick Aliases =- + //echo unword/delword delbwk/delword + //echo addw/addword addbwk/addword + //echo bwk/listword + //echo ------------------------------------------------------------------- } diff /home/zwhite/amn.orig/modules/netsplit/netsplit.m /home/zwhite/amn/modules/netsplit/netsplit.m --- /home/zwhite/amn.orig/modules/netsplit/netsplit.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/modules/netsplit/netsplit.m Mon Oct 10 18:53:43 2005 @@ -44,17 +44,17 @@ # Add patterns.. like /boguspat *bonk* *thud* *haha* # that will NOT be treated as server names.. -^alias boguspat ^assign isbogus.pats $isbogus.pats $*;echo $* added +^alias boguspat ^assign isbogus.pats $isbogus.pats $*;//echo $* added # Next two are pretty obvious -^alias boguslist echo Pats: $isbogus.pats -^alias bogusclear ^assign -isbogus.pats;echo Bogus list clean +^alias boguslist //echo Pats: $isbogus.pats +^alias bogusclear ^assign -isbogus.pats;//echo Bogus list clean # If first word in Signoff contains a period then assume servername # and thus a a split. Stash in assoc array. ^ON ^CHANNEL_SIGNOFF "% % %.% %.%" { if (isbogus($1-)) - { echo *** Signoff: $1 \($2-\) } + { //echo *** Signoff: $1 \($2-\) } { ^netbroke $encode($tolower($0)) $encode($1) $encode($2).$encode($3) $2 $3 } } @@ -140,7 +140,7 @@ ^alias showsplit { if ( [$($0)] ) { - echo $0 $($0) + //echo $0 $($0) } foreach $0 ii { @@ -163,7 +163,7 @@ { foreach signoffs.$ii jj { - echo $lformat(15 $decode($ii)) $lformat(10 $decode($jj)) $splitname[$signoffs[$ii][$jj]] + //echo $lformat(15 $decode($ii)) $lformat(10 $decode($jj)) $splitname[$signoffs[$ii][$jj]] } } ^assign -ii diff /home/zwhite/amn.orig/modules/relay/relay.m /home/zwhite/amn/modules/relay/relay.m --- /home/zwhite/amn.orig/modules/relay/relay.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/modules/relay/relay.m Mon Oct 10 18:53:43 2005 @@ -7,7 +7,7 @@ alias lp lpaste alias paste relw -^set output_rewrite $_paste($1-) $1- +^set output_rewrite $_paste($1-)$1- alias rel { while (:option = getopt(optopt optarg lns $*)) { @@ -33,7 +33,7 @@ ^local xx @relayw=[OFF] for (@xx=0, xx]) { msg $T $fparse(format_msg $0 $3@$4)$fmsg }{ - echo $0 isn't on IRC right now. + //echo $0 isn't on IRC right now. } }{ echo usage : /frelm [fake nick] [nick/channel to send to] [fake msg]} @@ -273,7 +273,7 @@ userhost $0 -direct -cmd if ([$4]!=[]) { msg $T $fparse(format_notice $0 $3@$4 )$fnot }{ - echo $0 isn't on IRC right now. + //echo $0 isn't on IRC right now. } }{ echo usage: /freln [fake nick] [nick/channel to send to] [fake notice]} diff /home/zwhite/amn.orig/modules/shitlist/shitlist.m /home/zwhite/amn/modules/shitlist/shitlist.m --- /home/zwhite/amn.orig/modules/shitlist/shitlist.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/modules/shitlist/shitlist.m Mon Oct 10 18:53:43 2005 @@ -34,7 +34,7 @@ @ shithost = input1 }{ if (!getuhost($input1)) { - echo $banner $input1 is not on irc! + //echo $banner $input1 is not on irc! }{ @ shithost1 = sar(g/~/\*/$getuhost($input1)) @ shitnick = [$input1] @@ -48,7 +48,7 @@ @ setitem(shitlist 0 !) @ setitem(shitlist $numitems(shitlist) $shithost $schan $slevel) @ setitem(shitreas $numitems(shitreas) $sreason) - echo $banner added $shithost $schan $slevel $sreason + //echo $banner added $shithost $schan $slevel $sreason if (slevel == 3) { fe ($chanusers($schan)) n1 { if (rmatch($n1!$userhost($n1) $shithost) > 0) { @@ -63,7 +63,7 @@ alias shitlist { if (numitems(shitlist)<2) { - echo $banner the shitlist is empty! + //echo $banner the shitlist is empty! }{ xecho [num] [shithost ] [shitchan [lev] [reason ] for (@xx=1, xx + //echo $banner usage: /shitdel } alias shitload { diff /home/zwhite/amn.orig/modules/userlist/userlist.m /home/zwhite/amn/modules/userlist/userlist.m --- /home/zwhite/amn.orig/modules/userlist/userlist.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/modules/userlist/userlist.m Mon Oct 10 18:53:43 2005 @@ -32,18 +32,18 @@ alias adduser { if (![$1]) { - echo ------------------------------------------------------------------ - echo syntax: /adduser [nick|ident@host] #channel userlevel1,userlevel2, - echo userlevel3 ... password - echo valid userlevels are ops iops invite voice deop - echo ------------------------------------------------------------------ + //echo ------------------------------------------------------------------ + //echo syntax: /adduser [nick|ident@host] #channel userlevel1,userlevel2, + //echo userlevel3 ... password + //echo valid userlevels are ops iops invite voice deop + //echo ------------------------------------------------------------------ }{ @ :input1 = [$0] if (ismask($input1)) { @ friendhost = input1 } else { - if (!getuhost($input1)) { echo $banner $input1 is not on irc! }{ + if (!getuhost($input1)) { //echo $banner $input1 is not on irc! }{ @ friendhost = sar(g/~/\*/$getuhost($input1)) @ friendnick = [$input1] }} @@ -99,13 +99,13 @@ alias userdel if ([$0]) { if (numitems(friends)<=[$0]) { - echo $banner no such user! + //echo $banner no such user! }{ xecho -b deleted userlist entry $getitem(friends $0) @ delitem(friends $0) } }{ - echo $banner usage: /deluser + //echo $banner usage: /deluser } alias userload { diff /home/zwhite/amn.orig/modules/vanilla/vanilla.m /home/zwhite/amn/modules/vanilla/vanilla.m --- /home/zwhite/amn.orig/modules/vanilla/vanilla.m Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/modules/vanilla/vanilla.m Mon Oct 10 18:53:43 2005 @@ -1,7 +1,14 @@ # Copyright (c) 2003-2005 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # Make amnesiac behave a bit more like default epic with tc and netsplit -# loaded, just the way skullY likes it +# loaded, just the way skullY likes it. subpackage vanilla @ bindctl(sequence ^D set parse_command listsplit) +@ bindctl(sequence ^E set end_of_line) +@ bindctl(sequence ^P set parse_command window prev) +@ bindctl(map ^W clear) + +window -1 level ALL + +alias echo xecho -v $* diff /home/zwhite/amn.orig/themes/vanilla.th /home/zwhite/amn/themes/vanilla.th --- /home/zwhite/amn.orig/themes/vanilla.th Mon Oct 10 18:52:11 2005 +++ /home/zwhite/amn/themes/vanilla.th Mon Oct 10 18:53:43 2005 @@ -23,6 +23,7 @@ @sctcpform=12 @echostr=54 @ncomp=15 +@nickform=16 @svform=19 @snf=5 @wallform=12 Date: Mon, 10 Oct 2005 21:40:48 +0000 From: Zach White Audit uses of xecho -v, should only be used when the output really does need to goto current window. Fix some echo's I missed. diff /home/zwhite/amn.orig/CHANGES /home/zwhite/amn/CHANGES --- /home/zwhite/amn.orig/CHANGES Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/CHANGES Mon Oct 10 21:40:03 2005 @@ -203,7 +203,8 @@ 10.10.05 -big cleanup to tab.m. Remove old useless crap and insert the msg tab completion into our new switch. the old command_completion is now ripped out since it's marked obsolete and hasnt worked at all in epic5. //kreca - -2005 Oct 10 -Change all instances of echo to //echo, to allow echo to be aliased. //skullY --vanilla.m: alias echo to output ot the current window. +-vanilla.m: alias echo to output to the current window. //skullY +-audit all uses of xecho -v. Should only be used on things that really need + to goto the current window. Users that use window level none everywhere won't + notice any difference. //skullY diff /home/zwhite/amn.orig/core/alias.m /home/zwhite/amn/core/alias.m --- /home/zwhite/amn.orig/core/alias.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/alias.m Mon Oct 10 20:25:31 2005 @@ -136,15 +136,15 @@ alias indent orw alias orw { ^set -output_rewrite - ^set output_rewrite $_paste($1-)$1- - xecho -v [a+c] output indent set to "on" + ^set output_rewrite $_paste($1-) $1- + xecho -b output indent set to "on" } alias wrap orww alias orww { ^set -output_rewrite ^set output_rewrite $_paste($1-)$1- - xecho -v [a+c] output linewrap set to "on" + xecho -b output linewrap set to "on" } ## end output_rewrite sillyness. diff /home/zwhite/amn.orig/core/bans.m /home/zwhite/amn/core/bans.m --- /home/zwhite/amn.orig/core/bans.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/bans.m Mon Oct 10 20:55:43 2005 @@ -110,24 +110,24 @@ } alias kob { if (![$0]) { - xecho -v [a+c] kick on ban set to "$kickonban"} + xecho -v -b kick on ban set to "$kickonban"} if (match($0 on off)) {@kickonban = [$0] - xecho -v [a+c] kick on ban set to "$kickonban" + xecho -v -b kick on ban set to "$kickonban" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -v -b invalid choice } } } alias kops { if (![$0]) { - xecho -v [a+c] kick ops on ban set to "$kickops"} + xecho -v -b kick ops on ban set to "$kickops"} if (match($0 on off)) {@kickops = [$0] - xecho -v [a+c] kick ops on ban set to "$kickops" + xecho -v -b kick ops on ban set to "$kickops" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -v -b invalid choice } } diff /home/zwhite/amn.orig/core/dcc.m /home/zwhite/amn/core/dcc.m --- /home/zwhite/amn.orig/core/dcc.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/dcc.m Mon Oct 10 21:35:17 2005 @@ -31,7 +31,7 @@ ## hooks. on ^211 * { - xecho -v -b $1: Sent: ${[$4]/1024}MB Received: ${[$6]/1024}MB SendQ: $2 Connected for: $tdiff2($7) Idle: $8 [$9-] + xecho -b $1: Sent: ${[$4]/1024}MB Received: ${[$6]/1024}MB SendQ: $2 Connected for: $tdiff2($7) Idle: $8 [$9-] } ^on #-leave 123 "% % *" { @@ -42,8 +42,8 @@ on -dcc_request "% CHAT *" { push dccchats $0 - xecho -v [a+c] DCC $0 has sent a dcc chat request. - xecho -v [a+c] DCC Press alt-T to respond or alt-R to reject from $0. + xecho -b DCC $0 has sent a dcc chat request. + xecho -b DCC Press alt-T to respond or alt-R to reject from $0. } alias dcc.get { @@ -57,7 +57,7 @@ on #-dcc_request 22 "% SEND*" { @dccnick = [$0] @dccfile = [$5] - xecho -v [a+c] press ctrl-T to accept file or ctrl-R to reject + xecho -b press ctrl-T to accept file or ctrl-R to reject } on #-dcc_request 23 "% SEND*" { @@ -65,7 +65,7 @@ @dccfile = [$5] if (autoget == [on]) { ^dcc get $dccnick - xecho -v [a+c] autogetting dcc $dccfile from $dccnick + xecho -b autogetting dcc $dccfile from $dccnick } } @@ -77,14 +77,14 @@ alias dccag { if (![$0]) { - xecho -v [a+c] dcc autoget set to $toupper($autoget) + xecho -b dcc autoget set to $toupper($autoget) } if (match($0 on off)) { @autoget = [$0] - xecho -v [a+c] dcc autoget set to $toupper($autoget) + xecho -b dcc autoget set to $toupper($autoget) }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } @@ -93,25 +93,25 @@ alias dcchelp { if (!$[0]) { -echo ---------------------= Dcc Help =------------------------------ -echo chat /chat [-p portnum] will send or accept a dcc chat -echo to specified nick -p port is optional. -echo nochat /nochat will close/deny a dcc chat session to -echo specified nick. -echo send /send will send specified nick specified -echo filename. -echo get /get will grab file from specified nick. -echo dcc /dcc will list current dcc sessions if any. -echo dca /dca will kill all dcc sessions. -echo dcs /dcs will close file transfer from specified nick. -echo dcx /dcx will close chat session to specified nick. -echo dcn /dcn will close any dcc sessions to specified nick. -echo ---------------------= dcc keybinds =---------------------------- -echo alt-r : will reject dcc chat request. -echo alt-t : will accept dcc chat request. -echo ctrl-t : will accept dcc file/send request. -echo ctrl-r : will reject dcc file/send request. -echo ------------------------------------------------------------------ +//echo ---------------------= Dcc Help =------------------------------ +//echo chat /chat [-p portnum] will send or accept a dcc chat +//echo to specified nick -p port is optional. +//echo nochat /nochat will close/deny a dcc chat session to +//echo specified nick. +//echo send /send will send specified nick specified +//echo filename. +//echo get /get will grab file from specified nick. +//echo dcc /dcc will list current dcc sessions if any. +//echo dca /dca will kill all dcc sessions. +//echo dcs /dcs will close file transfer from specified nick. +//echo dcx /dcx will close chat session to specified nick. +//echo dcn /dcn will close any dcc sessions to specified nick. +//echo ---------------------= dcc keybinds =---------------------------- +//echo alt-r : will reject dcc chat request. +//echo alt-t : will accept dcc chat request. +//echo ctrl-t : will accept dcc file/send request. +//echo ctrl-r : will reject dcc file/send request. +//echo ------------------------------------------------------------------ } } diff /home/zwhite/amn.orig/core/ehelp.m /home/zwhite/amn/core/ehelp.m --- /home/zwhite/amn.orig/core/ehelp.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/ehelp.m Mon Oct 10 21:34:39 2005 @@ -5,7 +5,7 @@ alias ehelp { if (!$[0]) { -echo -------------------------= Extended Help =---------------------------- +//echo -------------------------= Extended Help =---------------------------- //echo uhelp <userlist help> userlist help menu. [module] //echo shelp <shitlist help> shitlist help menu. [module] @@ -23,7 +23,7 @@ //echo dcchelp <dcc help> dcc usage/binds help menu. [core] //echo smhelp <special modes> exempt modes cmds help menu. [core] //echo thelp <trickle help> the irc swiss army knife menu. [core] -echo ---------------------------------------------------------------------- +//echo ---------------------------------------------------------------------- } } @@ -32,24 +32,24 @@ alias genhelp { if (!$[0]) { -echo ---------------------= General Usage Help =------------------------- -echo ign /ign [nick|nick!ident@host] [type] will ignore someone -echo type: can be 1 or more options of notice,msg,dcc,crap,public,all -echo tig /tig # removes specified ignore. -echo cig /cig to ignore public from current or specified channel. -echo umode /umode changes user mode. -echo ircname /ircname will change your realname on next connect. -echo arejoin /arejoin will toggle auto_rejoin on/off -echo aww /aww will toggle auto_whowas on/off -echo topic /topic will insert current topic for editing. -echo away /away set yourself away. -echo back /back set yourself back. -echo readlog /readlog reads away msgs. [requires away module] -echo remlog /remlog erase away msgs. [requires away module] -echo orignick /orignick will attempt to regain(jupe) specified nick -echo every 3 seconds(default) unless you specify time in /config. [orignick module] -echo staynick /staynick will cancel /orignick [orignick module] -echo --------------------------------------------------------------------- +//echo ---------------------= General Usage Help =------------------------- +//echo ign /ign [nick|nick!ident@host] [type] will ignore someone +//echo type: can be 1 or more options of notice,msg,dcc,crap,public,all +//echo tig /tig # removes specified ignore. +//echo cig /cig to ignore public from current or specified channel. +//echo umode /umode changes user mode. +//echo ircname /ircname will change your realname on next connect. +//echo arejoin /arejoin will toggle auto_rejoin on/off +//echo aww /aww will toggle auto_whowas on/off +//echo topic /topic will insert current topic for editing. +//echo away /away set yourself away. +//echo back /back set yourself back. +//echo readlog /readlog reads away msgs. [requires away module] +//echo remlog /remlog erase away msgs. [requires away module] +//echo orignick /orignick will attempt to regain(jupe) specified nick +//echo every 3 seconds(default) unless you specify time in /config. [orignick module] +//echo staynick /staynick will cancel /orignick [orignick module] +//echo --------------------------------------------------------------------- } } @@ -58,31 +58,31 @@ alias lfhelp { if (!$[0]) { -echo --------------------= Amnesiac Look/Feel Help =--------------------------- -echo config /config will list currently available configuration options -echo /config will change the specified option. -echo theme /theme will display available themes and you can choose which -echo one you want syn: /theme -echo format /format will display available format -echo /format will choose the specified format -echo sbcolor /sbcolor changes sbar colors -echo to desired colors. -echo color /color changes color to -echo desired colors. -echo tsave /tsave will create a theme. -echo untheme /untheme will make amnesiac revert back to the default theme. +//echo --------------------= Amnesiac Look/Feel Help =--------------------------- +//echo config /config will list currently available configuration options +//echo /config will change the specified option. +//echo theme /theme will display available themes and you can choose which +//echo one you want syn: /theme +//echo format /format will display available format +//echo /format will choose the specified format +//echo sbcolor /sbcolor changes sbar colors +//echo to desired colors. +//echo color /color changes color to +//echo desired colors. +//echo tsave /tsave will create a theme. +//echo untheme /untheme will make amnesiac revert back to the default theme. input_char "menu paused hit the ANY key to continue " pause -echo fset /fset format_choice will change specified format. -echo fkeys /fkeys shows which fkeys are bound to which and can be changed by -echo by /fkey 1 /fkey 2 -echo sbar /sbar changes sbar to desired number. -echo mw /mw -hidden|split|kill -echo extpub /extpub and <+nick> in public. -echo indent /indent will indent on newline as opposed to linewrap. -echo wrap /wrap will linewrap msgs/publics etc.. on newline <-- this is -echo the default behavior. -echo ---------------------------------------------------------------------------- +//echo fset /fset format_choice will change specified format. +//echo fkeys /fkeys shows which fkeys are bound to which and can be changed by +//echo by /fkey 1 /fkey 2 +//echo sbar /sbar changes sbar to desired number. +//echo mw /mw -hidden|split|kill +//echo extpub /extpub and <+nick> in public. +//echo indent /indent will indent on newline as opposed to linewrap. +//echo wrap /wrap will linewrap msgs/publics etc.. on newline <-- this is +//echo the default behavior. +//echo ---------------------------------------------------------------------------- } } @@ -90,23 +90,23 @@ alias chelp { if (!$[0]) { -echo ---------------------= Amnesiac Config Shortcuts =----------------------- -echo cumode /cumode will set default usermode on connect. -echo stamp /stamp -echo modeshow /modeshow and <+nick> in public. -echo extpub /extpub same as /modeshow -echo resp /resp will highlight nick when specified word is said in -echo public. /resp /resp2 /resp3 /resp4 -echo kops /kops -echo kob /kob -echo otime /otime -echo awayt /awayt -echo tform /tform will display available timestamp formats and you can -echo choose which one you want syn: /tform -echo autoget /autoget will attempt to grab files sent to you automatically. -echo bantype /bantype when a ban is done on a nick -echo it uses -echo ------------------------------------------------------------------------- +//echo ---------------------= Amnesiac Config Shortcuts =----------------------- +//echo cumode /cumode will set default usermode on connect. +//echo stamp /stamp +//echo modeshow /modeshow and <+nick> in public. +//echo extpub /extpub same as /modeshow +//echo resp /resp will highlight nick when specified word is said in +//echo public. /resp /resp2 /resp3 /resp4 +//echo kops /kops +//echo kob /kob +//echo otime /otime +//echo awayt /awayt +//echo tform /tform will display available timestamp formats and you can +//echo choose which one you want syn: /tform +//echo autoget /autoget will attempt to grab files sent to you automatically. +//echo bantype /bantype when a ban is done on a nick +//echo it uses +//echo ------------------------------------------------------------------------- } } diff /home/zwhite/amn.orig/core/eimodes.m /home/zwhite/amn/core/eimodes.m --- /home/zwhite/amn.orig/core/eimodes.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/eimodes.m Mon Oct 10 21:35:25 2005 @@ -225,22 +225,22 @@ alias rathelp { if (!$[0]) { -echo -----------------= Special Modes Help =---------------------------- -echo tpi /tpi invite exempt menu -I ie: /tpi 3-6 removes -echo invite exempts 3 4 5 and 6 shown in the menu. -echo tpe /tpe ban exempt menu +e ie: /tpe 4 to remove one exempt. -echo ui /ui clears the invite exempts in current chan -IIII. -echo ue /ue clears the ban exempts in current chan -eeee. -echo i /i shows the invite exempts in current chan if any. -echo e /e shows the ban exempts in current chan if any. -echo +i /+i add a invite exempt in current chan ie: /+i *!test@test.com -echo +e /+e add a ban exempt in current chan ie: /+e *!ident@host.com -echo -----= Other Aliases =---- -echo pinv /pinv - same as /ui cleans invite exempt list. -echo pexp /pexp - same as /ue cleans ban exempt list. -echo tinv /tinv - same as /tpi invite exempt menu. -echo texp /texp - same as /tpe ban exempt menu. -echo --------------------------------------------------------------------- +//echo -----------------= Special Modes Help =---------------------------- +//echo tpi /tpi invite exempt menu -I ie: /tpi 3-6 removes +//echo invite exempts 3 4 5 and 6 shown in the menu. +//echo tpe /tpe ban exempt menu +e ie: /tpe 4 to remove one exempt. +//echo ui /ui clears the invite exempts in current chan -IIII. +//echo ue /ue clears the ban exempts in current chan -eeee. +//echo i /i shows the invite exempts in current chan if any. +//echo e /e shows the ban exempts in current chan if any. +//echo +i /+i add a invite exempt in current chan ie: /+i *!test@test.com +//echo +e /+e add a ban exempt in current chan ie: /+e *!ident@host.com +//echo -----= Other Aliases =---- +//echo pinv /pinv - same as /ui cleans invite exempt list. +//echo pexp /pexp - same as /ue cleans ban exempt list. +//echo tinv /tinv - same as /tpi invite exempt menu. +//echo texp /texp - same as /tpe ban exempt menu. +//echo --------------------------------------------------------------------- } } diff /home/zwhite/amn.orig/core/fkey.m /home/zwhite/amn/core/fkey.m --- /home/zwhite/amn.orig/core/fkey.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/fkey.m Mon Oct 10 20:27:29 2005 @@ -13,117 +13,117 @@ switch ($0) { (1) { if (![$1]) { - xecho -v [a+c] function key 1 set to $fke1 + xecho -b function key 1 set to $fke1 }{ @fke1 = [$1-] ^bind ^[[11~ parse_command $fke1 ^bind ^[[[A parse_command $fke1 ^bind ^[OP parse_command $fke1 - xecho -v [a+c] function key 1 set to $fke1 + xecho -b function key 1 set to $fke1 } } (2) { if (![$1]) { - xecho -v [a+c] function key 2 set to $fke2 + xecho -b function key 2 set to $fke2 }{ @fke2 = [$1-] ^bind ^[[12~ parse_command $fke2 ^bind ^[[[B parse_command $fke2 ^bind ^[OQ parse_command $fke2 - xecho -v [a+c] function key 2 set to $fke2 + xecho -b function key 2 set to $fke2 } } (3) { if (![$1]) { - xecho -v [a+c] function key 3 set to $fke3 + xecho -b function key 3 set to $fke3 }{ @fke3 = [$1-] ^bind ^[[13~ parse_command $fke3 ^bind ^[[[C parse_command $fke3 ^bind ^[OR parse_command $fke3 - xecho -v [a+c] function key 3 set to $fke3 + xecho -b function key 3 set to $fke3 } } (4) { if (![$1]) { - xecho -v [a+c] function key 4 set to $fke4 + xecho -b function key 4 set to $fke4 }{ @fke4 = [$1-] ^bind ^[[14~ parse_command $fke4 ^bind ^[[[D parse_command $fke4 ^bind ^[OS parse_command $fke4 - xecho -v [a+c] function key 4 set to $fke4 + xecho -b function key 4 set to $fke4 }} (5) { if (![$1]) { - xecho -v [a+c] function key 5 set to $fke5 + xecho -b function key 5 set to $fke5 }{ @fke5 = [$1-] ^bind ^[[15~ parse_command $fke5 ^bind ^[[[E parse_command $fke5 - xecho -v [a+c] function key 5 set to $fke5 + xecho -b function key 5 set to $fke5 }} (6) { if (![$1]) { - xecho -v [a+c] function key 6 set to $fke6 + xecho -b function key 6 set to $fke6 }{ @fke6 = [$1-] ^bind ^[[17~ parse_command $fke6 - xecho -v [a+c] function key 6 set to $fke6 + xecho -b function key 6 set to $fke6 }} (7) { if (![$1]) { - xecho -v [a+c] function key 7 set to $fke7 + xecho -b function key 7 set to $fke7 }{ @fke7 = [$1-] ^bind ^[[18~ parse_command $fke7 - xecho -v [a+c] function key 7 set to $fke7 + xecho -b function key 7 set to $fke7 }} (8) { if (![$1]) { - xecho -v [a+c] function key 8 set to $fke8 + xecho -b function key 8 set to $fke8 }{ @fke8 = [$1-] ^bind ^[[19~ parse_command $fke8 - xecho -v [a+c] function key 8 set to $fke8 + xecho -b function key 8 set to $fke8 }} (9) { if (![$1]) { - xecho -v [a+c] function key 9 set to $fke9 + xecho -b function key 9 set to $fke9 }{ @fke9 = [$1-] ^bind ^[[20~ parse_command $fke9 - xecho -v [a+c] function key 9 set to $fke9 + xecho -b function key 9 set to $fke9 }} (10) { if (![$1]) { - xecho -v [a+c] function key 10 set to $fke10 + xecho -b function key 10 set to $fke10 }{ @fke10 = [$1-] ^bind ^[[21~ parse_command $fke10 - xecho -v [a+c] function key 10 set to $fke10 + xecho -b function key 10 set to $fke10 }} (11) { if (![$1]) { - xecho -v [a+c] function key 11 set to $fke11 + xecho -b function key 11 set to $fke11 }{ @fke11 = [$1-] ^bind ^[[23~ parse_command $fke11 - xecho -v [a+c] function key 11 set to $fke11 + xecho -b function key 11 set to $fke11 }} (12) { if (![$1]) { - xecho -v [a+c] function key 12 set to $fke12 + xecho -b function key 12 set to $fke12 }{ @fke12 = [$1-] ^bind ^[[24~ parse_command $fke12 - xecho -v [a+c] function key 12 set to $fke12 + xecho -b function key 12 set to $fke12 }} } } diff /home/zwhite/amn.orig/core/format.m /home/zwhite/amn/core/format.m --- /home/zwhite/amn.orig/core/format.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/format.m Mon Oct 10 20:32:25 2005 @@ -46,10 +46,10 @@ if (isnumber($0)&&[$0] to set msg format - xecho -v -b current format set to $mform + xecho -b /format a to set msg format + xecho -b current format set to $mform @format_msg = getitem(mform $mform) } @@ -73,10 +73,10 @@ if (isnumber($0)&&[$0] to set send msg format - xecho -v -b current format set to $smform + xecho -b /format b to set send msg format + xecho -b current format set to $smform @format_send_msg=getitem(smform $smform) } @@ -102,10 +102,10 @@ if (isnumber($0)&&[$0] to set public format - xecho -v -b current format set to $pubform + xecho -b /format c to set public format + xecho -b current format set to $pubform @format_public=getitem(pubform $pubform) } @@ -131,10 +131,10 @@ if (isnumber($0)&&[$0] to set send public format - xecho -v -b current format set to $spubform + xecho -b /format d to set send public format + xecho -b current format set to $spubform @format_send_public=getitem(spubform $spubform) } @@ -160,10 +160,10 @@ if (isnumber($0)&&[$0] to set public other format - xecho -v -b current format set to $spuboform + xecho -b /format e to set public other format + xecho -b current format set to $spuboform @format_public_other=getitem(spuboform $spuboform) } @@ -190,10 +190,10 @@ if (isnumber($0)&&[$0] to set signoff format - xecho -v -b current format set to $signform + xecho -b /format f to set signoff format + xecho -b current format set to $signform @format_signoff=getitem(signform $signform) } @@ -220,10 +220,10 @@ if (isnumber($0)&&[$0] to set join format - xecho -v -b current format set to $joinform + xecho -b /format g to set join format + xecho -b current format set to $joinform @format_join=getitem(joinform $joinform) } @@ -250,10 +250,10 @@ if (isnumber($0)&&[$0] to set leaveoff format - xecho -v -b current format set to $leaveform + xecho -b /format h to set leaveoff format + xecho -b current format set to $leaveform @format_leave=getitem(leaveform $leaveform) } @@ -279,10 +279,10 @@ if (isnumber($0)&&[$0] to set modeoff format - xecho -v -b current format set to $modeform + xecho -b /format i to set modeoff format + xecho -b current format set to $modeform @format_mode=getitem(modeform $modeform) } @@ -308,10 +308,10 @@ if (isnumber($0)&&[$0] to set notice format - xecho -v -b current format set to $notform + xecho -b /format j to set notice format + xecho -b current format set to $notform @format_notice = getitem(notform $notform) } alias pubnotform if ([$0]) { if (isnumber($0)&&[$0] to set public notice format - xecho -v -b current format set to $pubnotform + xecho -b /format z to set public notice format + xecho -b current format set to $pubnotform @format_public_notice=getitem(pubnotform $pubnotform) } @@ -364,10 +364,10 @@ if (isnumber($0)&&[$0] to set send notice format - xecho -v -b current format set to $snotform + xecho -b /format k to set send notice format + xecho -b current format set to $snotform @format_send_notice=getitem(snotform $snotform) } @@ -395,10 +395,10 @@ if (isnumber($0)&&[$0] to set send dcc chat format - xecho -v -b current format set to $sdcform + xecho -b /format l to set send dcc chat format + xecho -b current format set to $sdcform @ format_send_dcc_chat = getitem(sdcform $sdcform) } @@ -425,10 +425,10 @@ if (isnumber($0)&&[$0] to set dcc chat format - xecho -v -b current format set to $dcform + xecho -b /format m to set dcc chat format + xecho -b current format set to $dcform @format_dcc_chat=getitem(dcform $dcform) } @@ -455,10 +455,10 @@ if (isnumber($0)&&[$0] to set topic format - xecho -v -b current format set to $topform + xecho -b /format n to set topic format + xecho -b current format set to $topform @format_topic=getitem(topform $topform) } @@ -485,10 +485,10 @@ if (isnumber($0)&&[$0] to set ctcp format - xecho -v -b current format set to $ctcpform + xecho -b /format o to set ctcp format + xecho -b current format set to $ctcpform @format_ctcp=getitem(ctcpform $ctcpform) } @@ -516,10 +516,10 @@ if (isnumber($0)&&[$0] to set send ctcp format - xecho -v -b current format set to $sctcpform + xecho -b /format p to set send ctcp format + xecho -b current format set to $sctcpform @format_send_ctcp=getitem(sctcpform $sctcpform) } @@ -547,11 +547,11 @@ if (isnumber($0)&&[$0] to set echostr - xecho -v -b current format set to $echostr + xecho -b /format q to set echostr + xecho -b current format set to $echostr } alias ncomp if ([$0]) { if (isnumber($0)&&[$0]%n") kreca$format_nick_comp hi! - xecho -v -b this is your new nick completion, /fsave to save. + xecho -b this is your new nick completion, /fsave to save. @ncomp = [$0] }{ - xecho -v -b please make a valid selection. + xecho -b please make a valid selection. } }{ ncomp.show @@ -594,10 +594,10 @@ alias ncomp.show { for (@nc=1, nc < numitems(ncomp), @nc++) { @format_nick_comp=getitem(ncomp $nc) - xecho -v -b $Cparse("%K[%n$([2]nc)%K]%n %K<%ncrapple%K>%n") kreca$format_nick_comp hi! + xecho -b $Cparse("%K[%n$([2]nc)%K]%n %K<%ncrapple%K>%n") kreca$format_nick_comp hi! } - xecho -v -b /format r to set nick completion - xecho -v -b current format set to $ncomp + xecho -b /format r to set nick completion + xecho -b current format set to $ncomp @format_nick_comp=getitem(ncomp $ncomp) } @@ -606,10 +606,10 @@ if (isnumber($0)&&[$0] to set version format - xecho -v -b current format set to $svform + xecho -b /format s to set version format + xecho -b current format set to $svform @format_sv=getitem(svform $svform) } @@ -638,11 +638,11 @@ @format_wall=getitem(wallform $0) @format_bwall=getitem(bwallform $0) //echo $fparse(format_wall crapple #amnesiac hi) - xecho -v -b this is your new wall format, /fsave to save. + xecho -b this is your new wall format, /fsave to save. @wallform = [$0] @bwallform = [$0] }{ - xecho -v -b please make a valid selection. + xecho -b please make a valid selection. } }{ wallform.show @@ -660,10 +660,10 @@ for (@mm=1, mm < numitems(wallform), @mm++) { @format_wall = getitem(wallform $mm) @format_bwall = getitem(bwallform $mm) - xecho -v -b $Cparse(%K[%n$mm%K]%n) $fparse(format_wall crapple #amnesiac hi) + xecho -b $Cparse(%K[%n$mm%K]%n) $fparse(format_wall crapple #amnesiac hi) } - xecho -v -b /format v to set wall format - xecho -v -b current format set to $wallform + xecho -b /format v to set wall format + xecho -b current format set to $wallform @format_wall=getitem(wallform $wallform) @format_bwall=getitem(bwallform $bwallform) } @@ -672,10 +672,10 @@ if (isnumber($0)&&[$0] to set away format - xecho -v -b current format set to $awayform + xecho -b /format w to set away format + xecho -b current format set to $awayform @format_away = getitem(awayform $awayform) } alias actform if ([$0]) { @@ -703,11 +703,11 @@ @format_action_other=getitem(actoform $0) //echo $fparse(format_action crapple #amnesiac hi) //echo $fparse(format_action_other crapple #amnesiac hi) - xecho -v -b this is your new action format, /fsave to save. + xecho -b this is your new action format, /fsave to save. @actform = [$0] @actoform = [$0] }{ - xecho -v -b please make a valid selection. + xecho -b please make a valid selection. } }{ actform.show @@ -725,12 +725,12 @@ for (@mm=1, mm < numitems(actform), @mm++) { @format_action=getitem(actform $mm) @format_action_other=getitem(actoform $mm) - xecho -v -b $Cparse(%K[%n$mm%K]%n) $fparse(format_action crapple #amnesiac hi) - xecho -v -b $fparse(format_action_other crapple #amnesiac hi) + xecho -b $Cparse(%K[%n$mm%K]%n) $fparse(format_action crapple #amnesiac hi) + xecho -b $fparse(format_action_other crapple #amnesiac hi) } - xecho -v -b /format x to set action format - xecho -v -b current format set to $actform + xecho -b /format x to set action format + xecho -b current format set to $actform @format_action=getitem(actform $actform) @format_action_other=getitem(actoform $actoform) } @@ -740,11 +740,11 @@ @format_send_desc=getitem(sdescform $0) //echo $fparse(format_desc crapple blah hi) //echo $fparse(format_send_desc crapple #amnesiac hi) - xecho -v -b this is your new describe format, /fsave to save. + xecho -b this is your new describe format, /fsave to save. @descform = [$0] @sdescform = [$0] }{ - xecho -v -b please make a valid selection. + xecho -b please make a valid selection. } }{ xdescform.show @@ -762,12 +762,12 @@ for (@mm=1, mm < numitems(descform), @mm++) { @format_desc = getitem(descform $mm) @format_send_desc = getitem(sdescform $mm) - xecho -v -b $Cparse(%K[%n$mm%K]%n) $fparse(format_desc crapple blah hi) - xecho -v -b $fparse(format_send_desc crapple #amnesiac hi) + xecho -b $Cparse(%K[%n$mm%K]%n) $fparse(format_desc crapple blah hi) + xecho -b $fparse(format_send_desc crapple #amnesiac hi) } - xecho -v -b /format y to set describe format - xecho -v -b current format set to $descform + xecho -b /format y to set describe format + xecho -b current format set to $descform @format_desc=getitem(descform $descform) @format_send_desc=getitem(sdescform $sdescform) @@ -778,11 +778,11 @@ @format_who_footer=getitem(whofootform $0) //echo $fparse(format_who #amnesiac skullY H@ zwhite front.arpa.org irc.servercentral.net 0 The Work is Done and Then Forgotten) //echo $fparse(format_who_footer irc.servercentral.net skully :End of /WHO list. - xecho -v -b this is your new who format, /fsave to save. + xecho -b this is your new who format, /fsave to save. @whoform = [$0] @whofootform = [$0] }{ - xecho -v -b please make a valid selection. + xecho -b please make a valid selection. } }{ whoform.show @@ -799,11 +799,11 @@ alias whoform.show { for (@mm=1, mm < numitems(whoform), @mm++) { @format_who=getitem(whoform $mm) - xecho -v $Cparse(%K[%n$mm%K]%n) $fparse(format_who #amnesiac skullY H@ zwhite front.arpa.org irc.servercentral.net 0 The Work is Done and Then Forgotten) + xecho -b $fparse(format_who #amnesiac skullY H@ zwhite front.arpa.org irc.servercentral.net 0 The Work is Done and Then Forgotten) } - xecho -v -- /format 2 to set who format - xecho -v current format set to $whoform + xecho -b /format 2 to set who format + xecho -b format set to $whoform @format_who=getitem(whoform $whoform) } @@ -812,10 +812,10 @@ if (isnumber($0)&&[$0] to set nick change format - xecho -v -b current format set to $nickform + xecho -b /format u to set nick change format + xecho -b current format set to $nickform @format_nickname=getitem(nickform $nickform) } @@ -841,10 +841,10 @@ if (isnumber($0)&&[$0]%n timestamp in public format example.) + xecho -b $Cparse(%K[%n$mm%K]%n) $fparse(format_timestamp_some)$cparse(%m<%ncrapple%m>%n timestamp in public format example.) } - xecho -v -b /format 3 to set time stamp format - xecho -v -b current format set to $timeform + xecho -b /format 3 to set time stamp format + xecho -b current format set to $timeform @format_timestamp_some=getitem(timeform $timeform) } @@ -869,10 +869,10 @@ if (isnumber($0)&&[$0] to set kick format - xecho -v -b current format set to $kickform + xecho -b /format 4 to set kick format + xecho -b current format set to $kickform @format_kick=getitem(kickform $kickform) } diff /home/zwhite/amn.orig/core/fsets.m /home/zwhite/amn/core/fsets.m --- /home/zwhite/amn.orig/core/fsets.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/fsets.m Mon Oct 10 20:56:39 2005 @@ -7,16 +7,16 @@ if ([$0]) { if (!pattern(*$0* $fwords)) { banner.lchead - banner.mid [a+c] $0 format not found + banner.mid $banner $0 format not found banner.lcfoot }{ if (pattern(*$0* $fwords) && [$1]) { @format_choice=[$after(_ $0)] @format_$after(_ $0)=[$1-] - xecho -v [a+c] fset $0 changed to $1- + xecho -b fset $0 changed to $1- }{ fe ($pattern(*$0* $fwords)) a1 { - xecho -v [a+c] $[31]a1 ...... $($a1) + xecho -b $[31]a1 ...... $($a1) } } } @@ -170,39 +170,39 @@ on ^311 * { if (format_whois_header) { - xecho -v $fparse(format_whois_header) + xecho $fparse(format_whois_header) } - xecho -v $fparse(format_whois_nick $1 $2 $3 $5-) + xecho $fparse(format_whois_nick $1 $2 $3 $5-) if (format_whois_name) { - xecho -v $fparse(format_whois_name $5-) + xecho $fparse(format_whois_name $5-) } } -on ^319 * xecho -v $fparse(format_whois_channels $2-) -on ^312 * xecho -v $fparse(format_whois_server $2 $3-) -on ^301 * xecho -v $fparse(format_whois_away $1-) +on ^319 * xecho $fparse(format_whois_channels $2-) +on ^312 * xecho $fparse(format_whois_server $2 $3-) +on ^301 * xecho $fparse(format_whois_away $1-) on ^317 * { - xecho -v $fparse(format_whois_idle $2) - xecho -v $fparse(format_whois_signon $1 $stime($3)) + xecho $fparse(format_whois_idle $2) + xecho $fparse(format_whois_signon $1 $stime($3)) } on ^318 * { if (format_whois_footer) { - xecho -v $fparse(format_whois_footer) + xecho $fparse(format_whois_footer) } } on ^314 * { - xecho -v $fparse(format_whowas_header) - xecho -v $fparse(format_whowas_nick $1 $2 $3) - xecho -v $fparse(format_whowas_name $5-) + xecho $fparse(format_whowas_header) + xecho $fparse(format_whowas_nick $1 $2 $3) + xecho $fparse(format_whowas_name $5-) } on ^338 * { - xecho -v $fparse(format_whois_actual $*) + xecho $fparse(format_whois_actual $*) } on ^330 * { - xecho -v $fparse(format_whois_login $*) + xecho $fparse(format_whois_login $*) } on ^308 * { - xecho -v $fparse(format_whois_admin $1-) + xecho $fparse(format_whois_admin $1-) } on ^313 * { @@ -235,16 +235,16 @@ @ rcl.25 = ['s face is more plastic than flesh] $rcl[$rand(26)] ^randcl -xecho -v $fparse(format_whois_operator $1 $rcl[$rand(26)]) +xecho $fparse(format_whois_operator $1 $rcl[$rand(26)]) } ^on ^401 * { - xecho -v $fparse(format_whois_header) - xecho -v $fparse(format_whois_unknown $1) + xecho $fparse(format_whois_header) + xecho $fparse(format_whois_unknown $1) } ^on ^369 * { - xecho -v $fparse(format_whowas_footer) + xecho $fparse(format_whowas_footer) } ^on ^406 * { - xecho -v $fparse(format_whowas_header) - xecho -v $fparse(format_whowas_unknown $1) + xecho $fparse(format_whowas_header) + xecho $fparse(format_whowas_unknown $1) } diff /home/zwhite/amn.orig/core/help.m /home/zwhite/amn/core/help.m --- /home/zwhite/amn.orig/core/help.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/help.m Mon Oct 10 20:57:40 2005 @@ -133,11 +133,11 @@ if ([$0]) { if (!match($0 $hwords)) { banner.head - //echo [a+c] command: $0 not found + xecho -b command: $0 not found banner.foot }{ banner.head - //echo $cparse("$($*)") + //echo $cparse("$($*)") banner.foot } } diff /home/zwhite/amn.orig/core/lag.m /home/zwhite/amn/core/lag.m --- /home/zwhite/amn.orig/core/lag.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/lag.m Mon Oct 10 20:37:52 2005 @@ -37,7 +37,7 @@ alias do.pong { ^on #^pong 10 "*" { if ([$0] == svar ^^ [$0] == [$svar1]) { - xecho -v -b your lag to $0 is: ${time() - pblah} second(s) + xecho -b your lag to $0 is: ${time() - pblah} second(s) ^on #^pong 10 -"*" } } diff /home/zwhite/amn.orig/core/lusers.m /home/zwhite/amn/core/lusers.m --- /home/zwhite/amn.orig/core/lusers.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/lusers.m Mon Oct 10 20:38:15 2005 @@ -53,17 +53,17 @@ ^assign _lu.umd $2, ^set floating_point_math on # next two lines don't make the new math parser bitch. -skullY - xecho -v $(hblk)[$cparse($(c2)³)$(hblk)] $cparse($(c2)g)$cparse($(c1)lobal users)$(hblk).. $(cl)$[6]_lu.u max$(c.hk) $(cl)$[7]_lu.umd $cparse($(c1)\()$(cl)$_lu.i invisible, $_lu.o operators$cparse($(c1)\)) - xecho -v $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)l)$cparse($(c1)ocal users)$(hblk)... $(cl)$[6]_lu.lu max$(c.hk) $(cl)$[7]_lu.lumd $cparse($(c1)\()$(cl)$trunc(5 ${100 * (_lu.lu / _lu.u)})\%$cparse($(c1)\)) - xecho -v $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)s)$cparse($(c1)ervers)$(hblk)....... $(cl)$[6]_lu.s $cparse($(c1)\()$(cl)$trunc(2 ${_lu.u / _lu.s}) avg users per server$cparse($(c1)\)) - xecho -v $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)c)$cparse($(c1)hannels)$(hblk)...... $(cl)$[6]_lu.c $cparse($(c1)\()$(cl)$trunc(2 ${_lu.u / _lu.c}) avg users per channel$cparse($(c1)\)) + xecho $(hblk)[$cparse($(c2)³)$(hblk)] $cparse($(c2)g)$cparse($(c1)lobal users)$(hblk).. $(cl)$[6]_lu.u max$(c.hk) $(cl)$[7]_lu.umd $cparse($(c1)\()$(cl)$_lu.i invisible, $_lu.o operators$cparse($(c1)\)) + xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)l)$cparse($(c1)ocal users)$(hblk)... $(cl)$[6]_lu.lu max$(c.hk) $(cl)$[7]_lu.lumd $cparse($(c1)\()$(cl)$trunc(5 ${100 * (_lu.lu / _lu.u)})\%$cparse($(c1)\)) + xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)s)$cparse($(c1)ervers)$(hblk)....... $(cl)$[6]_lu.s $cparse($(c1)\()$(cl)$trunc(2 ${_lu.u / _lu.s}) avg users per server$cparse($(c1)\)) + xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)c)$cparse($(c1)hannels)$(hblk)...... $(cl)$[6]_lu.c $cparse($(c1)\()$(cl)$trunc(2 ${_lu.u / _lu.c}) avg users per channel$cparse($(c1)\)) } on ^250 * { - xecho -v $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)c)$cparse($(c1)onnect count)$(hblk)..$(cl)$4 $5 $6 $7 $9 + xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)c)$cparse($(c1)onnect count)$(hblk)..$(cl)$4 $5 $6 $7 $9 } on ^253 * { - xecho -v $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)u)$cparse($(c1)nknown)$(hblk)........$(cl)$1 $2 $3 + xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)u)$cparse($(c1)nknown)$(hblk)........$(cl)$1 $2 $3 } diff /home/zwhite/amn.orig/core/mod.m /home/zwhite/amn/core/mod.m --- /home/zwhite/amn.orig/core/mod.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/mod.m Mon Oct 10 21:35:35 2005 @@ -8,8 +8,8 @@ alias addmod { if (![$0]) { - xecho -v [a+c] syn: /addmod module1,module2,etc.. - xecho -v [a+c] valid modules are [$_modules] + xecho -b syn: /addmod module1,module2,etc.. + xecho -b valid modules are [$_modules] }{ @_ach=sar(g/,/ /$0) if ([$0]==[*]) { @@ -19,7 +19,7 @@ @setitem(_mods $numitems(_mods) $a1) ^load $(loadpath)modules/$(a1)/$(a1).m } - xecho -v [a+c] loaded modules $_modules + xecho -b loaded modules $_modules }{ fe ($_ach) n1 { if (match($n1 $_modules) > 0 && finditem(_mods $n1) < 0) { @@ -28,11 +28,11 @@ ^load $(loadpath)modules/$(n1)/$(n1).m ^push _mlist $n1 }{ - xecho -v [a+c] $n1 module not found or already loaded. + xecho -b $n1 module not found or already loaded. } } if (_mlist) { - xecho -v [a+c] $_mlist module(s) loaded. + xecho -b $_mlist module(s) loaded. } ^assign -_mlist } @@ -41,7 +41,7 @@ alias listmod { if (numitems(_mods) == 1) { - xecho -v [a+c] no modules current on list + xecho -b no modules current on list }{ eval aecho ----------------------= Modules Loaded =------------------ for (@xx=1, xx and <+nick> in public set to $0 + xecho -b showing <@nick> and <+nick> in public set to $0 }{ - xecho -v [a+c] extpub/modeshow set to $showop + xecho -b extpub/modeshow set to $showop } } diff /home/zwhite/amn.orig/core/more.m /home/zwhite/amn/core/more.m --- /home/zwhite/amn.orig/core/more.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/more.m Mon Oct 10 20:38:45 2005 @@ -24,7 +24,7 @@ @ done = 1 } { - xecho -v $ugh + xecho $ugh } } if (!done) @@ -37,13 +37,13 @@ @ fd = line = done = rows = pause = ugh = [] } { - xecho -b -v $0\: no such file. + xecho -b $0\: no such file. } } { - xecho -b -v syn: /more + xecho -b syn: /more } } #archon'96 -oof \ No newline at end of file +oof diff /home/zwhite/amn.orig/core/save.m /home/zwhite/amn/core/save.m --- /home/zwhite/amn.orig/core/save.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/save.m Mon Oct 10 20:39:21 2005 @@ -54,7 +54,7 @@ @write($savemt @_r3 = [$_r3]) @write($savemt @_r4 = [$_r4]) @close($savemt) - xecho -v [a+c] (core).. settings saved to $savefile + xecho -b (core).. settings saved to $savefile } @@ -112,7 +112,7 @@ @write($fsetsavemt ^sfset format_who_footer $format_who_footer) */ @close($fsetsavemt) - xecho -v [a+c] (core).. fset settings saved to $(savepath)$fsetsavefile + xecho -b (core).. fset settings saved to $(savepath)$fsetsavefile } alias fsave { @fsavefile=[$(savepath).a.fsave] @@ -156,7 +156,7 @@ @write($savemt @_whois = [$_whois]) @close($savemt) - xecho -v [a+c] (core).. format settings saved to $fsavefile + xecho -b (core).. format settings saved to $fsavefile } alias csave { @@ -174,7 +174,7 @@ @write($savemt @sc3 = [$sc3) @write($savemt @sc4 = [$sc4) @close($savemt) - xecho -v [a+c] (core).. color settings saved to $csavefile + xecho -b (core).. color settings saved to $csavefile } alias igsave { @@ -185,7 +185,7 @@ @ write($saveig ^ignore $_igmasks $igtype($_igmasks)) } @close($saveig) - xecho -v [a+c] (core).. ignores saved to $igsfile + xecho -b (core).. ignores saved to $igsfile } alias saveall { diff /home/zwhite/amn.orig/core/sbar.m /home/zwhite/amn/core/sbar.m --- /home/zwhite/amn.orig/core/sbar.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/sbar.m Mon Oct 10 20:39:38 2005 @@ -13,10 +13,10 @@ if (statbar == [stat.3]) { ^sip2 } - xecho -v -b $scriptname sbar set to $0 - xecho -v [a+c] type /asave to save status bar + xecho -b $scriptname sbar set to $0 + xecho -b type /asave to save status bar }{ - xecho -v [a+c] syn: /sbar <1-$(sbar.max)> current sbar is ${hwht}$after(. $statbar) + xecho -b syn: /sbar <1-$(sbar.max)> current sbar is ${hwht}$after(. $statbar) } oof diff /home/zwhite/amn.orig/core/scan.m /home/zwhite/amn/core/scan.m --- /home/zwhite/amn.orig/core/scan.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/scan.m Mon Oct 10 20:39:43 2005 @@ -206,6 +206,6 @@ (5) {@snf=5;^eval load ${loadpath}sc/scan.5} (6) {@snf=6;^eval load ${loadpath}sc/scan.6} } - xecho -v [a+c] scan format set to $(snf) + xecho -b scan format set to $(snf) } oof diff /home/zwhite/amn.orig/core/theme.m /home/zwhite/amn/core/theme.m --- /home/zwhite/amn.orig/core/theme.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/theme.m Mon Oct 10 20:40:00 2005 @@ -64,7 +64,7 @@ @ write($saveth @sc3=[$sc3) @ write($saveth @sc4=[$sc4) @ close($saveth) - xecho -v [a+c]: saved theme file [$(loadpath)themes/$(name).th] $desc + xecho -b saved theme file [$(loadpath)themes/$(name).th] $desc ^load $(loadpath)themes/$(name).th ^eval load $(loadpath)core/fsets.m ^eval load $(loadpath)core/arrays.m @@ -72,7 +72,7 @@ ^getusers }{ -xecho -v -b $scriptname usage: /tsave +xecho -b $scriptname usage: /tsave } # thanks to ttb for some original help w/ read(), but it still didn't work :P @@ -87,27 +87,27 @@ @ close($thfile) //echo $[10]name $[12]auth $desc$repeat(${20-strlen($strip( $stripansicodes($desc)))} ) } - xecho -v [a+c] current theme is $scdesc + xecho -b current theme is $scdesc }{ -if (fexist($(loadpath)themes/$0.th)==-1) { xecho -v [a+c] theme $0 does not exist }{ +if (fexist($(loadpath)themes/$0.th)==-1) { xecho -b theme $0 does not exist }{ @ name = [$0] ^load $(loadpath)themes/$(0).th ^eval load $(loadpath)core/fsets.m ^eval load $(loadpath)core/arrays.m ^update.f ^getusers - xecho -v [a+c] loaded theme file [$(0).th] by $auth $desc + xecho -b loaded theme file [$(0).th] by $auth $desc } } -alias untheme { @name=[];@scdesc=[];xecho -v -b $scriptname: no longer using a theme;fsave +alias untheme { @name=[];@scdesc=[];xecho -b $scriptname: no longer using a theme;fsave }[C alias rtheme if ([$0]) { -if (fexist($(loadpath)themes/$0.th)==-1) { xecho -v [a+c] theme $(0) does not exist! +if (fexist($(loadpath)themes/$0.th)==-1) { xecho -b theme $(0) does not exist! }{ ^exec rm -rf $(loadpath)themes/$(0).th 1> /dev/null 2> /dev/null -xecho -v [a+c] theme $(0) has been removed! -}}{xecho -v [a+c] usage: /rtheme } +xecho -b theme $(0) has been removed! +}}{xecho -b usage: /rtheme } ## kreca/crapple 05 ## clogic '98 diff /home/zwhite/amn.orig/core/trickle.m /home/zwhite/amn/core/trickle.m --- /home/zwhite/amn.orig/core/trickle.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/trickle.m Mon Oct 10 21:35:48 2005 @@ -46,31 +46,31 @@ alias thelp { if (!$[0]) { -echo -------------= Trickle IRC Swiss Army Knife Help =------------- +//echo -------------= Trickle IRC Swiss Army Knife Help =------------- -echo tscan /tscan [ident@host] specified match will show user(s) in -echo current chan. -echo tdeop /tdeop [ident@host] specified match will deop user(s) in -echo current chan. -echo tkick /tkick [ident@host] specified match will kick user(s) in -echo current chan. -echo tbk /tbk [ident@host] specified match will bankick user(s) -echo in current chan. -echo top /top [ident@host] specified match will op user(s) in -echo current chan. -echo common /common #somechan will compare nicks between current and -echo specified chan. +//echo tscan /tscan [ident@host] specified match will show user(s) in +//echo current chan. +//echo tdeop /tdeop [ident@host] specified match will deop user(s) in +//echo current chan. +//echo tkick /tkick [ident@host] specified match will kick user(s) in +//echo current chan. +//echo tbk /tbk [ident@host] specified match will bankick user(s) +//echo in current chan. +//echo top /top [ident@host] specified match will op user(s) in +//echo current chan. +//echo common /common #somechan will compare nicks between current and +//echo specified chan. input_char "menu paused, hit the ANY key to continue. " pause -echo -echo /trickle can do a wide variety of commands/matches these are just -echo some of the quick aliases which makes usage of /trickle. -echo some /trickle usage examples. -echo /trickle #somechan *!*@*aol.com kill -echo /trickle #somechan *!ident@* voice -echo /trickle * wildcard is not working at this time. -echo /filter is also aliased to trickle for those who can't remember the cmd. -echo --------------------------------------------------------------------- +//echo +//echo /trickle can do a wide variety of commands/matches these are just +//echo some of the quick aliases which makes usage of /trickle. +//echo some /trickle usage examples. +//echo /trickle #somechan *!*@*aol.com kill +//echo /trickle #somechan *!ident@* voice +//echo /trickle * wildcard is not working at this time. +//echo /filter is also aliased to trickle for those who can't remember the cmd. +//echo --------------------------------------------------------------------- } } diff /home/zwhite/amn.orig/core/whois.m /home/zwhite/amn/core/whois.m --- /home/zwhite/amn.orig/core/whois.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/whois.m Mon Oct 10 20:41:13 2005 @@ -11,6 +11,6 @@ (5) {@_whois=5;^eval load ${loadpath}wis/whois.5} (6) {@_whois=6;^eval load ${loadpath}wis/whois.6} } - xecho -v [a+c] whois format set to $(_whois) + xecho -b whois format set to $(_whois) } oof diff /home/zwhite/amn.orig/core/winhelp.m /home/zwhite/amn/core/winhelp.m --- /home/zwhite/amn.orig/core/winhelp.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/core/winhelp.m Mon Oct 10 21:35:52 2005 @@ -5,7 +5,7 @@ alias winhelp { if (!$[0]) { -echo --------------------= Windowing Help =----------------------------- +//echo --------------------= Windowing Help =----------------------------- //echo wc <window create> creates new hidden window //echo wj <window join> creates new hidden window and joins specified channel @@ -30,7 +30,7 @@ //echo wflush <window flush> window flush the scroll back epic5-0.0.6 and higher. //echo wlevel <window levels> changes level of current window //echo msgwin <msg window> wsl's then it wc's a window bound to msgs,notices -echo --------------------------------------------------------------------------- +//echo --------------------------------------------------------------------------- } } diff /home/zwhite/amn.orig/modules/abot/abot.m /home/zwhite/amn/modules/abot/abot.m --- /home/zwhite/amn.orig/modules/abot/abot.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/abot/abot.m Mon Oct 10 21:36:00 2005 @@ -26,7 +26,7 @@ @ bothost = after(! $input1) @ botnick = before(! $input1) } else { - if (!getuhost($input1)) { xecho -v -b $botprompt $input1 is not on irc! }{ + if (!getuhost($input1)) { xecho -b $botprompt $input1 is not on irc! }{ @ bothost = sar(g/~/\*/$getuhost($input1)) @ botnick = [$input1] }} @@ -36,7 +36,7 @@ @ :botcmd = [$3-] @ setitem(bots 0 !) @ setitem(bots $numitems(bots) $botnick!$bothost $pass $chan $botcmd) - xecho -v -b $botprompt $Cparse(%nbot added %c$botnick%K!%c$bothost%n pass%K:%c $decode($pass) %nchannel%K:%c $chan%n command%K:%n $botcmd) + xecho -b $botprompt $Cparse(%nbot added %c$botnick%K!%c$bothost%n pass%K:%c $decode($pass) %nchannel%K:%c $chan%n command%K:%n $botcmd) } } } @@ -69,7 +69,7 @@ for (@xx=0, xx -echo adds bots to the botlist. -echo botdel /botdel delete bot from botlist -echo botsave /botsave saves bots to file -echo listbot /listbot lists all bots -echo delbot /delbot - same as /botdel -echo botlist /botlist - same as /listbot -echo abot /abot - same as /listbot -echo rmbot /rmbot - same as /botdel +//echo addbot /addbot +//echo adds bots to the botlist. +//echo botdel /botdel delete bot from botlist +//echo botsave /botsave saves bots to file +//echo listbot /listbot lists all bots +//echo delbot /delbot - same as /botdel +//echo botlist /botlist - same as /listbot +//echo abot /abot - same as /listbot +//echo rmbot /rmbot - same as /botdel -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } diff /home/zwhite/amn.orig/modules/adcc/adcc.m /home/zwhite/amn/modules/adcc/adcc.m --- /home/zwhite/amn.orig/modules/adcc/adcc.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/adcc/adcc.m Mon Oct 10 20:42:54 2005 @@ -39,7 +39,7 @@ alias adcc.timer { if (numitems(offers.files) == 0) { - xecho -v (adcc).. no packs offered + xecho (adcc).. no packs offered }{ input "which channel do you want the timer to plist in? <#chan1,#chan2...> " { @dcchans=[$0] @@ -51,7 +51,7 @@ ^timer -del 41 input "time in minutes to plist on channel " { if ([$0] == 0 || ![$0]) { - xecho -v (adcc).. timer canceled + xecho (adcc).. timer canceled }{ @pts=[$0] ^timer -refnum 41 -rep -1 ${pts * 60} ^plist $dcchans @@ -60,7 +60,7 @@ } alias adcc.list { if (numitems(offers.files)== 0) { - xecho -v (adcc).. no packs current on list + xecho (adcc).. no packs current on list }{ banner.lchead banner.mid file desc gets @@ -92,7 +92,7 @@ if (fexist($glob($*)) == [-1]) { @fuk=1 - xecho -v (adcc).. file not found + xecho (adcc).. file not found }{ if (match(*/* $*)) { @setitem(gets $numitems(gets) 0) @@ -137,7 +137,7 @@ alias plist { if (numitems(offers.files) == 0) { - xecho -v (adcc).. no packs being offered + xecho (adcc).. no packs being offered }{ if (![$0]) { @pl=[$C] @@ -190,7 +190,7 @@ @ write($savec @speed=[$getitem(speed 0)]) @ write($savec @total=[$getitem(total 0)]) @ close($savec) - xecho -v [mod] (odcc).. adcc settings saved to $dccsavefile + xecho [mod] (odcc).. adcc settings saved to $dccsavefile } ^eval ^load $dccsavefile @@ -229,7 +229,7 @@ } - xecho -v (adcc).. odcc file loaded + xecho (adcc).. odcc file loaded } alias adcc.doffer { @@ -241,14 +241,14 @@ @delarray(gets) @delarray(speed) @delarray(total) - xecho -v (adcc).. all packs deleted + xecho (adcc).. all packs deleted }{ @numer=[$0] @delitem(offers.files ${numer-1}) @delitem(offers.desc ${numer-1}) @delitem(offers.note ${numer-1}) @delitem(gets ${numer-1}) - xecho -v (adcc).. pack $numer deleted + xecho (adcc).. pack $numer deleted } } } diff /home/zwhite/amn.orig/modules/away/away.m /home/zwhite/amn/modules/away/away.m --- /home/zwhite/amn.orig/modules/away/away.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/away/away.m Mon Oct 10 20:43:52 2005 @@ -10,14 +10,14 @@ alias remlog { if (fexist(~/.amn/away.log) == -1) { - xecho -v -b log file does not exist. + xecho -b log file does not exist. }{ input "remove log? [y|n]: " { if ([$0]==[y]) { exec rm ~/.amn/away.log - xecho -v -b ~/.amn/away.log deleted + xecho -b ~/.amn/away.log deleted }{ - xecho -v -b remlog canceled + xecho -b remlog canceled } } } @@ -65,34 +65,34 @@ if (awaytime > [0]) { @timediff=tdiff2(${backtime - awaytime}) //away - xecho -v -b type /readlog to view log. + xecho -b type /readlog to view log. } }{ - xecho -v -b you are not away.. + xecho -b you are not away.. } alias awaytime if ([$0]) { @ awayt = [$0] - xecho -v [a+c] awaytime set to "$awayt" + xecho -b awaytime set to "$awayt" } else { - xecho -v [a+c] awaytime set to "$awayt"} + xecho -b awaytime set to "$awayt"} alias awaymsg if ([$0]) { @ awayr = [$*] - xecho -v [a+c] away reason set to "$awayr" + xecho -b away reason set to "$awayr" } else { - xecho -v [a+c] away reason set to "$awayr"} + xecho -b away reason set to "$awayr"} alias awaytog { if (![$0]) { - xecho -v [a+c] away toggle is set to "$togaway" + xecho -b away toggle is set to "$togaway" } if (match($0 on off)) {@togaway = [$0] - xecho -v [a+c] away toggle is set to "$togaway" + xecho -b away toggle is set to "$togaway" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } @@ -101,14 +101,14 @@ ## pager crap here. alias pager { if (![$0]) { - xecho -v [a+c] pager set to "$togpager" + xecho -b pager set to "$togpager" } if (match($0 on off)) { @togpager = [$0] - xecho -v [a+c] pager set to "$togpager" + xecho -b pager set to "$togpager" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } @@ -171,70 +171,70 @@ alias logcrap { if (![$0]) { - xecho -v [a+c] misc crap logging set to "$crapl" + xecho -b misc crap logging set to "$crapl" } if (match($0 on off)) { @crapl = [$0] - xecho -v [a+c] misc crap logging set to "$crapl" + xecho -b misc crap logging set to "$crapl" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } alias logm { if (![$0]) { - xecho -v [a+c] msg logging set to "$msgl" + xecho -b msg logging set to "$msgl" } if (match($0 on off)) { @msgl = [$0] - xecho -v [a+c] msg logging set to "$msgl" + xecho -b msg logging set to "$msgl" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } alias logd { if (![$0]) { - xecho -v [a+c] dcc logging set to "$dccl" + xecho -b dcc logging set to "$dccl" } if (match($0 on off)) { @dccl = [$0] - xecho -v [a+c] dcc logging set to "$dccl" + xecho -b dcc logging set to "$dccl" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } alias logn { if (![$0]) { - xecho -v [a+c] notice logging set to "$notl" + xecho -b notice logging set to "$notl" } if (match($0 on off)) { @notl = [$0] - xecho -v [a+c] notice logging set to "$notl" + xecho -b notice logging set to "$notl" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } alias logpub { if (![$0]) { - xecho -v [a+c] public logging set to "$plog" + xecho -b public logging set to "$plog" } if (match($0 on off)) { @plog = [$0] - xecho -v [a+c] public logging set to "$plog" + xecho -b public logging set to "$plog" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } diff /home/zwhite/amn.orig/modules/bwk/bwk.m /home/zwhite/amn/modules/bwk/bwk.m --- /home/zwhite/amn.orig/modules/bwk/bwk.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/bwk/bwk.m Mon Oct 10 20:44:09 2005 @@ -14,8 +14,8 @@ alias addword { if ( # < 2) { - xecho -v -b syn: /addword word #chan [type] to bk a word in specified chan. - xecho -v -b type is either bk or kick. Default is bk. + xecho -b syn: /addword word #chan [type] to bk a word in specified chan. + xecho -b type is either bk or kick. Default is bk. }{ @:bktype=[bk] if ( # >= 3 && findw($2 bk kick)) { @@ -27,13 +27,13 @@ @setitem(_words $numitems(_words) $0) @setitem(_wordschan $numitems(_wordschan) $1) @setitem(_wordstype $numitems(_wordstype) $bktype) - xecho -v -b added word $0 with channel $1 to word list. + xecho -b added word $0 with channel $1 to word list. } } alias listword { if (numitems(_words) == 1) { - xecho -v -b no words current on list + xecho -b no words current on list }{ banner.head for (@xx=1, xx 0 && [$0] < numitems(_words)) { - xecho -v -b deleted $getitem(_words $0) $getitem(_wordschan $0) from list + xecho -b deleted $getitem(_words $0) $getitem(_wordschan $0) from list @delitem(_words $0) @delitem(_wordschan $0) @delitem(_wordstype $0) }{ - xecho -v -b number out of range. + xecho -b number out of range. } }{ - xecho -v -b syn: /delword + xecho -b syn: /delword } } @@ -94,7 +94,7 @@ @write($savemt @_wordstype.$xx=[$getitem(_wordtype $xx)]) } @close($savemt) - xecho -v [mod] (bwk).. wordlist saved to $wordsfile + xecho [mod] (bwk).. wordlist saved to $wordsfile } alias wordsload { diff /home/zwhite/amn.orig/modules/flood/flood.m /home/zwhite/amn/modules/flood/flood.m --- /home/zwhite/amn.orig/modules/flood/flood.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/flood/flood.m Mon Oct 10 20:50:35 2005 @@ -4,27 +4,27 @@ ^on #-msg 1 * if (msgflood != 1) { @msgs++ - //timer -refnum 5001 3 {@msgs = 0} - if (msgs > msgfloodsensor) { - /umode +g - xecho -b msg flood detected setting flood protect umode +g for $mfloodtimer seconds - @msgflood=1 - //timer -refnum 5002 $mfloodtimer {^xecho -b server protect umode +g lifted after $mfloodtimer seconds;@msgflood=0;^umode -g} - - } + //timer -refnum 5001 3 {@msgs = 0} + if (msgs > msgfloodsensor) { + /umode +g + xecho -b msg flood detected setting flood protect umode +g for $mfloodtimer seconds + @msgflood=1 + //timer -refnum 5002 $mfloodtimer {^xecho -b server protect umode +g lifted after $mfloodtimer seconds;@msgflood=0;^umode -g} + } } + alias msgflood if ([$0]) { @msgfloodsensor=[$0] - xecho -v [a+c] server msg flood sensor set to "$msgfloodsensor" + xecho -b server msg flood sensor set to "$msgfloodsensor" }{ - xecho -v [a+c] server msg flood sensor set to "$msgfloodsensor" + xecho -b server msg flood sensor set to "$msgfloodsensor" } alias msgftimer if ([$0]) { @mfloodtimer=[$0] - xecho -v [a+c] server protect msg flood time set to "$mfloodtimer" + xecho -b server protect msg flood time set to "$mfloodtimer" }{ - xecho -v [a+c] server protect msg flood time set to "$mfloodtimer" + xecho -b server protect msg flood time set to "$mfloodtimer" } alias mtime msgftimer $* diff /home/zwhite/amn.orig/modules/mjoin/mjoin.m /home/zwhite/amn/modules/mjoin/mjoin.m --- /home/zwhite/amn.orig/modules/mjoin/mjoin.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/mjoin/mjoin.m Mon Oct 10 21:36:07 2005 @@ -16,7 +16,7 @@ alias addchan { if (![$0]) { - xecho -v (mjoin).. syn: /addchan chan1,chan2,chan3... (note. if the channel has a key then /addchan chan1 key, one by one.) + xecho (mjoin).. syn: /addchan chan1,chan2,chan3... (note. if the channel has a key then /addchan chan1 key, one by one.) }{ @_ach=sar(g/,/ /$0) if ([$1]) { @@ -25,20 +25,20 @@ @setitem(chans 0 !) @setitem(chans $numitems(chans) $a1 $_key) } - xecho -v -b added $* to channel list + xecho -b added $* to channel list }{ fe ($_ach) a1 { @setitem(chans 0 !) @setitem(chans $numitems(chans) $a1) } - xecho -v -b added $* to channel list + xecho -b added $* to channel list } } } alias listchan { if (numitems(chans) == 1) { - xecho -v -b no channels current on list + xecho -b no channels current on list }{ banner.lchead for (@xx=1, xx will add specified channel to mjoinlist -echo addjoin /addjoin will add specified channel to mjoinlist -echo delchan /delchan will delete channel from mjoin list -echo listchan /listchan will show a list of channels on the mjoin list -echo mjoin /mjoin will join all channels on mjoin list -echo chansave /chansave will save mjoin list -echo chanload /chanload will load mjoin list from ~/.chan.save -echo -= Mjoin Quick Aliases =- -echo listc/listchan ajlist/listchan chanlist/listchan -echo addjoin/addchan ajoin/addchan -echo unajoin/delchan deljoin/delchan rmjoin/delchan unjoin/delchan +//echo addchan /addchan will add specified channel to mjoinlist +//echo addjoin /addjoin will add specified channel to mjoinlist +//echo delchan /delchan will delete channel from mjoin list +//echo listchan /listchan will show a list of channels on the mjoin list +//echo mjoin /mjoin will join all channels on mjoin list +//echo chansave /chansave will save mjoin list +//echo chanload /chanload will load mjoin list from ~/.chan.save +//echo -= Mjoin Quick Aliases =- +//echo listc/listchan ajlist/listchan chanlist/listchan +//echo addjoin/addchan ajoin/addchan +//echo unajoin/delchan deljoin/delchan rmjoin/delchan unjoin/delchan -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } diff /home/zwhite/amn.orig/modules/ncomp/ncomp.m /home/zwhite/amn/modules/ncomp/ncomp.m --- /home/zwhite/amn.orig/modules/ncomp/ncomp.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/ncomp/ncomp.m Mon Oct 10 20:51:21 2005 @@ -8,7 +8,7 @@ if (pattern($txt* $chanusers($C))) { @ per = pattern($txt* $chanusers($C)) if (numwords($per) > 1) { - xecho -v -b Ambiguous matches: $per + xecho -b Ambiguous matches: $per sendline $* }{ sendline $stripansicodes($per$format_nick_comp $1-) @@ -17,7 +17,7 @@ if (!pattern($txt* $chanusers($C)) && pattern(*$txt* $chanusers($C))) { @ per = pattern(*$txt* $chanusers($C)) if (numwords($per) > 1) { - xecho -v -b Ambiguous matches: $per + xecho -b Ambiguous matches: $per sendline $* }{ sendline $stripansicodes($per$format_nick_comp $1-) diff /home/zwhite/amn.orig/modules/nlog/nlog.m /home/zwhite/amn/modules/nlog/nlog.m --- /home/zwhite/amn.orig/modules/nlog/nlog.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/nlog/nlog.m Mon Oct 10 20:52:09 2005 @@ -25,14 +25,14 @@ alias nsotog { if ( [$#] ==0) { - xecho -v [a+c] notify signoff log toggle is set to "$nsolog" + xecho -b notify signoff log toggle is set to "$nsolog" } if (match($0 on off)) { @nsolog = [$0] - xecho -v [a+c] notify signoff log toggle is set to "$nsolog" + xecho -b notify signoff log toggle is set to "$nsolog" }{ if ( [$#] &&!match($0 on off)) { - xecho -v [a+c] invalid choice, on or off. + xecho -b invalid choice, on or off. } } } @@ -41,14 +41,14 @@ #notify aliases. alias rnlog { if (fexist($nlogfile) == -1) { - xecho -v -b notify log file does not exist. + xecho -b notify log file does not exist. }{ input "remove log? [y|n]: " { if ([$0]==[y]) { exec rm $nlogfile - xecho -v -b $nlogfile deleted + xecho -b $nlogfile deleted }{ - xecho -v -b rnlog canceled + xecho -b rnlog canceled } } } @@ -68,7 +68,7 @@ @savemt = open($nfile W T) @write($savemt @nsolog=[$nsolog]) @close($savemt) - xecho -v [mod] (nlog).. notify settings saved to $nfile + xecho [mod] (nlog).. notify settings saved to $nfile } ^eval load $nfile diff /home/zwhite/amn.orig/modules/oper/oper.m /home/zwhite/amn/modules/oper/oper.m --- /home/zwhite/amn.orig/modules/oper/oper.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/oper/oper.m Mon Oct 10 21:36:17 2005 @@ -21,7 +21,7 @@ alias _winnames { fe ($winrefs()) n1 { - if (match($0 $winnam($n1)) > 0) { + if (match($0 $winnam($n1))) { return $n1 }{ @@ -32,19 +32,19 @@ alias ovsize { if (![$0]) { - xecho -v -b operview window size set to "$_ovsize" + xecho -b operview window size set to "$_ovsize" }{ @_ovsize=[$0] - xecho -v -b operview window size set to "$_ovsize" + xecho -b operview window size set to "$_ovsize" } } alias ovmode { if (![$0]) { - xecho -v -b oper modes set to "$_ovmode" + xecho -b oper modes set to "$_ovmode" }{ @_ovmode=[$0] - xecho -v -b oper modes set to "$_ovmode" + xecho -b oper modes set to "$_ovmode" } } @@ -61,13 +61,13 @@ alias operview { if (winnum(operview) != -1) { - abecho [a+c] toggled operview off. + abecho $banner toggled operview off. ^window OperView kill ^umode -$_ovmode }{ - abecho [a+c] toggled operview on. + abecho $banner toggled operview on. ^window new fixed on size $_ovsize name OperView level snotes,opnotes,wallops;umode +$_ovmode # ^set status_server [%S] ^set status_format [operview] %> [$servername($winserv(OperView))] @@ -90,7 +90,7 @@ alias tkline { if (![$0]) { - xecho -v [a+c] usage: /tkline [nick|hostmask] + xecho -b usage: /tkline [nick|hostmask] }{ quote kline $0 $1 :$2- } @@ -340,38 +340,27 @@ alias ohelp { if (!$[0]) { -echo -----------------------= Oper Help =-------------------------- +//echo -----------------------= Oper Help =-------------------------- -echo /tkline [nick|ident@host] will temp kline for -echo specified minutes. -echo /unkline will remove kline from server list. -echo /operwall will send a operwall with specified text to the server. -echo /ov will open up a split window will the level WALLOPS OPNOTES SNOTES -echo so all server msgs will go to that window. -echo /mkline will mass kline current channel for specified reason -echo /mkill will mass kill current channel -echo /locops will send a msg to all operators on current server -echo /kline will set a kline for nick or specified ident@host -echo /modlist view ircd modules. -echo /modload loads specified ircd module. -echo /modunload unloads specified ircd module. -echo /dline reason. will set a dline with reason. (ratbox) -echo /undline will remove a dline. (ratbox) -echo binds ^E scroll_backward in ovwin ^D scroll_forward in ovwin +//echo /tkline [nick|ident@host] will temp kline for +//echo specified minutes. +//echo /unkline will remove kline from server list. +//echo /operwall will send a operwall with specified text to the server. +//echo /ov will open up a split window will the level WALLOPS OPNOTES SNOTES +//echo so all server msgs will go to that window. +//echo /mkline will mass kline current channel for specified reason +//echo /mkill will mass kill current channel +//echo /locops will send a msg to all operators on current server +//echo /kline will set a kline for nick or specified ident@host +//echo /modlist view ircd modules. +//echo /modload loads specified ircd module. +//echo /modunload unloads specified ircd module. +//echo /dline reason. will set a dline with reason. (ratbox) +//echo /undline will remove a dline. (ratbox) +//echo binds ^E scroll_backward in ovwin ^D scroll_forward in ovwin -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } -if (_winnames(Operview) > 0) { - ^set status_format $(hblk)[$(sc1)operview$(hblk)] $(cl)%>$(hblk)\([$(cl)$servername($winserv(OperView))$(hblk)]\) -} - - -^on #-connect 53 * { - ^set status_format $(hblk)[$(sc1)operview$(hblk)] $(cl)%>$(hblk)\([$(cl)$servername($winserv(OperView))$(hblk)]\) - if (!_pubnick) { - @_pubnick=N - } -} diff /home/zwhite/amn.orig/modules/orignick/orignick.m /home/zwhite/amn/modules/orignick/orignick.m --- /home/zwhite/amn.orig/modules/orignick/orignick.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/orignick/orignick.m Mon Oct 10 20:53:20 2005 @@ -5,14 +5,14 @@ ^timer -del 45 alias orignick { if (![$0]) { - xecho -v [a+c] /orignick /staynick to cancel + xecho -b /orignick /staynick to cancel }{ ^timer -delete 45 @nic=[$0] ^timer -window -1 -refnum 45 -rep -1 $_ort { ^getnick $nic } - xecho -v [a+c] attempting to jupe $nic + xecho -b attempting to jupe $nic } } @@ -20,39 +20,39 @@ ^userhost $nic -cmd { if ([$3@$4] == [@]) { ^nick $nic - xecho -v [a+c] congrads nick juped. /staynick to cancel + xecho -b congrads nick juped. /staynick to cancel } } } alias staynick { ^assign -nic ^timer -delete 45 - xecho -v [a+c] /orignick request canceled. + xecho -b /orignick request canceled. } alias setorig { if (# == 0) { - xecho -v [a+c] orignick delay set to "$_ort" + xecho -b orignick delay set to "$_ort" return; } if ([$0] > 0 && [$0] <=20) { @_ort = [$0] - xecho -v [a+c] orignick delay set to "$_ort" + xecho -b orignick delay set to "$_ort" }{ - xecho -v [a+c] time out of range. Valid numbers are 1-20 + xecho -b time out of range. Valid numbers are 1-20 } } on #-channel_signoff 42 "*" { if ([$1] == nic) { ^nick $nic - xecho -v [a+c] congrads nick juped. /staynick to cancel + xecho -b congrads nick juped. /staynick to cancel } } ^on #-nickname 33 * { if ([$0]== nic) { ^nick $nic - xecho -v [a+c] congrads nick juped. /staynick to cancel + xecho -b congrads nick juped. /staynick to cancel } } diff /home/zwhite/amn.orig/modules/relay/relay.m /home/zwhite/amn/modules/relay/relay.m --- /home/zwhite/amn.orig/modules/relay/relay.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/relay/relay.m Mon Oct 10 21:36:27 2005 @@ -262,7 +262,7 @@ //echo $0 isn't on IRC right now. } }{ -echo usage : /frelm [fake nick] [nick/channel to send to] [fake msg]} +//echo usage : /frelm [fake nick] [nick/channel to send to] [fake msg]} } alias freln { @@ -276,7 +276,7 @@ //echo $0 isn't on IRC right now. } }{ -echo usage: /freln [fake nick] [nick/channel to send to] [fake notice]} +//echo usage: /freln [fake nick] [nick/channel to send to] [fake notice]} } ## end fake stuff. @@ -284,21 +284,21 @@ alias rhelp { if (!$[0]) { -echo -----------------------= Relay Help =-------------------------- +//echo -----------------------= Relay Help =-------------------------- -echo lpaste /lpaste will paste to current window last line recieved. -echo relm /relm then to paste msg lines in buffer. -echo relsm /relsm then to paste sent msg lines in buffer. -echo reln /reln then to paste notice lines in buffer. -echo relsn /relsn then to paste sent notice lines in buffer. -echo paste /paste then to paste line in buffer. -echo relw /relw then to paste line in buffer. -echo rel /rel -l (msg) /rel -n (notice) /rel -s (sendmsg) -echo -echo Note: you do not have to specify numbers or actually paste anything -echo to anyone when seeing what's in the buffer ie: /relm to view the last -echo 15 msgs to you then enter to avoid pasting anything. +//echo lpaste /lpaste will paste to current window last line recieved. +//echo relm /relm then to paste msg lines in buffer. +//echo relsm /relsm then to paste sent msg lines in buffer. +//echo reln /reln then to paste notice lines in buffer. +//echo relsn /relsn then to paste sent notice lines in buffer. +//echo paste /paste then to paste line in buffer. +//echo relw /relw then to paste line in buffer. +//echo rel /rel -l (msg) /rel -n (notice) /rel -s (sendmsg) +//echo +//echo Note: you do not have to specify numbers or actually paste anything +//echo to anyone when seeing what's in the buffer ie: /relm to view the last +//echo 15 msgs to you then enter to avoid pasting anything. -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } diff /home/zwhite/amn.orig/modules/shitlist/shitlist.m /home/zwhite/amn/modules/shitlist/shitlist.m --- /home/zwhite/amn.orig/modules/shitlist/shitlist.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/shitlist/shitlist.m Mon Oct 10 21:36:34 2005 @@ -88,14 +88,14 @@ @write($savec @shitreas.$xx=[$getitem(shitreas $xx)]) } @ close($savec) - xecho -v [mod] (shitlist).. saved to $shitsavefile + xecho [mod] (shitlist).. saved to $shitsavefile } alias unshit shitdel alias shitdel if ([$0]) { if (numitems(shitlist)<=[$0]) { //echo $banner no such user! }{ - xecho -v -b deleted shitlist entry $getitem(shitlist $0) + xecho -b deleted shitlist entry $getitem(shitlist $0) @ delitem(shitlist $0) @ delitem(shitreas $0) } @@ -215,19 +215,19 @@ alias shelp { if (!$[0]) { -echo -----------------------= Shitlist Help =-------------------------- +//echo -----------------------= Shitlist Help =-------------------------- -echo addshit /addshit [nick|ident@host] #chan1,#chan2,#chan3... level reason -echo shitlevels 1 - deop users at all time, 2 - kick user when they -echo join the channel, 3 - Ban/Kick user when they join the channel -echo fuck /fuck nick will kickban nick and add nick to your shitlist level 3 -echo listshit /listshit view current users on the shitlist. -echo delshit /delshit # removes user from the shitlist. -echo -= Shitlist Quick Alias =- -echo listbk/listshit -echo addbk/addshit -echo rembk/delshit +//echo addshit /addshit [nick|ident@host] #chan1,#chan2,#chan3... level reason +//echo shitlevels 1 - deop users at all time, 2 - kick user when they +//echo join the channel, 3 - Ban/Kick user when they join the channel +//echo fuck /fuck nick will kickban nick and add nick to your shitlist level 3 +//echo listshit /listshit view current users on the shitlist. +//echo delshit /delshit # removes user from the shitlist. +//echo -= Shitlist Quick Alias =- +//echo listbk/listshit +//echo addbk/addshit +//echo rembk/delshit -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } diff /home/zwhite/amn.orig/modules/userlist/userlist.m /home/zwhite/amn/modules/userlist/userlist.m --- /home/zwhite/amn.orig/modules/userlist/userlist.m Mon Oct 10 19:40:01 2005 +++ /home/zwhite/amn/modules/userlist/userlist.m Mon Oct 10 21:36:47 2005 @@ -94,7 +94,7 @@ @ write($savec @friends.$xx=[$getitem(friends $xx)]) } @ close($savec) - xecho -v [mod] (userlist).. saved to $frsavefile + xecho [mod] (userlist).. saved to $frsavefile } alias userdel if ([$0]) { @@ -121,14 +121,14 @@ alias setsec { if (# == 0) { - xecho -v [a+c] autop delay set to "$_ss" + xecho -b autop delay set to "$_ss" return; } if ([$0] > 0 && [$0] <=40) { @_ss = [$0] - xecho -v [a+c] autop delay set to "$_ss" + xecho -b autop delay set to "$_ss" }{ - xecho -v [a+c] time out of range. Valid numbers are 1 - 40 + xecho -b time out of range. Valid numbers are 1 - 40 } } @@ -343,22 +343,22 @@ alias uhelp { if (!$[0]) { -echo -----------------------= Userlist Help =-------------------------- +//echo -----------------------= Userlist Help =-------------------------- -echo userlist /userlist will display users from the userlist. -echo adduser /adduser [nick|ident@host] #channel userlevel1,userlevel2, -echo userlevel3 .. password. -echo userlevels ops - will op person requesting for ops ,iops - will -echo instantly op someone when they enter the channel, invite - upon ctcp -echo request, will invite user to channel, voice - will voice person when -echo enters the channel -echo listuser /listuser will display users from the userlist. -echo deluser /deluser # will delete the user from the userlist. -echo addf /addf same as /adduser -echo listf /listf same as /userlist -echo delf /delf same as /deluser -echo remf /remf same as /deluser +//echo userlist /userlist will display users from the userlist. +//echo adduser /adduser [nick|ident@host] #channel userlevel1,userlevel2, +//echo userlevel3 .. password. +//echo userlevels ops - will op person requesting for ops ,iops - will +//echo instantly op someone when they enter the channel, invite - upon ctcp +//echo request, will invite user to channel, voice - will voice person when +//echo enters the channel +//echo listuser /listuser will display users from the userlist. +//echo deluser /deluser # will delete the user from the userlist. +//echo addf /addf same as /adduser +//echo listf /listf same as /userlist +//echo delf /delf same as /deluser +//echo remf /remf same as /deluser -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } Date: Mon, 10 Oct 2005 18:08:40 -0400 (EDT) From: zak@ircii.org (Zak) -REFIX AMN TREE AND SOME CHANGELOG CHANGES ENJOY THE MASSIVE INBOXES GUYS. BLAME SKULLY. ;((( //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Oct 10 15:38:43 2005 +++ amn/CHANGES Mon Oct 10 18:02:59 2005 @@ -194,7 +194,7 @@ weekend. if all goes ok. seems stable thus far. //zak -sync todo-bugs to reality. //zak -2005 Oct 9 +10.9.05 -Fix output_rewrite rules to not add an extra space at the beginning of every line. //skullY -vanilla.m: Remove ^W map so switching windows with ^W alone is done quickly. @@ -203,7 +203,11 @@ 10.10.05 -big cleanup to tab.m. Remove old useless crap and insert the msg tab completion into our new switch. the old command_completion is now ripped out since it's marked obsolete and hasnt worked at all in epic5. //kreca - -2005 Oct 10 -Change all instances of echo to //echo, to allow echo to be aliased. //skullY --vanilla.m: alias echo to output ot the current window. +-vanilla.m: alias echo to output to the current window. //skullY +-audit all uses of xecho -v. Should only be used on things that really need + to goto the current window. Users that use window level none everywhere won't + notice any difference. //skullY +-resync to tree, i presume this is skullY's latest or 'tried to commit' //zak +-fix dating format. //zak + diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Mon Oct 10 14:53:43 2005 +++ amn/core/alias.m Mon Oct 10 16:25:31 2005 @@ -136,15 +136,15 @@ alias indent orw alias orw { ^set -output_rewrite - ^set output_rewrite $_paste($1-)$1- - xecho -v [a+c] output indent set to "on" + ^set output_rewrite $_paste($1-) $1- + xecho -b output indent set to "on" } alias wrap orww alias orww { ^set -output_rewrite ^set output_rewrite $_paste($1-)$1- - xecho -v [a+c] output linewrap set to "on" + xecho -b output linewrap set to "on" } ## end output_rewrite sillyness. diff -aruN amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Mon Oct 10 14:53:43 2005 +++ amn/core/bans.m Mon Oct 10 16:55:43 2005 @@ -110,24 +110,24 @@ } alias kob { if (![$0]) { - xecho -v [a+c] kick on ban set to "$kickonban"} + xecho -v -b kick on ban set to "$kickonban"} if (match($0 on off)) {@kickonban = [$0] - xecho -v [a+c] kick on ban set to "$kickonban" + xecho -v -b kick on ban set to "$kickonban" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -v -b invalid choice } } } alias kops { if (![$0]) { - xecho -v [a+c] kick ops on ban set to "$kickops"} + xecho -v -b kick ops on ban set to "$kickops"} if (match($0 on off)) {@kickops = [$0] - xecho -v [a+c] kick ops on ban set to "$kickops" + xecho -v -b kick ops on ban set to "$kickops" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -v -b invalid choice } } diff -aruN amn.orig/core/dcc.m amn/core/dcc.m --- amn.orig/core/dcc.m Sun Oct 2 23:02:22 2005 +++ amn/core/dcc.m Mon Oct 10 17:35:17 2005 @@ -31,7 +31,7 @@ ## hooks. on ^211 * { - xecho -v -b $1: Sent: ${[$4]/1024}MB Received: ${[$6]/1024}MB SendQ: $2 Connected for: $tdiff2($7) Idle: $8 [$9-] + xecho -b $1: Sent: ${[$4]/1024}MB Received: ${[$6]/1024}MB SendQ: $2 Connected for: $tdiff2($7) Idle: $8 [$9-] } ^on #-leave 123 "% % *" { @@ -42,8 +42,8 @@ on -dcc_request "% CHAT *" { push dccchats $0 - xecho -v [a+c] DCC $0 has sent a dcc chat request. - xecho -v [a+c] DCC Press alt-T to respond or alt-R to reject from $0. + xecho -b DCC $0 has sent a dcc chat request. + xecho -b DCC Press alt-T to respond or alt-R to reject from $0. } alias dcc.get { @@ -57,7 +57,7 @@ on #-dcc_request 22 "% SEND*" { @dccnick = [$0] @dccfile = [$5] - xecho -v [a+c] press ctrl-T to accept file or ctrl-R to reject + xecho -b press ctrl-T to accept file or ctrl-R to reject } on #-dcc_request 23 "% SEND*" { @@ -65,7 +65,7 @@ @dccfile = [$5] if (autoget == [on]) { ^dcc get $dccnick - xecho -v [a+c] autogetting dcc $dccfile from $dccnick + xecho -b autogetting dcc $dccfile from $dccnick } } @@ -77,14 +77,14 @@ alias dccag { if (![$0]) { - xecho -v [a+c] dcc autoget set to $toupper($autoget) + xecho -b dcc autoget set to $toupper($autoget) } if (match($0 on off)) { @autoget = [$0] - xecho -v [a+c] dcc autoget set to $toupper($autoget) + xecho -b dcc autoget set to $toupper($autoget) }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } @@ -93,25 +93,25 @@ alias dcchelp { if (!$[0]) { -echo ---------------------= Dcc Help =------------------------------ -echo chat /chat [-p portnum] will send or accept a dcc chat -echo to specified nick -p port is optional. -echo nochat /nochat will close/deny a dcc chat session to -echo specified nick. -echo send /send will send specified nick specified -echo filename. -echo get /get will grab file from specified nick. -echo dcc /dcc will list current dcc sessions if any. -echo dca /dca will kill all dcc sessions. -echo dcs /dcs will close file transfer from specified nick. -echo dcx /dcx will close chat session to specified nick. -echo dcn /dcn will close any dcc sessions to specified nick. -echo ---------------------= dcc keybinds =---------------------------- -echo alt-r : will reject dcc chat request. -echo alt-t : will accept dcc chat request. -echo ctrl-t : will accept dcc file/send request. -echo ctrl-r : will reject dcc file/send request. -echo ------------------------------------------------------------------ +//echo ---------------------= Dcc Help =------------------------------ +//echo chat /chat [-p portnum] will send or accept a dcc chat +//echo to specified nick -p port is optional. +//echo nochat /nochat will close/deny a dcc chat session to +//echo specified nick. +//echo send /send will send specified nick specified +//echo filename. +//echo get /get will grab file from specified nick. +//echo dcc /dcc will list current dcc sessions if any. +//echo dca /dca will kill all dcc sessions. +//echo dcs /dcs will close file transfer from specified nick. +//echo dcx /dcx will close chat session to specified nick. +//echo dcn /dcn will close any dcc sessions to specified nick. +//echo ---------------------= dcc keybinds =---------------------------- +//echo alt-r : will reject dcc chat request. +//echo alt-t : will accept dcc chat request. +//echo ctrl-t : will accept dcc file/send request. +//echo ctrl-r : will reject dcc file/send request. +//echo ------------------------------------------------------------------ } } diff -aruN amn.orig/core/ehelp.m amn/core/ehelp.m --- amn.orig/core/ehelp.m Mon Oct 10 14:53:43 2005 +++ amn/core/ehelp.m Mon Oct 10 17:34:39 2005 @@ -5,7 +5,7 @@ alias ehelp { if (!$[0]) { -echo -------------------------= Extended Help =---------------------------- +//echo -------------------------= Extended Help =---------------------------- //echo uhelp <userlist help> userlist help menu. [module] //echo shelp <shitlist help> shitlist help menu. [module] @@ -23,7 +23,7 @@ //echo dcchelp <dcc help> dcc usage/binds help menu. [core] //echo smhelp <special modes> exempt modes cmds help menu. [core] //echo thelp <trickle help> the irc swiss army knife menu. [core] -echo ---------------------------------------------------------------------- +//echo ---------------------------------------------------------------------- } } @@ -32,24 +32,24 @@ alias genhelp { if (!$[0]) { -echo ---------------------= General Usage Help =------------------------- -echo ign /ign [nick|nick!ident@host] [type] will ignore someone -echo type: can be 1 or more options of notice,msg,dcc,crap,public,all -echo tig /tig # removes specified ignore. -echo cig /cig to ignore public from current or specified channel. -echo umode /umode changes user mode. -echo ircname /ircname will change your realname on next connect. -echo arejoin /arejoin will toggle auto_rejoin on/off -echo aww /aww will toggle auto_whowas on/off -echo topic /topic will insert current topic for editing. -echo away /away set yourself away. -echo back /back set yourself back. -echo readlog /readlog reads away msgs. [requires away module] -echo remlog /remlog erase away msgs. [requires away module] -echo orignick /orignick will attempt to regain(jupe) specified nick -echo every 3 seconds(default) unless you specify time in /config. [orignick module] -echo staynick /staynick will cancel /orignick [orignick module] -echo --------------------------------------------------------------------- +//echo ---------------------= General Usage Help =------------------------- +//echo ign /ign [nick|nick!ident@host] [type] will ignore someone +//echo type: can be 1 or more options of notice,msg,dcc,crap,public,all +//echo tig /tig # removes specified ignore. +//echo cig /cig to ignore public from current or specified channel. +//echo umode /umode changes user mode. +//echo ircname /ircname will change your realname on next connect. +//echo arejoin /arejoin will toggle auto_rejoin on/off +//echo aww /aww will toggle auto_whowas on/off +//echo topic /topic will insert current topic for editing. +//echo away /away set yourself away. +//echo back /back set yourself back. +//echo readlog /readlog reads away msgs. [requires away module] +//echo remlog /remlog erase away msgs. [requires away module] +//echo orignick /orignick will attempt to regain(jupe) specified nick +//echo every 3 seconds(default) unless you specify time in /config. [orignick module] +//echo staynick /staynick will cancel /orignick [orignick module] +//echo --------------------------------------------------------------------- } } @@ -58,31 +58,31 @@ alias lfhelp { if (!$[0]) { -echo --------------------= Amnesiac Look/Feel Help =--------------------------- -echo config /config will list currently available configuration options -echo /config will change the specified option. -echo theme /theme will display available themes and you can choose which -echo one you want syn: /theme -echo format /format will display available format -echo /format will choose the specified format -echo sbcolor /sbcolor changes sbar colors -echo to desired colors. -echo color /color changes color to -echo desired colors. -echo tsave /tsave will create a theme. -echo untheme /untheme will make amnesiac revert back to the default theme. +//echo --------------------= Amnesiac Look/Feel Help =--------------------------- +//echo config /config will list currently available configuration options +//echo /config will change the specified option. +//echo theme /theme will display available themes and you can choose which +//echo one you want syn: /theme +//echo format /format will display available format +//echo /format will choose the specified format +//echo sbcolor /sbcolor changes sbar colors +//echo to desired colors. +//echo color /color changes color to +//echo desired colors. +//echo tsave /tsave will create a theme. +//echo untheme /untheme will make amnesiac revert back to the default theme. input_char "menu paused hit the ANY key to continue " pause -echo fset /fset format_choice will change specified format. -echo fkeys /fkeys shows which fkeys are bound to which and can be changed by -echo by /fkey 1 /fkey 2 -echo sbar /sbar changes sbar to desired number. -echo mw /mw -hidden|split|kill -echo extpub /extpub and <+nick> in public. -echo indent /indent will indent on newline as opposed to linewrap. -echo wrap /wrap will linewrap msgs/publics etc.. on newline <-- this is -echo the default behavior. -echo ---------------------------------------------------------------------------- +//echo fset /fset format_choice will change specified format. +//echo fkeys /fkeys shows which fkeys are bound to which and can be changed by +//echo by /fkey 1 /fkey 2 +//echo sbar /sbar changes sbar to desired number. +//echo mw /mw -hidden|split|kill +//echo extpub /extpub and <+nick> in public. +//echo indent /indent will indent on newline as opposed to linewrap. +//echo wrap /wrap will linewrap msgs/publics etc.. on newline <-- this is +//echo the default behavior. +//echo ---------------------------------------------------------------------------- } } @@ -90,23 +90,23 @@ alias chelp { if (!$[0]) { -echo ---------------------= Amnesiac Config Shortcuts =----------------------- -echo cumode /cumode will set default usermode on connect. -echo stamp /stamp -echo modeshow /modeshow and <+nick> in public. -echo extpub /extpub same as /modeshow -echo resp /resp will highlight nick when specified word is said in -echo public. /resp /resp2 /resp3 /resp4 -echo kops /kops -echo kob /kob -echo otime /otime -echo awayt /awayt -echo tform /tform will display available timestamp formats and you can -echo choose which one you want syn: /tform -echo autoget /autoget will attempt to grab files sent to you automatically. -echo bantype /bantype when a ban is done on a nick -echo it uses -echo ------------------------------------------------------------------------- +//echo ---------------------= Amnesiac Config Shortcuts =----------------------- +//echo cumode /cumode will set default usermode on connect. +//echo stamp /stamp +//echo modeshow /modeshow and <+nick> in public. +//echo extpub /extpub same as /modeshow +//echo resp /resp will highlight nick when specified word is said in +//echo public. /resp /resp2 /resp3 /resp4 +//echo kops /kops +//echo kob /kob +//echo otime /otime +//echo awayt /awayt +//echo tform /tform will display available timestamp formats and you can +//echo choose which one you want syn: /tform +//echo autoget /autoget will attempt to grab files sent to you automatically. +//echo bantype /bantype when a ban is done on a nick +//echo it uses +//echo ------------------------------------------------------------------------- } } diff -aruN amn.orig/core/eimodes.m amn/core/eimodes.m --- amn.orig/core/eimodes.m Mon Oct 10 14:53:43 2005 +++ amn/core/eimodes.m Mon Oct 10 17:35:25 2005 @@ -225,22 +225,22 @@ alias rathelp { if (!$[0]) { -echo -----------------= Special Modes Help =---------------------------- -echo tpi /tpi invite exempt menu -I ie: /tpi 3-6 removes -echo invite exempts 3 4 5 and 6 shown in the menu. -echo tpe /tpe ban exempt menu +e ie: /tpe 4 to remove one exempt. -echo ui /ui clears the invite exempts in current chan -IIII. -echo ue /ue clears the ban exempts in current chan -eeee. -echo i /i shows the invite exempts in current chan if any. -echo e /e shows the ban exempts in current chan if any. -echo +i /+i add a invite exempt in current chan ie: /+i *!test@test.com -echo +e /+e add a ban exempt in current chan ie: /+e *!ident@host.com -echo -----= Other Aliases =---- -echo pinv /pinv - same as /ui cleans invite exempt list. -echo pexp /pexp - same as /ue cleans ban exempt list. -echo tinv /tinv - same as /tpi invite exempt menu. -echo texp /texp - same as /tpe ban exempt menu. -echo --------------------------------------------------------------------- +//echo -----------------= Special Modes Help =---------------------------- +//echo tpi /tpi invite exempt menu -I ie: /tpi 3-6 removes +//echo invite exempts 3 4 5 and 6 shown in the menu. +//echo tpe /tpe ban exempt menu +e ie: /tpe 4 to remove one exempt. +//echo ui /ui clears the invite exempts in current chan -IIII. +//echo ue /ue clears the ban exempts in current chan -eeee. +//echo i /i shows the invite exempts in current chan if any. +//echo e /e shows the ban exempts in current chan if any. +//echo +i /+i add a invite exempt in current chan ie: /+i *!test@test.com +//echo +e /+e add a ban exempt in current chan ie: /+e *!ident@host.com +//echo -----= Other Aliases =---- +//echo pinv /pinv - same as /ui cleans invite exempt list. +//echo pexp /pexp - same as /ue cleans ban exempt list. +//echo tinv /tinv - same as /tpi invite exempt menu. +//echo texp /texp - same as /tpe ban exempt menu. +//echo --------------------------------------------------------------------- } } diff -aruN amn.orig/core/fkey.m amn/core/fkey.m --- amn.orig/core/fkey.m Sun Oct 2 23:03:33 2005 +++ amn/core/fkey.m Mon Oct 10 16:27:29 2005 @@ -13,117 +13,117 @@ switch ($0) { (1) { if (![$1]) { - xecho -v [a+c] function key 1 set to $fke1 + xecho -b function key 1 set to $fke1 }{ @fke1 = [$1-] ^bind ^[[11~ parse_command $fke1 ^bind ^[[[A parse_command $fke1 ^bind ^[OP parse_command $fke1 - xecho -v [a+c] function key 1 set to $fke1 + xecho -b function key 1 set to $fke1 } } (2) { if (![$1]) { - xecho -v [a+c] function key 2 set to $fke2 + xecho -b function key 2 set to $fke2 }{ @fke2 = [$1-] ^bind ^[[12~ parse_command $fke2 ^bind ^[[[B parse_command $fke2 ^bind ^[OQ parse_command $fke2 - xecho -v [a+c] function key 2 set to $fke2 + xecho -b function key 2 set to $fke2 } } (3) { if (![$1]) { - xecho -v [a+c] function key 3 set to $fke3 + xecho -b function key 3 set to $fke3 }{ @fke3 = [$1-] ^bind ^[[13~ parse_command $fke3 ^bind ^[[[C parse_command $fke3 ^bind ^[OR parse_command $fke3 - xecho -v [a+c] function key 3 set to $fke3 + xecho -b function key 3 set to $fke3 } } (4) { if (![$1]) { - xecho -v [a+c] function key 4 set to $fke4 + xecho -b function key 4 set to $fke4 }{ @fke4 = [$1-] ^bind ^[[14~ parse_command $fke4 ^bind ^[[[D parse_command $fke4 ^bind ^[OS parse_command $fke4 - xecho -v [a+c] function key 4 set to $fke4 + xecho -b function key 4 set to $fke4 }} (5) { if (![$1]) { - xecho -v [a+c] function key 5 set to $fke5 + xecho -b function key 5 set to $fke5 }{ @fke5 = [$1-] ^bind ^[[15~ parse_command $fke5 ^bind ^[[[E parse_command $fke5 - xecho -v [a+c] function key 5 set to $fke5 + xecho -b function key 5 set to $fke5 }} (6) { if (![$1]) { - xecho -v [a+c] function key 6 set to $fke6 + xecho -b function key 6 set to $fke6 }{ @fke6 = [$1-] ^bind ^[[17~ parse_command $fke6 - xecho -v [a+c] function key 6 set to $fke6 + xecho -b function key 6 set to $fke6 }} (7) { if (![$1]) { - xecho -v [a+c] function key 7 set to $fke7 + xecho -b function key 7 set to $fke7 }{ @fke7 = [$1-] ^bind ^[[18~ parse_command $fke7 - xecho -v [a+c] function key 7 set to $fke7 + xecho -b function key 7 set to $fke7 }} (8) { if (![$1]) { - xecho -v [a+c] function key 8 set to $fke8 + xecho -b function key 8 set to $fke8 }{ @fke8 = [$1-] ^bind ^[[19~ parse_command $fke8 - xecho -v [a+c] function key 8 set to $fke8 + xecho -b function key 8 set to $fke8 }} (9) { if (![$1]) { - xecho -v [a+c] function key 9 set to $fke9 + xecho -b function key 9 set to $fke9 }{ @fke9 = [$1-] ^bind ^[[20~ parse_command $fke9 - xecho -v [a+c] function key 9 set to $fke9 + xecho -b function key 9 set to $fke9 }} (10) { if (![$1]) { - xecho -v [a+c] function key 10 set to $fke10 + xecho -b function key 10 set to $fke10 }{ @fke10 = [$1-] ^bind ^[[21~ parse_command $fke10 - xecho -v [a+c] function key 10 set to $fke10 + xecho -b function key 10 set to $fke10 }} (11) { if (![$1]) { - xecho -v [a+c] function key 11 set to $fke11 + xecho -b function key 11 set to $fke11 }{ @fke11 = [$1-] ^bind ^[[23~ parse_command $fke11 - xecho -v [a+c] function key 11 set to $fke11 + xecho -b function key 11 set to $fke11 }} (12) { if (![$1]) { - xecho -v [a+c] function key 12 set to $fke12 + xecho -b function key 12 set to $fke12 }{ @fke12 = [$1-] ^bind ^[[24~ parse_command $fke12 - xecho -v [a+c] function key 12 set to $fke12 + xecho -b function key 12 set to $fke12 }} } } diff -aruN amn.orig/core/format.m amn/core/format.m --- amn.orig/core/format.m Mon Oct 10 14:53:43 2005 +++ amn/core/format.m Mon Oct 10 16:32:25 2005 @@ -46,10 +46,10 @@ if (isnumber($0)&&[$0] to set msg format - xecho -v -b current format set to $mform + xecho -b /format a to set msg format + xecho -b current format set to $mform @format_msg = getitem(mform $mform) } @@ -73,10 +73,10 @@ if (isnumber($0)&&[$0] to set send msg format - xecho -v -b current format set to $smform + xecho -b /format b to set send msg format + xecho -b current format set to $smform @format_send_msg=getitem(smform $smform) } @@ -102,10 +102,10 @@ if (isnumber($0)&&[$0] to set public format - xecho -v -b current format set to $pubform + xecho -b /format c to set public format + xecho -b current format set to $pubform @format_public=getitem(pubform $pubform) } @@ -131,10 +131,10 @@ if (isnumber($0)&&[$0] to set send public format - xecho -v -b current format set to $spubform + xecho -b /format d to set send public format + xecho -b current format set to $spubform @format_send_public=getitem(spubform $spubform) } @@ -160,10 +160,10 @@ if (isnumber($0)&&[$0] to set public other format - xecho -v -b current format set to $spuboform + xecho -b /format e to set public other format + xecho -b current format set to $spuboform @format_public_other=getitem(spuboform $spuboform) } @@ -190,10 +190,10 @@ if (isnumber($0)&&[$0] to set signoff format - xecho -v -b current format set to $signform + xecho -b /format f to set signoff format + xecho -b current format set to $signform @format_signoff=getitem(signform $signform) } @@ -220,10 +220,10 @@ if (isnumber($0)&&[$0] to set join format - xecho -v -b current format set to $joinform + xecho -b /format g to set join format + xecho -b current format set to $joinform @format_join=getitem(joinform $joinform) } @@ -250,10 +250,10 @@ if (isnumber($0)&&[$0] to set leaveoff format - xecho -v -b current format set to $leaveform + xecho -b /format h to set leaveoff format + xecho -b current format set to $leaveform @format_leave=getitem(leaveform $leaveform) } @@ -279,10 +279,10 @@ if (isnumber($0)&&[$0] to set modeoff format - xecho -v -b current format set to $modeform + xecho -b /format i to set modeoff format + xecho -b current format set to $modeform @format_mode=getitem(modeform $modeform) } @@ -308,10 +308,10 @@ if (isnumber($0)&&[$0] to set notice format - xecho -v -b current format set to $notform + xecho -b /format j to set notice format + xecho -b current format set to $notform @format_notice = getitem(notform $notform) } alias pubnotform if ([$0]) { if (isnumber($0)&&[$0] to set public notice format - xecho -v -b current format set to $pubnotform + xecho -b /format z to set public notice format + xecho -b current format set to $pubnotform @format_public_notice=getitem(pubnotform $pubnotform) } @@ -364,10 +364,10 @@ if (isnumber($0)&&[$0] to set send notice format - xecho -v -b current format set to $snotform + xecho -b /format k to set send notice format + xecho -b current format set to $snotform @format_send_notice=getitem(snotform $snotform) } @@ -395,10 +395,10 @@ if (isnumber($0)&&[$0] to set send dcc chat format - xecho -v -b current format set to $sdcform + xecho -b /format l to set send dcc chat format + xecho -b current format set to $sdcform @ format_send_dcc_chat = getitem(sdcform $sdcform) } @@ -425,10 +425,10 @@ if (isnumber($0)&&[$0] to set dcc chat format - xecho -v -b current format set to $dcform + xecho -b /format m to set dcc chat format + xecho -b current format set to $dcform @format_dcc_chat=getitem(dcform $dcform) } @@ -455,10 +455,10 @@ if (isnumber($0)&&[$0] to set topic format - xecho -v -b current format set to $topform + xecho -b /format n to set topic format + xecho -b current format set to $topform @format_topic=getitem(topform $topform) } @@ -485,10 +485,10 @@ if (isnumber($0)&&[$0] to set ctcp format - xecho -v -b current format set to $ctcpform + xecho -b /format o to set ctcp format + xecho -b current format set to $ctcpform @format_ctcp=getitem(ctcpform $ctcpform) } @@ -516,10 +516,10 @@ if (isnumber($0)&&[$0] to set send ctcp format - xecho -v -b current format set to $sctcpform + xecho -b /format p to set send ctcp format + xecho -b current format set to $sctcpform @format_send_ctcp=getitem(sctcpform $sctcpform) } @@ -547,11 +547,11 @@ if (isnumber($0)&&[$0] to set echostr - xecho -v -b current format set to $echostr + xecho -b /format q to set echostr + xecho -b current format set to $echostr } alias ncomp if ([$0]) { if (isnumber($0)&&[$0]%n") kreca$format_nick_comp hi! - xecho -v -b this is your new nick completion, /fsave to save. + xecho -b this is your new nick completion, /fsave to save. @ncomp = [$0] }{ - xecho -v -b please make a valid selection. + xecho -b please make a valid selection. } }{ ncomp.show @@ -594,10 +594,10 @@ alias ncomp.show { for (@nc=1, nc < numitems(ncomp), @nc++) { @format_nick_comp=getitem(ncomp $nc) - xecho -v -b $Cparse("%K[%n$([2]nc)%K]%n %K<%ncrapple%K>%n") kreca$format_nick_comp hi! + xecho -b $Cparse("%K[%n$([2]nc)%K]%n %K<%ncrapple%K>%n") kreca$format_nick_comp hi! } - xecho -v -b /format r to set nick completion - xecho -v -b current format set to $ncomp + xecho -b /format r to set nick completion + xecho -b current format set to $ncomp @format_nick_comp=getitem(ncomp $ncomp) } @@ -606,10 +606,10 @@ if (isnumber($0)&&[$0] to set version format - xecho -v -b current format set to $svform + xecho -b /format s to set version format + xecho -b current format set to $svform @format_sv=getitem(svform $svform) } @@ -638,11 +638,11 @@ @format_wall=getitem(wallform $0) @format_bwall=getitem(bwallform $0) //echo $fparse(format_wall crapple #amnesiac hi) - xecho -v -b this is your new wall format, /fsave to save. + xecho -b this is your new wall format, /fsave to save. @wallform = [$0] @bwallform = [$0] }{ - xecho -v -b please make a valid selection. + xecho -b please make a valid selection. } }{ wallform.show @@ -660,10 +660,10 @@ for (@mm=1, mm < numitems(wallform), @mm++) { @format_wall = getitem(wallform $mm) @format_bwall = getitem(bwallform $mm) - xecho -v -b $Cparse(%K[%n$mm%K]%n) $fparse(format_wall crapple #amnesiac hi) + xecho -b $Cparse(%K[%n$mm%K]%n) $fparse(format_wall crapple #amnesiac hi) } - xecho -v -b /format v to set wall format - xecho -v -b current format set to $wallform + xecho -b /format v to set wall format + xecho -b current format set to $wallform @format_wall=getitem(wallform $wallform) @format_bwall=getitem(bwallform $bwallform) } @@ -672,10 +672,10 @@ if (isnumber($0)&&[$0] to set away format - xecho -v -b current format set to $awayform + xecho -b /format w to set away format + xecho -b current format set to $awayform @format_away = getitem(awayform $awayform) } alias actform if ([$0]) { @@ -703,11 +703,11 @@ @format_action_other=getitem(actoform $0) //echo $fparse(format_action crapple #amnesiac hi) //echo $fparse(format_action_other crapple #amnesiac hi) - xecho -v -b this is your new action format, /fsave to save. + xecho -b this is your new action format, /fsave to save. @actform = [$0] @actoform = [$0] }{ - xecho -v -b please make a valid selection. + xecho -b please make a valid selection. } }{ actform.show @@ -725,12 +725,12 @@ for (@mm=1, mm < numitems(actform), @mm++) { @format_action=getitem(actform $mm) @format_action_other=getitem(actoform $mm) - xecho -v -b $Cparse(%K[%n$mm%K]%n) $fparse(format_action crapple #amnesiac hi) - xecho -v -b $fparse(format_action_other crapple #amnesiac hi) + xecho -b $Cparse(%K[%n$mm%K]%n) $fparse(format_action crapple #amnesiac hi) + xecho -b $fparse(format_action_other crapple #amnesiac hi) } - xecho -v -b /format x to set action format - xecho -v -b current format set to $actform + xecho -b /format x to set action format + xecho -b current format set to $actform @format_action=getitem(actform $actform) @format_action_other=getitem(actoform $actoform) } @@ -740,11 +740,11 @@ @format_send_desc=getitem(sdescform $0) //echo $fparse(format_desc crapple blah hi) //echo $fparse(format_send_desc crapple #amnesiac hi) - xecho -v -b this is your new describe format, /fsave to save. + xecho -b this is your new describe format, /fsave to save. @descform = [$0] @sdescform = [$0] }{ - xecho -v -b please make a valid selection. + xecho -b please make a valid selection. } }{ xdescform.show @@ -762,12 +762,12 @@ for (@mm=1, mm < numitems(descform), @mm++) { @format_desc = getitem(descform $mm) @format_send_desc = getitem(sdescform $mm) - xecho -v -b $Cparse(%K[%n$mm%K]%n) $fparse(format_desc crapple blah hi) - xecho -v -b $fparse(format_send_desc crapple #amnesiac hi) + xecho -b $Cparse(%K[%n$mm%K]%n) $fparse(format_desc crapple blah hi) + xecho -b $fparse(format_send_desc crapple #amnesiac hi) } - xecho -v -b /format y to set describe format - xecho -v -b current format set to $descform + xecho -b /format y to set describe format + xecho -b current format set to $descform @format_desc=getitem(descform $descform) @format_send_desc=getitem(sdescform $sdescform) @@ -778,11 +778,11 @@ @format_who_footer=getitem(whofootform $0) //echo $fparse(format_who #amnesiac skullY H@ zwhite front.arpa.org irc.servercentral.net 0 The Work is Done and Then Forgotten) //echo $fparse(format_who_footer irc.servercentral.net skully :End of /WHO list. - xecho -v -b this is your new who format, /fsave to save. + xecho -b this is your new who format, /fsave to save. @whoform = [$0] @whofootform = [$0] }{ - xecho -v -b please make a valid selection. + xecho -b please make a valid selection. } }{ whoform.show @@ -799,11 +799,11 @@ alias whoform.show { for (@mm=1, mm < numitems(whoform), @mm++) { @format_who=getitem(whoform $mm) - xecho -v $Cparse(%K[%n$mm%K]%n) $fparse(format_who #amnesiac skullY H@ zwhite front.arpa.org irc.servercentral.net 0 The Work is Done and Then Forgotten) + xecho -b $fparse(format_who #amnesiac skullY H@ zwhite front.arpa.org irc.servercentral.net 0 The Work is Done and Then Forgotten) } - xecho -v -- /format 2 to set who format - xecho -v current format set to $whoform + xecho -b /format 2 to set who format + xecho -b format set to $whoform @format_who=getitem(whoform $whoform) } @@ -812,10 +812,10 @@ if (isnumber($0)&&[$0] to set nick change format - xecho -v -b current format set to $nickform + xecho -b /format u to set nick change format + xecho -b current format set to $nickform @format_nickname=getitem(nickform $nickform) } @@ -841,10 +841,10 @@ if (isnumber($0)&&[$0]%n timestamp in public format example.) + xecho -b $Cparse(%K[%n$mm%K]%n) $fparse(format_timestamp_some)$cparse(%m<%ncrapple%m>%n timestamp in public format example.) } - xecho -v -b /format 3 to set time stamp format - xecho -v -b current format set to $timeform + xecho -b /format 3 to set time stamp format + xecho -b current format set to $timeform @format_timestamp_some=getitem(timeform $timeform) } @@ -869,10 +869,10 @@ if (isnumber($0)&&[$0] to set kick format - xecho -v -b current format set to $kickform + xecho -b /format 4 to set kick format + xecho -b current format set to $kickform @format_kick=getitem(kickform $kickform) } diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Mon Oct 10 14:53:43 2005 +++ amn/core/fsets.m Mon Oct 10 16:56:39 2005 @@ -7,16 +7,16 @@ if ([$0]) { if (!pattern(*$0* $fwords)) { banner.lchead - banner.mid [a+c] $0 format not found + banner.mid $banner $0 format not found banner.lcfoot }{ if (pattern(*$0* $fwords) && [$1]) { @format_choice=[$after(_ $0)] @format_$after(_ $0)=[$1-] - xecho -v [a+c] fset $0 changed to $1- + xecho -b fset $0 changed to $1- }{ fe ($pattern(*$0* $fwords)) a1 { - xecho -v [a+c] $[31]a1 ...... $($a1) + xecho -b $[31]a1 ...... $($a1) } } } @@ -170,39 +170,39 @@ on ^311 * { if (format_whois_header) { - xecho -v $fparse(format_whois_header) + xecho $fparse(format_whois_header) } - xecho -v $fparse(format_whois_nick $1 $2 $3 $5-) + xecho $fparse(format_whois_nick $1 $2 $3 $5-) if (format_whois_name) { - xecho -v $fparse(format_whois_name $5-) + xecho $fparse(format_whois_name $5-) } } -on ^319 * xecho -v $fparse(format_whois_channels $2-) -on ^312 * xecho -v $fparse(format_whois_server $2 $3-) -on ^301 * xecho -v $fparse(format_whois_away $1-) +on ^319 * xecho $fparse(format_whois_channels $2-) +on ^312 * xecho $fparse(format_whois_server $2 $3-) +on ^301 * xecho $fparse(format_whois_away $1-) on ^317 * { - xecho -v $fparse(format_whois_idle $2) - xecho -v $fparse(format_whois_signon $1 $stime($3)) + xecho $fparse(format_whois_idle $2) + xecho $fparse(format_whois_signon $1 $stime($3)) } on ^318 * { if (format_whois_footer) { - xecho -v $fparse(format_whois_footer) + xecho $fparse(format_whois_footer) } } on ^314 * { - xecho -v $fparse(format_whowas_header) - xecho -v $fparse(format_whowas_nick $1 $2 $3) - xecho -v $fparse(format_whowas_name $5-) + xecho $fparse(format_whowas_header) + xecho $fparse(format_whowas_nick $1 $2 $3) + xecho $fparse(format_whowas_name $5-) } on ^338 * { - xecho -v $fparse(format_whois_actual $*) + xecho $fparse(format_whois_actual $*) } on ^330 * { - xecho -v $fparse(format_whois_login $*) + xecho $fparse(format_whois_login $*) } on ^308 * { - xecho -v $fparse(format_whois_admin $1-) + xecho $fparse(format_whois_admin $1-) } on ^313 * { @@ -235,16 +235,16 @@ @ rcl.25 = ['s face is more plastic than flesh] $rcl[$rand(26)] ^randcl -xecho -v $fparse(format_whois_operator $1 $rcl[$rand(26)]) +xecho $fparse(format_whois_operator $1 $rcl[$rand(26)]) } ^on ^401 * { - xecho -v $fparse(format_whois_header) - xecho -v $fparse(format_whois_unknown $1) + xecho $fparse(format_whois_header) + xecho $fparse(format_whois_unknown $1) } ^on ^369 * { - xecho -v $fparse(format_whowas_footer) + xecho $fparse(format_whowas_footer) } ^on ^406 * { - xecho -v $fparse(format_whowas_header) - xecho -v $fparse(format_whowas_unknown $1) + xecho $fparse(format_whowas_header) + xecho $fparse(format_whowas_unknown $1) } diff -aruN amn.orig/core/help.m amn/core/help.m --- amn.orig/core/help.m Mon Oct 10 14:53:43 2005 +++ amn/core/help.m Mon Oct 10 16:57:40 2005 @@ -133,11 +133,11 @@ if ([$0]) { if (!match($0 $hwords)) { banner.head - //echo [a+c] command: $0 not found + xecho -b command: $0 not found banner.foot }{ banner.head - //echo $cparse("$($*)") + //echo $cparse("$($*)") banner.foot } } diff -aruN amn.orig/core/lag.m amn/core/lag.m --- amn.orig/core/lag.m Sun Oct 2 23:05:56 2005 +++ amn/core/lag.m Mon Oct 10 16:37:52 2005 @@ -37,7 +37,7 @@ alias do.pong { ^on #^pong 10 "*" { if ([$0] == svar ^^ [$0] == [$svar1]) { - xecho -v -b your lag to $0 is: ${time() - pblah} second(s) + xecho -b your lag to $0 is: ${time() - pblah} second(s) ^on #^pong 10 -"*" } } diff -aruN amn.orig/core/lusers.m amn/core/lusers.m --- amn.orig/core/lusers.m Mon Oct 10 14:53:43 2005 +++ amn/core/lusers.m Mon Oct 10 16:38:15 2005 @@ -53,17 +53,17 @@ ^assign _lu.umd $2, ^set floating_point_math on # next two lines don't make the new math parser bitch. -skullY - xecho -v $(hblk)[$cparse($(c2)³)$(hblk)] $cparse($(c2)g)$cparse($(c1)lobal users)$(hblk).. $(cl)$[6]_lu.u max$(c.hk) $(cl)$[7]_lu.umd $cparse($(c1)\()$(cl)$_lu.i invisible, $_lu.o operators$cparse($(c1)\)) - xecho -v $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)l)$cparse($(c1)ocal users)$(hblk)... $(cl)$[6]_lu.lu max$(c.hk) $(cl)$[7]_lu.lumd $cparse($(c1)\()$(cl)$trunc(5 ${100 * (_lu.lu / _lu.u)})\%$cparse($(c1)\)) - xecho -v $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)s)$cparse($(c1)ervers)$(hblk)....... $(cl)$[6]_lu.s $cparse($(c1)\()$(cl)$trunc(2 ${_lu.u / _lu.s}) avg users per server$cparse($(c1)\)) - xecho -v $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)c)$cparse($(c1)hannels)$(hblk)...... $(cl)$[6]_lu.c $cparse($(c1)\()$(cl)$trunc(2 ${_lu.u / _lu.c}) avg users per channel$cparse($(c1)\)) + xecho $(hblk)[$cparse($(c2)³)$(hblk)] $cparse($(c2)g)$cparse($(c1)lobal users)$(hblk).. $(cl)$[6]_lu.u max$(c.hk) $(cl)$[7]_lu.umd $cparse($(c1)\()$(cl)$_lu.i invisible, $_lu.o operators$cparse($(c1)\)) + xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)l)$cparse($(c1)ocal users)$(hblk)... $(cl)$[6]_lu.lu max$(c.hk) $(cl)$[7]_lu.lumd $cparse($(c1)\()$(cl)$trunc(5 ${100 * (_lu.lu / _lu.u)})\%$cparse($(c1)\)) + xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)s)$cparse($(c1)ervers)$(hblk)....... $(cl)$[6]_lu.s $cparse($(c1)\()$(cl)$trunc(2 ${_lu.u / _lu.s}) avg users per server$cparse($(c1)\)) + xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)c)$cparse($(c1)hannels)$(hblk)...... $(cl)$[6]_lu.c $cparse($(c1)\()$(cl)$trunc(2 ${_lu.u / _lu.c}) avg users per channel$cparse($(c1)\)) } on ^250 * { - xecho -v $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)c)$cparse($(c1)onnect count)$(hblk)..$(cl)$4 $5 $6 $7 $9 + xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)c)$cparse($(c1)onnect count)$(hblk)..$(cl)$4 $5 $6 $7 $9 } on ^253 * { - xecho -v $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)u)$cparse($(c1)nknown)$(hblk)........$(cl)$1 $2 $3 + xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)u)$cparse($(c1)nknown)$(hblk)........$(cl)$1 $2 $3 } diff -aruN amn.orig/core/mod.m amn/core/mod.m --- amn.orig/core/mod.m Mon Oct 10 14:53:43 2005 +++ amn/core/mod.m Mon Oct 10 17:35:35 2005 @@ -8,8 +8,8 @@ alias addmod { if (![$0]) { - xecho -v [a+c] syn: /addmod module1,module2,etc.. - xecho -v [a+c] valid modules are [$_modules] + xecho -b syn: /addmod module1,module2,etc.. + xecho -b valid modules are [$_modules] }{ @_ach=sar(g/,/ /$0) if ([$0]==[*]) { @@ -19,7 +19,7 @@ @setitem(_mods $numitems(_mods) $a1) ^load $(loadpath)modules/$(a1)/$(a1).m } - xecho -v [a+c] loaded modules $_modules + xecho -b loaded modules $_modules }{ fe ($_ach) n1 { if (match($n1 $_modules) > 0 && finditem(_mods $n1) < 0) { @@ -28,11 +28,11 @@ ^load $(loadpath)modules/$(n1)/$(n1).m ^push _mlist $n1 }{ - xecho -v [a+c] $n1 module not found or already loaded. + xecho -b $n1 module not found or already loaded. } } if (_mlist) { - xecho -v [a+c] $_mlist module(s) loaded. + xecho -b $_mlist module(s) loaded. } ^assign -_mlist } @@ -41,7 +41,7 @@ alias listmod { if (numitems(_mods) == 1) { - xecho -v [a+c] no modules current on list + xecho -b no modules current on list }{ eval aecho ----------------------= Modules Loaded =------------------ for (@xx=1, xx and <+nick> in public set to $0 + xecho -b showing <@nick> and <+nick> in public set to $0 }{ - xecho -v [a+c] extpub/modeshow set to $showop + xecho -b extpub/modeshow set to $showop } } diff -aruN amn.orig/core/more.m amn/core/more.m --- amn.orig/core/more.m Sun Oct 2 23:08:51 2005 +++ amn/core/more.m Mon Oct 10 16:38:45 2005 @@ -24,7 +24,7 @@ @ done = 1 } { - xecho -v $ugh + xecho $ugh } } if (!done) @@ -37,13 +37,13 @@ @ fd = line = done = rows = pause = ugh = [] } { - xecho -b -v $0\: no such file. + xecho -b $0\: no such file. } } { - xecho -b -v syn: /more + xecho -b syn: /more } } #archon'96 -oof \ No newline at end of file +oof diff -aruN amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Sun Oct 2 23:10:44 2005 +++ amn/core/save.m Mon Oct 10 16:39:21 2005 @@ -54,7 +54,7 @@ @write($savemt @_r3 = [$_r3]) @write($savemt @_r4 = [$_r4]) @close($savemt) - xecho -v [a+c] (core).. settings saved to $savefile + xecho -b (core).. settings saved to $savefile } @@ -112,7 +112,7 @@ @write($fsetsavemt ^sfset format_who_footer $format_who_footer) */ @close($fsetsavemt) - xecho -v [a+c] (core).. fset settings saved to $(savepath)$fsetsavefile + xecho -b (core).. fset settings saved to $(savepath)$fsetsavefile } alias fsave { @fsavefile=[$(savepath).a.fsave] @@ -156,7 +156,7 @@ @write($savemt @_whois = [$_whois]) @close($savemt) - xecho -v [a+c] (core).. format settings saved to $fsavefile + xecho -b (core).. format settings saved to $fsavefile } alias csave { @@ -174,7 +174,7 @@ @write($savemt @sc3 = [$sc3) @write($savemt @sc4 = [$sc4) @close($savemt) - xecho -v [a+c] (core).. color settings saved to $csavefile + xecho -b (core).. color settings saved to $csavefile } alias igsave { @@ -185,7 +185,7 @@ @ write($saveig ^ignore $_igmasks $igtype($_igmasks)) } @close($saveig) - xecho -v [a+c] (core).. ignores saved to $igsfile + xecho -b (core).. ignores saved to $igsfile } alias saveall { diff -aruN amn.orig/core/sbar.m amn/core/sbar.m --- amn.orig/core/sbar.m Sun Oct 2 23:10:55 2005 +++ amn/core/sbar.m Mon Oct 10 16:39:38 2005 @@ -13,10 +13,10 @@ if (statbar == [stat.3]) { ^sip2 } - xecho -v -b $scriptname sbar set to $0 - xecho -v [a+c] type /asave to save status bar + xecho -b $scriptname sbar set to $0 + xecho -b type /asave to save status bar }{ - xecho -v [a+c] syn: /sbar <1-$(sbar.max)> current sbar is ${hwht}$after(. $statbar) + xecho -b syn: /sbar <1-$(sbar.max)> current sbar is ${hwht}$after(. $statbar) } oof diff -aruN amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Sun Oct 2 23:11:18 2005 +++ amn/core/scan.m Mon Oct 10 16:39:43 2005 @@ -206,6 +206,6 @@ (5) {@snf=5;^eval load ${loadpath}sc/scan.5} (6) {@snf=6;^eval load ${loadpath}sc/scan.6} } - xecho -v [a+c] scan format set to $(snf) + xecho -b scan format set to $(snf) } oof diff -aruN amn.orig/core/theme.m amn/core/theme.m --- amn.orig/core/theme.m Mon Oct 10 14:53:43 2005 +++ amn/core/theme.m Mon Oct 10 16:40:00 2005 @@ -64,7 +64,7 @@ @ write($saveth @sc3=[$sc3) @ write($saveth @sc4=[$sc4) @ close($saveth) - xecho -v [a+c]: saved theme file [$(loadpath)themes/$(name).th] $desc + xecho -b saved theme file [$(loadpath)themes/$(name).th] $desc ^load $(loadpath)themes/$(name).th ^eval load $(loadpath)core/fsets.m ^eval load $(loadpath)core/arrays.m @@ -72,7 +72,7 @@ ^getusers }{ -xecho -v -b $scriptname usage: /tsave +xecho -b $scriptname usage: /tsave } # thanks to ttb for some original help w/ read(), but it still didn't work :P @@ -87,27 +87,27 @@ @ close($thfile) //echo $[10]name $[12]auth $desc$repeat(${20-strlen($strip( $stripansicodes($desc)))} ) } - xecho -v [a+c] current theme is $scdesc + xecho -b current theme is $scdesc }{ -if (fexist($(loadpath)themes/$0.th)==-1) { xecho -v [a+c] theme $0 does not exist }{ +if (fexist($(loadpath)themes/$0.th)==-1) { xecho -b theme $0 does not exist }{ @ name = [$0] ^load $(loadpath)themes/$(0).th ^eval load $(loadpath)core/fsets.m ^eval load $(loadpath)core/arrays.m ^update.f ^getusers - xecho -v [a+c] loaded theme file [$(0).th] by $auth $desc + xecho -b loaded theme file [$(0).th] by $auth $desc } } -alias untheme { @name=[];@scdesc=[];xecho -v -b $scriptname: no longer using a theme;fsave +alias untheme { @name=[];@scdesc=[];xecho -b $scriptname: no longer using a theme;fsave }[C alias rtheme if ([$0]) { -if (fexist($(loadpath)themes/$0.th)==-1) { xecho -v [a+c] theme $(0) does not exist! +if (fexist($(loadpath)themes/$0.th)==-1) { xecho -b theme $(0) does not exist! }{ ^exec rm -rf $(loadpath)themes/$(0).th 1> /dev/null 2> /dev/null -xecho -v [a+c] theme $(0) has been removed! -}}{xecho -v [a+c] usage: /rtheme } +xecho -b theme $(0) has been removed! +}}{xecho -b usage: /rtheme } ## kreca/crapple 05 ## clogic '98 diff -aruN amn.orig/core/trickle.m amn/core/trickle.m --- amn.orig/core/trickle.m Sun Oct 2 23:12:33 2005 +++ amn/core/trickle.m Mon Oct 10 17:35:48 2005 @@ -46,31 +46,31 @@ alias thelp { if (!$[0]) { -echo -------------= Trickle IRC Swiss Army Knife Help =------------- +//echo -------------= Trickle IRC Swiss Army Knife Help =------------- -echo tscan /tscan [ident@host] specified match will show user(s) in -echo current chan. -echo tdeop /tdeop [ident@host] specified match will deop user(s) in -echo current chan. -echo tkick /tkick [ident@host] specified match will kick user(s) in -echo current chan. -echo tbk /tbk [ident@host] specified match will bankick user(s) -echo in current chan. -echo top /top [ident@host] specified match will op user(s) in -echo current chan. -echo common /common #somechan will compare nicks between current and -echo specified chan. +//echo tscan /tscan [ident@host] specified match will show user(s) in +//echo current chan. +//echo tdeop /tdeop [ident@host] specified match will deop user(s) in +//echo current chan. +//echo tkick /tkick [ident@host] specified match will kick user(s) in +//echo current chan. +//echo tbk /tbk [ident@host] specified match will bankick user(s) +//echo in current chan. +//echo top /top [ident@host] specified match will op user(s) in +//echo current chan. +//echo common /common #somechan will compare nicks between current and +//echo specified chan. input_char "menu paused, hit the ANY key to continue. " pause -echo -echo /trickle can do a wide variety of commands/matches these are just -echo some of the quick aliases which makes usage of /trickle. -echo some /trickle usage examples. -echo /trickle #somechan *!*@*aol.com kill -echo /trickle #somechan *!ident@* voice -echo /trickle * wildcard is not working at this time. -echo /filter is also aliased to trickle for those who can't remember the cmd. -echo --------------------------------------------------------------------- +//echo +//echo /trickle can do a wide variety of commands/matches these are just +//echo some of the quick aliases which makes usage of /trickle. +//echo some /trickle usage examples. +//echo /trickle #somechan *!*@*aol.com kill +//echo /trickle #somechan *!ident@* voice +//echo /trickle * wildcard is not working at this time. +//echo /filter is also aliased to trickle for those who can't remember the cmd. +//echo --------------------------------------------------------------------- } } diff -aruN amn.orig/core/whois.m amn/core/whois.m --- amn.orig/core/whois.m Sun Oct 2 23:17:22 2005 +++ amn/core/whois.m Mon Oct 10 16:41:13 2005 @@ -11,6 +11,6 @@ (5) {@_whois=5;^eval load ${loadpath}wis/whois.5} (6) {@_whois=6;^eval load ${loadpath}wis/whois.6} } - xecho -v [a+c] whois format set to $(_whois) + xecho -b whois format set to $(_whois) } oof diff -aruN amn.orig/core/winhelp.m amn/core/winhelp.m --- amn.orig/core/winhelp.m Mon Oct 10 14:53:43 2005 +++ amn/core/winhelp.m Mon Oct 10 17:35:52 2005 @@ -5,7 +5,7 @@ alias winhelp { if (!$[0]) { -echo --------------------= Windowing Help =----------------------------- +//echo --------------------= Windowing Help =----------------------------- //echo wc <window create> creates new hidden window //echo wj <window join> creates new hidden window and joins specified channel @@ -30,7 +30,7 @@ //echo wflush <window flush> window flush the scroll back epic5-0.0.6 and higher. //echo wlevel <window levels> changes level of current window //echo msgwin <msg window> wsl's then it wc's a window bound to msgs,notices -echo --------------------------------------------------------------------------- +//echo --------------------------------------------------------------------------- } } diff -aruN amn.orig/modules/abot/abot.m amn/modules/abot/abot.m --- amn.orig/modules/abot/abot.m Sun Oct 2 23:18:57 2005 +++ amn/modules/abot/abot.m Mon Oct 10 17:36:00 2005 @@ -26,7 +26,7 @@ @ bothost = after(! $input1) @ botnick = before(! $input1) } else { - if (!getuhost($input1)) { xecho -v -b $botprompt $input1 is not on irc! }{ + if (!getuhost($input1)) { xecho -b $botprompt $input1 is not on irc! }{ @ bothost = sar(g/~/\*/$getuhost($input1)) @ botnick = [$input1] }} @@ -36,7 +36,7 @@ @ :botcmd = [$3-] @ setitem(bots 0 !) @ setitem(bots $numitems(bots) $botnick!$bothost $pass $chan $botcmd) - xecho -v -b $botprompt $Cparse(%nbot added %c$botnick%K!%c$bothost%n pass%K:%c $decode($pass) %nchannel%K:%c $chan%n command%K:%n $botcmd) + xecho -b $botprompt $Cparse(%nbot added %c$botnick%K!%c$bothost%n pass%K:%c $decode($pass) %nchannel%K:%c $chan%n command%K:%n $botcmd) } } } @@ -69,7 +69,7 @@ for (@xx=0, xx -echo adds bots to the botlist. -echo botdel /botdel delete bot from botlist -echo botsave /botsave saves bots to file -echo listbot /listbot lists all bots -echo delbot /delbot - same as /botdel -echo botlist /botlist - same as /listbot -echo abot /abot - same as /listbot -echo rmbot /rmbot - same as /botdel +//echo addbot /addbot +//echo adds bots to the botlist. +//echo botdel /botdel delete bot from botlist +//echo botsave /botsave saves bots to file +//echo listbot /listbot lists all bots +//echo delbot /delbot - same as /botdel +//echo botlist /botlist - same as /listbot +//echo abot /abot - same as /listbot +//echo rmbot /rmbot - same as /botdel -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } diff -aruN amn.orig/modules/adcc/adcc.m amn/modules/adcc/adcc.m --- amn.orig/modules/adcc/adcc.m Sun Oct 2 23:19:17 2005 +++ amn/modules/adcc/adcc.m Mon Oct 10 16:42:54 2005 @@ -39,7 +39,7 @@ alias adcc.timer { if (numitems(offers.files) == 0) { - xecho -v (adcc).. no packs offered + xecho (adcc).. no packs offered }{ input "which channel do you want the timer to plist in? <#chan1,#chan2...> " { @dcchans=[$0] @@ -51,7 +51,7 @@ ^timer -del 41 input "time in minutes to plist on channel " { if ([$0] == 0 || ![$0]) { - xecho -v (adcc).. timer canceled + xecho (adcc).. timer canceled }{ @pts=[$0] ^timer -refnum 41 -rep -1 ${pts * 60} ^plist $dcchans @@ -60,7 +60,7 @@ } alias adcc.list { if (numitems(offers.files)== 0) { - xecho -v (adcc).. no packs current on list + xecho (adcc).. no packs current on list }{ banner.lchead banner.mid file desc gets @@ -92,7 +92,7 @@ if (fexist($glob($*)) == [-1]) { @fuk=1 - xecho -v (adcc).. file not found + xecho (adcc).. file not found }{ if (match(*/* $*)) { @setitem(gets $numitems(gets) 0) @@ -137,7 +137,7 @@ alias plist { if (numitems(offers.files) == 0) { - xecho -v (adcc).. no packs being offered + xecho (adcc).. no packs being offered }{ if (![$0]) { @pl=[$C] @@ -190,7 +190,7 @@ @ write($savec @speed=[$getitem(speed 0)]) @ write($savec @total=[$getitem(total 0)]) @ close($savec) - xecho -v [mod] (odcc).. adcc settings saved to $dccsavefile + xecho [mod] (odcc).. adcc settings saved to $dccsavefile } ^eval ^load $dccsavefile @@ -229,7 +229,7 @@ } - xecho -v (adcc).. odcc file loaded + xecho (adcc).. odcc file loaded } alias adcc.doffer { @@ -241,14 +241,14 @@ @delarray(gets) @delarray(speed) @delarray(total) - xecho -v (adcc).. all packs deleted + xecho (adcc).. all packs deleted }{ @numer=[$0] @delitem(offers.files ${numer-1}) @delitem(offers.desc ${numer-1}) @delitem(offers.note ${numer-1}) @delitem(gets ${numer-1}) - xecho -v (adcc).. pack $numer deleted + xecho (adcc).. pack $numer deleted } } } diff -aruN amn.orig/modules/away/away.m amn/modules/away/away.m --- amn.orig/modules/away/away.m Sun Oct 2 23:20:37 2005 +++ amn/modules/away/away.m Mon Oct 10 16:43:52 2005 @@ -10,14 +10,14 @@ alias remlog { if (fexist(~/.amn/away.log) == -1) { - xecho -v -b log file does not exist. + xecho -b log file does not exist. }{ input "remove log? [y|n]: " { if ([$0]==[y]) { exec rm ~/.amn/away.log - xecho -v -b ~/.amn/away.log deleted + xecho -b ~/.amn/away.log deleted }{ - xecho -v -b remlog canceled + xecho -b remlog canceled } } } @@ -65,34 +65,34 @@ if (awaytime > [0]) { @timediff=tdiff2(${backtime - awaytime}) //away - xecho -v -b type /readlog to view log. + xecho -b type /readlog to view log. } }{ - xecho -v -b you are not away.. + xecho -b you are not away.. } alias awaytime if ([$0]) { @ awayt = [$0] - xecho -v [a+c] awaytime set to "$awayt" + xecho -b awaytime set to "$awayt" } else { - xecho -v [a+c] awaytime set to "$awayt"} + xecho -b awaytime set to "$awayt"} alias awaymsg if ([$0]) { @ awayr = [$*] - xecho -v [a+c] away reason set to "$awayr" + xecho -b away reason set to "$awayr" } else { - xecho -v [a+c] away reason set to "$awayr"} + xecho -b away reason set to "$awayr"} alias awaytog { if (![$0]) { - xecho -v [a+c] away toggle is set to "$togaway" + xecho -b away toggle is set to "$togaway" } if (match($0 on off)) {@togaway = [$0] - xecho -v [a+c] away toggle is set to "$togaway" + xecho -b away toggle is set to "$togaway" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } @@ -101,14 +101,14 @@ ## pager crap here. alias pager { if (![$0]) { - xecho -v [a+c] pager set to "$togpager" + xecho -b pager set to "$togpager" } if (match($0 on off)) { @togpager = [$0] - xecho -v [a+c] pager set to "$togpager" + xecho -b pager set to "$togpager" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } @@ -171,70 +171,70 @@ alias logcrap { if (![$0]) { - xecho -v [a+c] misc crap logging set to "$crapl" + xecho -b misc crap logging set to "$crapl" } if (match($0 on off)) { @crapl = [$0] - xecho -v [a+c] misc crap logging set to "$crapl" + xecho -b misc crap logging set to "$crapl" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } alias logm { if (![$0]) { - xecho -v [a+c] msg logging set to "$msgl" + xecho -b msg logging set to "$msgl" } if (match($0 on off)) { @msgl = [$0] - xecho -v [a+c] msg logging set to "$msgl" + xecho -b msg logging set to "$msgl" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } alias logd { if (![$0]) { - xecho -v [a+c] dcc logging set to "$dccl" + xecho -b dcc logging set to "$dccl" } if (match($0 on off)) { @dccl = [$0] - xecho -v [a+c] dcc logging set to "$dccl" + xecho -b dcc logging set to "$dccl" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } alias logn { if (![$0]) { - xecho -v [a+c] notice logging set to "$notl" + xecho -b notice logging set to "$notl" } if (match($0 on off)) { @notl = [$0] - xecho -v [a+c] notice logging set to "$notl" + xecho -b notice logging set to "$notl" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } alias logpub { if (![$0]) { - xecho -v [a+c] public logging set to "$plog" + xecho -b public logging set to "$plog" } if (match($0 on off)) { @plog = [$0] - xecho -v [a+c] public logging set to "$plog" + xecho -b public logging set to "$plog" }{ if ([$0]&&!match($0 on off)) { - xecho -v [a+c] invalid choice + xecho -b invalid choice } } } diff -aruN amn.orig/modules/bwk/bwk.m amn/modules/bwk/bwk.m --- amn.orig/modules/bwk/bwk.m Mon Oct 10 14:53:43 2005 +++ amn/modules/bwk/bwk.m Mon Oct 10 16:44:09 2005 @@ -14,8 +14,8 @@ alias addword { if ( # < 2) { - xecho -v -b syn: /addword word #chan [type] to bk a word in specified chan. - xecho -v -b type is either bk or kick. Default is bk. + xecho -b syn: /addword word #chan [type] to bk a word in specified chan. + xecho -b type is either bk or kick. Default is bk. }{ @:bktype=[bk] if ( # >= 3 && findw($2 bk kick)) { @@ -27,13 +27,13 @@ @setitem(_words $numitems(_words) $0) @setitem(_wordschan $numitems(_wordschan) $1) @setitem(_wordstype $numitems(_wordstype) $bktype) - xecho -v -b added word $0 with channel $1 to word list. + xecho -b added word $0 with channel $1 to word list. } } alias listword { if (numitems(_words) == 1) { - xecho -v -b no words current on list + xecho -b no words current on list }{ banner.head for (@xx=1, xx 0 && [$0] < numitems(_words)) { - xecho -v -b deleted $getitem(_words $0) $getitem(_wordschan $0) from list + xecho -b deleted $getitem(_words $0) $getitem(_wordschan $0) from list @delitem(_words $0) @delitem(_wordschan $0) @delitem(_wordstype $0) }{ - xecho -v -b number out of range. + xecho -b number out of range. } }{ - xecho -v -b syn: /delword + xecho -b syn: /delword } } @@ -94,7 +94,7 @@ @write($savemt @_wordstype.$xx=[$getitem(_wordtype $xx)]) } @close($savemt) - xecho -v [mod] (bwk).. wordlist saved to $wordsfile + xecho [mod] (bwk).. wordlist saved to $wordsfile } alias wordsload { diff -aruN amn.orig/modules/flood/flood.m amn/modules/flood/flood.m --- amn.orig/modules/flood/flood.m Sun Oct 2 23:22:46 2005 +++ amn/modules/flood/flood.m Mon Oct 10 16:50:35 2005 @@ -4,27 +4,27 @@ ^on #-msg 1 * if (msgflood != 1) { @msgs++ - //timer -refnum 5001 3 {@msgs = 0} - if (msgs > msgfloodsensor) { - /umode +g - xecho -b msg flood detected setting flood protect umode +g for $mfloodtimer seconds - @msgflood=1 - //timer -refnum 5002 $mfloodtimer {^xecho -b server protect umode +g lifted after $mfloodtimer seconds;@msgflood=0;^umode -g} - - } + //timer -refnum 5001 3 {@msgs = 0} + if (msgs > msgfloodsensor) { + /umode +g + xecho -b msg flood detected setting flood protect umode +g for $mfloodtimer seconds + @msgflood=1 + //timer -refnum 5002 $mfloodtimer {^xecho -b server protect umode +g lifted after $mfloodtimer seconds;@msgflood=0;^umode -g} + } } + alias msgflood if ([$0]) { @msgfloodsensor=[$0] - xecho -v [a+c] server msg flood sensor set to "$msgfloodsensor" + xecho -b server msg flood sensor set to "$msgfloodsensor" }{ - xecho -v [a+c] server msg flood sensor set to "$msgfloodsensor" + xecho -b server msg flood sensor set to "$msgfloodsensor" } alias msgftimer if ([$0]) { @mfloodtimer=[$0] - xecho -v [a+c] server protect msg flood time set to "$mfloodtimer" + xecho -b server protect msg flood time set to "$mfloodtimer" }{ - xecho -v [a+c] server protect msg flood time set to "$mfloodtimer" + xecho -b server protect msg flood time set to "$mfloodtimer" } alias mtime msgftimer $* diff -aruN amn.orig/modules/mjoin/mjoin.m amn/modules/mjoin/mjoin.m --- amn.orig/modules/mjoin/mjoin.m Sun Oct 2 23:22:59 2005 +++ amn/modules/mjoin/mjoin.m Mon Oct 10 17:36:07 2005 @@ -16,7 +16,7 @@ alias addchan { if (![$0]) { - xecho -v (mjoin).. syn: /addchan chan1,chan2,chan3... (note. if the channel has a key then /addchan chan1 key, one by one.) + xecho (mjoin).. syn: /addchan chan1,chan2,chan3... (note. if the channel has a key then /addchan chan1 key, one by one.) }{ @_ach=sar(g/,/ /$0) if ([$1]) { @@ -25,20 +25,20 @@ @setitem(chans 0 !) @setitem(chans $numitems(chans) $a1 $_key) } - xecho -v -b added $* to channel list + xecho -b added $* to channel list }{ fe ($_ach) a1 { @setitem(chans 0 !) @setitem(chans $numitems(chans) $a1) } - xecho -v -b added $* to channel list + xecho -b added $* to channel list } } } alias listchan { if (numitems(chans) == 1) { - xecho -v -b no channels current on list + xecho -b no channels current on list }{ banner.lchead for (@xx=1, xx will add specified channel to mjoinlist -echo addjoin /addjoin will add specified channel to mjoinlist -echo delchan /delchan will delete channel from mjoin list -echo listchan /listchan will show a list of channels on the mjoin list -echo mjoin /mjoin will join all channels on mjoin list -echo chansave /chansave will save mjoin list -echo chanload /chanload will load mjoin list from ~/.chan.save -echo -= Mjoin Quick Aliases =- -echo listc/listchan ajlist/listchan chanlist/listchan -echo addjoin/addchan ajoin/addchan -echo unajoin/delchan deljoin/delchan rmjoin/delchan unjoin/delchan +//echo addchan /addchan will add specified channel to mjoinlist +//echo addjoin /addjoin will add specified channel to mjoinlist +//echo delchan /delchan will delete channel from mjoin list +//echo listchan /listchan will show a list of channels on the mjoin list +//echo mjoin /mjoin will join all channels on mjoin list +//echo chansave /chansave will save mjoin list +//echo chanload /chanload will load mjoin list from ~/.chan.save +//echo -= Mjoin Quick Aliases =- +//echo listc/listchan ajlist/listchan chanlist/listchan +//echo addjoin/addchan ajoin/addchan +//echo unajoin/delchan deljoin/delchan rmjoin/delchan unjoin/delchan -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } diff -aruN amn.orig/modules/ncomp/ncomp.m amn/modules/ncomp/ncomp.m --- amn.orig/modules/ncomp/ncomp.m Sun Oct 2 23:23:15 2005 +++ amn/modules/ncomp/ncomp.m Mon Oct 10 16:51:21 2005 @@ -8,7 +8,7 @@ if (pattern($txt* $chanusers($C))) { @ per = pattern($txt* $chanusers($C)) if (numwords($per) > 1) { - xecho -v -b Ambiguous matches: $per + xecho -b Ambiguous matches: $per sendline $* }{ sendline $stripansicodes($per$format_nick_comp $1-) @@ -17,7 +17,7 @@ if (!pattern($txt* $chanusers($C)) && pattern(*$txt* $chanusers($C))) { @ per = pattern(*$txt* $chanusers($C)) if (numwords($per) > 1) { - xecho -v -b Ambiguous matches: $per + xecho -b Ambiguous matches: $per sendline $* }{ sendline $stripansicodes($per$format_nick_comp $1-) diff -aruN amn.orig/modules/nlog/nlog.m amn/modules/nlog/nlog.m --- amn.orig/modules/nlog/nlog.m Sun Oct 2 23:25:44 2005 +++ amn/modules/nlog/nlog.m Mon Oct 10 16:52:09 2005 @@ -25,14 +25,14 @@ alias nsotog { if ( [$#] ==0) { - xecho -v [a+c] notify signoff log toggle is set to "$nsolog" + xecho -b notify signoff log toggle is set to "$nsolog" } if (match($0 on off)) { @nsolog = [$0] - xecho -v [a+c] notify signoff log toggle is set to "$nsolog" + xecho -b notify signoff log toggle is set to "$nsolog" }{ if ( [$#] &&!match($0 on off)) { - xecho -v [a+c] invalid choice, on or off. + xecho -b invalid choice, on or off. } } } @@ -41,14 +41,14 @@ #notify aliases. alias rnlog { if (fexist($nlogfile) == -1) { - xecho -v -b notify log file does not exist. + xecho -b notify log file does not exist. }{ input "remove log? [y|n]: " { if ([$0]==[y]) { exec rm $nlogfile - xecho -v -b $nlogfile deleted + xecho -b $nlogfile deleted }{ - xecho -v -b rnlog canceled + xecho -b rnlog canceled } } } @@ -68,7 +68,7 @@ @savemt = open($nfile W T) @write($savemt @nsolog=[$nsolog]) @close($savemt) - xecho -v [mod] (nlog).. notify settings saved to $nfile + xecho [mod] (nlog).. notify settings saved to $nfile } ^eval load $nfile diff -aruN amn.orig/modules/oper/oper.m amn/modules/oper/oper.m --- amn.orig/modules/oper/oper.m Sun Oct 2 23:25:55 2005 +++ amn/modules/oper/oper.m Mon Oct 10 17:36:17 2005 @@ -21,7 +21,7 @@ alias _winnames { fe ($winrefs()) n1 { - if (match($0 $winnam($n1)) > 0) { + if (match($0 $winnam($n1))) { return $n1 }{ @@ -32,19 +32,19 @@ alias ovsize { if (![$0]) { - xecho -v -b operview window size set to "$_ovsize" + xecho -b operview window size set to "$_ovsize" }{ @_ovsize=[$0] - xecho -v -b operview window size set to "$_ovsize" + xecho -b operview window size set to "$_ovsize" } } alias ovmode { if (![$0]) { - xecho -v -b oper modes set to "$_ovmode" + xecho -b oper modes set to "$_ovmode" }{ @_ovmode=[$0] - xecho -v -b oper modes set to "$_ovmode" + xecho -b oper modes set to "$_ovmode" } } @@ -61,13 +61,13 @@ alias operview { if (winnum(operview) != -1) { - abecho [a+c] toggled operview off. + abecho $banner toggled operview off. ^window OperView kill ^umode -$_ovmode }{ - abecho [a+c] toggled operview on. + abecho $banner toggled operview on. ^window new fixed on size $_ovsize name OperView level snotes,opnotes,wallops;umode +$_ovmode # ^set status_server [%S] ^set status_format [operview] %> [$servername($winserv(OperView))] @@ -90,7 +90,7 @@ alias tkline { if (![$0]) { - xecho -v [a+c] usage: /tkline [nick|hostmask] + xecho -b usage: /tkline [nick|hostmask] }{ quote kline $0 $1 :$2- } @@ -340,38 +340,27 @@ alias ohelp { if (!$[0]) { -echo -----------------------= Oper Help =-------------------------- +//echo -----------------------= Oper Help =-------------------------- -echo /tkline [nick|ident@host] will temp kline for -echo specified minutes. -echo /unkline will remove kline from server list. -echo /operwall will send a operwall with specified text to the server. -echo /ov will open up a split window will the level WALLOPS OPNOTES SNOTES -echo so all server msgs will go to that window. -echo /mkline will mass kline current channel for specified reason -echo /mkill will mass kill current channel -echo /locops will send a msg to all operators on current server -echo /kline will set a kline for nick or specified ident@host -echo /modlist view ircd modules. -echo /modload loads specified ircd module. -echo /modunload unloads specified ircd module. -echo /dline reason. will set a dline with reason. (ratbox) -echo /undline will remove a dline. (ratbox) -echo binds ^E scroll_backward in ovwin ^D scroll_forward in ovwin +//echo /tkline [nick|ident@host] will temp kline for +//echo specified minutes. +//echo /unkline will remove kline from server list. +//echo /operwall will send a operwall with specified text to the server. +//echo /ov will open up a split window will the level WALLOPS OPNOTES SNOTES +//echo so all server msgs will go to that window. +//echo /mkline will mass kline current channel for specified reason +//echo /mkill will mass kill current channel +//echo /locops will send a msg to all operators on current server +//echo /kline will set a kline for nick or specified ident@host +//echo /modlist view ircd modules. +//echo /modload loads specified ircd module. +//echo /modunload unloads specified ircd module. +//echo /dline reason. will set a dline with reason. (ratbox) +//echo /undline will remove a dline. (ratbox) +//echo binds ^E scroll_backward in ovwin ^D scroll_forward in ovwin -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } -if (_winnames(Operview) > 0) { - ^set status_format $(hblk)[$(sc1)operview$(hblk)] $(cl)%>$(hblk)\([$(cl)$servername($winserv(OperView))$(hblk)]\) -} - - -^on #-connect 53 * { - ^set status_format $(hblk)[$(sc1)operview$(hblk)] $(cl)%>$(hblk)\([$(cl)$servername($winserv(OperView))$(hblk)]\) - if (!_pubnick) { - @_pubnick=N - } -} diff -aruN amn.orig/modules/orignick/orignick.m amn/modules/orignick/orignick.m --- amn.orig/modules/orignick/orignick.m Sun Oct 2 23:26:06 2005 +++ amn/modules/orignick/orignick.m Mon Oct 10 16:53:20 2005 @@ -5,14 +5,14 @@ ^timer -del 45 alias orignick { if (![$0]) { - xecho -v [a+c] /orignick /staynick to cancel + xecho -b /orignick /staynick to cancel }{ ^timer -delete 45 @nic=[$0] ^timer -window -1 -refnum 45 -rep -1 $_ort { ^getnick $nic } - xecho -v [a+c] attempting to jupe $nic + xecho -b attempting to jupe $nic } } @@ -20,39 +20,39 @@ ^userhost $nic -cmd { if ([$3@$4] == [@]) { ^nick $nic - xecho -v [a+c] congrads nick juped. /staynick to cancel + xecho -b congrads nick juped. /staynick to cancel } } } alias staynick { ^assign -nic ^timer -delete 45 - xecho -v [a+c] /orignick request canceled. + xecho -b /orignick request canceled. } alias setorig { if (# == 0) { - xecho -v [a+c] orignick delay set to "$_ort" + xecho -b orignick delay set to "$_ort" return; } if ([$0] > 0 && [$0] <=20) { @_ort = [$0] - xecho -v [a+c] orignick delay set to "$_ort" + xecho -b orignick delay set to "$_ort" }{ - xecho -v [a+c] time out of range. Valid numbers are 1-20 + xecho -b time out of range. Valid numbers are 1-20 } } on #-channel_signoff 42 "*" { if ([$1] == nic) { ^nick $nic - xecho -v [a+c] congrads nick juped. /staynick to cancel + xecho -b congrads nick juped. /staynick to cancel } } ^on #-nickname 33 * { if ([$0]== nic) { ^nick $nic - xecho -v [a+c] congrads nick juped. /staynick to cancel + xecho -b congrads nick juped. /staynick to cancel } } diff -aruN amn.orig/modules/relay/relay.m amn/modules/relay/relay.m --- amn.orig/modules/relay/relay.m Mon Oct 10 14:53:43 2005 +++ amn/modules/relay/relay.m Mon Oct 10 17:36:27 2005 @@ -262,7 +262,7 @@ //echo $0 isn't on IRC right now. } }{ -echo usage : /frelm [fake nick] [nick/channel to send to] [fake msg]} +//echo usage : /frelm [fake nick] [nick/channel to send to] [fake msg]} } alias freln { @@ -276,7 +276,7 @@ //echo $0 isn't on IRC right now. } }{ -echo usage: /freln [fake nick] [nick/channel to send to] [fake notice]} +//echo usage: /freln [fake nick] [nick/channel to send to] [fake notice]} } ## end fake stuff. @@ -284,21 +284,21 @@ alias rhelp { if (!$[0]) { -echo -----------------------= Relay Help =-------------------------- +//echo -----------------------= Relay Help =-------------------------- -echo lpaste /lpaste will paste to current window last line recieved. -echo relm /relm then to paste msg lines in buffer. -echo relsm /relsm then to paste sent msg lines in buffer. -echo reln /reln then to paste notice lines in buffer. -echo relsn /relsn then to paste sent notice lines in buffer. -echo paste /paste then to paste line in buffer. -echo relw /relw then to paste line in buffer. -echo rel /rel -l (msg) /rel -n (notice) /rel -s (sendmsg) -echo -echo Note: you do not have to specify numbers or actually paste anything -echo to anyone when seeing what's in the buffer ie: /relm to view the last -echo 15 msgs to you then enter to avoid pasting anything. +//echo lpaste /lpaste will paste to current window last line recieved. +//echo relm /relm then to paste msg lines in buffer. +//echo relsm /relsm then to paste sent msg lines in buffer. +//echo reln /reln then to paste notice lines in buffer. +//echo relsn /relsn then to paste sent notice lines in buffer. +//echo paste /paste then to paste line in buffer. +//echo relw /relw then to paste line in buffer. +//echo rel /rel -l (msg) /rel -n (notice) /rel -s (sendmsg) +//echo +//echo Note: you do not have to specify numbers or actually paste anything +//echo to anyone when seeing what's in the buffer ie: /relm to view the last +//echo 15 msgs to you then enter to avoid pasting anything. -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } diff -aruN amn.orig/modules/shitlist/shitlist.m amn/modules/shitlist/shitlist.m --- amn.orig/modules/shitlist/shitlist.m Mon Oct 10 14:53:43 2005 +++ amn/modules/shitlist/shitlist.m Mon Oct 10 17:36:34 2005 @@ -88,14 +88,14 @@ @write($savec @shitreas.$xx=[$getitem(shitreas $xx)]) } @ close($savec) - xecho -v [mod] (shitlist).. saved to $shitsavefile + xecho [mod] (shitlist).. saved to $shitsavefile } alias unshit shitdel alias shitdel if ([$0]) { if (numitems(shitlist)<=[$0]) { //echo $banner no such user! }{ - xecho -v -b deleted shitlist entry $getitem(shitlist $0) + xecho -b deleted shitlist entry $getitem(shitlist $0) @ delitem(shitlist $0) @ delitem(shitreas $0) } @@ -215,19 +215,19 @@ alias shelp { if (!$[0]) { -echo -----------------------= Shitlist Help =-------------------------- +//echo -----------------------= Shitlist Help =-------------------------- -echo addshit /addshit [nick|ident@host] #chan1,#chan2,#chan3... level reason -echo shitlevels 1 - deop users at all time, 2 - kick user when they -echo join the channel, 3 - Ban/Kick user when they join the channel -echo fuck /fuck nick will kickban nick and add nick to your shitlist level 3 -echo listshit /listshit view current users on the shitlist. -echo delshit /delshit # removes user from the shitlist. -echo -= Shitlist Quick Alias =- -echo listbk/listshit -echo addbk/addshit -echo rembk/delshit +//echo addshit /addshit [nick|ident@host] #chan1,#chan2,#chan3... level reason +//echo shitlevels 1 - deop users at all time, 2 - kick user when they +//echo join the channel, 3 - Ban/Kick user when they join the channel +//echo fuck /fuck nick will kickban nick and add nick to your shitlist level 3 +//echo listshit /listshit view current users on the shitlist. +//echo delshit /delshit # removes user from the shitlist. +//echo -= Shitlist Quick Alias =- +//echo listbk/listshit +//echo addbk/addshit +//echo rembk/delshit -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } diff -aruN amn.orig/modules/userlist/userlist.m amn/modules/userlist/userlist.m --- amn.orig/modules/userlist/userlist.m Mon Oct 10 14:53:43 2005 +++ amn/modules/userlist/userlist.m Mon Oct 10 17:36:47 2005 @@ -94,7 +94,7 @@ @ write($savec @friends.$xx=[$getitem(friends $xx)]) } @ close($savec) - xecho -v [mod] (userlist).. saved to $frsavefile + xecho [mod] (userlist).. saved to $frsavefile } alias userdel if ([$0]) { @@ -121,14 +121,14 @@ alias setsec { if (# == 0) { - xecho -v [a+c] autop delay set to "$_ss" + xecho -b autop delay set to "$_ss" return; } if ([$0] > 0 && [$0] <=40) { @_ss = [$0] - xecho -v [a+c] autop delay set to "$_ss" + xecho -b autop delay set to "$_ss" }{ - xecho -v [a+c] time out of range. Valid numbers are 1 - 40 + xecho -b time out of range. Valid numbers are 1 - 40 } } @@ -343,22 +343,22 @@ alias uhelp { if (!$[0]) { -echo -----------------------= Userlist Help =-------------------------- +//echo -----------------------= Userlist Help =-------------------------- -echo userlist /userlist will display users from the userlist. -echo adduser /adduser [nick|ident@host] #channel userlevel1,userlevel2, -echo userlevel3 .. password. -echo userlevels ops - will op person requesting for ops ,iops - will -echo instantly op someone when they enter the channel, invite - upon ctcp -echo request, will invite user to channel, voice - will voice person when -echo enters the channel -echo listuser /listuser will display users from the userlist. -echo deluser /deluser # will delete the user from the userlist. -echo addf /addf same as /adduser -echo listf /listf same as /userlist -echo delf /delf same as /deluser -echo remf /remf same as /deluser +//echo userlist /userlist will display users from the userlist. +//echo adduser /adduser [nick|ident@host] #channel userlevel1,userlevel2, +//echo userlevel3 .. password. +//echo userlevels ops - will op person requesting for ops ,iops - will +//echo instantly op someone when they enter the channel, invite - upon ctcp +//echo request, will invite user to channel, voice - will voice person when +//echo enters the channel +//echo listuser /listuser will display users from the userlist. +//echo deluser /deluser # will delete the user from the userlist. +//echo addf /addf same as /adduser +//echo listf /listf same as /userlist +//echo delf /delf same as /deluser +//echo remf /remf same as /deluser -echo ------------------------------------------------------------------- +//echo ------------------------------------------------------------------- } } Date: Mon, 10 Oct 2005 20:34:06 -0400 (EDT) From: zak@ircii.org (Zak) -fixup scan.2 thanks to criminal -remove a TODO -update some things in CHANGES -update development version -add to web for the masses. -NOTE: INDENT is now turned off. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Oct 10 18:02:59 2005 +++ amn/CHANGES Mon Oct 10 20:29:08 2005 @@ -210,4 +210,13 @@ notice any difference. //skullY -resync to tree, i presume this is skullY's latest or 'tried to commit' //zak -fix dating format. //zak - +-fix scan.2 format to output much nicer and proper like it used to + thanks to criminal //zak +-set indenting OFF, i do not know why this was ever on or needed to be + on in the first place if anyone notices something breaks let me know + this should get rid of the trailing whitespace at the beginning. + and fixing the output_rewrite to actually do what it should do right. //zak +-increment development version to 9. might actually be getting close to + a release now after we decide the politics of what we're going to do about + some questionable skullyisms. //zak +-minor nits to TODO-BUGS. //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Fri Oct 7 12:41:00 2005 +++ amn/TODO-BUGS Mon Oct 10 20:28:50 2005 @@ -18,8 +18,6 @@ ## highest priority TODO. -adjust our 'poor mans' thuttup to be more reasonable. -fixdouble/fixwin or equiv for doublestats --check into the new windowing stuff in -cvs. and correct aliases/add - aliases if needs to be. ## Higher priority requests. @ add a topiclock alias (like bitchx) for xavier. diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Fri Oct 7 11:06:31 2005 +++ amn/core/sets.m Mon Oct 10 20:30:03 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[8] +@rel_id=[9] @a.rel=[1.1d r/$rel_id] @a.date=[20050903] @_ss=[15] diff -aruN amn.orig/sc/scan.2 amn/sc/scan.2 --- amn.orig/sc/scan.2 Sun Oct 2 23:32:35 2005 +++ amn/sc/scan.2 Mon Oct 10 20:22:34 2005 @@ -4,12 +4,12 @@ @format_scan_users=[ $$(hblk)[$$(c1)o$$(hblk)!$$(wht)$$1$(cl)$$(hblk)] $$(hblk)[$$(c1)n$$(hblk)!$$(wht)$$2$$(hblk)] $$(hblk)[$$(c1)v$$(hblk)!$$(wht)$$3$$(hblk)]] @format_scan_width=15 -@format_scan_header=[ $$(hwht)ÚÄÄ$$(cl)Ä$$(hwht)Ä$$(cl)ÄÄÄÄÄ$$(c1)ÄÄ-ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ$$(hblk)ÄÄÄÄÄÄÄÄÄÄÄ-] +@format_scan_header=[$$(hwht)ÚÄÄ$$(cl)Ä$$(hwht)Ä$$(cl)ÄÄÄÄÄ$$(c1)ÄÄ-ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ$$(hblk)ÄÄÄÄÄÄÄÄÄÄÄ-] @format_scan_onjoin_nicks_border=[$$(hblk)[$$(c1)³$$(hblk)]] -@format_scan_onjoin_nicks=[ $$(hblk)[$$(cl)$$fix.scan($1)$$(hblk)]] +@format_scan_onjoin_nicks=[$$(hblk)[$$(cl)$$fix.scan($1)$$(hblk)]] @format_scan_nicks_border=[$$(hblk)[$$(c1)³$$(hblk)] -@format_scan_nicks=[ $$(hblk)[$$(cl)$$fix.scan2($1)$$(hblk)] -@format_scan_footer=[ $$(c1)À-$$(hblk)----ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ----ÄÄ Ä ÄÄÄ] +@format_scan_nicks=[$$(hblk)[$$(cl)$$fix.scan2($1)$$(hblk)] +@format_scan_footer=[$$(c1)À-$$(hblk)----ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ----ÄÄ Ä ÄÄÄ] @format_scan_users_op=[$$(hblk)[$$(c1)o$$(hblk)!$$(wht)$$1$$(cl)$$(hblk)]] @format_scan_users_non=[$$(hblk)[$$(c1)n$$(hblk)!$$(wht)$$1$$(hblk)]] @format_scan_users_voc=[$$(hblk)[$$(c1)v$$(hblk)!$$(wht)$$1$$(hblk)]] diff -aruN amn.orig/settings amn/settings --- amn.orig/settings Fri Oct 7 10:53:46 2005 +++ amn/settings Mon Oct 10 19:40:07 2005 @@ -11,7 +11,7 @@ set auto_rejoin_delay 5 set num_of_whowas 2 set auto_whowas on -set indent on +set indent off set show_who_hopcount on set show_channel_names off set mode_stripper on Date: Tue, 11 Oct 2005 00:58:06 +0000 From: Zach White This should make zak happy. Fix all the xechos to be xecho $acban where appropriate. May need some fine tuning, but should be pretty ok as is. amn diff diff amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Tue Oct 11 00:52:09 2005 +++ amn/core/alias.m Tue Oct 11 00:51:38 2005 @@ -55,7 +55,7 @@ alias cfinger ctcp $0 finger ## script echo ##still need to clean some of this up. -alias abwecho xecho -b -v $cparse($*) +alias abwecho xecho -v $acban $cparse($*) alias awecho xecho -v $cparse($*) alias aecho //echo $cparse($*) alias abecho xecho -b -- $cparse($*) @@ -137,14 +137,14 @@ alias orw { ^set -output_rewrite ^set output_rewrite $_paste($1-) $1- - xecho -b output indent set to "on" + xecho $acban output indent set to "on" } alias wrap orww alias orww { ^set -output_rewrite ^set output_rewrite $_paste($1-)$1- - xecho -b output linewrap set to "on" + xecho $acban output linewrap set to "on" } ## end output_rewrite sillyness. @@ -192,14 +192,14 @@ } alias fctcp if (![$0]) { - xecho -b syn: /fctcp nick/channel + xecho $acban syn: /fctcp nick/channel }{ notice $0 $chr(1)$1-$chr(1) } alias mw { if (![$0]) { - xecho -b /mw -hidden|split|kill + xecho $acban /mw -hidden|split|kill } switch ($0) { (-hidden) {^window new hide swap last level msgs name msgs} diff amn.orig/core/alias.m.orig amn/core/alias.m.orig --- amn.orig/core/alias.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/alias.m.orig Mon Oct 10 20:25:31 2005 @@ -0,0 +1,278 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +subpackage alias + +## last modified by crapple 10.1.05 + +## various commands. +alias sc scan $* +alias quit bye $* +alias ismask {return ${pass(!@ $0) ? 1 : 0}} +alias recho eval //echo $* +alias save saveall +alias settings config $* + +## more/less info from server. +alias ww whowas $* +alias wi whois $* +alias w whois $* +alias who {//who ${# ? [$*] : T}} +alias links ^quote links $* +alias wii {if (![$0]) {whois $N $N} {whois $0 $0}} +alias smsg quote server :$* +alias svrtime time $S +alias disco disconnect $* +alias sb bans + +## cid(+g) +alias accept { quote accept $*} +alias cid accept $* +alias rmcid { quote accept -$*} +alias acceptlist { quote accept * } +alias cidlist acceptlist +alias rmaccept rmcid $* +alias acceptdel rmcid $* + +## dalnets dcc bullshit so called "protection" +alias allow dccallow $* +alias dccallow {quote dccallow $*} + +## add these nickserv/memoserv/chanserv stuff here. +## not everyone wants to load everything in the services module just +## for these aliases. +alias ms {quote MemoServ $*} +alias ns {quote NickServ $*} +alias cs {quote ChanServ $*} +alias chanserv cs $* +alias nickserv ns $* +alias memoserv ms $* + +## ctcp user aliases +alias ctime ctcp $0 time +alias cinfo ctcp $0 clientinfo +alias cuinfo ctcp $0 userinfo +alias cfinger ctcp $0 finger + +## script echo ##still need to clean some of this up. +alias abwecho xecho -b -v $cparse($*) +alias awecho xecho -v $cparse($*) +alias aecho //echo $cparse($*) +alias abecho xecho -b -- $cparse($*) +alias ce //echo $cparse("$*") + +## to be annoying like xavier. +alias blinky msg $T $cparse("%F%G$*") + +## general user commands +alias umode {^mode $N $*} +alias m msg $* +alias d describe $* +alias j {/join $channame($0) $1-} +alias p part $* +alias k kick $* +alias l part $* +alias host //userhost $* +alias realname {set realname $*} +alias irchost hostname $* +alias unset set -$* +alias unalias alias -$* + +## help shortcuts. +alias a ahelp $* +alias about {more $(loadpath)ans/about.ans} + +## amnesiac configuration cmd's can be saved with /save +alias cumode {config f $*} +alias autoaway {config g $*} +alias kickonban {config i $*} +alias kickops {config j $*} +alias resp {config r $*} +alias timestamp {config t $*} +alias stamp {timestamp $*} +alias protect {config w $*} +alias otime {config p $*} +alias extpub {config h $*} +alias tform {format 3 $*} +alias dstat {config z $*} + +## compat aliases from other irc clients to emulate the same thing. +alias awayt awaytime $* +alias verk {massk $*} +alias csc clear;sc + +## exec commands. +alias iwhois {exec whois $0 $*} +alias touch {exec touch $0- $*} +alias ls ^exec ls -F $* +alias osv {^exec -o uname -amnvp} +alias ps ^exec ps $* +alias mkdir {exec mkdir $*} +alias rm {exec rm -rf $*} +alias hosts {exec host $*} +alias dig {exec dig $*} + +## builtin simplification aliases. +alias arejoin {set auto_rejoin toggle} +alias aww {set auto_whowas toggle} +alias cmd {set command_chars $*} +alias debug {set debug $*} +alias beep {set beep toggle} +alias lls {set lastlog $*} +alias mirc {set mirc_broken_resume toggle} +alias ircname {set realname $*} +alias shist {set scrollback $*} +alias uinfo {set user_information $*} +alias vctcp {set verbose_ctcp togggle} +alias mon {set old_math_parser on} +alias moff {set old_math_parser off} +alias ioff {set -input_prompt} + +## dumps and reload script, for scripters and advanced users in general. +alias adump dump all;fe ($getarrays()) n1 {@delarray($n1)};unload * fe;load ~/.epicrc + +## so ppl can choose their poison on output_rewrite now that we don't have +## static timestamping format. +alias indent orw +alias orw { + ^set -output_rewrite + ^set output_rewrite $_paste($1-) $1- + xecho -b output indent set to "on" +} + +alias wrap orww +alias orww { + ^set -output_rewrite + ^set output_rewrite $_paste($1-)$1- + xecho -b output linewrap set to "on" +} +## end output_rewrite sillyness. + +## CrazyEddie's alias +alias comatch return ${match($*)||rmatch($*)} +## end + +alias _center { +@ number = (word(0 $geom()) - printlen($stripcrap(ANSI,COLOR $*))) / 2 +xecho -w $0 $repeat($trunc(0 $number) )$* + +} + +## long complex aliases below here. +alias fixterm { + exec //echo '$chr(27)\(U' + xecho -r $chr(27)\(U +} + +alias ibm437 fixterm + +alias latin1 { + exec //echo '$chr(27)\(B' + xecho -r $chr(27)\(B + } + +alias cat { + if ([$#]) { + @:ansifile = open($0 R T) + while (!eof($ansifile)) { + //echo $read($ansifile) + } + @close($ansifile) + } +} + +alias evalcat { + if ([$#]) { + @:ansifile = open($0 R T) + while (!eof($ansifile)) { + eval //echo $read($ansifile) + } + @close($ansifile) + } +} + +alias fctcp if (![$0]) { + xecho -b syn: /fctcp nick/channel + }{ + notice $0 $chr(1)$1-$chr(1) +} + +alias mw { + if (![$0]) { + xecho -b /mw -hidden|split|kill + } + switch ($0) { + (-hidden) {^window new hide swap last level msgs name msgs} + (-split) {^window new fixed on size 7 level msgs status_format %>$(hblk)[$(cl)msgs$(hblk)]$(cl) name msgs;^window back} + (-kill) {^window msgs kill} + } + } + + +alias getuhost { + if (userhost($0)==[@]) { + wait for userhost $0 -cmd { + return ${[$4] != [] ? [$3@$4] :} + } + }{ + return $userhost($0) + } + } + +alias bye if ([$0]) { + //quit $(J)[$info(i)] - $(a.ver) : $* +}{ + //eval //quit $(J)[$info(i)] - $(a.ver) : $randread($(loadpath)quit.reasons) +} + +alias supt +{ + msg $T ircII $(J) \($V\) [$info(i)] "$info(r)" client uptime: $tdiff2(${time() - F}) +} + +## taken from cypress +alias _pad { + @ function_return = [$1-$repeat(${[$0] - _printlen($1-)} )] +} + +alias ping { + if (![$0]) { + //ping $C + }{ + //ping $0 + } +} + +alias part { + if ([$0]) { + switch ($0) { + (#*) (&*) (0) (-*) (!*) (+*) { + //quote PART $0 :$1- + } + (*) { + part $C $* + } + } + }{ + //quote PART $C + } +} + +alias rn { + @_rn=[a b c d e f g h i j k l m n o p q r s t u v w x y z 1 2 3 4 5] + fe ($_rn) n1 { + @setitem(_rn $numitems(_rn) $n1) + } + ^nick $(getitem(_rn $rand($numitems(_rn))))$(getitem(_rn $rand($numitems(_rn))))$(getitem(_rn $rand($numitems(_rn))))$(getitem(_rn $rand($numitems(_rn))))$(getitem(_rn $rand($numitems(_rn))))$(getitem(_rn $rand($numitems(_rn)))) +} + +alias ver { + if (![$0]) { + //ctcp $C version + }{ + //ctcp $0 version + } +} + + +oof diff amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Tue Oct 11 00:52:09 2005 +++ amn/core/bans.m Tue Oct 11 00:51:38 2005 @@ -110,24 +110,24 @@ } alias kob { if (![$0]) { - xecho -v -b kick on ban set to "$kickonban"} + xecho -v $acban kick on ban set to "$kickonban"} if (match($0 on off)) {@kickonban = [$0] - xecho -v -b kick on ban set to "$kickonban" + xecho -v $acban kick on ban set to "$kickonban" }{ if ([$0]&&!match($0 on off)) { - xecho -v -b invalid choice + xecho -v $acban invalid choice } } } alias kops { if (![$0]) { - xecho -v -b kick ops on ban set to "$kickops"} + xecho -v $acban kick ops on ban set to "$kickops"} if (match($0 on off)) {@kickops = [$0] - xecho -v -b kick ops on ban set to "$kickops" + xecho -v $acban kick ops on ban set to "$kickops" }{ if ([$0]&&!match($0 on off)) { - xecho -v -b invalid choice + xecho -v $acban invalid choice } } diff amn.orig/core/bans.m.orig amn/core/bans.m.orig --- amn.orig/core/bans.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/bans.m.orig Mon Oct 10 20:55:43 2005 @@ -0,0 +1,161 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +subpackage bans +## Robohak's tban and takeall alias + +alias tban { + ^on 367 - + ^on ^367 * { + @setitem(bans.$1 $numitems(bans.$1) $2-) + } + ^on ^368 * { + on 367 - + if (numitems(bans.$2)) { + @chan=[$2] + for (@:xx=0,xx0 && cc<=numitems(bans.$chan)) { + + mode $chan -b $word(0 $getitem(bans.$chan ${cc-1})) + + } + + } + } + + + @delarray(bans.$chan) + @chan=[] + ^on 368 - + + } + } + { + ^on 368 - + } + } + ^mode $C b + +} + +alias banstat { + if (![$0]) { + ^mode $C b + }{ + ^mode $0 b} + ^on ^367 * { + //echo $(hblk)[$(cl)$[15]1$(hblk)] [$(cl)$[9]before(! $3)$(hblk)] [$(cl)$2$(hblk)] $(cl)$word(3 $stime($4)) + } + wait -cmd ^on ^367 -"*" + + } + +alias takeall if (![$0]) { + ^on ^367 * { + @setitem(ubans $numitems(ubans) $2) + if (numitems(ubans)==4) { + for (@:xx=0,xx<4,@:xx+=4) { + mode $C -bbbb $getitem(ubans $xx) $getitem(ubans ${xx+1}) $getitem(ubans ${xx+2}) $getitem(ubans ${xx+3}) + } + @delarray(ubans) + } + } + ^on ^368 * { + ^on ^367 -"*" + if (:num=numitems(ubans)) { + mode $C -$repeat($num b) $getitem(ubans 0) ${num>1?getitem(ubans 1):[]} ${num>2?getitem(ubans 2):[]} + } + @delarray(ubans) + ^on ^368 -"*" + } + ^mode $C b +} + +alias ub if (![$0]) {^takeall} { + if (match(*!*@* $0)) { + mode $C -b $0 + }{ + ^on ^367 * { + @setitem(ubans $numitems(ubans) $2) + } + ^mode $C +b + ^userhost $0 -cmd { + if (rmatchitem(ubans $0!$3@$4) == -2) { + }{ + ^mode $C -b $getitem(ubans $rmatchitem(ubans $0!$3@$4)) + } + + @delarray(ubans) + } + ^on ^368 ^* + } + +} +alias kob { + if (![$0]) { + xecho -v -b kick on ban set to "$kickonban"} + if (match($0 on off)) {@kickonban = [$0] + xecho -v -b kick on ban set to "$kickonban" + }{ + if ([$0]&&!match($0 on off)) { + xecho -v -b invalid choice + } + } + + } +alias kops { + if (![$0]) { + xecho -v -b kick ops on ban set to "$kickops"} + if (match($0 on off)) {@kickops = [$0] + xecho -v -b kick ops on ban set to "$kickops" + }{ + if ([$0]&&!match($0 on off)) { + xecho -v -b invalid choice + } + } + + } + +^on #-mode_stripped 43 "% % +b*" { + if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { + fe ($onchannel($1)) n1 { + @bannick = pattern($3 $n1!$userhost($n1)) + if (kickops ==[on]) { + if (bannick) { + kick $1 $before(! $bannick) banned + } + } + if (kickops ==[off] && !ischanop($n1 $1)) { + if (bannick) { + kick $1 $before(! $bannick) banned + } } + } + + } + } + +alias _selfban { + if ([$0]==[ON] || [$0]==[OFF]) { + @_ubanself = [$0] + xecho -v (sprot).. unban self set to $0 + }{ + xecho -v (sprot).. unban self set to $_ubanself + } +} diff amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Tue Oct 11 00:52:09 2005 +++ amn/core/channel.m Tue Oct 11 00:51:38 2005 @@ -91,7 +91,7 @@ alias qk { if (![$0]) { - xecho -b usage: /qk - will bankick specified nick then unban them after 5 seconds. + xecho $acban usage: /qk - will bankick specified nick then unban them after 5 seconds. }{ bankick $* @_bnick=[$0] diff amn.orig/core/channel.m.orig amn/core/channel.m.orig --- amn.orig/core/channel.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/channel.m.orig Mon Oct 3 03:00:19 2005 @@ -0,0 +1,361 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage channel + +## op/oper commands. +alias bki {bk $*;ignore $0 msgs} +alias kbi {kb $*;ignore $0 msgs} +alias bkt {qk $*} +alias ov operview +alias unban ub $* +alias clearbans ub $* +alias not {^topic -$C } +alias untopic not +alias bans banstat +alias alldop mdeop +alias alldeop mdep +alias mdop mdeop +alias dop {deop $*} +alias allop mop +alias dv devoice $* +alias v voice $* +alias t topic $* +alias c {^mode $C $*} +alias i ixs +alias e exs +alias -I {^mode $C -I $*} +alias -E {^mode $C -e $*} +alias +I {^mode $C +I $*} +alias +E {^mode $C +e $*} +alias bk {bankick $*} +alias kb {bankick $*} +alias cmode {c $*} + +## misc parts. +alias epart emopart $* +alias dpart emopart $* +alias lall partall + +## diff ban types. +alias fuckem lban +alias lban mode $C +bbb *!*@0.0.0.0/1 *!*@128.0.0.0/1 *!*@0000::/1 $0 $0 $0 $0 +alias ip6ban {mode $C +b *!*@0000::/1} +alias ip4ban {mode $C +b *!*@0.0.0.0/1} +alias fakeop mode $C +oo-oo $0 $0 $0 $0 $0 $0 $0 $0 +alias hban {mode $C +b <3!<3@<3} + +## chan info. +alias scano sco $* +alias scanv scv $* +alias scann scn $* +alias n ^names $C + +## misc more complex aliases. + +alias emopart { + part $C $srand$randread($(loadpath)emopart.reasons) +} + +alias partall { + part $sar(g/ /,/$mychannels()) +} + +alias cops { + ^on who -* + ^on ^who * { + if ([$[2]2]==[G*] ^^ [$[2]2]==[H*]) { + xecho -w $winchan $cparse($(c1) $[9]0) $cparse($(c2) $[9]1) $cparse($(c1) $[20]5) $(cl)$3$cparse($(c1)@)$(cl)$4 + } + } + who $C + wait + ^on who -* + ^on ^who * { + xecho -w $winchan $cparse($(c1) $[9]0) $cparse($(c2) $[9]1) $cparse($(c1) $[20]5) $(cl)$3$cparse($(c1)@)$(cl)$4 + } +} + +alias sync { + @cmodes=[$M] + /c +m - $cmodes;/c -m + $cmodes + } + +alias omode { + if ([$0]==[on]) { + umode +sckf + } + if ([$0]==[off]) { + umode -sckf + } + } + +alias qk { + if (![$0]) { + xecho -b usage: /qk - will bankick specified nick then unban them after 5 seconds. + }{ + bankick $* + @_bnick=[$0] + ^timer 5 {ub $_bnick} + } +} + +alias unkey (void) +{ + if (match(*k* $chanmode())) { + //mode $C -k + } else { + xecho -b No key on channel $C + } +} + +alias ban if (![$0]) { + xecho -b syn: /ban nick + }{ + if (match(*!*@* $0)) { + //mode $C +b $0 + }{ + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($_bt $0!$3@$4) + + } + } + }{ + //mode $C +b $mask($_bt $0!$userhost($0)) + + } + + } +} + +alias inv { + if (![$1]) { + ^invite $0 $C + }{ + ^invite $0 $1 + } +} + +alias kick { + if (numwords($*) == 0) { + xecho -b Usage: /KICK [reason]; + return + } + if ( numwords($*) < 2) { + //kick $C $0 $randread($(loadpath)kick.reasons) + }{ + //kick $C $0 $1- + } +} + +alias 4op { + fe ($*) ii { + ^quote mode $C +oooo $ii $ii $ii $ii + } +} + +alias 4v { + fe ($*) ii { + ^quote mode $C +vvvv $ii $ii $ii $ii + } +} + +alias bankick { + if (![$0]) { + xecho -b syn: /bankick nick + }{ + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($_bt $0!$3@$4) + } + } + }{ + //mode $C -o+b $0 $mask($_bt $0!$userhost($0)) + } + kick $* + } +} + +alias kickban if (![$0]) { + xecho -b usage: /kickban nick + }{ if ( numwords($*) < 2) { + if (![$@1]) { + kick $* + }{ + kick $C $0 $1- + }} + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + + if ([$3@$4]!=[@]) { + //mode $C +b $mask($_bt $0$3@$4) + } + } + }{ + //mode $C +b $mask($_bt $userhost($0)) + } +} + +alias iban if ([$0]) { + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b *!*$3@* + } + } + }{ + //mode $C +b *!*$before(@ $userhost($0))@* + } + kick $* +} + +alias op if (![$0]) { + banner.lchead + banner.mid syn: /op + banner.foot +}{ + if (match(*#* $*)) { + fe ($1-) ii jj kk ll { + //mode $0 +oooo $ii $jj $kk $ll + } + }{ + fe ($*) ii jj kk ll { + //mode $C +oooo $ii $jj $kk $ll + } + } +} + +alias voice { + fe ($*) ii jj kk ll { + //mode $C +vvvv $ii $jj $kk $ll + } +} + +alias devoice { + fe ($*) ii jj kk ll { + //mode $C -vvvv $ii $jj $kk $ll + } +} + +alias deop { + fe ($*) ii jj kk ll { + //mode $C -oooo $ii $jj $kk $ll + } +} + +alias mv { + fe ($nochops()) ii jj kk ll { + //mode $C +vvvv $ii $jj $kk $ll + } +} + +alias mdv { + fe ($msar(g/?//@//.//+//$pattern(*+* $channel()))) ii jj kk ll { + //mode $C -vvvv $ii $jj $kk $ll + } +} + +alias mreop { + fe ($chops()) ii jj kk ll { + //mode $C +oooo $ii $jj $kk $ll + } +} + +alias mop { + fe ($nochops()) ii jj kk ll { + //mode $C +oooo $ii $jj $kk $ll + } +} + +alias mdeop { + if ([$0]) { + @_chanm=sar(g/,/ /$rest(1 $0-)) + fe ($remw($N $remws($_chanm / $chops()))) o1 o2 o3 o4 { + ^quote mode $C -oooo $o1 $o2 $o3 $o4 + } + xecho -b mass deoping $C minus $_chanm + }{ + fe ($remw($N $chops())) o1 o2 o3 o4 { + ^quote mode $C -oooo $o1 $o2 $o3 $o4 + } + xecho -b mass deoping $C + } + +} + +alias cycle { + @:chan=ischannel($0)?[$0]:C + @:key=key($chan) + xecho -b cycling on channel $chan\, one moment... + ^quote part $chan;wait;join $chan $key +} + +alias ecycle { + @:chan=ischannel($0)?[$0]:C + @:key=key($chan) + xecho -b emo cycling on channel $chan\, one moment... + ^emopart $chan;wait;join $chan $key +} + +alias waitop { + timer $srand($time())$rand(10) { + if (! [$ischanop($0 $1)]) { + mode $1 +o $0 } + } + } + + +alias lk if ([$0]) { + fe ($nochops()) n1 { + if (!ischanvoice($n1)) { + k $n1 $* + } + } +}{ + fe ($nochops()) n1 { + if (!ischanvoice($n1)) { + k $n1 mass kick + } + } +} +alias mko if ([$0]) { + fe ($remw($N $chops())) n1 { + k $n1 $* + } + }{ + fe ($remw($N $chops())) n1 { + k $n1 mass kick + } + } + +alias mkn if ([$0]) { + fe ($remw($N $nochops())) n1 { + k $n1 $* + } + }{ + fe ($remw($N $nochops())) n1 { + k $n1 mass kick + } +} + + +alias massk if (![$0]) { + xecho -b usage: /massk + }{ + @kvar=[$0] + xecho -b kicking all users with $kvar in version reply. + ^ver $C + ^on ^ctcp_reply "% % VERSION *" { + if (ischanop($0 $C)==0 || kickops == [on]) { + if (match(*$kvar* $2-)) { + k $0 $kvar is leet!@#$%^&* + } + } + } + + ^timer 50 ^on ^ctcp_reply -"% % VERSION *" +} + +oof diff amn.orig/core/fkey.m amn/core/fkey.m --- amn.orig/core/fkey.m Tue Oct 11 00:52:09 2005 +++ amn/core/fkey.m Tue Oct 11 00:51:38 2005 @@ -13,117 +13,117 @@ switch ($0) { (1) { if (![$1]) { - xecho -b function key 1 set to $fke1 + xecho $acban function key 1 set to $fke1 }{ @fke1 = [$1-] ^bind ^[[11~ parse_command $fke1 ^bind ^[[[A parse_command $fke1 ^bind ^[OP parse_command $fke1 - xecho -b function key 1 set to $fke1 + xecho $acban function key 1 set to $fke1 } } (2) { if (![$1]) { - xecho -b function key 2 set to $fke2 + xecho $acban function key 2 set to $fke2 }{ @fke2 = [$1-] ^bind ^[[12~ parse_command $fke2 ^bind ^[[[B parse_command $fke2 ^bind ^[OQ parse_command $fke2 - xecho -b function key 2 set to $fke2 + xecho $acban function key 2 set to $fke2 } } (3) { if (![$1]) { - xecho -b function key 3 set to $fke3 + xecho $acban function key 3 set to $fke3 }{ @fke3 = [$1-] ^bind ^[[13~ parse_command $fke3 ^bind ^[[[C parse_command $fke3 ^bind ^[OR parse_command $fke3 - xecho -b function key 3 set to $fke3 + xecho $acban function key 3 set to $fke3 } } (4) { if (![$1]) { - xecho -b function key 4 set to $fke4 + xecho $acban function key 4 set to $fke4 }{ @fke4 = [$1-] ^bind ^[[14~ parse_command $fke4 ^bind ^[[[D parse_command $fke4 ^bind ^[OS parse_command $fke4 - xecho -b function key 4 set to $fke4 + xecho $acban function key 4 set to $fke4 }} (5) { if (![$1]) { - xecho -b function key 5 set to $fke5 + xecho $acban function key 5 set to $fke5 }{ @fke5 = [$1-] ^bind ^[[15~ parse_command $fke5 ^bind ^[[[E parse_command $fke5 - xecho -b function key 5 set to $fke5 + xecho $acban function key 5 set to $fke5 }} (6) { if (![$1]) { - xecho -b function key 6 set to $fke6 + xecho $acban function key 6 set to $fke6 }{ @fke6 = [$1-] ^bind ^[[17~ parse_command $fke6 - xecho -b function key 6 set to $fke6 + xecho $acban function key 6 set to $fke6 }} (7) { if (![$1]) { - xecho -b function key 7 set to $fke7 + xecho $acban function key 7 set to $fke7 }{ @fke7 = [$1-] ^bind ^[[18~ parse_command $fke7 - xecho -b function key 7 set to $fke7 + xecho $acban function key 7 set to $fke7 }} (8) { if (![$1]) { - xecho -b function key 8 set to $fke8 + xecho $acban function key 8 set to $fke8 }{ @fke8 = [$1-] ^bind ^[[19~ parse_command $fke8 - xecho -b function key 8 set to $fke8 + xecho $acban function key 8 set to $fke8 }} (9) { if (![$1]) { - xecho -b function key 9 set to $fke9 + xecho $acban function key 9 set to $fke9 }{ @fke9 = [$1-] ^bind ^[[20~ parse_command $fke9 - xecho -b function key 9 set to $fke9 + xecho $acban function key 9 set to $fke9 }} (10) { if (![$1]) { - xecho -b function key 10 set to $fke10 + xecho $acban function key 10 set to $fke10 }{ @fke10 = [$1-] ^bind ^[[21~ parse_command $fke10 - xecho -b function key 10 set to $fke10 + xecho $acban function key 10 set to $fke10 }} (11) { if (![$1]) { - xecho -b function key 11 set to $fke11 + xecho $acban function key 11 set to $fke11 }{ @fke11 = [$1-] ^bind ^[[23~ parse_command $fke11 - xecho -b function key 11 set to $fke11 + xecho $acban function key 11 set to $fke11 }} (12) { if (![$1]) { - xecho -b function key 12 set to $fke12 + xecho $acban function key 12 set to $fke12 }{ @fke12 = [$1-] ^bind ^[[24~ parse_command $fke12 - xecho -b function key 12 set to $fke12 + xecho $acban function key 12 set to $fke12 }} } } diff amn.orig/core/fkey.m.orig amn/core/fkey.m.orig --- amn.orig/core/fkey.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/fkey.m.orig Mon Oct 10 20:27:29 2005 @@ -0,0 +1,152 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage fkey + +alias fkeys { + load $(loadpath)ans/fkeys.ans +} + +alias fkey { + if (![$0]) { + load $(loadpath)ans/fkeys.ans + }{ + switch ($0) { + (1) { + if (![$1]) { + xecho -b function key 1 set to $fke1 + }{ + @fke1 = [$1-] + ^bind ^[[11~ parse_command $fke1 + ^bind ^[[[A parse_command $fke1 + ^bind ^[OP parse_command $fke1 + xecho -b function key 1 set to $fke1 + } + } + (2) { + if (![$1]) { + xecho -b function key 2 set to $fke2 + }{ + @fke2 = [$1-] + ^bind ^[[12~ parse_command $fke2 + ^bind ^[[[B parse_command $fke2 + ^bind ^[OQ parse_command $fke2 + xecho -b function key 2 set to $fke2 + } } + (3) { + if (![$1]) { + xecho -b function key 3 set to $fke3 + }{ + @fke3 = [$1-] + ^bind ^[[13~ parse_command $fke3 + ^bind ^[[[C parse_command $fke3 + ^bind ^[OR parse_command $fke3 + xecho -b function key 3 set to $fke3 + } } + (4) { + if (![$1]) { + xecho -b function key 4 set to $fke4 + }{ + + @fke4 = [$1-] + ^bind ^[[14~ parse_command $fke4 + ^bind ^[[[D parse_command $fke4 + ^bind ^[OS parse_command $fke4 + xecho -b function key 4 set to $fke4 + }} + (5) { + if (![$1]) { + xecho -b function key 5 set to $fke5 + }{ + @fke5 = [$1-] + ^bind ^[[15~ parse_command $fke5 + ^bind ^[[[E parse_command $fke5 + xecho -b function key 5 set to $fke5 + }} + (6) { + if (![$1]) { + xecho -b function key 6 set to $fke6 + }{ + + @fke6 = [$1-] + ^bind ^[[17~ parse_command $fke6 + xecho -b function key 6 set to $fke6 + }} + (7) { + if (![$1]) { + xecho -b function key 7 set to $fke7 + }{ + @fke7 = [$1-] + ^bind ^[[18~ parse_command $fke7 + xecho -b function key 7 set to $fke7 + }} + (8) { + if (![$1]) { + xecho -b function key 8 set to $fke8 + }{ + + @fke8 = [$1-] + ^bind ^[[19~ parse_command $fke8 + xecho -b function key 8 set to $fke8 + }} + (9) { + if (![$1]) { + xecho -b function key 9 set to $fke9 + }{ + + @fke9 = [$1-] + ^bind ^[[20~ parse_command $fke9 + xecho -b function key 9 set to $fke9 + }} + (10) { + if (![$1]) { + xecho -b function key 10 set to $fke10 + }{ + + @fke10 = [$1-] + ^bind ^[[21~ parse_command $fke10 + xecho -b function key 10 set to $fke10 + }} + + (11) { + if (![$1]) { + xecho -b function key 11 set to $fke11 + }{ + + @fke11 = [$1-] + ^bind ^[[23~ parse_command $fke11 + xecho -b function key 11 set to $fke11 + }} + (12) { + if (![$1]) { + xecho -b function key 12 set to $fke12 + }{ + + @fke12 = [$1-] + ^bind ^[[24~ parse_command $fke12 + xecho -b function key 12 set to $fke12 + }} + } + } +} + +^bind ^[[[A parse_command $fke1 +^bind ^[OP parse_command $fke1 +^bind ^[[11~ parse_command $fke1 +^bind ^[[[B parse_command $fke2 +^bind ^[OQ parse_command $fke2 +^bind ^[[12~ parse_command $fke2 +^bind ^[[[C parse_command $fke3 +^bind ^[OR parse_command $fke3 +^bind ^[[13~ parse_command $fke3 +^bind ^[[[D parse_command $fke4 +^bind ^[OS parse_command $fke4 +^bind ^[[14~ parse_command $fke4 +^bind ^[[[E parse_command $fke5 +^bind ^[[15~ parse_command $fke5 +^bind ^[[17~ parse_command $fke6 +^bind ^[[18~ parse_command $fke7 +^bind ^[[19~ parse_command $fke8 +^bind ^[[20~ parse_command $fke9 +^bind ^[[21~ parse_command $fke10 +^bind ^[[23~ parse_command $fke11 +^bind ^[[24~ parse_command $fke12 diff amn.orig/core/format.m amn/core/format.m --- amn.orig/core/format.m Tue Oct 11 00:52:09 2005 +++ amn/core/format.m Tue Oct 11 00:51:38 2005 @@ -46,66 +46,68 @@ if (isnumber($0)&&[$0] to set msg format - xecho -b current format set to $mform - @format_msg = getitem(mform $mform) + xecho $acban /format a to set msg format + xecho $acban current format set to $mform + @format_msg = getitem(mform $mform) } alias smform if ([$0]) { if (isnumber($0)&&[$0] to set send msg format - xecho -b current format set to $smform - @format_send_msg=getitem(smform $smform) + xecho $acban /format b to set send msg format + xecho $acban current format set to $smform + @format_send_msg=getitem(smform $smform) } alias pubform if ([$0]) { if (isnumber($0)&&[$0] to set public format - xecho -b current format set to $pubform - @format_public=getitem(pubform $pubform) + xecho $acban /format c to set public format + xecho $acban current format set to $pubform + @format_public=getitem(pubform $pubform) } alias spubform if ([$0]) { if (isnumber($0)&&[$0] to set send public format - xecho -b current format set to $spubform - @format_send_public=getitem(spubform $spubform) + xecho -b /format d to set send public format + xecho -b current format set to $spubform + @format_send_public=getitem(spubform $spubform) } @@ -160,10 +163,10 @@ if (isnumber($0)&&[$0] to set public other format - xecho -b current format set to $spuboform + xecho $acban /format e to set public other format + xecho $acban current format set to $spuboform @format_public_other=getitem(spuboform $spuboform) } @@ -190,10 +193,10 @@ if (isnumber($0)&&[$0] to set signoff format - xecho -b current format set to $signform - @format_signoff=getitem(signform $signform) + xecho $acban /format f to set signoff format + xecho $acban current format set to $signform + @format_signoff=getitem(signform $signform) } alias joinform if ([$0]) { if (isnumber($0)&&[$0] to set join format - xecho -b current format set to $joinform - @format_join=getitem(joinform $joinform) + xecho $acban /format g to set join format + xecho $acban current format set to $joinform + @format_join=getitem(joinform $joinform) } @@ -250,10 +253,10 @@ if (isnumber($0)&&[$0] to set leaveoff format - xecho -b current format set to $leaveform - @format_leave=getitem(leaveform $leaveform) + xecho $acban /format h to set leaveoff format + xecho $acban current format set to $leaveform + @format_leave=getitem(leaveform $leaveform) } alias modeform if ([$0]) { if (isnumber($0)&&[$0] to set modeoff format - xecho -b current format set to $modeform - @format_mode=getitem(modeform $modeform) + xecho $acban /format i to set modeoff format + xecho $acban current format set to $modeform + @format_mode=getitem(modeform $modeform) } alias notform if ([$0]) { if (isnumber($0)&&[$0] to set notice format - xecho -b current format set to $notform - @format_notice = getitem(notform $notform) + xecho $acban /format j to set notice format + xecho $acban current format set to $notform + @format_notice = getitem(notform $notform) } + alias pubnotform if ([$0]) { if (isnumber($0)&&[$0] to set public notice format - xecho -b current format set to $pubnotform - @format_public_notice=getitem(pubnotform $pubnotform) + xecho $acban /format z to set public notice format + xecho $acban current format set to $pubnotform + @format_public_notice=getitem(pubnotform $pubnotform) } alias snotform if ([$0]) { if (isnumber($0)&&[$0] to set send notice format - xecho -b current format set to $snotform - @format_send_notice=getitem(snotform $snotform) + xecho $acban /format k to set send notice format + xecho $acban current format set to $snotform + @format_send_notice=getitem(snotform $snotform) } @@ -395,10 +399,10 @@ if (isnumber($0)&&[$0] to set send dcc chat format - xecho -b current format set to $sdcform - @ format_send_dcc_chat = getitem(sdcform $sdcform) + xecho $acban /format l to set send dcc chat format + xecho $acban current format set to $sdcform + @ format_send_dcc_chat = getitem(sdcform $sdcform) } @@ -425,10 +429,10 @@ if (isnumber($0)&&[$0] to set dcc chat format - xecho -b current format set to $dcform - @format_dcc_chat=getitem(dcform $dcform) + xecho $acban /format m to set dcc chat format + xecho $acban current format set to $dcform + @format_dcc_chat=getitem(dcform $dcform) } alias topform if ([$0]) { if (isnumber($0)&&[$0] to set topic format - xecho -b current format set to $topform - @format_topic=getitem(topform $topform) + xecho $acban /format n to set topic format + xecho $acban current format set to $topform + @format_topic=getitem(topform $topform) } alias ctcpform if ([$0]) { if (isnumber($0)&&[$0] to set ctcp format - xecho -b current format set to $ctcpform - @format_ctcp=getitem(ctcpform $ctcpform) + xecho $acban /format o to set ctcp format + xecho $acban current format set to $ctcpform + @format_ctcp=getitem(ctcpform $ctcpform) } @@ -516,10 +520,10 @@ if (isnumber($0)&&[$0] to set send ctcp format - xecho -b current format set to $sctcpform - @format_send_ctcp=getitem(sctcpform $sctcpform) + @ format_send_ctcp=getitem(sctcpform $mm) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_send_ctcp crapple #amnesiac 910492823 PING) + } + xecho $acban /format p to set send ctcp format + xecho $acban current format set to $sctcpform + @format_send_ctcp=getitem(sctcpform $sctcpform) } alias echostr if ([$0]) { if (isnumber($0)&&[$0] to set echostr - xecho -b current format set to $echostr + xecho $acban /format q to set echostr + xecho $acban current format set to $echostr } alias ncomp if ([$0]) { if (isnumber($0)&&[$0]%n") kreca$format_nick_comp hi! - xecho -b this is your new nick completion, /fsave to save. + @format_nick_comp=[$getitem(ncomp $0)] + //echo $G $cparse("%K<%ncrapple%K>%n") kreca$format_nick_comp hi! + xecho $acban this is your new nick completion, /fsave to save. @ncomp = [$0] - }{ - xecho -b please make a valid selection. + }{ + xecho $acban please make a valid selection. } }{ ncomp.show @@ -587,29 +592,28 @@ alias ncomp.load if ([$0]) { if (isnumber($0)&&[$0]%n") kreca$format_nick_comp hi! + @format_nick_comp=getitem(ncomp $nc) + xecho $acban $Cparse("%K[%n$([2]nc)%K]%n %K<%ncrapple%K>%n") kreca$format_nick_comp hi! } - xecho -b /format r to set nick completion - xecho -b current format set to $ncomp - @format_nick_comp=getitem(ncomp $ncomp) + xecho $acban /format r to set nick completion + xecho $acban current format set to $ncomp + @format_nick_comp=getitem(ncomp $ncomp) } - alias svform if ([$0]) { if (isnumber($0)&&[$0] to set version format - xecho -b current format set to $svform - @format_sv=getitem(svform $svform) + xecho $acban /format s to set version format + xecho $acban current format set to $svform + @format_sv=getitem(svform $svform) } @@ -637,10 +641,10 @@ if (isnumber($0)&&[$0] to set wall format - xecho -b current format set to $wallform - @format_wall=getitem(wallform $wallform) - @format_bwall=getitem(bwallform $bwallform) + xecho $acban /format v to set wall format + xecho $acban current format set to $wallform + @format_wall=getitem(wallform $wallform) + @format_bwall=getitem(bwallform $bwallform) } alias awayform if ([$0]) { if (isnumber($0)&&[$0] to set away format - xecho -b current format set to $awayform + xecho $acban /format w to set away format + xecho $acban current format set to $awayform @format_away = getitem(awayform $awayform) } + alias actform if ([$0]) { if (isnumber($0)&&[$0] to set action format - xecho -b current format set to $actform - @format_action=getitem(actform $actform) - @format_action_other=getitem(actoform $actoform) + xecho $acban /format x to set action format + xecho $acban current format set to $actform + @format_action=getitem(actform $actform) + @format_action_other=getitem(actoform $actoform) } + alias xdescform if ([$0]) { if (isnumber($0)&&[$0] to set describe format - xecho -b current format set to $descform - @format_desc=getitem(descform $descform) - @format_send_desc=getitem(sdescform $sdescform) - + xecho $acban /format y to set describe format + xecho $acban current format set to $descform + @format_desc=getitem(descform $descform) + @format_send_desc=getitem(sdescform $sdescform) } + alias whoform if ([$0]) { if (isnumber($0)&&[$0] to set who format - xecho -b format set to $whoform + xecho $acban /format 2 to set who format + xecho $acban format set to $whoform @format_who=getitem(whoform $whoform) } @@ -812,10 +816,10 @@ if (isnumber($0)&&[$0] to set nick change format - xecho -b current format set to $nickform + xecho $acban /format u to set nick change format + xecho $acban current format set to $nickform @format_nickname=getitem(nickform $nickform) } @@ -841,10 +845,11 @@ if (isnumber($0)&&[$0]%n timestamp in public format example.) + @format_timestamp_some=getitem(timeform $mm) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_timestamp_some)$cparse(%m<%ncrapple%m>%n timestamp in public format example.) } - xecho -b /format 3 to set time stamp format - xecho -b current format set to $timeform + xecho $acban /format 3 to set time stamp format + xecho $acban current format set to $timeform @format_timestamp_some=getitem(timeform $timeform) } alias kickform if ([$0]) { if (isnumber($0)&&[$0] to set kick format - xecho -b current format set to $kickform - @format_kick=getitem(kickform $kickform) + xecho $acban /format 4 to set kick format + xecho $acban current format set to $kickform + @format_kick=getitem(kickform $kickform) } diff amn.orig/core/format.m.orig amn/core/format.m.orig --- amn.orig/core/format.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/format.m.orig Mon Oct 10 20:32:25 2005 @@ -0,0 +1,894 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage format + +alias format { + if ([$#]) { + switch ($0) { + (a) { if ([$#] < 2) {mform.show} {mform $1} } + (b) { if ([$#] < 2) {smform.show} {smform $1} } + (c) { if ([$#] < 2) {pubform.show} {pubform $1} } + (d) { if ([$#] < 2) {spubform.show} {spubform $1} } + (e) { if ([$#] < 2) {spuboform.show} {spuboform $1} } + (f) { if ([$#] < 2) {signform.show} {signform $1} } + (g) { if ([$#] < 2) {joinform.show} {joinform $1} } + (h) { if ([$#] < 2) {leaveform.show} {leaveform $1} } + (i) { if ([$#] < 2) {modeform.show} {modeform $1} } + (j) { if ([$#] < 2) {notform.show} {notform $1} } + (k) { if ([$#] < 2) {snotform.show} {snotform $1} } + (l) { if ([$#] < 2) {sdcform.show} {sdcform $1} } + (m) { if ([$#] < 2) {dcform.show} {dcform $1} } + (n) { if ([$#] < 2) {topform.show} {topform $1} } + (o) { if ([$#] < 2) {ctcpform.show} {ctcpform $1} } + (p) { if ([$#] < 2) {sctcpform.show} {sctcpform $1} } + (q) { if ([$#] < 2) {echostr.show} {echostr $1} } + (r) { if ([$#] < 2) {ncomp.show} {ncomp $1} } + (s) { if ([$#] < 2) {svform.show} {svform $1} } + (t) { if ([$#] < 2) {evalcat $(loadpath)ans/scan.ans} {sformat $1;@snf=[$1]} } + (u) { if ([$#] < 2) {nickform.show} {nickform $1} } + (v) { if ([$#] < 2) {wallform.show} {wallform $1} } + (w) { if ([$#] < 2) {awayform.show} {awayform $1} } + (x) { if ([$#] < 2) {actform.show} {actform $1} } + (y) { if ([$#] < 2) {xdescform.show} {xdescform $1} } + (z) { if ([$#] < 2) {pubnotform.show} {pubnotform $1} } + (1) { if ([$#] < 2) {load $(loadpath)ans/whois.ans} {1format $1;@_whois=[$1]}} + (2) { if ([$#] < 2) {whoform.show} {whoform $1} } + (3) { if ([$#] < 2) {timeform.show} {timeform $1} } + (4) { if ([$#] < 2) {kickform.show} {kickform $1} } + } + }{ + load $(loadpath)ans/format.ans + } +} + + +alias mform if ([$0]) { + if (isnumber($0)&&[$0] to set msg format + xecho -b current format set to $mform + @format_msg = getitem(mform $mform) +} + +alias smform if ([$0]) { + if (isnumber($0)&&[$0] to set send msg format + xecho -b current format set to $smform + @format_send_msg=getitem(smform $smform) +} + + +alias pubform if ([$0]) { + if (isnumber($0)&&[$0] to set public format + xecho -b current format set to $pubform + @format_public=getitem(pubform $pubform) +} + +alias spubform if ([$0]) { + if (isnumber($0)&&[$0] to set send public format + xecho -b current format set to $spubform + @format_send_public=getitem(spubform $spubform) +} + + +alias spuboform if ([$0]) { + if (isnumber($0)&&[$0] to set public other format + xecho -b current format set to $spuboform + @format_public_other=getitem(spuboform $spuboform) +} + + +alias signform if ([$0]) { + if (isnumber($0)&&[$0] to set signoff format + xecho -b current format set to $signform + @format_signoff=getitem(signform $signform) +} + + +alias joinform if ([$0]) { + if (isnumber($0)&&[$0] to set join format + xecho -b current format set to $joinform + @format_join=getitem(joinform $joinform) +} + + +alias leaveform if ([$0]) { + if (isnumber($0)&&[$0] to set leaveoff format + xecho -b current format set to $leaveform + @format_leave=getitem(leaveform $leaveform) +} + +alias modeform if ([$0]) { + if (isnumber($0)&&[$0] to set modeoff format + xecho -b current format set to $modeform + @format_mode=getitem(modeform $modeform) +} + +alias notform if ([$0]) { + if (isnumber($0)&&[$0] to set notice format + xecho -b current format set to $notform + @format_notice = getitem(notform $notform) +} +alias pubnotform if ([$0]) { + if (isnumber($0)&&[$0] to set public notice format + xecho -b current format set to $pubnotform + @format_public_notice=getitem(pubnotform $pubnotform) +} + +alias snotform if ([$0]) { + if (isnumber($0)&&[$0] to set send notice format + xecho -b current format set to $snotform + @format_send_notice=getitem(snotform $snotform) +} + + +alias sdcform if ([$0]) { + if (isnumber($0)&&[$0] to set send dcc chat format + xecho -b current format set to $sdcform + @ format_send_dcc_chat = getitem(sdcform $sdcform) +} + + +alias dcform if ([$0]) { + if (isnumber($0)&&[$0] to set dcc chat format + xecho -b current format set to $dcform + @format_dcc_chat=getitem(dcform $dcform) +} + +alias topform if ([$0]) { + if (isnumber($0)&&[$0] to set topic format + xecho -b current format set to $topform + @format_topic=getitem(topform $topform) +} + +alias ctcpform if ([$0]) { + if (isnumber($0)&&[$0] to set ctcp format + xecho -b current format set to $ctcpform + @format_ctcp=getitem(ctcpform $ctcpform) +} + + +alias sctcpform if ([$0]) { + if (isnumber($0)&&[$0] to set send ctcp format + xecho -b current format set to $sctcpform + @format_send_ctcp=getitem(sctcpform $sctcpform) +} + + +alias echostr if ([$0]) { + if (isnumber($0)&&[$0] to set echostr + xecho -b current format set to $echostr +} + +alias ncomp if ([$0]) { + if (isnumber($0)&&[$0]%n") kreca$format_nick_comp hi! + xecho -b this is your new nick completion, /fsave to save. + @ncomp = [$0] + }{ + xecho -b please make a valid selection. + } +}{ + ncomp.show +} + +alias ncomp.load if ([$0]) { + if (isnumber($0)&&[$0]%n") kreca$format_nick_comp hi! + } + xecho -b /format r to set nick completion + xecho -b current format set to $ncomp + @format_nick_comp=getitem(ncomp $ncomp) +} + + +alias svform if ([$0]) { + if (isnumber($0)&&[$0] to set version format + xecho -b current format set to $svform + @format_sv=getitem(svform $svform) +} + + +alias wallform if ([$0]) { + if (isnumber($0)&&[$0] to set wall format + xecho -b current format set to $wallform + @format_wall=getitem(wallform $wallform) + @format_bwall=getitem(bwallform $bwallform) +} + +alias awayform if ([$0]) { + if (isnumber($0)&&[$0] to set away format + xecho -b current format set to $awayform + @format_away = getitem(awayform $awayform) +} +alias actform if ([$0]) { + if (isnumber($0)&&[$0] to set action format + xecho -b current format set to $actform + @format_action=getitem(actform $actform) + @format_action_other=getitem(actoform $actoform) +} +alias xdescform if ([$0]) { + if (isnumber($0)&&[$0] to set describe format + xecho -b current format set to $descform + @format_desc=getitem(descform $descform) + @format_send_desc=getitem(sdescform $sdescform) + +} +alias whoform if ([$0]) { + if (isnumber($0)&&[$0] to set who format + xecho -b format set to $whoform + @format_who=getitem(whoform $whoform) +} + + +alias nickform if ([$0]) { + if (isnumber($0)&&[$0] to set nick change format + xecho -b current format set to $nickform + @format_nickname=getitem(nickform $nickform) +} + +##timestamp +alias timeform if ([$0]) { + if (isnumber($0)&&[$0]%n timestamp in public format example.) + } + xecho -b /format 3 to set time stamp format + xecho -b current format set to $timeform + @format_timestamp_some=getitem(timeform $timeform) +} + +alias kickform if ([$0]) { + if (isnumber($0)&&[$0] to set kick format + xecho -b current format set to $kickform + @format_kick=getitem(kickform $kickform) +} diff amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Tue Oct 11 00:52:09 2005 +++ amn/core/fsets.m Tue Oct 11 00:51:38 2005 @@ -13,10 +13,10 @@ if (pattern(*$0* $fwords) && [$1]) { @format_choice=[$after(_ $0)] @format_$after(_ $0)=[$1-] - xecho -b fset $0 changed to $1- + xecho $acban fset $0 changed to $1- }{ fe ($pattern(*$0* $fwords)) a1 { - xecho -b $[31]a1 ...... $($a1) + xecho $acban $[31]a1 ...... $($a1) } } } diff amn.orig/core/fsets.m.orig amn/core/fsets.m.orig --- amn.orig/core/fsets.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/fsets.m.orig Mon Oct 10 20:56:39 2005 @@ -0,0 +1,250 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage fsets + +@fwords=[format_scan_onjoin_nicks_border format_scan_nicks_border format_scan_onjoin_nicks format_scan_users_op format_scan_users_non format_scan_users_voc format_scan_users format_scan_header format_scan_nicks format_scan_footer format_timestamp_some format_who format_who_footer format_whois_signon format_whois_actual format_who format_whois_header format_whois_admin format_whois_nick format_whois_name format_whois_channels format_whois_server format_whois_away format_whois_operator format_whois_idle format_whois_unknown format_whois_footer format_whowas_header format_whowas_nick format_whowas_name format_whowas_unknown format_whowas_footer format_sort format_user_non format_chops format_bwall format_msg format_send_msg format_public format_send_public format_public_other format_signoff format_join format_leave format_mode format_notice format_public_notice format_send_notice format_send_dcc_chat format_dcc_chat format_topic format_ctcp format_send_ctcp format_nick_comp format_sv format_wall format_away format_back format_action format_action_other format_desc format_send_desc format_wallop format_nickname format_invite format_dcc_connect format_dcc_request format_kick format_ctcp_reply format_server_notice format_dcc_lost_chat format_dcc_lost_file format_dcc_done_file] +^on ^set "format_*" { + if ([$0]) { + if (!pattern(*$0* $fwords)) { + banner.lchead + banner.mid $banner $0 format not found + banner.lcfoot + }{ + if (pattern(*$0* $fwords) && [$1]) { + @format_choice=[$after(_ $0)] + @format_$after(_ $0)=[$1-] + xecho -b fset $0 changed to $1- + }{ + fe ($pattern(*$0* $fwords)) a1 { + xecho -b $[31]a1 ...... $($a1) + } + } + } + } +} +alias sfset { + @format_choice=[$after(_ $0)] + @format_$after(_ $0)=[$1-] +} + + +alias fset if (![$0]) { + fe ($fwords) _a1 { + set $_a1 + } +}{ + if (pattern(*$0* $fwords)) { + set $0 $1- + } +} + +alias fparse {eval return $(cparse($($*)))} +@ format_msg_group = [%K-$$(c2)$$1%K:$$(c1)$$2%K-%n $$3-] +@ format_wallop = [%K!$$(c1)$$1:$$2%K! %n$$3-] +@ format_nickname = [$$G %c$$1 %nis now known as %m$$2] +@ format_kick = [$$G $$1 was kicked off $$3 by $$(c3)$$2 %K\\\(%n$$4-%K\\\))] +@ format_invite = [$$G %K<$$(c1)\$1%K\\\($$(c2)invite%K.$$(c1)\$2%K\\\)>] +@ format_dcc_connect = [$$G %K[%cdcc%m\(%nconnect%m\)%K]%n connection with %w$$1%K[$$(c2)$$3, port $$4%K]%n established] +@ format_dcc_request = [$$G %K[%cdcc%m\(%nrequest%m\)%K]%n %K\\\(%n$$3%K\\\) %nrequest from %w$$1%K[$$(c1)$$userhost() %K[$$(c3)$$4%K:$$(c3)$$5%K]]] +@ format_ctcp_reply = [$$G CTCP %W$$2 %nreply from $$1: $$3-] +@ format_server_notice = [%K!$$(c1)$$1%K! %n$$2-] +@ format_dcc_lost_chat = [$$G %K[%cdcc%m\(%nchat%m\)%K] %nto %c$$1 %nlost %K\(%n$tolower($4-)%K\)] +@ format_dcc_lost_file = [$$G %K[%cdcc%m\(%file%m\)%K] %nto $$1 $$3 $$4 $$5] +@ format_dcc_done_file = [$$G %K[%cdcc%m\(%ndone%m\)%K]%n %K:$$(c2)$$3 %nto $$1 completed in %K\\\(%W$$4 kb/sec%K\\\)] +@ format_chops = [ %K[%n$$[10]2%K] %K[@$$(c2)$$[9]1%K] %K[%n$$before(@ $userhost($1))%K@%n$$after(@ $userhost($1))%K]] +@ format_user_non = [ %K[%n$$[10]2%K] %K[$$(c2)$$[9]1%K] %K[%n$$before(@ $userhost($1))%K@%n$$after(@ $userhost($1))%K]] +@ format_user_vocs = [ %K[%n$$[10]2%K] %K[v$$(c2)$$[9]1%K] %K[%n$$before(@ $userhost($1))%K@%n$$after(@ $userhost($1))%K]] +@ format_public_notice = [%K-%n$$1%K:%n$$2%K-%n $$3-] +@ format_who=[ %K[%C³%K] %c$$[10]center(10 $2) $[20]center(20 %K\\\(%n$$4%W@%n$$5%K\\\)) %K[%n$$[3]3%K] [%n$$6%m/%c$$8-%K]] +@ format_who_footer=[ ÀÄÄÄÄÄ---%cÄ%C--%cÄÄ%C-%cÄÄÄÄÄÄ---%KÄ%c--%KÄÄ%c-%KÄÄÄÄÄÄÄÄÄ--- -- -] + +## who fsets. +^on ^who * { + xecho $fparse(format_who $*) +} +^on ^315 "*" { + xecho $fparse(format_who_footer $*) +} + +## msg fsets. +^on ^msg_group * {//echo $fparse(format_msg_group $0 $1 $2-)} +^on ^msg * {//echo $fparse(format_msg $0 $userhost() $1-)} +^on ^send_msg * {//echo $fparse(format_send_msg $0 $1-)} + +## notice fsets. +^on ^wallop * //echo $fparse(format_wallop $0 $1 $2-) +^on ^notice * { + if (tolower($right(4 $0)) ==[serv]){ + //echo $fparse(format_notice $0 *@* $1-) + }{ + //echo $fparse(format_notice $0 $userhost() $1-) + } + } + +## public fsets. +^on ^public_notice * //echo $fparse(format_public_notice $0 $1 $2-) +^on ^send_notice * //echo $fparse(format_send_notice $0 $1-) + +## ctcp fsets. +^on ^ctcp * xecho $fparse(format_ctcp $0 $userhost() $1 $2 $3 $4) +^on ^ctcp_reply * //echo $fparse(format_ctcp_reply $0 $2 $3-) +^on ^send_ctcp * if ([$0]==[privmsg]&&[$2]!=[action]) {//echo $fparse(format_send_ctcp $0 $1 $2 $3-)} + +## dcc fsets. +^on ^send_dcc_chat * //echo $fparse(format_send_dcc_chat $0 $1-) +^on ^dcc_chat * //echo $fparse(format_dcc_chat $0 $1-) +^on ^dcc_connect * //echo $fparse(format_dcc_connect $0 $1 $2 $3 $4 $5) +^on ^dcc_request * //echo $fparse(format_dcc_request $0 $1 $2 $3 $4 $5 $6) + +## nutbars dcc lost hooks +^on ^dcc_lost "% CHAT *" { + xecho $fparse(format_dcc_lost_chat $*) +} +## end nutbars dcc lost hooks. + +## fsets with getusers here... +^on ^channel_signoff * { +xecho $fparse(format_signoff $0 $1 $2-) +defer getusers +} +^on ^join * { +xecho $fparse(format_join $0 $1 $2) +defer getusers +} +^on ^part * { +xecho $fparse(format_leave $0 $userhost() $1 $3-) +defer getusers +} +^on ^mode * { +xecho $fparse(format_mode $0 $1 $2 $3-) +defer getusers +} + +## other fsets. +^on ^nickname * //echo $fparse(format_nickname $0 $1) +^on ^invite * //echo $fparse(format_invite $0 $1);//echo $G press Ctrl-K to join;@invchan=[$1] +^on ^kick * //echo $fparse(format_kick $0 $1 $2 $3-) + +## non-moduler fsets. (perm) +^on ^471 * //echo $G $1 channel is full +^on ^475 * //echo $G $1 wrong key, keep trying +^on ^473 * //echo $G $1 you're not invited +^on ^329 * //echo $G channel $1 created at $strftime($2 %a %b %d %T %Z %Y) +^on ^368 * //echo $G $1 ban(s) on $2 +^on ^347 * //echo $G $1 i-exempt(s) on $2 +^on ^349 * //echo $G $1 e-exempt(s) on $2 +^on ^221 * //echo $G current user mode is "$1" +^on ^341 * //echo $G coercing $1 to $2 +^on ^331 * abecho %R\(%n$1%R\)%n topic not set + +## knocks. +^on ^710 * { +@:thenick=word(0 $split(! $2)) +@:therest=mid($strlen($thenick) $strlen($2) $2) +aecho $fparse(format_timestamp_some $($_timess))$(hwht)\<$(cl)knock$(hwht)\>$(cl) $(hred)$0$(cl) $(hwht)$(thenick)$(cl)$therest \($1\) +} + +## topic stuff +^on ^332 * abecho $(grn)\($(cl)$(wht)t$(cl)opic/$1$(grn)\)$(cl) $2- +^on ^333 * abecho $(grn)\($(cl)$(wht)s$(cl)et$(grn)\)$(cl) by $2 at $strftime($3 %a %b %d %T %Z) +^on ^315 * # +^on ^305 * # +^on ^topic * { + if ([$2]==[]) { + //echo $G topic unset by $0 on $1 at $strftime(%a %b %d %T %Z) + }{ + //echo $G $fparse(format_topic $0 $1 $2-) + } +} + +## banlist hooks +^on ^433 * xecho -b $1 $sar(g/:/$(hblk):$(cl) /$2) $3 $4 $5 $6 +^on ^401 * xecho -b $1- +^on ^306 * # +^on ^405 * abecho %m\(%n$1%m\)%n the fascist server won't let you join anymore chans! +^on ^441 * xecho -b $1 isn't on channel $2 +^on ^482 * abecho %m\(%n$1%m\)%n you need to be a chanop yo! +^on ^474 * abecho %m\(%n$1%m\)%n a fascist channel op has banned you. %m\(%n+b%m\) + +## whois stuff + +on ^311 * { + if (format_whois_header) { + xecho $fparse(format_whois_header) + } + xecho $fparse(format_whois_nick $1 $2 $3 $5-) + if (format_whois_name) { + xecho $fparse(format_whois_name $5-) + } +} +on ^319 * xecho $fparse(format_whois_channels $2-) +on ^312 * xecho $fparse(format_whois_server $2 $3-) +on ^301 * xecho $fparse(format_whois_away $1-) +on ^317 * { + xecho $fparse(format_whois_idle $2) + xecho $fparse(format_whois_signon $1 $stime($3)) +} + +on ^318 * { + if (format_whois_footer) { + xecho $fparse(format_whois_footer) + } +} +on ^314 * { + xecho $fparse(format_whowas_header) + xecho $fparse(format_whowas_nick $1 $2 $3) + xecho $fparse(format_whowas_name $5-) +} +on ^338 * { + xecho $fparse(format_whois_actual $*) +} +on ^330 * { + xecho $fparse(format_whois_login $*) +} +on ^308 * { + xecho $fparse(format_whois_admin $1-) +} +on ^313 * { + + ^local rcl. + @ rcl.0 = [has cobwebs spanning him and his computer] + @ rcl.1 = [is most likely overweight and named after a clay cartoon figure] + @ rcl.2 = [is a fascist] + @ rcl.3 = [is a jewish irc warrior] + @ rcl.4 = [epitomizes the pointlessness of irc] + @ rcl.5 = [likes little children and small farm animals.] + @ rcl.6 = [gave up his social life for irk.] + @ rcl.7 = [isn't interested in you unless you're an eight year old male] + @ rcl.8 = [is large and hairy and wants you to pick up his soap.] + @ rcl.9 = [takes pleasure in setting his pubic hair alight] + @ rcl.10 = ['s wife/girlfriend is a slut] + @ rcl.11 = [reads PlayGirl in the toilet] + @ rcl.12 = [is a leeto eyearesee pimp!#@!] + @ rcl.13 = [is a member of the Hair Club for Men] + @ rcl.14 = [says, "You're not fully clean unless you're anally clean!] + @ rcl.15 = [is as helpful to the world as ebola is] + @ rcl.16 = [kisses more ass than you] + @ rcl.17 = [is clueless] + @ rcl.18 = [loves you with all his heart] + @ rcl.19 = [is a doodoo head] + @ rcl.20 = [is a doodlekid] + @ rcl.21 = [is a target for pie-tossing clowns] + @ rcl.22 = ['s body hair is a mystery to science] + @ rcl.23 = [wants you to bend over] + @ rcl.24 = [voted for Bush] + @ rcl.25 = ['s face is more plastic than flesh] + $rcl[$rand(26)] +^randcl +xecho $fparse(format_whois_operator $1 $rcl[$rand(26)]) +} +^on ^401 * { + xecho $fparse(format_whois_header) + xecho $fparse(format_whois_unknown $1) +} +^on ^369 * { + xecho $fparse(format_whowas_footer) +} +^on ^406 * { + xecho $fparse(format_whowas_header) + xecho $fparse(format_whowas_unknown $1) +} diff amn.orig/core/help.m amn/core/help.m --- amn.orig/core/help.m Tue Oct 11 00:52:09 2005 +++ amn/core/help.m Tue Oct 11 00:51:38 2005 @@ -133,7 +133,7 @@ if ([$0]) { if (!match($0 $hwords)) { banner.head - xecho -b command: $0 not found + xecho $acban command: $0 not found banner.foot }{ banner.head diff amn.orig/core/help.m.orig amn/core/help.m.orig --- amn.orig/core/help.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/help.m.orig Mon Oct 10 20:57:40 2005 @@ -0,0 +1,144 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage help + +@hwords=[rn rk vocs bantype fset ban mko mkn massk orignick ub sping bkt dldir ps ls cd dns nslookup fkeys format q bans banstat wii mdop mdeop dop dv v scano scanv scann t k umode m j l wi ver c nochat chat bk op voice deop mop cycle mreop readlog wall user chops sv frelm tsave freln away back format config color sbcolor dict fsave sbar scan wk wlk wn wp wj wc csave banstat bankick cig cops devoice fctcp iban inv kickban kb links lk lsay mdv more mv mw nops not partall qk staynick supt theme tig unban untheme winhelp] +alias ahelp if (![$0]) { +banner.head + @_ohcenter=[${word(0 $geom()) / 2 + 40}] + aecho | $center($_ohcenter a m n e s i a c h e l p) + @_ohwidth=[${word(0 $geom()) / 14}] + fe ($jot(1 $_ohwidth)) n1 { + ^push _htopics ahelp.$n1 + ^push _htopics2 %K[%n\$[10]ahelp\.$(n1)%K] + } + fe ($hwords) n1 { + if (match($n1 $aliasctl(alias match *))) { + ^push hwords2 $n1 + } + } + fe ($hwords2) $_htopics { + eval banner.mid $_htopics2 + } + ^assign -_htopics;^assign -_htopics2;^assign -hwords2 + banner.foot +abecho $a.ver usage -> /ahelp +}{ +@ :rn=[%Wu%nsage%K:%n /rn will change nick to a random nick of 7 chars] +@ :rk=[%Wu%nsage%K:%n /rk will kick a random nick out of your current channel] +@ :winhelp=[%Wu%nsage%K:%n /winhelp will display help menu for windowing shortcuts. +@ :untheme=[%Wu%nsage%K:%n /untheme will make amnesiac revert back to the default theme. +@ :unban=[%Wu%nsage%K:%n /unban will unban nick or host from current channel +@ :tig=[%Wu%nsage%K:%n /tig will display all current ignores and prompt to delete one. +@ :theme=[%Wu%nsage%K:%n /theme will display all amnesiac themes and you can choose which one you want. +@ :supt=[%Wu%nsage%K:%n /supt will paste client version and uptime to current channel +@ :staynick=[%Wu%nsage%K:%n /staynick will cancel /orignick. +@ :qk=[%Wu%nsage%K:%n /qk - will bankick specified nick then unban them after 5 seconds. +@ :bkt=[%Wu%nsage%K:%n /bkt same as qt. +@ :dldir=[%Wu%nsage%K:%n /dldir sets download path. +@ :partall=[%Wu%nsage%K:%n /partall will part all current channels. +@ :not=[%Wu%nsage%K:%n /not will unset topic on current channel. +@ :nops=[%Wu%nsage%K:%n /nops will display all nonops on current channel. +@ :vocs=[%Wu%nsage%K:%n /vocs will display all voiced members on current channel. +@ :mw=[%Wu%nsage%K:%n /mw -hidden|split|kill +@ :mv=[%Wu%nsage%K:%n /mv will mass voice everyone on current channel +@ :more=[%Wu%nsage%K:%n /more will display text file to screen. +@ :mdv=[%Wu%nsage%K:%n /mdv will mass devoice current channel. +@ :lsay=[%Wu%nsage%K:%n /lsay just try it :) +@ :lk=[%Wu%nsage%K:%n /lk will kick all non op'd and voiced lusers from current channel +@ :links=[%Wu%nsage%K:%n /links will give you a server list of all the servers linked to current network +@ :kickban=[%Wu%nsage%K:%n /kickban will kick and ban nick from current channel +@ :kb=[%Wu%nsage%K:%n /kb will kick and ban nick from current channel. +@ :inv=[%Wu%nsage%K:%n /inv will invite nick to current channel. +@ :iban=[%Wu%nsage%K:%n /iban will ban nick by ident from current channel +@ :fctcp=[%Wu%nsage%K:%n /fctcp nick/channel will send a fake ctcp to specifed nick or channel. +@ :devoice=[%Wu%nsage%K:%n /devoice devoices nicks from current channel. +@ :cops=[%Wu%nsage%K:%n /cops to list irc operators on current channel. +@ :cig=[%Wu%nsage%K:%n /cig to ignore public from current or specified channel +@ :bankick=[%Wu%nsage%K:%n /bankick will ban and kick nick from current channel. +@ :q=[%Wu%nsage%K:%n /q nick querys nick +@ :bans=[%Wu%nsage%K:%n /bans shows current banlist on channel +@ :wii=[%Wu%nsage%K:%n /wii nick whois's nick +@ :mdop=[%Wu%nsage%K:%n /mdop <-nick1,nick2,nick3..> mass deops current channel minus nicks specified. +@ :mdeop=[%Wu%nsage%K:%n /mdeop <-nick1,nick2,nick3..> mass deops current channel minus nicks specified. +@ :dop=[%Wu%nsage%K:%n /dop deops nick +@ :dv=[%Wu%nsage%K:%n /dv devoices nick +@ :v=[%Wu%nsage%K:%n /v voices nick +@ :scano=[%Wu%nsage%K:%n /scano scans for current ops on channel +@ :scanv=[%Wu%nsage%K:%n /scanv scans for current voiced on channel +@ :scann=[%Wu%nsage%K:%n /scann scans for current non op/voiced on channel +@ :t=[%Wu%nsage%K:%n /t sets topic for current channel +@ :k=[%Wu%nsage%K:%n /k nick kicks nick with reason +@ :umode=[%Wu%nsage%K:%n /umode changes user mode +@ :m=[%Wu%nsage%K:%n /m nick msgs nick with msg +@ :j=[%Wu%nsage%K:%n /j channel joins channel +@ :l=[%Wu%nsage%K:%n /l leaves current channel +@ :wi=[%Wu%nsage%K:%n /wi whois's nick +@ :ver=[%Wu%nsage%K:%n /ver nick ctcp versions nick +@ :c=[%Wu%nsage%K:%n /c changes mode on current channel +@ :nochat=[%Wu%nsage%K:%n /nochat dcc closes chat with nick +@ :chat=[%Wu%nsage%K:%n /chat sends dcc chat request to nick +@ :bk=[%Wu%nsage%K:%n /bk bankicks nick for reason +@ :op=[%Wu%nsage%K:%n /op ops nick on current channel +@ :voice=[%Wu%nsage%K:%n /voice voices nick on current channel +@ :deop=[%Wu%nsage%K:%n /deop deops nick on current channel +@ :mop=[%Wu%nsage%K:%n /mop mass ops current channel +@ :cycle=[%Wu%nsage%K:%n /cycle leaves then joins current channel +@ :mreop=[%Wu%nsage%K:%n /mreop mass ops current ops on channel +@ :readlog=[%Wu%nsage%K:%n /readlog reads away log +@ :wall=[%Wu%nsage%K:%n /wall mass notices current ops on channel +@ :user=[%Wu%nsage%K:%n /user <-nonops> <-ops> <-sort> hostmask :scans nicks on channel +@ :chops=[%Wu%nsage%K:%n /chops scans op'd nicks on channel +@ :sv=[%Wu%nsage%K:%n /sv shows current client/script version to channel +@ :away=[%Wu%nsage%K:%n /away set yourself away] +@ :back=[%Wu%nsage%K:%n /back turns away off.] +@ :format=[%Wu%nsage%K:%n /format changes format letter to #] +@ :config=[%Wu%nsage%K:%n /config changes config letter to #] +@ :color=[%Wu%nsage%K:%n /color changes color to desired colors] +@ :sbcolor=[%Wu%nsage%K:%n /sbcolor changes sbar color to desired colors] +@ :v=[%Wu%nsage%K:%n /v voices nick] +@ :dict = [%Wu%nsage%K:%n /dict looks up word in online dictionary] +@ :saveall = [%Wu%nsage%K:%n /saveall saves all settings] +@ :fsave = [%Wu%nsage%K:%n /fsave saves all format settings] +@ :sbar = [%Wu%nsage%K:%n /sbar changes sbar to desired number] +@ :scan = [%Wu%nsage%K:%n /scan scans current channel for nicks] +@ :wk = [%Wu%nsage%K:%n /wk kills current window] +@ :wlk = [%Wu%nsage%K:%n /wlk leaves channel and kills window] +@ :wn = [%Wu%nsage%K:%n /wn changes to next window] +@ :wp = [%Wu%nsage%K:%n /wp changes to previous window] +@ :wj = [%Wu%nsage%K:%n /wj opens up new window and joins channel specified] +@ :wc = [%Wu%nsage%K:%n /wc creates new window] +@ :frelm = [%Wu%nsage%K:%n /frelm fakes recvied msg and pastes it to channel] +@ :freln = [%Wu%nsage%K:%n /freln fakes recvied notice and pastes it to channel] +@ :csave = [%Wu%nsage%K:%n /csave saves color settings] +@ :format = [%Wu%nsage%K:%n /format changes format number to selected format +@ :sping = [%Wu%nsage%K:%n /sping pings server and returns lag time to it +@ :ub = [%Wu%nsage%K:%n /ub ub by itself will clear all bans on current channel , /ub nick will unban nick from current channel +@ :ps = [%Wu%nsage%K:%n /ps equivelent to shell command +@ :ls = [%Wu%nsage%K:%n /ls equivelent to shell command +@ :cd = [%Wu%nsage%K:%n /cd equivelent to shell command +@ :dns = [%Wu%nsage%K:%n /dns domain nameserver request to given nick +@ :nslookup = [%Wu%nsage%K:%n /nslookup domain nameserver request to given ip +@ :orignick = [%Wu%nsage%K:%n /orignick will check the specified nick for the amount of seconds you specify in the config. (default is 3) and change to it when that nick signs off +@ :fkeys = [%Wu%nsage%K:%n /fkeys shows which fkeys are bound to which and can be changed by /fkey1 /fkey2 ... +@ :mkn = [%Wu%nsage%K:%n /mkn text will kick all non op'd from channel +@ :mko = [%Wu%nsage%K:%n /mko text will kick all ops from channel +@ :massk = [%Wu%nsage%K:%n /massk will kick all users from the channel with specified version string +@ :ban = [%Wu%nsage%K:%n /ban nick will ban nick's userhost from current channel +@ :fkey = [%Wu%nsage%K:%n /fkey <#1-12> will set function keys to specified command +@ :fset = [%Wu%nsage%K:%n /fset format_choice will change specified format +@ :bantype = [%Wu%nsage%K:%n /bantype Usage: /bantype - When a ban is done on a nick, it uses +@ :banstat = [%Wu%nsage%K:%n /banstat Usage: /banstat will show current bans on channel, who set them and what time they were set + + if ([$0]) { + if (!match($0 $hwords)) { + banner.head + xecho -b command: $0 not found + banner.foot + }{ + banner.head + //echo $cparse("$($*)") + banner.foot + } + } +} diff amn.orig/core/mod.m amn/core/mod.m --- amn.orig/core/mod.m Tue Oct 11 00:52:09 2005 +++ amn/core/mod.m Tue Oct 11 00:51:38 2005 @@ -8,8 +8,8 @@ alias addmod { if (![$0]) { - xecho -b syn: /addmod module1,module2,etc.. - xecho -b valid modules are [$_modules] + xecho $acban syn: /addmod module1,module2,etc.. + xecho $acban valid modules are [$_modules] }{ @_ach=sar(g/,/ /$0) if ([$0]==[*]) { @@ -19,7 +19,7 @@ @setitem(_mods $numitems(_mods) $a1) ^load $(loadpath)modules/$(a1)/$(a1).m } - xecho -b loaded modules $_modules + xecho $acban loaded modules $_modules }{ fe ($_ach) n1 { if (match($n1 $_modules) > 0 && finditem(_mods $n1) < 0) { @@ -28,11 +28,11 @@ ^load $(loadpath)modules/$(n1)/$(n1).m ^push _mlist $n1 }{ - xecho -b $n1 module not found or already loaded. + xecho $acban $n1 module not found or already loaded. } } if (_mlist) { - xecho -b $_mlist module(s) loaded. + xecho $acban $_mlist module(s) loaded. } ^assign -_mlist } @@ -41,7 +41,7 @@ alias listmod { if (numitems(_mods) == 1) { - xecho -b no modules current on list + xecho $acban no modules current on list }{ eval aecho ----------------------= Modules Loaded =------------------ for (@xx=1, xx 0 && finditem(_mods $n1) < 0) { + @setitem(_mods 0 !) + @setitem(_mods $numitems(_mods) $n1) + ^load $(loadpath)modules/$(n1)/$(n1).m + ^push _mlist $n1 + }{ + xecho -b $n1 module not found or already loaded. + } + } + if (_mlist) { + xecho -b $_mlist module(s) loaded. + } + ^assign -_mlist + } + } +} + +alias listmod { + if (numitems(_mods) == 1) { + xecho -b no modules current on list + }{ + eval aecho ----------------------= Modules Loaded =------------------ + for (@xx=1, xx= numitems(_mods) ) + { + @:mod2 = [] + } + { + @ :mod2 = [\(${xx+1}\) $getitem(_mods ${xx+1})] + } + //echo $[30]mod1 $mod2 + } + eval aecho ----------------------------------------------------------- + xecho -b /vmod to list valid modules /emod view module descriptions + } +} + +alias delmod { + if ([$#]) { + if ([$0]==[*]) { + fe ($listarray(_mods)) n1 { + ^unload $n1 + } + @delarray(_mods) + @setitem(_mods 0 !) + xecho -b deleted all modules from list + }{ + @_mch1=sar(g/,/ /$0) + fe ($_mch1) n1 { + if (!match($n1 $jot(1 $words($_modules)))) { + fe ($_mch1) n1 { + ^unload $n1 + @delitem(_mods $finditem(_mods $n1)) + } + } + } + if (match($n1 $jot(1 $words($_modules)))) { + fe ($_mch1) n1 { + ^push _mlist $getitem(_mods $n1) + } + fe ($_mlist) n1 { + @_mdnum=finditem(_mods $n1) + @delitem(_mods $_mdnum) + ^unload $n1 + } + ^assign -_mlist + } + xecho -b deleted module entry $_mch1 + } + }{ + xecho -b usage: /delmod num1,num2,etc.. or name1,name2,etc.. + } +} + +alias modsave { + @rename($modfile $modfile~) + @savemt = open($modfile W) + for (@xx=1, xx and <+nick> in public set to $0 + @showop = [$0] + xecho $acban showing <@nick> and <+nick> in public set to $0 }{ - xecho -b extpub/modeshow set to $showop + xecho $acban extpub/modeshow set to $showop } } diff amn.orig/core/modeshow.m.orig amn/core/modeshow.m.orig --- amn.orig/core/modeshow.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/modeshow.m.orig Mon Oct 10 20:38:27 2005 @@ -0,0 +1,79 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage modeshow + +alias modeshow vocop $* +alias showmodes vocop $* +alias vocop { + if ([$0]==[ON] || [$0]==[OFF]) { + @showop = [$0] + xecho -b showing <@nick> and <+nick> in public set to $0 + }{ + xecho -b extpub/modeshow set to $showop + } +} + + +on ^public * { + @extravar = [] + @thenick =[$0] + if (showop == [on]) { + if (ischanop($0 $1)) { + @extravar = [$(c5)@$(cl)] + } else if (ischanvoice($0 $1)) { + @extravar = [$(c5)+$(cl)] + } + } + if (match($_pubnick* $2-) > 0) { + @thenick=[$(hwht)$0$(cl)] + } + if (match($_r2* $2-) > 0) { + @thenick=[$(hwht)$0$(cl)] + } + if (match($_r3* $2-) > 0) { + @thenick=[$(hwht)$0$(cl)] + } + if (match($_r4* $2-) > 0) { + @thenick=[$(hwht)$0$(cl)] + } + if (winchan($0)==-1 || winchan($winchan($1)) != [$1] ) { + //echo $fparse(format_public $(extravar)$(thenick):$1 $2-) + } else { + //echo $fparse(format_public $(extravar)$thenick $2-) + } + + +} + +on ^public_other * { + @extravar = [] + @thenick =[$0] + if (showop == [on]) { + if (ischanop($0 $1)) { + @extravar = [$(c5)@$(cl)] + } else if (ischanvoice($0 $1)) { + @extravar = [$(c5)+$(cl)] + } + } + if (match($_pubnick* $2-) > 0) { + @thenick=[$(hwht)$0$(cl)] + } + //echo $fparse(format_public_other $(extravar)$(thenick) $1 $2-) + +} + +on ^send_public * { + @extravar = [] + if (showop == [on]) { + if (ischanop($N $0)) { + @extravar = [$(c5)@$(cl)] + } else if (ischanvoice($N $0)) { + @extravar = [$(c5)+$(cl)] + } + } + if (winchan($0)==-1 || winchan($winchan($0)) != [$0] ) { + //echo $fparse(format_send_public ${extravar}$N:$0 $1-) + } else { + //echo $fparse(format_send_public ${extravar}$N $1-) + } +} diff amn.orig/core/paste.m amn/core/paste.m --- amn.orig/core/paste.m Tue Oct 11 00:52:09 2005 +++ amn/core/paste.m Tue Oct 11 00:51:38 2005 @@ -13,9 +13,9 @@ # # # on ^set "paste %" { - xecho -b PASTE is ${paste.on ? [ON] : [OFF]} - xecho -b PASTE_STRIP is ${paste.strip ? [ON] : [OFF]} - xecho -b PASTE_DELAY is $paste.delay + xecho $acban PASTE is ${paste.on ? [ON] : [OFF]} + xecho $acban PASTE_STRIP is ${paste.strip ? [ON] : [OFF]} + xecho $acban PASTE_DELAY is $paste.delay } on ^set "paste toggle" { @@ -25,18 +25,18 @@ on ^set "paste on" { @ paste.on = 1 setup_paste - xecho -b PASTE mode ON -- automatically turns off in $paste.delay seconds. + xecho $acban PASTE mode ON -- automatically turns off in $paste.delay seconds. } on ^set "paste off" { @ paste.on = 0 remove_paste - xecho -b PASTE mode OFF + xecho $acban PASTE mode OFF } # # # on ^set "paste_strip %" { - xecho -b Usage: /SET PASTE_STRIP [ON|OFF] + xecho $acban Usage: /SET PASTE_STRIP [ON|OFF] } on ^set "paste_strip toggle" { @@ -45,21 +45,21 @@ on ^set "paste_strip on" { @ paste.strip = 1 - xecho -b PASTE stripping set to ON + xecho $acban PASTE stripping set to ON } on ^set "paste_strip off" { @ paste.strip = 0 - xecho -b PASTE stripping set to OFF + xecho $acban PASTE stripping set to OFF } # # # on ^set "paste_delay %" { if (!isnumber($1) || [$1] <= 0) { - xecho -b Usage: /SET PASTE_DELAY seconds + xecho $acban Usage: /SET PASTE_DELAY seconds } { @ paste.delay = [$1] - xecho -b PASTE_DELAY set to $paste.delay seconds. + xecho $acban PASTE_DELAY set to $paste.delay seconds. } } diff amn.orig/core/paste.m.orig amn/core/paste.m.orig --- amn.orig/core/paste.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/paste.m.orig Mon Oct 3 03:10:33 2005 @@ -0,0 +1,92 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# hops little paste script so you can paste shit without worrying about +# commands....ctrl-p to toggle.. /set paste for some other shit. +subpackage paste + +@ paste.on = 0 +@ paste.strip = 0 +@ paste.delay = 30 + +# Uncomment this if you want a key binding. +bind ^P parse_command { set paste toggle } + +# # # +on ^set "paste %" { + xecho -b PASTE is ${paste.on ? [ON] : [OFF]} + xecho -b PASTE_STRIP is ${paste.strip ? [ON] : [OFF]} + xecho -b PASTE_DELAY is $paste.delay +} + +on ^set "paste toggle" { + set paste ${paste.on ? [off] : [on]} +} + +on ^set "paste on" { + @ paste.on = 1 + setup_paste + xecho -b PASTE mode ON -- automatically turns off in $paste.delay seconds. +} + +on ^set "paste off" { + @ paste.on = 0 + remove_paste + xecho -b PASTE mode OFF +} + +# # # +on ^set "paste_strip %" { + xecho -b Usage: /SET PASTE_STRIP [ON|OFF] +} + +on ^set "paste_strip toggle" { + set paste_strip ${paste.on ? [off] : [on]} +} + +on ^set "paste_strip on" { + @ paste.strip = 1 + xecho -b PASTE stripping set to ON +} + +on ^set "paste_strip off" { + @ paste.strip = 0 + xecho -b PASTE stripping set to OFF +} + +# # # +on ^set "paste_delay %" { + if (!isnumber($1) || [$1] <= 0) { + xecho -b Usage: /SET PASTE_DELAY seconds + } { + @ paste.delay = [$1] + xecho -b PASTE_DELAY set to $paste.delay seconds. + } +} + +# # # +alias setup_paste +{ + stack push bind ^I + bind ^I self_insert + + stack push on input + on input - + on ^input * { + if (paste.strip) { + //send $0 $1- + } else { + //send $* + } + } + timer -refnum PASTEOFF $paste.delay set paste off +} + +alias remove_paste +{ + on input -* + stack pop on input + stack pop bind ^I + defer ^timer -delete PASTEOFF +} + +#hop'y2k3 diff amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Tue Oct 11 00:52:09 2005 +++ amn/core/save.m Tue Oct 11 00:51:38 2005 @@ -54,7 +54,7 @@ @write($savemt @_r3 = [$_r3]) @write($savemt @_r4 = [$_r4]) @close($savemt) - xecho -b (core).. settings saved to $savefile + xecho $acban (core).. settings saved to $savefile } @@ -112,7 +112,7 @@ @write($fsetsavemt ^sfset format_who_footer $format_who_footer) */ @close($fsetsavemt) - xecho -b (core).. fset settings saved to $(savepath)$fsetsavefile + xecho $acban (core).. fset settings saved to $(savepath)$fsetsavefile } alias fsave { @fsavefile=[$(savepath).a.fsave] @@ -156,7 +156,7 @@ @write($savemt @_whois = [$_whois]) @close($savemt) - xecho -b (core).. format settings saved to $fsavefile + xecho $acban (core).. format settings saved to $fsavefile } alias csave { @@ -174,7 +174,7 @@ @write($savemt @sc3 = [$sc3) @write($savemt @sc4 = [$sc4) @close($savemt) - xecho -b (core).. color settings saved to $csavefile + xecho $acban (core).. color settings saved to $csavefile } alias igsave { @@ -185,7 +185,7 @@ @ write($saveig ^ignore $_igmasks $igtype($_igmasks)) } @close($saveig) - xecho -b (core).. ignores saved to $igsfile + xecho $acban (core).. ignores saved to $igsfile } alias saveall { diff amn.orig/core/save.m.orig amn/core/save.m.orig --- amn.orig/core/save.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/save.m.orig Mon Oct 10 20:39:21 2005 @@ -0,0 +1,198 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage save + +alias asave { + @savefile=[$(savepath).a.save] + @rename($savefile $savefile~) + @savemt = open($savefile W T) + @write($savemt ** amnesiac config file - saved $strftime($time() %D %T)) + @write($savemt @savepath = [$savepath) + @write($savemt notify $notify()) + @write($savemt @fke1 = [$fke1]) + @write($savemt @fke2 = [$fke2]) + @write($savemt @fke3 = [$fke3]) + @write($savemt @fke4 = [$fke4]) + @write($savemt @fke5 = [$fke5]) + @write($savemt @fke6 = [$fke6]) + @write($savemt @fke7 = [$fke7]) + @write($savemt @fke8 = [$fke8]) + @write($savemt @fke9 = [$fke9]) + @write($savemt @fke10 = [$fke10]) + @write($savemt @fke11 = [$fke11]) + @write($savemt @fke12 = [$fke12]) + @write($savemt @plog = [$plog]) + @write($savemt @crapl = [$crapl]) + @write($savemt @msgl = [$msgl]) + @write($savemt @notl = [$notl]) + @write($savemt @dccl = [$dccl]) + @write($savemt @page = [$page]) + @write($savemt @awayt = [$awayt]) + @write($savemt @awayr = [$awayr]) + @write($savemt @statbar=[$statbar]) + @write($savemt @showop = [$showop]) + @write($savemt @kickonban = [$kickonban]) + @write($savemt @kickops =[$kickops]) + @write($savemt @getumode=[$getumode]) + @write($savemt @msgfloodsensor=[$msgfloodsensor]) + @write($savemt @mfloodtimer=[$mfloodtimer]) + @write($savemt @togaway = [$togaway]) + @write($savemt @autoget = [$autoget]) + @write($savemt @togpager = [$togpager]) + @write($savemt @windowdoubles = [$windowdoubles]) + @write($savemt @bt_ = [$bt_]) + @write($savemt @_bt = [$_bt]) + @write($savemt @_ss = [$_ss]) + @write($savemt @_ort = [$_ort]) + @write($savemt @_jwin = [$_jwin]) + @write($savemt @_pubnick = [$_pubnick]) + @write($savemt @_tss = [$_tss]) + @write($savemt @_ovsize = [$_ovsize]) + @write($savemt @_ovmode = [$_ovmode]) + @write($savemt @_ubanself = [$_ubanself]) + @write($savemt @_r2 = [$_r2]) + @write($savemt @_r3 = [$_r3]) + @write($savemt @_r4 = [$_r4]) + @close($savemt) + xecho -b (core).. settings saved to $savefile +} + + +alias fsetsave { + + @rename($(savepath)$fsetsavefile $(savepath)$fsetsavefile~) + @fsetsavemt = open($(savepath)$fsetsavefile W T) + @write($fsetsavemt ** amnesiac format file - saved $strftime($time() %D %T)) + + + fe ($fwords) a1 { + @write($fsetsavemt ^sfset $a1 $($a1)) + } + + +/* + @write($fsetsavemt ^sfset format_msg $format_msg) + @write($fsetsavemt ^sfset format_send_msg $format_send_msg) + @write($fsetsavemt ^sfset format_public $format_public) + @write($fsetsavemt ^sfset format_send_public $format_send_public) + @write($fsetsavemt ^sfset format_public_other $format_public_other) + @write($fsetsavemt ^sfset format_signoff $format_signoff) + @write($fsetsavemt ^sfset format_join $format_join) + @write($fsetsavemt ^sfset format_leave $format_leave) + @write($fsetsavemt ^sfset format_mode $format_mode) + @write($fsetsavemt ^sfset format_kick $format_kick) + @write($fsetsavemt ^sfset format_notice $format_notice) + @write($fsetsavemt ^sfset format_public_notice $format_public_notice) + @write($fsetsavemt ^sfset format_send_notice $format_send_notice) + @write($fsetsavemt ^sfset format_send_dcc_chat $format_send_dcc_chat) + @write($fsetsavemt ^sfset format_dcc_chat $format_dcc_chat) + @write($fsetsavemt ^sfset format_topic $format_topic) + @write($fsetsavemt ^sfset format_ctcp $format_ctcp) + @write($fsetsavemt ^sfset format_send_ctcp $format_send_ctcp) + @write($fsetsavemt ^sfset format_nick_comp $format_nick_comp) + @write($fsetsavemt ^sfset format_sv $format_sv) + @write($fsetsavemt ^sfset format_wall $format_wall) + @write($fsetsavemt ^sfset format_bwall $format_bwall) + @write($fsetsavemt ^sfset format_away $format_away) + @write($fsetsavemt ^sfset format_action $format_action) + @write($fsetsavemt ^sfset format_action_other $format_action_other) + @write($fsetsavemt ^sfset format_desc $format_desc) + @write($fsetsavemt ^sfset format_send_desc $format_send_desc) + @write($fsetsavemt ^sfset format_wallop $format_wallop) + @write($fsetsavemt ^sfset format_nickname $format_nickname) + @write($fsetsavemt ^sfset format_invite $format_invite) + @write($fsetsavemt ^sfset format_dcc_connect $format_dcc_connect) + @write($fsetsavemt ^sfset format_dcc_request $format_dcc_request) + @write($fsetsavemt ^sfset format_ctcp_reply $format_ctcp_reply) + @write($fsetsavemt ^sfset format_server_notice $format_server_notice) + @write($fsetsavemt ^sfset format_dcc_lost_chat $format_dcc_lost_chat) + @write($fsetsavemt ^sfset format_dcc_lost_file $format_dcc_lost_file) + @write($fsetsavemt ^sfset format_dcc_done_file $format_dcc_done_file) + @write($fsetsavemt ^sfset format_who $format_who) + @write($fsetsavemt ^sfset format_who_footer $format_who_footer) +*/ + @close($fsetsavemt) + xecho -b (core).. fset settings saved to $(savepath)$fsetsavefile +} +alias fsave { + @fsavefile=[$(savepath).a.fsave] + @rename($fsavefile $fsavefile~) + @savemt = open($fsavefile W T) + @write($savemt ** amnesiac format file - saved $strftime($time() %D %T)) + @write($savemt @mform = [$mform]) + @write($savemt @smform = [$smform]) + @write($savemt @pubform = [$pubform]) + @write($savemt @spubform = [$spubform]) + @write($savemt @spuboform = [$spuboform]) + @write($savemt @signform = [$signform]) + @write($savemt @joinform = [$joinform]) + @write($savemt @leaveform = [$leaveform]) + @write($savemt @modeform = [$modeform]) + @write($savemt @notform = [$notform]) + @write($savemt @snotform = [$snotform]) + @write($savemt @sdcform = [$sdcform]) + @write($savemt @dcform = [$dcform]) + @write($savemt @topform = [$topform]) + @write($savemt @ctcpform = [$ctcpform]) + @write($savemt @sctcpform = [$sctcpform]) + @write($savemt @echostr = [$echostr]) + @write($savemt @ncomp = [$ncomp]) + @write($savemt @svform = [$svform]) + @write($savemt @snf = [$snf]) + @write($savemt @wallform = [$wallform]) + @write($savemt @bwallform = [$bwallform]) + @write($savemt @awayform = [$awayform]) + @write($savemt @actform = [$actform]) + @write($savemt @actoform = [$actoform]) + @write($savemt @descform = [$descform]) + @write($savemt @sdescform = [$sdescform]) + @write($savemt @scdesc = [$scdesc]) + @write($savemt @pubnotform = [$pubnotform]) + @write($savemt @whoform = [$whoform]) + @write($savemt @whofootform = [$whofootform]) + @write($savemt @nickform = [$nickform]) + @write($savemt @timeform = [$timeform]) + @write($savemt @kickform = [$kickform]) + @write($savemt @_whois = [$_whois]) + @close($savemt) + + xecho -b (core).. format settings saved to $fsavefile +} + +alias csave { + @csavefile=[$(savepath).a.csave] + @rename($csavefile $csavefile~) + @savemt = open($csavefile W T) + @write($savemt ** amnesiac color format file - saved $strftime($time() %D %T)) + @write($savemt @c1 = [$c1) + @write($savemt @c2 = [$c2) + @write($savemt @c3 = [$c3) + @write($savemt @c4 = [$c4) + @write($savemt @c5 = [$c5) + @write($savemt @sc1 = [$sc1) + @write($savemt @sc2 = [$sc2) + @write($savemt @sc3 = [$sc3) + @write($savemt @sc4 = [$sc4) + @close($savemt) + xecho -b (core).. color settings saved to $csavefile +} + +alias igsave { + @igsfile=[$(savepath).a.ig.save] + @rename($igsfile $igsfile~) + @saveig = open($igsfile W T) + fe ($igmask(*)) _igmasks { + @ write($saveig ^ignore $_igmasks $igtype($_igmasks)) + } + @close($saveig) + xecho -b (core).. ignores saved to $igsfile + } + +alias saveall { +@_savevar=[csave asave fsave botsave shitsave usersave fsetsave chansave wordssave modsave igsave nsave] + fe ($_savevar) n1 { + if (match($n1 $aliasctl(alias match *))) { + $n1 + } + } +} diff amn.orig/core/sbar.m amn/core/sbar.m --- amn.orig/core/sbar.m Tue Oct 11 00:52:09 2005 +++ amn/core/sbar.m Tue Oct 11 00:51:38 2005 @@ -13,10 +13,10 @@ if (statbar == [stat.3]) { ^sip2 } - xecho -b $scriptname sbar set to $0 - xecho -b type /asave to save status bar + xecho $acban $scriptname sbar set to $0 + xecho $acban type /asave to save status bar }{ - xecho -b syn: /sbar <1-$(sbar.max)> current sbar is ${hwht}$after(. $statbar) + xecho $acban syn: /sbar <1-$(sbar.max)> current sbar is ${hwht}$after(. $statbar) } oof diff amn.orig/core/sbar.m.orig amn/core/sbar.m.orig --- amn.orig/core/sbar.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/sbar.m.orig Mon Oct 10 20:39:38 2005 @@ -0,0 +1,33 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage sbar + +@ sbar.max = 14 +alias sbar if ([$0] && ([$0] <= sbar.max)) { + @statbar=[stat.$0] + @statnum=[$0] + load $(loadpath)stats/$statbar + if (swsbar == 1) { + ^sip1 + } + if (statbar == [stat.3]) { + ^sip2 + } + xecho -b $scriptname sbar set to $0 + xecho -b type /asave to save status bar + }{ + xecho -b syn: /sbar <1-$(sbar.max)> current sbar is ${hwht}$after(. $statbar) + } +oof + +alias qsbar if ([$0] && ([$0] <= sbar.max)) { + @statbar=[stat.$0] + @statnum=[$0] + load $(loadpath)stats/$statbar + if (swsbar == 1) { + ^sip1 + } + if (statbar == [stat.3]) { + ^sip2 + } +} diff amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Tue Oct 11 00:52:09 2005 +++ amn/core/scan.m Tue Oct 11 00:51:38 2005 @@ -206,6 +206,6 @@ (5) {@snf=5;^eval load ${loadpath}sc/scan.5} (6) {@snf=6;^eval load ${loadpath}sc/scan.6} } - xecho -b scan format set to $(snf) + xecho $acban scan format set to $(snf) } oof diff amn.orig/core/scan.m.orig amn/core/scan.m.orig --- amn.orig/core/scan.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/scan.m.orig Mon Oct 10 20:39:43 2005 @@ -0,0 +1,211 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage scan + +^on ^names * #- +alias fix.scan if ([$0]) { + @_t=[$[10]0] + @_t=msar(g/@/@/+/+/$_t) + @function_return=_t + }{ + @function_return=[$[10]empty_string] +} + + +alias fix.scan2 if ([$0]) { + @_t=[$[11]0] + @_t=msar(g/.?/ /@+/@/@./@/@?/@/.+/+/../ /$strip(/ $(_t))) + @function_return=_t}{@function_return=[$[10]empty_string] +} + +alias fix.scan3 if ([$0]) { + @_t=[$0] + @_t=msar(g/.?/ /@+/@/@./@/@?/@/.+/+/../ /$strip(/ $(_t))) + @function_return=_t +} + +alias fix.scan4 if ([$0]) { + @_t=[$[11]0] + @_t=msar(g/.?/ /@+/$(hcyn)@$(cl)/@./$(hcyn)@$(cl)/@?/$(hcyn)@$(cl)/.+/$(hcyn)+$(cl)/../ /$strip(/ $(_t))) + @function_return=_t}{@function_return=[$[10]empty_string] +} + +### propz to robohak for clueing me into using the 366 numeric for nick list +on ^366 * #- +on #^353 1 * {@nicks#=[$3-]} +on ^366 "*" { + + ^local scan1 + ^push scan1 $pattern(*@* $nicks) + ^push scan1 $pattern(*+* $nicks) + ^push scan1 $filter(*+* $filter(*@* $nicks)) + @nicks.ops=pattern(*@* $nicks) + @nicks.voc=pattern(*+* $nicks) + @nicks.non=filter(*+* $filter(*@* $nicks)) + + ^xecho -w $chanwin($1) $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $1) + if (format_scan_header) { + ^xecho -w $chanwin($1) $fparse(format_scan_header) + } + @_swidth=[${word(0 $geom()) / format_scan_width}] + fe ($jot(1 $_swidth)) n1 { + ^push _nlist nlist.$n1 + ^push _nlist2 \$fparse\(format_scan_onjoin_nicks \$nlist\.$n1) + } + fe ($scan1) $_nlist { + eval xecho $$fparse(format_scan_onjoin_nicks_border) $_nlist2 + } + ^assign -_nlist;^assign -_nlist2 + + if (format_scan_footer) { + ^xecho -w $chanwin($1) $fparse(format_scan_footer) + } + ^assign -nicks;assign -scan1 +} + + +alias scan { + if ([$0]) { + @ chan = [$0] + }{ + @ chan = [$C] + } + ^local ops 0 + ^local voc 0 + ^local non 0 + ^push scan1 $pattern(*@* $channel($chan)) + ^push scan1 $pattern(*.+* $channel($chan)) + ^push scan1 $pattern(..* $channel($chan)) + ^push scan1 $pattern(.\\?* $channel($chan)) + @nicks.ops=pattern(*@* $channel($chan)) + @nicks.voc=pattern(*.+* $channel($chan)) + @nicks.non=pattern(*..* $channel($chan)) + ^xecho -w $chanwin($chan) $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $chan) + if (format_scan_header) { + ^xecho -w $chanwin($1) $fparse(format_scan_header) + } + @_swidth=[${word(0 $geom()) / format_scan_width}] + fe ($jot(1 $_swidth)) n1 { + ^push _nlist nlist.$n1 + ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) + + } + fe ($scan1) $_nlist { + eval ^xecho -w $chanwin($1) $$fparse(format_scan_nicks_border) $_nlist2 + } + ^assign -_nlist;^assign -_nlist2 + if (format_scan_footer) { + ^xecho -w $chanwin($1) $fparse(format_scan_footer) + } + ^assign -nicks;^assign -scan1 +} + + + +alias sco { + if ([$0]) { + @chan=[$0] + }{ + @chan=[$C] + } + ^local nicks.ops 0 + ^push scan1 $pattern(*@* $channel($chan)) + @nicks.ops=chops($chan) + ^xecho -w $chanwin($chan) $fparse(format_scan_users_op $#nicks.ops $chan) + if (format_scan_header) { + ^xecho -w $chanwin($1) $fparse(format_scan_header) + } + @_swidth=[${word(0 $geom()) / format_scan_width}] + fe ($jot(1 $_swidth)) n1 { + ^push _nlist nlist.$n1 + ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) + } + fe ($scan1) $_nlist { + eval ^xecho -w $chanwin($1) $$fparse(format_scan_nicks_border) $_nlist2 + } + ^assign -_nlist;^assign -_nlist2 + + if (format_scan_footer) { + ^xecho -w $chanwin($1) $fparse(format_scan_footer) + } + ^assign -nicks.ops;^assign -scan1 +} + + + +alias scn { + if ([$0]) { + @chan=[$0] + }{ + @chan=[$C] + } + ^local nicks.non 0 + ^push scan1 $pattern(*..* $channel($chan)) + ^push scan1 $pattern(*.+* $channel($chan)) + ^push scan1 $pattern(.\\?* $channel($chan)) + @nicks.non=nochops($chan) + xecho -w $chanwin($chan) $fparse(format_scan_users_non $#nicks.non $chan) + if (format_scan_header) { + ^xecho -w $chanwin($3) $fparse(format_scan_header) + } + @_swidth=[${word(0 $geom()) / format_scan_width}] + fe ($jot(1 $_swidth)) n1 { + ^push _nlist nlist.$n1 + ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) + + } + fe ($scan1) $_nlist { + eval ^xecho -w $chanwin($1) $$fparse(format_scan_nicks_border) $_nlist2 + } + ^assign -_nlist;^assign -_nlist2 + + + if (format_scan_footer) { + ^xecho -w $chanwin($3) $fparse(format_scan_footer) + } + ^assign -scan1;^assign -chan;^assign -nicks.non +} + +alias scv { + if ([$0]) { + @chan=[$0] + }{ + @chan=[$C] + } + ^local nicks.voc 0 + ^push scan1 $pattern(*.+* $channel($chan)) + @nicks.voc=pattern(*.+* $channel($chan)) + ^xecho -w $chanwin($chan) $fparse(format_scan_users_voc $#nicks.voc $chan) + if (format_scan_header) { + xecho -w $chanwin($3) $fparse(format_scan_header) + } + @_swidth=[${word(0 $geom()) / format_scan_width}] + fe ($jot(1 $_swidth)) n1 { + ^push _nlist nlist.$n1 + ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) + } + fe ($scan1) $_nlist { + eval ^xecho -w $chanwin($1) $$fparse(format_scan_nicks_border) $_nlist2 + } + ^assign -_nlist;^assign -_nlist2 + + if (format_scan_footer) { + ^xecho -w $chanwin($3) $fparse(format_scan_footer) + } + ^assign -scan1;^assign -chan;^assign -nicks.voc +} + + + +alias sformat { + switch ($0) { + (1) {@snf=1;^eval load ${loadpath}sc/scan.1} + (2) {@snf=2;^eval load ${loadpath}sc/scan.2} + (3) {@snf=3;^eval load ${loadpath}sc/scan.3} + (4) {@snf=4;^eval load ${loadpath}sc/scan.4} + (5) {@snf=5;^eval load ${loadpath}sc/scan.5} + (6) {@snf=6;^eval load ${loadpath}sc/scan.6} + } + xecho -b scan format set to $(snf) +} +oof diff amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Tue Oct 11 00:52:09 2005 +++ amn/core/sets.m Tue Oct 11 00:51:38 2005 @@ -122,6 +122,7 @@ @timeform=[1] @kickform=[1] @_whois=[4] +@acban=[\[a+c\]] ## default color and sbar color var. @c1 = [\\[0\;36m] diff amn.orig/core/sets.m.orig amn/core/sets.m.orig --- amn.orig/core/sets.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/sets.m.orig Tue Oct 11 00:30:03 2005 @@ -0,0 +1,135 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage sets + +## colour vars. +@ cl = [\\[0m] +@ blk = [\\[0\;30m] +@ blu = [\\[0\;34m] +@ grn = [\\[0\;32m] +@ cyn = [\\[0\;36m] +@ red = [\\[0\;31m] +@ mag = [\\[0\;35m] +@ yel = [\\[0\;33m] +@ wht = [\\[0\;37m] +@ hblk = [\\[1\;30m] +@ hblu = [\\[1\;34m] +@ hgrn = [\\[1\;32m] +@ hcyn = [\\[1\;36m] +@ hred = [\\[1\;31m] +@ hmag = [\\[1\;35m] +@ hyel = [\\[1\;33m] +@ hwht = [\\[1\;37m] +@ bwht = [\\[47m] +@ bmag = [\\[45m] +@ bblu = [\\[44m] +@ bred = [\\[41m] +@ bblk = [\\[40m] +@ bgrn = [\\[42m] +@ byel = [\\[43m] +@ bcyn = [\\[46m] + +## default assigns +@_ort=[3] +@_bt=[3] +@bt_=[better] +@mfloodtimer=[10] +@msgfloodsensor=[60] +@awayt=[60] +@awayl=[on] +@awayr=[Not Here] +@a.ver=[amnesiac] +@rel_id=[9] +@a.rel=[1.1d r/$rel_id] +@a.date=[20050903] +@_ss=[15] +@_ovsize=[5] +@_ovmode=[fibxwzZsy] +@kickonban=[off] +@kickops=[off] +@togpager=[off] +@fke1=[wholeft] +@fke2=[wl] +@fke3=[wsa] +@fke4=[scan] +@fke5=[uptime] +@fke6=[dcc] +@fke7=[listchan] +@fke8=[listbot] +@fke9=[config] +@fke10=[userlist] +@fke11=[shitlist] +@fke12=[ehelp] +@savepath=[~/.amn/] +@crapl=[on] +@msgl=[on] +@notl=[on] +@plog=[on] +@dccl=[on] +@togaway=[off] +@savefile=[.a.save] +@fsavefile=[.a.fsave] +@igsfile=[.a.ig.save] +@csavefile=[.a.csave] +@fsetsavefile=[.a.fsetsave] +@nsavefile=[.a.nsavefile] +@modfile=[$(savepath).mod.save] +@getumode=[iw] +@showop=[off] +@autoget=[off] +@_jwin=[on] +@_pubnick=N +@_tss=[on] +@_r2=[dugewfe] +@_r3=[efguowe] +@_r4=[fgsiuso] +@_boxhead = [ $(hwht)Ú$(cl)Ä$cparse($(c1)Ä)$(cl)ÄÄÄÄÄ$cparse($(c1)ÄÄÄ)$cparse($(c2)ÄÄÄ)$cparse($(c1)Ä)$(cl)Ä$(hblk)Ä- - Ä -$(cl)] +@_boxfoot = [ $cparse($(c1)À)$cparse($(c3)Ä)$(hblk)- ÄÄ -$(cl)] +@_ubanself=[off] + +## default theme vars. +@mform=[39] +@smform=[52] +@pubform=[1] +@spubform=[3] +@spuboform=[1] +@pubnotform=[1] +@signform=[4] +@joinform=[16] +@leaveform=[3] +@modeform=[4] +@notform=[19] +@snotform=[21] +@sdcform=[19] +@dcform=[15] +@topform=[4] +@ctcpform=[3] +@sctcpform=[8] +@echostr=[57] +@ncomp=[15] +@svform=[18] +@snf=[3] +@wallform = [2] +@bwallform=[4] +@awayform=[5] +@actform=[3] +@descform=[2] +@sdescform=[1] +@statbar=[stat.11] +@whoform=[1] +@whofootform=[1] +@nickform=[3] +@timeform=[1] +@kickform=[1] +@_whois=[4] + +## default color and sbar color var. +@c1 = [\\[0\;36m] +@c2 = [\\[1\;36m] +@c3 = [\\[0\;35m] +@c4 = [\\[1\;35m] +@c5 = [\\[0\;36m] +@sc1=[\\[0\;36m] +@sc2=[\\[1\;36m] +@sc3=[\\[0m] +@sc4=[\\[0\;34m] diff amn.orig/core/theme.m amn/core/theme.m --- amn.orig/core/theme.m Tue Oct 11 00:52:09 2005 +++ amn/core/theme.m Tue Oct 11 00:51:38 2005 @@ -63,8 +63,9 @@ @ write($saveth @sc2=[$sc2) @ write($saveth @sc3=[$sc3) @ write($saveth @sc4=[$sc4) + @ write($saveth @acban=[$acban]) @ close($saveth) - xecho -b saved theme file [$(loadpath)themes/$(name).th] $desc + xecho $acban saved theme file [$(loadpath)themes/$(name).th] $desc ^load $(loadpath)themes/$(name).th ^eval load $(loadpath)core/fsets.m ^eval load $(loadpath)core/arrays.m @@ -72,7 +73,7 @@ ^getusers }{ -xecho -b $scriptname usage: /tsave +xecho $acban $scriptname usage: /tsave } # thanks to ttb for some original help w/ read(), but it still didn't work :P @@ -87,27 +88,27 @@ @ close($thfile) //echo $[10]name $[12]auth $desc$repeat(${20-strlen($strip( $stripansicodes($desc)))} ) } - xecho -b current theme is $scdesc + xecho $acban current theme is $scdesc }{ -if (fexist($(loadpath)themes/$0.th)==-1) { xecho -b theme $0 does not exist }{ +if (fexist($(loadpath)themes/$0.th)==-1) { xecho $acban theme $0 does not exist }{ @ name = [$0] ^load $(loadpath)themes/$(0).th ^eval load $(loadpath)core/fsets.m ^eval load $(loadpath)core/arrays.m ^update.f ^getusers - xecho -b loaded theme file [$(0).th] by $auth $desc + xecho $acban loaded theme file [$(0).th] by $auth $desc } } -alias untheme { @name=[];@scdesc=[];xecho -b $scriptname: no longer using a theme;fsave +alias untheme { @name=[];@scdesc=[];xecho $acban $scriptname: no longer using a theme;fsave }[C alias rtheme if ([$0]) { -if (fexist($(loadpath)themes/$0.th)==-1) { xecho -b theme $(0) does not exist! +if (fexist($(loadpath)themes/$0.th)==-1) { xecho $acban theme $(0) does not exist! }{ ^exec rm -rf $(loadpath)themes/$(0).th 1> /dev/null 2> /dev/null -xecho -b theme $(0) has been removed! -}}{xecho -b usage: /rtheme } +xecho $acban theme $(0) has been removed! +}}{xecho $acban usage: /rtheme } ## kreca/crapple 05 ## clogic '98 diff amn.orig/core/theme.m.orig amn/core/theme.m.orig --- amn.orig/core/theme.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/theme.m.orig Mon Oct 10 20:40:00 2005 @@ -0,0 +1,113 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +## codelogic's theme module, thanx to robohak for help w/ padding +## modified crapple/kreca 05 +subpackage theme + +alias tsave if ([$1]) { + @ blahfile = $0 + if (fexist($(loadpath)themes/$0.th)) { + @ rename($(loadpath)themes/$0.th $(loadpath)themes/$0.th.old) + ^exec rm $(loadpath)themes/$0.th.old 1> /dev/null 2> /dev/null + } + @saveth = open($(loadpath)themes/$0.th W T) + @author = N + @desc = [$1] + @name = [$0] + @ write($saveth :$author) + @ write($saveth :$desc) + @ write($saveth :$name) + @ write($saveth @auth=[$N]) + @ write($saveth @desc=[$desc]) + @ write($saveth @name=[$name]) + @ write($saveth @scdesc=[\\\($desc\\\)]) + @ write($saveth @mform=$mform) + @ write($saveth @smform=$smform) + @ write($saveth @pubform=$pubform) + @ write($saveth @spubform=$spubform) + @ write($saveth @spuboform=$spuboform) + @ write($saveth @pubnotform=$pubnotform) + @ write($saveth @signform=$signform) + @ write($saveth @joinform=$joinform) + @ write($saveth @leaveform=[$leaveform]) + @ write($saveth @kickform=[$kickform]) + @ write($saveth @modeform=$modeform) + @ write($saveth @notform=$notform) + @ write($saveth @snotform=$snotform) + @ write($saveth @sdcform=$sdcform) + @ write($saveth @dcform=$dcform) + @ write($saveth @topform=$topform) + @ write($saveth @ctcpform=$ctcpform) + @ write($saveth @sctcpform=$sctcpform) + @ write($saveth @echostr=$echostr) + @ write($saveth @ncomp=$ncomp) + @ write($saveth @svform=$svform) + @ write($saveth @snf=$snf) + @ write($saveth @wallform = [$wallform]) + @ write($saveth @bwallform=$bwallform) + @ write($saveth @awayform=$awayform) + @ write($saveth @actform=$actform) + @ write($saveth @actform=$actform) + @ write($saveth @descform=$descform) + @ write($saveth @sdescform=$sdescform) + @ write($saveth @actform=$actform) + @ write($saveth @statbar=[$statbar]) + @ write($saveth @timeform=[$timeform]) + @ write($saveth @_whois=[$_whois]) + @ write($saveth @c1=[$c1) + @ write($saveth @c2=[$c2) + @ write($saveth @c3=[$c3) + @ write($saveth @c4=[$c4) + @ write($saveth @c5=[$c5) + @ write($saveth @sc1=[$sc1) + @ write($saveth @sc2=[$sc2) + @ write($saveth @sc3=[$sc3) + @ write($saveth @sc4=[$sc4) + @ close($saveth) + xecho -b saved theme file [$(loadpath)themes/$(name).th] $desc + ^load $(loadpath)themes/$(name).th + ^eval load $(loadpath)core/fsets.m + ^eval load $(loadpath)core/arrays.m + ^update.f + ^getusers + +}{ +xecho -b $scriptname usage: /tsave +} + +# thanks to ttb for some original help w/ read(), but it still didn't work :P +alias theme if (![$0]) { + //echo file name author description + //echo + fe ($glob($(loadpath)themes\/*.th)) th { + @ :thfile = open($th R T) + @ :auth = after(: $read($thfile)) + @ :desc = after(: $read($thfile)) + @ :name = after(: $read($thfile)) + @ close($thfile) + //echo $[10]name $[12]auth $desc$repeat(${20-strlen($strip( $stripansicodes($desc)))} ) + } + xecho -b current theme is $scdesc +}{ +if (fexist($(loadpath)themes/$0.th)==-1) { xecho -b theme $0 does not exist }{ + @ name = [$0] + ^load $(loadpath)themes/$(0).th + ^eval load $(loadpath)core/fsets.m + ^eval load $(loadpath)core/arrays.m + ^update.f + ^getusers + xecho -b loaded theme file [$(0).th] by $auth $desc +} +} + +alias untheme { @name=[];@scdesc=[];xecho -b $scriptname: no longer using a theme;fsave +}[C +alias rtheme if ([$0]) { +if (fexist($(loadpath)themes/$0.th)==-1) { xecho -b theme $(0) does not exist! +}{ +^exec rm -rf $(loadpath)themes/$(0).th 1> /dev/null 2> /dev/null +xecho -b theme $(0) has been removed! +}}{xecho -b usage: /rtheme } + +## kreca/crapple 05 +## clogic '98 diff amn.orig/core/trickle.m amn/core/trickle.m --- amn.orig/core/trickle.m Tue Oct 11 00:52:09 2005 +++ amn/core/trickle.m Tue Oct 11 00:51:38 2005 @@ -7,7 +7,7 @@ if ( [$#] < 3 || ! ischannel($0)) { - xecho -b usage: /trickle #channel|* nick|nick!ident@host [nick|nick!ident@host] ... command + xecho $acban usage: /trickle #channel|* nick|nick!ident@host [nick|nick!ident@host] ... command return; } @cmd = [$~] diff amn.orig/core/trickle.m.orig amn/core/trickle.m.orig --- amn.orig/core/trickle.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/trickle.m.orig Mon Oct 10 21:35:48 2005 @@ -0,0 +1,76 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage trickle + +alias trickle +{ + + if ( [$#] < 3 || ! ischannel($0)) + { + xecho -b usage: /trickle #channel|* nick|nick!ident@host [nick|nick!ident@host] ... command + return; + } + @cmd = [$~] + @nums=[$#]-2 + eval ^assign allusers $$1-$nums + fe ($allusers) curmatch + { + @tmp = split(! $curmatch) + if ( #tmp == 2) + { + + @preusers=pattern($word(0 $tmp) $chanusers($0)) + @uhosts=userhost($preusers) + @users = copattern( $word(1 $tmp) uhosts preusers) + } else + { + @users= pattern($curmatch $chanusers($0)) + } + fe ($users) curuser + { + eval $cmd $curuser + } + } + +} + +## trickle example swiss army knife features. +alias filter {trickle $*} +alias tscan {trickle $C $* who} +alias tdeop {trickle $C $* deop} +alias top {trickle $C $* op} +alias tkick {trickle $C $* kick} +alias tbk {trickle $C $* bk} +alias tfuck {trickle $C $* fuck} + +alias thelp { + if (!$[0]) { + +//echo -------------= Trickle IRC Swiss Army Knife Help =------------- + +//echo tscan /tscan [ident@host] specified match will show user(s) in +//echo current chan. +//echo tdeop /tdeop [ident@host] specified match will deop user(s) in +//echo current chan. +//echo tkick /tkick [ident@host] specified match will kick user(s) in +//echo current chan. +//echo tbk /tbk [ident@host] specified match will bankick user(s) +//echo in current chan. +//echo top /top [ident@host] specified match will op user(s) in +//echo current chan. +//echo common /common #somechan will compare nicks between current and +//echo specified chan. +input_char "menu paused, hit the ANY key to continue. " +pause +//echo +//echo /trickle can do a wide variety of commands/matches these are just +//echo some of the quick aliases which makes usage of /trickle. +//echo some /trickle usage examples. +//echo /trickle #somechan *!*@*aol.com kill +//echo /trickle #somechan *!ident@* voice +//echo /trickle * wildcard is not working at this time. +//echo /filter is also aliased to trickle for those who can't remember the cmd. +//echo --------------------------------------------------------------------- + + } +} diff amn.orig/core/users.m amn/core/users.m --- amn.orig/core/users.m Tue Oct 11 00:52:09 2005 +++ amn/core/users.m Tue Oct 11 00:51:38 2005 @@ -120,9 +120,9 @@ #silence it up some by crapple. alias common { ^assign common_users $common($chanusers($C) / $chanusers($*)); - eval xecho -b Common users on: $C - $* \($numwords($common_users)\); + eval xecho $acban Common users on: $C - $* \($numwords($common_users)\); fe ($common_users) ii jj kk ll { - xecho -b $fparse(format_scan_nicks $ii) $fparse(format_scan_nicks $jj) $fparse(format_scan_nicks $kk) $fparse(format_scan_nicks $ll) + xecho $acban $fparse(format_scan_nicks $ii) $fparse(format_scan_nicks $jj) $fparse(format_scan_nicks $kk) $fparse(format_scan_nicks $ll) } ^assign -common_users; } diff amn.orig/core/users.m.orig amn/core/users.m.orig --- amn.orig/core/users.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/users.m.orig Mon Oct 10 20:41:02 2005 @@ -0,0 +1,130 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +## last modified by crapple on 9.1.05 +subpackage users + +alias chops { + if (![$0]) { + @:chan = [$1] ? [$1] : [$C] + fe ($chops($chan)) _foi { + xecho -v$fparse(format_chops $_foi $chan) + } + }{ + + + if ([$0]=~[*!*@*]) { + @:chan = [$1] ? [$1] : [$C] + fe ($chops($chan)) _n1 { + if (match($0 $_n1!$userhost($_n1))) { + xecho -v$fparse(format_chops $_n1 $chan) + } + } + + } + } +} +alias user if ([$0]) { + switch ($0) { + (-ops) {chops $1-} + (-nonops) {nops $1-} + (-nops) {nops $1-} + (-vocs) {vocs $1-} + + (-kick) { + switch ($1) { + (*#*) { fe ($remw($N $chanusers($1))) n1 { + ^kick $1 $n1 mass user kick + } + } + (-ops) { @:chan = [$2] ? [$2] : [$C] + @:chan2 = [$3] ? [$3] : [$C] + if ([$2]=~[*!*@*]) { + fe ($remw($N $chops($chan2))) n1 { + if (match($2 $n1!$userhost($n1))) { + ^kick $chan2 $n1 op kick match $2 + } + } + }{ fe ($remw($N $chops($chan)) )n1 { + ^kick $chan $n1 mass op kick + } + } } + (-nops) (-nonops) { @:chan = [$2] ? [$2] : [$C] + @:chan2 = [$3] ? [$3] : [$C] + if ([$2]=~[*!*@*]) { + fe ($nochops($chan2)) n1 { + if (match($2 $n1!$userhost($n1))) { + ^kick $chan2 $n1 nonop kick match $2 + } + } + }{ fe ($nochops($chan)) n1 { + ^kick $chan $n1 mass nonop kick + } + } } + + + (*) { if ([$1]=~[*!*@*]) { + @:chan = [$2] ? [$2] : [$C] + fe ($remw($N $chanusers($chan))) n1 { + if (match($1 $n1!$userhost($n1))) { + ^kick $chan $n1 user kick match $1 + } + } + }} + } + } + + (-sort) {chops $1-;nops $1-;vocs $1-} + + + (*) { if ([$0]=~[*!*@*]) { + chops $0-;nops $0-;vocs $0- + } + } + } + + }{ + chops;vocs;nops +} +alias nops { + @:chan = [$1] ? [$1] : [$C] + fe ($nochops($chan)) _foi { + if (![$0]) { + xecho -v$fparse(format_user_non $_foi $chan) + } + + if ([$0]=~[*!*@*] && match($0 $_foi!$userhost($_foi))) { + + xecho -v$fparse(format_user_non $_foi $chan) + } + } +} + + +alias vocs { + @:chan = [$1] ? [$1] : [$C] + fe ($nochops($chan)) _foi { + if (![$0]) { + if (ischanvoice($_foi $C)) { + xecho -v$fparse(format_user_vocs $_foi $chan) + } + } + if ([$0]=~[*!*@*] && match($0 $_foi!$userhost($_foi))) { + if (ischanvoice($_foi $chan) && !ischanop($_foi $chan)) { + xecho -v$fparse(format_user_vocs $_foi $chan) + } + } + } +} + +## common alias done by adam. +#silence it up some by crapple. +alias common { + ^assign common_users $common($chanusers($C) / $chanusers($*)); + eval xecho -b Common users on: $C - $* \($numwords($common_users)\); + fe ($common_users) ii jj kk ll { + xecho -b $fparse(format_scan_nicks $ii) $fparse(format_scan_nicks $jj) $fparse(format_scan_nicks $kk) $fparse(format_scan_nicks $ll) + } + ^assign -common_users; +} + +oof diff amn.orig/core/whois.m amn/core/whois.m --- amn.orig/core/whois.m Tue Oct 11 00:52:09 2005 +++ amn/core/whois.m Tue Oct 11 00:51:38 2005 @@ -11,6 +11,6 @@ (5) {@_whois=5;^eval load ${loadpath}wis/whois.5} (6) {@_whois=6;^eval load ${loadpath}wis/whois.6} } - xecho -b whois format set to $(_whois) + xecho $acban whois format set to $(_whois) } oof diff amn.orig/core/whois.m.orig amn/core/whois.m.orig --- amn.orig/core/whois.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/whois.m.orig Mon Oct 10 20:41:13 2005 @@ -0,0 +1,16 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage whois + +alias 1format { + switch ($0) { + (1) {@_whois=1;^eval load ${loadpath}wis/whois.1} + (2) {@_whois=2;^eval load ${loadpath}wis/whois.2} + (3) {@_whois=3;^eval load ${loadpath}wis/whois.3} + (4) {@_whois=4;^eval load ${loadpath}wis/whois.4} + (5) {@_whois=5;^eval load ${loadpath}wis/whois.5} + (6) {@_whois=6;^eval load ${loadpath}wis/whois.6} + } + xecho -b whois format set to $(_whois) +} +oof diff amn.orig/core/window.m amn/core/window.m --- amn.orig/core/window.m Tue Oct 11 00:52:09 2005 +++ amn/core/window.m Tue Oct 11 00:51:38 2005 @@ -9,7 +9,7 @@ alias wj { if (![$0]) { - xecho -b usage: /wj [key] + xecho $acban usage: /wj [key] } { ^window new channel "$channame($0) $1-" hide swap last } @@ -42,7 +42,7 @@ alias wcs if ([$0]) { ^window new server $0 hide swap last channel "$channame($1) $2-" }{ - xecho -b usage: /wcs server channel key + xecho $acban usage: /wcs server channel key } alias wns wcs $* diff amn.orig/core/window.m.orig amn/core/window.m.orig --- amn.orig/core/window.m.orig Thu Jan 1 00:00:00 1970 +++ amn/core/window.m.orig Mon Oct 3 03:18:23 2005 @@ -0,0 +1,184 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# last modified by crapple 9.2.05 +# windowing stuff +subpackage window + +## more complex windowing stuff here. +alias channame if (left(1 $0)==[#] || left(1 $0)==[&]) { return $0 }{ return #$0 } + +alias wj { + if (![$0]) { + xecho -b usage: /wj [key] + } + { ^window new channel "$channame($0) $1-" hide swap last + } +} + +alias winmsg { + ^window new + ^window level msgs + ^window size 5 + ^window refnum 1 +} + +alias query { + window query $* +} + +alias wq { + if (#) { + window new_hide swap last query $0 + } elsif (Q) { + query + ^window $winnum() kill + } +} + +alias _wsact { window swap $leftw(1 $notifywindows()) +;} + +## multiserv stuff. +alias wcs if ([$0]) { + ^window new server $0 hide swap last channel "$channame($1) $2-" + }{ + xecho -b usage: /wcs server channel key +} +alias wns wcs $* + +# Returns the names of all channels belonging to a specific window. +# If no window is specified the current window is used. +# Taken from darkstar. +alias winchannels (win default "$winnum()", void) +{ + @ :serv = winserv($win); + for chan in ($mychannels($serv)) + { + xeval -s $serv { + if (winchan($chan) == win) { + @ push(function_return $chan); + }; + }; + }; +}; + +## shortend aliases. +alias wc {^window new hide swap last} +alias msgwin {wc;wsl;window level msgs,notices;window name messages} +alias wsa ^_wsact +alias wlk {part $C;wk} +alias s {window swap $*} + +## misc. +alias wflush window flush_scrollback +alias cls clear +alias clsa {clear -ALL} + +## for Alien88 +alias wnc2 {window new hide swap last split off channel $0 $1 $2} + +## misc query qwin/name aliases. +alias qw wq $* +alias q query $* +alias dq window remove $* +alias qd dq $* +alias wadd window add $* +alias rwadd dq $* + +## topwin stuff for broken topwin module. +alias topoff window toplines 0 +alias topdel topoff +alias rtop topoff + +## window shortcuts. +alias wsl {window swap last} +alias wka wkh +alias wkh {window kill_all_hidden} +alias wko {window kill_others} +alias wsg {window grow} +alias wss {window shrink} +alias ws {window swap} +alias wn {window next} +alias wp {window previous} +alias wk {window killswap} +alias wlk {part $C;wk} +alias wl window list + +## window toggles/config/options +alias wname {window name $*} +alias wlog window log toggle +alias wfile window logfile $* +alias wlevel window level $* +alias winfo window +alias wnotify window notify toggle +alias wnlevel window notify_level $* +alias wskip window skip toggle +alias wswap window swappable toggle +alias wfix window fixed toggle +alias wlast window lastlog $* +alias whold window hold_mode toggle + +## window toggle simplification. +/* + Copyright (c) 2003 David B. Kratter (BlackJac@EFNet) + This will allow you to toggle between hidden windows 1 through 20 more + easily. Press Esc+1 to toggle between windows 1 and 11, Esc+2 for win- + dows 2 and 12, etc., up through Esc+0 for windows 10 and 20. + + Simplifications by kreca +*/ + +alias toggle.window (number, void) { + if (@number) { + @number= number ? number : 10 + @ :wn = winnum() == number ? number+10 : number + if (winnum($wn) != -1) { + ^window swap $wn + } else { + if ( wn <= 10 && winnum(${wn+10}) != -1) { + ^window swap ${wn+10} + } else if (wn > 10 && winnum($number) != -1) { + ^window swap $number + } + } + } +} + +on #-window_create 123 "*" +{ + if ( windowdoubles == [on] ) { + window $0 double on; + } +} + +fe ($jot(0 9 1)) tt { + bind ^[$tt parse_command toggle.window $tt +} + +alias 1 ^window swap 1 +alias 2 ^window swap 2 +alias 3 ^window swap 3 +alias 4 ^window swap 4 +alias 5 ^window swap 5 +alias 6 ^window swap 6 +alias 7 ^window swap 7 +alias 8 ^window swap 8 +alias 9 ^window swap 9 +alias 0 ^window swap 10 +alias 11 ^window swap 11 +alias 12 ^window swap 12 +alias 13 ^window swap 13 +alias 14 ^window swap 14 +alias 15 ^window swap 15 +alias 16 ^window swap 16 +alias 17 ^window swap 17 +alias 18 ^window swap 18 +alias 19 ^window swap 19 +alias 20 ^window swap 20 +alias 21 ^window swap 21 +alias 22 ^window swap 22 +alias 23 ^window swap 23 +alias 24 ^window swap 24 +alias 25 ^window swap 25 + +oof diff amn.orig/docs/HIDDEN_FORMATS amn/docs/HIDDEN_FORMATS --- amn.orig/docs/HIDDEN_FORMATS Thu Jan 1 00:00:00 1970 +++ amn/docs/HIDDEN_FORMATS Tue Oct 11 00:51:38 2005 @@ -0,0 +1,9 @@ +This is to document the vars that can be adjusted to change visuals but +don't have associated format commands. Can be set in the client, amnrc, +or in themes. + +If you use these to change things you're on your own. Don't bug us about +how they work, because this is basically here at the insisting of one +particularly onery developer. + +acban Amnesiac banner (default: [a+c]) diff amn.orig/docs/HIDDEN_FORMATS.orig amn/docs/HIDDEN_FORMATS.orig diff amn.orig/modules/abot/abot.m amn/modules/abot/abot.m --- amn.orig/modules/abot/abot.m Tue Oct 11 00:52:09 2005 +++ amn/modules/abot/abot.m Tue Oct 11 00:51:38 2005 @@ -26,7 +26,7 @@ @ bothost = after(! $input1) @ botnick = before(! $input1) } else { - if (!getuhost($input1)) { xecho -b $botprompt $input1 is not on irc! }{ + if (!getuhost($input1)) { xecho $acban $botprompt $input1 is not on irc! }{ @ bothost = sar(g/~/\*/$getuhost($input1)) @ botnick = [$input1] }} @@ -36,7 +36,7 @@ @ :botcmd = [$3-] @ setitem(bots 0 !) @ setitem(bots $numitems(bots) $botnick!$bothost $pass $chan $botcmd) - xecho -b $botprompt $Cparse(%nbot added %c$botnick%K!%c$bothost%n pass%K:%c $decode($pass) %nchannel%K:%c $chan%n command%K:%n $botcmd) + xecho $acban $botprompt $Cparse(%nbot added %c$botnick%K!%c$bothost%n pass%K:%c $decode($pass) %nchannel%K:%c $chan%n command%K:%n $botcmd) } } } @@ -120,7 +120,7 @@ @cmd=word(3 $blah2) @pass=decode($word(1 $blah2)) if (ischanop($nick $chan)&&match($host $userhost($nick))) { - xecho -b $botprompt msging $nick for ops on $chan + xecho $acban $botprompt msging $nick for ops on $chan msg $nick $cmd $pass ^assign -chan;^assign -blah;^assign -blah2;^assign -host;^assign -nick;^assign -host;^assign -nick;^assign -cmd;^assign -pass } diff amn.orig/modules/abot/abot.m.orig amn/modules/abot/abot.m.orig --- amn.orig/modules/abot/abot.m.orig Thu Jan 1 00:00:00 1970 +++ amn/modules/abot/abot.m.orig Mon Oct 10 21:36:00 2005 @@ -0,0 +1,155 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage autobot + +@ bsavefile = [$(savepath).bot.save] +@ botprompt = [$cparse($(c1)auto)$cparse($(c2)bot)$(hblk):$(cl)] +alias ismask {return ${pass(!@ $0) ? 1 : 0}} +/* shade - ismask() */ +/* thanks =] */ + +#some compat aliases..//zak +alias delbot botdel $* +alias botlist listbot +alias abot listbot +alias rmbot botdel $* +#end. + +alias addbot { + if ( numwords($*) < 4) { + banner.lchead + banner.mid syntax: $Cparse(/addbot %K[%nbotnick%K|%nbotnick%K!%nbotident%K@%nbothost%K]%n password channel opcmd) + banner.lcfoot +}{ + @ :input1 = [$0] + if (ismask($input1)) { + @ bothost = after(! $input1) + @ botnick = before(! $input1) + } else { + if (!getuhost($input1)) { xecho -b $botprompt $input1 is not on irc! }{ + @ bothost = sar(g/~/\*/$getuhost($input1)) + @ botnick = [$input1] + }} + if (bothost&&botnick) { + @ :pass = encode($1) + @ :chan = [$2] + @ :botcmd = [$3-] + @ setitem(bots 0 !) + @ setitem(bots $numitems(bots) $botnick!$bothost $pass $chan $botcmd) + xecho -b $botprompt $Cparse(%nbot added %c$botnick%K!%c$bothost%n pass%K:%c $decode($pass) %nchannel%K:%c $chan%n command%K:%n $botcmd) + } + } +} + +alias listbot { + if (numitems(bots)<2) { + banner.lchead + banner.mid the botlist is empty! + banner.lcfoot } { + banner.lchead + banner.mid $(hblk)[$(c2)n$(c1)um$(hblk)] [$(cl)$_pad(3 $(c2)c$(c1)hannel)$(hblk)] [$_pad(32 $(c2)u$(c1)serhost)$(hblk)] [$(c2)o$(c1)p cmd$(hblk)]$(cl) + banner.mid + for (@xx=1, xx + banner.lcfoot + } + +alias botload +{ + + ^eval load $bsavefile + + @ delarray(bots) + @ setitem(bots 0 !) + @ ii = 1 + while (bot[$ii]) + { + @ setitem(bots $ii $bot[$ii]) + @ ii++ + } +} + + + +^on #^hook 332 "channel_synch *" { + @chan=[$1] + @blah=getmatches(bots *$chan*) + ^local temp. + fe ($blah) ii { + @temp.1 = getitem(bots $ii) + @temp.2 = before(! $word(0 $temp.1)) + @temp.3=after(! $word(0 $temp.1)) + if (pattern($temp.2 $chops($chan))==temp.2 && match($temp.3 $userhost($temp.2))) { + + @blah2=getitem(bots $ii) + } + } + if (blah2) { + @host=after(! $word(0 $blah2)) + @nick=before(! $word(0 $blah2)) + @cmd=word(3 $blah2) + @pass=decode($word(1 $blah2)) + if (ischanop($nick $chan)&&match($host $userhost($nick))) { + xecho -b $botprompt msging $nick for ops on $chan + msg $nick $cmd $pass + ^assign -chan;^assign -blah;^assign -blah2;^assign -host;^assign -nick;^assign -host;^assign -nick;^assign -cmd;^assign -pass + } + } + } + +botload + +#make sure sync.m get's loaded! +^eval ^load $(loadpath)core/sync.m +alias abhelp abothelp +alias abothelp { + if (!$[0]) { + +//echo -----------------------= Autobot Help =-------------------------- + +//echo addbot /addbot +//echo adds bots to the botlist. +//echo botdel /botdel delete bot from botlist +//echo botsave /botsave saves bots to file +//echo listbot /listbot lists all bots +//echo delbot /delbot - same as /botdel +//echo botlist /botlist - same as /listbot +//echo abot /abot - same as /listbot +//echo rmbot /rmbot - same as /botdel + +//echo ------------------------------------------------------------------- + } +} + +# crapple/kreca '05 +# void/clogic '98 diff amn.orig/modules/away/away.m amn/modules/away/away.m --- amn.orig/modules/away/away.m Tue Oct 11 00:52:09 2005 +++ amn/modules/away/away.m Tue Oct 11 00:51:38 2005 @@ -10,14 +10,14 @@ alias remlog { if (fexist(~/.amn/away.log) == -1) { - xecho -b log file does not exist. + xecho $acban log file does not exist. }{ input "remove log? [y|n]: " { if ([$0]==[y]) { exec rm ~/.amn/away.log - xecho -b ~/.amn/away.log deleted + xecho $acban ~/.amn/away.log deleted }{ - xecho -b remlog canceled + xecho $acban remlog canceled } } } @@ -31,7 +31,7 @@ on -idle * if ([$0]!= 0) { if ([$0]== awayt && awaystat != 1 && togaway != [OFF]) { away autoaway after $0 mins - xecho -b Auto-Away after $0 minutes + xecho $acban Auto-Away after $0 minutes } } @@ -65,34 +65,34 @@ if (awaytime > [0]) { @timediff=tdiff2(${backtime - awaytime}) //away - xecho -b type /readlog to view log. + xecho $acban type /readlog to view log. } }{ - xecho -b you are not away.. + xecho $acban you are not away.. } alias awaytime if ([$0]) { @ awayt = [$0] - xecho -b awaytime set to "$awayt" + xecho $acban awaytime set to "$awayt" } else { - xecho -b awaytime set to "$awayt"} + xecho $acban awaytime set to "$awayt"} alias awaymsg if ([$0]) { @ awayr = [$*] - xecho -b away reason set to "$awayr" + xecho $acban away reason set to "$awayr" } else { - xecho -b away reason set to "$awayr"} + xecho $acban away reason set to "$awayr"} alias awaytog { if (![$0]) { - xecho -b away toggle is set to "$togaway" + xecho $acban away toggle is set to "$togaway" } if (match($0 on off)) {@togaway = [$0] - xecho -b away toggle is set to "$togaway" + xecho $acban away toggle is set to "$togaway" }{ if ([$0]&&!match($0 on off)) { - xecho -b invalid choice + xecho $acban invalid choice } } @@ -101,14 +101,14 @@ ## pager crap here. alias pager { if (![$0]) { - xecho -b pager set to "$togpager" + xecho $acban pager set to "$togpager" } if (match($0 on off)) { @togpager = [$0] - xecho -b pager set to "$togpager" + xecho $acban pager set to "$togpager" }{ if ([$0]&&!match($0 on off)) { - xecho -b invalid choice + xecho $acban invalid choice } } } @@ -171,70 +171,70 @@ alias logcrap { if (![$0]) { - xecho -b misc crap logging set to "$crapl" + xecho $acban misc crap logging set to "$crapl" } if (match($0 on off)) { @crapl = [$0] - xecho -b misc crap logging set to "$crapl" + xecho $acban misc crap logging set to "$crapl" }{ if ([$0]&&!match($0 on off)) { - xecho -b invalid choice + xecho $acban invalid choice } } } alias logm { if (![$0]) { - xecho -b msg logging set to "$msgl" + xecho $acban msg logging set to "$msgl" } if (match($0 on off)) { @msgl = [$0] - xecho -b msg logging set to "$msgl" + xecho $acban msg logging set to "$msgl" }{ if ([$0]&&!match($0 on off)) { - xecho -b invalid choice + xecho $acban invalid choice } } } alias logd { if (![$0]) { - xecho -b dcc logging set to "$dccl" + xecho $acban dcc logging set to "$dccl" } if (match($0 on off)) { @dccl = [$0] - xecho -b dcc logging set to "$dccl" + xecho $acban dcc logging set to "$dccl" }{ if ([$0]&&!match($0 on off)) { - xecho -b invalid choice + xecho $acban invalid choice } } } alias logn { if (![$0]) { - xecho -b notice logging set to "$notl" + xecho $acban notice logging set to "$notl" } if (match($0 on off)) { @notl = [$0] - xecho -b notice logging set to "$notl" + xecho $acban notice logging set to "$notl" }{ if ([$0]&&!match($0 on off)) { - xecho -b invalid choice + xecho $acban invalid choice } } } alias logpub { if (![$0]) { - xecho -b public logging set to "$plog" + xecho $acban public logging set to "$plog" } if (match($0 on off)) { @plog = [$0] - xecho -b public logging set to "$plog" + xecho $acban public logging set to "$plog" }{ if ([$0]&&!match($0 on off)) { - xecho -b invalid choice + xecho $acban invalid choice } } } diff amn.orig/modules/away/away.m.orig amn/modules/away/away.m.orig --- amn.orig/modules/away/away.m.orig Thu Jan 1 00:00:00 1970 +++ amn/modules/away/away.m.orig Mon Oct 10 20:43:52 2005 @@ -0,0 +1,240 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage away + +alias mlog {config b $*} +alias clog {config c $*} +alias nlog {config d $*} +alias dlog {config y $*} +alias playback readlog + +alias remlog { + if (fexist(~/.amn/away.log) == -1) { + xecho -b log file does not exist. + }{ + input "remove log? [y|n]: " { + if ([$0]==[y]) { + exec rm ~/.amn/away.log + xecho -b ~/.amn/away.log deleted + }{ + xecho -b remlog canceled + } + } + } +} + + +alias readlog { + more ~/.amn/away.log + } + +on -idle * if ([$0]!= 0) { + if ([$0]== awayt && awaystat != 1 && togaway != [OFF]) { + away autoaway after $0 mins + xecho -b Auto-Away after $0 minutes + } +} + + +^on #-msg 332 * { + if (awaystat && matchitem(awaymsgs $0) < 0) { + @setitem(awaymsgs $numitems(awaymsgs) $0) + } +} + + +on #-connect 1 * if (awaystat) { + //away $awaymsg + } + +alias away { + @awayl=[on] + @awaystat=1 + @awaytime=() + @awaymsg=[$0]?[$*]:awayr + //away away: \($(awaymsg)\) $fparse(format_away) + @awaytime=time() + + } + +alias back if ([$A]) { + @awayl=[off] + @awaystat=0 + @delarray(awaymsgs) + @backtime=time() + if (awaytime > [0]) { + @timediff=tdiff2(${backtime - awaytime}) + //away + xecho -b type /readlog to view log. + } + + }{ + xecho -b you are not away.. +} + +alias awaytime if ([$0]) { + @ awayt = [$0] + xecho -b awaytime set to "$awayt" + } else { + xecho -b awaytime set to "$awayt"} + +alias awaymsg if ([$0]) { + @ awayr = [$*] + xecho -b away reason set to "$awayr" + } else { + xecho -b away reason set to "$awayr"} + +alias awaytog { + if (![$0]) { + xecho -b away toggle is set to "$togaway" + } + if (match($0 on off)) {@togaway = [$0] + xecho -b away toggle is set to "$togaway" + }{ + if ([$0]&&!match($0 on off)) { + xecho -b invalid choice + } + } + +} + +## pager crap here. +alias pager { + if (![$0]) { + xecho -b pager set to "$togpager" + } + if (match($0 on off)) { + @togpager = [$0] + xecho -b pager set to "$togpager" + }{ + if ([$0]&&!match($0 on off)) { + xecho -b invalid choice + } + } +} + +^on #-ctcp 2 "% % page*" { + if (togpager != [off]) { + beep + } +} + +## move the logging shit here since it's for away logging anyways. +## no use having it as a stupid seperate module. +## some hooks +@recvtime=[$strftime(%x at %I:%M:%S %p)] + +## logging hooks +on #-ctcp 2 "*" if (crapl ==[ON] && awaystat && awayl ==[ON]) { + @fd = open(~/.amn/away.log W) + @write($fd CTCP $recvtime $0 \($userhost()\) requested $2 $3- from $1) + @close($fd) +} +on #-msg 4 "*" if (msgl ==[ON] && awaystat && awayl ==[ON]) { + @fd = open(~/.amn/away.log W) + @write($fd MSG $recvtime $0 \($userhost()\) $1-) + @close($fd) +} +on #-notice 3 "*" if (notl==[ON]&&awaystat&&awayl==[ON]&&match(*[*#*]* $1-)==[0]) { + @fd = open(~/.amn/away.log W) + @write($fd NOTICE $recvtime $0 \($userhost()\) $1-) + @close($fd) +} + +on #-notice 4 "*[*#*]*" if (crapl==[ON]&&awaystat&&awayl==[ON]) { + @fd = open(~/.amn/away.log W) + @write($fd WALL $recvtime $0 $1 $2-) + @close($fd)} + +on #-dcc_request 6 " * " if (dccl ==[ON] && awaystat && awayl ==[ON]) { + @fd = open(~/.amn/away.log W) + @write($fd DCC $recvtime dcc $1 request from $0 [$userhost()])) + @close($fd)} + +on #-public_other 4 * if (awayl==[ON]&&awaystat&&match(*$N* $2-)&&plog==[ON]) { + @fd = open(~/.amn/away.log W) + @write($fd PUBLIC $recvtime <$0:$1> $2-) + @close($fd)} + +on #-public 5 * if (awayl==[ON]&&awaystat&&match(*$N* $2-)&&plog==[ON]) { + @fd = open(~/.amn/away.log W) + @write($fd PUBLIC $recvtime <$0:$1> $2-) + @close($fd)} + +on #-kick 33 '$N' { + if (awayl==[ON]&&awaystat&&crapl==[ON]) { + @fd = open(~/.amn/away.log W) + @write($fd KICK $recvtime $1 kicked you off $2 for reason $3-) + @close($fd)}} + +## more aliases here..(logging) + +alias logcrap { + if (![$0]) { + xecho -b misc crap logging set to "$crapl" + } + if (match($0 on off)) { + @crapl = [$0] + xecho -b misc crap logging set to "$crapl" + }{ + if ([$0]&&!match($0 on off)) { + xecho -b invalid choice + } + } +} + +alias logm { + if (![$0]) { + xecho -b msg logging set to "$msgl" + } + if (match($0 on off)) { + @msgl = [$0] + xecho -b msg logging set to "$msgl" + }{ + if ([$0]&&!match($0 on off)) { + xecho -b invalid choice + } + } +} + +alias logd { + if (![$0]) { + xecho -b dcc logging set to "$dccl" + } + if (match($0 on off)) { + @dccl = [$0] + xecho -b dcc logging set to "$dccl" + }{ + if ([$0]&&!match($0 on off)) { + xecho -b invalid choice + } + } +} + +alias logn { + if (![$0]) { + xecho -b notice logging set to "$notl" + } + if (match($0 on off)) { + @notl = [$0] + xecho -b notice logging set to "$notl" + }{ + if ([$0]&&!match($0 on off)) { + xecho -b invalid choice + } + } +} + +alias logpub { + if (![$0]) { + xecho -b public logging set to "$plog" + } + if (match($0 on off)) { + @plog = [$0] + xecho -b public logging set to "$plog" + }{ + if ([$0]&&!match($0 on off)) { + xecho -b invalid choice + } + } +} diff amn.orig/modules/bwk/bwk.m amn/modules/bwk/bwk.m --- amn.orig/modules/bwk/bwk.m Tue Oct 11 00:52:09 2005 +++ amn/modules/bwk/bwk.m Tue Oct 11 00:51:38 2005 @@ -14,8 +14,8 @@ alias addword { if ( # < 2) { - xecho -b syn: /addword word #chan [type] to bk a word in specified chan. - xecho -b type is either bk or kick. Default is bk. + xecho $acban syn: /addword word #chan [type] to bk a word in specified chan. + xecho $acban type is either bk or kick. Default is bk. }{ @:bktype=[bk] if ( # >= 3 && findw($2 bk kick)) { @@ -27,13 +27,13 @@ @setitem(_words $numitems(_words) $0) @setitem(_wordschan $numitems(_wordschan) $1) @setitem(_wordstype $numitems(_wordstype) $bktype) - xecho -b added word $0 with channel $1 to word list. + xecho $acban added word $0 with channel $1 to word list. } } alias listword { if (numitems(_words) == 1) { - xecho -b no words current on list + xecho $acban no words current on list }{ banner.head for (@xx=1, xx 0 && [$0] < numitems(_words)) { - xecho -b deleted $getitem(_words $0) $getitem(_wordschan $0) from list + xecho $acban deleted $getitem(_words $0) $getitem(_wordschan $0) from list @delitem(_words $0) @delitem(_wordschan $0) @delitem(_wordstype $0) }{ - xecho -b number out of range. + xecho $acban number out of range. } }{ - xecho -b syn: /delword + xecho $acban syn: /delword } } diff amn.orig/modules/bwk/bwk.m.orig amn/modules/bwk/bwk.m.orig --- amn.orig/modules/bwk/bwk.m.orig Thu Jan 1 00:00:00 1970 +++ amn/modules/bwk/bwk.m.orig Mon Oct 10 20:44:09 2005 @@ -0,0 +1,138 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage bwk + +@wordsfile=[$(savepath).a.words.save] + +## some short form aliases. +alias unword delword $* +alias addw addword $* +alias bwk listword +alias addbwk addword $* +alias delbwk unword $* +#end + +alias addword { + if ( # < 2) { + xecho -b syn: /addword word #chan [type] to bk a word in specified chan. + xecho -b type is either bk or kick. Default is bk. + }{ + @:bktype=[bk] + if ( # >= 3 && findw($2 bk kick)) { + @:bktype=[$2] + } + @setitem(_words 0 !) + @setitem(_wordschan 0 !) + @setitem(_wordstype 0 !) + @setitem(_words $numitems(_words) $0) + @setitem(_wordschan $numitems(_wordschan) $1) + @setitem(_wordstype $numitems(_wordstype) $bktype) + xecho -b added word $0 with channel $1 to word list. + } +} + +alias listword { + if (numitems(_words) == 1) { + xecho -b no words current on list + }{ + banner.head + for (@xx=1, xx 0 && [$0] < numitems(_words)) + { + xecho -b deleted $getitem(_words $0) $getitem(_wordschan $0) from list + @delitem(_words $0) + @delitem(_wordschan $0) + @delitem(_wordstype $0) + }{ + xecho -b number out of range. + } + }{ + xecho -b syn: /delword + } +} + +^on #-public 322 * { + fe ($2-) a1 { + if (matchitem(_words $a1) > -1 && getitem(_wordschan $matchitem(_words *$a1*)) == [$1] && (ischanop($0 $1)==0 || kickops == [on])) { + @:mnum=matchitem(_words $a1) + if (getitem(_wordstype $mnum) != [kick]) { + //mode $1 +b $mask($_bt $userhost($0)) + } + //kick $1 $0 BWK $getitem(_words $mnum) + } + } +} + +^on #-public_other 322 * { + fe ($2-) a1 { + if (matchitem(_words $a1) > -1 && getitem(_wordschan $matchitem(_words *$a1*)) == [$1] && (ischanop($0 $1)==0 || kickops == [on])) { + @:mnum=matchitem(_words $a1) + if (getitem(_wordstype $mnum) != [kick]) { + //mode $1 +b $mask($_bt $userhost($0)) + } + //kick $1 $0 BWK $getitem(_words $matchitem(_words $a1)) + } + } +} + + + +alias wordssave { + @rename($wordsfile $wordsfile~) + @savemt = open($wordsfile W T) + for (@xx=1, xx will delete specified word from list. + //echo listword /listword will list words in bankick word list. + //echo wordssave /wordssave will save the word list in bankick word list. + //echo -= Wordkick Quick Aliases =- + //echo unword/delword delbwk/delword + //echo addw/addword addbwk/addword + //echo bwk/listword + //echo ------------------------------------------------------------------- +} + diff amn.orig/modules/clones/clones.m amn/modules/clones/clones.m --- amn.orig/modules/clones/clones.m Tue Oct 11 00:52:09 2005 +++ amn/modules/clones/clones.m Tue Oct 11 00:51:38 2005 @@ -25,9 +25,9 @@ alias clones { ^local chan @chan= getclones($*) - xecho -b clones on $chan: [${numitems(clones)-1} total..] + xecho $acban clones on $chan: [${numitems(clones)-1} total..] for (@ i=1,i 0) + { + xecho -c $* + } + } + } + +} +alias dict { + if (![$0]) {/ahelp dict}{ + @dword=[$*] + ^exec -name dict telnet $dict.serv $dict.port + ^exec -line {/processdict $*} %dict + } +^assign -dict +} \ No newline at end of file diff amn.orig/modules/mjoin/mjoin.m amn/modules/mjoin/mjoin.m --- amn.orig/modules/mjoin/mjoin.m Tue Oct 11 00:52:09 2005 +++ amn/modules/mjoin/mjoin.m Tue Oct 11 00:51:38 2005 @@ -25,20 +25,20 @@ @setitem(chans 0 !) @setitem(chans $numitems(chans) $a1 $_key) } - xecho -b added $* to channel list + xecho $acban added $* to channel list }{ fe ($_ach) a1 { @setitem(chans 0 !) @setitem(chans $numitems(chans) $a1) } - xecho -b added $* to channel list + xecho $acban added $* to channel list } } } alias listchan { if (numitems(chans) == 1) { - xecho -b no channels current on list + xecho $acban no channels current on list }{ banner.lchead for (@xx=1, xx will add specified channel to mjoinlist +//echo addjoin /addjoin will add specified channel to mjoinlist +//echo delchan /delchan will delete channel from mjoin list +//echo listchan /listchan will show a list of channels on the mjoin list +//echo mjoin /mjoin will join all channels on mjoin list +//echo chansave /chansave will save mjoin list +//echo chanload /chanload will load mjoin list from ~/.chan.save +//echo -= Mjoin Quick Aliases =- +//echo listc/listchan ajlist/listchan chanlist/listchan +//echo addjoin/addchan ajoin/addchan +//echo unajoin/delchan deljoin/delchan rmjoin/delchan unjoin/delchan + +//echo ------------------------------------------------------------------- + } +} diff amn.orig/modules/ncomp/ncomp.m amn/modules/ncomp/ncomp.m --- amn.orig/modules/ncomp/ncomp.m Tue Oct 11 00:52:09 2005 +++ amn/modules/ncomp/ncomp.m Tue Oct 11 00:51:38 2005 @@ -8,7 +8,7 @@ if (pattern($txt* $chanusers($C))) { @ per = pattern($txt* $chanusers($C)) if (numwords($per) > 1) { - xecho -b Ambiguous matches: $per + xecho $acban Ambiguous matches: $per sendline $* }{ sendline $stripansicodes($per$format_nick_comp $1-) @@ -17,7 +17,7 @@ if (!pattern($txt* $chanusers($C)) && pattern(*$txt* $chanusers($C))) { @ per = pattern(*$txt* $chanusers($C)) if (numwords($per) > 1) { - xecho -b Ambiguous matches: $per + xecho $acban Ambiguous matches: $per sendline $* }{ sendline $stripansicodes($per$format_nick_comp $1-) diff amn.orig/modules/ncomp/ncomp.m.orig amn/modules/ncomp/ncomp.m.orig --- amn.orig/modules/ncomp/ncomp.m.orig Thu Jan 1 00:00:00 1970 +++ amn/modules/ncomp/ncomp.m.orig Mon Oct 10 20:51:21 2005 @@ -0,0 +1,32 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage ncomp + +^on ^input "*" { + if (strlen($before(: $0)) > 1&&right(1 $0)==[:]) { + @ txt = before(: $0) + if (pattern($txt* $chanusers($C))) { + @ per = pattern($txt* $chanusers($C)) + if (numwords($per) > 1) { + xecho -b Ambiguous matches: $per + sendline $* + }{ + sendline $stripansicodes($per$format_nick_comp $1-) + } + } + if (!pattern($txt* $chanusers($C)) && pattern(*$txt* $chanusers($C))) { + @ per = pattern(*$txt* $chanusers($C)) + if (numwords($per) > 1) { + xecho -b Ambiguous matches: $per + sendline $* + }{ + sendline $stripansicodes($per$format_nick_comp $1-) + } + } + if (!pattern($txt* $chanusers($C)) && !pattern(*$txt* $chanusers($C))) { + sendline $* + } +}{ + sendline $* +} +} diff amn.orig/modules/nlog/nlog.m amn/modules/nlog/nlog.m --- amn.orig/modules/nlog/nlog.m Tue Oct 11 00:52:09 2005 +++ amn/modules/nlog/nlog.m Tue Oct 11 00:51:38 2005 @@ -25,14 +25,14 @@ alias nsotog { if ( [$#] ==0) { - xecho -b notify signoff log toggle is set to "$nsolog" + xecho $acban notify signoff log toggle is set to "$nsolog" } if (match($0 on off)) { @nsolog = [$0] - xecho -b notify signoff log toggle is set to "$nsolog" + xecho $acban notify signoff log toggle is set to "$nsolog" }{ if ( [$#] &&!match($0 on off)) { - xecho -b invalid choice, on or off. + xecho $acban invalid choice, on or off. } } } @@ -41,14 +41,14 @@ #notify aliases. alias rnlog { if (fexist($nlogfile) == -1) { - xecho -b notify log file does not exist. + xecho $acban notify log file does not exist. }{ input "remove log? [y|n]: " { if ([$0]==[y]) { exec rm $nlogfile - xecho -b $nlogfile deleted + xecho $acban $nlogfile deleted }{ - xecho -b rnlog canceled + xecho $acban rnlog canceled } } } diff amn.orig/modules/nlog/nlog.m.orig amn/modules/nlog/nlog.m.orig --- amn.orig/modules/nlog/nlog.m.orig Thu Jan 1 00:00:00 1970 +++ amn/modules/nlog/nlog.m.orig Mon Oct 10 20:52:09 2005 @@ -0,0 +1,74 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage nlog + +@nsolog=[off] +@nfile=[$(savepath).a.notify.save] +@nlogfile=[$(savepath)notify.log] + + +^on #-notify_signon 10 * { + @fd = open($nlogfile W); + @write($fd SIGNON by $0 \($userhost()\) $1- on $strftime(%x at %X)); + @close($fd); + +} + + +^on #-notify_signoff 10 * { + if ( nsolog == [on] ) { + @fd = open($nlogfile W); + @write($fd SIGNOFF by $0 $1- on $strftime(%x at %X)); + @close($fd); + } +} + +alias nsotog { + if ( [$#] ==0) { + xecho -b notify signoff log toggle is set to "$nsolog" + } + if (match($0 on off)) { + @nsolog = [$0] + xecho -b notify signoff log toggle is set to "$nsolog" + }{ + if ( [$#] &&!match($0 on off)) { + xecho -b invalid choice, on or off. + } + } +} + + +#notify aliases. +alias rnlog { + if (fexist($nlogfile) == -1) { + xecho -b notify log file does not exist. + }{ + input "remove log? [y|n]: " { + if ([$0]==[y]) { + exec rm $nlogfile + xecho -b $nlogfile deleted + }{ + xecho -b rnlog canceled + } + } + } +} + + +alias ncache { + more $nlogfile +} + +alias nread ncache +alias nlist ncache +alias rmnlog rnlog + +alias nsave { + @rename($nfile $nfile~) + @savemt = open($nfile W T) + @write($savemt @nsolog=[$nsolog]) + @close($savemt) + xecho [mod] (nlog).. notify settings saved to $nfile +} + +^eval load $nfile diff amn.orig/modules/oper/oper.m amn/modules/oper/oper.m --- amn.orig/modules/oper/oper.m Tue Oct 11 00:52:09 2005 +++ amn/modules/oper/oper.m Tue Oct 11 00:51:38 2005 @@ -32,19 +32,19 @@ alias ovsize { if (![$0]) { - xecho -b operview window size set to "$_ovsize" + xecho $acban operview window size set to "$_ovsize" }{ @_ovsize=[$0] - xecho -b operview window size set to "$_ovsize" + xecho $acban operview window size set to "$_ovsize" } } alias ovmode { if (![$0]) { - xecho -b oper modes set to "$_ovmode" + xecho $acban oper modes set to "$_ovmode" }{ @_ovmode=[$0] - xecho -b oper modes set to "$_ovmode" + xecho $acban oper modes set to "$_ovmode" } } @@ -90,7 +90,7 @@ alias tkline { if (![$0]) { - xecho -b usage: /tkline [nick|hostmask] + xecho $acban usage: /tkline [nick|hostmask] }{ quote kline $0 $1 :$2- } diff amn.orig/modules/oper/oper.m.orig amn/modules/oper/oper.m.orig --- amn.orig/modules/oper/oper.m.orig Thu Jan 1 00:00:00 1970 +++ amn/modules/oper/oper.m.orig Mon Oct 10 21:36:17 2005 @@ -0,0 +1,366 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage oper + +@ bindctl(sequence ^E set parse_command _spageu) +@ bindctl(sequence ^D set parse_command _spaged) + +alias _spageu { + @:_cwin=winnum() + window ref operview + parsekey SCROLL_BACKWARD + window ref $_cwin +} + +alias _spaged { + @:_cwin=winnum() + window ref operview + parsekey SCROLL_FORWARD + window ref $_cwin +} + +alias _winnames { + fe ($winrefs()) n1 { + if (match($0 $winnam($n1))) { + return $n1 + + }{ + return 0 + } + } +} + +alias ovsize { + if (![$0]) { + xecho -b operview window size set to "$_ovsize" + }{ + @_ovsize=[$0] + xecho -b operview window size set to "$_ovsize" + } +} + +alias ovmode { + if (![$0]) { + xecho -b oper modes set to "$_ovmode" + }{ + @_ovmode=[$0] + xecho -b oper modes set to "$_ovmode" + } +} + +/on -server_notice "*requesting gline for*" { + @glineTarget=strip([] [$11]); + @glineReason=strip([] [$12-]); +} + +alias gi { + input "GLINE $glineTarget for '$glineReason'? (y/n) " { + if ( [$0] == [y] ) /quote gline $glineTarget :$glineReason + } +} + +alias operview { + if (winnum(operview) != -1) { + abecho $banner toggled operview off. + ^window OperView kill + ^umode -$_ovmode + + }{ + + abecho $banner toggled operview on. + ^window new fixed on size $_ovsize name OperView level snotes,opnotes,wallops;umode +$_ovmode +# ^set status_server [%S] + ^set status_format [operview] %> [$servername($winserv(OperView))] + ^window back + + } +} + +alias doper { + umode -o +} + +alias operwall { + quote operwall :$* +} + +alias locops { + quote locops :$* +} + +alias tkline { + if (![$0]) { + xecho -b usage: /tkline [nick|hostmask] + }{ + quote kline $0 $1 :$2- + } +} +alias kline { + if (match(*@* $0)) { + quote kline $0 :$1- + }{ + if (getuhost($0)) { + quote kline $sar(g/*!*//$mask(3 $getuhost($0))) :$1- + }{ + abecho $0 no such nick. + } + } +} + +alias unkline { + quote unkline $* +} + +alias kill { + quote kill $0 :$1- +} + +alias mkill { + if (![$0]) { + fe ($remw($N $chanusers($C))) n1 { + quote kill $n1 :bye + } + }{ + fe ($remw($N $chanusers($C))) n1 { + quote kill $n1 :$* + } + } +} + +alias mkline { + if (![$0]) { + fe ($remw($N $chanusers($C))) n1 { + kline $n1 + } + }{ + fe ($remw($N $chanusers($C))) n1 { + kline $n1 $* + } + } +} + +alias dwho {//who -dx $*} + +alias gline { + quote gline $0 :$1- +} + +alias dline { + quote dline $0 :$1- +} + +alias zline { + quote zline $0 :$1- +} + +alias unzline { + quote unzline $* +} + +alias undline { + quote undline $* +} + +alias watch { + quote watch $* +} +alias cjupe { + quote mode $0 +j +} + +alias ucjupe { + quote mode $0 -j +} + +alias modlist { + quote modlist +} + +alias modload { + quote modload $* +} + +alias modunload { + quote modunload $* +} + +^on ^server_notice * { + aecho $fparse(format_timestamp_some $($_timess))$2- +} + +^on ^server_notice "% % % % % % % % % /whois*" { + aecho $fparse(format_timestamp_some $($_timess))[$9] on you requested by $4!$5) +} + +#stuff for mikey(Alien88) that he doesn't care much about being silenced. +^on ^server_notice "*TRACE requested*" # +^on ^server_notice "*Too many clients*" # +^on ^server_notice "*farcans*nitedog*never*leaves*" # +^on ^server_notice "*locally juped channel*" # +^on ^server_notice "*drone flooder *dcc*" # +^on ^server_notice "*irc.stats.gatherer* being introduced*" # +^on ^server_notice "*irc.stats.gatherer* split from*" # +^on ^server_notice "*stats.efnet.info* being introduced*" # +^on ^server_notice "*stats.efnet.info* split from*" # +^on ^server_notice "*stats.blackened.com* being introduced*" # +^on ^server_notice "*stats.blackened.com* split from*" # +^on ^server_notice "*Temporary K-line for*expired*" # +^on ^server_notice "*I-line is full for*" # +^on ^server_notice "*john23*spambot*" # + +^on ^server_notice "% % % % LINKS*" { + aecho $fparse(format_timestamp_some $($_timess))[links $5] requested by $8!$9 $10 +} + +^on ^server_notice "% % % % STATS*" { + aecho $fparse(format_timestamp_some $($_timess))[stats '$5'] requested by $8!$9) $10 +} + +^on ^server_notice "% % % % % % % % % (O)*" { + aecho $fparse(format_timestamp_some $($_timess))$4!$5 is now a $8 $9 +} + +^on ^server_notice "% % % % % exiting:*" { + aecho $fparse(format_timestamp_some $($_timess))Client exiting: $6!$7 $8- +} + +^on ^server_notice "% % % % % connecting:*" { + aecho $fparse(format_timestamp_some $($_timess))Client connecting: $6!$7 $8- +} + +^on ^server_notice "% % % % % % rehashing*" { + aecho $fparse(format_timestamp_some $($_timess))$4 is rehashing $7- +} + +^on ^server_notice "% % % % ADMIN*" { + aecho $fparse(format_timestamp_some $($_timess))[Admin] requested by $7!$8 $9- +} + +^on ^server_notice "% % % % % SQUIT*" { + aecho $fparse(format_timestamp_some $($_timess))$4 $5 $6 from $8 $9- +} + +^on ^server_notice "% % % % % was connected*" { + aecho $fparse(format_timestamp_some $($_timess)) $4 $5 $6 $7 $8 $9 $10- +} + +^on ^server_notice "% % % % Link with*" { + aecho $fparse(format_timestamp_some $($_timess))Link $5 $6 $7- +} + +^on ^server_notice "% % % % % % already present*" { + aecho $4$fparse(format_timestamp_some $($_timess))$5 $6 $7 from $9 +} + +^on ^server_notice "* removed * ?-Line *" { + switch ($8) { + (K-Line) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%b$8%n] $4 $5 $6 $7 %b$8%n $9 %R$10%n) + } + (G-Line) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%g$8%n] $4 $5 $6 $7 %g$8%n $9 %R$10%n) + } + (D-Line) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%c$8%n] $4 $5 $6 $7 %c$8%n $9 %R$10%n) + } + (X-Line) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%p$8%n] $4 $5 $6 $7 %p$8%n $9 %R$10%n) + } + (*) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%y$8%n] $4 $5 $6 $7 %y$8%n $9 %R$10%n) + } + } +} + +^on ^server_notice "* added ?-Line for *" { + switch ($6) { + (K-Line) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%b$6%n] $4 $5 %b$6%n $7 %R$8%n %m$9-%n) + } + (G-Line) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%g$6%n] $4 $5 %g$6%n $7 %R$8%n %m$9-%n) + } + (D-Line) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%c$6%n] $4 $5 %c$6%n $7 %R$8%n %m$9-%n) + } + (X-Line) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%p$6%n] $4 $5 %p$6%n $7 %R$8%n %m$9-%n) + } + (*) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%y$6%n] $4 $5 %y$6%n $7 %R$8%n %m$9-%n) + } + } +} + +^on ^server_notice "* added temporary * ?-Line for *" { + switch ($9) { + (K-Line) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%b$9%n] $4 $5 $6 %b$7 $8 $9%n $10 %R$11%n %m$12-%n) + } + (D-Line) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%c$9%n] $4 $5 $6 %c$7 $8 $9%n $10 %R$11%n %m$12-%n) + } + (X-Line) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%p$9%n] $4 $5 $6 %p$7 $8 $9%n $10 %R$11%n %m$12-%n) + } + (*) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([$y$9%n] $4 $5 $6 $y$7 $8 $9%n $10 %R$11%n %m$12-%n) + } + } +} + +^on ^server_notice "* ?LINE active for *" { + switch ($4) { + (DLINE) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%c$4%n] $5 $6 %R$7%n $8-) + } + (KLINE) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%b$4%n] $5 $6 %R$7%n $8-) + } + (*) { + xecho -b $fparse(format_timestamp_some $($_timess)) $cparse([%y$4%n] $5 $6 %R$7%n $8-) + } + } +} + +^on ^382 * { + aecho $1- +} + +^on ^365 * { + aecho $1 $2 of links list. +} + +^on ^243 * { + aecho $1- +} + +^on ^219 * # + +alias ohelp { + if (!$[0]) { + +//echo -----------------------= Oper Help =-------------------------- + +//echo /tkline [nick|ident@host] will temp kline for +//echo specified minutes. +//echo /unkline will remove kline from server list. +//echo /operwall will send a operwall with specified text to the server. +//echo /ov will open up a split window will the level WALLOPS OPNOTES SNOTES +//echo so all server msgs will go to that window. +//echo /mkline will mass kline current channel for specified reason +//echo /mkill will mass kill current channel +//echo /locops will send a msg to all operators on current server +//echo /kline will set a kline for nick or specified ident@host +//echo /modlist view ircd modules. +//echo /modload loads specified ircd module. +//echo /modunload unloads specified ircd module. +//echo /dline reason. will set a dline with reason. (ratbox) +//echo /undline will remove a dline. (ratbox) +//echo binds ^E scroll_backward in ovwin ^D scroll_forward in ovwin + +//echo ------------------------------------------------------------------- + } +} + + diff amn.orig/modules/orignick/orignick.m amn/modules/orignick/orignick.m --- amn.orig/modules/orignick/orignick.m Tue Oct 11 00:52:09 2005 +++ amn/modules/orignick/orignick.m Tue Oct 11 00:51:38 2005 @@ -5,14 +5,14 @@ ^timer -del 45 alias orignick { if (![$0]) { - xecho -b /orignick /staynick to cancel + xecho $acban /orignick /staynick to cancel }{ ^timer -delete 45 @nic=[$0] ^timer -window -1 -refnum 45 -rep -1 $_ort { ^getnick $nic } - xecho -b attempting to jupe $nic + xecho $acban attempting to jupe $nic } } @@ -20,39 +20,39 @@ ^userhost $nic -cmd { if ([$3@$4] == [@]) { ^nick $nic - xecho -b congrads nick juped. /staynick to cancel + xecho $acban congrads nick juped. /staynick to cancel } } } alias staynick { ^assign -nic ^timer -delete 45 - xecho -b /orignick request canceled. + xecho $acban /orignick request canceled. } alias setorig { if (# == 0) { - xecho -b orignick delay set to "$_ort" + xecho $acban orignick delay set to "$_ort" return; } if ([$0] > 0 && [$0] <=20) { @_ort = [$0] - xecho -b orignick delay set to "$_ort" + xecho $acban orignick delay set to "$_ort" }{ - xecho -b time out of range. Valid numbers are 1-20 + xecho $acban time out of range. Valid numbers are 1-20 } } on #-channel_signoff 42 "*" { if ([$1] == nic) { ^nick $nic - xecho -b congrads nick juped. /staynick to cancel + xecho $acban congrads nick juped. /staynick to cancel } } ^on #-nickname 33 * { if ([$0]== nic) { ^nick $nic - xecho -b congrads nick juped. /staynick to cancel + xecho $acban congrads nick juped. /staynick to cancel } } diff amn.orig/modules/orignick/orignick.m.orig amn/modules/orignick/orignick.m.orig --- amn.orig/modules/orignick/orignick.m.orig Thu Jan 1 00:00:00 1970 +++ amn/modules/orignick/orignick.m.orig Mon Oct 10 20:53:20 2005 @@ -0,0 +1,58 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage orignick + +^timer -del 45 +alias orignick { + if (![$0]) { + xecho -b /orignick /staynick to cancel + }{ + ^timer -delete 45 + @nic=[$0] + ^timer -window -1 -refnum 45 -rep -1 $_ort { + ^getnick $nic + } + xecho -b attempting to jupe $nic + } +} + +alias getnick { + ^userhost $nic -cmd { + if ([$3@$4] == [@]) { + ^nick $nic + xecho -b congrads nick juped. /staynick to cancel + } + } +} +alias staynick { + ^assign -nic + ^timer -delete 45 + xecho -b /orignick request canceled. +} + +alias setorig { + if (# == 0) { + xecho -b orignick delay set to "$_ort" + return; + } + if ([$0] > 0 && [$0] <=20) { + @_ort = [$0] + xecho -b orignick delay set to "$_ort" + }{ + xecho -b time out of range. Valid numbers are 1-20 + } +} + +on #-channel_signoff 42 "*" { + if ([$1] == nic) { + ^nick $nic + xecho -b congrads nick juped. /staynick to cancel + } +} + +^on #-nickname 33 * { + if ([$0]== nic) { + ^nick $nic + xecho -b congrads nick juped. /staynick to cancel + } +} diff amn.orig/modules/query/query.m amn/modules/query/query.m --- amn.orig/modules/query/query.m Tue Oct 11 00:52:09 2005 +++ amn/modules/query/query.m Tue Oct 11 00:51:38 2005 @@ -22,6 +22,6 @@ } if (AUTO_QUERY && querywin($nick $lastserver()) == -1) { window new name $nick query $nick $AUTO_QUERY_WINDOW_ARGS - xecho -b New query window created for $nick + xecho $acban New query window created for $nick } } diff amn.orig/modules/query/query.m.orig amn/modules/query/query.m.orig --- amn.orig/modules/query/query.m.orig Thu Jan 1 00:00:00 1970 +++ amn/modules/query/query.m.orig Mon Oct 3 03:27:04 2005 @@ -0,0 +1,27 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage query + +/* + * Copyright (c) 2003 Brian Weiss + * All rights reserved. + * + */ + +/****** CONFIG SECTION ******/ + +assign AUTO_QUERY 1 +assign AUTO_QUERY_WINDOW_ARGS hide + +on #-msg 835 "*" { _autoquery $0 $userhost(); } +on #-send_msg 835 "*" { _autoquery $0 $userhost(); } + +alias _autoquery (nick, uhost, void) { + if (!nick || uhost == [@]) { + return + } + if (AUTO_QUERY && querywin($nick $lastserver()) == -1) { + window new name $nick query $nick $AUTO_QUERY_WINDOW_ARGS + xecho -b New query window created for $nick + } +} diff amn.orig/modules/shitlist/shitlist.m amn/modules/shitlist/shitlist.m --- amn.orig/modules/shitlist/shitlist.m Tue Oct 11 00:52:09 2005 +++ amn/modules/shitlist/shitlist.m Tue Oct 11 00:51:38 2005 @@ -10,7 +10,7 @@ alias fuck { if (![$0]) { - xecho -b /fuck nick [kickbans person and adds them to your shitlist with level 3] + xecho $acban /fuck nick [kickbans person and adds them to your shitlist with level 3] }{ if (![$1]) { ^bankick $0 shitted @@ -24,10 +24,10 @@ alias addshit { if (![$3]) { - xecho -b syntax: /addshit [nick!ident@host] #chan1,#chan2,#chan3... level reason - xecho -b valid shitlist levels are 1 - deop users at all time - xecho -b 2 - kick user when they join the channel - xecho -b 3 - Ban/Kick user when they join the channel + xecho $acban syntax: /addshit [nick!ident@host] #chan1,#chan2,#chan3... level reason + xecho $acban valid shitlist levels are 1 - deop users at all time + xecho $acban 2 - kick user when they join the channel + xecho $acban 3 - Ban/Kick user when they join the channel }{ @ :input1 = [$0] if (ismask($input1)) { @@ -95,7 +95,7 @@ if (numitems(shitlist)<=[$0]) { //echo $banner no such user! }{ - xecho -b deleted shitlist entry $getitem(shitlist $0) + xecho $acban deleted shitlist entry $getitem(shitlist $0) @ delitem(shitlist $0) @ delitem(shitreas $0) } diff amn.orig/modules/shitlist/shitlist.m.orig amn/modules/shitlist/shitlist.m.orig --- amn.orig/modules/shitlist/shitlist.m.orig Thu Jan 1 00:00:00 1970 +++ amn/modules/shitlist/shitlist.m.orig Mon Oct 10 21:36:34 2005 @@ -0,0 +1,233 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage shitlist + +alias listshit shitlist +alias listbk shitlist +alias addbk addshit $* +alias rembk shitdel $* +alias delshit shitdel $* + +alias fuck { + if (![$0]) { + xecho -b /fuck nick [kickbans person and adds them to your shitlist with level 3] + }{ + if (![$1]) { + ^bankick $0 shitted + ^addshit $0 $C 3 shitted + }{ + ^bankick $0 $1- + ^addshit $0 $C 3 $1- + } + } +} + +alias addshit { + if (![$3]) { + xecho -b syntax: /addshit [nick!ident@host] #chan1,#chan2,#chan3... level reason + xecho -b valid shitlist levels are 1 - deop users at all time + xecho -b 2 - kick user when they join the channel + xecho -b 3 - Ban/Kick user when they join the channel + }{ + @ :input1 = [$0] + if (ismask($input1)) { + @ shithost = input1 + }{ + if (!getuhost($input1)) { + //echo $banner $input1 is not on irc! + }{ + @ shithost1 = sar(g/~/\*/$getuhost($input1)) + @ shitnick = [$input1] + @ shithost = [$(shitnick)!$(shithost1)] + } + } + if (shithost) { + @ :schan = [$1] + @ :slevel = [$2] + @ :sreason = [$3-] + @ setitem(shitlist 0 !) + @ setitem(shitlist $numitems(shitlist) $shithost $schan $slevel) + @ setitem(shitreas $numitems(shitreas) $sreason) + //echo $banner added $shithost $schan $slevel $sreason + if (slevel == 3) { + fe ($chanusers($schan)) n1 { + if (rmatch($n1!$userhost($n1) $shithost) > 0) { + ^mode $schan -o+b $n1 $mask(3 $n1!$userhost($n1)) + ^kick $schan $n1 $sreason + } + } + } + } + } +} + +alias shitlist { + if (numitems(shitlist)<2) { + //echo $banner the shitlist is empty! + }{ + xecho [num] [shithost ] [shitchan [lev] [reason ] + for (@xx=1, xx +} + +alias shitload { + ^eval load $shitsavefile + @delarray(shitlist) + @delarray(shitreas) + @setitem(shitlist 0 !) + @setitem(shitreas 0 !) + @ii = 1 + while (shitlist[$ii]) { + @ setitem(shitlist $ii $shitlist[$ii]) + @ setitem(shitreas $ii $shitreas[$ii]) + @ ii++ + } +} + +^on #-join 53 * { + if (N != [$0]) { + ^local shittemp1 + ^local shittemp2 + ^local shittemp3 + ^local shittemp4 + ^local shittemp5 + @ shitchan = [$1] + @ shitblah = getmatches(shitlist *$shitchan*) + fe ($shitblah) ii { + @shithost[$ii] = getitem(shitlist $ii) + @shitreas[$ii] = getitem(shitreas $ii) + } + foreach shithost xx { + if (rmatch($0!$userhost($0) $word(0 $shithost[$xx])) > 0) { + @shittemp1 = [$shithost[$xx]] + @shittemp5 = [$shitreas[$xx]] + } + } + @shittemp2 = word(0 $shittemp1) + @shittemp3 = word(2 $shittemp1) + @shittemp4 = sar(g/,/ /$word(1 $shittemp1)) + if (rmatch($0!$userhost($0) $shittemp2) > 0 && shittemp3 == 2 && match($shitchan $shittemp4) && getmatches(shitlist *$shitchan*) !=[]) { + ^kick $shitchan $0 $shittemp5;clean shithost + } + if (rmatch($0!$userhost($0) $shittemp2) > 0 && shittemp3 == 3 && match($shitchan $shittemp4) && getmatches(shitlist *$shitchan*) !=[]) { + ^mode $shitchan -o+b $0 $mask(3 $shittemp2) + ^kick $shitchan $0 $shittemp5;clean shithost + } + + if (rmatch($0!$userhost($0) $shittemp2) > 0 && shittemp3 == 4 && match($shitchan $shittemp4) && getmatches(shitlist *$shitchan*) !=[]) { + ^mode $shitchan -o+b $0 $mask(3 $shittemp2) + ^kick $shitchan $0 $shittemp5;clean shithost + } + + } +} + +^on #-mode_stripped 53 "% % +o*" { + ^local shittemp2 + ^local shittemp3 + ^local shittemp4 + ^local shittemp5 + @shitchan = [$1] + @shitblah = getmatches(shitlist *$shitchan*) + fe ($shitblah) ii { + @shithost[$ii] = getitem(shitlist $ii) + @shitreas[$ii] - getitem(shitreas $ii) + } + foreach shithost xx { + if (rmatch($3!$userhost($3) $word(0 $shithost[$xx])) > 0) { + @shittemp1 = [$shithost[$xx]] + @shittemp5 = [$shitreas[$xx]] + } + } + @shittemp2 = word(0 $shittemp1) + @shittemp3 = word(2 $shittemp1) + @shittemp4 = sar(g/,/ /$word(1 $shittemp1)) + if (rmatch($3!$userhost($3) $shittemp2) > 0 && shittemp3 == 1 && match($shitchan $shittemp4) && getmatches(shitlist *$shitchan*) !=[]) { + ^mode $shitchan -o $3;clean shithost + } + +} + + + +^on #-mode_stripped 673 "% % -b*" { + ^local shittemp2 + ^local shittemp3 + ^local shittemp4 + ^local shittemp5 + @shitchan = [$1] + @shitblah = getmatches(shitlist *$shitchan*) + fe ($shitblah) ii { + @shithost[$ii] = getitem(shitlist $ii) + @shitreas[$ii] - getitem(shitreas $ii) + } + + foreach shithost xx { + if (rmatch($3 $word(0 $shithost[$xx])) > 0) { + @shittemp1 = [$shithost[$xx]] + @shittemp5 = [$shitreas[$xx]] + } + } + @shittemp2 = word(0 $shittemp1) + @shittemp3 = word(2 $shittemp1) + @shittemp4 = sar(g/,/ /$word(1 $shittemp1)) + if ([$3] == mask(3 $shittemp2) && shittemp3 == 4 && match($shitchan $shittemp4) && getmatches(shitlist *$shitchan*) !=[]) { + ^mode $shitchan +b $mask(3 $shittemp2);clean shithost + } + +} + +^shitload +alias shithelp shelp +alias shelp { + if (!$[0]) { + +//echo -----------------------= Shitlist Help =-------------------------- + +//echo addshit /addshit [nick|ident@host] #chan1,#chan2,#chan3... level reason +//echo shitlevels 1 - deop users at all time, 2 - kick user when they +//echo join the channel, 3 - Ban/Kick user when they join the channel +//echo fuck /fuck nick will kickban nick and add nick to your shitlist level 3 +//echo listshit /listshit view current users on the shitlist. +//echo delshit /delshit # removes user from the shitlist. +//echo -= Shitlist Quick Alias =- +//echo listbk/listshit +//echo addbk/addshit +//echo rembk/delshit + +//echo ------------------------------------------------------------------- + } +} diff amn.orig/modules/userlist/userlist.m amn/modules/userlist/userlist.m --- amn.orig/modules/userlist/userlist.m Tue Oct 11 00:52:09 2005 +++ amn/modules/userlist/userlist.m Tue Oct 11 00:51:38 2005 @@ -101,7 +101,7 @@ if (numitems(friends)<=[$0]) { //echo $banner no such user! }{ - xecho -b deleted userlist entry $getitem(friends $0) + xecho $acban deleted userlist entry $getitem(friends $0) @ delitem(friends $0) } }{ @@ -121,14 +121,14 @@ alias setsec { if (# == 0) { - xecho -b autop delay set to "$_ss" + xecho $acban autop delay set to "$_ss" return; } if ([$0] > 0 && [$0] <=40) { @_ss = [$0] - xecho -b autop delay set to "$_ss" + xecho $acban autop delay set to "$_ss" }{ - xecho -b time out of range. Valid numbers are 1 - 40 + xecho $acban time out of range. Valid numbers are 1 - 40 } } diff amn.orig/modules/userlist/userlist.m.orig amn/modules/userlist/userlist.m.orig --- amn.orig/modules/userlist/userlist.m.orig Thu Jan 1 00:00:00 1970 +++ amn/modules/userlist/userlist.m.orig Mon Oct 10 21:36:47 2005 @@ -0,0 +1,364 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +# based on void/codelogic's autobot 98 +# modded by crapple 05 +# taken from epic dist scripts dir +subpackage userlist + +^alias clean foreach $0 ii { ^assign -$0[$ii] } + +# /purge +# removes all assignments under that name recursively. +^alias purge { + foreach $0 ii + { + purge $0.$ii + } + ^assign -ii + ^assign -$0 +} +## end of ripped code +^eval load $frsavefile + +## misc various compat aliases. +alias listuser userlist +alias deluser userdel $* +alias addf adduser $* +alias listf userlist +alias delf userdel $* +alias remf userdel $* +alias unuser userdel $* +## end compat. + +alias adduser { + if (![$1]) { + //echo ------------------------------------------------------------------ + //echo syntax: /adduser [nick|ident@host] #channel userlevel1,userlevel2, + //echo userlevel3 ... password + //echo valid userlevels are ops iops invite voice deop + //echo ------------------------------------------------------------------ +}{ + @ :input1 = [$0] + if (ismask($input1)) { + @ friendhost = input1 + + } else { + if (!getuhost($input1)) { //echo $banner $input1 is not on irc! }{ + @ friendhost = sar(g/~/\*/$getuhost($input1)) + @ friendnick = [$input1] + }} + if (friendhost) { + @ :fchan = [$1] + @ :pass = [$encode($3)] + @ :flags = [$2] + @ setitem(friends 0 !) + @ setitem(friends $numitems(friends) $friendhost $fchan $flags $pass) + banner.lchead + banner.mid added $friendhost $fchan $flags $decode($pass) + banner.lcfoot + } + } +} +alias userlist { + + if (numitems(friends)<2) { + banner.lchead + banner.mid the userlist is empty! + banner.lcfoot + } { + banner.lchead + xecho [num] [$_pad(29 userhost)] [$_pad(2 channel)] [flags] + + for (@xx=1, xx +} + +alias userload { + ^eval load $frsavefile + @ delarray(friends) + @ setitem(friends 0 !) + @ ii = 1 + while (friends[$ii]) { + @ setitem(friends $ii $friends[$ii]) + @ ii++ + } +} + +alias setsec { + if (# == 0) { + xecho -b autop delay set to "$_ss" + return; + } + if ([$0] > 0 && [$0] <=40) { + @_ss = [$0] + xecho -b autop delay set to "$_ss" + }{ + xecho -b time out of range. Valid numbers are 1 - 40 + } +} + +on #-join 34 * { + if (N != [$0]) { + ^local ojchan $1 + ^local ojblah $getmatches(friends *$ojchan*) + fe ($ojblah) ii { + @ojhost[$ii] = getitem(friends $ii) + } + foreach ojhost xx { + if (rmatch($userhost($0) $word(0 $ojhost[$xx])) > 0) { + ^local ojtemp1 $ojhost[$xx] + ^clean ojhost + } + } + ^local ojtemp2 $word(0 $ojtemp1) + ^local ojtemp4 $sar(g/,/ /$word(2 $ojtemp1)) + if (match(iops $ojtemp4) > 0) { + @ojtemp3 = word(1 $ojtemp1) + if (ischanop($N $1) && [$1] == ojtemp3 && match(iops $ojtemp4) > 0 && match($ojtemp2 $userhost($0)) > 0) { + abecho Userlist matched hostmask: $sar(g/@/%K@%n/$ojtemp2) has joined $1 + abecho Auto-oping if not op'd in $_ss seconds. + ^timer $_ss { + if (!ischanop($0 $1)) { + ^mode $1 +o $0;^timer -delete 451;^timer -refnum 451 $_ss {^assign -ojtemp3} + } + } + } + + + } + } +} + +^on #-join 23 * { + if (N != [$0]) { + ^local avchan $1 + ^local avblah $getmatches(friends *$avchan*) + fe ($avblah) ii { + @avhost[$ii] = getitem(friends $ii) + } + foreach avhost xx { + if (rmatch($userhost($0) $word(0 $avhost[$xx])) > 0) { + ^local avtemp1 $avhost[$xx] + } + } + ^local avtemp2 $word(0 $avtemp1) + ^local avtemp3 $word(1 $avtemp1) + ^local avtemp4 $sar(g/,/ /$word(2 $avtemp1)) + if (ischanop($N $avchan) && [$1] == avtemp3 && match(voice $avtemp4) > 0 && match($avtemp2 $userhost($0)) > 0) { + abecho Userlist matched hostmask: $sar(g/@/%K@%n/$avtemp2) voicing user on $1 + ^mode $avtemp3 +v $0;clean avhost + } + } +} + + +^on #-ctcp 43 "% % INVITE*" { + ^local ichan $3 + ^local ipass $4 + ^userhost $0 -cmd { + if ([$3@$4] != [@]) { + ^local invhost $3@$4 + ^local iblah $getmatches(friends *$ichan*) + fe ($iblah) ii { + @ihost[$ii] = getitem(friends $ii) + } + foreach ihost xx { + if (rmatch($invhost $word(0 $ihost[$xx])) > 0) { + ^local itemp1 $ihost[$xx] + } + } + ^local itemp2 $word(0 $itemp1) + ^local itemp3 $word(1 $itemp1) + ^local itemp4 $sar(g/,/ /$word(2 $itemp1)) + ^local itemp5 $decode($word(3 $itemp1)) + if (ischanop($N $ichan) && ichan == itemp3 && match(invite $itemp4) > 0 && ipass == itemp5 && match($itemp2 $invhost) > 0) { + abecho $0!$invhost matches userlist, inviting him to $vchan + ^notice $0 inviting you to $ichan + ^invite $0 $itemp3;clean ihost + }{ + ^notice $0 [a+c] bad password or channel or you are not on my userlist + } + + } + } +} + +^on #-ctcp 43 "% % OP*" { + ^local ochan $3 + ^local opass $4 + ^userhost $0 -cmd { + if ([$3@$4] != [@]) { + ^local ophost $3@$4 + @ oblah = getmatches(friends *$ochan*) + fe ($oblah) ii { + @ohost[$ii] = getitem(friends $ii) + } + foreach ohost xx { + if (rmatch($ophost $word(0 $ohost[$xx])) > 0) { + ^local otemp1 $ohost[$xx] + } + } + ^local otemp2 $word(0 $otemp1) + ^local otemp3 $word(1 $otemp1) + ^local otemp4 $sar(g/,/ /$word(2 $otemp1)) + ^local otemp5 $decode($word(3 $otemp1)) + if (ischanop($N $ochan) && ochan == otemp3 && match(ops $otemp4) > 0 && opass == otemp5 && rmatch($ophost $otemp2) > 0) { + abecho $0!$ophost matches userlist, oping on $ochan + ^mode $otemp3 +o $0;clean ohost + }{ + ^notice $0 [a+c] bad password or channel or you are not on my userlist + } + } + } +} + +^on #-ctcp 43 "% % VOICE*" { + ^local vchan $3 + ^local vpass $4 + ^userhost $0 -cmd { + if ([$3@$4] != [@]) { + ^local vphost $3@$4 + ^local vblah $getmatches(friends *$vchan*) + fe ($vblah) ii { + @vhost[$ii] = getitem(friends $ii) + } + foreach vhost xx { + if (rmatch($vphost $word(0 $vhost[$xx])) > 0) { + ^local vtemp1 $vhost[$xx] + } + } + ^local vtemp2 $word(0 $vtemp1) + ^local vtemp3 $word(1 $vtemp1) + ^local vtemp4 $sar(g/,/ /$word(2 $vtemp1)) + ^local vtemp5 $decode($word(3 $vtemp1)) + if (ischanop($N $vchan) && vchan == vtemp3 && match(voice $vtemp4) > 0 && vpass == vtemp5 && rmatch($vphost $vtemp2) > 0) { + abecho $0%K!%n$vphost matches userlist, voicing on $vchan + ^mode $vtemp3 +v $0;clean vhost + }{ + ^notice $0 [a+c] bad password or channel or you are not on my userlist + } + } + } +} + + ^on #-mode_stripped 3 "% % -o %" { + if (N != [$0]) { + ^local odeopnick $0 + ^local deopchan $1 + ^local deopnick $3 + ^local deophost $userhost($3) + ^local deopmatch $getmatches(friends *$deopchan*) + fe ($deopmatch) ii { + @deopline[$ii] = [$getitem(friends $ii)] + + } + foreach deopline xx { + if (rmatch($deophost $word(0 $deopline[$xx])) > 0) { + ^local deoptemp1 $deopline[$xx] + } + } + ^local deoptemp2 $word(0 $deoptemp1) + ^local deoptemp3 $word(1 $deoptemp1) + ^local deoptemp4 $sar(g/,/ /$word(2 $deoptemp1)) + if (ischanop($N $deoptemp3) && deoptemp3 == deopchan && match(deop $deoptemp4) > 0 && rmatch($deophost $deoptemp2) > 0) { + abecho $deopnick%K!%n$deophost matches userlist, deoping $odeopnick on $deopchan + ^mode $deoptemp3 -o $odeopnick + ^mode $deoptemp3 +o $deopnick;clean deopline + ^notice $odeopnick deop'd protected user $deopnick on $deoptemp3 + + } + + + } +} + +^on #-mode_stripped 3 "% % +b %" { + if (N != [$0]) { + + ^local _obannick $0 + ^local _banchan $1 + ^local _banuhost $after(! $3) + ^local _banmatch $getmatches(friends *$_banchan*) + fe ($_banmatch) ii { + @_banline[$ii] = [$getitem(friends $ii)] + + } + foreach _banline xx { + if (comatch($_banuhost $word(0 $_banline[$xx])) > 0) { + ^local _bantemp1 $_banline[$xx] + } + } + ^local _bantemp2 $word(0 $_bantemp1) + ^local _bantemp3 $word(1 $_bantemp1) + ^local _bantemp4 $sar(g/,/ /$word(2 $_bantemp1)) + if (ischanop($N $_bantemp3) && _bantemp3 == _banchan && match(unban $_bantemp4) > 0 && comatch($_bantemp2 $_banuhost)) { + abecho %K[%na+c%K]%n $_banuhost%K!%n$_banhost matches userlist, unbanning $_banuhost on $_banchan + ^mode $_bantemp3 -b $3 + ^mode $_bantemp3 -o $_obannick;clean _banline + ^notice $_obannick banned protected usermask $3 on $_bantemp3 + + } + + + } +} + +^userload +alias userhelp uhelp +alias uhelp { + if (!$[0]) { + +//echo -----------------------= Userlist Help =-------------------------- + +//echo userlist /userlist will display users from the userlist. +//echo adduser /adduser [nick|ident@host] #channel userlevel1,userlevel2, +//echo userlevel3 .. password. +//echo userlevels ops - will op person requesting for ops ,iops - will +//echo instantly op someone when they enter the channel, invite - upon ctcp +//echo request, will invite user to channel, voice - will voice person when +//echo enters the channel +//echo listuser /listuser will display users from the userlist. +//echo deluser /deluser # will delete the user from the userlist. +//echo addf /addf same as /adduser +//echo listf /listf same as /userlist +//echo delf /delf same as /deluser +//echo remf /remf same as /deluser + +//echo ------------------------------------------------------------------- + } +} diff amn.orig/themes/active.th amn/themes/active.th --- amn.orig/themes/active.th Tue Oct 11 00:52:09 2005 +++ amn/themes/active.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2 = [ @sc3 = [ @sc4 = [ +@acban=[\[a+c\]] diff amn.orig/themes/active.th.orig amn/themes/active.th.orig --- amn.orig/themes/active.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/active.th.orig Sat Sep 3 11:08:08 2005 @@ -0,0 +1,44 @@ +:sergio +:active +:active +@auth = [sergio] +@desc = [active] +@name = [active] +@scdesc = [..active..] +@mform = [24] +@smform = [32] +@pubform = [8] +@spubform = [22] +@spuboform = [30] +@signform = [9] +@joinform = [2] +@leaveform = [2] +@modeform = [2] +@notform = [5] +@snotform = [20] +@sdcform = [18] +@dcform = [14] +@topform = [2] +@ctcpform = [10] +@sctcpform = [11] +@echostr = [14] +@ncomp = [15] +@svform = [16] +@snf = [2] +@wallform = [1] +@bwallform = [1] +@awayform = [5] +@actform = [1] +@actoform = [1] +@descform = [1] +@sdescform = [1] +@pubnotform = [1] +@statbar = [stat.9] +@c1 = [$(cyn) +@c2 = [$(hcyn) +@c3 = [$(cyn) +@c4 = [$(hcyn) +@sc1 = [ +@sc2 = [ +@sc3 = [ +@sc4 = [ diff amn.orig/themes/alchemist.th amn/themes/alchemist.th --- amn.orig/themes/alchemist.th Tue Oct 11 00:52:09 2005 +++ amn/themes/alchemist.th Tue Oct 11 00:51:38 2005 @@ -43,3 +43,4 @@ @sc2 = [ @sc3 = [ @sc4 = [ +@acban=[\[a+c\]] diff amn.orig/themes/alchemist.th.orig amn/themes/alchemist.th.orig --- amn.orig/themes/alchemist.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/alchemist.th.orig Wed Aug 31 12:25:32 2005 @@ -0,0 +1,45 @@ +:crapple +:alchemist +:alchemist +@auth=[crapple] +@desc=[alchemist] +@name=[alchemist] +@scdesc=[\(alchemist)] +@mform=3 +@smform=7 +@pubform=5 +@spubform=3 +@spuboform=5 +@signform=6 +@joinform=12 +@leaveform=[3] +@modeform=1 +@notform=15 +@snotform=28 +@sdcform=5 +@dcform=5 +@topform=4 +@ctcpform=3 +@sctcpform=8 +@echostr=1 +@ncomp=15 +@svform=10 +@snf=2 +@wallform=[6] +@bwallform=6 +@awayform=8 +@actform=3 +@actoform=3 +@descform=2 +@sdescform=2 +@pubnotform=1 +@statbar=[stat.5] +@c1 = [ +@c2 = [ +@c3 = [ +@c4 = [ +@c5 = [ +@sc1 = [ +@sc2 = [ +@sc3 = [ +@sc4 = [ diff amn.orig/themes/amnesiac.th amn/themes/amnesiac.th --- amn.orig/themes/amnesiac.th Tue Oct 11 00:52:09 2005 +++ amn/themes/amnesiac.th Tue Oct 11 00:51:38 2005 @@ -44,3 +44,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/amnesiac.th.orig amn/themes/amnesiac.th.orig --- amn.orig/themes/amnesiac.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/amnesiac.th.orig Wed Aug 31 12:26:07 2005 @@ -0,0 +1,46 @@ +:criminal +:amnesiac +:amnesiac +@auth=[criminal] +@desc=[amnesiac] +@name=[amnesiac] +@scdesc=[\(amnesiac\)] +@mform=26 +@smform=37 +@pubform=1 +@spubform=5 +@spuboform=1 +@signform=11 +@joinform=12 +@leaveform=[11] +@modeform=2 +@notform=21 +@snotform=20 +@sdcform=22 +@dcform=18 +@topform=4 +@ctcpform=8 +@sctcpform=11 +@echostr=15 +@ncomp=15 +@svform=7 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=7 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.5] +@_whois=[2] +@c1=[ +@c2=[ +@c3=[ +@c4=[ +@c5=[ +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/beyond.th amn/themes/beyond.th --- amn.orig/themes/beyond.th Tue Oct 11 00:52:09 2005 +++ amn/themes/beyond.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/beyond.th.orig amn/themes/beyond.th.orig --- amn.orig/themes/beyond.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/beyond.th.orig Tue May 3 05:50:00 2005 @@ -0,0 +1,44 @@ +:trey +:beyond +:beyond +@auth=[trey] +@desc=[beyond] +@name=[beyond] +@scdesc=[\(beyond\)] +@mform=2 +@smform=2 +@pubform=1 +@spubform=1 +@spuboform=1 +@signform=9 +@joinform=4 +@leaveform=[2] +@modeform=2 +@notform=1 +@snotform=2 +@sdcform=1 +@dcform=1 +@topform=1 +@ctcpform=1 +@sctcpform=1 +@echostr=43 +@ncomp=11 +@svform=12 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=4 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.1] +@c1=[$(blu) +@c2=[$(hblu) +@c3=[$(blu) +@c4=[$(hblu) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/bitchx.th amn/themes/bitchx.th --- amn.orig/themes/bitchx.th Tue Oct 11 00:52:09 2005 +++ amn/themes/bitchx.th Tue Oct 11 00:51:38 2005 @@ -44,3 +44,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/bitchx.th.orig amn/themes/bitchx.th.orig --- amn.orig/themes/bitchx.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/bitchx.th.orig Tue Aug 30 17:16:47 2005 @@ -0,0 +1,46 @@ +:crapple +:looks almost like bitchx +:bitchx +@auth=[crapple] +@desc=[looks almost like bitchx] +@name=[bitchx] +@scdesc=[\(bitchx\)] +@mform=3 +@smform=7 +@pubform=5 +@spubform=3 +@spuboform=6 +@signform=4 +@joinform=19 +@leaveform=[4] +@modeform=4 +@notform=4 +@snotform=5 +@sdcform=27 +@dcform=4 +@topform=1 +@ctcpform=3 +@sctcpform=3 +@echostr=10 +@ncomp=15 +@svform=10 +@snf=4 +@wallform = [4] +@bwallform=4 +@awayform=10 +@actform=2 +@actform=2 +@descform=2 +@sdescform=2 +@actform=2 +@statbar=[stat.3] +@_whois=[6] +@c1=[ +@c2=[ +@c3=[ +@c4=[ +@c5=[ +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/channel.th amn/themes/channel.th --- amn.orig/themes/channel.th Tue Oct 11 00:52:09 2005 +++ amn/themes/channel.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/channel.th.orig amn/themes/channel.th.orig --- amn.orig/themes/channel.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/channel.th.orig Wed Aug 31 12:27:00 2005 @@ -0,0 +1,44 @@ +:void_ +:channel +:channel +@auth=[void_] +@desc=[channel] +@name=[channel] +@scdesc=[\(channel\)] +@mform=26 +@smform=37 +@pubform=1 +@spubform=5 +@spuboform=1 +@signform=11 +@joinform=12 +@leaveform=[11] +@modeform=2 +@notform=21 +@snotform=20 +@sdcform=22 +@dcform=18 +@topform=4 +@ctcpform=8 +@sctcpform=11 +@echostr=15 +@ncomp=15 +@svform=7 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=7 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.5] +@c1=[$(cyn) +@c2=[$(hcyn) +@c3=[$(mag) +@c4=[$(hmag) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/chloro.th amn/themes/chloro.th --- amn.orig/themes/chloro.th Tue Oct 11 00:52:09 2005 +++ amn/themes/chloro.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/chloro.th.orig amn/themes/chloro.th.orig --- amn.orig/themes/chloro.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/chloro.th.orig Wed Aug 31 12:27:20 2005 @@ -0,0 +1,44 @@ +:trey +:chlorophyll +:chloro +@auth=[trey_] +@desc=[chlorophyll] +@name=[chlorophyll] +@scdesc=[\(chlorophyll\)] +@mform=1 +@smform=1 +@pubform=1 +@spubform=13 +@spuboform=1 +@signform=9 +@joinform=1 +@leaveform=[1] +@modeform=1 +@notform=1 +@snotform=1 +@sdcform=1 +@dcform=1 +@topform=1 +@ctcpform=1 +@sctcpform=1 +@echostr=13 +@ncomp=11 +@svform=7 +@snf=2 +@wallform = [1] +@bwallform=1 +@awayform=1 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.9] +@c1=[$(grn) +@c2=[$(hgrn) +@c3=[$(grn) +@c4=[$(hgrn) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/cl.th amn/themes/cl.th --- amn.orig/themes/cl.th Tue Oct 11 00:52:09 2005 +++ amn/themes/cl.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/cl.th.orig amn/themes/cl.th.orig --- amn.orig/themes/cl.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/cl.th.orig Wed Aug 31 12:27:34 2005 @@ -0,0 +1,44 @@ +:codelogic +:chlorine +:cl +@auth=[codelogic] +@desc=[chlorine] +@name=[cl] +@scdesc=[\(chlorine\)] +@mform=17 +@smform=21 +@pubform=1 +@spubform=13 +@spuboform=7 +@signform=7 +@joinform=9 +@leaveform=[10] +@modeform=1 +@notform=3 +@snotform=8 +@sdcform=1 +@dcform=8 +@topform=1 +@ctcpform=10 +@sctcpform=11 +@echostr=18 +@ncomp=6 +@svform=10 +@snf=2 +@wallform = [10] +@bwallform=10 +@awayform=2 +@actform=2 +@actform=2 +@descform=1 +@sdescform=1 +@actform=2 +@statbar=[stat.5] +@c1=[$(cyn) +@c2=[$(hcyn) +@c3=[$(cyn) +@c4=[$(hcyn) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/cyan.th amn/themes/cyan.th --- amn.orig/themes/cyan.th Tue Oct 11 00:52:09 2005 +++ amn/themes/cyan.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/cyan.th.orig amn/themes/cyan.th.orig --- amn.orig/themes/cyan.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/cyan.th.orig Wed Aug 31 12:27:50 2005 @@ -0,0 +1,44 @@ +:void +:cyan +:cyan +@auth=[void] +@desc=[cyan] +@name=[cyan] +@scdesc=[\(cyan\)] +@mform=5 +@smform=14 +@pubform=2 +@spubform=8 +@spuboform=1 +@signform=2 +@joinform=2 +@leaveform=[3] +@modeform=2 +@notform=8 +@snotform=9 +@sdcform=5 +@dcform=1 +@topform=2 +@ctcpform=6 +@sctcpform=3 +@echostr=22 +@ncomp=10 +@svform=7 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=4 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.1] +@c1=[$(cyn) +@c2=[$(hcyn) +@c3=[$(cyn) +@c4=[$(hcyn) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/dark.th amn/themes/dark.th --- amn.orig/themes/dark.th Tue Oct 11 00:52:09 2005 +++ amn/themes/dark.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/dark.th.orig amn/themes/dark.th.orig --- amn.orig/themes/dark.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/dark.th.orig Tue May 3 05:51:43 2005 @@ -0,0 +1,44 @@ +:void +:dark +:dark +@auth=[void] +@desc=[dark] +@name=[dark] +@scdesc=[\(dark\)] +@mform=2 +@smform=2 +@pubform=2 +@spubform=1 +@spuboform=2 +@signform=2 +@joinform=1 +@leaveform=[1] +@modeform=2 +@notform=1 +@snotform=1 +@sdcform=1 +@dcform=1 +@topform=1 +@ctcpform=8 +@sctcpform=3 +@echostr=15 +@ncomp=15 +@svform=2 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=4 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.1] +@c1=[$(blu) +@c2=[$(hblu) +@c3=[$(blu) +@c4=[$(hblu) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/darkgrey.th amn/themes/darkgrey.th --- amn.orig/themes/darkgrey.th Tue Oct 11 00:52:09 2005 +++ amn/themes/darkgrey.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/darkgrey.th.orig amn/themes/darkgrey.th.orig --- amn.orig/themes/darkgrey.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/darkgrey.th.orig Tue May 3 05:51:57 2005 @@ -0,0 +1,44 @@ +:void +:darkgrey +:darkgrey +@auth=[void] +@desc=[darkgrey] +@name=[darkgrey] +@scdesc=[\(darkgrey\)] +@mform=2 +@smform=2 +@pubform=2 +@spubform=1 +@spuboform=2 +@signform=2 +@joinform=1 +@leaveform=[1] +@modeform=2 +@notform=1 +@snotform=1 +@sdcform=1 +@dcform=1 +@topform=1 +@ctcpform=8 +@sctcpform=3 +@echostr=15 +@ncomp=11 +@svform=2 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=4 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.5] +@c1=[$(hwht) +@c2=[$(hblk) +@c3=[$(wht) +@c4=[$(hblk) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/dead.th amn/themes/dead.th --- amn.orig/themes/dead.th Tue Oct 11 00:52:09 2005 +++ amn/themes/dead.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/dead.th.orig amn/themes/dead.th.orig --- amn.orig/themes/dead.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/dead.th.orig Wed Aug 31 12:28:43 2005 @@ -0,0 +1,44 @@ +:trey +:dead +:dead +@auth=[trey] +@desc=[dead] +@name=[dead] +@scdesc=[\(dead)] +@mform=12 +@smform=12 +@pubform=1 +@spubform=1 +@spuboform=1 +@signform=2 +@joinform=8 +@leaveform=[9] +@modeform=1 +@notform=5 +@snotform=1 +@sdcform=6 +@dcform=6 +@topform=2 +@ctcpform=5 +@sctcpform=9 +@echostr=31 +@ncomp=11 +@svform=7 +@snf=1 +@wallform = [2] +@bwallform=2 +@awayform=1 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.4] +@c1=[$(hblk) +@c2=[$(hblk) +@c3=[$(hblk) +@c4=[$(hblk) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/delusion.th amn/themes/delusion.th --- amn.orig/themes/delusion.th Tue Oct 11 00:52:09 2005 +++ amn/themes/delusion.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/delusion.th.orig amn/themes/delusion.th.orig --- amn.orig/themes/delusion.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/delusion.th.orig Wed Aug 31 12:28:56 2005 @@ -0,0 +1,44 @@ +:void +:delusion +:delusion +@auth=[void] +@desc=[delusion] +@name=[delusion] +@scdesc=[\(delusion\)] +@mform=22 +@smform=14 +@pubform=2 +@spubform=8 +@spuboform=1 +@signform=2 +@joinform=2 +@leaveform=[3] +@modeform=2 +@notform=8 +@snotform=9 +@sdcform=5 +@dcform=1 +@topform=2 +@ctcpform=6 +@sctcpform=3 +@echostr=29 +@ncomp=10 +@svform=11 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=4 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.2] +@c1=[$(blu) +@c2=[$(hblu) +@c3=[$(cyn) +@c4=[$(hcyn) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/electrical.th amn/themes/electrical.th --- amn.orig/themes/electrical.th Tue Oct 11 00:52:09 2005 +++ amn/themes/electrical.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/electrical.th.orig amn/themes/electrical.th.orig --- amn.orig/themes/electrical.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/electrical.th.orig Wed Aug 31 12:29:20 2005 @@ -0,0 +1,44 @@ +:trey +:electrical +:electrical +@auth=[trey] +@desc=[electrical] +@name=[electrical] +@scdesc=[\(electrical\)] +@mform=2 +@smform=2 +@pubform=1 +@spubform=1 +@spuboform=1 +@signform=9 +@joinform=4 +@leaveform=[2] +@modeform=2 +@notform=3 +@snotform=2 +@sdcform=1 +@dcform=1 +@topform=1 +@ctcpform=1 +@sctcpform=1 +@echostr=19 +@ncomp=10 +@svform=2 +@snf=1 +@wallform = [9] +@bwallform=9 +@awayform=1 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.2] +@c1=[$(mag) +@c2=[$(hmag) +@c3=[$(mag) +@c4=[$(hmag) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/elektra.th amn/themes/elektra.th --- amn.orig/themes/elektra.th Tue Oct 11 00:52:09 2005 +++ amn/themes/elektra.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/elektra.th.orig amn/themes/elektra.th.orig --- amn.orig/themes/elektra.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/elektra.th.orig Wed Aug 31 12:29:33 2005 @@ -0,0 +1,44 @@ +:dialtone +:elektra +:elektra +@auth=[dialtone] +@desc=[elektra] +@name=[elektra] +@scdesc=[\(elektra\)] +@mform=11 +@smform=11 +@pubform=2 +@spubform=2 +@spuboform=2 +@signform=7 +@joinform=3 +@leaveform=[5] +@modeform=2 +@notform=5 +@snotform=9 +@sdcform=3 +@dcform=3 +@topform=1 +@ctcpform=1 +@sctcpform=1 +@echostr=14 +@ncomp=5 +@svform=2 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=4 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.2] +@c1=[$(cyn) +@c2=[$(hcyn) +@c3=[$(cyn) +@c4=[$(hcyn) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/epic.th amn/themes/epic.th --- amn.orig/themes/epic.th Tue Oct 11 00:52:09 2005 +++ amn/themes/epic.th Tue Oct 11 00:51:38 2005 @@ -43,3 +43,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[***] diff amn.orig/themes/epic.th.orig amn/themes/epic.th.orig --- amn.orig/themes/epic.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/epic.th.orig Sat Sep 3 11:13:02 2005 @@ -0,0 +1,45 @@ +:void +:epic theme, with timestamps +:epic +@auth=[void] +@desc=[epic theme, with timestamps] +@name=[epic] +@scdesc=[\(epic\)] +@mform=37 +@smform=48 +@pubform=23 +@spubform=25 +@spuboform=36 +@signform=16 +@joinform=20 +@leaveform=[12] +@modeform=5 +@notform=24 +@snotform=35 +@sdcform=25 +@dcform=25 +@topform=5 +@ctcpform=11 +@sctcpform=12 +@echostr=45 +@ncomp=15 +@svform=20 +@snf=3 +@wallform = [2] +@bwallform=2 +@awayform=9 +@actform=3 +@actform=3 +@descform=2 +@sdescform=2 +@actform=3 +@statbar=[stat.11] +@_whois=4 +@c1=[ +@c2=[ +@c3=[ +@c4=[ +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/faceted.th amn/themes/faceted.th --- amn.orig/themes/faceted.th Tue Oct 11 00:52:09 2005 +++ amn/themes/faceted.th Tue Oct 11 00:51:38 2005 @@ -43,3 +43,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/faceted.th.orig amn/themes/faceted.th.orig --- amn.orig/themes/faceted.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/faceted.th.orig Wed Aug 31 12:30:59 2005 @@ -0,0 +1,45 @@ +:void +:faceted +:faceted +@auth=[void] +@desc=[faceted] +@name=[faceted] +@scdesc=[..faceted] +@mform=21 +@smform=23 +@pubform=6 +@spubform=2 +@spuboform=2 +@signform=6 +@joinform=5 +@leaveform=[10] +@modeform=1 +@notform=1 +@snotform=8 +@sdcform=18 +@dcform=18 +@topform=1 +@ctcpform=10 +@sctcpform=8 +@echostr=19 +@ncomp=15 +@svform=4 +@snf=2 +@wallform = [9] +@bwallform=9 +@awayform=7 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.12] +@_whois=[1] +@c1=[ +@c2=[ +@c3=[ +@c4=[ +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/flying.th amn/themes/flying.th --- amn.orig/themes/flying.th Tue Oct 11 00:52:09 2005 +++ amn/themes/flying.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/flying.th.orig amn/themes/flying.th.orig --- amn.orig/themes/flying.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/flying.th.orig Wed Aug 31 12:31:08 2005 @@ -0,0 +1,44 @@ +:trey +:flying +:flying +@auth=[trey] +@desc=[flying] +@name=[flying] +@scdesc=[\(flying)] +@mform=9 +@smform=9 +@pubform=8 +@spubform=8 +@spuboform=8 +@signform=9 +@joinform=8 +@leaveform=[9] +@modeform=1 +@notform=1 +@snotform=2 +@sdcform=1 +@dcform=1 +@topform=1 +@ctcpform=6 +@sctcpform=7 +@echostr=24 +@ncomp=2 +@svform=4 +@snf=1 +@wallform = [9] +@bwallform=9 +@awayform=1 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.1] +@c1=[$(cyn) +@c2=[$(hcyn) +@c3=[$(cyn) +@c4=[$(hcyn) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/fresh.th amn/themes/fresh.th --- amn.orig/themes/fresh.th Tue Oct 11 00:52:09 2005 +++ amn/themes/fresh.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/fresh.th.orig amn/themes/fresh.th.orig --- amn.orig/themes/fresh.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/fresh.th.orig Wed Aug 31 12:31:22 2005 @@ -0,0 +1,44 @@ +:synex +:minty +:fresh +@auth=[synex] +@desc=[minty] +@name=[fresh] +@scdesc=[\(minty\)] +@mform=7 +@smform=8 +@pubform=4 +@spubform=1 +@spuboform=2 +@signform=6 +@joinform=6 +@leaveform=[6] +@modeform=4 +@notform=4 +@snotform=5 +@sdcform=3 +@dcform=3 +@topform=1 +@ctcpform=9 +@sctcpform=10 +@echostr=1 +@ncomp=7 +@svform=10 +@snf=2 +@wallform = [8] +@bwallform=8 +@awayform=4 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.4] +@c1=[$(hcyn) +@c2=[$(cyn) +@c3=[$(hblu) +@c4=[$(blu) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/girlies.th amn/themes/girlies.th --- amn.orig/themes/girlies.th Tue Oct 11 00:52:09 2005 +++ amn/themes/girlies.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/girlies.th.orig amn/themes/girlies.th.orig --- amn.orig/themes/girlies.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/girlies.th.orig Wed Aug 31 12:31:37 2005 @@ -0,0 +1,44 @@ +:albeniz +:girlies +:girlies +@auth=[albeniz] +@desc=[girlies] +@name=[girlies] +@scdesc=[\(girlies\)] +@mform=1 +@smform=2 +@pubform=1 +@spubform=13 +@spuboform=2 +@signform=2 +@joinform=1 +@leaveform=[1] +@modeform=2 +@notform=1 +@snotform=1 +@sdcform=1 +@dcform=1 +@topform=1 +@ctcpform=2 +@sctcpform=2 +@echostr=15 +@ncomp=8 +@svform=4 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=4 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.6] +@c1=[$(mag) +@c2=[$(hmag) +@c3=[$(mag) +@c4=[$(hmag) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/greenhouse.th amn/themes/greenhouse.th --- amn.orig/themes/greenhouse.th Tue Oct 11 00:52:09 2005 +++ amn/themes/greenhouse.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/greenhouse.th.orig amn/themes/greenhouse.th.orig --- amn.orig/themes/greenhouse.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/greenhouse.th.orig Wed Aug 31 12:31:48 2005 @@ -0,0 +1,44 @@ +:trey +:greenhouse +:greenhouse +@auth=[trey] +@desc=[greenhouse] +@name=[greenhouse] +@scdesc=[\(greenhouse)] +@mform=1 +@smform=1 +@pubform=1 +@spubform=1 +@spuboform=1 +@signform=2 +@joinform=1 +@leaveform=[2] +@modeform=2 +@notform=1 +@snotform=2 +@sdcform=1 +@dcform=1 +@topform=1 +@ctcpform=2 +@sctcpform=1 +@echostr=19 +@ncomp=11 +@svform=4 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=1 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.4] +@c1=[$(grn) +@c2=[$(hgrn) +@c3=[$(grn) +@c4=[$(hgrn) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/hellish.th amn/themes/hellish.th --- amn.orig/themes/hellish.th Tue Oct 11 00:52:09 2005 +++ amn/themes/hellish.th Tue Oct 11 00:51:38 2005 @@ -41,3 +41,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/hellish.th.orig amn/themes/hellish.th.orig --- amn.orig/themes/hellish.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/hellish.th.orig Wed Aug 31 12:31:57 2005 @@ -0,0 +1,43 @@ +:trey +:hellish +:hellish +@auth=[trey] +@desc=[hellish] +@name=[hellish] +@scdesc=[\(hellish)] +@mform=2 +@smform=2 +@pubform=1 +@spubform=1 +@spuboform=1 +@signform=9 +@joinform=4 +@leaveform=[2] +@modeform=2 +@notform=1 +@snotform=2 +@sdcform=1 +@dcform=1 +@topform=1 +@ctcpform=1 +@sctcpform=3 +@echostr=19 +@ncomp=11 +@svform=2 +@snf=2 +@wallform = [2] +@bwallform=2 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.1] +@c1=[$(red) +@c2=[$(hred) +@c3=[$(red) +@c4=[$(hred) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/humble.th amn/themes/humble.th --- amn.orig/themes/humble.th Tue Oct 11 00:52:09 2005 +++ amn/themes/humble.th Tue Oct 11 00:51:38 2005 @@ -40,3 +40,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/humble.th.orig amn/themes/humble.th.orig --- amn.orig/themes/humble.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/humble.th.orig Wed Aug 31 12:33:01 2005 @@ -0,0 +1,42 @@ +:albeniz +:humble +:humble +@auth=[albeniz] +@desc=[humble] +@name=[humble] +@scdesc=[\(humble\)] +@mform=12 +@smform=12 +@pubform=1 +@spubform=13 +@spuboform=12 +@signform=9 +@joinform=1 +@leaveform=[1] +@modeform=1 +@notform=9 +@snotform=9 +@sdcform=4 +@dcform=4 +@topform=1 +@ctcpform=1 +@sctcpform=1 +@echostr=34 +@ncomp=4 +@svform=12 +@snf=1 +@wallform = [2] +@bwallform=1 +@awayform=4 +@actform=1 +@descform=1 +@sdescform=1 +@statbar=[stat.10] +@c1=[$(hcyn) +@c2=[$(hblk) +@c3=[$(cyn) +@c4=[$(cyn) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/l33t.th amn/themes/l33t.th --- amn.orig/themes/l33t.th Tue Oct 11 00:52:09 2005 +++ amn/themes/l33t.th Tue Oct 11 00:51:38 2005 @@ -43,3 +43,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/l33t.th.orig amn/themes/l33t.th.orig --- amn.orig/themes/l33t.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/l33t.th.orig Wed Aug 31 12:33:12 2005 @@ -0,0 +1,45 @@ +:Tilt +:eliteness +:l33t +@auth=[Tilt] +@desc=[31337] +@name=[l33t] +@scdesc=[\(31337\)] +@mform=6 +@smform=19 +@pubform=16 +@spubform=16 +@spuboform=5 +@signform=9 +@joinform=4 +@leaveform=[2] +@modeform=2 +@notform=4 +@snotform=6 +@sdcform=1 +@dcform=1 +@topform=4 +@ctcpform=1 +@sctcpform=1 +@echostr=49 +@ncomp=8 +@svform=12 +@snf=2 +@wallform = [1] +@bwallform=1 +@awayform=8 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.6] +@_whois=[1] +@c1=[ +@c2=[ +@c3=[ +@c4=[ +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/nocturnal.th amn/themes/nocturnal.th --- amn.orig/themes/nocturnal.th Tue Oct 11 00:52:09 2005 +++ amn/themes/nocturnal.th Tue Oct 11 00:51:38 2005 @@ -46,3 +46,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/nocturnal.th.orig amn/themes/nocturnal.th.orig --- amn.orig/themes/nocturnal.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/nocturnal.th.orig Fri Sep 2 04:13:07 2005 @@ -0,0 +1,48 @@ +:crapple +:nocturnal +:nocturnal +@auth=[crapple] +@desc=[nocturnal] +@name=[nocturnal] +@scdesc=[\(nocturnal\)] +@mform=41 +@smform=54 +@pubform=5 +@spubform=15 +@spuboform=8 +@pubnotform=1 +@signform=4 +@joinform=17 +@leaveform=[15] +@modeform=1 +@notform=19 +@snotform=5 +@sdcform=20 +@dcform=5 +@topform=4 +@ctcpform=3 +@sctcpform=8 +@echostr=45 +@ncomp=15 +@svform=4 +@snf=3 +@wallform = [4] +@bwallform=4 +@awayform=9 +@actform=2 +@actform=2 +@descform=2 +@sdescform=2 +@actform=2 +@statbar=[stat.12] +@timeform=[12] +@_whois=[3] +@c1=[ +@c2=[ +@c3=[ +@c4=[ +@c5=[ +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/p1mpin.th amn/themes/p1mpin.th --- amn.orig/themes/p1mpin.th Tue Oct 11 00:52:09 2005 +++ amn/themes/p1mpin.th Tue Oct 11 00:51:38 2005 @@ -43,3 +43,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/p1mpin.th.orig amn/themes/p1mpin.th.orig --- amn.orig/themes/p1mpin.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/p1mpin.th.orig Wed Aug 31 12:33:26 2005 @@ -0,0 +1,45 @@ +:flewid +:p1mpin +:p1mpin +@auth=[flewid] +@desc=[p1mpin] +@name=[p1mpin] +@scdesc=[\(p1mpin\)] +@mform=22 +@smform=1 +@pubform=2 +@spubform=8 +@spuboform=8 +@signform=11 +@joinform=12 +@leaveform=[11] +@modeform=4 +@notform=9 +@snotform=19 +@sdcform=13 +@dcform=18 +@topform=4 +@ctcpform=9 +@sctcpform=10 +@echostr=39 +@ncomp=5 +@svform=7 +@snf=2 +@wallform = [9] +@bwallform=9 +@awayform=9 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.5] +@_whois=[1] +@c1=[ +@c2=[ +@c3=[ +@c4=[ +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/pheer.th amn/themes/pheer.th --- amn.orig/themes/pheer.th Tue Oct 11 00:52:09 2005 +++ amn/themes/pheer.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/pheer.th.orig amn/themes/pheer.th.orig --- amn.orig/themes/pheer.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/pheer.th.orig Wed Aug 31 12:33:36 2005 @@ -0,0 +1,44 @@ +:void +:pheer +:pheer +@auth=[void] +@desc=[pheer] +@name=[pheer] +@scdesc=[\(pheer)] +@mform=17 +@smform=14 +@pubform=12 +@spubform=8 +@spuboform=12 +@signform=3 +@joinform=10 +@leaveform=[11] +@modeform=2 +@notform=1 +@snotform=3 +@sdcform=8 +@dcform=8 +@topform=2 +@ctcpform=8 +@sctcpform=3 +@echostr=28 +@ncomp=5 +@svform=12 +@snf=2 +@wallform = [8] +@bwallform=8 +@awayform=1 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.2] +@c1=[$(cyn) +@c2=[$(hcyn) +@c3=[$(cyn) +@c4=[$(hcyn) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/reet.th amn/themes/reet.th --- amn.orig/themes/reet.th Tue Oct 11 00:52:09 2005 +++ amn/themes/reet.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/reet.th.orig amn/themes/reet.th.orig --- amn.orig/themes/reet.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/reet.th.orig Wed Aug 31 12:33:48 2005 @@ -0,0 +1,44 @@ +:phuzion +:(reet) +:reet +@auth=[phuzion] +@desc=[reet] +@name=[reet] +@scdesc=[(reet)] +@mform=5 +@smform=4 +@pubform=20 +@spubform=22 +@spuboform=19 +@signform=15 +@joinform=8 +@leaveform=[9] +@modeform=2 +@notform=5 +@snotform=9 +@sdcform=7 +@dcform=2 +@topform=4 +@ctcpform=6 +@sctcpform=6 +@echostr=47 +@ncomp=8 +@svform=12 +@snf=2 +@wallform = [8] +@bwallform=8 +@awayform=7 +@actform=2 +@actform=2 +@descform=1 +@sdescform=1 +@actform=2 +@statbar=[stat.2] +@c1=[$(cyn) +@c2=[$(hcyn) +@c3=[$(cyn) +@c4=[$(hcyn) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/sabbath.th amn/themes/sabbath.th --- amn.orig/themes/sabbath.th Tue Oct 11 00:52:09 2005 +++ amn/themes/sabbath.th Tue Oct 11 00:51:38 2005 @@ -43,3 +43,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/sabbath.th.orig amn/themes/sabbath.th.orig --- amn.orig/themes/sabbath.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/sabbath.th.orig Wed Aug 31 12:33:58 2005 @@ -0,0 +1,45 @@ +:void^_ +:sabbath +:sabbath +@auth=[void^_] +@desc=[sabbath] +@name=[sabbath] +@scdesc=[\(sabbath\)] +@mform=22 +@smform=22 +@pubform=2 +@spubform=5 +@spuboform=2 +@signform=11 +@joinform=12 +@leaveform=[3] +@modeform=2 +@notform=1 +@snotform=2 +@sdcform=1 +@dcform=1 +@topform=2 +@ctcpform=8 +@sctcpform=11 +@echostr=19 +@ncomp=15 +@svform=2 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=4 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.9] +@_whois=[1] +@c1=[ +@c2=[ +@c3=[ +@c4=[ +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/seize.th amn/themes/seize.th --- amn.orig/themes/seize.th Tue Oct 11 00:52:09 2005 +++ amn/themes/seize.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/seize.th.orig amn/themes/seize.th.orig --- amn.orig/themes/seize.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/seize.th.orig Wed Aug 31 12:34:22 2005 @@ -0,0 +1,44 @@ +:void +:seize +:seize +@auth=[void] +@desc=[seize] +@name=[seize] +@scdesc=[\(seize\)] +@mform=26 +@smform=37 +@pubform=1 +@spubform=5 +@spuboform=1 +@signform=11 +@joinform=12 +@leaveform=[11] +@modeform=2 +@notform=21 +@snotform=20 +@sdcform=22 +@dcform=18 +@topform=4 +@ctcpform=8 +@sctcpform=11 +@echostr=15 +@ncomp=15 +@svform=7 +@snf=2 +@wallform = [2] +@bwallform=2 +@awayform=7 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.5] +@c1=[$(blu) +@c2=[$(hblu) +@c3=[$(blu) +@c4=[$(hblu) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/vanilla.th amn/themes/vanilla.th --- amn.orig/themes/vanilla.th Tue Oct 11 00:52:09 2005 +++ amn/themes/vanilla.th Tue Oct 11 00:51:38 2005 @@ -46,3 +46,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[***] diff amn.orig/themes/vanilla.th.orig amn/themes/vanilla.th.orig --- amn.orig/themes/vanilla.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/vanilla.th.orig Mon Oct 10 18:53:43 2005 @@ -0,0 +1,48 @@ +:skullY +:Looks just like default epic +:vanilla +@auth=[skullY] +@desc=[Looks just like default epic] +@name=[vanilla] +@scdesc=[(vanilla)] +@mform=38 +@smform=49 +@pubform=23 +@spubform=25 +@spuboform=36 +@signform=17 +@joinform=20 +@leaveform=12 +@modeform=6 +@notform=25 +@snotform=36 +@sdcform=26 +@dcform=26 +@topform=5 +@ctcpform=11 +@sctcpform=12 +@echostr=54 +@ncomp=15 +@nickform=16 +@svform=19 +@snf=5 +@wallform=12 +@bwallform=12 +@awayform=9 +@actform=4 +@actform=4 +@descform=3 +@sdescform=3 +@actform=4 +@whoform=2 +@whofootform=2 +@statbar=[stat.13] +@_whois=5 +@c1=[ +@c2=[ +@c3=[ +@c4=[ +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ diff amn.orig/themes/wired.th amn/themes/wired.th --- amn.orig/themes/wired.th Tue Oct 11 00:52:09 2005 +++ amn/themes/wired.th Tue Oct 11 00:51:38 2005 @@ -42,3 +42,4 @@ @sc2=[ @sc3=[ @sc4=[ +@acban=[\[a+c\]] diff amn.orig/themes/wired.th.orig amn/themes/wired.th.orig --- amn.orig/themes/wired.th.orig Thu Jan 1 00:00:00 1970 +++ amn/themes/wired.th.orig Tue May 3 05:56:54 2005 @@ -0,0 +1,44 @@ +:codelogic +:wired +:wired +@auth=[codelogic] +@desc=[wired] +@name=[wired] +@scdesc=[\(wired\)] +@mform=21 +@smform=22 +@pubform=2 +@spubform=6 +@spuboform=11 +@signform=6 +@joinform=8 +@leaveform=[8] +@modeform=2 +@notform=8 +@snotform=9 +@sdcform=4 +@dcform=7 +@topform=2 +@ctcpform=6 +@sctcpform=6 +@echostr=2 +@ncomp=1 +@svform=7 +@snf=1 +@wallform = [4] +@bwallform=4 +@awayform=1 +@actform=1 +@actform=1 +@descform=1 +@sdescform=1 +@actform=1 +@statbar=[stat.1] +@c1=[$(mag) +@c2=[$(cl) +@c3=[$(mag) +@c4=[$(cl) +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ Date: Tue, 11 Oct 2005 02:00:11 +0000 From: Zach White Add acban to /asave Fix dict.m to use raw sockets instead of execing telnet. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Oct 11 00:58:12 2005 +++ amn/CHANGES Tue Oct 11 01:58:35 2005 @@ -223,3 +223,6 @@ -Replace a bunch of xecho -b's with xecho $acban. Should make it easier to change the banner for script related stuff and still let you see when a message is from a script or a client, if you want that. //skullY +-Add acban to the asave alias, so it's saved. //skullY +-dict.m: Redo using dcc ram instead of telnet. It's portable and more + reliable. //skullY diff amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Tue Oct 11 00:58:12 2005 +++ amn/core/fsets.m Tue Oct 11 01:55:05 2005 @@ -93,7 +93,11 @@ ## dcc fsets. ^on ^send_dcc_chat * //echo $fparse(format_send_dcc_chat $0 $1-) ^on ^dcc_chat * //echo $fparse(format_dcc_chat $0 $1-) -^on ^dcc_connect * //echo $fparse(format_dcc_connect $0 $1 $2 $3 $4 $5) +^on ^dcc_connect * { + if ([$1]!=[RAW]) { + //echo $fparse(format_dcc_connect $0 $1 $2 $3 $4 $5) + } +} ^on ^dcc_request * //echo $fparse(format_dcc_request $0 $1 $2 $3 $4 $5 $6) ## nutbars dcc lost hooks diff amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Tue Oct 11 00:58:12 2005 +++ amn/core/save.m Tue Oct 11 01:26:36 2005 @@ -53,6 +53,7 @@ @write($savemt @_r2 = [$_r2]) @write($savemt @_r3 = [$_r3]) @write($savemt @_r4 = [$_r4]) + @write($savemt @acban = [$acban]) @close($savemt) xecho $acban (core).. settings saved to $savefile } diff amn.orig/modules/dict/dict.m amn/modules/dict/dict.m --- amn.orig/modules/dict/dict.m Tue Oct 11 00:58:12 2005 +++ amn/modules/dict/dict.m Tue Oct 11 01:55:09 2005 @@ -6,61 +6,44 @@ @ dict.serv = [dict.org] @ dict.port = 2628 -alias processdict { - switch ( $* ) - { - (Trying *) - (*Trying *) - (Connected to *) - (*Connected to *) - (220*) - (150*) - (151*) - (151*) - (*connection closed by foreign host*) - { - return; - } - (.) - { -xecho -c -- ------------------------------------------------------------------ - } -/*(.) to only show the first word. the dot separates them*/ - (?DEFINITION 0) - (250*) - { - ^exec -close %dict - } - (SPELLING 0) - { - xecho -c $acban $cparse($(hwht)$dword$(hblk):$(cl) No suggestions given.) - ^exec -close %dict - } - (552* no match*) - { - xecho -c $acban no match for $dword; - ^exec -close %dict - } - (Escape character is '^]'.) - { -xecho -c -- ------------------------------------------------------------------ - ^exec -in %dict DEFINE * $dword - } - (*) - { - if ( strlen($*) > 0) - { - xecho -c $* - } - } - } -} alias dict { - if (![$0]) {/ahelp dict}{ + if (![$0]) {/ahelp dict} { @dword=[$*] - ^exec -name dict telnet $dict.serv $dict.port - ^exec -line {/processdict $*} %dict + @dictcon=[$connect($dict.serv $dict.port)] + wait =$dictcon + ^on ^DCC_RAW "$dictcon % D *" { + @rawdata=[$chop(1 $3-)] + switch ( $rawdata ) { + (220*) + (150*) + (151*) + (151*) { + return; + } + (.) { + xecho -c -- ------------------------------------------------------------------ + } + (?DEFINITION 0) + (250*) { + ^dcc close raw $dictcon + } + (SPELLING 0) { + xecho -c $acban $cparse($(hwht)$dword$(hblk):$(cl) No suggestions given.) + ^dcc close raw $dictcon + } + (552* no match*) { + xecho -c $acban no match for $dword; + ^dcc close raw $dictcon + } + (*) { + if ( strlen($rawdata) > 0) { + xecho -c $rawdata + } + } + } + } + msg =$dictcon DEFINE * $dword + msg =$dictcon QUIT } -^assign -dict } Date: Mon, 10 Oct 2005 22:29:10 -0400 (EDT) From: zak@ircii.org (Zak) -remove a couple of silly aliases. -some documentation updates. -some other things i forgot in a span of 5 mins. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Oct 10 21:58:35 2005 +++ amn/CHANGES Mon Oct 10 22:24:11 2005 @@ -226,3 +226,7 @@ -Add acban to the asave alias, so it's saved. //skullY -dict.m: Redo using dcc ram instead of telnet. It's portable and more reliable. //skullY +-sync TODO-BUGS to reality. //zak +-minor -on to name change request in README //zak +-remove the old /orw /orww sillyness. just use /set indent on + if you really really really want to //zak diff -aruN amn.orig/README amn/README --- amn.orig/README Mon Oct 3 00:06:26 2005 +++ amn/README Mon Oct 10 22:21:33 2005 @@ -49,7 +49,7 @@ azel Mike Garrison David B. Kratter - Trenton Petrasek + Trent Petrasek Whitney Green Kristian Paulsen diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Mon Oct 10 20:28:50 2005 +++ amn/TODO-BUGS Mon Oct 10 22:20:43 2005 @@ -12,8 +12,6 @@ up right, but if modeshow/extpub is enabled (@crapple) won't have inline colors. it'll show up as probably colorized brackets and modeshow format colors. but not inline nick colors. found by adam. thanks!. -$ /dict word, doesn't explictly close telnet in the background on some OS's. - resulting in a nice spiked race condition. mebe need to add a kill -9? ## highest priority TODO. -adjust our 'poor mans' thuttup to be more reasonable. @@ -49,6 +47,10 @@ NONE for 'some bugs' ## bugs fixed. / projects done. +10.10.05 - fixed thanks to skully to use the more portable DCC_RAW! //skullY +! /dict word, doesn't explictly close telnet in the background on some + OS's. resulting in a nice spiked race condition. mebe need to add a kill -9? + 10.1.05 - finished thanks to kreca getting off his slackass //zak/kreca. ! make a toggle for whether we want window double on/off so we don't hardcode /wc /wj etc.. to window double per default. diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Mon Oct 10 20:51:38 2005 +++ amn/core/alias.m Mon Oct 10 22:23:12 2005 @@ -131,23 +131,6 @@ ## dumps and reload script, for scripters and advanced users in general. alias adump dump all;fe ($getarrays()) n1 {@delarray($n1)};unload * fe;load ~/.epicrc -## so ppl can choose their poison on output_rewrite now that we don't have -## static timestamping format. -alias indent orw -alias orw { - ^set -output_rewrite - ^set output_rewrite $_paste($1-) $1- - xecho $acban output indent set to "on" -} - -alias wrap orww -alias orww { - ^set -output_rewrite - ^set output_rewrite $_paste($1-)$1- - xecho $acban output linewrap set to "on" -} -## end output_rewrite sillyness. - ## CrazyEddie's alias alias comatch return ${match($*)||rmatch($*)} ## end Date: Tue, 11 Oct 2005 03:03:35 +0000 From: Zach White Add the tc module so that my tab isn't broken. amn diff diff amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Tue Oct 11 02:56:37 2005 +++ amn/amn.epic Tue Oct 11 03:00:52 2005 @@ -61,7 +61,7 @@ } #supported modules -@_modules=[ncomp flood abot sprot aol query away dict mjoin netsplit adcc oper orignick relay shitlist tab userlist bwk clones vanilla xy nlog services] +@_modules=[ncomp flood abot sprot aol query away dict mjoin netsplit adcc oper orignick relay shitlist tab tc userlist bwk clones vanilla xy nlog services] ## poor mans THUTTUP on file not found loader. ^on ^yell * # diff amn.orig/ans/modlist.ans amn/ans/modlist.ans --- amn.orig/ans/modlist.ans Tue Oct 11 02:56:37 2005 +++ amn/ans/modlist.ans Tue Oct 11 03:01:06 2005 @@ -6,7 +6,7 @@ eval //echo [flood] [M] [nlog] [M] [query] [M] eval //echo [sprot] [M] [aol] [M] [bwk] [M] eval //echo [xy] [M] [shitlist] [M] [userlist] [M] -eval //echo [services] [M] +eval //echo [services] [M] [tc] eval //echo eval //echo [*] Default [M] Non-default /mhelp for more info. eval //echo ------------------------------------------------------------------- diff amn.orig/ans/modules.ans amn/ans/modules.ans --- amn.orig/ans/modules.ans Tue Oct 11 02:56:37 2005 +++ amn/ans/modules.ans Tue Oct 11 03:02:01 2005 @@ -24,4 +24,5 @@ eval //echo [shitlist] - shitlist user [M] eval //echo [userlist] - friends/userlist protection [M] eval //echo [services] - nickserv/memoserv/chanserv helper [M] +eval //echo [tc] - tc module for /msg tabkey cycle [M] eval //echo ------------------------------------------------------------- diff amn.orig/modules/tc/tc.m amn/modules/tc/tc.m --- amn.orig/modules/tc/tc.m Thu Jan 1 00:00:00 1970 +++ amn/modules/tc/tc.m Tue Oct 11 02:59:51 2005 @@ -0,0 +1,80 @@ +/* + * ``TC'' - Tabscript Clone For EPIC + * Copyright 1995 Jeremy Nelson + * Copyright 1998 The EPIC Project + * Originally written for Daveman's Toolbox + * Please use and distribute this script like crazy! + */ + +# +# (note from jfn) The original allowed you to save up to 10 nicks to +# by cycled through by pressing or . I totaly rewrote the file +# and added the ability to set the number of nicks to save, and also made +# it a full tabkey clone. This file is a lot easier to figure out, too. +# +# What it does: +# save an arbitrary number of nicks in a list (settable by you) +# cycle through the list by pressing +# cycle backwards through the list by pressing <^R> +# remove last bed nick from the list (^X^X) +# +# Because this script uses a queue instead of a list and index counter, +# you may find this script has a different set of idiosyncrasies then +# the original tabscript. +# +subpackage tc +bind ^I parse_command ^tc.get_nick +bind ^R parse_command ^tc.get_nick_backward +/* FIXME: Find a good bind for this. +bind ^X^X parse_command { + xecho -b Nickname $word($tc.position $tc.msglist) removed + @ tc.msglist = notw($tc.position $tc.msglist) + @ tc.num_nicks = #tc.msglist + @ tc.position-- + tc.get_nick +} +*/ + +# maximum number of nicks you want to keep track of... +@ tc.max_nicks = 10 + +# +# add a word to a list -- makes sure the list doesnt get longer then +# the number allowed in max_nicks. +# +alias tc.add_to_list { + # This was suggested by David Luyer (david_luyver@pacfici.net.au) + (tc.msglist = [$0 $leftw(${tc.max_nicks-1} $remw($0 $tc.msglist))]) + (tc.num_nicks = #tc.msglist) + (tc.position = 0) +} +alias tc.get_nick { + parsekey erase_line + xtype -l /msg $word($tc.position $tc.msglist) + ((++tc.position >= tc.num_nicks) && (tc.position -= tc.num_nicks)) +} +alias tc.get_nick_backward { + parsekey erase_line + xtype -l /msg $word($tc.position $tc.msglist) + ((--tc.position < 0) && (tc.position += tc.num_nicks)) +} + +alias addnick for x in ($*) {tc.add_to_list $x} +alias nicklist xecho -b Nickname list: $tc.msglist + +on #-msg -12782 * tc.add_to_list $0 +on #-send_msg -12782 * tc.add_to_list $0 + +on #-dcc_chat -12782 * tc.add_to_list =$0 +on #-send_dcc_chat -12782 * tc.add_to_list =$0 + +/* + * This alias doesnt work if you try to do something like: + * /m x .... + * because $x expands to your userhost, and that gets confusing. + * + * No, the lack of brackets around $0 is not a bug, thats how it works. + * Try it. If $0 is 'bc' and $bc is "bigcheese" then + * if ($0) -> if (bc) -> if ([bigcheese]) + */ +alias msg if \($0\) {//msg $($0) $1-} {//msg $0 $1-} Date: Tue, 11 Oct 2005 03:06:31 +0000 From: Zach White Hey, we don't need no changelog. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Oct 11 03:03:40 2005 +++ amn/CHANGES Tue Oct 11 03:06:12 2005 @@ -230,3 +230,4 @@ -minor -on to name change request in README //zak -remove the old /orw /orww sillyness. just use /set indent on if you really really really want to //zak +-Add a new module, tc. Tabkey /msg handler from epic. //skullY From: Kreca Date: Tue, 11 Oct 2005 13:36:18 +0200 (CEST) Make a few cleanups to dict.m diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Oct 11 05:06:12 2005 +++ amn/CHANGES Tue Oct 11 13:33:35 2005 @@ -231,3 +231,6 @@ -remove the old /orw /orww sillyness. just use /set indent on if you really really really want to //zak -Add a new module, tc. Tabkey /msg handler from epic. //skullY + +10.11.05 +-make a few changes to dict.m. Dont use wait instead do everything in on handlers + use serials. //kreca diff -aruN amn.orig/modules/dict/dict.m amn/modules/dict/dict.m --- amn.orig/modules/dict/dict.m Tue Oct 11 03:55:09 2005 +++ amn/modules/dict/dict.m Tue Oct 11 13:31:15 2005 @@ -10,10 +10,11 @@ alias dict { if (![$0]) {/ahelp dict} { @dword=[$*] - @dictcon=[$connect($dict.serv $dict.port)] - wait =$dictcon - ^on ^DCC_RAW "$dictcon % D *" { - @rawdata=[$chop(1 $3-)] + @ :fd = connect($dict.serv $dict.port) + ^on ^DCC_RAW "*" {} + ^on #^DCC_RAW 10 "% $dict.serv D *" { + /* remove the last ^M (dos style line ending)*/ + @:rawdata=sar(g/$chr(13)//$3-) switch ( $rawdata ) { (220*) (150*) @@ -26,15 +27,15 @@ } (?DEFINITION 0) (250*) { - ^dcc close raw $dictcon + ^dcc close raw $0 } (SPELLING 0) { xecho -c $acban $cparse($(hwht)$dword$(hblk):$(cl) No suggestions given.) - ^dcc close raw $dictcon + ^dcc close raw $0 } (552* no match*) { xecho -c $acban no match for $dword; - ^dcc close raw $dictcon + ^dcc close raw $0 } (*) { if ( strlen($rawdata) > 0) { @@ -43,7 +44,11 @@ } } } - msg =$dictcon DEFINE * $dword - msg =$dictcon QUIT + ^on #^dcc_raw 11 "% $dict.serv e %" { + xecho -c -- ------------------------------------------------------------------ + + msg =$0 DEFINE * $dword + msg =$0 QUIT + } } -} +} Date: Tue, 11 Oct 2005 19:42:23 +0000 From: Zach White Add new formats for viewing what the topic is and when no topic is set. These new formats are all set by /format n. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Oct 11 19:29:44 2005 +++ amn/CHANGES Tue Oct 11 19:35:59 2005 @@ -234,3 +234,5 @@ 10.11.05 -make a few changes to dict.m. Dont use wait instead do everything in on handlers + use serials. //kreca +-Add formats for all aspects of topics. No new set for it, but /format n will + set them. //skullY diff amn.orig/core/arrays.m amn/core/arrays.m --- amn.orig/core/arrays.m Tue Oct 11 19:29:44 2005 +++ amn/core/arrays.m Tue Oct 11 19:39:13 2005 @@ -440,9 +440,36 @@ @ setitem(topform 2 %K\\\(%ntopic%K/$$(c3)$$2%K:%K[$$(c3)$$1%K]\\\):%n $$3-) @ setitem(topform 3 %K[%ntopic%K/$$(c1)$$2%K:%K[$$(c1)$$1%K]]:%n $$3-) @ setitem(topform 4 %K\\\(%ntopic%K/$$(c1)$$2%K:%K[$$(c1)$$1%K]\\\):%n $$3-) -@ setitem(topform 5 *** $$1 has changed the topic on channel $$2 to $$3-) +@ setitem(topform 5 $$1 has changed the topic on channel $$2 to $$3-) @ setitem(topform 6 $$fparse(format_timestamp_some $($_timess))$$1 has changed the topic on channel $$2 to $$3-) @ setitem(topform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$2%K] %W$$1 %K[%n$$3-%K]%n) +@ delarray(notopform) +@ setitem(notopform 0 !) +@ setitem(notopform 1 %K[%ntopic%K/$$(c3)$$1%K]:%n %Rtopic not set%n) +@ setitem(notopform 2 %K\\\(%ntopic%K/$$(c3)$$1%K]\\\):%n %Rtopic not set%n) +@ setitem(notopform 3 %K[%ntopic%K/$$(c1)$$1%K]:%n %Rtopic not set%n) +@ setitem(notopform 4 %K\\\(%ntopic%K/$$(c1)$$1%K\\\):%n %Rtopic not set%n) +@ setitem(notopform 5 $$1 : $$2-) +@ setitem(notopform 6 $$fparse(format_timestamp_some $($_timess))$$1 : $$2-) +@ setitem(notopform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] %Rtopic not set%n) +@ delarray(settopform) +@ setitem(settopform 0 !) +@ setitem(settopform 1 %K[%ntopic%K/$$(c3)$$1%K]:%n $$2-) +@ setitem(settopform 2 %K\\\(%ntopic%K/$$(c3)$$1%K]\\\):%n $$2-) +@ setitem(settopform 3 %K[%ntopic%K/$$(c1)$$1%K]:%n $$2-) +@ setitem(settopform 4 %K\\\(%ntopic%K/$$(c1)$$1%K\\\):%n $$2-) +@ setitem(settopform 5 Topic for $$1: $$2-) +@ setitem(settopform 6 $$fparse(format_timestamp_some $($_timess))Topic for $$1: $$2-) +@ setitem(settopform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] $$2-) +@ delarray(topbyform) +@ setitem(topbyform 0 !) +@ setitem(topbyform 1 %K[%ntopic%K/$$(c3)$$1%K:%K[$$(c3)$$2%K]]:%n $$3-) +@ setitem(topbyform 2 %K\\\(%ntopic%K/$$(c3)$$1%K:%K[$$(c3)$$2%K]\\\):%n $$3-) +@ setitem(topbyform 3 %K[%ntopic%K/$$(c1)$$1%K:%K[$$(c1)$$2%K]]:%n $$3-) +@ setitem(topbyform 4 %K\\\(%ntopic%K/$$(c1)$$1%K:%K[$$(c1)$$2%K]\\\):%n $$3-) +@ setitem(topbyform 5 Topic for $$1 was set by $$2 on $$3-) +@ setitem(topbyform 6 $$fparse(format_timestamp_some $($_timess))Topic for $$1 was set by $$2 on $$3-) +@ setitem(topbyform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] %W$$2 %K[%n$$3-%K]%n) ## ctcp formats @ delarray(ctcpform) diff amn.orig/core/format.m amn/core/format.m --- amn.orig/core/format.m Tue Oct 11 19:29:44 2005 +++ amn/core/format.m Tue Oct 11 19:34:21 2005 @@ -458,7 +458,11 @@ alias topform if ([$0]) { if (isnumber($0)&&[$0] to set topic format xecho $acban current format set to $topform @format_topic=getitem(topform $topform) + @format_notopic=getitem(notopform $topform) + @format_settopic=getitem(settopform $topform) + @format_topicby=getitem(topbyform $topform) } alias ctcpform if ([$0]) { diff amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Tue Oct 11 19:29:44 2005 +++ amn/core/fsets.m Tue Oct 11 19:22:37 2005 @@ -2,7 +2,7 @@ # See the 'COPYRIGHT' file for more information. subpackage fsets -@fwords=[format_scan_onjoin_nicks_border format_scan_nicks_border format_scan_onjoin_nicks format_scan_users_op format_scan_users_non format_scan_users_voc format_scan_users format_scan_header format_scan_nicks format_scan_footer format_timestamp_some format_who format_who_footer format_whois_signon format_whois_actual format_who format_whois_header format_whois_admin format_whois_nick format_whois_name format_whois_channels format_whois_server format_whois_away format_whois_operator format_whois_idle format_whois_unknown format_whois_footer format_whowas_header format_whowas_nick format_whowas_name format_whowas_unknown format_whowas_footer format_sort format_user_non format_chops format_bwall format_msg format_send_msg format_public format_send_public format_public_other format_signoff format_join format_leave format_mode format_notice format_public_notice format_send_notice format_send_dcc_chat format_dcc_chat format_topic format_ctcp format_send_ctcp format_nick_comp format_sv format_wall format_away format_back format_action format_action_other format_desc format_send_desc format_wallop format_nickname format_invite format_dcc_connect format_dcc_request format_kick format_ctcp_reply format_server_notice format_dcc_lost_chat format_dcc_lost_file format_dcc_done_file] +@fwords=[format_scan_onjoin_nicks_border format_scan_nicks_border format_scan_onjoin_nicks format_scan_users_op format_scan_users_non format_scan_users_voc format_scan_users format_scan_header format_scan_nicks format_scan_footer format_timestamp_some format_who format_who_footer format_whois_signon format_whois_actual format_who format_whois_header format_whois_admin format_whois_nick format_whois_name format_whois_channels format_whois_server format_whois_away format_whois_operator format_whois_idle format_whois_unknown format_whois_footer format_whowas_header format_whowas_nick format_whowas_name format_whowas_unknown format_whowas_footer format_sort format_user_non format_chops format_bwall format_msg format_send_msg format_public format_send_public format_public_other format_signoff format_join format_leave format_mode format_notice format_public_notice format_send_notice format_send_dcc_chat format_dcc_chat format_topic format_topicunset format_notopic format_settopic format_topicby format_ctcp format_send_ctcp format_nick_comp format_sv format_wall format_away format_back format_action format_action_other format_desc format_send_desc format_wallop format_nickname format_invite format_dcc_connect format_dcc_request format_kick format_ctcp_reply format_server_notice format_dcc_lost_chat format_dcc_lost_file format_dcc_done_file] ^on ^set "format_*" { if ([$0]) { if (!pattern(*$0* $fwords)) { @@ -139,7 +139,6 @@ ^on ^349 * //echo $G $1 e-exempt(s) on $2 ^on ^221 * //echo $G current user mode is "$1" ^on ^341 * //echo $G coercing $1 to $2 -^on ^331 * abecho %R\(%n$1%R\)%n topic not set ## knocks. ^on ^710 * { @@ -149,15 +148,16 @@ } ## topic stuff -^on ^332 * abecho $(grn)\($(cl)$(wht)t$(cl)opic/$1$(grn)\)$(cl) $2- -^on ^333 * abecho $(grn)\($(cl)$(wht)s$(cl)et$(grn)\)$(cl) by $2 at $strftime($3 %a %b %d %T %Z) +^on ^331 * xecho -b $fparse(format_notopic $1-) +^on ^332 * xecho -b $fparse(format_settopic $1-) +^on ^333 * xecho -b $fparse(format_topicby $1 $2 $stime($3)) ^on ^315 * # ^on ^305 * # ^on ^topic * { if ([$2]==[]) { - //echo $G topic unset by $0 on $1 at $strftime(%a %b %d %T %Z) + xecho -b topic unset by $0 on $1 at $strftime(%a %b %d %T %Z) }{ - //echo $G $fparse(format_topic $0 $1 $2-) + xecho -b $fparse(format_topic $0 $1 $2-) } } diff amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Tue Oct 11 19:29:44 2005 +++ amn/core/save.m Tue Oct 11 18:55:15 2005 @@ -88,6 +88,7 @@ @write($fsetsavemt ^sfset format_send_dcc_chat $format_send_dcc_chat) @write($fsetsavemt ^sfset format_dcc_chat $format_dcc_chat) @write($fsetsavemt ^sfset format_topic $format_topic) + @write($fsetsavemt ^sfset format_notopic $format_notopic) @write($fsetsavemt ^sfset format_ctcp $format_ctcp) @write($fsetsavemt ^sfset format_send_ctcp $format_send_ctcp) @write($fsetsavemt ^sfset format_nick_comp $format_nick_comp) @@ -134,6 +135,9 @@ @write($savemt @sdcform = [$sdcform]) @write($savemt @dcform = [$dcform]) @write($savemt @topform = [$topform]) + @write($savemt @notopform = [$notopform]) + @write($savemt @settopform = [$settopform]) + @write($savemt @topbyform = [$topbyform]) @write($savemt @ctcpform = [$ctcpform]) @write($savemt @sctcpform = [$sctcpform]) @write($savemt @echostr = [$echostr]) diff amn.orig/core/theme.m amn/core/theme.m --- amn.orig/core/theme.m Tue Oct 11 19:29:44 2005 +++ amn/core/theme.m Tue Oct 11 18:55:44 2005 @@ -37,6 +37,9 @@ @ write($saveth @sdcform=$sdcform) @ write($saveth @dcform=$dcform) @ write($saveth @topform=$topform) + @ write($saveth @notopform=$notopform) + @ write($saveth @settopform=$settopform) + @ write($saveth @topbyform=$topbyform) @ write($saveth @ctcpform=$ctcpform) @ write($saveth @sctcpform=$sctcpform) @ write($saveth @echostr=$echostr) diff amn.orig/themes/active.th amn/themes/active.th --- amn.orig/themes/active.th Tue Oct 11 19:29:44 2005 +++ amn/themes/active.th Tue Oct 11 19:00:21 2005 @@ -19,6 +19,9 @@ @sdcform = [18] @dcform = [14] @topform = [2] +@notopform = [2] +@settopform = [2] +@topbyform = [2] @ctcpform = [10] @sctcpform = [11] @echostr = [14] diff amn.orig/themes/alchemist.th amn/themes/alchemist.th --- amn.orig/themes/alchemist.th Tue Oct 11 19:29:44 2005 +++ amn/themes/alchemist.th Tue Oct 11 19:00:42 2005 @@ -19,6 +19,9 @@ @sdcform=5 @dcform=5 @topform=4 +@notopform = [4] +@settopform = [4] +@topbyform = [4] @ctcpform=3 @sctcpform=8 @echostr=1 diff amn.orig/themes/amnesiac.th amn/themes/amnesiac.th --- amn.orig/themes/amnesiac.th Tue Oct 11 19:29:44 2005 +++ amn/themes/amnesiac.th Tue Oct 11 19:00:53 2005 @@ -19,6 +19,9 @@ @sdcform=22 @dcform=18 @topform=4 +@notopform = [4] +@settopform = [4] +@topbyform = [4] @ctcpform=8 @sctcpform=11 @echostr=15 diff amn.orig/themes/beyond.th amn/themes/beyond.th --- amn.orig/themes/beyond.th Tue Oct 11 19:29:44 2005 +++ amn/themes/beyond.th Tue Oct 11 19:01:03 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=1 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=1 @sctcpform=1 @echostr=43 diff amn.orig/themes/bitchx.th amn/themes/bitchx.th --- amn.orig/themes/bitchx.th Tue Oct 11 19:29:44 2005 +++ amn/themes/bitchx.th Tue Oct 11 19:01:11 2005 @@ -19,6 +19,9 @@ @sdcform=27 @dcform=4 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=3 @sctcpform=3 @echostr=10 diff amn.orig/themes/channel.th amn/themes/channel.th --- amn.orig/themes/channel.th Tue Oct 11 19:29:44 2005 +++ amn/themes/channel.th Tue Oct 11 19:01:21 2005 @@ -19,6 +19,9 @@ @sdcform=22 @dcform=18 @topform=4 +@notopform = [4] +@settopform = [4] +@topbyform = [4] @ctcpform=8 @sctcpform=11 @echostr=15 diff amn.orig/themes/chloro.th amn/themes/chloro.th --- amn.orig/themes/chloro.th Tue Oct 11 19:29:44 2005 +++ amn/themes/chloro.th Tue Oct 11 19:01:31 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=1 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=1 @sctcpform=1 @echostr=13 diff amn.orig/themes/cl.th amn/themes/cl.th --- amn.orig/themes/cl.th Tue Oct 11 19:29:44 2005 +++ amn/themes/cl.th Tue Oct 11 19:01:44 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=8 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=10 @sctcpform=11 @echostr=18 diff amn.orig/themes/cyan.th amn/themes/cyan.th --- amn.orig/themes/cyan.th Tue Oct 11 19:29:44 2005 +++ amn/themes/cyan.th Tue Oct 11 19:03:29 2005 @@ -19,6 +19,9 @@ @sdcform=5 @dcform=1 @topform=2 +@notopform = [2] +@settopform = [2] +@topbyform = [2] @ctcpform=6 @sctcpform=3 @echostr=22 diff amn.orig/themes/dark.th amn/themes/dark.th --- amn.orig/themes/dark.th Tue Oct 11 19:29:44 2005 +++ amn/themes/dark.th Tue Oct 11 19:03:42 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=1 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=8 @sctcpform=3 @echostr=15 diff amn.orig/themes/darkgrey.th amn/themes/darkgrey.th --- amn.orig/themes/darkgrey.th Tue Oct 11 19:29:44 2005 +++ amn/themes/darkgrey.th Tue Oct 11 19:03:51 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=1 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=8 @sctcpform=3 @echostr=15 diff amn.orig/themes/dead.th amn/themes/dead.th --- amn.orig/themes/dead.th Tue Oct 11 19:29:44 2005 +++ amn/themes/dead.th Tue Oct 11 19:04:01 2005 @@ -19,6 +19,9 @@ @sdcform=6 @dcform=6 @topform=2 +@notopform = [2] +@settopform = [2] +@topbyform = [2] @ctcpform=5 @sctcpform=9 @echostr=31 diff amn.orig/themes/delusion.th amn/themes/delusion.th --- amn.orig/themes/delusion.th Tue Oct 11 19:29:44 2005 +++ amn/themes/delusion.th Tue Oct 11 19:04:08 2005 @@ -19,6 +19,9 @@ @sdcform=5 @dcform=1 @topform=2 +@notopform = [2] +@settopform = [2] +@topbyform = [2] @ctcpform=6 @sctcpform=3 @echostr=29 diff amn.orig/themes/electrical.th amn/themes/electrical.th --- amn.orig/themes/electrical.th Tue Oct 11 19:29:44 2005 +++ amn/themes/electrical.th Tue Oct 11 19:04:16 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=1 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=1 @sctcpform=1 @echostr=19 diff amn.orig/themes/elektra.th amn/themes/elektra.th --- amn.orig/themes/elektra.th Tue Oct 11 19:29:44 2005 +++ amn/themes/elektra.th Tue Oct 11 19:04:22 2005 @@ -19,6 +19,9 @@ @sdcform=3 @dcform=3 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=1 @sctcpform=1 @echostr=14 diff amn.orig/themes/epic.th amn/themes/epic.th --- amn.orig/themes/epic.th Tue Oct 11 19:29:44 2005 +++ amn/themes/epic.th Tue Oct 11 19:04:29 2005 @@ -19,6 +19,9 @@ @sdcform=25 @dcform=25 @topform=5 +@notopform = [5] +@settopform = [5] +@topbyform = [5] @ctcpform=11 @sctcpform=12 @echostr=45 diff amn.orig/themes/faceted.th amn/themes/faceted.th --- amn.orig/themes/faceted.th Tue Oct 11 19:29:44 2005 +++ amn/themes/faceted.th Tue Oct 11 19:04:39 2005 @@ -19,6 +19,9 @@ @sdcform=18 @dcform=18 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=10 @sctcpform=8 @echostr=19 diff amn.orig/themes/flying.th amn/themes/flying.th --- amn.orig/themes/flying.th Tue Oct 11 19:29:44 2005 +++ amn/themes/flying.th Tue Oct 11 19:04:45 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=1 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=6 @sctcpform=7 @echostr=24 diff amn.orig/themes/fresh.th amn/themes/fresh.th --- amn.orig/themes/fresh.th Tue Oct 11 19:29:44 2005 +++ amn/themes/fresh.th Tue Oct 11 19:04:51 2005 @@ -19,6 +19,9 @@ @sdcform=3 @dcform=3 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=9 @sctcpform=10 @echostr=1 diff amn.orig/themes/girlies.th amn/themes/girlies.th --- amn.orig/themes/girlies.th Tue Oct 11 19:29:44 2005 +++ amn/themes/girlies.th Tue Oct 11 19:04:58 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=1 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=2 @sctcpform=2 @echostr=15 diff amn.orig/themes/greenhouse.th amn/themes/greenhouse.th --- amn.orig/themes/greenhouse.th Tue Oct 11 19:29:44 2005 +++ amn/themes/greenhouse.th Tue Oct 11 19:05:10 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=1 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=2 @sctcpform=1 @echostr=19 diff amn.orig/themes/hellish.th amn/themes/hellish.th --- amn.orig/themes/hellish.th Tue Oct 11 19:29:44 2005 +++ amn/themes/hellish.th Tue Oct 11 19:05:18 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=1 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=1 @sctcpform=3 @echostr=19 diff amn.orig/themes/humble.th amn/themes/humble.th --- amn.orig/themes/humble.th Tue Oct 11 19:29:44 2005 +++ amn/themes/humble.th Tue Oct 11 19:05:27 2005 @@ -19,6 +19,9 @@ @sdcform=4 @dcform=4 @topform=1 +@notopform = [1] +@settopform = [1] +@topbyform = [1] @ctcpform=1 @sctcpform=1 @echostr=34 diff amn.orig/themes/l33t.th amn/themes/l33t.th --- amn.orig/themes/l33t.th Tue Oct 11 19:29:44 2005 +++ amn/themes/l33t.th Tue Oct 11 19:05:34 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=1 @topform=4 +@notopform = [4] +@settopform = [4] +@topbyform = [4] @ctcpform=1 @sctcpform=1 @echostr=49 diff amn.orig/themes/nocturnal.th amn/themes/nocturnal.th --- amn.orig/themes/nocturnal.th Tue Oct 11 19:29:44 2005 +++ amn/themes/nocturnal.th Tue Oct 11 19:05:43 2005 @@ -20,6 +20,9 @@ @sdcform=20 @dcform=5 @topform=4 +@notopform = [4] +@settopform = [4] +@topbyform = [4] @ctcpform=3 @sctcpform=8 @echostr=45 diff amn.orig/themes/p1mpin.th amn/themes/p1mpin.th --- amn.orig/themes/p1mpin.th Tue Oct 11 19:29:44 2005 +++ amn/themes/p1mpin.th Tue Oct 11 19:06:01 2005 @@ -19,6 +19,9 @@ @sdcform=13 @dcform=18 @topform=4 +@notopform = [4] +@settopform = [4] +@topbyform = [4] @ctcpform=9 @sctcpform=10 @echostr=39 diff amn.orig/themes/pheer.th amn/themes/pheer.th --- amn.orig/themes/pheer.th Tue Oct 11 19:29:44 2005 +++ amn/themes/pheer.th Tue Oct 11 19:06:09 2005 @@ -19,6 +19,9 @@ @sdcform=8 @dcform=8 @topform=2 +@notopform = [2] +@settopform = [2] +@topbyform = [2] @ctcpform=8 @sctcpform=3 @echostr=28 diff amn.orig/themes/reet.th amn/themes/reet.th --- amn.orig/themes/reet.th Tue Oct 11 19:29:44 2005 +++ amn/themes/reet.th Tue Oct 11 19:06:17 2005 @@ -19,6 +19,9 @@ @sdcform=7 @dcform=2 @topform=4 +@notopform = [4] +@settopform = [4] +@topbyform = [4] @ctcpform=6 @sctcpform=6 @echostr=47 diff amn.orig/themes/sabbath.th amn/themes/sabbath.th --- amn.orig/themes/sabbath.th Tue Oct 11 19:29:44 2005 +++ amn/themes/sabbath.th Tue Oct 11 19:06:24 2005 @@ -19,6 +19,9 @@ @sdcform=1 @dcform=1 @topform=2 +@notopform = [2] +@settopform = [2] +@topbyform = [2] @ctcpform=8 @sctcpform=11 @echostr=19 diff amn.orig/themes/seize.th amn/themes/seize.th --- amn.orig/themes/seize.th Tue Oct 11 19:29:44 2005 +++ amn/themes/seize.th Tue Oct 11 19:06:30 2005 @@ -19,6 +19,9 @@ @sdcform=22 @dcform=18 @topform=4 +@notopform = [4] +@settopform = [4] +@topbyform = [4] @ctcpform=8 @sctcpform=11 @echostr=15 diff amn.orig/themes/vanilla.th amn/themes/vanilla.th --- amn.orig/themes/vanilla.th Tue Oct 11 19:29:44 2005 +++ amn/themes/vanilla.th Tue Oct 11 19:06:38 2005 @@ -19,6 +19,9 @@ @sdcform=26 @dcform=26 @topform=5 +@notopform = [5] +@settopform = [5] +@topbyform = [5] @ctcpform=11 @sctcpform=12 @echostr=54 diff amn.orig/themes/wired.th amn/themes/wired.th --- amn.orig/themes/wired.th Tue Oct 11 19:29:44 2005 +++ amn/themes/wired.th Tue Oct 11 19:06:49 2005 @@ -19,6 +19,9 @@ @sdcform=4 @dcform=7 @topform=2 +@notopform = [2] +@settopform = [2] +@topbyform = [2] @ctcpform=6 @sctcpform=6 @echostr=2 Date: Tue, 11 Oct 2005 23:54:42 -0400 (EDT) From: zak@ircii.org (Zak) -increment development version -sync files to www. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Oct 11 15:35:59 2005 +++ amn/CHANGES Tue Oct 11 23:51:22 2005 @@ -236,3 +236,6 @@ -make a few changes to dict.m. Dont use wait instead do everything in on handlers + use serials. //kreca -Add formats for all aspects of topics. No new set for it, but /format n will set them. //skullY +-bump development version up to 10 this may be the final development version + before the next release everything seems to be set how i like it thus far + just needs testing from users now ;) //zak. diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Mon Oct 10 20:51:38 2005 +++ amn/core/sets.m Tue Oct 11 23:52:30 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[9] +@rel_id=[10] @a.rel=[1.1d r/$rel_id] @a.date=[20050903] @_ss=[15] Date: Wed, 12 Oct 2005 01:11:53 -0400 (EDT) From: zak@ircii.org (Zak) -fix /mw to do not use double_stats on fixed_sized win. blame kreca for this. noticed by Alien88 //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Oct 11 23:51:22 2005 +++ amn/CHANGES Wed Oct 12 00:54:54 2005 @@ -239,3 +239,4 @@ -bump development version up to 10 this may be the final development version before the next release everything seems to be set how i like it thus far just needs testing from users now ;) //zak. +-do not use doublestat of fixed-sized msgwin noticed by Alien88 //zak diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Mon Oct 10 22:23:12 2005 +++ amn/core/alias.m Wed Oct 12 00:52:04 2005 @@ -186,7 +186,7 @@ } switch ($0) { (-hidden) {^window new hide swap last level msgs name msgs} - (-split) {^window new fixed on size 7 level msgs status_format %>$(hblk)[$(cl)msgs$(hblk)]$(cl) name msgs;^window back} + (-split) {^window new double off fixed on size 7 level msgs status_format %>$(hblk)[$(cl)msgs$(hblk)]$(cl) name msgs;^window back} (-kill) {^window msgs kill} } } Date: Wed, 12 Oct 2005 19:17:28 -0400 (EDT) From: zak@ircii.org (Zak) -merge in cosmetic changes by trent.. thanks! //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Oct 12 00:54:54 2005 +++ amn/CHANGES Wed Oct 12 19:13:52 2005 @@ -240,3 +240,8 @@ before the next release everything seems to be set how i like it thus far just needs testing from users now ;) //zak. -do not use doublestat of fixed-sized msgwin noticed by Alien88 //zak + +10.12.05 +-merge in the following changes from a patch trent(criminal) sent to me. + minor cosmetics fix to whois.2 + add scan.7 whois.7 (slightly modified copies of others) //trent diff -aruN amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Mon Oct 10 20:51:38 2005 +++ amn/core/scan.m Wed Oct 12 19:07:45 2005 @@ -205,6 +205,7 @@ (4) {@snf=4;^eval load ${loadpath}sc/scan.4} (5) {@snf=5;^eval load ${loadpath}sc/scan.5} (6) {@snf=6;^eval load ${loadpath}sc/scan.6} + (7) {@snf=7;^eval load ${loadpath}sc/scan.7} } xecho $acban scan format set to $(snf) } diff -aruN amn.orig/core/whois.m amn/core/whois.m --- amn.orig/core/whois.m Mon Oct 10 20:51:38 2005 +++ amn/core/whois.m Wed Oct 12 19:08:32 2005 @@ -10,6 +10,7 @@ (4) {@_whois=4;^eval load ${loadpath}wis/whois.4} (5) {@_whois=5;^eval load ${loadpath}wis/whois.5} (6) {@_whois=6;^eval load ${loadpath}wis/whois.6} + (7) {@_whois=7;^eval load ${loadpath}wis/whois.7} } xecho $acban whois format set to $(_whois) } diff -aruN amn.orig/sc/scan.7 amn/sc/scan.7 --- amn.orig/sc/scan.7 Wed Dec 31 19:00:00 1969 +++ amn/sc/scan.7 Wed Oct 12 19:06:11 2005 @@ -0,0 +1,15 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage scan7 + +@format_scan_users=[ $$(hblk)<$$(c1)o$$(hblk)!$$(wht)$$1$(cl)$$(hblk)> $$(hblk)<$$(c1)n$$(hblk)!$$(wht)$$2$$(hblk)> $$(hblk)<$$(c1)v$$(hblk)!$$(wht)$$3$$(hblk)>] +@format_scan_width=15 +@format_scan_header=[ $$(hwht)ÚÄÄ$$(cl)Ä$$(hwht)Ä$$(cl)ÄÄÄÄÄ$$(c1)ÄÄ-ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ$$(hblk)ÄÄÄÄÄÄÄÄÄÄÄ-] +@format_scan_onjoin_nicks_border=[$$(hblk)<$$(c1)³$$(hblk)>] +@format_scan_onjoin_nicks=[$$(hblk)<$$(cl)$$fix.scan($1)$$(hblk)>] +@format_scan_nicks_border=[$$(hblk)<$$(c1)³$$(hblk)>] +@format_scan_nicks=[$$(hblk)<$$(cl)$$fix.scan2($1)$$(hblk)>] +@format_scan_footer=[ $$(c1)À-$$(hblk)----ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ----ÄÄ Ä ÄÄÄ] +@format_scan_users_op=[$$(hblk)<$$(c1)o$$(hblk)!$$(wht)$$1$$(cl)$$(hblk)>] +@format_scan_users_non=[$$(hblk)<$$(c1)n$$(hblk)!$$(wht)$$1$$(hblk)>] +@format_scan_users_voc=[$$(hblk)<$$(c1)v$$(hblk)!$$(wht)$$1$$(hblk)>] diff -aruN amn.orig/wis/whois.2 amn/wis/whois.2 --- amn.orig/wis/whois.2 Wed Jun 8 20:17:25 2005 +++ amn/wis/whois.2 Wed Oct 12 19:06:11 2005 @@ -4,8 +4,8 @@ ^sfset format_whois_channels $(c1)³ $(hwht)c$(cl)hannels $(hblk): $(cl)$1- ^sfset format_whois_server $(c1)³ $(hwht)s$(cl)erver $(hblk): $(cl)$1 \($2-\) ^sfset format_whois_away $(hblk)³ $(hwht)a$(cl)way $(hblk):$(cl) $1- -^sfset format_whois_actual $(hblk)3 $(hwht)a$(cl)ctual $(hblk): $(cl)$2 $msar(g/[/%K[%n/]/%K]%n/ $3) -^sfset format_whois_login $(hblk)3 $(hwht)l$(cl)ogin $(hblk): $(cl) as $3 +^sfset format_whois_actual $(hblk)³ $(hwht)a$(cl)ctual $(hblk): $(cl)$2 $msar(g/[/%K[%n/]/%K]%n/ $3) +^sfset format_whois_login $(hblk)³ $(hwht)l$(cl)ogin $(hblk): $(cl) as $3 ^sfset format_whois_operator $(hblk)³ $(hwht)o$(cl)perator $(hblk): $(cl)$1 $2- %K[%nOperator%K] ^sfset format_whois_admin $(hblk)³ $(hwht)a$(cl)dmin $(hblk): $(cl)$1- ^sfset format_whois_idle $(hblk)³ $(hwht)i$(cl)dle $(hblk): $(cl)$tdiff($1) idle diff -aruN amn.orig/wis/whois.7 amn/wis/whois.7 --- amn.orig/wis/whois.7 Wed Dec 31 19:00:00 1969 +++ amn/wis/whois.7 Wed Oct 12 19:06:11 2005 @@ -0,0 +1,20 @@ + +^sfset format_whois_header $(hwht) ÚÄÄ$(c2)Ä$(hwht)Ä$(c2)ÄÄÄÄ$(c1)Ä$(c2)ÄÄ$(c1)ÄÄ-$(hblk) - - ú +^sfset -format_whois_nick $(hblk)<$(c2)³$(hblk)> $(hblk)\($(hwht)$1$(hblk)!$(c1)$2$(hblk)@$(c1)$3$(hblk)\)$(cl) $country($rightw(1 $sar(g/./ / $3))) +^sfset format_whois_name $(hblk)<$(c2)³$(hblk)> $(c2)i$(c1)rcname $(hblk).. $(cl)$1- +^sfset format_whois_channels $(hblk)<$(c2)³$(hblk)> $(c2)c$(c1)hannels $(hblk).. $(cl)$1- +^sfset format_whois_server $(hblk)<$(c2)³$(hblk)> $(c2)s$(c1)erver $(hblk).. $(cl)$1 \($2-\) +^sfset format_whois_away $(hblk)<$(c2)³$(hblk)> $(c2)a$(c1)way $(hblk)..$(cl) $1- +^sfset format_whois_actual $(hblk)<$(c2)³$(hblk)> $(c2)a$(c1)ctual $(hblk).. $(cl)$2 $msar(g/[/%K[%n/]/%K]%n/ $3) +^sfset format_whois_login $(hblk)<$(c2)³$(hblk)> $(c2)l$(c1)ogin $(hblk).. $(cl) as $3 +^sfset format_whois_operator $(hblk)<$(c2)³$(hblk)> $(c2)o$(c1)perator $(hblk).. $(cl)$1 $2- %K[%nOperator%K] +^sfset format_whois_admin $(hblk)<$(c2)³$(hblk)> $(c2)a$(c1)dmin $(hblk).. $(cl)$1- +^sfset format_whois_idle $(hblk)<$(c2)³$(hblk)> $(c2)i$(c1)dle $(hblk).. $(cl)$tdiff($1) idle +^sfset format_whois_unknown $(hblk)<$(c2)³$(hblk)>$(cl) $1$(hblk):$(cl) no such nick/channel +^sfset format_whois_footer $(c1) À-$(hblk) -Ä- - - - - +^sfset format_whowas_header $(hwht) ÚÄÄ$(c2)Ä$(hwht)Ä$(c2)ÄÄÄÄ$(c1)Ä$(c2)ÄÄ$(c1)ÄÄ-$(hblk) - - ú +^sfset format_whowas_nick $(hblk)<$(c2)³$(hblk)> $(hwht)$1 was $(hblk)\($(c1)$2@$3$(hblk)\)$(cl) +^sfset format_whowas_name $(hblk)<$(c2)³$(hblk)> $(c2)i$(c1)rcname $(hblk).. $(cl)$1- +^sfset format_whowas_unknown $(hblk)<$(c2)³$(hblk)>$(cl) $1$(hblk):$(cl) there was no such nickname +^sfset format_whowas_footer $(c1) À-$(hblk) -Ä- - - - - +^sfset format_whois_signon $(hblk)<$(c2)³$(hblk)> $(c2)s$(c1)ignon $(hblk).. $(cl)$2- Date: Tue, 18 Oct 2005 06:59:09 -0400 (EDT) From: zak@ircii.org (Zak) -fixup tabkey to mine and most users liking. not sure if /m /msg is done right however *gulp* kreca needs to check for duplicates from tab.m and exec.m. since he's the one to even make tabkey code look more confusing then void did *duck* -couple bug fixes. -couple of aliases added requested by xavier. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Oct 12 19:13:52 2005 +++ amn/CHANGES Tue Oct 18 06:55:34 2005 @@ -245,3 +245,14 @@ -merge in the following changes from a patch trent(criminal) sent to me. minor cosmetics fix to whois.2 add scan.7 whois.7 (slightly modified copies of others) //trent + +10.18.05 +-add /wi support to tabkey from kreca //zak +-add /m /msg support but not cyclable by me *gulp* //zak +^^ might break some things as kreca does some really CONFUSING things +to tab.m... due to my lack of sleep or quite possibly i might see duplicate +edit_topic code that's conflicting from exec.m and tab.m want to check it +out kreca? (i'm clearly dreaming here since i [insert kreca do/check +something over here] ) //zak +-add 2 aliases for Xavier //zak +-fix scan.2 by ryan //zak diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Wed Oct 12 00:52:04 2005 +++ amn/core/alias.m Tue Oct 18 06:41:39 2005 @@ -77,6 +77,8 @@ alias irchost hostname $* alias unset set -$* alias unalias alias -$* +alias last lastlog $* +alias desc describe $* ## help shortcuts. alias a ahelp $* diff -aruN amn.orig/modules/tab/tab.m amn/modules/tab/tab.m --- amn.orig/modules/tab/tab.m Mon Oct 10 05:42:48 2005 +++ amn/modules/tab/tab.m Tue Oct 18 06:51:13 2005 @@ -61,6 +61,11 @@ ($(K)k *) ($(K)bk *) ($(K)me *) + ($(K)whois *) + ($(K)wi *) + ($(K)wii *) + ($(K)m *) + ($(K)msg *) ($(K)dcc send %) { parsekey END_OF_LINE diff -aruN amn.orig/sc/scan.2 amn/sc/scan.2 --- amn.orig/sc/scan.2 Mon Oct 10 20:22:34 2005 +++ amn/sc/scan.2 Tue Oct 18 06:42:23 2005 @@ -4,12 +4,12 @@ @format_scan_users=[ $$(hblk)[$$(c1)o$$(hblk)!$$(wht)$$1$(cl)$$(hblk)] $$(hblk)[$$(c1)n$$(hblk)!$$(wht)$$2$$(hblk)] $$(hblk)[$$(c1)v$$(hblk)!$$(wht)$$3$$(hblk)]] @format_scan_width=15 -@format_scan_header=[$$(hwht)ÚÄÄ$$(cl)Ä$$(hwht)Ä$$(cl)ÄÄÄÄÄ$$(c1)ÄÄ-ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ$$(hblk)ÄÄÄÄÄÄÄÄÄÄÄ-] +@format_scan_header=[ $$(hwht)ÚÄÄ$$(cl)Ä$$(hwht)Ä$$(cl)ÄÄÄÄÄ$$(c1)ÄÄ-ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ$$(hblk)ÄÄÄÄÄÄÄÄÄÄÄ-] @format_scan_onjoin_nicks_border=[$$(hblk)[$$(c1)³$$(hblk)]] @format_scan_onjoin_nicks=[$$(hblk)[$$(cl)$$fix.scan($1)$$(hblk)]] @format_scan_nicks_border=[$$(hblk)[$$(c1)³$$(hblk)] @format_scan_nicks=[$$(hblk)[$$(cl)$$fix.scan2($1)$$(hblk)] -@format_scan_footer=[$$(c1)À-$$(hblk)----ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ----ÄÄ Ä ÄÄÄ] +@format_scan_footer=[ $$(c1)À-$$(hblk)----ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ----ÄÄ Ä ÄÄÄ] @format_scan_users_op=[$$(hblk)[$$(c1)o$$(hblk)!$$(wht)$$1$$(cl)$$(hblk)]] @format_scan_users_non=[$$(hblk)[$$(c1)n$$(hblk)!$$(wht)$$1$$(hblk)]] @format_scan_users_voc=[$$(hblk)[$$(c1)v$$(hblk)!$$(wht)$$1$$(hblk)]] Date: Tue, 18 Oct 2005 07:28:27 -0400 (EDT) From: zak@ircii.org (Zak) -revert back a few changes from tab.m /m and /msg this diff might be a bit fucked up as i forgot to sync the amn.orig tree methinks. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Oct 18 06:55:34 2005 +++ amn/CHANGES Tue Oct 18 07:26:30 2005 @@ -256,3 +256,5 @@ something over here] ) //zak -add 2 aliases for Xavier //zak -fix scan.2 by ryan //zak +-revert the /m /msg changes from tab.m i'll keep it in my tree to stop kreca + from acting like a little $#!@@#$!@#$ //zak diff -aruN amn.orig/modules/tab/tab.m amn/modules/tab/tab.m --- amn.orig/modules/tab/tab.m Tue Oct 18 06:51:13 2005 +++ amn/modules/tab/tab.m Tue Oct 18 07:26:56 2005 @@ -64,8 +64,6 @@ ($(K)whois *) ($(K)wi *) ($(K)wii *) - ($(K)m *) - ($(K)msg *) ($(K)dcc send %) { parsekey END_OF_LINE Date: Wed, 19 Oct 2005 01:06:32 -0400 (EDT) From: zak@ircii.org (Zak) -ok guys the tree is frozen until thurs since we have made far too many changes since our last release and there are a fair amount of functions that are epic .7 (upcoming release) hop says probably will be out on thursday unless some bugs are reported until then, this goes for amnesiac as well. -minor changes to emopart.reasons by trent. -better query alias requested by xavier. -freeze tree for upcoming release ONLY CHANGES APPROVED BY ME WILL BE ALLOWED. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Oct 18 07:26:30 2005 +++ amn/CHANGES Wed Oct 19 01:03:11 2005 @@ -258,3 +258,8 @@ -fix scan.2 by ryan //zak -revert the /m /msg changes from tab.m i'll keep it in my tree to stop kreca from acting like a little $#!@@#$!@#$ //zak + +10.19.05 +-add some reasons/modifications by trent(criminal) to emopart.reasons. //zak +-add a better query alias requested by xavier //zak +-freeze tree until thurs. //zak diff -aruN amn.orig/core/window.m amn/core/window.m --- amn.orig/core/window.m Mon Oct 10 20:51:38 2005 +++ amn/core/window.m Wed Oct 19 01:01:52 2005 @@ -22,9 +22,7 @@ ^window refnum 1 } -alias query { - window query $* -} +alias query //query $0;msg $0 $1- alias wq { if (#) { diff -aruN amn.orig/emopart.reasons amn/emopart.reasons --- amn.orig/emopart.reasons Fri Aug 26 06:54:40 2005 +++ amn/emopart.reasons Wed Oct 19 00:55:47 2005 @@ -1,12 +1,15 @@ I will not be part of this -You guys are assholes -stop it dad! You're crushing my smokes! -More important things on my mind -One day sheep will rule the world +you guys are assholes +stop it dad! you're crushing my smokes! +more important things on my mind +one day sheep will rule the world Sanity.... -Go suck off a bobby, and eat cheerios -Everyone hates me because I'm paranoid. -Fucking fascists! +go suck off a bobby, and eat cheerios +everyone hates me because I'm paranoid +Fucking Fascists! I always get shafted :( all this love is makin me wanna look for batteries -I really dispise you internet know-it-alls +I really despise you internet know-it-alls +screw you guys, I'm going home +I hate myself for what I've become +why are you guys being so mean? Date: Wed, 19 Oct 2005 01:24:55 -0400 (EDT) From: zak@ircii.org (Zak) -make some themes use the more enhanced action format output /format x 2 for ppl who use multiple channels in the same window, should make some users happy. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Oct 19 01:03:11 2005 +++ amn/CHANGES Wed Oct 19 01:22:32 2005 @@ -263,3 +263,5 @@ -add some reasons/modifications by trent(criminal) to emopart.reasons. //zak -add a better query alias requested by xavier //zak -freeze tree until thurs. //zak +-set default and some other popular themes to use the action format which + supports /me output in multiple channels in same window. //zak diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Tue Oct 11 23:52:30 2005 +++ amn/core/sets.m Wed Oct 19 01:16:10 2005 @@ -112,7 +112,7 @@ @wallform = [2] @bwallform=[4] @awayform=[5] -@actform=[3] +@actform=[2] @descform=[2] @sdescform=[1] @statbar=[stat.11] diff -aruN amn.orig/themes/alchemist.th amn/themes/alchemist.th --- amn.orig/themes/alchemist.th Tue Oct 11 15:00:42 2005 +++ amn/themes/alchemist.th Wed Oct 19 01:17:44 2005 @@ -31,8 +31,8 @@ @wallform=[6] @bwallform=6 @awayform=8 -@actform=3 -@actoform=3 +@actform=2 +@actoform=2 @descform=2 @sdescform=2 @pubnotform=1 diff -aruN amn.orig/themes/amnesiac.th amn/themes/amnesiac.th --- amn.orig/themes/amnesiac.th Tue Oct 11 15:00:53 2005 +++ amn/themes/amnesiac.th Wed Oct 19 01:20:36 2005 @@ -31,11 +31,11 @@ @wallform = [2] @bwallform=2 @awayform=7 -@actform=1 -@actform=1 +@actform=2 +@actform=2 @descform=1 @sdescform=1 -@actform=1 +@actform=2 @statbar=[stat.5] @_whois=[2] @c1=[ diff -aruN amn.orig/themes/chloro.th amn/themes/chloro.th --- amn.orig/themes/chloro.th Tue Oct 11 15:01:31 2005 +++ amn/themes/chloro.th Wed Oct 19 01:18:16 2005 @@ -31,11 +31,11 @@ @wallform = [1] @bwallform=1 @awayform=1 -@actform=1 -@actform=1 -@descform=1 -@sdescform=1 -@actform=1 +@actform=2 +@actform=2 +@descform=2 +@sdescform=2 +@actform=2 @statbar=[stat.9] @c1=[$(grn) @c2=[$(hgrn) diff -aruN amn.orig/themes/cyan.th amn/themes/cyan.th --- amn.orig/themes/cyan.th Tue Oct 11 15:03:29 2005 +++ amn/themes/cyan.th Wed Oct 19 01:20:11 2005 @@ -31,11 +31,11 @@ @wallform = [2] @bwallform=2 @awayform=4 -@actform=1 -@actform=1 +@actform=2 +@actform=2 @descform=1 @sdescform=1 -@actform=1 +@actform=2 @statbar=[stat.1] @c1=[$(cyn) @c2=[$(hcyn) diff -aruN amn.orig/themes/elektra.th amn/themes/elektra.th --- amn.orig/themes/elektra.th Tue Oct 11 15:04:22 2005 +++ amn/themes/elektra.th Wed Oct 19 01:18:45 2005 @@ -31,11 +31,11 @@ @wallform = [2] @bwallform=2 @awayform=4 -@actform=1 -@actform=1 -@descform=1 -@sdescform=1 -@actform=1 +@actform=2 +@actform=2 +@descform=2 +@sdescform=2 +@actform=2 @statbar=[stat.2] @c1=[$(cyn) @c2=[$(hcyn) diff -aruN amn.orig/themes/epic.th amn/themes/epic.th --- amn.orig/themes/epic.th Tue Oct 11 15:04:29 2005 +++ amn/themes/epic.th Wed Oct 19 01:19:30 2005 @@ -31,11 +31,11 @@ @wallform = [2] @bwallform=2 @awayform=9 -@actform=3 -@actform=3 +@actform=2 +@actform=2 @descform=2 @sdescform=2 -@actform=3 +@actform=2 @statbar=[stat.11] @_whois=4 @c1=[ diff -aruN amn.orig/themes/greenhouse.th amn/themes/greenhouse.th --- amn.orig/themes/greenhouse.th Tue Oct 11 15:05:10 2005 +++ amn/themes/greenhouse.th Wed Oct 19 01:21:01 2005 @@ -31,11 +31,11 @@ @wallform = [2] @bwallform=2 @awayform=1 -@actform=1 -@actform=1 +@actform=2 +@actform=2 @descform=1 @sdescform=1 -@actform=1 +@actform=2 @statbar=[stat.4] @c1=[$(grn) @c2=[$(hgrn) Date: Wed, 19 Oct 2005 01:31:07 -0400 From: Zak Amnesiac has been frozen until thursday at least only bugfixes will be permitted into the tree, and minor changes that are approved by me. if there are any bugs/issues you find from now till thursday this is your final warning, report it directly to me or on irc #amnesiac so it can be fixed before we make the release. remember the latest snapshot can be found here http://amnesiac.ircii.org/ac-snap.tgz enjoy. //zak Date: Wed, 19 Oct 2005 01:36:10 -0400 (EDT) From: zak@ircii.org (Zak) -sync docs to reality. //zak diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Thu Oct 6 22:44:33 2005 +++ amn/docs/E5-KNOWNBUGS Wed Oct 19 01:33:15 2005 @@ -2,12 +2,7 @@ KNOWN ERRATA (eg, bugs, or unresolved requests): ------------------------------------------------ -* JM needs to start a discussion on the mailing list about /msg restrictions -* /CTCPs over /DCCs don't match up with their queries very well. -* Revamp of /who -realname -* alias foo {package x;load script} carries 'x' into 'script' ??? -* Remove support for "highlighted ignores" because they annoy me. -* Change direct manipulations of to_window with calls to message_to(). +* More gracious support for trickling horizontal resizes down to the window. LOOK FOR IN THE FUTURE ----------------------- @@ -19,6 +14,8 @@ * /window noserv causes bad fd loop. (can't reproduce?) * DBM support. * Is there some way to set what ^O resets to, a la mirc? +* /CTCPs over /DCCs don't match up with their queries very well. +* alias foo {package x;load script} carries 'x' into 'script' ??? [See http://www.epicsol.org/PROJECTS for things to come in the future] [See http://www.epicsol.org/CHANGELOG5 for things that changed in the past] @@ -828,3 +825,23 @@ * Do some re-org in screen.c, screen.h * Roll window_disp() into its only caller, add_to_window(). * Change create_new_screen() into a void function +* Nix some func decls in windows.h that don't exist any more +* Add message_setall(), lets you save to_window on the message_from stack. +* Replace users of message_to() with message_setall(). +* Replace direct users of to_window with message_setall(). yay! +* /XECHO got rewritten as part of this. See UPDATES +* Fix various compiler warnings. +* Add a bsd licensed base64 encode/decode in compat.c +* Add $b64encode() and $b64decode(). +* Make the new math parser not slurp up function param lists in lvalues +* Make function calling a full blown operator in the new math parser. +* Call remove_brackets() in call_function +* All this will permit $foo[bar](args) to work as well as ${foo[bar](args)}. +* Remove some unused global variables +* Permit function calls on rval in new math parser, by special request of ce. +* Fix /away -all so it doesn't error on gaps in server list (weirdo) +* Fix bogon in /xecho. doh. +* Fix /who -real so it matches both with and without the hopcount. +* Convert all uses of message_to() to message_setall(). yay! +* Add the 'highlight' script which implements the highlight-ignore thingee +* Whack the 'highlight ignore' feature as per discussion on the list. Date: Thu, 20 Oct 2005 01:01:05 -0400 (EDT) From: zak@ircii.org (Zak) -set statbar 11 to use doublestats per default. until a fix or something is done with the [opervision]. use stat 12? or 13? for single lined statbars. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Oct 19 01:22:32 2005 +++ amn/CHANGES Thu Oct 20 00:59:21 2005 @@ -265,3 +265,7 @@ -freeze tree until thurs. //zak -set default and some other popular themes to use the action format which supports /me output in multiple channels in same window. //zak + +10.20.05 +-set stat.11 to use doublestats for the time being, so people don't get + confused with [opervision] //zak diff -aruN amn.orig/stats/stat.11 amn/stats/stat.11 --- amn.orig/stats/stat.11 Sat Oct 1 21:25:40 2005 +++ amn/stats/stat.11 Thu Oct 20 00:58:06 2005 @@ -30,6 +30,6 @@ ^set REVERSE_STATUS_LINE on } stat11 -@windowdoubles=[off] -^window double off +@windowdoubles=[on] +^window double on ^timer -del 14 Date: Thu, 20 Oct 2005 19:27:45 -0400 (EDT) From: zak@ircii.org (Zak) -bugfixes to userlist. by skullY -some other minor fixes. by me. really they're hacks but who looks at the code anyways? //zak //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Oct 20 00:59:21 2005 +++ amn/CHANGES Thu Oct 20 19:26:05 2005 @@ -269,3 +269,12 @@ 10.20.05 -set stat.11 to use doublestats for the time being, so people don't get confused with [opervision] //zak +-userlist.m: Allow users to specify * as a channel name for the userlist. + Fix the formatting while I'm there. //skullY +-userlist.m: Allow users to specify * as a channel name for the userlist. + Fix the formatting while I'm there. //skullY +-move script echo;s/parses to amn.epic to load before it loads the banners. + as the output that should come out on startup shows a missing //echo. + this should fix the case of the MISSING OUTPUT. //zak +-try to center the amn.load banner using WHITESPACES, since for some reason + $_center went berserk or doesn't load on time. //zak diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Mon Oct 10 23:00:52 2005 +++ amn/amn.epic Thu Oct 20 19:19:37 2005 @@ -67,6 +67,13 @@ ^on ^yell * # ##end poor mans THUTTUP. +## script echo ##still need to clean some of this up. +alias abwecho xecho -v $acban $cparse($*) +alias awecho xecho -v $cparse($*) +alias aecho //echo $cparse($*) +alias abecho xecho -b -- $cparse($*) +alias ce //echo $cparse("$*") + ## allow for permanent settings via ~/.amnrc ^eval ^load ~/.amnrc ^eval ^load $(loadpath)core/sets.m diff -aruN amn.orig/ans/amc.load amn/ans/amc.load --- amn.orig/ans/amc.load Sun Jul 31 03:41:10 2005 +++ amn/ans/amc.load Thu Oct 20 19:25:05 2005 @@ -1,13 +1,13 @@ aecho -eval _center When I was a child I had a fever -eval _center My hands felt just like two balloons -eval _center I've got that feeling once again -eval _center I can't explain, you would not understand -eval _center This is not how I am -eval _center I have become comfortably numb +eval echo When I was a child I had a fever +eval echo My hands felt just like two balloons +eval echo I've got that feeling once again +eval echo I can't explain, you would not understand +eval echo This is not how I am +eval echo I have become comfortably numb aecho -eval _center Pink Floyd - Comfortably numb. +eval echo Pink Floyd - Comfortably numb. aecho aecho -eval _center Note: see /about for additional information. +eval echo Note: see /about for additional information. aecho diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Tue Oct 18 06:41:39 2005 +++ amn/core/alias.m Thu Oct 20 19:19:01 2005 @@ -54,13 +54,6 @@ alias cuinfo ctcp $0 userinfo alias cfinger ctcp $0 finger -## script echo ##still need to clean some of this up. -alias abwecho xecho -v $acban $cparse($*) -alias awecho xecho -v $cparse($*) -alias aecho //echo $cparse($*) -alias abecho xecho -b -- $cparse($*) -alias ce //echo $cparse("$*") - ## to be annoying like xavier. alias blinky msg $T $cparse("%F%G$*") diff -aruN amn.orig/modules/userlist/userlist.m amn/modules/userlist/userlist.m --- amn.orig/modules/userlist/userlist.m Mon Oct 10 20:51:38 2005 +++ amn/modules/userlist/userlist.m Thu Oct 20 19:17:48 2005 @@ -32,35 +32,38 @@ alias adduser { if (![$1]) { - //echo ------------------------------------------------------------------ - //echo syntax: /adduser [nick|ident@host] #channel userlevel1,userlevel2, - //echo userlevel3 ... password - //echo valid userlevels are ops iops invite voice deop - //echo ------------------------------------------------------------------ -}{ - @ :input1 = [$0] - if (ismask($input1)) { - @ friendhost = input1 - - } else { - if (!getuhost($input1)) { //echo $banner $input1 is not on irc! }{ - @ friendhost = sar(g/~/\*/$getuhost($input1)) - @ friendnick = [$input1] - }} - if (friendhost) { - @ :fchan = [$1] - @ :pass = [$encode($3)] - @ :flags = [$2] - @ setitem(friends 0 !) - @ setitem(friends $numitems(friends) $friendhost $fchan $flags $pass) - banner.lchead - banner.mid added $friendhost $fchan $flags $decode($pass) - banner.lcfoot + //echo ------------------------------------------------------------------ + //echo syntax: /adduser [nick|ident@host] #channel userlevel1,userlevel2, + //echo userlevel3 ... password + //echo valid userlevels are ops iops invite voice deop + //echo ------------------------------------------------------------------ + }{ + @ :input1 = [$0] + ^assign -friendhost + if (ismask($input1)) { + @ friendhost = input1 + } else { + if (!getuhost($input1)) { + //echo $banner $input1 is not on irc! + }{ + @ friendhost = sar(g/~/\*/$getuhost($input1)) + @ friendnick = [$input1] + } } + if (friendhost) { + @ :fchan = [$1] + @ :pass = [$encode($3)] + @ :flags = [$2] + @ setitem(friends 0 !) + @ setitem(friends $numitems(friends) $friendhost $fchan $flags $pass) + banner.lchead + banner.mid added $friendhost $fchan $flags $decode($pass) + banner.lcfoot + } } } + alias userlist { - if (numitems(friends)<2) { banner.lchead banner.mid the userlist is empty! @@ -79,8 +82,6 @@ xecho [$[3]xx] $[40]uhost $[11]chan $flags } banner.lcfoot - - } } @@ -101,8 +102,8 @@ if (numitems(friends)<=[$0]) { //echo $banner no such user! }{ - xecho $acban deleted userlist entry $getitem(friends $0) - @ delitem(friends $0) + xecho $acban deleted userlist entry $getitem(friends $0) + @ delitem(friends $0) } }{ //echo $banner usage: /deluser @@ -111,8 +112,8 @@ alias userload { ^eval load $frsavefile @ delarray(friends) - @ setitem(friends 0 !) - @ ii = 1 + @ setitem(friends 0 !) + @ ii = 1 while (friends[$ii]) { @ setitem(friends $ii $friends[$ii]) @ ii++ @@ -134,55 +135,55 @@ on #-join 34 * { if (N != [$0]) { - ^local ojchan $1 - ^local ojblah $getmatches(friends *$ojchan*) - fe ($ojblah) ii { - @ojhost[$ii] = getitem(friends $ii) + ^local ojchan $1 + ^local ojblah1 $getmatches(friends *$ojchan* iops*) + ^local ojblah2 $getmatches(friends % \\* *iops *) + fe ($ojblah1 $ojblah2) ii { + @ojhost[$ii] = getitem(friends $ii) } - foreach ojhost xx { - if (rmatch($userhost($0) $word(0 $ojhost[$xx])) > 0) { + foreach ojhost xx { + if (rmatch($userhost($0) $word(0 $ojhost[$xx])) > 0) { ^local ojtemp1 $ojhost[$xx] ^clean ojhost - } } - ^local ojtemp2 $word(0 $ojtemp1) - ^local ojtemp4 $sar(g/,/ /$word(2 $ojtemp1)) - if (match(iops $ojtemp4) > 0) { - @ojtemp3 = word(1 $ojtemp1) - if (ischanop($N $1) && [$1] == ojtemp3 && match(iops $ojtemp4) > 0 && match($ojtemp2 $userhost($0)) > 0) { - abecho Userlist matched hostmask: $sar(g/@/%K@%n/$ojtemp2) has joined $1 - abecho Auto-oping if not op'd in $_ss seconds. - ^timer $_ss { - if (!ischanop($0 $1)) { - ^mode $1 +o $0;^timer -delete 451;^timer -refnum 451 $_ss {^assign -ojtemp3} - } - } + } + ^local ojtemp2 $word(0 $ojtemp1) + ^local ojtemp4 $sar(g/,/ /$word(2 $ojtemp1)) + if (match(iops $ojtemp4) > 0) { + @ojtemp3 = word(1 $ojtemp1) + if (ischanop($N $1) && match($ojtemp3 $1) > 0 && match($ojtemp2 $userhost($0)) > 0) { + aecho $acban Userlist matched hostmask: $sar(g/@/%K@%n/$ojtemp2) has joined $1 + aecho $acban Auto-oping if not op'd in $_ss seconds. + ^timer $_ss { + if (!ischanop($0 $1)) { + ^mode $1 +o $0;^timer -delete 451;^timer -refnum 451 $_ss {^assign -ojtemp3} } - - + } + } } } } ^on #-join 23 * { if (N != [$0]) { - ^local avchan $1 - ^local avblah $getmatches(friends *$avchan*) - fe ($avblah) ii { - @avhost[$ii] = getitem(friends $ii) + ^local avchan $1 + ^local avblah1 $getmatches(friends *$avchan* voice *) + ^local avblah2 $getmatches(friends % \\* *voice *) + fe ($avblah1 $avblah2) ii { + @avhost[$ii] = getitem(friends $ii) } - foreach avhost xx { - if (rmatch($userhost($0) $word(0 $avhost[$xx])) > 0) { + foreach avhost xx { + if (rmatch($userhost($0) $word(0 $avhost[$xx])) > 0) { ^local avtemp1 $avhost[$xx] - } - } - ^local avtemp2 $word(0 $avtemp1) - ^local avtemp3 $word(1 $avtemp1) - ^local avtemp4 $sar(g/,/ /$word(2 $avtemp1)) - if (ischanop($N $avchan) && [$1] == avtemp3 && match(voice $avtemp4) > 0 && match($avtemp2 $userhost($0)) > 0) { - abecho Userlist matched hostmask: $sar(g/@/%K@%n/$avtemp2) voicing user on $1 - ^mode $avtemp3 +v $0;clean avhost - } + } + } + ^local avtemp2 $word(0 $avtemp1) + ^local avtemp3 $word(1 $avtemp1) + ^local avtemp4 $sar(g/,/ /$word(2 $avtemp1)) + if (ischanop($N $avchan) && match($avtemp3 $avchan) > 0 && match(voice $avtemp4) > 0 && match($avtemp2 $userhost($0)) > 0) { + aecho $acban Userlist matched hostmask: $sar(g/@/%K@%n/$avtemp2) voicing user on $1 + ^mode $avtemp3 +v $0;clean avhost + } } } @@ -191,58 +192,60 @@ ^local ichan $3 ^local ipass $4 ^userhost $0 -cmd { - if ([$3@$4] != [@]) { - ^local invhost $3@$4 - ^local iblah $getmatches(friends *$ichan*) - fe ($iblah) ii { - @ihost[$ii] = getitem(friends $ii) - } - foreach ihost xx { - if (rmatch($invhost $word(0 $ihost[$xx])) > 0) { - ^local itemp1 $ihost[$xx] - } + if ([$3@$4] != [@]) { + ^local invhost $3@$4 + ^local iblah1 $getmatches(friends *$ichan* *) + ^local iblah2 $getmatches(friends % \\* *) + fe ($iblah1 $iblah2) ii { + @ihost[$ii] = getitem(friends $ii) + } + foreach ihost xx { + if (rmatch($invhost $word(0 $ihost[$xx])) > 0) { + ^local itemp1 $ihost[$xx] } - ^local itemp2 $word(0 $itemp1) - ^local itemp3 $word(1 $itemp1) - ^local itemp4 $sar(g/,/ /$word(2 $itemp1)) - ^local itemp5 $decode($word(3 $itemp1)) - if (ischanop($N $ichan) && ichan == itemp3 && match(invite $itemp4) > 0 && ipass == itemp5 && match($itemp2 $invhost) > 0) { - abecho $0!$invhost matches userlist, inviting him to $vchan - ^notice $0 inviting you to $ichan - ^invite $0 $itemp3;clean ihost - }{ - ^notice $0 [a+c] bad password or channel or you are not on my userlist - } - } + ^local itemp2 $word(0 $itemp1) + ^local itemp3 $word(1 $itemp1) + ^local itemp4 $sar(g/,/ /$word(2 $itemp1)) + ^local itemp5 $decode($word(3 $itemp1)) + if (ischanop($N $ichan) && match($itemp3 $ichan) > 0 && match(invite $itemp4) > 0 && ipass == itemp5 && match($itemp2 $invhost) > 0) { + aecho $acban $0!$invhost matches userlist, inviting him to $vchan + ^notice $0 inviting you to $ichan + ^invite $0 $itemp3;clean ihost + }{ + ^notice $0 [a+c] bad password or channel or you are not on my userlist + } + } + } } ^on #-ctcp 43 "% % OP*" { ^local ochan $3 ^local opass $4 - ^userhost $0 -cmd { + ^userhost $0 -cmd { if ([$3@$4] != [@]) { - ^local ophost $3@$4 - @ oblah = getmatches(friends *$ochan*) - fe ($oblah) ii { - @ohost[$ii] = getitem(friends $ii) - } + ^local ophost $3@$4 + @ oblah1 = getmatches(friends *$ochan* *ops*) + @ oblah2 = getmatches(friends % \\* *ops*) + fe ($oblah1 $oblah2) ii { + @ohost[$ii] = getitem(friends $ii) + } foreach ohost xx { if (rmatch($ophost $word(0 $ohost[$xx])) > 0) { - ^local otemp1 $ohost[$xx] - } - } - ^local otemp2 $word(0 $otemp1) - ^local otemp3 $word(1 $otemp1) - ^local otemp4 $sar(g/,/ /$word(2 $otemp1)) - ^local otemp5 $decode($word(3 $otemp1)) - if (ischanop($N $ochan) && ochan == otemp3 && match(ops $otemp4) > 0 && opass == otemp5 && rmatch($ophost $otemp2) > 0) { - abecho $0!$ophost matches userlist, oping on $ochan - ^mode $otemp3 +o $0;clean ohost - }{ - ^notice $0 [a+c] bad password or channel or you are not on my userlist - } + ^local otemp1 $ohost[$xx] + } + } + ^local otemp2 $word(0 $otemp1) + ^local otemp3 $word(1 $otemp1) + ^local otemp4 $sar(g/,/ /$word(2 $otemp1)) + ^local otemp5 $decode($word(3 $otemp1)) + if (ischanop($N $ochan) && match($otemp3 $ochan) > 0 && match(ops $otemp4) > 0 && opass == otemp5 && rmatch($ophost $otemp2) > 0) { + abecho $0!$ophost matches userlist, oping on $ochan + ^mode $otemp3 +o $0;clean ohost + }{ + ^notice $0 [a+c] bad password or channel or you are not on my userlist + } } } } @@ -251,90 +254,84 @@ ^local vchan $3 ^local vpass $4 ^userhost $0 -cmd { - if ([$3@$4] != [@]) { - ^local vphost $3@$4 - ^local vblah $getmatches(friends *$vchan*) - fe ($vblah) ii { - @vhost[$ii] = getitem(friends $ii) - } + if ([$3@$4] != [@]) { + ^local vphost $3@$4 + ^local vblah1 $getmatches(friends *$vchan* voice*) + ^local vblah2 $getmatches(friends % \\* *voice*) + fe ($vblah1 $vblah2) ii { + @vhost[$ii] = getitem(friends $ii) + } foreach vhost xx { if (rmatch($vphost $word(0 $vhost[$xx])) > 0) { - ^local vtemp1 $vhost[$xx] - } - } - ^local vtemp2 $word(0 $vtemp1) - ^local vtemp3 $word(1 $vtemp1) - ^local vtemp4 $sar(g/,/ /$word(2 $vtemp1)) - ^local vtemp5 $decode($word(3 $vtemp1)) - if (ischanop($N $vchan) && vchan == vtemp3 && match(voice $vtemp4) > 0 && vpass == vtemp5 && rmatch($vphost $vtemp2) > 0) { - abecho $0%K!%n$vphost matches userlist, voicing on $vchan - ^mode $vtemp3 +v $0;clean vhost - }{ - ^notice $0 [a+c] bad password or channel or you are not on my userlist - } + ^local vtemp1 $vhost[$xx] + } + } + ^local vtemp2 $word(0 $vtemp1) + ^local vtemp3 $word(1 $vtemp1) + ^local vtemp4 $sar(g/,/ /$word(2 $vtemp1)) + ^local vtemp5 $decode($word(3 $vtemp1)) + if (ischanop($N $vchan) && match($vtemp3 $vchan) > 0 && match(voice $vtemp4) > 0 && vpass == vtemp5 && rmatch($vphost $vtemp2) > 0) { + aecho $acban $0%K!%n$vphost matches userlist, voicing on $vchan + ^mode $vtemp3 +v $0;clean vhost + }{ + ^notice $0 [a+c] bad password or channel or you are not on my userlist + } } } } - ^on #-mode_stripped 3 "% % -o %" { +^on #-mode_stripped 3 "% % -o %" { if (N != [$0]) { ^local odeopnick $0 ^local deopchan $1 ^local deopnick $3 ^local deophost $userhost($3) - ^local deopmatch $getmatches(friends *$deopchan*) - fe ($deopmatch) ii { - @deopline[$ii] = [$getitem(friends $ii)] - + ^local deopmatch1 $getmatches(friends *$deopchan* ops*) + ^local deopmatch2 $getmatches(friends % \\* *ops*) + fe ($deopmatch1 $deopmatch2) ii { + @deopline[$ii] = [$getitem(friends $ii)] + } + foreach deopline xx { + if (rmatch($deophost $word(0 $deopline[$xx])) > 0) { + ^local deoptemp1 $deopline[$xx] } - foreach deopline xx { - if (rmatch($deophost $word(0 $deopline[$xx])) > 0) { - ^local deoptemp1 $deopline[$xx] - } - } - ^local deoptemp2 $word(0 $deoptemp1) - ^local deoptemp3 $word(1 $deoptemp1) - ^local deoptemp4 $sar(g/,/ /$word(2 $deoptemp1)) - if (ischanop($N $deoptemp3) && deoptemp3 == deopchan && match(deop $deoptemp4) > 0 && rmatch($deophost $deoptemp2) > 0) { - abecho $deopnick%K!%n$deophost matches userlist, deoping $odeopnick on $deopchan - ^mode $deoptemp3 -o $odeopnick - ^mode $deoptemp3 +o $deopnick;clean deopline - ^notice $odeopnick deop'd protected user $deopnick on $deoptemp3 - - } - - + } + ^local deoptemp2 $word(0 $deoptemp1) + ^local deoptemp3 $word(1 $deoptemp1) + ^local deoptemp4 $sar(g/,/ /$word(2 $deoptemp1)) + if (ischanop($N $deoptemp3) && deoptemp3 == deopchan && match(deop $deoptemp4) > 0 && rmatch($deophost $deoptemp2) > 0) { + aecho $acban $deopnick%K!%n$deophost matches userlist, deoping $odeopnick on $deopchan + ^mode $deoptemp3 -o $odeopnick + ^mode $deoptemp3 +o $deopnick;clean deopline + ^notice $odeopnick deop'd protected user $deopnick on $deoptemp3 + } } } ^on #-mode_stripped 3 "% % +b %" { if (N != [$0]) { - ^local _obannick $0 ^local _banchan $1 ^local _banuhost $after(! $3) - ^local _banmatch $getmatches(friends *$_banchan*) - fe ($_banmatch) ii { - @_banline[$ii] = [$getitem(friends $ii)] - - } - foreach _banline xx { - if (comatch($_banuhost $word(0 $_banline[$xx])) > 0) { - ^local _bantemp1 $_banline[$xx] + ^local _banmatch1 $getmatches(friends *$_banchan*) + ^local _banmatch2 $getmatches(friends % \\* *) + fe ($_banmatch1 $_banmatch2) ii { + @_banline[$ii] = [$getitem(friends $ii)] + } + foreach _banline xx { + if (comatch($_banuhost $word(0 $_banline[$xx])) > 0) { + ^local _bantemp1 $_banline[$xx] } } - ^local _bantemp2 $word(0 $_bantemp1) - ^local _bantemp3 $word(1 $_bantemp1) - ^local _bantemp4 $sar(g/,/ /$word(2 $_bantemp1)) - if (ischanop($N $_bantemp3) && _bantemp3 == _banchan && match(unban $_bantemp4) > 0 && comatch($_bantemp2 $_banuhost)) { - abecho %K[%na+c%K]%n $_banuhost%K!%n$_banhost matches userlist, unbanning $_banuhost on $_banchan - ^mode $_bantemp3 -b $3 - ^mode $_bantemp3 -o $_obannick;clean _banline - ^notice $_obannick banned protected usermask $3 on $_bantemp3 - - } - - + ^local _bantemp2 $word(0 $_bantemp1) + ^local _bantemp3 $word(1 $_bantemp1) + ^local _bantemp4 $sar(g/,/ /$word(2 $_bantemp1)) + if (ischanop($N $_bantemp3) && match($_banchan $_bantemp3) > 0 && match(unban $_bantemp4) > 0 && comatch($_bantemp2 $_banuhost)) { + aecho $acban %K[%na+c%K]%n $_banuhost%K!%n$_banhost matches userlist, unbanning $_banuhost on $_banchan + ^mode $_bantemp3 -b $3 + ^mode $_bantemp3 -o $_obannick;clean _banline + ^notice $_obannick banned protected usermask $3 on $_bantemp3 + } } } diff -aruN amn.orig/modules/vanilla/vanilla.m amn/modules/vanilla/vanilla.m --- amn.orig/modules/vanilla/vanilla.m Mon Oct 10 16:54:06 2005 +++ amn/modules/vanilla/vanilla.m Thu Oct 20 19:17:48 2005 @@ -12,3 +12,5 @@ window -1 level ALL alias echo xecho -v $* + +set clock_24hour on Date: Thu, 20 Oct 2005 20:53:40 -0400 (EDT) From: zak@ircii.org (Zak) -some minor changes removal of duplicate vars in themes. -second major release should be synched to www in 10mins or so. -read the doc/CHANGES.rel to see all the changes since our last release. -enjoy. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Oct 20 19:26:05 2005 +++ amn/CHANGES Thu Oct 20 20:37:29 2005 @@ -1,280 +1,4 @@ for further CHANGES info please read the docs/CHANGES.rel. -Changes since amnesiac1.1/r1 -9.2.05 --fix some nonexistents defaults sets for formats from violence. -and merge into 1.1/r1 release -9.3.05 --patch vanilla theme from skullY --couple new arrays from skullY --update some broken themes to make them work again. --update epic theme to be more correct. --merged the above changes into release. +no changes since 1.2/r1 yet. --snapshot. --change ver to 1.1d r/1 d for development r releasenum. --add services module for dalnet users. --add nickserv/chanserv/memoserv aliases into core. --add some more oper aliases into oper.m --remove serviceshelp and services.m file from pasture as i rewrote it - to work again 'i think' and merged back it into modules. --new menu help /svhelp for the services module see /ehelp for info. --clean up unused cruft in /ehelp while in there. --update TODO-BUGS doc and UPGRADE. --two new aliases for output_rewrite formatting so ppl can choose which one -they want, i do not know how well the /orww (the one i currently use) works -but no problems so far the default has been /orw for the past 6 months. -aliases are /orw and /orww --remove igsave.m and move the contents into save.m i have no idea why - this was not done in the first place. --new menu help /mhelp for modules see /ehelp for info. --remove more cruft from ahelp. --add breset alias which does /binds -defaults, in case you fsck something - up when trying to play around with keybinds this well set it back to - epic defaults not amnesiac default /adump or reload script to bring all - the keybindings back the way they were. i do not beleive /dump all dumps - keybindings. (i could be wrong) --enable timestamps for server hooks on connect so it doesn't get confusing - on the formatting output with some banners/nostamps etc.. --silence 'end of motd' crap on /motd or when connecting to a server. --add more connect hooks for opers/spoofs/exempts. etc.. --update development rel var. -9.4.05 --add alias s [window swap $*] so you can swap to specified num ie: /s 4 --remove dccwin alias, i doubt anyone is going to miss this. -9.5.05 --add a new /ghelp for GENERAL USER HELP. mainly to reflect on how to ignore - unignore and some other common things ppl keep bugging me about. - see /ehelp as well for more info. --fix ignore and tig to use real epic refnums. //kreca --added a fix for /ignore to work with the new math parser. Done by skully, - thanks! --minor hack to fix /tig for now. /ignore still has some kinks. //zak --new format by adam, /format 4 (kickformats) thanks!. minor hooking to make - it work by me //zak --couple other formats done by adam as well timestamp/nickform. probably - missed other's to document by him from the patch. -9.8.05 --fix up tig to silence the math_parser warnings for now. //zak --remove ignore compat from compat.m as we do not need this anymore - *hopefully* //zak --cleanup a couple of stupid aliases. (that no one will miss) //zak --zap some whitespaces in mjoin. //zak --more code cleanups. //zak --output linewrap is now enabled per default, i disabled this in the past - because some ppl complain about the trailing space on every line. but it - still ends up using much more space on long txt, to go back to the old - behavior do /orw. (will set a save/toggle or the like in the near future) --move ignore/tig/cig to it's own file ignore.m(core) //zak --add ^Wd bind to next_window requested by Alien88 //zak --increment development rel ver. //zak - -9.9.05 --make sbar #4 look a bit better requested by ryan. //zak --add a /rel alias.. /rel -l to view msgbuf/paste -n for notice -m for - sentmsg's. /rhelp for more info. hope this will make xavier somewhat - happy. //zak --change some formatting in the relay input to make more sense, ie; - hit enter to cancel, so ppl do know they do not have to input anything. - //zak --change /w to /whois to make skullY happy. --merge in all but 1 keybinding in vanilla ^D ^listsplit. to binds.m -9.10.05 --sbar 4 fixup by ryan. -9.14.05 --more formats/fixups by adam, topics/leave/joinforms i think, prolly missed - one, too tired to check ;p //zak -9.16.05 --fix kickform to actually show kicks per default. //zak --update development release version to 4. -[after development release 4] --remove mass.m module create core/channel.m merge a lot of op/channel -aliases from alias.m to channel.m merge stuff from mass.m module into -channel.m as well, this makes much more sense and easier to find said -aliases in future, code cleanups while in these area's. //zak --move bantype/timestamp from alias.m to config.m this is more proper - cleanup/document config.m a little better while in here. //zak --create a more extended explanation of modules /emod. make /vmod output - nicer. yes both are a hack. will make it a bit better in the future. - //zak --merge fake.m into relay.m remove the fake module make fake work better. - revert changes for the 'betterness' for now. //zak --remove some stupid reasons from kick.reasons //zak --finished up /emod //zak --finished up /vmod //zak --sync UPGRADE to reality. --sync NOTES to reality. --sync TODO-BUGS to reality. -Note: PLEASE READ THE UPGRADE FOR REMOVING 2 SAVEFILES BEFORE LOADING. -[increment version to development rel 5] --sync EPIC-BUGS i've ran into, and document it more thoroughly. - -9.18.05 --create core/dcc.m (since we've been making a lot of dcc stuff lately) - sync bindctl for dcc to reality, move dcc aliases from alias.m to dcc.m //zak --add a dcchelp menu. /dcchelp see /ehelp as well. //zak --mention dcchelp on startup. //zak --add ryan to teh greets, as he has helped out. //zak --sync TODO-BUGS list to reality //zak - -9.20.05 --fix binding of alt-r alt-t the old way for now. //zak -9.24.05 --sync E5-KNOWNBUGS to reality. //zak - -9.30.05 --change topic formats to be like how ryan likes it, and i think i prefer - the green over the magenta myself as well, and ripped it from him without - his knowledge ;D //zak --sync E5-KNOWNBUGS document from -HEAD. //zak --add help menu! /fhelp format/look and feel help see /ehelp and - /fhelp. //zak --add help menu! /chelp configuration shortcuts see /ehelp and /chelp //zak --add more material into /ghelp general user help. see /ghelp //zak --fix a couple of broken aliases, remove a few nonessential aliases //zak --remove a lot more stuff from compat.m hopefully i didn't break anything - the less stuff i need to rely on from builtins/compat etc.. the - happier i am. //zak --increment development version to 1.1d r/6 //zak - -10.02.05 --Make /dns output look nicer //kreca --Make window doubles automatic depending on what statbar we use //kreca --Add a save toggle and /config option as well as /dstat alias to manually - choose fixed window doubles on overiding the default statbar setting if - needed //zak --fix one missing window double i saw. //zak --sync TODO-BUGS to reality. //zak --change the UPPERCASE to lowercase of on/off toggles for doubles //zak --remove/change some default sets on startup //zak --increment development version to 1.1d r/7 //zak --fix a couple more hardcoded window doubles in modules. //zak --make /relm -l behave exactly like /relm. Now users with this - defect will be happy *cough* //kreca --make /relsn /relsm /reln etc... also support the -l switch. //zak --massive sync to EPIC-BUGS info. //zak --sync EPIC-BUGS to reality nonblocking dns problem is fixed now //hop --sync E5-KNOWNBUGS from -HEAD //zak --update TODO-BUGS with some requests. //zak --cleanup lusers.m a bit. //zak --remove the ugly /csay /cmsg crap from lsay.m remove lsay module merged - /lsay in with the aol module. one less module with crappy bloated shit. - //zak --sync UPGRADE doc to reality. //zak --sync E5-KNOWNBUGS from -HEAD //zak --update EPIC-BUGS info after having some time to debug the $finditem() problems - this morning a bit. //zak - -10.3.05 --add a BSD like license with a clause.. see COPYRIGHT for info. //zak --add credits in README if i happen to be missing someone or if someone - thinks they should be in the credits drop me an e-mail or msg online. //zak --remove uptime.m merge it into hooks.m //zak --sync most files with the COPYRIGHT info. //zak --some other minor changes. //zak --move UPGRADE into doc/ //zak --move NOTES into doc/ //zak --sync EPIC-BUGS E5-KNOWNBUGS to reality //zak -10.6.05 --sync TODO-BUGS to reality. //zak --sync E5-KNOWNBUGS from -HEAD //zak - -10.7.05 --move client adjustable on both epic4/5 sets to amn/settings for ppl who - wish to edit the file, however will be overriden on new client versions. - //zak --allow usage for ~/.amnrc to prevent amnesiac from overriding users sets. - added a sample.amnrc in docs/ --some cleanups of sets and merged some sets from compat.m to amn.epic which - are epic5 only so users can see what's available (for those who actually - looks at the script) //zak -^^ all of the above was requested by adam@efnet to make the annoying static - that seemingly comes out in txt from his nick stop hopefully ;) --increment development version to .8 probably a release sometime by the - weekend. if all goes ok. seems stable thus far. //zak --sync todo-bugs to reality. //zak - -10.9.05 --Fix output_rewrite rules to not add an extra space at the beginning of - every line. //skullY --vanilla.m: Remove ^W map so switching windows with ^W alone is done quickly. - //skully --Fix some code formatting. //skullY - -10.10.05 --big cleanup to tab.m. Remove old useless crap and insert the msg tab completion into our new switch. the old command_completion is now ripped out since it's marked obsolete and hasnt worked at all in epic5. //kreca --Change all instances of echo to //echo, to allow echo to be aliased. //skullY --vanilla.m: alias echo to output to the current window. //skullY --audit all uses of xecho -v. Should only be used on things that really need - to goto the current window. Users that use window level none everywhere won't - notice any difference. //skullY --resync to tree, i presume this is skullY's latest or 'tried to commit' //zak --fix dating format. //zak --fix scan.2 format to output much nicer and proper like it used to - thanks to criminal //zak --set indenting OFF, i do not know why this was ever on or needed to be - on in the first place if anyone notices something breaks let me know - this should get rid of the trailing whitespace at the beginning. - and fixing the output_rewrite to actually do what it should do right. //zak --increment development version to 9. might actually be getting close to - a release now after we decide the politics of what we're going to do about - some questionable skullyisms. //zak --minor nits to TODO-BUGS. //zak --Replace a bunch of xecho -b's with xecho $acban. Should make it easier to - change the banner for script related stuff and still let you see when a - message is from a script or a client, if you want that. //skullY --Add acban to the asave alias, so it's saved. //skullY --dict.m: Redo using dcc ram instead of telnet. It's portable and more - reliable. //skullY --sync TODO-BUGS to reality. //zak --minor -on to name change request in README //zak --remove the old /orw /orww sillyness. just use /set indent on - if you really really really want to //zak --Add a new module, tc. Tabkey /msg handler from epic. //skullY - -10.11.05 --make a few changes to dict.m. Dont use wait instead do everything in on handlers + use serials. //kreca --Add formats for all aspects of topics. No new set for it, but /format n will - set them. //skullY --bump development version up to 10 this may be the final development version - before the next release everything seems to be set how i like it thus far - just needs testing from users now ;) //zak. --do not use doublestat of fixed-sized msgwin noticed by Alien88 //zak - -10.12.05 --merge in the following changes from a patch trent(criminal) sent to me. - minor cosmetics fix to whois.2 - add scan.7 whois.7 (slightly modified copies of others) //trent - -10.18.05 --add /wi support to tabkey from kreca //zak --add /m /msg support but not cyclable by me *gulp* //zak -^^ might break some things as kreca does some really CONFUSING things -to tab.m... due to my lack of sleep or quite possibly i might see duplicate -edit_topic code that's conflicting from exec.m and tab.m want to check it -out kreca? (i'm clearly dreaming here since i [insert kreca do/check -something over here] ) //zak --add 2 aliases for Xavier //zak --fix scan.2 by ryan //zak --revert the /m /msg changes from tab.m i'll keep it in my tree to stop kreca - from acting like a little $#!@@#$!@#$ //zak - -10.19.05 --add some reasons/modifications by trent(criminal) to emopart.reasons. //zak --add a better query alias requested by xavier //zak --freeze tree until thurs. //zak --set default and some other popular themes to use the action format which - supports /me output in multiple channels in same window. //zak - -10.20.05 --set stat.11 to use doublestats for the time being, so people don't get - confused with [opervision] //zak --userlist.m: Allow users to specify * as a channel name for the userlist. - Fix the formatting while I'm there. //skullY --userlist.m: Allow users to specify * as a channel name for the userlist. - Fix the formatting while I'm there. //skullY --move script echo;s/parses to amn.epic to load before it loads the banners. - as the output that should come out on startup shows a missing //echo. - this should fix the case of the MISSING OUTPUT. //zak --try to center the amn.load banner using WHITESPACES, since for some reason - $_center went berserk or doesn't load on time. //zak diff -aruN amn.orig/EPIC-BUGS amn/EPIC-BUGS --- amn.orig/EPIC-BUGS Mon Oct 3 22:11:06 2005 +++ amn/EPIC-BUGS Thu Oct 20 20:38:57 2005 @@ -14,59 +14,10 @@ release: 20050420) the problem appears to have started shortly after the release ^^ talked to hop about this on 10.2.05 -FIXED in com id 3000. - 23:57|(hop!jnelson@epic.user) this panic you've reported here, is - unquestionably a bug with the nonblocking dns stuff (rather than any - particular problem with getaddrinfo...) - 23:57|(hop!jnelson@epic.user) and nonblocking dns is the new feature in -0.0.6 , of course. --> about a error msg if i have seen. - 00:01|-> (hop) yep requested 8 bytes or something and got 1 - 00:01|(hop!jnelson@epic.user) oh! well, that would cause the crash then. - 00:01|(hop!jnelson@epic.user) that's one of the things i haven't yet -finished implementing. - 00:02|(hop!jnelson@epic.user) ok. well, fair enough. i'm glad i asked. - 00:02|(hop!jnelson@epic.user) see, let me tell you what is the problem. - 00:02|(hop!jnelson@epic.user) it's really simple to conceptualize, but it's -a challenge to implement (icky) - 00:02|(hop!jnelson@epic.user) when i do a getaddrinfo(), getaddrinfo() - mallocs of memory, and puts it in many different addresses - 00:03|(hop!jnelson@epic.user) but my task is to copy it into one big buffer - that i can send over a socket, that allows me to do nonblocking dns -lookups. - 00:03|(hop!jnelson@epic.user) so i send two pieces of information -- "how -big is the data i am sending" and then the data itself. - 00:03|(hop!jnelson@epic.user) now i wrote the code, as a proof of concept, - and didn't owry about what would happen if the "how big is the data iam - sending?" data didn't get transferred all at once - 00:04|(hop!jnelson@epic.user) rather, i just write() it and read() it and -if there is a shortage (ie, 1 byte read instead of 8) i jsut put out the - debugging message, and then i'd deal with that later. - 00:04|(hop!jnelson@epic.user) and you, unfortunately. :/ have been bit by - that. - 00:04|(hop!jnelson@epic.user) therefore, i shall make it a high priority to - finish that part of the code right away, so you can continue testing. =) -^^ FIXED. ircII EPIC5-0.0.6 (Commit id: 1292) (Date of release: 20050809) FIXED: 10.3.05 ircII EPIC5-0.0.6 (Commit id: 1302) (Date of release: 20050809) - 21:22|(hop!jnelson@epic.user) the karll array stuff rqeuires a call to - qsort() occasionally, and qsort()'s 3rd argument asks how big each item in - the array is. - 21:22|(hop!jnelson@epic.user) so we passed sizeof(long *) to qsort - 21:22|(hop!jnelson@epic.user) but in the qsort callback function, we were - casting the argument to (int *) and not (long *) - 21:23|(hop!jnelson@epic.user) this caused the qsort callback to do -incorrect comparisons - 21:23|(hop!jnelson@epic.user) the reason this doesn't come up in amd64 is - because sparc is big endian and amd64, like all pc's, is little endian - 21:23|(hop!jnelson@epic.user) for example, if i have 4 and 8 byte integers, - and i assign 10 to each of them - 21:23|(hop!jnelson@epic.user) on amd64, it is 10 00 00 00 [00 00 00 00] - 21:23|(hop!jnelson@epic.user) so whether i cast it to (long *) or (int *) i - still get 10 - 21:24|(hop!jnelson@epic.user) but on sparc, it's [00 00 00 00] 00 00 00 10 - 21:24|(hop!jnelson@epic.user) so if i cast to (int *), i get 0! and if i -finditem() seems to be broken, however the behavior seems hard to reproduce among the different commit id and release versions of epic5, sample code diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Wed Oct 19 01:16:10 2005 +++ amn/core/sets.m Thu Oct 20 20:40:57 2005 @@ -39,9 +39,9 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[10] -@a.rel=[1.1d r/$rel_id] -@a.date=[20050903] +@rel_id=[1] +@a.rel=[1.2 r/$rel_id] +@a.date=[20051020] @_ss=[15] @_ovsize=[5] @_ovmode=[fibxwzZsy] diff -aruN amn.orig/docs/CHANGES.rel amn/docs/CHANGES.rel --- amn.orig/docs/CHANGES.rel Fri Sep 2 22:58:24 2005 +++ amn/docs/CHANGES.rel Thu Oct 20 20:47:58 2005 @@ -261,3 +261,287 @@ -update bwhelp documentation to reality. //zak -remove 3 files from pasture action.orig and action.dcc as well as notify.m //zak FIRST public stable release 1.1 + +changes since first public stable release 1.1 + +Changes since amnesiac1.1/r1 +9.2.05 +-fix some nonexistents defaults sets for formats from violence. +and merge into 1.1/r1 release +9.3.05 +-patch vanilla theme from skullY +-couple new arrays from skullY +-update some broken themes to make them work again. +-update epic theme to be more correct. +-merged the above changes into release. + +-snapshot. +-change ver to 1.1d r/1 d for development r releasenum. +-add services module for dalnet users. +-add nickserv/chanserv/memoserv aliases into core. +-add some more oper aliases into oper.m +-remove serviceshelp and services.m file from pasture as i rewrote it + to work again 'i think' and merged back it into modules. +-new menu help /svhelp for the services module see /ehelp for info. +-clean up unused cruft in /ehelp while in there. +-update TODO-BUGS doc and UPGRADE. +-two new aliases for output_rewrite formatting so ppl can choose which one +they want, i do not know how well the /orww (the one i currently use) works +but no problems so far the default has been /orw for the past 6 months. +aliases are /orw and /orww +-remove igsave.m and move the contents into save.m i have no idea why + this was not done in the first place. +-new menu help /mhelp for modules see /ehelp for info. +-remove more cruft from ahelp. +-add breset alias which does /binds -defaults, in case you fsck something + up when trying to play around with keybinds this well set it back to + epic defaults not amnesiac default /adump or reload script to bring all + the keybindings back the way they were. i do not beleive /dump all dumps + keybindings. (i could be wrong) +-enable timestamps for server hooks on connect so it doesn't get confusing + on the formatting output with some banners/nostamps etc.. +-silence 'end of motd' crap on /motd or when connecting to a server. +-add more connect hooks for opers/spoofs/exempts. etc.. +-update development rel var. +9.4.05 +-add alias s [window swap $*] so you can swap to specified num ie: /s 4 +-remove dccwin alias, i doubt anyone is going to miss this. +9.5.05 +-add a new /ghelp for GENERAL USER HELP. mainly to reflect on how to ignore + unignore and some other common things ppl keep bugging me about. + see /ehelp as well for more info. +-fix ignore and tig to use real epic refnums. //kreca +-added a fix for /ignore to work with the new math parser. Done by skully, + thanks! +-minor hack to fix /tig for now. /ignore still has some kinks. //zak +-new format by adam, /format 4 (kickformats) thanks!. minor hooking to make + it work by me //zak +-couple other formats done by adam as well timestamp/nickform. probably + missed other's to document by him from the patch. +9.8.05 +-fix up tig to silence the math_parser warnings for now. //zak +-remove ignore compat from compat.m as we do not need this anymore + *hopefully* //zak +-cleanup a couple of stupid aliases. (that no one will miss) //zak +-zap some whitespaces in mjoin. //zak +-more code cleanups. //zak +-output linewrap is now enabled per default, i disabled this in the past + because some ppl complain about the trailing space on every line. but it + still ends up using much more space on long txt, to go back to the old + behavior do /orw. (will set a save/toggle or the like in the near future) +-move ignore/tig/cig to it's own file ignore.m(core) //zak +-add ^Wd bind to next_window requested by Alien88 //zak +-increment development rel ver. //zak + +9.9.05 +-make sbar #4 look a bit better requested by ryan. //zak +-add a /rel alias.. /rel -l to view msgbuf/paste -n for notice -m for + sentmsg's. /rhelp for more info. hope this will make xavier somewhat + happy. //zak +-change some formatting in the relay input to make more sense, ie; + hit enter to cancel, so ppl do know they do not have to input anything. + //zak +-change /w to /whois to make skullY happy. +-merge in all but 1 keybinding in vanilla ^D ^listsplit. to binds.m +9.10.05 +-sbar 4 fixup by ryan. +9.14.05 +-more formats/fixups by adam, topics/leave/joinforms i think, prolly missed + one, too tired to check ;p //zak +9.16.05 +-fix kickform to actually show kicks per default. //zak +-update development release version to 4. +[after development release 4] +-remove mass.m module create core/channel.m merge a lot of op/channel +aliases from alias.m to channel.m merge stuff from mass.m module into +channel.m as well, this makes much more sense and easier to find said +aliases in future, code cleanups while in these area's. //zak +-move bantype/timestamp from alias.m to config.m this is more proper + cleanup/document config.m a little better while in here. //zak +-create a more extended explanation of modules /emod. make /vmod output + nicer. yes both are a hack. will make it a bit better in the future. + //zak +-merge fake.m into relay.m remove the fake module make fake work better. + revert changes for the 'betterness' for now. //zak +-remove some stupid reasons from kick.reasons //zak +-finished up /emod //zak +-finished up /vmod //zak +-sync UPGRADE to reality. +-sync NOTES to reality. +-sync TODO-BUGS to reality. +Note: PLEASE READ THE UPGRADE FOR REMOVING 2 SAVEFILES BEFORE LOADING. +[increment version to development rel 5] +-sync EPIC-BUGS i've ran into, and document it more thoroughly. + +9.18.05 +-create core/dcc.m (since we've been making a lot of dcc stuff lately) + sync bindctl for dcc to reality, move dcc aliases from alias.m to dcc.m //zak +-add a dcchelp menu. /dcchelp see /ehelp as well. //zak +-mention dcchelp on startup. //zak +-add ryan to teh greets, as he has helped out. //zak +-sync TODO-BUGS list to reality //zak + +9.20.05 +-fix binding of alt-r alt-t the old way for now. //zak +9.24.05 +-sync E5-KNOWNBUGS to reality. //zak + +9.30.05 +-change topic formats to be like how ryan likes it, and i think i prefer + the green over the magenta myself as well, and ripped it from him without + his knowledge ;D //zak +-sync E5-KNOWNBUGS document from -HEAD. //zak +-add help menu! /fhelp format/look and feel help see /ehelp and + /fhelp. //zak +-add help menu! /chelp configuration shortcuts see /ehelp and /chelp //zak +-add more material into /ghelp general user help. see /ghelp //zak +-fix a couple of broken aliases, remove a few nonessential aliases //zak +-remove a lot more stuff from compat.m hopefully i didn't break anything + the less stuff i need to rely on from builtins/compat etc.. the + happier i am. //zak +-increment development version to 1.1d r/6 //zak + +10.02.05 +-Make /dns output look nicer //kreca +-Make window doubles automatic depending on what statbar we use //kreca +-Add a save toggle and /config option as well as /dstat alias to manually + choose fixed window doubles on overiding the default statbar setting if + needed //zak +-fix one missing window double i saw. //zak +-sync TODO-BUGS to reality. //zak +-change the UPPERCASE to lowercase of on/off toggles for doubles //zak +-remove/change some default sets on startup //zak +-increment development version to 1.1d r/7 //zak +-fix a couple more hardcoded window doubles in modules. //zak +-make /relm -l behave exactly like /relm. Now users with this + defect will be happy *cough* //kreca +-make /relsn /relsm /reln etc... also support the -l switch. //zak +-massive sync to EPIC-BUGS info. //zak +-sync EPIC-BUGS to reality nonblocking dns problem is fixed now //hop +-sync E5-KNOWNBUGS from -HEAD //zak +-update TODO-BUGS with some requests. //zak +-cleanup lusers.m a bit. //zak +-remove the ugly /csay /cmsg crap from lsay.m remove lsay module merged + /lsay in with the aol module. one less module with crappy bloated shit. + //zak +-sync UPGRADE doc to reality. //zak +-sync E5-KNOWNBUGS from -HEAD //zak +-update EPIC-BUGS info after having some time to debug the $finditem() problems + this morning a bit. //zak + +10.3.05 +-add a BSD like license with a clause.. see COPYRIGHT for info. //zak +-add credits in README if i happen to be missing someone or if someone + thinks they should be in the credits drop me an e-mail or msg online. //zak +-remove uptime.m merge it into hooks.m //zak +-sync most files with the COPYRIGHT info. //zak +-some other minor changes. //zak +-move UPGRADE into doc/ //zak +-move NOTES into doc/ //zak +-sync EPIC-BUGS E5-KNOWNBUGS to reality //zak +10.6.05 +-sync TODO-BUGS to reality. //zak +-sync E5-KNOWNBUGS from -HEAD //zak + +10.7.05 +-move client adjustable on both epic4/5 sets to amn/settings for ppl who + wish to edit the file, however will be overriden on new client versions. + //zak +-allow usage for ~/.amnrc to prevent amnesiac from overriding users sets. + added a sample.amnrc in docs/ +-some cleanups of sets and merged some sets from compat.m to amn.epic which + are epic5 only so users can see what's available (for those who actually + looks at the script) //zak +^^ all of the above was requested by adam@efnet to make the annoying static + that seemingly comes out in txt from his nick stop hopefully ;) +-increment development version to .8 probably a release sometime by the + weekend. if all goes ok. seems stable thus far. //zak +-sync todo-bugs to reality. //zak + +10.9.05 +-Fix output_rewrite rules to not add an extra space at the beginning of + every line. //skullY +-vanilla.m: Remove ^W map so switching windows with ^W alone is done quickly. + //skully +-Fix some code formatting. //skullY + +10.10.05 +-big cleanup to tab.m. Remove old useless crap and insert the msg tab completion into our new switch. the old command_completion is now ripped out since it's marked obsolete and hasnt worked at all in epic5. //kreca +-Change all instances of echo to //echo, to allow echo to be aliased. //skullY +-vanilla.m: alias echo to output to the current window. //skullY +-audit all uses of xecho -v. Should only be used on things that really need + to goto the current window. Users that use window level none everywhere won't + notice any difference. //skullY +-resync to tree, i presume this is skullY's latest or 'tried to commit' //zak +-fix dating format. //zak +-fix scan.2 format to output much nicer and proper like it used to + thanks to criminal //zak +-set indenting OFF, i do not know why this was ever on or needed to be + on in the first place if anyone notices something breaks let me know + this should get rid of the trailing whitespace at the beginning. + and fixing the output_rewrite to actually do what it should do right. //zak +-increment development version to 9. might actually be getting close to + a release now after we decide the politics of what we're going to do about + some questionable skullyisms. //zak +-minor nits to TODO-BUGS. //zak +-Replace a bunch of xecho -b's with xecho $acban. Should make it easier to + change the banner for script related stuff and still let you see when a + message is from a script or a client, if you want that. //skullY +-Add acban to the asave alias, so it's saved. //skullY +-dict.m: Redo using dcc ram instead of telnet. It's portable and more + reliable. //skullY +-sync TODO-BUGS to reality. //zak +-minor -on to name change request in README //zak +-remove the old /orw /orww sillyness. just use /set indent on + if you really really really want to //zak +-Add a new module, tc. Tabkey /msg handler from epic. //skullY + +10.11.05 +-make a few changes to dict.m. Dont use wait instead do everything in on handlers + use serials. //kreca +-Add formats for all aspects of topics. No new set for it, but /format n will + set them. //skullY +-bump development version up to 10 this may be the final development version + before the next release everything seems to be set how i like it thus far + just needs testing from users now ;) //zak. +-do not use doublestat of fixed-sized msgwin noticed by Alien88 //zak + +10.12.05 +-merge in the following changes from a patch trent(criminal) sent to me. + minor cosmetics fix to whois.2 + add scan.7 whois.7 (slightly modified copies of others) //trent + +10.18.05 +-add /wi support to tabkey from kreca //zak +-add /m /msg support but not cyclable by me *gulp* //zak +^^ might break some things as kreca does some really CONFUSING things +to tab.m... due to my lack of sleep or quite possibly i might see duplicate +edit_topic code that's conflicting from exec.m and tab.m want to check it +out kreca? (i'm clearly dreaming here since i [insert kreca do/check +something over here] ) //zak +-add 2 aliases for Xavier //zak +-fix scan.2 by ryan //zak +-revert the /m /msg changes from tab.m i'll keep it in my tree to stop kreca + from acting like a little $#!@@#$!@#$ //zak + +10.19.05 +-add some reasons/modifications by trent(criminal) to emopart.reasons. //zak +-add a better query alias requested by xavier //zak +-freeze tree until thurs. //zak +-set default and some other popular themes to use the action format which + supports /me output in multiple channels in same window. //zak + +10.20.05 +-set stat.11 to use doublestats for the time being, so people don't get + confused with [opervision] //zak +-userlist.m: Allow users to specify * as a channel name for the userlist. + Fix the formatting while I'm there. //skullY +-move script echo;s/parses to amn.epic to load before it loads the banners. + as the output that should come out on startup shows a missing //echo. + this should fix the case of the MISSING OUTPUT. //zak +-try to center the amn.load banner using WHITESPACES, since for some reason + $_center went berserk or doesn't load on time. //zak +-remove duplicate vars from themes, and set some more themes to use the + better actform[2]. //zak +-change version for 1.2 release 1. yes it's finally a release! //zak +-sync CHANGES.rel to proper and create a new CHANGES file. +-shrink EPIC-BUGS info as .7 is rolling out today/tomorrow as well. //zak diff -aruN amn.orig/docs/NOTES amn/docs/NOTES --- amn.orig/docs/NOTES Fri Sep 16 19:20:35 2005 +++ amn/docs/NOTES Thu Oct 20 20:46:41 2005 @@ -35,18 +35,16 @@ from someone and others who want's it at beginning of next line, to adjust the value for your choice of poison. -/set output_rewrite output_rewrite $_paste($1-)$1- +## indenting output. (output_rewrite) info. [sample long txt output] <-- this sample is non-default 17:24:16|<@crapple> i wonder if i should test out the aggressive states on nocturnal -/set output_rewrite output_rewrite $_paste($1-) $1- [sample long txt output with wrapping to beginning of line] <-- default. 17:24:16|<@crapple> i wonder if i should test out the aggressive states on nocturnal note: this will also wrap other formats as well ie: private msg. -/orw - indenting, non-default as of 9.8.05 -/orww - extended with wrappings. -default behavior. +/set indent on if you wish to go back to the old behavior. ## end output_rewrite formatting note. //crapple diff -aruN amn.orig/docs/UPGRADE amn/docs/UPGRADE --- amn.orig/docs/UPGRADE Sun Oct 2 13:38:22 2005 +++ amn/docs/UPGRADE Thu Oct 20 20:44:12 2005 @@ -8,16 +8,13 @@ about their irc client uptimes *ahem*) ## upgrade info -## any to 1.1d r/* (in theory) +## any to 1.2 r/1 (in theory) rm -rf /path/to/amn rm -rf ~/.amn/.mod.save rm -rf ~/.amn/.a.fsetsave - -## 1.1d r/5 > r/7 -rm -rf /path/to/amn -rm -rf ~/.amn/.mod.save tar zxvf newver.tgz (in your home dir or dir you want it) or tar zxvf newver.tgz -C /path/to/where/you/want/it lastly + /adump (in the client) diff -aruN amn.orig/themes/amnesiac.th amn/themes/amnesiac.th --- amn.orig/themes/amnesiac.th Wed Oct 19 01:20:36 2005 +++ amn/themes/amnesiac.th Thu Oct 20 20:16:25 2005 @@ -32,10 +32,8 @@ @bwallform=2 @awayform=7 @actform=2 -@actform=2 @descform=1 @sdescform=1 -@actform=2 @statbar=[stat.5] @_whois=[2] @c1=[ diff -aruN amn.orig/themes/bitchx.th amn/themes/bitchx.th --- amn.orig/themes/bitchx.th Tue Oct 11 15:01:11 2005 +++ amn/themes/bitchx.th Thu Oct 20 20:16:54 2005 @@ -32,10 +32,8 @@ @bwallform=4 @awayform=10 @actform=2 -@actform=2 @descform=2 @sdescform=2 -@actform=2 @statbar=[stat.3] @_whois=[6] @c1=[ diff -aruN amn.orig/themes/channel.th amn/themes/channel.th --- amn.orig/themes/channel.th Tue Oct 11 15:01:21 2005 +++ amn/themes/channel.th Thu Oct 20 20:17:18 2005 @@ -32,10 +32,8 @@ @bwallform=2 @awayform=7 @actform=1 -@actform=1 @descform=1 @sdescform=1 -@actform=1 @statbar=[stat.5] @c1=[$(cyn) @c2=[$(hcyn) diff -aruN amn.orig/themes/chloro.th amn/themes/chloro.th --- amn.orig/themes/chloro.th Wed Oct 19 01:18:16 2005 +++ amn/themes/chloro.th Thu Oct 20 20:18:19 2005 @@ -32,10 +32,8 @@ @bwallform=1 @awayform=1 @actform=2 -@actform=2 @descform=2 @sdescform=2 -@actform=2 @statbar=[stat.9] @c1=[$(grn) @c2=[$(hgrn) diff -aruN amn.orig/themes/cl.th amn/themes/cl.th --- amn.orig/themes/cl.th Tue Oct 11 15:01:44 2005 +++ amn/themes/cl.th Thu Oct 20 20:19:49 2005 @@ -32,10 +32,8 @@ @bwallform=10 @awayform=2 @actform=2 -@actform=2 @descform=1 @sdescform=1 -@actform=2 @statbar=[stat.5] @c1=[$(cyn) @c2=[$(hcyn) diff -aruN amn.orig/themes/cyan.th amn/themes/cyan.th --- amn.orig/themes/cyan.th Wed Oct 19 01:20:11 2005 +++ amn/themes/cyan.th Thu Oct 20 20:20:07 2005 @@ -32,10 +32,8 @@ @bwallform=2 @awayform=4 @actform=2 -@actform=2 @descform=1 @sdescform=1 -@actform=2 @statbar=[stat.1] @c1=[$(cyn) @c2=[$(hcyn) diff -aruN amn.orig/themes/dark.th amn/themes/dark.th --- amn.orig/themes/dark.th Tue Oct 11 15:03:42 2005 +++ amn/themes/dark.th Thu Oct 20 20:20:34 2005 @@ -32,10 +32,8 @@ @bwallform=2 @awayform=4 @actform=1 -@actform=1 @descform=1 @sdescform=1 -@actform=1 @statbar=[stat.1] @c1=[$(blu) @c2=[$(hblu) diff -aruN amn.orig/themes/darkgrey.th amn/themes/darkgrey.th --- amn.orig/themes/darkgrey.th Tue Oct 11 15:03:51 2005 +++ amn/themes/darkgrey.th Thu Oct 20 20:21:05 2005 @@ -32,10 +32,8 @@ @bwallform=2 @awayform=4 @actform=1 -@actform=1 @descform=1 @sdescform=1 -@actform=1 @statbar=[stat.5] @c1=[$(hwht) @c2=[$(hblk) diff -aruN amn.orig/themes/dead.th amn/themes/dead.th --- amn.orig/themes/dead.th Tue Oct 11 15:04:01 2005 +++ amn/themes/dead.th Thu Oct 20 20:21:37 2005 @@ -31,11 +31,9 @@ @wallform = [2] @bwallform=2 @awayform=1 -@actform=1 -@actform=1 +@actform=2 @descform=1 @sdescform=1 -@actform=1 @statbar=[stat.4] @c1=[$(hblk) @c2=[$(hblk) diff -aruN amn.orig/themes/delusion.th amn/themes/delusion.th --- amn.orig/themes/delusion.th Tue Oct 11 15:04:08 2005 +++ amn/themes/delusion.th Thu Oct 20 20:21:54 2005 @@ -35,7 +35,7 @@ @actform=1 @descform=1 @sdescform=1 -@actform=1 +@actform=2 @statbar=[stat.2] @c1=[$(blu) @c2=[$(hblu) diff -aruN amn.orig/themes/electrical.th amn/themes/electrical.th --- amn.orig/themes/electrical.th Tue Oct 11 15:04:16 2005 +++ amn/themes/electrical.th Thu Oct 20 20:22:21 2005 @@ -31,11 +31,9 @@ @wallform = [9] @bwallform=9 @awayform=1 -@actform=1 -@actform=1 +@actform=2 @descform=1 @sdescform=1 -@actform=1 @statbar=[stat.2] @c1=[$(mag) @c2=[$(hmag) diff -aruN amn.orig/themes/elektra.th amn/themes/elektra.th --- amn.orig/themes/elektra.th Wed Oct 19 01:18:45 2005 +++ amn/themes/elektra.th Thu Oct 20 20:22:40 2005 @@ -32,10 +32,8 @@ @bwallform=2 @awayform=4 @actform=2 -@actform=2 @descform=2 @sdescform=2 -@actform=2 @statbar=[stat.2] @c1=[$(cyn) @c2=[$(hcyn) diff -aruN amn.orig/themes/epic.th amn/themes/epic.th --- amn.orig/themes/epic.th Wed Oct 19 01:19:30 2005 +++ amn/themes/epic.th Thu Oct 20 20:22:59 2005 @@ -32,10 +32,8 @@ @bwallform=2 @awayform=9 @actform=2 -@actform=2 @descform=2 @sdescform=2 -@actform=2 @statbar=[stat.11] @_whois=4 @c1=[ diff -aruN amn.orig/themes/faceted.th amn/themes/faceted.th --- amn.orig/themes/faceted.th Tue Oct 11 15:04:39 2005 +++ amn/themes/faceted.th Thu Oct 20 20:23:20 2005 @@ -31,11 +31,9 @@ @wallform = [9] @bwallform=9 @awayform=7 -@actform=1 -@actform=1 +@actform=2 @descform=1 @sdescform=1 -@actform=1 @statbar=[stat.12] @_whois=[1] @c1=[ diff -aruN amn.orig/themes/flying.th amn/themes/flying.th --- amn.orig/themes/flying.th Tue Oct 11 15:04:45 2005 +++ amn/themes/flying.th Thu Oct 20 20:23:38 2005 @@ -31,11 +31,9 @@ @wallform = [9] @bwallform=9 @awayform=1 -@actform=1 -@actform=1 -@descform=1 -@sdescform=1 -@actform=1 +@actform=2 +@descform=2 +@sdescform=2 @statbar=[stat.1] @c1=[$(cyn) @c2=[$(hcyn) diff -aruN amn.orig/themes/fresh.th amn/themes/fresh.th --- amn.orig/themes/fresh.th Tue Oct 11 15:04:51 2005 +++ amn/themes/fresh.th Thu Oct 20 20:24:00 2005 @@ -31,11 +31,9 @@ @wallform = [8] @bwallform=8 @awayform=4 -@actform=1 -@actform=1 -@descform=1 -@sdescform=1 -@actform=1 +@actform=2 +@descform=2 +@sdescform=2 @statbar=[stat.4] @c1=[$(hcyn) @c2=[$(cyn) diff -aruN amn.orig/themes/girlies.th amn/themes/girlies.th --- amn.orig/themes/girlies.th Tue Oct 11 15:04:58 2005 +++ amn/themes/girlies.th Thu Oct 20 20:24:25 2005 @@ -31,11 +31,9 @@ @wallform = [2] @bwallform=2 @awayform=4 -@actform=1 -@actform=1 -@descform=1 -@sdescform=1 -@actform=1 +@actform=2 +@descform=2 +@sdescform=2 @statbar=[stat.6] @c1=[$(mag) @c2=[$(hmag) diff -aruN amn.orig/themes/greenhouse.th amn/themes/greenhouse.th --- amn.orig/themes/greenhouse.th Wed Oct 19 01:21:01 2005 +++ amn/themes/greenhouse.th Thu Oct 20 20:24:46 2005 @@ -32,10 +32,8 @@ @bwallform=2 @awayform=1 @actform=2 -@actform=2 @descform=1 @sdescform=1 -@actform=2 @statbar=[stat.4] @c1=[$(grn) @c2=[$(hgrn) diff -aruN amn.orig/themes/hellish.th amn/themes/hellish.th --- amn.orig/themes/hellish.th Tue Oct 11 15:05:18 2005 +++ amn/themes/hellish.th Thu Oct 20 20:25:15 2005 @@ -30,11 +30,9 @@ @snf=2 @wallform = [2] @bwallform=2 -@actform=1 -@actform=1 -@descform=1 -@sdescform=1 -@actform=1 +@actform=2 +@descform=2 +@sdescform=2 @statbar=[stat.1] @c1=[$(red) @c2=[$(hred) diff -aruN amn.orig/themes/humble.th amn/themes/humble.th --- amn.orig/themes/humble.th Tue Oct 11 15:05:27 2005 +++ amn/themes/humble.th Thu Oct 20 20:25:36 2005 @@ -31,9 +31,9 @@ @wallform = [2] @bwallform=1 @awayform=4 -@actform=1 -@descform=1 -@sdescform=1 +@actform=2 +@descform=2 +@sdescform=2 @statbar=[stat.10] @c1=[$(hcyn) @c2=[$(hblk) diff -aruN amn.orig/themes/l33t.th amn/themes/l33t.th --- amn.orig/themes/l33t.th Tue Oct 11 15:05:34 2005 +++ amn/themes/l33t.th Thu Oct 20 20:25:56 2005 @@ -31,11 +31,9 @@ @wallform = [1] @bwallform=1 @awayform=8 -@actform=1 -@actform=1 -@descform=1 -@sdescform=1 -@actform=1 +@actform=2 +@descform=2 +@sdescform=2 @statbar=[stat.6] @_whois=[1] @c1=[ diff -aruN amn.orig/themes/p1mpin.th amn/themes/p1mpin.th --- amn.orig/themes/p1mpin.th Tue Oct 11 15:06:01 2005 +++ amn/themes/p1mpin.th Thu Oct 20 20:26:37 2005 @@ -31,11 +31,9 @@ @wallform = [9] @bwallform=9 @awayform=9 -@actform=1 -@actform=1 -@descform=1 -@sdescform=1 -@actform=1 +@actform=2 +@descform=2 +@sdescform=2 @statbar=[stat.5] @_whois=[1] @c1=[ diff -aruN amn.orig/themes/pheer.th amn/themes/pheer.th --- amn.orig/themes/pheer.th Tue Oct 11 15:06:09 2005 +++ amn/themes/pheer.th Thu Oct 20 20:27:03 2005 @@ -31,11 +31,9 @@ @wallform = [8] @bwallform=8 @awayform=1 -@actform=1 -@actform=1 -@descform=1 -@sdescform=1 -@actform=1 +@actform=2 +@descform=2 +@sdescform=2 @statbar=[stat.2] @c1=[$(cyn) @c2=[$(hcyn) diff -aruN amn.orig/themes/reet.th amn/themes/reet.th --- amn.orig/themes/reet.th Tue Oct 11 15:06:17 2005 +++ amn/themes/reet.th Thu Oct 20 20:27:25 2005 @@ -32,7 +32,6 @@ @bwallform=8 @awayform=7 @actform=2 -@actform=2 @descform=1 @sdescform=1 @actform=2 diff -aruN amn.orig/themes/sabbath.th amn/themes/sabbath.th --- amn.orig/themes/sabbath.th Tue Oct 11 15:06:24 2005 +++ amn/themes/sabbath.th Thu Oct 20 20:29:39 2005 @@ -31,11 +31,9 @@ @wallform = [2] @bwallform=2 @awayform=4 -@actform=1 -@actform=1 -@descform=1 -@sdescform=1 -@actform=1 +@actform=2 +@descform=2 +@sdescform=2 @statbar=[stat.9] @_whois=[1] @c1=[ diff -aruN amn.orig/themes/seize.th amn/themes/seize.th --- amn.orig/themes/seize.th Tue Oct 11 15:06:30 2005 +++ amn/themes/seize.th Thu Oct 20 20:30:04 2005 @@ -31,11 +31,9 @@ @wallform = [2] @bwallform=2 @awayform=7 -@actform=1 -@actform=1 +@actform=2 @descform=1 @sdescform=1 -@actform=1 @statbar=[stat.5] @c1=[$(blu) @c2=[$(hblu) diff -aruN amn.orig/themes/wired.th amn/themes/wired.th --- amn.orig/themes/wired.th Tue Oct 11 15:06:49 2005 +++ amn/themes/wired.th Thu Oct 20 20:30:39 2005 @@ -31,11 +31,9 @@ @wallform = [4] @bwallform=4 @awayform=1 -@actform=1 -@actform=1 +@actform=2 @descform=1 @sdescform=1 -@actform=1 @statbar=[stat.1] @c1=[$(mag) @c2=[$(cl) Date: Thu, 20 Oct 2005 21:23:04 -0400 From: Zak just wanted to make note that amnesiac 1.2 r/1 has been released there has been numerous bugfixes, various new formats, code cleanups, tabkey cleanups, among other things since our last public release. url to webpage http://amnesiac.ircii.org download: http://amnesiac.ircii.org/amnesiac1.2r1.tgz please let me know of any bugs/issues. we really should have a Amnesiac FAQ, any volunteers? ;) CHANGES since last release. Changes since amnesiac1.1/r1 9.2.05 -fix some nonexistents defaults sets for formats from violence. and merge into 1.1/r1 release 9.3.05 -patch vanilla theme from skullY -couple new arrays from skullY -update some broken themes to make them work again. -update epic theme to be more correct. -merged the above changes into release. -snapshot. -change ver to 1.1d r/1 d for development r releasenum. -add services module for dalnet users. -add nickserv/chanserv/memoserv aliases into core. -add some more oper aliases into oper.m -remove serviceshelp and services.m file from pasture as i rewrote it to work again 'i think' and merged back it into modules. -new menu help /svhelp for the services module see /ehelp for info. -clean up unused cruft in /ehelp while in there. -update TODO-BUGS doc and UPGRADE. -two new aliases for output_rewrite formatting so ppl can choose which one they want, i do not know how well the /orww (the one i currently use) works but no problems so far the default has been /orw for the past 6 months. aliases are /orw and /orww -remove igsave.m and move the contents into save.m i have no idea why this was not done in the first place. -new menu help /mhelp for modules see /ehelp for info. -remove more cruft from ahelp. -add breset alias which does /binds -defaults, in case you fsck something up when trying to play around with keybinds this well set it back to epic defaults not amnesiac default /adump or reload script to bring all the keybindings back the way they were. i do not beleive /dump all dumps keybindings. (i could be wrong) -enable timestamps for server hooks on connect so it doesn't get confusing on the formatting output with some banners/nostamps etc.. -silence 'end of motd' crap on /motd or when connecting to a server. -add more connect hooks for opers/spoofs/exempts. etc.. -update development rel var. 9.4.05 -add alias s [window swap $*] so you can swap to specified num ie: /s 4 -remove dccwin alias, i doubt anyone is going to miss this. 9.5.05 -add a new /ghelp for GENERAL USER HELP. mainly to reflect on how to ignore unignore and some other common things ppl keep bugging me about. see /ehelp as well for more info. -fix ignore and tig to use real epic refnums. //kreca -added a fix for /ignore to work with the new math parser. Done by skully, thanks! -minor hack to fix /tig for now. /ignore still has some kinks. //zak -new format by adam, /format 4 (kickformats) thanks!. minor hooking to make it work by me //zak -couple other formats done by adam as well timestamp/nickform. probably missed other's to document by him from the patch. 9.8.05 -fix up tig to silence the math_parser warnings for now. //zak -remove ignore compat from compat.m as we do not need this anymore *hopefully* //zak -cleanup a couple of stupid aliases. (that no one will miss) //zak -zap some whitespaces in mjoin. //zak -more code cleanups. //zak -output linewrap is now enabled per default, i disabled this in the past because some ppl complain about the trailing space on every line. but it still ends up using much more space on long txt, to go back to the old behavior do /orw. (will set a save/toggle or the like in the near future) -move ignore/tig/cig to it's own file ignore.m(core) //zak -add ^Wd bind to next_window requested by Alien88 //zak -increment development rel ver. //zak 9.9.05 -make sbar #4 look a bit better requested by ryan. //zak -add a /rel alias.. /rel -l to view msgbuf/paste -n for notice -m for sentmsg's. /rhelp for more info. hope this will make xavier somewhat happy. //zak -change some formatting in the relay input to make more sense, ie; hit enter to cancel, so ppl do know they do not have to input anything. //zak -change /w to /whois to make skullY happy. -merge in all but 1 keybinding in vanilla ^D ^listsplit. to binds.m 9.10.05 -sbar 4 fixup by ryan. 9.14.05 -more formats/fixups by adam, topics/leave/joinforms i think, prolly missed one, too tired to check ;p //zak 9.16.05 -fix kickform to actually show kicks per default. //zak -update development release version to 4. [after development release 4] -remove mass.m module create core/channel.m merge a lot of op/channel aliases from alias.m to channel.m merge stuff from mass.m module into channel.m as well, this makes much more sense and easier to find said aliases in future, code cleanups while in these area's. //zak -move bantype/timestamp from alias.m to config.m this is more proper cleanup/document config.m a little better while in here. //zak -create a more extended explanation of modules /emod. make /vmod output nicer. yes both are a hack. will make it a bit better in the future. //zak -merge fake.m into relay.m remove the fake module make fake work better. revert changes for the 'betterness' for now. //zak -remove some stupid reasons from kick.reasons //zak -finished up /emod //zak -finished up /vmod //zak -sync UPGRADE to reality. -sync NOTES to reality. -sync TODO-BUGS to reality. Note: PLEASE READ THE UPGRADE FOR REMOVING 2 SAVEFILES BEFORE LOADING. [increment version to development rel 5] -sync EPIC-BUGS i've ran into, and document it more thoroughly. 9.18.05 -create core/dcc.m (since we've been making a lot of dcc stuff lately) sync bindctl for dcc to reality, move dcc aliases from alias.m to dcc.m //zak -add a dcchelp menu. /dcchelp see /ehelp as well. //zak -mention dcchelp on startup. //zak -add ryan to teh greets, as he has helped out. //zak -sync TODO-BUGS list to reality //zak 9.20.05 -fix binding of alt-r alt-t the old way for now. //zak 9.24.05 -sync E5-KNOWNBUGS to reality. //zak 9.30.05 -change topic formats to be like how ryan likes it, and i think i prefer the green over the magenta myself as well, and ripped it from him without his knowledge ;D //zak -sync E5-KNOWNBUGS document from -HEAD. //zak -add help menu! /fhelp format/look and feel help see /ehelp and /fhelp. //zak -add help menu! /chelp configuration shortcuts see /ehelp and /chelp //zak -add more material into /ghelp general user help. see /ghelp //zak -fix a couple of broken aliases, remove a few nonessential aliases //zak -remove a lot more stuff from compat.m hopefully i didn't break anything the less stuff i need to rely on from builtins/compat etc.. the happier i am. //zak -increment development version to 1.1d r/6 //zak 10.02.05 -Make /dns output look nicer //kreca -Make window doubles automatic depending on what statbar we use //kreca -Add a save toggle and /config option as well as /dstat alias to manually choose fixed window doubles on overiding the default statbar setting if needed //zak -fix one missing window double i saw. //zak -sync TODO-BUGS to reality. //zak -change the UPPERCASE to lowercase of on/off toggles for doubles //zak -remove/change some default sets on startup //zak -increment development version to 1.1d r/7 //zak -fix a couple more hardcoded window doubles in modules. //zak -make /relm -l behave exactly like /relm. Now users with this defect will be happy *cough* //kreca -make /relsn /relsm /reln etc... also support the -l switch. //zak -massive sync to EPIC-BUGS info. //zak -sync EPIC-BUGS to reality nonblocking dns problem is fixed now //hop -sync E5-KNOWNBUGS from -HEAD //zak -update TODO-BUGS with some requests. //zak -cleanup lusers.m a bit. //zak -remove the ugly /csay /cmsg crap from lsay.m remove lsay module merged /lsay in with the aol module. one less module with crappy bloated shit. //zak -sync UPGRADE doc to reality. //zak -sync E5-KNOWNBUGS from -HEAD //zak -update EPIC-BUGS info after having some time to debug the $finditem() problems this morning a bit. //zak 10.3.05 -add a BSD like license with a clause.. see COPYRIGHT for info. //zak -add credits in README if i happen to be missing someone or if someone thinks they should be in the credits drop me an e-mail or msg online. //zak -remove uptime.m merge it into hooks.m //zak -sync most files with the COPYRIGHT info. //zak -some other minor changes. //zak -move UPGRADE into doc/ //zak -move NOTES into doc/ //zak -sync EPIC-BUGS E5-KNOWNBUGS to reality //zak 10.6.05 -sync TODO-BUGS to reality. //zak -sync E5-KNOWNBUGS from -HEAD //zak 10.7.05 -move client adjustable on both epic4/5 sets to amn/settings for ppl who wish to edit the file, however will be overriden on new client versions. //zak -allow usage for ~/.amnrc to prevent amnesiac from overriding users sets. added a sample.amnrc in docs/ -some cleanups of sets and merged some sets from compat.m to amn.epic which are epic5 only so users can see what's available (for those who actually looks at the script) //zak ^^ all of the above was requested by adam@efnet to make the annoying static that seemingly comes out in txt from his nick stop hopefully ;) -increment development version to .8 probably a release sometime by the weekend. if all goes ok. seems stable thus far. //zak -sync todo-bugs to reality. //zak 10.9.05 -Fix output_rewrite rules to not add an extra space at the beginning of every line. //skullY -vanilla.m: Remove ^W map so switching windows with ^W alone is done quickly. //skully -Fix some code formatting. //skullY 10.10.05 -big cleanup to tab.m. Remove old useless crap and insert the msg tab completion into our new switch. the old command_completion is now ripped out since it's marked obsolete and hasnt worked at all in epic5. //kreca -Change all instances of echo to //echo, to allow echo to be aliased. //skullY -vanilla.m: alias echo to output to the current window. //skullY -audit all uses of xecho -v. Should only be used on things that really need to goto the current window. Users that use window level none everywhere won't notice any difference. //skullY -resync to tree, i presume this is skullY's latest or 'tried to commit' //zak -fix dating format. //zak -fix scan.2 format to output much nicer and proper like it used to thanks to criminal //zak -set indenting OFF, i do not know why this was ever on or needed to be on in the first place if anyone notices something breaks let me know this should get rid of the trailing whitespace at the beginning. and fixing the output_rewrite to actually do what it should do right. //zak -increment development version to 9. might actually be getting close to a release now after we decide the politics of what we're going to do about some questionable skullyisms. //zak -minor nits to TODO-BUGS. //zak -Replace a bunch of xecho -b's with xecho $acban. Should make it easier to change the banner for script related stuff and still let you see when a message is from a script or a client, if you want that. //skullY -Add acban to the asave alias, so it's saved. //skullY -dict.m: Redo using dcc ram instead of telnet. It's portable and more reliable. //skullY -sync TODO-BUGS to reality. //zak -minor -on to name change request in README //zak -remove the old /orw /orww sillyness. just use /set indent on if you really really really want to //zak -Add a new module, tc. Tabkey /msg handler from epic. //skullY 10.11.05 -make a few changes to dict.m. Dont use wait instead do everything in on handlers + use serials. //kreca -Add formats for all aspects of topics. No new set for it, but /format n will set them. //skullY -bump development version up to 10 this may be the final development version before the next release everything seems to be set how i like it thus far just needs testing from users now ;) //zak. -do not use doublestat of fixed-sized msgwin noticed by Alien88 //zak 10.12.05 -merge in the following changes from a patch trent(criminal) sent to me. minor cosmetics fix to whois.2 add scan.7 whois.7 (slightly modified copies of others) //trent 10.18.05 -add /wi support to tabkey from kreca //zak -add /m /msg support but not cyclable by me *gulp* //zak ^^ might break some things as kreca does some really CONFUSING things to tab.m... due to my lack of sleep or quite possibly i might see duplicate edit_topic code that's conflicting from exec.m and tab.m want to check it out kreca? (i'm clearly dreaming here since i [insert kreca do/check something over here] ) //zak -add 2 aliases for Xavier //zak -fix scan.2 by ryan //zak -revert the /m /msg changes from tab.m i'll keep it in my tree to stop kreca from acting like a little $#!@@#$!@#$ //zak 10.19.05 -add some reasons/modifications by trent(criminal) to emopart.reasons. //zak -add a better query alias requested by xavier //zak -freeze tree until thurs. //zak -set default and some other popular themes to use the action format which supports /me output in multiple channels in same window. //zak 10.20.05 -set stat.11 to use doublestats for the time being, so people don't get confused with [opervision] //zak -userlist.m: Allow users to specify * as a channel name for the userlist. Fix the formatting while I'm there. //skullY -move script echo;s/parses to amn.epic to load before it loads the banners. as the output that should come out on startup shows a missing //echo. this should fix the case of the MISSING OUTPUT. //zak -try to center the amn.load banner using WHITESPACES, since for some reason $_center went berserk or doesn't load on time. //zak -remove duplicate vars from themes, and set some more themes to use the better actform[2]. //zak -change version for 1.2 release 1. yes it's finally a release! //zak -sync CHANGES.rel to proper and create a new CHANGES file. -shrink EPIC-BUGS info as .7 is rolling out today/tomorrow as well. //zak alas enjoy. //zak Date: Thu, 20 Oct 2005 22:06:01 -0400 (EDT) From: zak@ircii.org (Zak) -fix _center alias to work properly under epic5 again. hopefully still works under epic4 *gulp* how do anyone miss this? //zak ^^ merged to 1.2 release //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Oct 20 20:37:29 2005 +++ amn/CHANGES Thu Oct 20 22:03:42 2005 @@ -1,4 +1,9 @@ for further CHANGES info please read the docs/CHANGES.rel. -no changes since 1.2/r1 yet. +10.20.05 +-fix _center alias to work again seems there's a bug or some change + in xecho -w perhaps the usage has been removed in epic5. which explains + why i didn't see the issue under epic4. //zak +-resync amc.load to use _center again //zak +-merge the above into -release. diff -aruN amn.orig/ans/amc.load amn/ans/amc.load --- amn.orig/ans/amc.load Thu Oct 20 19:25:05 2005 +++ amn/ans/amc.load Thu Oct 20 22:01:34 2005 @@ -1,13 +1,13 @@ aecho -eval echo When I was a child I had a fever -eval echo My hands felt just like two balloons -eval echo I've got that feeling once again -eval echo I can't explain, you would not understand -eval echo This is not how I am -eval echo I have become comfortably numb +eval _center When I was a child I had a fever +eval _center My hands felt just like two balloons +eval _center I've got that feeling once again +eval _center I can't explain, you would not understand +eval _center This is not how I am +eval _center I have become comfortably numb aecho -eval echo Pink Floyd - Comfortably numb. +eval _center Pink Floyd - Comfortably numb. aecho aecho -eval echo Note: see /about for additional information. +eval _center Note: see /about for additional information. aecho diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Thu Oct 20 19:19:01 2005 +++ amn/core/alias.m Thu Oct 20 21:59:41 2005 @@ -131,9 +131,8 @@ ## end alias _center { -@ number = (word(0 $geom()) - printlen($stripcrap(ANSI,COLOR $*))) / 2 -xecho -w $0 $repeat($trunc(0 $number) )$* - +@ number = (word(0 $geom()) - printlen($*)) / 2 +xecho -v $repeat($trunc(0 $number) )$* } ## long complex aliases below here. Date: Thu, 20 Oct 2005 23:21:19 -0400 (EDT) From: zak@ircii.org (Zak) -change ver to unfrozen tree of back to ye old snapshot again. -add a amn-fuq.txt all are welcomed to contribute to it. but we really still do need a real polite FAQ ;p. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Oct 20 22:03:42 2005 +++ amn/CHANGES Thu Oct 20 23:17:24 2005 @@ -7,3 +7,7 @@ why i didn't see the issue under epic4. //zak -resync amc.load to use _center again //zak -merge the above into -release. +-somewhat general start of the amnesiac-fuq Frequently Unanswered +Questions. spinoff of the old bitchx.fuq docs/amn-fuq.txt //zak +-new snapshot. +1.2d r/1 diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Thu Oct 20 20:40:57 2005 +++ amn/core/sets.m Thu Oct 20 23:17:45 2005 @@ -40,7 +40,7 @@ @awayr=[Not Here] @a.ver=[amnesiac] @rel_id=[1] -@a.rel=[1.2 r/$rel_id] +@a.rel=[1.2d r/$rel_id] @a.date=[20051020] @_ss=[15] @_ovsize=[5] diff -aruN amn.orig/docs/amn-fuq.txt amn/docs/amn-fuq.txt --- amn.orig/docs/amn-fuq.txt Wed Dec 31 19:00:00 1969 +++ amn/docs/amn-fuq.txt Thu Oct 20 23:14:42 2005 @@ -0,0 +1,161 @@ +This fuq was made for satire written by crapple with help from others. +Note: for the humour impaired if you are sensitive to insults, profanity +gender etc.. please stop here.! + +This FUQ, is rated R, so ask your mommy or daddy if you are under +18 before reading this fuq. +kthx + +ppl who helped contributed to this fuq. +kreca +ryan +and a bunch of others who we dont know about. + +also special thanks to the #epic/#amnesiac idiots for helping us +create this fuq + +Frequently Unanswered Questions + +Q: Where do i download Amnesiac? +A: http://amnesiac.ircii.org +Q: Where do i download epic? +A: ftp.epicsol.org + +Q: who made amnesiac, how do i contact the author? +A: crapple made amnesiac since if you are reading this FUQ there is +unfortunatly no way to contact me. + +Q: How do i install amnesiac? +A: presuming you have epic installed and have the script downloaded +tar zxvf amnesiac*.tgz; cd amn; more INSTALL + +Q: How do i make a module/plugin for amnesiac? +A: figure it out on your own time. or you could read docs @ +http://www.prbh.org/help/ + + +Q: Where can i obtain amnesiac help? +A: #amnesiac on EFnet, depends on your level of skill or lacktherof you may +be ignored, it's best to read docs first before asking a question, and +asking a documented question will surely get you ignored, repeatidly asking +the same question over and over will guarantee you a ban. + +Q: How do i load amnesiac? +A: presuming that you have epic4/5 installed and downloaded the script. +tar zxvf amnesiac*.tgz;cat load ~/amn/amn.epic >> ~/.epicrc; +epic -B -H somevhost.com somenick irc.someserver.com +or if the client is already loaded and the script is untarred +/load ~/amn/amn.epic. + +Q: what are the help commands? +A: /ehelp /ahelp or if using epic5 sometimes /load help; /help will give +you epic's internal help info if the client is installed globally or +the source/scripts is in ~/.epic + +Q: Why am I banned in #Amnesiac? +you're problaby un-wanted, therfor, go fuck yourself. + +Q: How do i set my flood protection? +A: we do not like having many annoying flood protection mechanism's in +the script try /vmod /emod for information on modules and /config +pick your poison. + +Q: Why wont crapple or kreca answer my lame questions in #amnesiac? +A: ...... + +Q: how do I hack with Amnesiac? +A: /eval $decode(CPHBHFGJHECAGNGFCAGBGNCAHCGFHEGBHCGE) + +Q: how can I spoof with Amnesiac? +A: /disco host.to.spoof.com + +Q: can I run BitchX/Sirc/Ircii/ScrollZ/other lusers Irc Clients with +Amnesiac+epic? +A: YES + +Q: where can I find the latest version of amnesiac? +A: http://amnesiac.ircii.org/ac-snap.tgz or http://amnesiac.ircii.org + +Q: my backspace key in the xterm spews out ~~ or does not work does that + mean im lame? +A: try set term=vt100 then restart the client. + +Q: how do I add aop for my inbred cousin HOW? +A: /addmod userlist +/adduser *!ident@somehostordomain.com #channel iops can only add 1 +channel at a time. or if the user is online. +/adduser nickname #channel iops +/config o to toggle the delay time for ops. +/save + +Q: how do I start epic+amnesiac? +A: HEY LOOK AT ME IM A MORON! + ok whats the real answer? +YER STILL A FUCKING MORON!. + +Q: whats the difference between epic scrollz ircii BitchX? +Q: what do you mean to compile? how do you spell './configure' + +Q: why wont ppl answer my lame non-epic/amnesiac questions? + +#AMNESIAC IS ONLY FOR AMNESIAC/SOME EPIC HELP NOTHING ELSE GO FUCK YOURSELF +YOU PEOPLE WASTE OUR FUCKING TIME. TRY #BNC FOR BNC HELP OR #EGGDROP +FOR EGGDROP HELP /MSG MMAP HOW DO I BE A SCRIPT KIDDIE ETC +DO NOT BUG US FOR NON AMNESIAC/EPIC RELATED QUESTIONS. + +Q: where do I get the epic source code? +A: ftp.epicsol.org +Q: where do i get the amnesiac script? +A: http://amnesiac.ircii.org + +Q: how do I make msgs go into a window for when people private msg me? +A: syntax of /mw +/mw -hidden|split|kill + +Q: Why Are thre Spelng Erors in ths fuq?. +A: GO FUCK YOURSELF WE DONT CARE. + +Q: d00d k4n u addz me d4 sh3llz? +A: fuckoff, go ask bads or #shells, they have zillions + +Q: anyone making a port of ice.bx to ice.epic??? +A: 8========D~ + +Q: how come taco bell soft tacos smell like a wet dog? :( +A: dunno. go ask in #bearcave. + +Q: why do I get banned in #Amnesiac for being a newbie.. +YES I REALLY AM A NEWBIE. +A: GO AWAY + +Q: I joined #amnesiac with a lame vhost why did I get banned? +how do I get it removed? why do none of the ops answer +my question regarding it?, why do I get banned if I change +my host?. when will it be removed?. + +LAME VHOSTS ARE NOT PERMITTED IN #AMNESIAC IT WILL NEVER BE +REMOVED, YOU CAN PROLLY GET BACK IN LATER UNDER A DIFF ONE IF +YOU DO NOT BOTHER ANYONE!. + +Q: how do I dcc chat? how do I add a dcc query window? +A: make some windows with /wc then do alt-1-9 to change windows or +esc 1-9 or /1 /2 /3 /4 etc.. to change windows +in the window you want to dcc chat do /dcc chat nick +/q =nick to put them in a query the = does matter it means +dcc you can also do /m =nick under epic5 ctcp over dcc's still do +not match very well so you will need to do /wadd nick to make the +dcc msg's for nick to stay in that window when it's hidden or not active. + +Q: how do I make epic/amn add a bunch of windows on startup? +A: add ^window new double on hide. in your ~/.epicrc for as many +windows as you want IE: for 2 windows do +^window new double on hide +^window new double on hide +do ^window new hide if you do not like double statbars. + +Q: how do I make an alias? +A: /alias cmd somelongfunctionorcommand + +Q: will there be a auto_reconnect script for epic5? +A: someday, for now use epic4 if you guys really want the annoying +auto-reconnect feature. Date: Fri, 21 Oct 2005 03:57:18 +0000 From: Zach White Add the beginnings of a real FAQ. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 03:24:32 2005 +++ amn/CHANGES Fri Oct 21 03:57:02 2005 @@ -11,3 +11,4 @@ Questions. spinoff of the old bitchx.fuq docs/amn-fuq.txt //zak -new snapshot. 1.2d r/1 +-Add the beginnings of a real faq. //skullY diff amn.orig/docs/amn-faq.txt amn/docs/amn-faq.txt --- amn.orig/docs/amn-faq.txt Thu Jan 1 00:00:00 1970 +++ amn/docs/amn-faq.txt Fri Oct 21 03:54:57 2005 @@ -0,0 +1,59 @@ +Amnesiac FAQ 0.1 + +INSERT GAY ASS-KEY HERE + +Q: How do I get help documentation? +A: /ahelp for general amnesiac help, /ehelp to see what other help commands + are available. + NOTE: We need a better help system. Think you can do it? Come talk to us + on EFNet #amnesiac. + +Q: How can I contribute? +A: We need documentation and testing. Come to EFNet #amnesiac if you find + a bug. Even better if you can isolate it and provide a patch. If you + write some documentation come to #amnesiac to get it included. + +Q: Where can I get help? +A: The official amnesiac channel is on EFNet, #amnesiac. Don't ask if anyone + is around, just ask your question. If no one can answer it right away then + idle, someone will be around eventually. + +Q: How do I switch channels? +A: Hit ^X to switch between channels and queries for the current window + +Q: How do I make this look less gay? +A: /theme to see a list of themes, /theme to switch themes. You can + also change individual formats with /format. + +Q: How do I load and unload modules? +A: /addmod to load a module, /delmod to remove a module, /listmod to see + what's loaded, /vmod to see all the modules available. + +Q: How do I use windows? +A: /wj to join a channel in a new window, ^Wc to create a new window, ^Wn to + move to the next window, ^Wp to move to the previous window, ^Wk to kill + the current window, ^W<0-9> to switch to the specified window, /<0-9> to + switch to the specified window. + NOTE: We need better documentation on this. Any volunteers? + +Q: What's the best way to change behavior that I don't like? +A: First, see if there's a /format or a /config for the behavior you want + to change. If not, take a look at amn/modules/vanilla for an example + of how to write a module to set behavior you like. + (FIXME: Would .amnrc be the better thing to do here?) + +Q: How do I add auto-ops? +A: /addmod userlist + /adduser <*!ident@somehostordomain.com> <#channel> iops + If the user is online: + /adduser <#channel> iops + /save + +Q: What if I want to add an auto-op for all channels? +A: /adduser * iops + +Q: Why doesn't "/adduser #chan* iops" work? +A: Because it doesn't. + +Q: Why doesn't epic5 have auto-reconnect? +A: Because no one's written it yet. If you really need that use epic4. Date: Fri, 21 Oct 2005 03:44:26 -0400 (EDT) From: zak@ircii.org (Zak) -yes even our god skullY can make mistakes. see CHANGES. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Oct 20 23:57:02 2005 +++ amn/CHANGES Fri Oct 21 03:43:23 2005 @@ -12,3 +12,9 @@ -new snapshot. 1.2d r/1 -Add the beginnings of a real faq. //skullY +-fix some questionable skullyism's that forced me to make a release + and found the questionable skullyism to be a problem and to have + proof is just priceless (make latin1/ibm437/fixterm) work right again + apparently he need's to read up on shell functions 101, perhaps maybe + he was thinking people use !/bin/perl or just maybe he doesn't think ;(. + //zak - merged to release. diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Thu Oct 20 21:59:41 2005 +++ amn/core/alias.m Fri Oct 21 03:39:01 2005 @@ -137,14 +137,14 @@ ## long complex aliases below here. alias fixterm { - exec //echo '$chr(27)\(U' + exec echo '$chr(27)\(U' xecho -r $chr(27)\(U } alias ibm437 fixterm alias latin1 { - exec //echo '$chr(27)\(B' + exec echo '$chr(27)\(B' xecho -r $chr(27)\(B } Date: Fri, 21 Oct 2005 04:01:35 -0400 (EDT) From: zak@ircii.org (Zak) -documentation synch's to -release and a minor typo. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 03:43:23 2005 +++ amn/CHANGES Fri Oct 21 04:00:22 2005 @@ -18,3 +18,5 @@ apparently he need's to read up on shell functions 101, perhaps maybe he was thinking people use !/bin/perl or just maybe he doesn't think ;(. //zak - merged to release. +-tyop in INSTALL - merged to release. //zak +-merge amn-fuq.txt, amn-faq.txt to release //zak diff -aruN amn.orig/INSTALL amn/INSTALL --- amn.orig/INSTALL Sun Oct 2 22:53:49 2005 +++ amn/INSTALL Fri Oct 21 03:58:03 2005 @@ -32,7 +32,7 @@ How to install this package: - o Run 'tar zxvf amnesiac*.tar.gz -C ~/' + o Run 'tar zxvf amnesiac*.tgz -C ~/' o If using a snapshot 'tar zxvf ac-snap.tgz -C ~/' o Then proceed to put this line in your ~/.ircrc or ~/.epicrc load ~/amn/amn.epic Date: Fri, 21 Oct 2005 17:34:31 +0000 From: Zach White Fix our use of xecho -w Fix /cops amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 16:44:19 2005 +++ amn/CHANGES Fri Oct 21 17:33:57 2005 @@ -20,3 +20,6 @@ //zak - merged to release. -tyop in INSTALL - merged to release. //zak -merge amn-fuq.txt, amn-faq.txt to release //zak +-Since epic5 removed xecho -w change all instances to just xecho. //skullY +-Allow a channel name to be passed to /cops. //skullY +-Fix the on who that cops sets upon completion. //skullY diff amn.orig/core/action.m amn/core/action.m --- amn.orig/core/action.m Fri Oct 21 16:44:19 2005 +++ amn/core/action.m Fri Oct 21 16:57:58 2005 @@ -28,7 +28,7 @@ @:wqwin = myquerywin($0) if ( wqwin != [-1]) { - xecho -window $wqwin $fparse(format_desc $0 $1 $2-) + xecho $fparse(format_desc $0 $1 $2-) } { xecho $fparse(format_action_other $0 $1 $2-) } diff amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Fri Oct 21 16:44:19 2005 +++ amn/core/channel.m Fri Oct 21 17:33:29 2005 @@ -62,23 +62,27 @@ alias cops { ^on who -* - ^on ^who * { - if ([$[2]2]==[G*] ^^ [$[2]2]==[H*]) { - xecho -w $winchan $cparse($(c1) $[9]0) $cparse($(c2) $[9]1) $cparse($(c1) $[20]5) $(cl)$3$cparse($(c1)@)$(cl)$4 - } + ^on ^who * { + if ([$[2]2]==[G*] ^^ [$[2]2]==[H*]) { + xecho $[9]0 $[9]1 $[20]5 $3@$4 } - who $C - wait - ^on who -* - ^on ^who * { - xecho -w $winchan $cparse($(c1) $[9]0) $cparse($(c2) $[9]1) $cparse($(c1) $[20]5) $(cl)$3$cparse($(c1)@)$(cl)$4 - } + } + if ([$0]) { + who $0 + }{ + who $C + } + wait + ^on who -* + ^on ^who * { + xecho $fparse(format_who $*) + } } alias sync { @cmodes=[$M] - /c +m - $cmodes;/c -m + $cmodes - } + /c +m - $cmodes;/c -m + $cmodes +} alias omode { if ([$0]==[on]) { diff amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Fri Oct 21 16:44:19 2005 +++ amn/core/scan.m Fri Oct 21 17:08:49 2005 @@ -43,9 +43,9 @@ @nicks.voc=pattern(*+* $nicks) @nicks.non=filter(*+* $filter(*@* $nicks)) - ^xecho -w $chanwin($1) $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $1) + ^xecho $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $1) if (format_scan_header) { - ^xecho -w $chanwin($1) $fparse(format_scan_header) + ^xecho $fparse(format_scan_header) } @_swidth=[${word(0 $geom()) / format_scan_width}] fe ($jot(1 $_swidth)) n1 { @@ -58,7 +58,7 @@ ^assign -_nlist;^assign -_nlist2 if (format_scan_footer) { - ^xecho -w $chanwin($1) $fparse(format_scan_footer) + ^xecho $fparse(format_scan_footer) } ^assign -nicks;assign -scan1 } @@ -80,9 +80,9 @@ @nicks.ops=pattern(*@* $channel($chan)) @nicks.voc=pattern(*.+* $channel($chan)) @nicks.non=pattern(*..* $channel($chan)) - ^xecho -w $chanwin($chan) $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $chan) + ^xecho $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $chan) if (format_scan_header) { - ^xecho -w $chanwin($1) $fparse(format_scan_header) + ^xecho $fparse(format_scan_header) } @_swidth=[${word(0 $geom()) / format_scan_width}] fe ($jot(1 $_swidth)) n1 { @@ -91,11 +91,11 @@ } fe ($scan1) $_nlist { - eval ^xecho -w $chanwin($1) $$fparse(format_scan_nicks_border) $_nlist2 + eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 } ^assign -_nlist;^assign -_nlist2 if (format_scan_footer) { - ^xecho -w $chanwin($1) $fparse(format_scan_footer) + ^xecho $fparse(format_scan_footer) } ^assign -nicks;^assign -scan1 } @@ -111,9 +111,9 @@ ^local nicks.ops 0 ^push scan1 $pattern(*@* $channel($chan)) @nicks.ops=chops($chan) - ^xecho -w $chanwin($chan) $fparse(format_scan_users_op $#nicks.ops $chan) + ^xecho $fparse(format_scan_users_op $#nicks.ops $chan) if (format_scan_header) { - ^xecho -w $chanwin($1) $fparse(format_scan_header) + ^xecho $fparse(format_scan_header) } @_swidth=[${word(0 $geom()) / format_scan_width}] fe ($jot(1 $_swidth)) n1 { @@ -121,12 +121,12 @@ ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) } fe ($scan1) $_nlist { - eval ^xecho -w $chanwin($1) $$fparse(format_scan_nicks_border) $_nlist2 + eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 } ^assign -_nlist;^assign -_nlist2 if (format_scan_footer) { - ^xecho -w $chanwin($1) $fparse(format_scan_footer) + ^xecho $fparse(format_scan_footer) } ^assign -nicks.ops;^assign -scan1 } @@ -144,9 +144,9 @@ ^push scan1 $pattern(*.+* $channel($chan)) ^push scan1 $pattern(.\\?* $channel($chan)) @nicks.non=nochops($chan) - xecho -w $chanwin($chan) $fparse(format_scan_users_non $#nicks.non $chan) + xecho $fparse(format_scan_users_non $#nicks.non $chan) if (format_scan_header) { - ^xecho -w $chanwin($3) $fparse(format_scan_header) + ^xecho $fparse(format_scan_header) } @_swidth=[${word(0 $geom()) / format_scan_width}] fe ($jot(1 $_swidth)) n1 { @@ -155,13 +155,13 @@ } fe ($scan1) $_nlist { - eval ^xecho -w $chanwin($1) $$fparse(format_scan_nicks_border) $_nlist2 + eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 } ^assign -_nlist;^assign -_nlist2 if (format_scan_footer) { - ^xecho -w $chanwin($3) $fparse(format_scan_footer) + ^xecho $fparse(format_scan_footer) } ^assign -scan1;^assign -chan;^assign -nicks.non } @@ -175,9 +175,9 @@ ^local nicks.voc 0 ^push scan1 $pattern(*.+* $channel($chan)) @nicks.voc=pattern(*.+* $channel($chan)) - ^xecho -w $chanwin($chan) $fparse(format_scan_users_voc $#nicks.voc $chan) + ^xecho $fparse(format_scan_users_voc $#nicks.voc $chan) if (format_scan_header) { - xecho -w $chanwin($3) $fparse(format_scan_header) + xecho $fparse(format_scan_header) } @_swidth=[${word(0 $geom()) / format_scan_width}] fe ($jot(1 $_swidth)) n1 { @@ -185,12 +185,12 @@ ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) } fe ($scan1) $_nlist { - eval ^xecho -w $chanwin($1) $$fparse(format_scan_nicks_border) $_nlist2 + eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 } ^assign -_nlist;^assign -_nlist2 if (format_scan_footer) { - ^xecho -w $chanwin($3) $fparse(format_scan_footer) + ^xecho $fparse(format_scan_footer) } ^assign -scan1;^assign -chan;^assign -nicks.voc } diff amn.orig/core/sync.m amn/core/sync.m --- amn.orig/core/sync.m Fri Oct 21 16:44:19 2005 +++ amn/core/sync.m Fri Oct 21 17:08:59 2005 @@ -20,8 +20,8 @@ hook channel_synch $tolower($1) @ :mytime = utime_sub($utime() $jointime[$servernum()][$encode($tolower($1))]) ^assign -jointime[$servernum()][$encode($tolower($1))] - xecho -w $winchan($1) -b -l crap join to $tolower($1) synced in $mytime seconds! + xecho -b -l crap join to $tolower($1) synced in $mytime seconds! } } - \ No newline at end of file + diff amn.orig/core/wall.m amn/core/wall.m --- amn.orig/core/wall.m Fri Oct 21 16:44:19 2005 +++ amn/core/wall.m Fri Oct 21 17:09:23 2005 @@ -43,6 +43,6 @@ @append#=mid($loc 1 $1) } @:wchan=pattern($char$append* $chans) - xecho -w $winchan($wchan) $fparse(format_wall $0 $wchan $2-) + xecho $fparse(format_wall $0 $wchan $2-) } oof diff amn.orig/modules/tab/tab.m amn/modules/tab/tab.m --- amn.orig/modules/tab/tab.m Fri Oct 21 16:44:19 2005 +++ amn/modules/tab/tab.m Fri Oct 21 17:09:40 2005 @@ -27,7 +27,7 @@ } { fe ($uulist) $_nlist { - eval ^xecho -w $chanwin($1) $_nlist2 + eval ^xecho -v $_nlist2 } } @function_return=rest(${strlen($0-1)} $denom) Date: Fri, 21 Oct 2005 14:00:30 -0400 (EDT) From: zak@ircii.org (Zak) -merge the xecho fixes by skully into -release actually these skullyism's proved to be helpful especially considering our multiserver support in future work progress we'd be fscked if we went the old way of using xecho -v. thanks!. //zak everyone should grab the latest release. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 13:33:57 2005 +++ amn/CHANGES Fri Oct 21 13:56:33 2005 @@ -23,3 +23,5 @@ -Since epic5 removed xecho -w change all instances to just xecho. //skullY -Allow a channel name to be passed to /cops. //skullY -Fix the on who that cops sets upon completion. //skullY +^^ merge the the following into -release. //zak +-bump release version to r/2 //zak diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Thu Oct 20 23:17:45 2005 +++ amn/core/sets.m Fri Oct 21 13:56:55 2005 @@ -39,8 +39,8 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[1] -@a.rel=[1.2d r/$rel_id] +@rel_id=[2] +@a.rel=[1.2 r/$rel_id] @a.date=[20051020] @_ss=[15] @_ovsize=[5] Date: Fri, 21 Oct 2005 14:04:00 -0400 (EDT) From: zak@ircii.org (Zak) -bump snapshot dev version to r/2 //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 13:56:33 2005 +++ amn/CHANGES Fri Oct 21 14:02:15 2005 @@ -25,3 +25,4 @@ -Fix the on who that cops sets upon completion. //skullY ^^ merge the the following into -release. //zak -bump release version to r/2 //zak +-bump snapshot development version to r/2 //zak diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Fri Oct 21 13:56:55 2005 +++ amn/core/sets.m Fri Oct 21 14:01:36 2005 @@ -40,7 +40,7 @@ @awayr=[Not Here] @a.ver=[amnesiac] @rel_id=[2] -@a.rel=[1.2 r/$rel_id] +@a.rel=[1.2d r/$rel_id] @a.date=[20051020] @_ss=[15] @_ovsize=[5] Date: Fri, 21 Oct 2005 14:41:04 -0400 (EDT) From: zak@ircii.org (Zak) -remove junk from relay.m //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 14:02:15 2005 +++ amn/CHANGES Fri Oct 21 14:40:18 2005 @@ -26,3 +26,4 @@ ^^ merge the the following into -release. //zak -bump release version to r/2 //zak -bump snapshot development version to r/2 //zak +-remove the /rel hacks since /relm -l and friends works now. //zak diff -aruN amn.orig/modules/relay/relay.m amn/modules/relay/relay.m --- amn.orig/modules/relay/relay.m Mon Oct 10 17:36:27 2005 +++ amn/modules/relay/relay.m Fri Oct 21 14:39:46 2005 @@ -9,16 +9,6 @@ alias paste relw ^set output_rewrite $_paste($1-)$1- -alias rel { - while (:option = getopt(optopt optarg lns $*)) { - switch ($option) { - (l) {relm} - (n) {reln} - (s) {relsm} - } - } -} - alias _paste { if (relayw == [ON]) { if (numitems(_foo) >= winsize()) { Date: Fri, 21 Oct 2005 15:09:21 -0400 (EDT) From: zak@ircii.org (Zak) -begin of work in progress of not suppressing all client yells. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 14:40:18 2005 +++ amn/CHANGES Fri Oct 21 15:08:11 2005 @@ -27,3 +27,6 @@ -bump release version to r/2 //zak -bump snapshot development version to r/2 //zak -remove the /rel hacks since /relm -l and friends works now. //zak +-do not thuttup on yell for everything, just silence nonessential + crap, this is a work in progress as we'll need to see what other + things in everyday usages that might be annoying in yell. //zak diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Thu Oct 20 19:19:37 2005 +++ amn/amn.epic Fri Oct 21 14:50:33 2005 @@ -63,9 +63,9 @@ #supported modules @_modules=[ncomp flood abot sprot aol query away dict mjoin netsplit adcc oper orignick relay shitlist tab tc userlist bwk clones vanilla xy nlog services] -## poor mans THUTTUP on file not found loader. -^on ^yell * # -##end poor mans THUTTUP. +## proper yell silence. as we do not want to silence all yells. +## this is the beginning of a proper silence. +^on ^yell "File not found*" # ## script echo ##still need to clean some of this up. alias abwecho xecho -v $acban $cparse($*) Date: Fri, 21 Oct 2005 23:11:54 +0000 From: Zach White Add a /tld command. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 17:34:35 2005 +++ amn/CHANGES Fri Oct 21 23:11:43 2005 @@ -23,3 +23,4 @@ -Since epic5 removed xecho -w change all instances to just xecho. //skullY -Allow a channel name to be passed to /cops. //skullY -Fix the on who that cops sets upon completion. //skullY +-country.m: Add a /tld to lookup a country. Requested by ml. //skullY diff amn.orig/core/country.m amn/core/country.m --- amn.orig/core/country.m Fri Oct 21 17:34:35 2005 +++ amn/core/country.m Fri Oct 21 23:10:22 2005 @@ -17,6 +17,10 @@ } } +alias tld { + xecho $acban $* is $country($*) +} + @addcountry(AD Andorra) @addcountry(AE United Arab Emirates) @addcountry(AF Afghanistan) Date: Fri, 21 Oct 2005 23:13:30 +0000 From: Zach White Add an entry in /genhelp for /tld. amn diff diff amn.orig/core/ehelp.m amn/core/ehelp.m --- amn.orig/core/ehelp.m Fri Oct 21 23:11:58 2005 +++ amn/core/ehelp.m Fri Oct 21 23:13:11 2005 @@ -49,6 +49,7 @@ //echo orignick /orignick will attempt to regain(jupe) specified nick //echo every 3 seconds(default) unless you specify time in /config. [orignick module] //echo staynick /staynick will cancel /orignick [orignick module] +//echo tld /tld will show you the country for that TLD //echo --------------------------------------------------------------------- } Date: Fri, 21 Oct 2005 23:20:03 +0000 From: Zach White Add a couple items to TODO-BUGS. /dict stopped working since I last fixed it, I don't have time to look at it right now. Also had a request for setting ban types on a per-ban basis so the user doesn't have to reset it between each ban. Votes? amn diff diff amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Fri Oct 21 23:13:34 2005 +++ amn/TODO-BUGS Fri Oct 21 23:18:38 2005 @@ -16,6 +16,7 @@ ## highest priority TODO. -adjust our 'poor mans' thuttup to be more reasonable. -fixdouble/fixwin or equiv for doublestats +-/dict stoped working sometime in the last couple weeks. ## Higher priority requests. @ add a topiclock alias (like bitchx) for xavier. @@ -27,6 +28,8 @@ ## Procrastinated requests. @ rewrite topwin (removed to pasture). +@ A way to specify ban types on a per-ban basis. Either /bkn, /bkh, etc or + a flag to /kb? @ some more documentation updates. a couple of more menu help systems. @ a amnesiac FAQ would be nice... any volunteers? Date: Sat, 22 Oct 2005 00:46:46 +0000 From: Zach White Add numbers to /format 2. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 23:20:07 2005 +++ amn/CHANGES Sat Oct 22 00:46:29 2005 @@ -24,3 +24,4 @@ -Allow a channel name to be passed to /cops. //skullY -Fix the on who that cops sets upon completion. //skullY -country.m: Add a /tld to lookup a country. Requested by ml. //skullY +-Add numbers to /format 2. How was this missing? //skullY diff amn.orig/core/format.m amn/core/format.m --- amn.orig/core/format.m Fri Oct 21 23:20:07 2005 +++ amn/core/format.m Sat Oct 22 00:45:34 2005 @@ -815,7 +815,7 @@ alias whoform.show { for (@mm=1, mm < numitems(whoform), @mm++) { @format_who=getitem(whoform $mm) - xecho $fparse(format_who #amnesiac skullY H@ zwhite front.arpa.org irc.servercentral.net 0 The Work is Done and Then Forgotten) + xecho $mm: $fparse(format_who #amnesiac skullY H@ zwhite front.arpa.org irc.servercentral.net 0 The Work is Done and Then Forgotten) } xecho $acban /format 2 to set who format Date: Fri, 21 Oct 2005 21:06:31 -0400 (EDT) From: zak@ircii.org (Zak) -document synchs -add a patch to -release. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 20:46:29 2005 +++ amn/CHANGES Fri Oct 21 21:05:51 2005 @@ -25,3 +25,5 @@ -Fix the on who that cops sets upon completion. //skullY -country.m: Add a /tld to lookup a country. Requested by ml. //skullY -Add numbers to /format 2. How was this missing? //skullY +^^ added to -release //zak +-sync TODO-BUGS to reality //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Fri Oct 21 19:18:38 2005 +++ amn/TODO-BUGS Fri Oct 21 21:05:03 2005 @@ -16,7 +16,9 @@ ## highest priority TODO. -adjust our 'poor mans' thuttup to be more reasonable. -fixdouble/fixwin or equiv for doublestats --/dict stoped working sometime in the last couple weeks. +? /dict stoped working sometime in the last couple weeks. methinks it's + something wrong with skullY's client or brain as it still seems to work + for everyone else.. i'll just keep it here for now //zak ## Higher priority requests. @ add a topiclock alias (like bitchx) for xavier. Date: Fri, 21 Oct 2005 21:17:03 -0400 (EDT) From: zak@ircii.org (Zak) -TODO-BUGS more stuff.... //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 21:05:51 2005 +++ amn/CHANGES Fri Oct 21 21:16:17 2005 @@ -27,3 +27,4 @@ -Add numbers to /format 2. How was this missing? //skullY ^^ added to -release //zak -sync TODO-BUGS to reality //zak +-add stuff to TODO-BUGS //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Fri Oct 21 21:05:03 2005 +++ amn/TODO-BUGS Fri Oct 21 21:16:00 2005 @@ -19,6 +19,7 @@ ? /dict stoped working sometime in the last couple weeks. methinks it's something wrong with skullY's client or brain as it still seems to work for everyone else.. i'll just keep it here for now //zak +- fix /format z and y output. ## Higher priority requests. @ add a topiclock alias (like bitchx) for xavier. Date: Sat, 22 Oct 2005 02:58:14 -0400 (EDT) From: zak@ircii.org (Zak) -sync docs to reality, fix a few bugs thanks to Alien88 -recommit some missing items, not sure how it got removed. skullY???? //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 21 21:16:17 2005 +++ amn/CHANGES Sat Oct 22 02:56:35 2005 @@ -28,3 +28,12 @@ ^^ added to -release //zak -sync TODO-BUGS to reality //zak -add stuff to TODO-BUGS //zak +-fixup the multiple /format inconsistencies found and done by Alien88 + thanks! //zak +-start of the proper way of using the ^on yell to suppress on what we really + want to suppress. it got removed somehow i presume skullY forgot to sync + before commit! //zak +-sync TODO-BUGS to reality. //zak +-bump snaprelease to r/2 //zak +-remove the /rel cruft again as we have our /relm -l and friends working + i do not know why these are being recommitted *grumble* //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Fri Oct 21 21:16:00 2005 +++ amn/TODO-BUGS Sat Oct 22 02:54:04 2005 @@ -14,12 +14,7 @@ colors. but not inline nick colors. found by adam. thanks!. ## highest priority TODO. --adjust our 'poor mans' thuttup to be more reasonable. -fixdouble/fixwin or equiv for doublestats -? /dict stoped working sometime in the last couple weeks. methinks it's - something wrong with skullY's client or brain as it still seems to work - for everyone else.. i'll just keep it here for now //zak -- fix /format z and y output. ## Higher priority requests. @ add a topiclock alias (like bitchx) for xavier. diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Thu Oct 20 19:19:37 2005 +++ amn/amn.epic Sat Oct 22 02:50:56 2005 @@ -63,9 +63,9 @@ #supported modules @_modules=[ncomp flood abot sprot aol query away dict mjoin netsplit adcc oper orignick relay shitlist tab tc userlist bwk clones vanilla xy nlog services] -## poor mans THUTTUP on file not found loader. -^on ^yell * # -##end poor mans THUTTUP. +## proper yell silence. as we do not want to silence all yells. +## this is the beginning of a proper silence. +^on ^yell "File not found*" # ## script echo ##still need to clean some of this up. alias abwecho xecho -v $acban $cparse($*) diff -aruN amn.orig/core/format.m amn/core/format.m --- amn.orig/core/format.m Fri Oct 21 20:45:34 2005 +++ amn/core/format.m Sat Oct 22 02:51:32 2005 @@ -63,7 +63,7 @@ alias mform.show { for (@mm=1, mm < numitems(mform), @mm++) { @format_msg=getitem(mform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_msg crapple zak@chowned.org hi.) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_msg crapple zak@chowned.org hi.) } xecho $acban /format a to set msg format xecho $acban current format set to $mform @@ -181,7 +181,7 @@ alias spuboform.show { for (@mm=1, mm < numitems(spuboform), @mm++) { @format_public_other=getitem(spuboform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_public_other crapple #amnesiac hi.) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_public_other crapple #amnesiac hi.) } xecho $acban /format e to set public other format xecho $acban current format set to $spuboform @@ -211,7 +211,7 @@ alias signform.show { for (@mm=1, mm < numitems(signform), @mm++) { @format_signoff=getitem(signform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_signoff #amnesiac crapple bye.) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_signoff #amnesiac crapple bye.) } xecho $acban /format f to set signoff format xecho $acban current format set to $signform @@ -241,7 +241,7 @@ alias joinform.show { for (@mm=1, mm < numitems(joinform), @mm++) { @format_join=getitem(joinform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_join crapple #amnesiac zak@chowned.org) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_join crapple #amnesiac zak@chowned.org) } xecho $acban /format g to set join format xecho $acban current format set to $joinform @@ -271,7 +271,7 @@ alias leaveform.show { for (@mm=1, mm < numitems(leaveform), @mm++) { @format_leave=getitem(leaveform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_leave crapple zak@chowned.org #amnesiac) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_leave crapple zak@chowned.org #amnesiac) } xecho $acban /format h to set leaveoff format xecho $acban current format set to $leaveform @@ -300,7 +300,7 @@ alias modeform.show { for (@mm=1, mm < numitems(modeform), @mm++) { @format_mode=getitem(modeform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_mode crapple #amnesiac +o kreca) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_mode crapple #amnesiac +o kreca) } xecho $acban /format i to set modeoff format xecho $acban current format set to $modeform @@ -357,7 +357,7 @@ alias pubnotform.show { for (@mm=1, mm < numitems(pubnotform), @mm++) { @format_public_notice=getitem(pubnotform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_public_notice crapple #amnesiac hi) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_public_notice crapple #amnesiac hi) } xecho $acban /format z to set public notice format xecho $acban current format set to $pubnotform @@ -417,7 +417,7 @@ alias sdcform.show { for (@mm=1, mm < numitems(sdcform), @mm++) { @ format_send_dcc_chat = getitem(sdcform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_send_dcc_chat crapple hi) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_send_dcc_chat crapple hi) } xecho $acban /format l to set send dcc chat format xecho $acban current format set to $sdcform @@ -448,7 +448,7 @@ alias dcform.show { for (@mm=1, mm < numitems(dcform), @mm++) { @ format_dcc_chat = getitem(dcform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_dcc_chat crapple hi) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_dcc_chat crapple hi) } xecho $acban /format m to set dcc chat format xecho $acban current format set to $dcform @@ -611,7 +611,7 @@ alias ncomp.show { for (@nc=1, nc < numitems(ncomp), @nc++) { @format_nick_comp=getitem(ncomp $nc) - xecho $acban $Cparse("%K[%n$([2]nc)%K]%n %K<%ncrapple%K>%n") kreca$format_nick_comp hi! + xecho $Cparse("%K[%n$([2]nc)%K]%n %K<%ncrapple%K>%n") kreca$format_nick_comp hi! } xecho $acban /format r to set nick completion xecho $acban current format set to $ncomp diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Thu Oct 20 23:17:45 2005 +++ amn/core/sets.m Sat Oct 22 02:55:07 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[1] +@rel_id=[2] @a.rel=[1.2d r/$rel_id] @a.date=[20051020] @_ss=[15] diff -aruN amn.orig/modules/relay/relay.m amn/modules/relay/relay.m --- amn.orig/modules/relay/relay.m Mon Oct 10 17:36:27 2005 +++ amn/modules/relay/relay.m Sat Oct 22 02:55:36 2005 @@ -9,16 +9,6 @@ alias paste relw ^set output_rewrite $_paste($1-)$1- -alias rel { - while (:option = getopt(optopt optarg lns $*)) { - switch ($option) { - (l) {relm} - (n) {reln} - (s) {relsm} - } - } -} - alias _paste { if (relayw == [ON]) { if (numitems(_foo) >= winsize()) { Date: Sat, 22 Oct 2005 07:46:06 -0400 (EDT) From: zak@ircii.org (Zak) -add new ASK-KEY done by xavier... thanks!.. will test for on load later. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sat Oct 22 02:56:35 2005 +++ amn/CHANGES Sat Oct 22 07:44:57 2005 @@ -37,3 +37,5 @@ -bump snaprelease to r/2 //zak -remove the /rel cruft again as we have our /relm -l and friends working i do not know why these are being recommitted *grumble* //zak +-add new ASK-KEY to /about and amn-fuq.txt amn-faq.txt done by + xavier many thanks! //zak diff -aruN amn.orig/EPIC-BUGS amn/EPIC-BUGS --- amn.orig/EPIC-BUGS Thu Oct 20 20:38:57 2005 +++ amn/EPIC-BUGS Sat Oct 22 03:04:07 2005 @@ -1,28 +1,5 @@ -All bugs reported here has been fixed in cvs id 1302. the file will just -stay here as a reference until the next epic5 release comes out. +NO bugs found at this time starting at EPIC5-0.0.7 - release. -ircII EPIC5-0.0.6 (Commit id: 1288) (Date of release: 20050809) --FIXED - ircII EPIC5-0.0.6 (Commit id: 1300) (Date of release: 20050809) -nonblocking dns problems are gone now many thanks to hop for fixing this. - --/window server some.nonexistent.host or accidental typing of a server - that doesnt exist can throw the client into a fd loop. - ^^ can be reproduceable on netbsd/dragonflybsd/openbsd with any dual stack - hosts i.e; irc.homelien.no has address 195.159.0.90 - irc.homelien.no has IPv6 address 2001:840:0:1000:1::1 - this is not reproduceable on ircII EPIC5-0.0.5 (Commit id: 1217) (Date of - release: 20050420) the problem appears to have started shortly after the - release -^^ talked to hop about this on 10.2.05 -FIXED in com id 3000. - - -ircII EPIC5-0.0.6 (Commit id: 1292) (Date of release: 20050809) -FIXED: 10.3.05 ircII EPIC5-0.0.6 (Commit id: 1302) (Date of release: 20050809) - --finditem() seems to be broken, however the behavior seems hard to reproduce - among the different commit id and release versions of epic5, sample code - that usually guarantees a reproduce. -^^ fixed in cvs id 1302 10.3.05 ## proposals on the ugly getaddrinfo(3) and other things for epic itself. ## this is just here for reference material at this time, no it doesn't mean diff -aruN amn.orig/ans/about.ans amn/ans/about.ans --- amn.orig/ans/about.ans Sun Sep 18 01:00:32 2005 +++ amn/ans/about.ans Sat Oct 22 07:43:44 2005 @@ -1,13 +1,13 @@ - _) - _` | __ `__ \ __ \ _ \ __| | _` | __| - ( | | | | | | __/\__ \ | ( | ( - \__,_|_| _| _|_| _|\___|____/_|\__,_|\___| + d. ^b. ,$ ,b.^b ,s$b .dP^`Sb d^`b. `$$' d. ,s`$b + d'$b l'$'`b .$$$ $d$'`$b d$' `$b `$. ` $$ d'$b dP' `b + d' `$bl $ `b'`$$ $' $$ `$b. `$b. $$ d' `$bl + dsssss$b $ $$ $ $$ d$P'^ ,b. `$$. $$ dsssss$b + d' `$b$ $$ $ $$ d$b ,$$.db `$$ $$ d' `$b ,b + d' `$$ $$,$ `$b'$$b. ,$$$'`$$bdP'.$$dbs s$$b .d$' +d' ###### ,d$$b ###X#A#V#I#E#R##b`$$$$$'d####################`$$$$P' - - Grtz To: void, Xavier, fudd, BlackJac, hop, criminal, krimson, twez, azel, violence, whitney, skullY, Alien88, eater, grimzy, kreca, adam, ryan - IRC: #amnesiac@efnet Web: http://amnesiac.ircii.org diff -aruN amn.orig/docs/amn-faq.txt amn/docs/amn-faq.txt --- amn.orig/docs/amn-faq.txt Thu Oct 20 23:54:57 2005 +++ amn/docs/amn-faq.txt Sat Oct 22 07:42:32 2005 @@ -1,6 +1,12 @@ Amnesiac FAQ 0.1 -INSERT GAY ASS-KEY HERE + d. ^b. ,$ ,b.^b ,s$b .dP^`Sb d^`b. `$$' d. ,s`$b + d'$b l'$'`b .$$$ $d$'`$b d$' `$b `$. ` $$ d'$b dP' `b + d' `$bl $ `b'`$$ $' $$ `$b. `$b. $$ d' `$bl + dsssss$b $ $$ $ $$ d$P'^ ,b. `$$. $$ dsssss$b + d' `$b$ $$ $ $$ d$b ,$$.db `$$ $$ d' `$b ,b + d' `$$ $$,$ `$b'$$b. ,$$$'`$$bdP'.$$dbs s$$b .d$' +d' ###### ,d$$b ###X#A#V#I#E#R##b`$$$$$'d####################`$$$$P' Q: How do I get help documentation? A: /ahelp for general amnesiac help, /ehelp to see what other help commands diff -aruN amn.orig/docs/amn-fuq.txt amn/docs/amn-fuq.txt --- amn.orig/docs/amn-fuq.txt Thu Oct 20 23:14:42 2005 +++ amn/docs/amn-fuq.txt Sat Oct 22 07:42:55 2005 @@ -1,3 +1,11 @@ + d. ^b. ,$ ,b.^b ,s$b .dP^`Sb d^`b. `$$' d. ,s`$b + d'$b l'$'`b .$$$ $d$'`$b d$' `$b `$. ` $$ d'$b dP' `b + d' `$bl $ `b'`$$ $' $$ `$b. `$b. $$ d' `$bl + dsssss$b $ $$ $ $$ d$P'^ ,b. `$$. $$ dsssss$b + d' `$b$ $$ $ $$ d$b ,$$.db `$$ $$ d' `$b ,b + d' `$$ $$,$ `$b'$$b. ,$$$'`$$bdP'.$$dbs s$$b .d$' +d' ###### ,d$$b ###X#A#V#I#E#R##b`$$$$$'d####################`$$$$P' + This fuq was made for satire written by crapple with help from others. Note: for the humour impaired if you are sensitive to insults, profanity gender etc.. please stop here.! Date: Sat, 22 Oct 2005 08:54:35 -0400 (EDT) From: zak@ircii.org (Zak) -update TODO-BUGS for things that really needs to be done, if anyone thinks they can do something in the highest priority todo please go ahead, it would be greatly appreciated ;), it would give us room to move on to other features and requests once we get these bugs all out of the way. -remove filter alias, as it conflicts with epic's $filter() -adjust a line for the new ASK-KEY in /about. -and probably some other changes i forgot but you'll see it in the diff(1) //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sat Oct 22 07:44:57 2005 +++ amn/CHANGES Sat Oct 22 08:48:51 2005 @@ -39,3 +39,8 @@ i do not know why these are being recommitted *grumble* //zak -add new ASK-KEY to /about and amn-fuq.txt amn-faq.txt done by xavier many thanks! //zak +-update TODO-BUGS //zak +-silence another yell we don't care about //zak +-remove /filter alias as if in the future we use the clients $filter() it + would cause complications so use /trickle. ;) //zak +-add a space for /about to make it look better //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Sat Oct 22 02:54:04 2005 +++ amn/TODO-BUGS Sat Oct 22 08:41:38 2005 @@ -12,22 +12,36 @@ up right, but if modeshow/extpub is enabled (@crapple) won't have inline colors. it'll show up as probably colorized brackets and modeshow format colors. but not inline nick colors. found by adam. thanks!. +$ /bwk does not show if the word is a kick or bwk after reloading. however + whatever it was set to works properly but it's kinda annoying when + everything outputs at bk when it's not actually set to bk. ## highest priority TODO. -fixdouble/fixwin or equiv for doublestats +-make userlist support * for all channels. +support #chan,#chan2,#chan3 +it should be easy just add a $split(, $chanlist) +and change the $match() to $rmatch() +or something along those lines +-better parses for /e /i outputs. +-fix up arrays regarding description/publics /format x y z etc... + seems to be some confusion and not outputting backgrounded channels + on most available formats and other weirdness. +-add a toggle to support bw or current theme(colors) in /relm and friends + also make it reparse through current theme for consistecy during usage. ## Higher priority requests. @ add a topiclock alias (like bitchx) for xavier. -@ add a module to bwk involving. - add repeat kick with option for # of repeats before kicking offender. - should be toggable to allow specified channel..while making usage of the - kickops var. - also add support to bwk to allow usage of wildcards. ## Procrastinated requests. @ rewrite topwin (removed to pasture). @ A way to specify ban types on a per-ban basis. Either /bkn, /bkh, etc or a flag to /kb? +@ add a module to bwk involving. + add repeat kick with option for # of repeats before kicking offender. + should be toggable to allow specified channel..while making usage of the + kickops var. + also add support to bwk to allow usage of wildcards. @ some more documentation updates. a couple of more menu help systems. @ a amnesiac FAQ would be nice... any volunteers? diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Sat Oct 22 02:50:56 2005 +++ amn/amn.epic Sat Oct 22 08:46:47 2005 @@ -66,6 +66,7 @@ ## proper yell silence. as we do not want to silence all yells. ## this is the beginning of a proper silence. ^on ^yell "File not found*" # +^on ^yell "*INFO*" # ## script echo ##still need to clean some of this up. alias abwecho xecho -v $acban $cparse($*) diff -aruN amn.orig/ans/about.ans amn/ans/about.ans --- amn.orig/ans/about.ans Sat Oct 22 07:43:44 2005 +++ amn/ans/about.ans Sat Oct 22 08:48:37 2005 @@ -6,6 +6,7 @@ d' `$$ $$,$ `$b'$$b. ,$$$'`$$bdP'.$$dbs s$$b .d$' d' ###### ,d$$b ###X#A#V#I#E#R##b`$$$$$'d####################`$$$$P' + Grtz To: void, Xavier, fudd, BlackJac, hop, criminal, krimson, twez, azel, violence, whitney, skullY, Alien88, eater, grimzy, kreca, adam, ryan diff -aruN amn.orig/core/trickle.m amn/core/trickle.m --- amn.orig/core/trickle.m Mon Oct 10 20:51:38 2005 +++ amn/core/trickle.m Sat Oct 22 08:42:22 2005 @@ -35,7 +35,6 @@ } ## trickle example swiss army knife features. -alias filter {trickle $*} alias tscan {trickle $C $* who} alias tdeop {trickle $C $* deop} alias top {trickle $C $* op} @@ -69,7 +68,6 @@ //echo /trickle #somechan *!*@*aol.com kill //echo /trickle #somechan *!ident@* voice //echo /trickle * wildcard is not working at this time. -//echo /filter is also aliased to trickle for those who can't remember the cmd. //echo --------------------------------------------------------------------- } Date: Sat, 22 Oct 2005 22:50:53 -0400 (EDT) From: zak@ircii.org (Zak) -add a whois_ident to show client has been identified for certain stupid lame networks and ircd's. i.e bahamut. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sat Oct 22 08:48:51 2005 +++ amn/CHANGES Sat Oct 22 22:48:34 2005 @@ -44,3 +44,4 @@ -remove /filter alias as if in the future we use the clients $filter() it would cause complications so use /trickle. ;) //zak -add a space for /about to make it look better //zak +-add format_whois_ident for lame ircd's i.e bahamut //zak diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Tue Oct 11 15:22:37 2005 +++ amn/core/fsets.m Sat Oct 22 22:28:02 2005 @@ -2,7 +2,7 @@ # See the 'COPYRIGHT' file for more information. subpackage fsets -@fwords=[format_scan_onjoin_nicks_border format_scan_nicks_border format_scan_onjoin_nicks format_scan_users_op format_scan_users_non format_scan_users_voc format_scan_users format_scan_header format_scan_nicks format_scan_footer format_timestamp_some format_who format_who_footer format_whois_signon format_whois_actual format_who format_whois_header format_whois_admin format_whois_nick format_whois_name format_whois_channels format_whois_server format_whois_away format_whois_operator format_whois_idle format_whois_unknown format_whois_footer format_whowas_header format_whowas_nick format_whowas_name format_whowas_unknown format_whowas_footer format_sort format_user_non format_chops format_bwall format_msg format_send_msg format_public format_send_public format_public_other format_signoff format_join format_leave format_mode format_notice format_public_notice format_send_notice format_send_dcc_chat format_dcc_chat format_topic format_topicunset format_notopic format_settopic format_topicby format_ctcp format_send_ctcp format_nick_comp format_sv format_wall format_away format_back format_action format_action_other format_desc format_send_desc format_wallop format_nickname format_invite format_dcc_connect format_dcc_request format_kick format_ctcp_reply format_server_notice format_dcc_lost_chat format_dcc_lost_file format_dcc_done_file] +@fwords=[format_scan_onjoin_nicks_border format_scan_nicks_border format_scan_onjoin_nicks format_scan_users_op format_scan_users_non format_scan_users_voc format_scan_users format_scan_header format_scan_nicks format_scan_footer format_timestamp_some format_who format_who_footer format_whois_signon format_whois_actual format_who format_whois_header format_whois_ident format_whois_admin format_whois_nick format_whois_name format_whois_channels format_whois_server format_whois_away format_whois_operator format_whois_idle format_whois_unknown format_whois_footer format_whowas_header format_whowas_nick format_whowas_name format_whowas_unknown format_whowas_footer format_sort format_user_non format_chops format_bwall format_msg format_send_msg format_public format_send_public format_public_other format_signoff format_join format_leave format_mode format_notice format_public_notice format_send_notice format_send_dcc_chat format_dcc_chat format_topic format_topicunset format_notopic format_settopic format_topicby format_ctcp format_send_ctcp format_nick_comp format_sv format_wall format_away format_back format_action format_action_other format_desc format_send_desc format_wallop format_nickname format_invite format_dcc_connect format_dcc_request format_kick format_ctcp_reply format_server_notice format_dcc_lost_chat format_dcc_lost_file format_dcc_done_file] ^on ^set "format_*" { if ([$0]) { if (!pattern(*$0* $fwords)) { @@ -204,6 +204,9 @@ } on ^330 * { xecho $fparse(format_whois_login $*) +} +on ^307 * { + xecho $fparse(format_whois_ident $*) } on ^308 * { xecho $fparse(format_whois_admin $1-) diff -aruN amn.orig/wis/whois.1 amn/wis/whois.1 --- amn.orig/wis/whois.1 Wed Jun 8 20:15:08 2005 +++ amn/wis/whois.1 Sat Oct 22 22:40:18 2005 @@ -7,6 +7,7 @@ ^sfset format_whois_away $(hblk)[$(c2)³$(hblk)] $(c2)a$(c1)way $(hblk)..$(cl) $1- ^sfset format_whois_actual $(hblk)[$(c2)³$(hblk)] $(c2)a$(c1)ctual $(hblk).. $(cl)$2 $msar(g/[/%K[%n/]/%K]%n/ $3) ^sfset format_whois_login $(hblk)[$(c2)³$(hblk)] $(c2)l$(c1)ogin $(hblk).. $(cl) as $3 +^sfset format_whois_ident $(hblk)[$(c2)³$(hblk)] $(c2)i$(c1)dent $(hblk).. $(cl) identified ^sfset format_whois_operator $(hblk)[$(c2)³$(hblk)] $(c2)o$(c1)perator $(hblk).. $(cl)$1 $2- %K[%nOperator%K] ^sfset format_whois_admin $(hblk)[$(c2)³$(hblk)] $(c2)a$(c1)dmin $(hblk).. $(cl)$1- ^sfset format_whois_idle $(hblk)[$(c2)³$(hblk)] $(c2)i$(c1)dle $(hblk).. $(cl)$tdiff($1) idle diff -aruN amn.orig/wis/whois.2 amn/wis/whois.2 --- amn.orig/wis/whois.2 Wed Oct 12 19:06:11 2005 +++ amn/wis/whois.2 Sat Oct 22 22:41:30 2005 @@ -6,6 +6,7 @@ ^sfset format_whois_away $(hblk)³ $(hwht)a$(cl)way $(hblk):$(cl) $1- ^sfset format_whois_actual $(hblk)³ $(hwht)a$(cl)ctual $(hblk): $(cl)$2 $msar(g/[/%K[%n/]/%K]%n/ $3) ^sfset format_whois_login $(hblk)³ $(hwht)l$(cl)ogin $(hblk): $(cl) as $3 +^sfset format_whois_ident $(hblk)³ $(hwht)i$(cl)dent $(hblk): $(cl) identified ^sfset format_whois_operator $(hblk)³ $(hwht)o$(cl)perator $(hblk): $(cl)$1 $2- %K[%nOperator%K] ^sfset format_whois_admin $(hblk)³ $(hwht)a$(cl)dmin $(hblk): $(cl)$1- ^sfset format_whois_idle $(hblk)³ $(hwht)i$(cl)dle $(hblk): $(cl)$tdiff($1) idle diff -aruN amn.orig/wis/whois.3 amn/wis/whois.3 --- amn.orig/wis/whois.3 Wed Jun 8 20:10:43 2005 +++ amn/wis/whois.3 Sat Oct 22 22:38:12 2005 @@ -6,6 +6,7 @@ ^sfset format_whois_away ³ away : $1- ^sfset format_whois_actual ³ actual : $2 $msar(g/[/%K[%n/]/%K]%n/ $3) ^sfset format_whois_login ³ login : as $3 +^sfset format_whois_ident ³ ident : identified ^sfset format_whois_operator ³ operator : $1 $2- ^sfset format_whois_admin ³ admin : $1- ^sfset format_whois_idle ³ idle : $tdiff($1) idle diff -aruN amn.orig/wis/whois.4 amn/wis/whois.4 --- amn.orig/wis/whois.4 Sat Aug 6 01:06:10 2005 +++ amn/wis/whois.4 Sat Oct 22 22:42:04 2005 @@ -6,6 +6,7 @@ ^sfset format_whois_away away : $1- ^sfset format_whois_actual actual : $2 $msar(g/[/%K[%n/]/%K]%n/ $3) ^sfset format_whois_login login : as $3 +^sfset format_whois_ident ident : identified ^sfset format_whois_operator operator : $1 $3 ^sfset format_whois_admin admin : $1- ^sfset format_whois_idle idle : $tdiff($1) idle diff -aruN amn.orig/wis/whois.5 amn/wis/whois.5 --- amn.orig/wis/whois.5 Wed Jun 8 19:59:28 2005 +++ amn/wis/whois.5 Sat Oct 22 22:43:14 2005 @@ -6,6 +6,7 @@ ^sfset format_whois_away *** away: $1- ^sfset format_whois_actual *** $1 actually $2 $msar(g/[/%K[%n/]/%K]%n/ $3) ^sfset format_whois_login *** $1 login as $3 +^sfset format_whois_ident *** $1 has identified ^sfset format_whois_operator *** $1 is an IRC Operator ^sfset format_whois_admin *** $1 is a Server Administrator ^sfset format_whois_idle *** idle: $tdiff($1) diff -aruN amn.orig/wis/whois.6 amn/wis/whois.6 --- amn.orig/wis/whois.6 Tue Aug 9 19:21:51 2005 +++ amn/wis/whois.6 Sat Oct 22 22:44:09 2005 @@ -6,6 +6,7 @@ ^sfset format_whois_away %BSetAway %n: $1- ^sfset format_whois_actual %BActually %n:%B $3 ^sfset format_whois_login %BLogin %n: $1 login as $3 +^sfset format_whois_ident %BIdent %n: $1 has identified ^sfset format_whois_operator %BIrcOp %n: $1 $2- ^sfset format_whois_admin %BIrcAdm %n: $1 is a Server Administrator ^sfset format_whois_idle %BIdle %n: $tdiff($1) diff -aruN amn.orig/wis/whois.7 amn/wis/whois.7 --- amn.orig/wis/whois.7 Wed Oct 12 19:06:11 2005 +++ amn/wis/whois.7 Sat Oct 22 22:46:11 2005 @@ -7,6 +7,7 @@ ^sfset format_whois_away $(hblk)<$(c2)³$(hblk)> $(c2)a$(c1)way $(hblk)..$(cl) $1- ^sfset format_whois_actual $(hblk)<$(c2)³$(hblk)> $(c2)a$(c1)ctual $(hblk).. $(cl)$2 $msar(g/[/%K[%n/]/%K]%n/ $3) ^sfset format_whois_login $(hblk)<$(c2)³$(hblk)> $(c2)l$(c1)ogin $(hblk).. $(cl) as $3 +^sfset format_whois_ident $(hblk)<$(c2)³$(hblk)> $(c2)i$(c1)dent $(hblk).. $(cl) identified ^sfset format_whois_operator $(hblk)<$(c2)³$(hblk)> $(c2)o$(c1)perator $(hblk).. $(cl)$1 $2- %K[%nOperator%K] ^sfset format_whois_admin $(hblk)<$(c2)³$(hblk)> $(c2)a$(c1)dmin $(hblk).. $(cl)$1- ^sfset format_whois_idle $(hblk)<$(c2)³$(hblk)> $(c2)i$(c1)dle $(hblk).. $(cl)$tdiff($1) idle Date: Sun, 23 Oct 2005 09:11:55 -0400 (EDT) From: zak@ircii.org (Zak) -silence another stupid yell. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sat Oct 22 22:48:34 2005 +++ amn/CHANGES Sun Oct 23 09:11:05 2005 @@ -44,4 +44,7 @@ -remove /filter alias as if in the future we use the clients $filter() it would cause complications so use /trickle. ;) //zak -add a space for /about to make it look better //zak + +10.23.05 -add format_whois_ident for lame ircd's i.e bahamut //zak +-silence another annoying yell. //zak diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Sat Oct 22 08:46:47 2005 +++ amn/amn.epic Sun Oct 23 01:04:12 2005 @@ -67,6 +67,7 @@ ## this is the beginning of a proper silence. ^on ^yell "File not found*" # ^on ^yell "*INFO*" # +^on ^yell "% *Mode parser or server*" # ## script echo ##still need to clean some of this up. alias abwecho xecho -v $acban $cparse($*) Date: Tue, 25 Oct 2005 16:10:24 -0400 (EDT) From: zak@ircii.org (Zak) -add another TODO after yelling at skullY on irc. maybe xavier could actually contribute his own request for once in his life e-mail: jak@ircii.org to get his attention or xavier@efnet. no xavier a zima theme doesn't count as a worthable contribution ;(. //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Sat Oct 22 08:41:38 2005 +++ amn/TODO-BUGS Tue Oct 25 16:07:01 2005 @@ -29,6 +29,9 @@ on most available formats and other weirdness. -add a toggle to support bw or current theme(colors) in /relm and friends also make it reparse through current theme for consistecy during usage. +-make /delchan #chan delete channel apparently some ppl are slow to + understand the meaning of /delchan # so i guess we should add in this + capability for users with that defect i.e Xavier. ## Higher priority requests. @ add a topiclock alias (like bitchx) for xavier. Date: Tue, 25 Oct 2005 16:32:04 -0400 (EDT) From: zak@ircii.org (Zak) -correct a todo to be more POLITICALLY CORRECT, apparently skullY really did make /adduser support * for channels and to think i thought he made a error in his syntax comment... first time i've ever been wrong in my life.. oh well there's always a first time for everything i guess ;D //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Tue Oct 25 16:07:01 2005 +++ amn/TODO-BUGS Tue Oct 25 16:29:52 2005 @@ -18,8 +18,7 @@ ## highest priority TODO. -fixdouble/fixwin or equiv for doublestats --make userlist support * for all channels. -support #chan,#chan2,#chan3 +-make userlist support /addchan #chan,#chan2,#chan3 we already support * it should be easy just add a $split(, $chanlist) and change the $match() to $rmatch() or something along those lines Date: Tue, 25 Oct 2005 19:00:59 -0400 (EDT) From: zak@ircii.org (Zak) -todo request with sample idea code to only output that you are away once in a blue moon not on every fscking line the person msg's you. however seems some ircd's will just ignore it and output it anyway just to piss us off. //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Tue Oct 25 16:29:52 2005 +++ amn/TODO-BUGS Tue Oct 25 18:58:41 2005 @@ -17,6 +17,23 @@ everything outputs at bk when it's not actually set to bk. ## highest priority TODO. +-DOUBLEHIGHESTPRIORITYREQUEST. make away only output irritating static + only once, and flush from time to time so if person msg's like 50mins + later it'll show you your away msg once again.. sample code for example. + taken from fudd, with his permission. +on ^301 "*" +{ + if (matchitem(misc.away_users $0) < 0) + { + echo $fparse(WHOIS_AWAY $*) + @ setitem(misc.away_users $numitems(misc.away_users) $0) + @ setitem(misc.away_users_ts $numitems(misc.away_users_ts) $time()) + } +} +^^NOTE: at least it may be possible that ratbox ircd's will output the +irriating damn away even when you have it silenced, perhaps there's a +workaround? //zak + -fixdouble/fixwin or equiv for doublestats -make userlist support /addchan #chan,#chan2,#chan3 we already support * it should be easy just add a $split(, $chanlist) diff -aruN amn.orig/modules/away/away.m amn/modules/away/away.m --- amn.orig/modules/away/away.m Mon Oct 10 20:51:38 2005 +++ amn/modules/away/away.m Tue Oct 25 18:49:28 2005 @@ -42,7 +42,6 @@ } } - on #-connect 1 * if (awaystat) { //away $awaymsg } Date: Wed, 26 Oct 2005 18:15:10 +0000 From: Zach White Fix the brokenness in scan.m. Make scan.5 work properly again. kreca says he'll fix the brokenness where /scan and on 366 have the same code copy and pasted, since he doesn't want to make /scan just call /names. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Oct 26 16:05:53 2005 +++ amn/CHANGES Wed Oct 26 18:13:58 2005 @@ -48,3 +48,8 @@ 10.23.05 -add format_whois_ident for lame ircd's i.e bahamut //zak -silence another annoying yell. //zak + +10.26.05 +-Fix all the scan.m garbage. I don't think that /scan should do anything + but call /names ($C|$*), but kreca says no leave that so he can fix that + part. //skullY diff amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Wed Oct 26 16:05:53 2005 +++ amn/core/scan.m Wed Oct 26 17:56:30 2005 @@ -3,38 +3,47 @@ subpackage scan ^on ^names * #- -alias fix.scan if ([$0]) { - @_t=[$[10]0] - @_t=msar(g/@/@/+/+/$_t) - @function_return=_t + +alias fix.scan { + if ([$0]) { + @_t=[$[10]0] + @_t=msar(g/@/@/+/+/$_t) + @function_return=_t }{ - @function_return=[$[10]empty_string] + @function_return=[$[10]empty_string] + } } - -alias fix.scan2 if ([$0]) { - @_t=[$[11]0] - @_t=msar(g/.?/ /@+/@/@./@/@?/@/.+/+/../ /$strip(/ $(_t))) - @function_return=_t}{@function_return=[$[10]empty_string] +alias fix.scan2 { + if ([$0]) { + @_t=[$[11]0] + @_t=msar(g/.?/ /@+/@/@./@/@?/@/.+/+/../ /$strip(/ $(_t))) + @function_return=_t}{@function_return=[$[10]empty_string] + } } -alias fix.scan3 if ([$0]) { - @_t=[$0] - @_t=msar(g/.?/ /@+/@/@./@/@?/@/.+/+/../ /$strip(/ $(_t))) - @function_return=_t +alias fix.scan3 { + if ([$0]) { + @_t=[$0] + @_t=msar(g/.?/ /@+/@/@./@/@?/@/.+/+/../ /$strip(/ $(_t))) + @function_return=_t + } } -alias fix.scan4 if ([$0]) { - @_t=[$[11]0] - @_t=msar(g/.?/ /@+/$(hcyn)@$(cl)/@./$(hcyn)@$(cl)/@?/$(hcyn)@$(cl)/.+/$(hcyn)+$(cl)/../ /$strip(/ $(_t))) - @function_return=_t}{@function_return=[$[10]empty_string] +alias fix.scan4 { + if ([$0]) { + @_t=[$[11]0] + @_t=msar(g/.?/ /@+/$(hcyn)@$(cl)/@./$(hcyn)@$(cl)/@?/$(hcyn)@$(cl)/.+/$(hcyn)+$(cl)/../ /$strip(/ $(_t))) + @function_return=_t}{@function_return=[$[10]empty_string] + } } ### propz to robohak for clueing me into using the 366 numeric for nick list +/* Why are we doing this? -skullY on ^366 * #- +*/ on #^353 1 * {@nicks#=[$3-]} on ^366 "*" { - ^local scan1 ^push scan1 $pattern(*@* $nicks) ^push scan1 $pattern(*+* $nicks) @@ -43,91 +52,104 @@ @nicks.voc=pattern(*+* $nicks) @nicks.non=filter(*+* $filter(*@* $nicks)) - ^xecho $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $1) - if (format_scan_header) { - ^xecho $fparse(format_scan_header) - } - @_swidth=[${word(0 $geom()) / format_scan_width}] - fe ($jot(1 $_swidth)) n1 { - ^push _nlist nlist.$n1 - ^push _nlist2 \$fparse\(format_scan_onjoin_nicks \$nlist\.$n1) - } - fe ($scan1) $_nlist { - eval xecho $$fparse(format_scan_onjoin_nicks_border) $_nlist2 - } - ^assign -_nlist;^assign -_nlist2 - - if (format_scan_footer) { - ^xecho $fparse(format_scan_footer) - } + ^xecho $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $1) + if (format_scan_header) { + ^xecho $fparse(format_scan_header) + } + if (format_scan_width > 1) { + @_swidth=[${word(0 $geom()) / format_scan_width}] + }{ + @_swidth=#nicks.ops + #nicks.non + #nicks.voc + } + fe ($jot(1 $_swidth)) n1 { + ^push _nlist _nlist.$n1 + ^push _nlist2 \$fparse\(format_scan_onjoin_nicks \$_nlist\.$n1) + } + fe ($scan1) $_nlist { + if (format_scan_onjoin_nicks_border) { + eval xecho $$fparse(format_scan_onjoin_nicks_border) $_nlist2 + }{ + eval xecho $_nlist2 + } + } + ^assign -_nlist;^assign -_nlist2 + + if (format_scan_footer) { + ^xecho $fparse(format_scan_footer) + } ^assign -nicks;assign -scan1 } alias scan { if ([$0]) { - @ chan = [$0] + @ chan = [$0] }{ - @ chan = [$C] + @ chan = [$C] } ^local ops 0 - ^local voc 0 - ^local non 0 + ^local voc 0 + ^local non 0 ^push scan1 $pattern(*@* $channel($chan)) ^push scan1 $pattern(*.+* $channel($chan)) - ^push scan1 $pattern(..* $channel($chan)) + ^push scan1 $pattern(..* $channel($chan)) ^push scan1 $pattern(.\\?* $channel($chan)) @nicks.ops=pattern(*@* $channel($chan)) @nicks.voc=pattern(*.+* $channel($chan)) @nicks.non=pattern(*..* $channel($chan)) - ^xecho $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $chan) - if (format_scan_header) { - ^xecho $fparse(format_scan_header) - } - @_swidth=[${word(0 $geom()) / format_scan_width}] - fe ($jot(1 $_swidth)) n1 { - ^push _nlist nlist.$n1 - ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) - - } - fe ($scan1) $_nlist { - eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 - } - ^assign -_nlist;^assign -_nlist2 - if (format_scan_footer) { - ^xecho $fparse(format_scan_footer) - } + ^xecho $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $chan) + if (format_scan_header) { + ^xecho $fparse(format_scan_header) + } + @_swidth=[${word(0 $geom()) / format_scan_width}] + fe ($jot(1 $_swidth)) n1 { + ^push _nlist nlist.$n1 + ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) + } + fe ($scan1) $_nlist { + if (format_scan_onjoin_nicks_border) { + eval xecho $$fparse(format_scan_nicks_border) $_nlist2 + }{ + eval xecho $_nlist2 + } + } + ^assign -_nlist;^assign -_nlist2 + if (format_scan_footer) { + ^xecho $fparse(format_scan_footer) + } ^assign -nicks;^assign -scan1 } - - alias sco { if ([$0]) { - @chan=[$0] + @chan=[$0] }{ - @chan=[$C] + @chan=[$C] } - ^local nicks.ops 0 + ^local nicks.ops 0 ^push scan1 $pattern(*@* $channel($chan)) @nicks.ops=chops($chan) ^xecho $fparse(format_scan_users_op $#nicks.ops $chan) - if (format_scan_header) { - ^xecho $fparse(format_scan_header) - } - @_swidth=[${word(0 $geom()) / format_scan_width}] - fe ($jot(1 $_swidth)) n1 { - ^push _nlist nlist.$n1 - ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) - } - fe ($scan1) $_nlist { - eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 - } - ^assign -_nlist;^assign -_nlist2 + if (format_scan_header) { + ^xecho $fparse(format_scan_header) + } + if (format_scan_width > 1) { + @_swidth=[${word(0 $geom()) / format_scan_width}] + }{ + @_swidth=#nicks.ops + #nicks.non + #nicks.voc + } + fe ($jot(1 $_swidth)) n1 { + ^push _nlist nlist.$n1 + ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) + } + fe ($scan1) $_nlist { + eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 + } + ^assign -_nlist;^assign -_nlist2 - if (format_scan_footer) { - ^xecho $fparse(format_scan_footer) - } + if (format_scan_footer) { + ^xecho $fparse(format_scan_footer) + } ^assign -nicks.ops;^assign -scan1 } @@ -135,63 +157,70 @@ alias scn { if ([$0]) { - @chan=[$0] + @chan=[$0] }{ - @chan=[$C] + @chan=[$C] } - ^local nicks.non 0 + ^local nicks.non 0 ^push scan1 $pattern(*..* $channel($chan)) - ^push scan1 $pattern(*.+* $channel($chan)) + ^push scan1 $pattern(*.+* $channel($chan)) ^push scan1 $pattern(.\\?* $channel($chan)) @nicks.non=nochops($chan) - xecho $fparse(format_scan_users_non $#nicks.non $chan) - if (format_scan_header) { - ^xecho $fparse(format_scan_header) - } - @_swidth=[${word(0 $geom()) / format_scan_width}] - fe ($jot(1 $_swidth)) n1 { - ^push _nlist nlist.$n1 - ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) - - } - fe ($scan1) $_nlist { - eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 - } - ^assign -_nlist;^assign -_nlist2 + xecho $fparse(format_scan_users_non $#nicks.non $chan) + if (format_scan_header) { + ^xecho $fparse(format_scan_header) + } + if (format_scan_width > 1) { + @_swidth=[${word(0 $geom()) / format_scan_width}] + }{ + @_swidth=#nicks.ops + #nicks.non + #nicks.voc + } + fe ($jot(1 $_swidth)) n1 { + ^push _nlist nlist.$n1 + ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) + } + fe ($scan1) $_nlist { + eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 + } + ^assign -_nlist;^assign -_nlist2 - if (format_scan_footer) { - ^xecho $fparse(format_scan_footer) - } + if (format_scan_footer) { + ^xecho $fparse(format_scan_footer) + } ^assign -scan1;^assign -chan;^assign -nicks.non } alias scv { if ([$0]) { - @chan=[$0] + @chan=[$0] }{ - @chan=[$C] + @chan=[$C] } - ^local nicks.voc 0 - ^push scan1 $pattern(*.+* $channel($chan)) + ^local nicks.voc 0 + ^push scan1 $pattern(*.+* $channel($chan)) @nicks.voc=pattern(*.+* $channel($chan)) - ^xecho $fparse(format_scan_users_voc $#nicks.voc $chan) - if (format_scan_header) { - xecho $fparse(format_scan_header) - } - @_swidth=[${word(0 $geom()) / format_scan_width}] - fe ($jot(1 $_swidth)) n1 { - ^push _nlist nlist.$n1 - ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) - } - fe ($scan1) $_nlist { - eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 - } - ^assign -_nlist;^assign -_nlist2 + ^xecho $fparse(format_scan_users_voc $#nicks.voc $chan) + if (format_scan_header) { + xecho $fparse(format_scan_header) + } + if (format_scan_width > 1) { + @_swidth=[${word(0 $geom()) / format_scan_width}] + }{ + @_swidth=#nicks.ops + #nicks.non + #nicks.voc + } + fe ($jot(1 $_swidth)) n1 { + ^push _nlist nlist.$n1 + ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) + } + fe ($scan1) $_nlist { + eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 + } + ^assign -_nlist;^assign -_nlist2 - if (format_scan_footer) { - ^xecho $fparse(format_scan_footer) - } + if (format_scan_footer) { + ^xecho $fparse(format_scan_footer) + } ^assign -scan1;^assign -chan;^assign -nicks.voc } @@ -199,14 +228,29 @@ alias sformat { switch ($0) { - (1) {@snf=1;^eval load ${loadpath}sc/scan.1} - (2) {@snf=2;^eval load ${loadpath}sc/scan.2} - (3) {@snf=3;^eval load ${loadpath}sc/scan.3} - (4) {@snf=4;^eval load ${loadpath}sc/scan.4} - (5) {@snf=5;^eval load ${loadpath}sc/scan.5} - (6) {@snf=6;^eval load ${loadpath}sc/scan.6} - (7) {@snf=7;^eval load ${loadpath}sc/scan.7} + (1) { + @snf=1;^eval load ${loadpath}sc/scan.1 + } + (2) { + @snf=2;^eval load ${loadpath}sc/scan.2 + } + (3) { + @snf=3;^eval load ${loadpath}sc/scan.3 + } + (4) { + @snf=4;^eval load ${loadpath}sc/scan.4 + } + (5) { + @snf=5;^eval load ${loadpath}sc/scan.5 + } + (6) { + @snf=6;^eval load ${loadpath}sc/scan.6 + } + (7) { + @snf=7;^eval load ${loadpath}sc/scan.7 + } } - xecho $acban scan format set to $(snf) + xecho $acban scan format set to $(snf) } + oof diff amn.orig/modules/vanilla/vanilla.m amn/modules/vanilla/vanilla.m --- amn.orig/modules/vanilla/vanilla.m Wed Oct 26 16:05:53 2005 +++ amn/modules/vanilla/vanilla.m Wed Oct 26 18:05:43 2005 @@ -12,5 +12,12 @@ window -1 level ALL alias echo xecho -v $* +alias sc { + if ([$*]) { + names $* + }{ + names $C + } +} set clock_24hour on diff amn.orig/sc/scan.5 amn/sc/scan.5 --- amn.orig/sc/scan.5 Wed Oct 26 16:05:53 2005 +++ amn/sc/scan.5 Wed Oct 26 18:10:43 2005 @@ -2,15 +2,15 @@ # See the 'COPYRIGHT' file for more information. subpackage scan5 -@format_scan_users=[*** Users on $$4] +@format_scan_users=[$$banner Users on $$4:] @format_scan_width=1 ^assign -format_scan_header -@format_scan_onjoin_nicks=[ $$1] +@format_scan_onjoin_nicks=[$$1] @format_scan_nicks=[$$fix.scan3($1)] +@format_scan_onjoin_nicks_border=[$$banner] +@format_scan_nicks_border=[$$banner] ^assign -format_scan_footer -^assign -format_scan_nicks_border -^assign -format_scan_onjoin_nicks_border -@format_scan_users_op=[*** Users on $$4] -@format_scan_users_non=[*** Users on $$4] -@format_scan_users_voc=[*** Users on $$4] +@format_scan_users_op=[$$banner Users on $$2:] +@format_scan_users_non=[$$banner Users on $$2:] +@format_scan_users_voc=[$$banner Users on $$2:] From: Kreca Date: Wed, 26 Oct 2005 22:08:29 +0200 (CEST) Big cleanups to scan.m and sc directory. Check CHANGES for more info diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Oct 26 20:13:58 2005 +++ amn/CHANGES Wed Oct 26 22:05:48 2005 @@ -53,3 +53,7 @@ -Fix all the scan.m garbage. I don't think that /scan should do anything but call /names ($C|$*), but kreca says no leave that so he can fix that part. //skullY +-Big cleanup to scan.m, make /sco /scv /scn /scan on ^366 all use the same + alias to print scans. Get rid of the redundant formats + format_scan_onjoin_nicks_border and format_scan_onjoin_nicks. + This fixes what skully wanted to do in the comment above //kreca diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Sun Oct 23 04:28:02 2005 +++ amn/core/fsets.m Wed Oct 26 21:54:52 2005 @@ -2,7 +2,7 @@ # See the 'COPYRIGHT' file for more information. subpackage fsets -@fwords=[format_scan_onjoin_nicks_border format_scan_nicks_border format_scan_onjoin_nicks format_scan_users_op format_scan_users_non format_scan_users_voc format_scan_users format_scan_header format_scan_nicks format_scan_footer format_timestamp_some format_who format_who_footer format_whois_signon format_whois_actual format_who format_whois_header format_whois_ident format_whois_admin format_whois_nick format_whois_name format_whois_channels format_whois_server format_whois_away format_whois_operator format_whois_idle format_whois_unknown format_whois_footer format_whowas_header format_whowas_nick format_whowas_name format_whowas_unknown format_whowas_footer format_sort format_user_non format_chops format_bwall format_msg format_send_msg format_public format_send_public format_public_other format_signoff format_join format_leave format_mode format_notice format_public_notice format_send_notice format_send_dcc_chat format_dcc_chat format_topic format_topicunset format_notopic format_settopic format_topicby format_ctcp format_send_ctcp format_nick_comp format_sv format_wall format_away format_back format_action format_action_other format_desc format_send_desc format_wallop format_nickname format_invite format_dcc_connect format_dcc_request format_kick format_ctcp_reply format_server_notice format_dcc_lost_chat format_dcc_lost_file format_dcc_done_file] +@fwords=[format_scan_nicks_border format_scan_users_op format_scan_users_non format_scan_users_voc format_scan_users format_scan_header format_scan_nicks format_scan_footer format_timestamp_some format_who format_who_footer format_whois_signon format_whois_actual format_who format_whois_header format_whois_ident format_whois_admin format_whois_nick format_whois_name format_whois_channels format_whois_server format_whois_away format_whois_operator format_whois_idle format_whois_unknown format_whois_footer format_whowas_header format_whowas_nick format_whowas_name format_whowas_unknown format_whowas_footer format_sort format_user_non format_chops format_bwall format_msg format_send_msg format_public format_send_public format_public_other format_signoff format_join format_leave format_mode format_notice format_public_notice format_send_notice format_send_dcc_chat format_dcc_chat format_topic format_topicunset format_notopic format_settopic format_topicby format_ctcp format_send_ctcp format_nick_comp format_sv format_wall format_away format_back format_action format_action_other format_desc format_send_desc format_wallop format_nickname format_invite format_dcc_connect format_dcc_request format_kick format_ctcp_reply format_server_notice format_dcc_lost_chat format_dcc_lost_file format_dcc_done_file] ^on ^set "format_*" { if ([$0]) { if (!pattern(*$0* $fwords)) { diff -aruN amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Wed Oct 26 19:56:30 2005 +++ amn/core/scan.m Wed Oct 26 21:49:01 2005 @@ -37,47 +37,65 @@ @function_return=_t}{@function_return=[$[10]empty_string] } } - -### propz to robohak for clueing me into using the 366 numeric for nick list -/* Why are we doing this? -skullY -on ^366 * #- -*/ -on #^353 1 * {@nicks#=[$3-]} -on ^366 "*" { +alias printnames { + @:lnick=sar(g/?//$sar(g/.//$2-)) + @:lchan=[$1] + @:printstats=[$0] ^local scan1 - ^push scan1 $pattern(*@* $nicks) - ^push scan1 $pattern(*+* $nicks) - ^push scan1 $filter(*+* $filter(*@* $nicks)) - @nicks.ops=pattern(*@* $nicks) - @nicks.voc=pattern(*+* $nicks) - @nicks.non=filter(*+* $filter(*@* $nicks)) - - ^xecho $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $1) + ^push scan1 $pattern(*@* $lnick) + ^push scan1 $pattern(*+* $lnick) + ^push scan1 $filter(*+* $filter(*@* $lnick)) + @nicks.ops=pattern(*@* $lnick) + @nicks.voc=pattern(*+* $lnick) + @nicks.non=filter(*+* $filter(*@* $lnick)) + + if (prinstats) { + ^xecho -w $winchan($lchan) -- $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $lchan) + } if (format_scan_header) { - ^xecho $fparse(format_scan_header) + ^xecho -w $winchan($lchan) -- $fparse(format_scan_header) } if (format_scan_width > 1) { @_swidth=[${word(0 $geom()) / format_scan_width}] }{ @_swidth=#nicks.ops + #nicks.non + #nicks.voc } + /* + This piece of code is a real bitch + took me a long time to figure out what it does do + first for each builds up two variables looking like this + @_nlist=[_nlist.1 _nlist.2 _nlist.3 ...] up to $_swidth + @_nlist2=[$fparse(form... $_nlist.1) $fparse(form... $_nlist.2) ...] + + then it does a fe ($channel_nick_list) _nlist.1 _nlist.2 ... { + xecho $_nlist.1 $_nlist.2 $_nlist.3 ... <--- _nlist2 simplified + } + + this is the most obscure lines of code I've ever seen, + hence the explanation. Someone has been smoking crack! + //Kreca + */ fe ($jot(1 $_swidth)) n1 { ^push _nlist _nlist.$n1 - ^push _nlist2 \$fparse\(format_scan_onjoin_nicks \$_nlist\.$n1) + ^push _nlist2 \$fparse\(format_scan_nicks \$_nlist\.$n1) } fe ($scan1) $_nlist { - if (format_scan_onjoin_nicks_border) { - eval xecho $$fparse(format_scan_onjoin_nicks_border) $_nlist2 + if (format_scan_nicks_border) { + eval ^xecho -w $winchan($lchan) -- $$fparse(format_scan_nicks_border) $_nlist2 }{ - eval xecho $_nlist2 + eval ^xecho -w $winchan($lchan) -- $_nlist2 } } - ^assign -_nlist;^assign -_nlist2 - if (format_scan_footer) { - ^xecho $fparse(format_scan_footer) + ^xecho -w $winchan($lchan) -- $fparse(format_scan_footer) } - ^assign -nicks;assign -scan1 + ^assign -_nlist;^assign -_nlist2 +} +### propz to robohak for clueing me into using the 366 numeric for nick list +on #^353 1 * {@nicks#=[$3-]} +on ^366 "*" { + printnames 1 $1 $nicks + assign -nicks; } @@ -87,37 +105,7 @@ }{ @ chan = [$C] } - ^local ops 0 - ^local voc 0 - ^local non 0 - ^push scan1 $pattern(*@* $channel($chan)) - ^push scan1 $pattern(*.+* $channel($chan)) - ^push scan1 $pattern(..* $channel($chan)) - ^push scan1 $pattern(.\\?* $channel($chan)) - @nicks.ops=pattern(*@* $channel($chan)) - @nicks.voc=pattern(*.+* $channel($chan)) - @nicks.non=pattern(*..* $channel($chan)) - ^xecho $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $chan) - if (format_scan_header) { - ^xecho $fparse(format_scan_header) - } - @_swidth=[${word(0 $geom()) / format_scan_width}] - fe ($jot(1 $_swidth)) n1 { - ^push _nlist nlist.$n1 - ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) - } - fe ($scan1) $_nlist { - if (format_scan_onjoin_nicks_border) { - eval xecho $$fparse(format_scan_nicks_border) $_nlist2 - }{ - eval xecho $_nlist2 - } - } - ^assign -_nlist;^assign -_nlist2 - if (format_scan_footer) { - ^xecho $fparse(format_scan_footer) - } - ^assign -nicks;^assign -scan1 + printnames 1 $chan $channel($chan) } alias sco { @@ -126,31 +114,8 @@ }{ @chan=[$C] } - ^local nicks.ops 0 - ^push scan1 $pattern(*@* $channel($chan)) - @nicks.ops=chops($chan) - ^xecho $fparse(format_scan_users_op $#nicks.ops $chan) - if (format_scan_header) { - ^xecho $fparse(format_scan_header) - } - if (format_scan_width > 1) { - @_swidth=[${word(0 $geom()) / format_scan_width}] - }{ - @_swidth=#nicks.ops + #nicks.non + #nicks.voc - } - fe ($jot(1 $_swidth)) n1 { - ^push _nlist nlist.$n1 - ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) - } - fe ($scan1) $_nlist { - eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 - } - ^assign -_nlist;^assign -_nlist2 - - if (format_scan_footer) { - ^xecho $fparse(format_scan_footer) - } - ^assign -nicks.ops;^assign -scan1 + ^xecho -w $winchan($lchan) -- $fparse(format_scan_users_op $#channel($chan) $chan) + printnames 0 $chan $pattern(*@* $channel($chan)) } @@ -161,35 +126,14 @@ }{ @chan=[$C] } - ^local nicks.non 0 - ^push scan1 $pattern(*..* $channel($chan)) - ^push scan1 $pattern(*.+* $channel($chan)) - ^push scan1 $pattern(.\\?* $channel($chan)) - @nicks.non=nochops($chan) - xecho $fparse(format_scan_users_non $#nicks.non $chan) - if (format_scan_header) { - ^xecho $fparse(format_scan_header) - } - if (format_scan_width > 1) { - @_swidth=[${word(0 $geom()) / format_scan_width}] - }{ - @_swidth=#nicks.ops + #nicks.non + #nicks.voc - } - fe ($jot(1 $_swidth)) n1 { - ^push _nlist nlist.$n1 - ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) - } - fe ($scan1) $_nlist { - eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 - } - ^assign -_nlist;^assign -_nlist2 - + ^local lscan + ^push lscan $pattern(*..* $channel($chan)) + ^push lscan $pattern(*.+* $channel($chan)) + ^push lscan $pattern(.\\?* $channel($chan)) + ^xecho -w $winchan($lchan) -- $fparse(format_scan_users_non $#nochops($chan) $chan) + printnames 0 $chan $lscan +} - if (format_scan_footer) { - ^xecho $fparse(format_scan_footer) - } - ^assign -scan1;^assign -chan;^assign -nicks.non -} alias scv { if ([$0]) { @@ -197,31 +141,8 @@ }{ @chan=[$C] } - ^local nicks.voc 0 - ^push scan1 $pattern(*.+* $channel($chan)) - @nicks.voc=pattern(*.+* $channel($chan)) - ^xecho $fparse(format_scan_users_voc $#nicks.voc $chan) - if (format_scan_header) { - xecho $fparse(format_scan_header) - } - if (format_scan_width > 1) { - @_swidth=[${word(0 $geom()) / format_scan_width}] - }{ - @_swidth=#nicks.ops + #nicks.non + #nicks.voc - } - fe ($jot(1 $_swidth)) n1 { - ^push _nlist nlist.$n1 - ^push _nlist2 \$fparse\(format_scan_nicks \$nlist\.$n1) - } - fe ($scan1) $_nlist { - eval ^xecho $$fparse(format_scan_nicks_border) $_nlist2 - } - ^assign -_nlist;^assign -_nlist2 - - if (format_scan_footer) { - ^xecho $fparse(format_scan_footer) - } - ^assign -scan1;^assign -chan;^assign -nicks.voc + ^xecho -w $winchan($lchan) -- $fparse(format_scan_users_voc $#pattern(*.+* $channel($chan)) $chan) + printnames 0 $chan $pattern(*.+* $channel($chan)) } diff -aruN amn.orig/sc/scan.1 amn/sc/scan.1 --- amn.orig/sc/scan.1 Mon Oct 3 05:32:24 2005 +++ amn/sc/scan.1 Wed Oct 26 21:49:18 2005 @@ -7,8 +7,6 @@ @format_scan_header=[$$(hblk)$$(c1)Ú$$(hblk)ÄÄ$$(c1)ÄÄÄÄÄÄÄ$$(hblk)ÄÄÄ-Ä$$(c1)--$$(hblk)Ä-ÄÄ$$(c1)ÄÄÄÄÄ$$(hblk)-Ä$$(c1)ÄÄÄ$$(hblk)--$$(c1)Ä$$(hblk)-ÄÄÄÄÄÄ] @format_scan_nicks_border=[$$(hblk)³ ] @format_scan_nicks=[ $$(hblk)\\\($$(cl)$$fix.scan2($1)$$(hblk))] -@format_scan_onjoin_nicks_border=[$$(hblk)³ ] -@format_scan_onjoin_nicks=[ $$(hblk)\\\($$(cl)$$fix.scan($1)$$(hblk))] @format_scan_footer=[$$(hblk)$$(c1)ÀÄ---Ä$$(hblk)ÄÄÄ$$(c1)Ä--] @format_scan_users_op=[$$(hblk)[$$(cl)ops\\\($$(hwht)$$1$$(cl))$$(hblk)]] @format_scan_users_non=[$$(hblk)[$$(cl)non\\\($$(hwht)$$1$$(cl))$$(hblk)]] diff -aruN amn.orig/sc/scan.2 amn/sc/scan.2 --- amn.orig/sc/scan.2 Tue Oct 18 12:42:23 2005 +++ amn/sc/scan.2 Wed Oct 26 21:49:52 2005 @@ -5,8 +5,6 @@ @format_scan_users=[ $$(hblk)[$$(c1)o$$(hblk)!$$(wht)$$1$(cl)$$(hblk)] $$(hblk)[$$(c1)n$$(hblk)!$$(wht)$$2$$(hblk)] $$(hblk)[$$(c1)v$$(hblk)!$$(wht)$$3$$(hblk)]] @format_scan_width=15 @format_scan_header=[ $$(hwht)ÚÄÄ$$(cl)Ä$$(hwht)Ä$$(cl)ÄÄÄÄÄ$$(c1)ÄÄ-ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ$$(hblk)ÄÄÄÄÄÄÄÄÄÄÄ-] -@format_scan_onjoin_nicks_border=[$$(hblk)[$$(c1)³$$(hblk)]] -@format_scan_onjoin_nicks=[$$(hblk)[$$(cl)$$fix.scan($1)$$(hblk)]] @format_scan_nicks_border=[$$(hblk)[$$(c1)³$$(hblk)] @format_scan_nicks=[$$(hblk)[$$(cl)$$fix.scan2($1)$$(hblk)] @format_scan_footer=[ $$(c1)À-$$(hblk)----ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ----ÄÄ Ä ÄÄÄ] diff -aruN amn.orig/sc/scan.3 amn/sc/scan.3 --- amn.orig/sc/scan.3 Mon Oct 3 05:32:42 2005 +++ amn/sc/scan.3 Wed Oct 26 21:51:06 2005 @@ -5,11 +5,9 @@ @format_scan_users=[ Users on $$4 \\\(o:$$1) \\\(n:$$2) \\\(v:$$3) @format_scan_width=15 ^assign -format_scan_header -@format_scan_onjoin_nicks=[ $$[13]1] @format_scan_nicks=[ $$[13]fix.scan3($1)] ^assign -format_scan_footer ^assign -format_scan_nicks_border -^assign -format_scan_onjoin_nicks_border @format_scan_users_op=[ \\\(o:$$1)] @format_scan_users_non=[ \\\(n:$$1)] @format_scan_users_voc=[ \\\(v:$$1)] diff -aruN amn.orig/sc/scan.4 amn/sc/scan.4 --- amn.orig/sc/scan.4 Mon Oct 3 05:32:50 2005 +++ amn/sc/scan.4 Wed Oct 26 21:52:16 2005 @@ -6,10 +6,8 @@ @format_scan_width=15 ^assign -format_scan_header ^assign -format_scan_nicks_border -@format_scan_onjoin_nicks=[ $$(hblk)[$$(cl)$$fix.scan($1)$$(hblk)]] @format_scan_nicks=[ $$(hblk)[$$(cl)$$fix.scan2($1)$$(hblk)]] ^assign -format_scan_footer -^assign -format_scan_onjoin_nicks_border @format_scan_users_op=[ $$(hblk)[$$(c1)o$$(hblk)!$$(wht)$$1$$(cl)$$(hblk)]] @format_scan_users_non=[ $$(hblk)[$$(c1)n$$(hblk)!$$(wht)$$1$$(hblk)]] @format_scan_users_voc=[ $$(hblk)[$$(c1)v$$(hblk)!$$(wht)$$1$$(hblk)]] diff -aruN amn.orig/sc/scan.5 amn/sc/scan.5 --- amn.orig/sc/scan.5 Wed Oct 26 20:10:43 2005 +++ amn/sc/scan.5 Wed Oct 26 21:52:55 2005 @@ -5,9 +5,7 @@ @format_scan_users=[$$banner Users on $$4:] @format_scan_width=1 ^assign -format_scan_header -@format_scan_onjoin_nicks=[$$1] -@format_scan_nicks=[$$fix.scan3($1)] -@format_scan_onjoin_nicks_border=[$$banner] +@format_scan_nicks=[$$1] @format_scan_nicks_border=[$$banner] ^assign -format_scan_footer @format_scan_users_op=[$$banner Users on $$2:] diff -aruN amn.orig/sc/scan.6 amn/sc/scan.6 --- amn.orig/sc/scan.6 Wed Oct 26 18:31:49 2005 +++ amn/sc/scan.6 Wed Oct 26 21:54:19 2005 @@ -6,10 +6,8 @@ @format_scan_width=15 ^assign -format_scan_header ^assign -format_scan_nicks_border -@format_scan_onjoin_nicks=[ [$$fix.scan($1)]] @format_scan_nicks=[ $$fix.scan2($1)] ^assign -format_scan_footer -^assign -format_scan_onjoin_nicks_border @format_scan_users_op=[ o!$$1] @format_scan_users_non=[ n!$$1] @format_scan_users_voc=[ v!$$1] diff -aruN amn.orig/sc/scan.7 amn/sc/scan.7 --- amn.orig/sc/scan.7 Thu Oct 13 01:06:11 2005 +++ amn/sc/scan.7 Wed Oct 26 21:54:28 2005 @@ -5,8 +5,6 @@ @format_scan_users=[ $$(hblk)<$$(c1)o$$(hblk)!$$(wht)$$1$(cl)$$(hblk)> $$(hblk)<$$(c1)n$$(hblk)!$$(wht)$$2$$(hblk)> $$(hblk)<$$(c1)v$$(hblk)!$$(wht)$$3$$(hblk)>] @format_scan_width=15 @format_scan_header=[ $$(hwht)ÚÄÄ$$(cl)Ä$$(hwht)Ä$$(cl)ÄÄÄÄÄ$$(c1)ÄÄ-ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ$$(hblk)ÄÄÄÄÄÄÄÄÄÄÄ-] -@format_scan_onjoin_nicks_border=[$$(hblk)<$$(c1)³$$(hblk)>] -@format_scan_onjoin_nicks=[$$(hblk)<$$(cl)$$fix.scan($1)$$(hblk)>] @format_scan_nicks_border=[$$(hblk)<$$(c1)³$$(hblk)>] @format_scan_nicks=[$$(hblk)<$$(cl)$$fix.scan2($1)$$(hblk)>] @format_scan_footer=[ $$(c1)À-$$(hblk)----ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ----ÄÄ Ä ÄÄÄ] From: Kreca Date: Wed, 26 Oct 2005 22:21:54 +0200 (CEST) Fix small typo that made /scan output miss to print out the header No need to mention this in the CHANGES file diff -aruN amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Wed Oct 26 21:49:01 2005 +++ amn/core/scan.m Wed Oct 26 22:18:41 2005 @@ -49,7 +49,7 @@ @nicks.voc=pattern(*+* $lnick) @nicks.non=filter(*+* $filter(*@* $lnick)) - if (prinstats) { + if (printstats) { ^xecho -w $winchan($lchan) -- $fparse(format_scan_users $#nicks.ops $#nicks.non $#nicks.voc $lchan) } if (format_scan_header) { From: Kreca Date: Wed, 26 Oct 2005 23:10:19 +0200 (CEST) Make more changes to scan.m . The fix.scan functions were hopelessly designed. Clean em up and add a new function: fix.nick which pads the nick name accordingly. This should now make the scan behaviour work as it always has. diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Oct 26 22:05:48 2005 +++ amn/CHANGES Wed Oct 26 23:06:51 2005 @@ -56,4 +56,4 @@ -Big cleanup to scan.m, make /sco /scv /scn /scan on ^366 all use the same alias to print scans. Get rid of the redundant formats format_scan_onjoin_nicks_border and format_scan_onjoin_nicks. - This fixes what skully wanted to do in the comment above //kreca + This fixes what skully wanted to do in the comment above //kreca diff -aruN amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Wed Oct 26 22:18:41 2005 +++ amn/core/scan.m Wed Oct 26 23:04:18 2005 @@ -4,6 +4,14 @@ ^on ^names * #- +alias fix.nick { + if (left(1 $*) != [@] && left(1 $*) != [+]) { + @function_return=[ $[10]*] + } { + @function_return=[$[11]*] + } +} + alias fix.scan { if ([$0]) { @_t=[$[10]0] @@ -15,28 +23,22 @@ } alias fix.scan2 { - if ([$0]) { - @_t=[$[11]0] - @_t=msar(g/.?/ /@+/@/@./@/@?/@/.+/+/../ /$strip(/ $(_t))) - @function_return=_t}{@function_return=[$[10]empty_string] - } + @_t=msar(g/@/@/+/+/$fix.nick($0)) + @function_return=_t } alias fix.scan3 { if ([$0]) { @_t=[$0] - @_t=msar(g/.?/ /@+/@/@./@/@?/@/.+/+/../ /$strip(/ $(_t))) @function_return=_t } } alias fix.scan4 { - if ([$0]) { - @_t=[$[11]0] - @_t=msar(g/.?/ /@+/$(hcyn)@$(cl)/@./$(hcyn)@$(cl)/@?/$(hcyn)@$(cl)/.+/$(hcyn)+$(cl)/../ /$strip(/ $(_t))) - @function_return=_t}{@function_return=[$[10]empty_string] - } + @_t=msar(g/@/$(hcyn)@$(cl)/+/$(hcyn)+$(cl)/$fix.nick($0)) + @function_return=_t } + alias printnames { @:lnick=sar(g/?//$sar(g/.//$2-)) @:lchan=[$1] @@ -91,6 +93,7 @@ } ^assign -_nlist;^assign -_nlist2 } + ### propz to robohak for clueing me into using the 366 numeric for nick list on #^353 1 * {@nicks#=[$3-]} on ^366 "*" { @@ -98,7 +101,6 @@ assign -nicks; } - alias scan { if ([$0]) { @ chan = [$0] @@ -118,8 +120,6 @@ printnames 0 $chan $pattern(*@* $channel($chan)) } - - alias scn { if ([$0]) { @chan=[$0] @@ -134,7 +134,6 @@ printnames 0 $chan $lscan } - alias scv { if ([$0]) { @chan=[$0] @@ -145,33 +144,13 @@ printnames 0 $chan $pattern(*.+* $channel($chan)) } - - alias sformat { - switch ($0) { - (1) { - @snf=1;^eval load ${loadpath}sc/scan.1 - } - (2) { - @snf=2;^eval load ${loadpath}sc/scan.2 - } - (3) { - @snf=3;^eval load ${loadpath}sc/scan.3 - } - (4) { - @snf=4;^eval load ${loadpath}sc/scan.4 - } - (5) { - @snf=5;^eval load ${loadpath}sc/scan.5 - } - (6) { - @snf=6;^eval load ${loadpath}sc/scan.6 - } - (7) { - @snf=7;^eval load ${loadpath}sc/scan.7 - } - } - xecho $acban scan format set to $(snf) + if ([$0] > 0 && [$0] <=7) { + @snf=[$0]; + ^eval load ${loadpath}sc/scan.$0 + } + xecho $acban scan format set to $(snf) + } oof From: Kreca Date: Wed, 26 Oct 2005 23:16:00 +0200 (CEST) Revert action.m to use xecho -w. This fixes broken /dccme behaviour diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Oct 26 23:06:51 2005 +++ amn/CHANGES Wed Oct 26 23:13:46 2005 @@ -57,3 +57,5 @@ alias to print scans. Get rid of the redundant formats format_scan_onjoin_nicks_border and format_scan_onjoin_nicks. This fixes what skully wanted to do in the comment above //kreca +-Revert action.m to use xecho -window to fix /me's in dcc query + windows. //kreca diff -aruN amn.orig/core/action.m amn/core/action.m --- amn.orig/core/action.m Fri Oct 21 18:57:58 2005 +++ amn/core/action.m Wed Oct 26 23:12:55 2005 @@ -28,7 +28,7 @@ @:wqwin = myquerywin($0) if ( wqwin != [-1]) { - xecho $fparse(format_desc $0 $1 $2-) + xecho -window $wqwin $fparse(format_desc $0 $1 $2-) } { xecho $fparse(format_action_other $0 $1 $2-) } From: Kreca Date: Fri, 28 Oct 2005 10:58:05 +0200 (CEST) -clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Oct 26 23:13:46 2005 +++ amn/CHANGES Fri Oct 28 10:55:51 2005 @@ -59,3 +59,6 @@ This fixes what skully wanted to do in the comment above //kreca -Revert action.m to use xecho -window to fix /me's in dcc query windows. //kreca + +10.28.05 +-clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Fri Oct 21 09:39:01 2005 +++ amn/core/alias.m Fri Oct 28 10:54:59 2005 @@ -137,16 +137,16 @@ ## long complex aliases below here. alias fixterm { - exec echo '$chr(27)\(U' xecho -r $chr(27)\(U + parsekey REFRESH_SCREEN } alias ibm437 fixterm alias latin1 { - exec echo '$chr(27)\(B' - xecho -r $chr(27)\(B - } + xecho -r $chr(27)\(B + parsekey REFRESH_SCREEN +} alias cat { if ([$#]) { From: Kreca Date: Fri, 28 Oct 2005 15:56:50 +0200 (CEST) fix small bug in scan diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 28 10:55:51 2005 +++ amn/CHANGES Fri Oct 28 15:54:51 2005 @@ -61,4 +61,5 @@ windows. //kreca 10.28.05 --clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca +-clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca +-fix minor glitch in /scan that printed voiced and oped users twice //kreca diff -aruN amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Wed Oct 26 23:04:18 2005 +++ amn/core/scan.m Fri Oct 28 15:53:59 2005 @@ -45,7 +45,7 @@ @:printstats=[$0] ^local scan1 ^push scan1 $pattern(*@* $lnick) - ^push scan1 $pattern(*+* $lnick) + ^push scan1 $pattern(*+* $filter(*@* $lnick)) ^push scan1 $filter(*+* $filter(*@* $lnick)) @nicks.ops=pattern(*@* $lnick) @nicks.voc=pattern(*+* $lnick) Date: Fri, 28 Oct 2005 10:06:22 -0400 (EDT) From: zak@ircii.org (Zak) -increase minor. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 28 09:54:51 2005 +++ amn/CHANGES Fri Oct 28 10:05:00 2005 @@ -62,4 +62,5 @@ 10.28.05 -clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca --fix minor glitch in /scan that printed voiced and oped users twice //kreca \ No newline at end of file +-fix minor glitch in /scan that printed voiced and oped users twice //kreca +-increase development version to 3 //zak \ No newline at end of file diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Sat Oct 22 02:55:07 2005 +++ amn/core/sets.m Fri Oct 28 10:04:36 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[2] +@rel_id=[3] @a.rel=[1.2d r/$rel_id] @a.date=[20051020] @_ss=[15] Date: Fri, 28 Oct 2005 21:17:55 +0000 From: Zach White Fix tc so that it doesn't try to do things like if (=crapple) { }{ }. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 28 21:14:02 2005 +++ amn/CHANGES Fri Oct 28 21:16:29 2005 @@ -63,4 +63,6 @@ 10.28.05 -clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca -fix minor glitch in /scan that printed voiced and oped users twice //kreca --increase development version to 3 //zak \ No newline at end of file +-increase development version to 3 //zak +-tc.m: Remove the msg alias since it breaks with dcc chats and most people + don't use it anyway. //skullY diff amn.orig/modules/tc/tc.m amn/modules/tc/tc.m --- amn.orig/modules/tc/tc.m Fri Oct 28 21:14:02 2005 +++ amn/modules/tc/tc.m Fri Oct 28 21:14:26 2005 @@ -67,14 +67,3 @@ on #-dcc_chat -12782 * tc.add_to_list =$0 on #-send_dcc_chat -12782 * tc.add_to_list =$0 - -/* - * This alias doesnt work if you try to do something like: - * /m x .... - * because $x expands to your userhost, and that gets confusing. - * - * No, the lack of brackets around $0 is not a bug, thats how it works. - * Try it. If $0 is 'bc' and $bc is "bigcheese" then - * if ($0) -> if (bc) -> if ([bigcheese]) - */ -alias msg if \($0\) {//msg $($0) $1-} {//msg $0 $1-} Date: Fri, 28 Oct 2005 21:55:37 -0400 (EDT) From: zak@ircii.org (Zak) -make the arrays make more sense, and cleanups split them into individual files so we know what is what, it's pointless having one gigantico file with all the crap and god knows where is what. this should be a start of improvements on making sense of the arrays. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 28 17:16:29 2005 +++ amn/CHANGES Fri Oct 28 21:47:36 2005 @@ -66,3 +66,9 @@ -increase development version to 3 //zak -tc.m: Remove the msg alias since it breaks with dcc chats and most people don't use it anyway. //skullY +-toss out the fsckgin@!#!@ array. created a array directory for arrays + of various types in files, this is a bit cleaner imho, and much easier + for one to fine when they need to tweak or fsck something up. maybe + this will make some of the less experienced be more motivated to take + on some new format tasks and the like. //zak +-sync UPGRADE to reality. //zak diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Sun Oct 23 01:04:12 2005 +++ amn/amn.epic Fri Oct 28 21:39:57 2005 @@ -65,7 +65,7 @@ ## proper yell silence. as we do not want to silence all yells. ## this is the beginning of a proper silence. -^on ^yell "File not found*" # +##^on ^yell "File not found*" # ^on ^yell "*INFO*" # ^on ^yell "% *Mode parser or server*" # @@ -100,6 +100,8 @@ oof +## load arrays before core.. +fe ($glob($(loadpath)arrays\/*.a)) ii { load $ii } ## core loading stuff. fe ($glob($(loadpath)core\/*.m)) mod { if ( mod != [$(loadpath)core/compat.m] && mod != [$(loadpath)core/sets.m] ) { diff -aruN amn.orig/arrays/action.a amn/arrays/action.a --- amn.orig/arrays/action.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/action.a Fri Oct 28 21:49:22 2005 @@ -0,0 +1,32 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## action formats +@ delarray(actform) +@ setitem(actform 0 !) +@ setitem(actform 1 $$fparse(format_timestamp_some $($_timess))$$zt $$(hwht)$$1 $$(cl)$$3-) +@ setitem(actform 2 $$fparse(format_timestamp_some $($_timess))$$(hblk)ð $$(hyel)$$1/$$2 $$(cl)$$3-) +@ setitem(actform 3 $$fparse(format_timestamp_some $($_timess))* $$1 $$3-) +@ setitem(actform 4 * $$1 $$3-) + +## action other formats +@ delarray(actoform) +@ setitem(actoform 0 !) +@ setitem(actoform 1 $$fparse(format_timestamp_some $($_timess))$$zt $$(hwht)$$1$$(hblk)!$$(cl)$$2 $$3-) +@ setitem(actoform 2 $$fparse(format_timestamp_some $($_timess))$$(hblk)* $$(cl)>$$(cyn)$$1 $$(cl)$$2 $$3-) +@ setitem(actoform 3 $$fparse(format_timestamp_some $($_timess))* $$1:$$2 $$3-) +@ setitem(actoform 4 * $$1:$$2 $$3-) + +## describe formats +@ delarray(descform) +@ setitem(descform 0 !) +@ setitem(descform 1 $$fparse(format_timestamp_some $($_timess))$$(c2)$$1$$(hblk)/$$(cl)$$2$$(cl) $$3-) +@ setitem(descform 2 $$fparse(format_timestamp_some $($_timess))*> $$1 $$3-) +@ setitem(descform 3 *> $$1 $$3-) + +## sent describe formats +@ delarray(sdescform) +@ setitem(sdescform 0 !) +@ setitem(sdescform 1 $$fparse(format_timestamp_some $($_timess))$$(cl)-> $$(hwht)$$1 $$(c3)$$N $$(cl)$$3-) +@ setitem(sdescform 2 $$fparse(format_timestamp_some $($_timess))* -> $$1: $$N $$3-) +@ setitem(sdescform 3 * -> $$1: $$N $$3-) diff -aruN amn.orig/arrays/away.a amn/arrays/away.a --- amn.orig/arrays/away.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/away.a Fri Oct 28 21:49:28 2005 @@ -0,0 +1,19 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## away formats +@ delarray(awayform) +@ setitem(awayform 0 !) +@ setitem(awayform 1 [a!l/$$(awayl).p/$$(togpager)]) +@ setitem(awayform 2 [a|l!$$(awayl).p!$$(togpager)]) +@ setitem(awayform 3 [ac/l:$$(awayl) p:$$(togpager)]) +@ setitem(awayform 4 \\\(log/$$(awayl).page/$$(togpager)\)) +@ setitem(awayform 5 \\\(log!$$(awayl).page!$$(togpager)\)) +@ setitem(awayform 6 \[log/$$(awayl).page/$$(togpager)\]) +@ setitem(awayform 7 \[log!$$(awayl).page!$$(togpager)\]) +@ setitem(awayform 8 \(+lp\)) +@ setitem(awayform 9 ) +## 10-12 - crapple 8.30.05 +@ setitem(awayform 10 [BX-MsgLog On]) +@ setitem(awayform 11 [l/on p/off]) +@ setitem(awayform 12 (log:on/page:off)) diff -aruN amn.orig/arrays/ctcp.a amn/arrays/ctcp.a --- amn.orig/arrays/ctcp.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/ctcp.a Fri Oct 28 21:49:35 2005 @@ -0,0 +1,34 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## ctcp formats +@ delarray(ctcpform) +@ setitem(ctcpform 0 !) +@ setitem(ctcpform 1 $$G $$(c1)$$1 %K\\\($$(c2)$$2%K\\\)%n requested $$(c1)$$4 $$5 %nfrom $$3) +@ setitem(ctcpform 2 $$G $$(c1)$$1 %K\\\[$$(c2)$$2%K]%n requested $$(c1)$$4 $$5%n from $$3) +@ setitem(ctcpform 3 %K>%n>%W> $$(hgrn)$$1 %K\\\[$$(grn)$$2%K]$$(grn) requested $$4 $$5 from $$3) +@ setitem(ctcpform 4 $$G $$(hwt)$$1 $$(hblk)[$$(wht)$$2$$(hblk)] $$(cl)requested $$(wht)$$4- $$(cl)from $$3) +@ setitem(ctcpform 5 $$G $$(hwt)$$1 $$(hblk)\\\($$(wht)$$2$$(hblk)\\\) $$(cl)requested $$(wht)$$4- $$(cl)from $$3) +@ setitem(ctcpform 6 $$G $$(c3)$$1 $$(hblk)\\\($$(c4)$$2$$(hblk)\\\) $$(cl)requested $$(c1)$$4- $$(cl)from $$3) +@ setitem(ctcpform 7 $$G $$(c3)$$1 $$(hblk)[$$(c4)$$2$$(hblk)] $$(cl)requested $$(c1)$$4- $$(cl)from $$3) +@ setitem(ctcpform 8 $$G $$(cyn)$$1 $$(hblk)[$$(cl)$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)$$(hblk)]$$(cl) requested $$(cyn)$$4- $$(cl)from $$3) +@ setitem(ctcpform 9 %K\\\(%Wctcp%K/$$(c2)$$1%K[$$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K]\\\) \\\(%W$$3%K\\\)%n $$4-) +@ setitem(ctcpform 10 $$G %cc%ntcp%K: %n$$3 %K[%n$$tolower(${[$5]?[$4-]:[$4]})%K]%n from %c$$1%n) +@ setitem(ctcpform 11 $$G CTCP $$5 from $$1 to $$3: $$4) + +## send ctcp formats +@ delarray(sctcpform) +@ setitem(sctcpform 0 !) +@ setitem(sctcpform 1 %K¯\\\($$(c1)ctcp%K!%W$$2%K\\\) %n$$3 $$4 $$5 $$6) +@ setitem(sctcpform 2 %K¯\\\[$$(c1)ctcp%K!%W$$2%K\\\] %n$$3 $$4 $$5 $$6) +@ setitem(sctcpform 3 %K[%rctcp%K\\\(%R$$2%K\\\)] %n$$3 $$4 $$5 $$6) +@ setitem(sctcpform 4 $$(hblk)¯[$$(wht)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)] $$(cl)$$3 $$4 $$5 $$6) +@ setitem(sctcpform 5 $$(hblk)¯\\\($$(wht)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)\\\) $$(cl)$$3 $$4 $$5 $$6) +@ setitem(sctcpform 6 $$(hblk)¯\\\($$(c3)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)\\\) $$(cl)$$3 $$4 $$5 $$6) +@ setitem(sctcpform 7 $$(hblk)¯[$$(c3)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)] $$(cl)$$3 $$4 $$5 $$6) +@ setitem(sctcpform 8 %K.%c.%K[%Wc%ntcp%K/%n$$2%K]%n $$3 $$4 $$5 $$6) +@ setitem(sctcpform 9 $$(hblk).$$(c2).$$(hblk)[$$(c2)c$$(c1)tcp$$(c2).$$(c1)$$2$$(hblk)]$(cl) $$3-) +@ setitem(sctcpform 10 %K\\\(%Wctcp%K/$$(c2)$$2%K\\\): %W$$3 %K\\\(%n$$4-%K\\\)) +@ setitem(sctcpform 11 %K:> %cc%ntcp%K:%c $$2 %K-%n $$3 $$4-) +@ setitem(sctcpform 12 [ctcp\\\($$2\\\)] $$3 $$4 $$5 $$6) +@ setitem(sctcpform 13 *** CTCP $$3 from $$N to $$2: $$4-) diff -aruN amn.orig/arrays/dcc.a amn/arrays/dcc.a --- amn.orig/arrays/dcc.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/dcc.a Fri Oct 28 21:49:41 2005 @@ -0,0 +1,66 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## send dcc formats +@ delarray(sdcform) +@ setitem(sdcform 0 !) +@ setitem(sdcform 1 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)dcc%K\\\($$(c2)$$1%K\\\)]%n $$2-) +@ setitem(sdcform 2 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)dcc%K\\\($$(c2)$$1%K\\\)\\\)%n $$2-) +@ setitem(sdcform 3 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wd%ncc%K\\\(%n$$1%K\\\)]%n $$2-) +@ setitem(sdcform 4 $$fparse(format_timestamp_some $($_timess))$$(c1).$$(hblk).[$$(c2)dcc$$(hblk)\\\($$(c1)$$1$$(hblk)\\\)]$$(cl) $$2-) +@ setitem(sdcform 5 $$fparse(format_timestamp_some $($_timess))%K[%rdcc%K\\\(%R$$1%K\\\)] %n$$2-) +@ setitem(sdcform 6 $$fparse(format_timestamp_some $($_timess))%K¯\\\($$(c2)dcc%K!$$(hwht)$$1%K\\\) %n$$2-) +@ setitem(sdcform 7 $$fparse(format_timestamp_some $($_timess))%K¯$$(cl)dcc%K!$$(hwht)$$1 $$(hblk)­ %n$$2-) +@ setitem(sdcform 8 $$fparse(format_timestamp_some $($_timess))$$zt $$(hblk)[$$(hgrn)dcc$$(hblk)\\\($$(grn)$$1$$(hblk)\\\)]$$(cl) $$2-) +@ setitem(sdcform 9 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K/$$(c1)dcc%K]%n $$2-) +@ setitem(sdcform 10 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K/$$(c3)dcc%K]%n $$2-) +@ setitem(sdcform 11 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)/%ndcc$$(c1)]%n $$2-) +@ setitem(sdcform 12 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)/%ndcc$$(c3)]%n $$2-) +@ setitem(sdcform 13 $$fparse(format_timestamp_some $($_timess))%K\\\(%ndcc%K!$$(c1)$$1%K\)%n $$2-) +@ setitem(sdcform 14 $$fparse(format_timestamp_some $($_timess))%K\\\(%ndcc%K!$$(c3)$$1%K\)%n $$2-) +@ setitem(sdcform 15 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%ndcc$$(c1)!%n$$1$$(c1)\)%n $$2-) +@ setitem(sdcform 16 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%ndcc$$(c3)!%n$$1$$(c3)\)%n $$2-) +@ setitem(sdcform 17 $$fparse(format_timestamp_some $($_timess))%K>\\\(%ndcc%K!$$(c1)$$1%K\)%n $$2-) +@ setitem(sdcform 18 $$fparse(format_timestamp_some $($_timess))%K>\\\(%ndcc%K!$$(c3)$$1%K\)%n $$2-) +@ setitem(sdcform 19 $$fparse(format_timestamp_some $($_timess))$$(c1)>\\\(%ndcc$$(c1)!%n$$1$$(c1)\)%n $$2-) +@ setitem(sdcform 20 $$fparse(format_timestamp_some $($_timess))$$(c3)>\\\(%ndcc$$(c3)!%n$$1$$(c3)\)%n $$2-) +@ setitem(sdcform 21 $$fparse(format_timestamp_some $($_timess))%K-$$(c1)> %K[$$(c1)=$$1%K]%n $$2-) +@ setitem(sdcform 22 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)> %K[$$(c3)=$$1%K]%n $$2-) +@ setitem(sdcform 23 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)> $$(c1)[%n=$$1$$(c1)]%n $$2-) +@ setitem(sdcform 24 $$fparse(format_timestamp_some $($_timess))$$(c3)-$$(c4)> $$(c3)[%n=$$1$$(c3)]%n $$2-) +@ setitem(sdcform 25 $$fparse(format_timestamp_some $($_timess))$$=> =$$1= $$2-) +@ setitem(sdcform 26 $$=> =$$1= $$2-) +## sent dcc - 27/slightly modified #8 - violence - 8.06.05 +@ setitem(sdcform 27 $$fparse(format_timestamp_some $($_timess))$$zt$$(hblk)[$$(hgrn)dcc$$(hblk)\\\($$(grn)$$1$$(hblk)\\\)]$$(cl) $$2-) + +## dcc formats +@ delarray(dcform) +@ setitem(dcform 0 !) +@ setitem(dcform 1 $$fparse(format_timestamp_some $($_timess))%K[$$(c2)$$1%K\\\($$(c1)dcc%K\\\)]%n $$2-) +@ setitem(dcform 2 $$fparse(format_timestamp_some $($_timess))%K[$$(c2)$$1%K\\\[$$(c1)dcc%K\\\]]%n $$2-) +@ setitem(dcform 3 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%w$$1%K\\\(%Wd%ncc%K\\\)] %n$$2-) +@ setitem(dcform 4 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c1).$$(hblk)[$$(c1)$$1$$(hblk)\\\($$(c2)dcc$$(hblk)\\\)] %n$$2-) +@ setitem(dcform 5 $$fparse(format_timestamp_some $($_timess))%K[%G$$1%K(%gdcc%K)] %n$$2-) +@ setitem(dcform 6 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c2)dcc%K!$$(hwht)$$1%K\\\) %n$$2-) +@ setitem(dcform 7 $$fparse(format_timestamp_some $($_timess))$(cl)dcc%K!$$(hwht)$$1 $$(hblk)­ %n$$2-) +@ setitem(dcform 8 $$fparse(format_timestamp_some $($_timess))$$zt $$(hblk)[$$(grn)$$1$$(hblk)\\\($$(hgrn)dcc$$(hblk)\\\)]$$(cl) $$2-) +@ setitem(dcform 9 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c1)dcc%K\)]%n $$2-) +@ setitem(dcform 10 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c3)dcc%K\)]%n $$2-) +@ setitem(dcform 11 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)\\\(%ndcc$$(c1)\)]%n $$2-) +@ setitem(dcform 12 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)\\\(%ndcc$$(c3)\)]%n $$2-) +@ setitem(dcform 13 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K!%ndcc%K\)%n $$2-) +@ setitem(dcform 14 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K!%ndcc%K\)%n $$2-) +@ setitem(dcform 15 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)!%ndcc$$(c1)\)%n $$2-) +@ setitem(dcform 16 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)!%ndcc$$(c3)\)%n $$2-) +@ setitem(dcform 17 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)=$$1%K]%n $$2-) +@ setitem(dcform 18 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)=$$1%K]%n $$2-) +@ setitem(dcform 19 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n=$$1$$(c1)]%n $$2-) +@ setitem(dcform 20 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n=$$1$$(c3)]%n $$2-) +@ setitem(dcform 21 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K!%ndcc%K]%n $$2-) +@ setitem(dcform 22 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)$$1%K!%ndcc%K]%n $$2-) +@ setitem(dcform 23 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)!%ndcc$$(c1)]%n $$2-) +@ setitem(dcform 24 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)!%ndcc$$(c3)]%n $$2-) +@ setitem(dcform 25 $$fparse(format_timestamp_some $($_timess))=$$1= $$2-) +@ setitem(dcform 26 =$$1= $$2-) +## dccform - 27/slightly modded #8 - violence - 8.06.05 +@ setitem(dcform 27 $$fparse(format_timestamp_some $($_timess))$$zt$$(hblk)[$$(grn)$$1$$(hblk)\\\($$(hgrn)dcc$$(hblk)\\\)]$$(cl) $$2-) diff -aruN amn.orig/arrays/echostr.a amn/arrays/echostr.a --- amn.orig/arrays/echostr.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/echostr.a Fri Oct 28 21:49:48 2005 @@ -0,0 +1,66 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## echostr formats +@ delarray(echostr) +@ setitem(echostr 0 !) +@ setitem(echostr 1 $(hblk)[$(cyn)a+c$(hblk)]$(cl)) +@ setitem(echostr 2 $(mag).$(cl)-$(hblk)Ä$(cl)) +@ setitem(echostr 3 $(blu)ú$(hblk)ú$(blu)ú$(cl)) +@ setitem(echostr 4 $(hblk)ö$(cl)ö$(hblk)ö$(cl)) +@ setitem(echostr 5 $(cyn)ú$(hcyn)ù$(cyn)ø$(cl)) +@ setitem(echostr 6 $(cl)ø$(hblk)ù$(cl)ú$(cl)) +@ setitem(echostr 7 $(hblk)ú$(blu)ë$(hblk)ú$(cl)) +@ setitem(echostr 8 $(cyn)ì$(hblk)ì$(cyn)ì$(cl)) +@ setitem(echostr 9 $(blu)ú$(hblk)í$(blu)ú$(cl)) +@ setitem(echostr 10 $(hred)ù$(hwht)í$(hred)ù$(cl)) +@ setitem(echostr 11 $(hblk)Ä$(mag)Ä$(cyn)Ä$(cl)) +@ setitem(echostr 12 $(hblk)=$(cyn)=$(blu)=$(cl)) +@ setitem(echostr 13 $(hblk)Ä$(grn)Ä$(hgrn)Ä$(cl)) +@ setitem(echostr 14 $(hblk)-$(cyn)Ä$(cl)Ä) +@ setitem(echostr 15 $(hblk)ú$(hwht)ù$(hblk)ú$(cl)) +@ setitem(echostr 16 $(hblk)ú$(cyn)ë$(hblk)ú$(cl)) +@ setitem(echostr 17 $(hblk)ú$(cyn)ú$(cl)ú) +@ setitem(echostr 18 $(cl)Ä$(cyn)Ä$(hblk)Ä$(cl)) +@ setitem(echostr 19 $(hwht)ú$(cl)ú$(hblk)ú$(cl)) +@ setitem(echostr 20 $(hblk)Ä$(cl)Ä$(hwht)Ä$(cl)) +@ setitem(echostr 21 $(hblk)þ$(blu)þ$(hblu)þ$(cl)) +@ setitem(echostr 22 $(hblk)Ä$(cyn)Ä$(hcyn)Ä$(cl)) +@ setitem(echostr 23 $(hblk)Í$(cl)Í$(hwht)Í$(cl)) +@ setitem(echostr 24 $(hcyn)Ä$(cyn)Ä$(hblk)Ä$(cl)) +@ setitem(echostr 25 $(hblk)ð$(cl)ð$(hwht)ð$(cl)) +@ setitem(echostr 26 $(hblk)÷$(cl)÷$(hwht)÷$(cl)) +@ setitem(echostr 27 $(hblk)ù$(cl)­$(hwht)ù$(cl)) +@ setitem(echostr 28 $(hblk)-$(blu)Ä$(hblu)-$(cl)) +@ setitem(echostr 29 $(hblk)Ä$(hblk)Ä$(blu)Ä$(cl)) +@ setitem(echostr 30 $(hblk)‘$(hwht)‘$(cl)‘) +@ setitem(echostr 31 $(hblk)ú$(cl)ù$(hwht).$(cl)) +@ setitem(echostr 32 $(hblk)-$(hcyn):$(hblk)-$(cl)) +@ setitem(echostr 33 $(hblk)Ä$cparse($(blu)Ä)$cparse($(hblu)Ä)$(cl)) +@ setitem(echostr 34 $(hblk)ù$(hcyn)í$(hblk)ù$(cl)) +@ setitem(echostr 35 $(hblk)+$(c1)+$(c2)+$(cl)) +@ setitem(echostr 36 $(hblk)+$(c3)+$(c4)+$(cl)) +@ setitem(echostr 37 $(hblk)-$(c1)-$(c2)-$(cl)) +@ setitem(echostr 38 $(hblk)-$(c3)-$(c4)-$(cl)) +@ setitem(echostr 39 $(hblk)ù$(c1)ù$(c2)ù$(cl)) +@ setitem(echostr 40 $(hblk)ù$(c3)ù$(c4)ù$(cl)) +@ setitem(echostr 41 $(hblk)ú$(c1)ù$(c2).$(cl)) +@ setitem(echostr 42 $(hblk)ú$(c3)ù$(c4).$(cl)) +@ setitem(echostr 43 $(hblk)Ä$(c1)Ä$(c2)Ä$(cl)) +@ setitem(echostr 44 $(hblk)Ä$(c3)Ä$(c4)Ä$(cl)) +@ setitem(echostr 45 ***) +## echostr 46-51 added - phuzion - 12.04.99 +@ setitem(echostr 46 $(hblk)þ$(c1)þ$(c2)þ$(cl)) +@ setitem(echostr 47 $(hblk)‘$(c1)‘$(c2)‘$(cl)) +@ setitem(echostr 48 $(hblk)÷$(c1)÷$(c2)÷$(cl)) +@ setitem(echostr 49 $(hblk)ð$(c1)ð$(c2)ð$(cl)) +@ setitem(echostr 50 $(hblk)=$(c1)=$(c2)=$(cl)) +@ setitem(echostr 51 $(hblk)ö$(c1)ö$(c2)ö$(cl)) +## echostr crapple 52-57 added - crapple 8.06.05 +@ setitem(echostr 52 [S+Z]) +@ setitem(echostr 53 [A+C]) +@ setitem(echostr 54 ***) +@ setitem(echostr 55 [a+c]) +@ setitem(echostr 56 ===) +@ setitem(echostr 57 [a]) + diff -aruN amn.orig/arrays/join.a amn/arrays/join.a --- amn.orig/arrays/join.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/join.a Fri Oct 28 21:49:53 2005 @@ -0,0 +1,29 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## join formats +@ delarray(joinform) +@ setitem(joinform 0 !) +@ setitem(joinform 1 $$fparse(format_timestamp_some $($_timess))$$(c4)$$1 %K[$$(c3)$$3%K]%n has joined $$2) +@ setitem(joinform 2 $$(c4)$$1 %K\\\($$(c3)$$3%K\\\)%n has joined $$2 $$Z) +@ setitem(joinform 3 %c.%K.[%Wj%noin%K/%n$$2%K]%n $$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$3)%K\\\)%n $$Z) +@ setitem(joinform 4 $$fparse(format_timestamp_some $($_timess))$$(c1)$$1 %K[$$(c2)$$3$$(c1)%K]%n has joined $$(c2)$$2) +@ setitem(joinform 5 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wj%noin%c.%n$$2%K] \\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$3)%K]\\\)%n) +@ setitem(joinform 6 $$fparse(format_timestamp_some $($_timess))%K.%m.%K[%Wj%noin%m.%n$$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$3)%K\\\)]%n to %m$$2) +@ setitem(joinform 7 $$G %K\\\(%Wjoin%K/%W$$2%K\\\)%n - %W$$1%K[$$(c1)$$before(@ $3)%K@$$(c1)$$after(@ $3)%K]%n $$Z) +@ setitem(joinform 8 $$G $$(c1)join$$(hblk)\\\($(cl)$$2$$(hblk)\\\)..$$(cl) $$(hwht)$$1$$(cl)!$$(c1)$$3%n $$Z) +@ setitem(joinform 9 $$fparse(format_timestamp_some $($_timess))%K[%cjoin%K!%n$$2%K]%n $$1%W.%n.%c$$3%n) +@ setitem(joinform 10 $$fparse(format_timestamp_some $($_timess))%cj%noin%K/%c$$2 %K[%n$$1%K!%c$$before(@ $3)%n@%c$$after(@ $3)%K]%n) +@ setitem(joinform 11 $$G $$1 \\\($$3\\\) has joined channel $$2) +@ setitem(joinform 12 $$G $$(c1)$$1 %K[$(cl)$$sar(g/@/$(hblk)@$(cl)/$3)$$(c1)%K]%n has joined $$(c2)$$2) +## join added 13-17 crapple 8.06.05 +@ setitem(joinform 13 $$(cl)$$1 %n$$(wht)\\\($$(cl)$$3$$(wht)\\\)%n has joined $$2 $$Z) +@ setitem(joinform 14 $$fparse(format_timestamp_some $($_timess))$$(wht)$$1%n $$(cl)\\\($$(cl)$$3$$(cl)\\\)%n has joined $$2) +@ setitem(joinform 15 $$(wht)$$1%n $$(hwht)\\\($$(cl)$$3$$(hwht)\\\)%n has joined $$2 $$Z) +@ setitem(joinform 16 $$fparse(format_timestamp_some $($_timess))$$(cl)$$1%n $$(wht)\\\($$(ck)$$3$$(wht)\\\)%n has joined $$(wht)$$2%n) +@ setitem(joinform 17 $$G $$(wht)$$1%n $$(hgrn)\\\($$(cl)$$3$$(hgrn)\\\)%n$$(cl) has joined $$(hblu)$$2%n$$(cl) $$Z%n) +## join added 18-19 violence 8.06.05 +@ setitem(joinform 18 $$fparse(format_timestamp_some $($_timess))%c$$1 %K\\\[%C$$3%K\\\]%n has joined %C$$2) +@ setitem(joinform 19 $$fparse(format_timestamp_some $($_timess))$$(c4)$$1 %K[$$(c3)$$3%K]%n has joined $$2) +@ setitem(joinform 20 $$G $$1 \\\($$3\\\) has joined $$2) +@ setitem(joinform 21 $$fparse(format_timestamp_some $($_timess))%K[%Wjoin%K/%n$$2%K]%W $$1 %K[%n$$3%K]%n) diff -aruN amn.orig/arrays/kick.a amn/arrays/kick.a --- amn.orig/arrays/kick.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/kick.a Fri Oct 28 21:49:59 2005 @@ -0,0 +1,13 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## kick formats -adam 9.7.05 +## $1 = kicked $2 = kickee $3 = channel $4+ = message +@ delarray(kickform) +@ setitem(kickform 0 !) +@ setitem(kickform 1 $$G $$1 was kicked off $$3 by $$(c3)$$2 %K\\\(%n$$4-%K\\\)) +@ setitem(kickform 2 $$fparse(format_timestamp_some $($_timess))$$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) +@ setitem(kickform 3 $$G $$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) +@ setitem(kickform 4 $$fparse(format_timestamp_some $($_timess))$$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) +@ setitem(kickform 5 $$fparse(format_timestamp_some $($_timess))%K[%nkick%K/%n$$3%K]%n $$1 by $$2 %K[%n$$4-%K]%n) +@ setitem(kickform 6 $$G $$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) diff -aruN amn.orig/arrays/mode.a amn/arrays/mode.a --- amn.orig/arrays/mode.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/mode.a Fri Oct 28 21:50:09 2005 @@ -0,0 +1,16 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## mode formats +@ delarray(modeform) +@ setitem(modeform 0 !) +@ setitem(modeform 1 $$fparse(format_timestamp_some $($_timess))$$ztmode%K$$(c3)$$2 %K[%W$$3 $$4-%K]%n by %W$$1) +@ setitem(modeform 2 $$fparse(format_timestamp_some $($_timess))$$zt%K\\\[$$(c1)mode%K!$$(c2)$$2%K\\\] %K"%W$$3 $$4-%K" %nby %w$$1) +@ setitem(modeform 3 $$fparse(format_timestamp_some $($_timess))$$zt%K[%Rmode%K\\\(%r$$2%K\)] %K[%R$$4-%K\\\(%n$$3%K\\\)]%n by %w$$1) +@ setitem(modeform 4 $$fparse(format_timestamp_some $($_timess))$$zt %cmode%C.%c$$2 %K\\\(%n$$3 $$4-%K\\\) %nby %n$$1) +@ setitem(modeform 5 $$fparse(format_timestamp_some $($_timess)) *** Mode change "$$3-" for $$2 by $$1) +@ setitem(modeform 6 *** Mode change "$$3-" for $$2 by $$1) +## 7-9 - violence - 8.06.05 +@ setitem(modeform 7 $$fparse(format_timestamp_some $($_timess))$$zt%cmode%C.%c$$2 %K\\\(%n$$3 $$4-%K\\\) %nby %n$$1) +@ setitem(modeform 8 $$fparse(format_timestamp_some $($_timess))%Mmode%K/%m$$2 %K\\\[$$(hwht)$$3-%K\\\] %nby $$(hwht)$$1) +@ setitem(modeform 9 $$fparse(format_timestamp_some $($_timess))%K\\\[%cmode%K\\\(%C$$2%K\\\) %c$$3 $$4-%K\\\] %nby %C$$1) diff -aruN amn.orig/arrays/msg.a amn/arrays/msg.a --- amn.orig/arrays/msg.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/msg.a Fri Oct 28 21:50:17 2005 @@ -0,0 +1,109 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## msg formats +@ delarray(mform) +@ setitem(mform 0 !) +@ setitem(mform 1 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\\\)%n $$3-) +@ setitem(mform 2 $$fparse(format_timestamp_some $($_timess))%K\\\[%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\\\]%n $$3-) +@ setitem(mform 3 $$fparse(format_timestamp_some $($_timess))%K\\\[%M$$1%K\\\(%m$$2%K\\\)]%n $$3-) +@ setitem(mform 4 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\)%n $$3-) +@ setitem(mform 5 $$fparse(format_timestamp_some $($_timess))%K[%c$$1%K\\\(%C$$2%K\\\)]%n $$3-) +@ setitem(mform 6 $$fparse(format_timestamp_some $($_timess))%K[%b$$1%K\\\(%B$$2%K\\\)]%n $$3-) +@ setitem(mform 7 $$fparse(format_timestamp_some $($_timess))%K.%m.%K\\\(%c$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) +@ setitem(mform 8 $$fparse(format_timestamp_some $($_timess))%K.%m.%K\\\(%c$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) +@ setitem(mform 9 $$fparse(format_timestamp_some $($_timess))%K.$$(c3).%K\\\($$(c3)$$1%K[$$(cl)$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\)%n $$3-) +@ setitem(mform 10 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K[$$(c4)$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) +@ setitem(mform 11 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[\%w$$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K\\\)]%n $$3-) +@ setitem(mform 12 $$fparse(format_timestamp_some $($_timess))$$(c3).%K.$$(c3)\\\(%w$$1$$(c3)[%K$$msar(g/@/$cparse($(c3)@)$(hblk)/./$cparse($(c3).)$(hblk)/$2)$$(c3)]\\\)%n $$3-) +@ setitem(mform 13 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c2).$$(hblk)[$$(c2)$$1$$(hblk)\\\($$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)$$(hblk)\\\)]$$(cl) $$3-) +@ setitem(mform 14 $$fparse(format_timestamp_some $($_timess))$$(cyn).$$(hblk).\\\($$(hcyn)$$1$$(hblk)\\\)$$(cl) $$3- $$(hblk)[$$(cyn)$$msar(g/./$(hblk).$(cl)/@/$(hblk)@$(cl)/$2)$$(hblk)]$$(cl)) +@ setitem(mform 15 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wm%K/$$(c2)$$1%K[$$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K]\\\)%n $$3-) +@ setitem(mform 16 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(c2)$$1$$(hblk)!$$(c2)$$2$$(hblk)\\\)$$(cl) $$3-) +@ setitem(mform 17 $$fparse(format_timestamp_some $($_timess))$$G %K[%n$$1%K/$$(c3)$$2%K]%n $$3-) +@ setitem(mform 18 $$fparse(format_timestamp_some $($_timess))$$G %K[%c$$1%K!%n$$before(@ $2)%W@%n$$after(@ $2)%K]%n $$3-) +@ setitem(mform 19 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(hwht)$$1$$(hblk)\\\($$(cl)$$2$$(hblk)\\\)\\\)$$(cl) $$3-) +@ setitem(mform 20 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(hwht)msg$$(hblk)/$$(hblu)$$1$$(hblk)[$$(blu)$$2$$(hblk)]\\\)$$(cl) $$3-) +@ setitem(mform 21 $$fparse(format_timestamp_some $($_timess))$$G %K\\\(%m$$1%K<%n$$before(@ $2)%W@%n$$after(@ $2)%K>\\\)%n $$3-) +@ setitem(mform 22 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c1).$$(hblk)\\\($$(c1)$$1$$(hblk)[$$(cl)$$sar(g/@/$(hblk)@$(cl)/$2)%K\\\)] %n$$3-) +@ setitem(mform 23 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\)]%n $$3-) +@ setitem(mform 24 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\)]%n $$3-) +@ setitem(mform 25 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\)%n $$3-) +@ setitem(mform 26 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K!$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\)%n $$3-) +@ setitem(mform 27 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)!%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)\)%n $$3-) +@ setitem(mform 28 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)!%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)\)%n $$3-) +@ setitem(mform 29 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K]%n $$3- %n%K[$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K]) +@ setitem(mform 30 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)$$1%K]%n $$3- %n%K[$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K]) +@ setitem(mform 31 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)]%n $$3- %n$$(c1)[%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)]) +@ setitem(mform 32 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)]%n $$3- %n$$(c3)[%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)]) +@ setitem(mform 33 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K]%n $$3- %n%K[%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K]) +@ setitem(mform 34 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)$$1%K]%n $$3- %n%K[%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K]) +@ setitem(mform 35 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$3- %n%K[$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K]) +@ setitem(mform 36 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$3- %n%K[$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K]) +@ setitem(mform 37 $$fparse(format_timestamp_some $($_timess))*$$1* $$3-) +@ setitem(mform 38 *$$1* $$3-) +## mform 39 - violence 8.06.05 +@ setitem(mform 39 $$fparse(format_timestamp_some $($_timess))%K.$$(hwht).$$(hblk)\\\($$(hwht)$$1$$(hblk)\\\[%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K]\\\)%n $$3-) +## mform 40-42 - crapple 8.30.05 +@ setitem(mform 40 $$fparse(format_timestamp_some $($_timess))%B\\\(%n$$1%B!%n$$before(@ $2)%G@%n$$after(@ $2)%B\)%n $$3-) +@ setitem(mform 41 $$fparse(format_timestamp_some $($_timess))%B\\\(%n$$1%B!%n$$before(@ $2)%B@%n$$after(@ $2)%B\)%n $$3-) +@ setitem(mform 42 $$fparse(format_timestamp_some $($_timess))%m\\\(%n$$1%m!%n$$before(@ $2)@$$after(@ $2)%m\)%n $$3-) + +## send msg formats +@ delarray(smform) +@ setitem(smform 0 !) +@ setitem(smform 1 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)msg%K!%n$$1%K\\\)%n $$2-) +@ setitem(smform 2 $$fparse(format_timestamp_some $($_timess))%K>\\\[$$(c1)msg%K!%n$$1%K\\\]%n $$2-) +@ setitem(smform 3 $$fparse(format_timestamp_some $($_timess))%K\\\[%rmsg%K\\\(%R$$1%K\\\)]$(cl) $$2-) +@ setitem(smform 4 $$fparse(format_timestamp_some $($_timess))%K¯[%nmsg%K\\\(%n$$1%K\\\)]%n $$2-) +@ setitem(smform 5 $$fparse(format_timestamp_some $($_timess))%K¯[%cmsg%K\\\(%C$$1%K\\\)]%n $$2-) +@ setitem(smform 6 $$fparse(format_timestamp_some $($_timess))%K¯[%bmsg%K\\\(%B$$1%K\\\)]%n $$2-) +@ setitem(smform 7 $$fparse(format_timestamp_some $($_timess))%K[%rmsg%K\\\(%R$$1%K\\\)]%n $$2-) +@ setitem(smform 8 $$fparse(format_timestamp_some $($_timess))%m.%K.[%Wm%nsg%K\\\(%c$$1%K\\\)]%n $$2-) +@ setitem(smform 9 $$fparse(format_timestamp_some $($_timess))%K¯[$$(c3)msg%K\\\($$(c4)$$1%K\\\)]%n $$2-) +@ setitem(smform 10 $$fparse(format_timestamp_some $($_timess))%K¯[$$(c1)msg%K\\\($$(c2)$$1%K\\\)]%n $$2-) +@ setitem(smform 11 $$fparse(format_timestamp_some $($_timess))%c.%K.[%Wm%nsg%K\\\(%c$$1%K\\\)]%n $$2-) +@ setitem(smform 12 $$fparse(format_timestamp_some $($_timess))$$(c3).%K.$$(c3)\\\(%Wm%nsg$$(c3)[%K$$1$$(c3)]\\\)%n $$2-) +@ setitem(smform 13 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c2).$$(hblk)[$$(hwht)m$$(cl)sg$$(hblk)\\\($$(c2)$$1$$(hblk)\\\)]$$(cl) $$2-) +@ setitem(smform 14 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(cyn)msg$$(hblk)[$$(cyn)$$1$$(hblk)]\\\)$$(cl) $$2-) +@ setitem(smform 15 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wsm%K/$$(c2)$$1%K\\\)%n $$2-) +@ setitem(smform 16 $$fparse(format_timestamp_some $($_timess))$$(hblk)-> \\\($$(c2)$$1$$(hblk)\\\)$$(cl) $$2-) +@ setitem(smform 17 $$fparse(format_timestamp_some $($_timess))$$G %K[%nmsg%K/$$(c3)$$1%K]%n $$2-) +@ setitem(smform 18 $$fparse(format_timestamp_some $($_timess))%K:> [%cmsg%K!%n$$1%K]%n $$2-) +@ setitem(smform 19 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(cl)msg$$(hblk)\\\($$(hwht)$$1$$(hblk)\\\)\\\)$$(cl) $$2-) +@ setitem(smform 20 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(hwht)msg$$(hblk)/$$(hblu)$$1$$(hblk)[$$(blu)*@*$$(hblk)]\\\) $$(cl)$$2-) +@ setitem(smform 21 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)msg%K!%n$$1%K]%n $$2-) +@ setitem(smform 22 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)msg%K!%n$$1%K\\\) %n$$2-) +@ setitem(smform 23 $$fparse(format_timestamp_some $($_timess))%K-> \\\(%mmsg%K<%n$$1%K>\\\)%n $$2-) +@ setitem(smform 24 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K\\\($$(c1)$$1%K\)]%n $$2-) +@ setitem(smform 25 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K\\\($$(c3)$$1%K\)]%n $$2-) +@ setitem(smform 26 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nmsg$$(c1)\\\(%n$$1$$(c1)\)]%n $$2-) +@ setitem(smform 27 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nmsg$$(c3)\\\(%n$$1$$(c3)\)]%n $$2-) +@ setitem(smform 28 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K/$$(c1)$$1%K]%n $$2-) +@ setitem(smform 29 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K/$$(c3)$$1%K]%n $$2-) +@ setitem(smform 30 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nmsg$$(c1)/%n$$1$$(c1)]%n $$2-) +@ setitem(smform 31 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nmsg$$(c3)/%n$$1$$(c3)]%n $$2-) +@ setitem(smform 32 $$fparse(format_timestamp_some $($_timess))%K\\\(%nmsg%K/$$(c1)$$1%K\)%n $$2-) +@ setitem(smform 33 $$fparse(format_timestamp_some $($_timess))%K\\\(%nmsg%K/$$(c3)$$1%K\)%n $$2-) +@ setitem(smform 34 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%nmsg$$(c1)/%n$$1$$(c1)\)%n $$2-) +@ setitem(smform 35 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%nmsg$$(c3)/%n$$1$$(c3)\)%n $$2-) +@ setitem(smform 36 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)> %K[$$(c1)$$1%K]%n $$2-) +@ setitem(smform 37 $$fparse(format_timestamp_some $($_timess))$$(c3)-$$(c4)> %K[$$(c3)$$1%K]%n $$2-) +@ setitem(smform 38 $$fparse(format_timestamp_some $($_timess))%n-$$(c1)> $$(c1)[%n$$1$$(c1)]%n $$2-) +@ setitem(smform 39 $$fparse(format_timestamp_some $($_timess))%n-$$(c3)> $$(c3)[%n$$1$$(c3)]%n $$2-) +@ setitem(smform 40 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)$$1%K\)%n $$2-) +@ setitem(smform 41 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c3)$$1%K\)%n $$2-) +@ setitem(smform 42 $$fparse(format_timestamp_some $($_timess))$$(c1)>\\\(%n$$1$$(c1)\)%n $$2-) +@ setitem(smform 43 $$fparse(format_timestamp_some $($_timess))$$(c3)>\\\(%n$$1$$(c3)\)%n $$2-) +@ setitem(smform 44 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)$$1%K]%n $$2-) +@ setitem(smform 45 $$fparse(format_timestamp_some $($_timess))%K>[$$(c3)$$1%K]%n $$2-) +@ setitem(smform 46 $$fparse(format_timestamp_some $($_timess))$$(c1)>[%n$$1$$(c1)]%n $$2-) +@ setitem(smform 47 $$fparse(format_timestamp_some $($_timess))$$(c3)>[%n$$1$$(c3)]%n $$2-) +@ setitem(smform 48 $$fparse(format_timestamp_some $($_timess))*$$1*> $$2-) +@ setitem(smform 49 *$$1*> $$2-) +## smform 50-53 - crapple - 8.06.05 - 54-55 - 8.30.05 +@ setitem(smform 50 $$fparse(format_timestamp_some $($_timess))%W-$$(cl)>%n%W \\\($$(cl)$$1%W\\\)%n $$2-) +@ setitem(smform 51 $$fparse(format_timestamp_some $($_timess))$$(cl)-%W>%n$$(hgrn) \\\($$(cl)$$1$$(hgrn)\\\)%n $$2-) +@ setitem(smform 52 $$fparse(format_timestamp_some $($_timess))$$(cl)-%w>%n \\\($$1\\\) $$2-) +@ setitem(smform 53 $$fparse(format_timestamp_some $($_timess))$$(cl)-%W>%n%W \\\($$(cl)$$1%W\\\)%n $$2-) +@ setitem(smform 54 $$fparse(format_timestamp_some $($_timess))$$(cl)-%W>%n$$(hblu) \\\($$(cl)$$1$$(hblu)\\\)%n $$2-) diff -aruN amn.orig/arrays/nick.a amn/arrays/nick.a --- amn.orig/arrays/nick.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/nick.a Fri Oct 28 21:50:23 2005 @@ -0,0 +1,22 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## nick change formats -violence +@ delarray(nickform) +@ setitem(nickform 0 !) +@ setitem(nickform 1 $$G %w$$1 %nis now known as %m$$2) +@ setitem(nickform 2 $$G %w$$1 %nis now known as %m$$2 %n$$Z) +@ setitem(nickform 3 $$G %c$$1 %nis now known as %m$$2) +@ setitem(nickform 4 $$G %c$$1 %nis now known as %m$$2 %n$$Z) +@ setitem(nickform 5 $$G %g$$1 %nis now known as %G$$2) +@ setitem(nickform 6 $$G %g$$1 %nis now known as %G$$2 %n$$Z) +@ setitem(nickform 7 $$G %nnick change %K\\\(%c$$1 %K-> %m$$2%K\\\)) +@ setitem(nickform 8 $$G %nnick change %K\\\(%c$$1 %K-> %m$$2%K\\\) %n$$Z) +@ setitem(nickform 9 $$G %nnick change %K\\\(%g$$1 %K-> %G$$2%K\\\)) +@ setitem(nickform 10 $$G %nnick change %K\\\(%g$$1 %K-> %G$$2%K\\\) %n$$Z) +@ setitem(nickform 11 $$fparse(format_timestamp_some $($_timess))$$G %c$$1%n is now known as %m$$2) +@ setitem(nickform 12 $$fparse(format_timestamp_some $($_timess))$$G %W$$1 %nis now known as %m$$2) +@ setitem(nickform 13 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%c$$1 %K-> %m$$2%K\\\)) +@ setitem(nickform 14 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%W$$1 %K-> %m$$2%K\\\)) +@ setitem(nickform 15 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%W$$1 %K-> %W$$2%K\\\)) +@ setitem(nickform 16 $$G $$1 is now known as $$2) diff -aruN amn.orig/arrays/nickcomp.a amn/arrays/nickcomp.a --- amn.orig/arrays/nickcomp.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/nickcomp.a Fri Oct 28 21:50:30 2005 @@ -0,0 +1,30 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## nickcomp formats +@ delarray(ncomp) +@ orig.ncomp=format_nick_comp +@ setitem(ncomp 0 !) +@ setitem(ncomp 1 :) +@ setitem(ncomp 2 :) +@ setitem(ncomp 3 :) +@ setitem(ncomp 4 .) +@ setitem(ncomp 5 .) +@ setitem(ncomp 6 .) +@ setitem(ncomp 7 ,) +@ setitem(ncomp 8 ,) +@ setitem(ncomp 9 ,) +@ setitem(ncomp 10 ;) +@ setitem(ncomp 11 -) +@ setitem(ncomp 12 ;) +@ setitem(ncomp 13 -) +@ setitem(ncomp 14 ,) +@ setitem(ncomp 15 :) +@ setitem(ncomp 16 ;) +@ setitem(ncomp 17 - ) +## ncomp 18-19 added - phuzion - 12.04.99 +@ setitem(ncomp 18 > ) +@ setitem(ncomp 19 > ) +@ setitem(ncomp 20 |>) +@ setitem(ncomp 21 ->) + diff -aruN amn.orig/arrays/notice.a amn/arrays/notice.a --- amn.orig/arrays/notice.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/notice.a Fri Oct 28 21:50:35 2005 @@ -0,0 +1,78 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## notice formats +@ delarray(notform) +@ setitem(notform 0 !) +@ setitem(notform 1 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K\\\(%n$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\\\)-%n $$3-) +@ setitem(notform 2 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K\\\[%n$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\\\]-%n $$3-) +@ setitem(notform 3 $$fparse(format_timestamp_some $($_timess))%K-%M$$1%K\\\(%m$$2%K\\\)- %n$$3-) +@ setitem(notform 4 $$fparse(format_timestamp_some $($_timess))%c.%K.%Wn%not%K\\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) +@ setitem(notform 5 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)\\\($$(hwht)$$1$$(c2)\\\)$$(c1)-%n $$3-) +@ setitem(notform 6 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%n$$1%K]%n $$3- %K\\\(%m$$sar(g/@/$(hmag)@$(mag)/$2)%K\\\)) +@ setitem(notform 7 $$fparse(format_timestamp_some $($_timess))%m.%K.[%c\$1%K]%n \$3- %K[%c\$2%K]%n) +@ setitem(notform 8 $$fparse(format_timestamp_some $($_timess))$$(hblk)-$$(c1)$$1$$(hblk)\\\($$(c2)$$2$$(hblk)\\\)-$$(cl) $$3-) +@ setitem(notform 9 $$fparse(format_timestamp_some $($_timess))%K-%Wn%K/$$(c2)$$1%K\\\($$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K\\\)-%n $$3-) +@ setitem(notform 10 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K\\\($$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\)-%n $$3-) +@ setitem(notform 11 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K\\\($$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\)-%n $$3-) +@ setitem(notform 12 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K-%n $$3-) +@ setitem(notform 13 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K!$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K-%n $$3-) +@ setitem(notform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)-%n$$1$$(c1)!%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)-%n $$3-) +@ setitem(notform 15 $$fparse(format_timestamp_some $($_timess))$$(c3)-%n$$1$$(c3)!%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)-%n $$3-) +@ setitem(notform 16 $$fparse(format_timestamp_some $($_timess))%K-$$(c1)$$1%K-%n $$3- %n%K-$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K-) +@ setitem(notform 17 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K-%n $$3- %n%K-$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K-) +@ setitem(notform 18 $$fparse(format_timestamp_some $($_timess))$$(c1)-%n$$1$$(c1)-%n $$3- %n$$(c1)-%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)-) +@ setitem(notform 19 $$fparse(format_timestamp_some $($_timess))$$(c3)-%n$$1$$(c3)-%n $$3- %n$$(c3)-%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)-) +@ setitem(notform 20 $$fparse(format_timestamp_some $($_timess))%K-$$(c1)$$1%K-%n $$3- %n%K-%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K-) +@ setitem(notform 21 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K-%n $$3- %n%K-%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K-) +@ setitem(notform 22 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K-%n $$3- %n%K-$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K-) +@ setitem(notform 23 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K-%n $$3- %n%K-$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K-) +@ setitem(notform 24 $$fparse(format_timestamp_some $($_timess)) -$$1- $$3-) +@ setitem(notform 25 -$$1- $$3-) + +## send notice formats +@ delarray(snotform) +@ setitem(snotform 0 !) +@ setitem(snotform 1 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)notice%K\\\($$(c2)$$1%K\\\)]%n $$2-) +@ setitem(snotform 2 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)notice%K\\\($$(c2)$$1%K\\\)\\\)%n $$2-) +@ setitem(snotform 3 $$fparse(format_timestamp_some $($_timess))%K[%rnotice%K\\\(%R$$1%K\\\)]%n $$2-) +@ setitem(snotform 4 $$fparse(format_timestamp_some $($_timess))%K¯$$(c2)\\\(%c$$1$$(c2)\\\)%n $$2-) +@ setitem(snotform 5 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wn%not%K\\\(%n$$1%K\\\)]%n $$2-) +@ setitem(snotform 6 $$fparse(format_timestamp_some $($_timess))%K¯%c[%K$$1%c]%n $$2-) +@ setitem(snotform 7 $$fparse(format_timestamp_some $($_timess))%m.%K.[%nno%Wt%K\\\(%m$$1%K\\\)]%n $$2-) +@ setitem(snotform 8 $$fparse(format_timestamp_some $($_timess))%K-> [%cnot%K!%n$$1%K]%n $$2-) +@ setitem(snotform 9 $$fparse(format_timestamp_some $($_timess))%K¯[$$(c1)notice%K\\\($$(c2)$$1%K\\\)]%n $$2-) +@ setitem(snotform 10 $$fparse(format_timestamp_some $($_timess))%K\-%Wsn%K/$$(c2)$$1%K-%n $$2-) +@ setitem(snotform 11 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K\\\($$(c1)$$1%K\)]%n $$2-) +@ setitem(snotform 12 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K\\\($$(c3)$$1%K\)]%n $$2-) +@ setitem(snotform 13 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nnot$$(c1)\\\(%n$$1$$(c1)\)]%n $$2-) +@ setitem(snotform 14 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nnot$$(c3)\\\(%n$$1$$(c3)\)]%n $$2-) +@ setitem(snotform 15 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K/$$(c1)$$1%K]%n $$2-) +@ setitem(snotform 16 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K/$$(c3)$$1%K]%n $$2-) +@ setitem(snotform 17 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nnot$$(c1)/%n$$1$$(c1)]%n $$2-) +@ setitem(snotform 18 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nnot$$(c3)/%n$$1$$(c3)]%n $$2-) +@ setitem(snotform 19 $$fparse(format_timestamp_some $($_timess))%K\\\(%nnot%K/$$(c1)$$1%K\)%n $$2-) +@ setitem(snotform 20 $$fparse(format_timestamp_some $($_timess))%K\\\(%nnot%K/$$(c3)$$1%K\)%n $$2-) +@ setitem(snotform 21 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%nnot$$(c1)/%n$$1$$(c1)\)%n $$2-) +@ setitem(snotform 22 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%nnot$$(c3)/%n$$1$$(c3)\)%n $$2-) +@ setitem(snotform 23 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)> %K[$$(c1)$$1%K]%n $$2-) +@ setitem(snotform 24 $$fparse(format_timestamp_some $($_timess))$$(c3)-$$(c4)> %K[$$(c3)$$1%K]%n $$2-) +@ setitem(snotform 25 $$fparse(format_timestamp_some $($_timess))%n-$$(c1)> $$(c1)[%n$$1$$(c1)]%n $$2-) +@ setitem(snotform 26 $$fparse(format_timestamp_some $($_timess))%n-$$(c3)> $$(c3)[%n$$1$$(c3)]%n $$2-) +@ setitem(snotform 27 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)$$1%K\)%n $$2-) +@ setitem(snotform 28 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c3)$$1%K\)%n $$2-) +@ setitem(snotform 29 $$fparse(format_timestamp_some $($_timess))$$(c1)>\\\(%n$$1$$(c1)\)%n $$2-) +@ setitem(snotform 30 $$fparse(format_timestamp_some $($_timess))$$(c3)>\\\(%n$$1$$(c3)\)%n $$2-) +@ setitem(snotform 31 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)$$1%K]%n $$2-) +@ setitem(snotform 32 $$fparse(format_timestamp_some $($_timess))%K>[$$(c3)$$1%K]%n $$2-) +@ setitem(snotform 33 $$fparse(format_timestamp_some $($_timess))$$(c1)>[%n$$1$$(c1)]%n $$2-) +@ setitem(snotform 34 $$fparse(format_timestamp_some $($_timess))$$(c3)>[%n$$1$$(c3)]%n $$2-) +@ setitem(snotform 35 $$fparse(format_timestamp_some $($_timess))-$$1-> $$2-) +@ setitem(snotform 36 -$$1-> $$2-) + +## public notice formats +@ delarray(pubnotform) +@ setitem(pubnotform 0 !) +@ setitem(pubnotform 1 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K:%n$$2%n $$3-) +@ setitem(pubnotform 2 $$fparse(format_timestamp_some $($_timess))-$$1:$$2- $$3-) +@ setitem(pubnotform 3 -$$1:$$2- $$3-) diff -aruN amn.orig/arrays/part.a amn/arrays/part.a --- amn.orig/arrays/part.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/part.a Fri Oct 28 21:50:41 2005 @@ -0,0 +1,24 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## leaves/part formats +@ delarray(leaveform) +@ setitem(leaveform 0 !) +@ setitem(leaveform 1 $$G $$(c1)$$1 %K\\\($$(c2)$$2%K\\\) %nhas left $$(c2)$$3 %K[%n$$4-%K]) +@ setitem(leaveform 2 $$G $$(c1)$$1 %K\\\[$$(c2)$$2%K\\\] %nhas left $$(c2)$$3 %K[%n$$4-%K]%n at $$Z) +@ setitem(leaveform 3 $$G $$1 %K[%w$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]%n has left $$3 %K[%W$$4-%K]) +@ setitem(leaveform 4 $$fparse(format_timestamp_some $($_timess))%c.%K.[%Wp%nart%K/%n$$3%K]%n $$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K\\\) %K[%n$$4-%K]%n) +@ setitem(leaveform 5 $$G %K.%c.%K[%Wp%nart%c.%n$$3%K]%n %K\\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n %K[%n$$4-%K]%n at $$Z) +@ setitem(leaveform 6 $$fparse(format_timestamp_some $($_timess))%K.%m.%K[%Wp%nart%m.%n$$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/$(hblk).$(cl)/$2)%K\\\)]%n of %m$$3 %K[%n$$4-%K]) +@ setitem(leaveform 7 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wpart%K/%W$$3%K\\\)%n - %W$$1%K[$$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K] \\\(%n$$4-%K\\\)) +@ setitem(leaveform 8 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)p%Kú$$(c2)$$3%K\\\)%n $$1%K[%n$$2%K] \\\(%n$$4-%K\\\)%n) +@ setitem(leaveform 9 $$G $$(c1)part$$(hblk)\\\($(cl)$$3$$(hblk)\\\).. $$(cl)$$1$$(hwht)!$$(c1)$$2%n $$Z) +@ setitem(leaveform 10 $$fparse(format_timestamp_some $($_timess))%K[%npart%K!%c$$3%K]%n $$1%W.%n.%c$$2%n) +@ setitem(leaveform 11 $$G part%K/%n$$3 %K[%n$$1%K!%n$$before(@ $2)%K@%n$$after(@ $2)%K]%n $$Z) +@ setitem(leaveform 12 $$G $$1 has left channel $$3) +## leaves 13-14 violence - 8.06.05 +@ setitem(leaveform 13 $$fparse(format_timestamp_some $($_timess))$$(hwht)$$1 %K\\\[%n$$before(@ $2)%K@%n$$after(@ $2)%K\\\]%n has left $$3 %K\\\[%n$$4-%K\\\]) +@ setitem(leaveform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)$$1 %K\\\[$$(c2)$$2%K\\\] %nhas left $$(c2)$$3 %K[%n$$4-%K]) +## leaves 15 - crapple - 8.06.05 +@ setitem(leaveform 15 $$G $$1 %K[%G$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]%n has left $$3 %K[%W$$4-%K]%n at $$Z) +@ setitem(leaveform 16 $$fparse(format_timestamp_some $($_timess))%K[%Wpart%K/%n$$3%K] %W$$1%K\\\(%n$$2%K\\\) [%n$$4%K]%n) diff -aruN amn.orig/arrays/public.a amn/arrays/public.a --- amn.orig/arrays/public.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/public.a Fri Oct 28 21:50:50 2005 @@ -0,0 +1,108 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## public formats +@ delarray(pubform) +@ setitem(pubform 0 !) +@ setitem(pubform 1 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) +@ setitem(pubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\\\)%n $$2-) +@ setitem(pubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<%n$$1$$(hmag)>%n $$2-) +@ setitem(pubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\(%n$$1$$(hmag)\\\)%n $$2-) +@ setitem(pubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<%n$$1$$(hblu)>%n $$2-) +@ setitem(pubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) +@ setitem(pubform 7 $$fparse(format_timestamp_some $($_timess))%b<%n$$1%b>%n $$2-) +@ setitem(pubform 8 $$fparse(format_timestamp_some $($_timess))%b\\\(%n$$1%b\\\)%n $$2-) +@ setitem(pubform 9 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) +@ setitem(pubform 10 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$1%K>%n $$2-) +@ setitem(pubform 11 $$fparse(format_timestamp_some $($_timess))%K<$$(c3)$$1%K>%n $$2-) +@ setitem(pubform 12 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$1$$(c1)>%n $$2-) +@ setitem(pubform 13 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$1$$(c3)>%n $$2-) +@ setitem(pubform 14 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\)%n $$2-) +@ setitem(pubform 15 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K\)%n $$2-) +@ setitem(pubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K\)%n $$2-) +@ setitem(pubform 17 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)\)%n $$2-) +@ setitem(pubform 18 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)\)%n $$2-) +@ setitem(pubform 19 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$2-) +@ setitem(pubform 20 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)]%n $$2-) +@ setitem(pubform 21 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)]%n $$2-) +@ setitem(pubform 22 $$fparse(format_timestamp_some $($_timess))<$$1> $$2-) +@ setitem(pubform 23 <$$1> $$2-) +## pubform 24-26 - crapple 8.06.05 +@ setitem(pubform 24 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\(%n$$1$$(wht)\\\)%n $$2-) +@ setitem(pubform 25 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\(%n$$1$$(cl)\\\)%n $$2-) +@ setitem(pubform 26 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\(%n$$1$$(hwht)\\\)%n $$2-) + +## send public formats +@ delarray(spubform) +@ setitem(spubform 0 !) +@ setitem(spubform 1 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) +@ setitem(spubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\\\)%n $$2-) +@ setitem(spubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<%n$$1$$(hmag)>%n $$2-) +@ setitem(spubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\(%n$$1$$(hmag)\\\)%n $$2-) +@ setitem(spubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<%n$$1$$(hblu)>%n $$2-) +@ setitem(spubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) +@ setitem(spubform 7 $$fparse(format_timestamp_some $($_timess))%K<%c$$1%K>%n $$2-) +@ setitem(spubform 8 $$fparse(format_timestamp_some $($_timess))%K\\\(%c$$1%K\\\)%n $$2-) +@ setitem(spubform 9 $$fparse(format_timestamp_some $($_timess))%b<%n$$1%b>%n $$2-) +@ setitem(spubform 10 $$fparse(format_timestamp_some $($_timess))%b\\\(%n$$1%b\\\)%n $$2-) +@ setitem(spubform 11 $$fparse(format_timestamp_some $($_timess))$$(sc1)<%n$$1$$(sc1)>%n $$2-) +@ setitem(spubform 12 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) +@ setitem(spubform 13 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$1%K>%n $$2-) +@ setitem(spubform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$1$$(c1)>%n $$2-) +@ setitem(spubform 15 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$1$$(c3)>%n $$2-) +@ setitem(spubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\)%n $$2-) +@ setitem(spubform 17 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K\)%n $$2-) +@ setitem(spubform 18 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)\)%n $$2-) +@ setitem(spubform 19 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)\)%n $$2-) +@ setitem(spubform 20 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$2-) +@ setitem(spubform 21 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K]%n $$2-) +@ setitem(spubform 22 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)]%n $$2-) +@ setitem(spubform 23 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)]%n $$2-) +@ setitem(spubform 24 $$fparse(format_timestamp_some $($_timess))> $$2-) +@ setitem(spubform 25 > $$2-) +## sendpub 26-28 - crapple 8.06.05 - 29-30 - 8.30.05 +@ setitem(spubform 26 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\(%n$$1$$(wht)\\\)%n $$2-) +@ setitem(spubform 27 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\(%n$$1$$(cl)\\\)%n $$2-) +@ setitem(spubform 28 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\(%n$$1$$(hwht)\\\)%n $$2-) +@ setitem(spubform 29 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) +@ setitem(spubform 30 $$fparse(format_timestamp_some $($_timess))$$(mag)\\\(%n$$1$$(mag)\\\)%n $$2-) + +## send public other formats +@ delarray(spuboform) +@ setitem(spuboform 0 !) +@ setitem(spuboform 1 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K:%n$$2%K>%n $$3-) +@ setitem(spuboform 2 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K:%n$$2%K\\\)%n $$3-) +@ setitem(spuboform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<%n$$1%K:%n$$2$$(hmag)>%n $$3-) +@ setitem(spuboform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\(%n$$1%K:%n%N$$2$$(hmag)\\\)%n $$3-) +@ setitem(spuboform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<%n$$1%K:%n$$2$$(hblu)>%n $$3-) +@ setitem(spuboform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1%K:%n$$2$$(hblu)\\\)%n $$3-) +@ setitem(spuboform 7 $$fparse(format_timestamp_some $($_timess))$$(blu)\\\(%n$$1%K:%n$$2$$(blu)\\\)%n $$3-) +@ setitem(spuboform 8 $$fparse(format_timestamp_some $($_timess))$$(blu)<%n$$1%K:%n$$2$$(blu)>%n $$3-) +@ setitem(spuboform 9 $$fparse(format_timestamp_some $($_timess))%K<%n$$2%K/%n$$1%K>%n $$3-) +@ setitem(spuboform 10 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$2%K/$$(c1)$$1%K>%n $$3-) +@ setitem(spuboform 11 $$fparse(format_timestamp_some $($_timess))%K<$$(c3)$$2%K/$$(c3)$$1%K>%n $$3-) +@ setitem(spuboform 12 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$2$$(c1)/$$1$$(c1)>%n $$3-) +@ setitem(spuboform 13 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$2$$(c3)/$$1$$(c3)>%n $$3-) +@ setitem(spuboform 14 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$2%K/%n$$1%K\)%n $$3-) +@ setitem(spuboform 15 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$2%K/$$(c1)$$1%K\)%n $$3-) +@ setitem(spuboform 16 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$2%K/$$(c3)$$1%K\)%n $$3-) +@ setitem(spuboform 17 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$2$$(c1)/%n$$1$$(c1)\)%n $$3-) +@ setitem(spuboform 18 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$2$$(c3)/%n$$1$$(c3)\)%n $$3-) +@ setitem(spuboform 19 $$fparse(format_timestamp_some $($_timess))%K[%n$$2%K/%n$$1%K]%n $$3-) +@ setitem(spuboform 20 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$2$$(c1)/%n$$1$$(c1)]%n $$3-) +@ setitem(spuboform 21 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$2$$(c3)/%n$$1$$(c3)]%n $$3-) +@ setitem(spuboform 22 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K/%n$$2%K>%n $$3-) +@ setitem(spuboform 23 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$1%K/$$(c1)$$2%K>%n $$3-) +@ setitem(spuboform 24 $$fparse(format_timestamp_some $($_timess))%K<$$(c3)$$1%K/$$(c3)$$2%K>%n $$3-) +@ setitem(spuboform 25 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$1$$(c1)/$$2$$(c1)>%n $$3-) +@ setitem(spuboform 26 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$1$$(c3)/$$2$$(c3)>%n $$3-) +@ setitem(spuboform 27 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K/%n$$2%K\)%n $$3-) +@ setitem(spuboform 28 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K/$$(c1)$$2%K\)%n $$3-) +@ setitem(spuboform 29 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K/$$(c3)$$2%K\)%n $$3-) +@ setitem(spuboform 30 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)/%n$$2$$(c1)\)%n $$3-) +@ setitem(spuboform 31 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)/%n$$2$$(c3)\)%n $$3-) +@ setitem(spuboform 32 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K/%n$$2%K]%n $$3-) +@ setitem(spuboform 33 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)/%n$$2$$(c1)]%n $$3-) +@ setitem(spuboform 34 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)/%n$$2$$(c3)]%n $$3-) +@ setitem(spuboform 35 $$fparse(format_timestamp_some $($_timess))<$$1:$$2> $$3-) +@ setitem(spuboform 36 <$$1:$$2> $$3-) diff -aruN amn.orig/arrays/signoff.a amn/arrays/signoff.a --- amn.orig/arrays/signoff.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/signoff.a Fri Oct 28 21:51:02 2005 @@ -0,0 +1,24 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## signoff formats +@ delarray(signform) +@ setitem(signform 0 !) +@ setitem(signform 1 $$fparse(format_timestamp_some $($_timess))$$ztsignoff: %K\\\(%n$$1%K/%n$$2%K\\\)%n $$3-) +@ setitem(signform 2 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)signoff%K: $$(c2)$$1%K/$$(c2)$$2 %K\\\(%n$$3-%K\\\)) +@ setitem(signform 3 $$fparse(format_timestamp_some $($_timess))$$zt%nsignoff: %W$$1%K/%W$$2 %K\\\(%n$$3-%K\\\)) +@ setitem(signform 4 $$fparse(format_timestamp_some $($_timess))$$zt%c.%K.[%Ws%nignoff%K/%n$$1%K\\\(%w$$2%K\\\)]:%n $$3-) +@ setitem(signform 5 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)$$1$$(c2)/$$(c1)$$2 %nhas left irc%K:%n $$3-) +@ setitem(signform 6 $$fparse(format_timestamp_some $($_timess))$$zt%K.%m.%K[%Ws%nignoff%m.%n$$1%K\\\(%m$$2%K\\\)] %K\\\(%n$$3-%K\\\)) +@ setitem(signform 7 $$fparse(format_timestamp_some $($_timess))$$zt%K.%c.%K[%Ws%nignoff%c.%n$$1%K\\\(%c$$2%K\\\)] [%n$$3-%K]%n) +@ setitem(signform 8 $$fparse(format_timestamp_some $($_timess))$$zt%K\\\(%Wquit%K/$$(c2)$$1%K\\\) \\\(%n$$3-%K\\\)) +@ setitem(signform 9 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)signoff$$(hblk): $$(c2)$$1%K/$$(c1)$$2 %K\\\(%n$$3-%K\\\)) +@ setitem(signform 10 $$fparse(format_timestamp_some $($_timess))$$zt%K[%csignoff%K!%n$$2%K]%n $$3- %K[%nby%W!%n$$1%K]%n) +@ setitem(signform 11 $$fparse(format_timestamp_some $($_timess))$$ztsignoff%K/%n$$1 %K[%n$$3-%K]%n by %c$$2) +@ setitem(signform 12 $$fparse(format_timestamp_some $($_timess))$$zt%K[$$(c1)signoff%K/%n$$1%K]$$(c1) $$2 %K[%n$$3-%n%K]) +@ setitem(signform 13 $$fparse(format_timestamp_some $($_timess))$$zt%K[$$(c3)signoff%K/%n$$1%K]$$(c3) $$2 %K[%n$$3-%n%K]) +@ setitem(signform 14 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)signoff%K/%n$$2 $$(c1)$$1 %K[%n$$3-%n%K]) +@ setitem(signform 15 $$fparse(format_timestamp_some $($_timess))$$zt$$(c3)signoff%K/%n$$2 $$(c3)$$1 %K[%n$$3-%n%K]) +@ setitem(signform 16 $$fparse(format_timestamp_some $($_timess))$$ztSignoff: $$2 \\\($$3-\\\)) +@ setitem(signform 17 *** Signoff: $$2 \\\($$3-\\\)) +@ setitem(signform 18 $$fparse(format_timestamp_some $($_timess))$$zt%K[%Wquit%K/%n$$1%K] %W$$2 %K[%n$$3-%n%K]) diff -aruN amn.orig/arrays/time.a amn/arrays/time.a --- amn.orig/arrays/time.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/time.a Fri Oct 28 21:51:08 2005 @@ -0,0 +1,20 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## timestamp formats -crapple +@ delarray(timeform) +@ setitem(timeform 0 !) +@ setitem(timeform 1 %K[%n$$Z%K]%n ) +@ setitem(timeform 2 %K[%n$$strftime($time()%X)%K]%n ) +@ setitem(timeform 3 [$$Z] ) +@ setitem(timeform 4 [$$strftime($time()%X)] ) +@ setitem(timeform 5 $$Z%c|%n ) +@ setitem(timeform 6 $$strftime($time()%X)%c|%n ) +@ setitem(timeform 7 $$Z ) +@ setitem(timeform 8 $$strftime($time()%X) ) +@ setitem(timeform 9 $$Z| ) +@ setitem(timeform 10 $$strftime($time()%X)| ) +@ setitem(timeform 11 $$Z%c|%n) +@ setitem(timeform 12 $$strftime($time()%X)%c|%n) +@ setitem(timeform 13 %K[%n$$Z%K]%n) +@ setitem(timeform 14 %K[%n$$strftime($time()%X)%K]%n) diff -aruN amn.orig/arrays/topic.a amn/arrays/topic.a --- amn.orig/arrays/topic.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/topic.a Fri Oct 28 21:51:14 2005 @@ -0,0 +1,40 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## topic formats +@ delarray(topform) +@ setitem(topform 0 !) +@ setitem(topform 1 %K[%ntopic%K/$$(c3)$$2%K:%K[$$(c3)$$1%K]]:%n $$3-) +@ setitem(topform 2 %K\\\(%ntopic%K/$$(c3)$$2%K:%K[$$(c3)$$1%K]\\\):%n $$3-) +@ setitem(topform 3 %K[%ntopic%K/$$(c1)$$2%K:%K[$$(c1)$$1%K]]:%n $$3-) +@ setitem(topform 4 %K\\\(%ntopic%K/$$(c1)$$2%K:%K[$$(c1)$$1%K]\\\):%n $$3-) +@ setitem(topform 5 $$1 has changed the topic on channel $$2 to $$3-) +@ setitem(topform 6 $$fparse(format_timestamp_some $($_timess))$$1 has changed the topic on channel $$2 to $$3-) +@ setitem(topform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$2%K] %W$$1 %K[%n$$3-%K]%n) +@ delarray(notopform) +@ setitem(notopform 0 !) +@ setitem(notopform 1 %K[%ntopic%K/$$(c3)$$1%K]:%n %Rtopic not set%n) +@ setitem(notopform 2 %K\\\(%ntopic%K/$$(c3)$$1%K]\\\):%n %Rtopic not set%n) +@ setitem(notopform 3 %K[%ntopic%K/$$(c1)$$1%K]:%n %Rtopic not set%n) +@ setitem(notopform 4 %K\\\(%ntopic%K/$$(c1)$$1%K\\\):%n %Rtopic not set%n) +@ setitem(notopform 5 $$1 : $$2-) +@ setitem(notopform 6 $$fparse(format_timestamp_some $($_timess))$$1 : $$2-) +@ setitem(notopform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] %Rtopic not set%n) +@ delarray(settopform) +@ setitem(settopform 0 !) +@ setitem(settopform 1 %K[%ntopic%K/$$(c3)$$1%K]:%n $$2-) +@ setitem(settopform 2 %K\\\(%ntopic%K/$$(c3)$$1%K]\\\):%n $$2-) +@ setitem(settopform 3 %K[%ntopic%K/$$(c1)$$1%K]:%n $$2-) +@ setitem(settopform 4 %K\\\(%ntopic%K/$$(c1)$$1%K\\\):%n $$2-) +@ setitem(settopform 5 Topic for $$1: $$2-) +@ setitem(settopform 6 $$fparse(format_timestamp_some $($_timess))Topic for $$1: $$2-) +@ setitem(settopform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] $$2-) +@ delarray(topbyform) +@ setitem(topbyform 0 !) +@ setitem(topbyform 1 %K[%ntopic%K/$$(c3)$$1%K:%K[$$(c3)$$2%K]]:%n $$3-) +@ setitem(topbyform 2 %K\\\(%ntopic%K/$$(c3)$$1%K:%K[$$(c3)$$2%K]\\\):%n $$3-) +@ setitem(topbyform 3 %K[%ntopic%K/$$(c1)$$1%K:%K[$$(c1)$$2%K]]:%n $$3-) +@ setitem(topbyform 4 %K\\\(%ntopic%K/$$(c1)$$1%K:%K[$$(c1)$$2%K]\\\):%n $$3-) +@ setitem(topbyform 5 Topic for $$1 was set by $$2 on $$3-) +@ setitem(topbyform 6 $$fparse(format_timestamp_some $($_timess))Topic for $$1 was set by $$2 on $$3-) +@ setitem(topbyform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] %W$$2 %K[%n$$3-%K]%n) diff -aruN amn.orig/arrays/version.a amn/arrays/version.a --- amn.orig/arrays/version.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/version.a Fri Oct 28 21:51:21 2005 @@ -0,0 +1,34 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## sversion formats +@ delarray(svform) +@ setitem(svform 0 !) +@ setitem(svform 1 $$word(0 $info(v))/$$sar(g/ /./$afterw(epic4 $info(v)))[$$info(i)] $$sar(g/././$tolower($uname())) $$sar(g/././$(a.ver)/$(a.rel)) $$scdesc) +@ setitem(svform 2 $$sar(g/././$(a.ver)/$(a.rel)) $$tolower($msar(g/././-/-/$J))[$$info(i)] $$scdesc) +@ setitem(svform 3 ircii/$$word(0 $info(v))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$sar(g/././$tolower($uname()))\($uname(%n)\) $$sar(g/././$(a.ver)/$(a.rel))) +@ setitem(svform 4 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$sar(g/././$(a.ver)\($(a.rel))\) $$scdesc) +@ setitem(svform 5 ircII $$toupper($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$uname() $$a.ver/$$a.rel) +@ setitem(svform 6 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$sar(g/././$tolower($uname()))\($uname(%n)\) $$sar(g/././$(a.ver)[$(a.rel))] $$scdesc) +@ setitem(svform 7 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$(a.ver)<$$(a.rel)> - ..$$strip(\(\) $scdesc)) +@ setitem(svform 8 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] : $$tolower($uname()) [$$(a.ver)$$(a.rel)]) +@ setitem(svform 9 $word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$tolower($uname()) $$a.ver/$$a.rel) +@ setitem(svform 10 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$(a.ver)$$sar(g/././$(a.rel)) ) +@ setitem(svform 11 $$(a.ver)$$sar(g/././$(a.rel)) $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)]) +@ setitem(svform 12 $$(a.ver)[$$(a.rel)] $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)]) +##svform 13-15 added - phuzion - 12.04.99 -- 16 added 12.05.99 +@ setitem(svform 13 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$tolower($uname(%s)-$uname(%%r)) - amnesiac/$$(a.rel)) +@ setitem(svform 14 $$toupper($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$uname(%s)-$$uname(%%r) - amnesiac!$$(a.rel)) +@ setitem(svform 15 $$toupper($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$uname(%s)-$$uname(%%r) - amnesiac/$$(a.rel)) +@ setitem(svform 16 $$tolower($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$tolower($uname(%s))-$$uname(%%r) - amnesiac/$$(a.rel)) +@ setitem(svform 17 ..$$word(0 $info(v))!$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$tolower($uname()) \\\($$a.ver/$$a.rel\\\) $$scdesc) +@ setitem(svform 18 $$sar(g/././$word(0 $info(v))/$word(1 $info(v)).$word(2 $info(v))).$$word(3 $info(v))[$$info(i)] $$tolower($sar(g/././$uname())) $$a.ver/$$sar(g/././$a.rel)) +##svform 19-20 added - zak - 7/30/05 - 21-26 -- fake version stuff. +@ setitem(svform 19 ircII $J $uname()) +@ setitem(svform 20 ircII $J[$info(i)] $uname()) +@ setitem(svform 21 ircii/$$word(0 $info(v))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$info(i)] sunos 5.10(insanity)amnesiac/$$(a.rel)) +@ setitem(svform 22 irssi v0.8.10-rc5 - running on OpenBSD Sparc64) +@ setitem(svform 23 ircII 20050423+ScrollZ 1.9.5 (19.12.2004)+Cdcc v1.8+OperMods v1.0 by acidflash - clear(01g))) +@ setitem(svform 24 ircII 20050423+ScrollZ 1.9.5 (19.12.2004)+Cdcc v1.8+OperMods v1.0 by acidflash - Almost there) +@ setitem(svform 25 BitchX-1.1-final+ by panasync - *IX :7A69!) +@ setitem(svform 26 mIRC v6.16 Khaled Mardam-Bey) diff -aruN amn.orig/arrays/wall.a amn/arrays/wall.a --- amn.orig/arrays/wall.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/wall.a Fri Oct 28 21:51:27 2005 @@ -0,0 +1,34 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## wall formats +@ delarray(wallform) +@ setitem(wallform 0 !) +@ setitem(wallform 1 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(c1)chanwall$$(hblk)-$(cl)$$1$$(hblk)/$$(cl)$$2$$(hblk)\\\)$$(cl) $$3-) +@ setitem(wallform 2 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\($$(hwht)*$$(c1)\\\) $$(c1)\\\($$(cl)$$1$$(hblk)/$$(hwht)$$2$$(c1)\\\)$$(cl) $$3-) +@ setitem(wallform 3 $$fparse(format_timestamp_some $($_timess))$$(cl)[$$(hgrn)BX-Wall$$(cl)/$$(hwht)$$2:$$1$$(cl)] $$3-) +@ setitem(wallform 4 $$fparse(format_timestamp_some $($_timess))$$(c1)[$$(hwht)w$$(cl)all$$(c1)/$$(cl)$$1$$(hblk):$$(cl)$$2$$(c1)]$$(cl) $$3-) +@ setitem(wallform 5 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wa%nmn%K/%nwall%K[%c$$1%K:%c$$2%K]\\\)%n $$3-) +@ setitem(wallform 6 $$fparse(format_timestamp_some $($_timess))%c<%Ka%K!%Ww%nall%c\\\(%n$$1%K/%n$$2%c\\\)>%n $$3-) +@ setitem(wallform 7 $$fparse(format_timestamp_some $($_timess))%K(%Wa%K/%nwall%K) [%n$$1%K:%n$$2%K]%n $$3-) +@ setitem(wallform 8 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wa%nmn%K/%nwall%K\\\(%c$$1%K/%c$$2%K\\\)]%n $$3-) +@ setitem(wallform 9 $$fparse(format_timestamp_some $($_timess))$$(hblk)[$$(c2)+$$(c1)o$$(hblk)] [$$(cyn)$$1$$(hblk)/$$(cl)$$2$$(hblk)]$$(cl) $$3-) +@ setitem(wallform 10 $$fparse(format_timestamp_some $($_timess))%K[%c*%C*%K] [%c$$1%K!%n$$2%K]%n $$3-) +@ setitem(wallform 11 $$fparse(format_timestamp_some $($_timess))[$$1!$$2] $$3-) +@ setitem(wallform 12 -*@$$2*-> $$3-) + +## bwall foramts +@ delarray(bwallform) +@ setitem(bwallform 0 !) +@ setitem(bwallform 1 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(c1)chanwall$$(hblk)-$$(cl)$$N$$(hblk)/$$(cl)$$C$$(hblk)\\\)$$(cl) $$1-) +@ setitem(bwallform 2 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\($$(hwht)*$$(c1)\\\) $$(c1)\\\($$(cl)$$N$$(hblk)/$$(hwht)$$C$$(c1)\\\)$$(cl) $$1-) +@ setitem(bwallform 3 $$fparse(format_timestamp_some $($_timess))$$(cl)[$$(hgrn)BX-Wall$$(cl)/$$(hwht)$$C:*$$(cl)] $$1-) +@ setitem(bwallform 4 $$fparse(format_timestamp_some $($_timess))$$(c1)[$$(hwht)w$$(cl)all$$(c1)/$$(cl)$$N$$(hblk):$$(cl)$$C$$(c1)]$$(cl) $$1-) +@ setitem(bwallform 5 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wa%K/%nwall%K[%c$$N%K:%c$$C%K]\\\)%n $$1-) +@ setitem(bwallform 6 $$fparse(format_timestamp_some $($_timess))%c<%Ka%K!%Ww%nall%c\\\(%n$$N%K/%n$$C%c\\\)>%n $$1-) +@ setitem(bwallform 7 $$fparse(format_timestamp_some $($_timess))%K(%Wa%nmn%K/%nwall%K) [%n$$N%K:%n$$C%K]%n $$1-) +@ setitem(bwallform 8 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wa%nmn%K/%nwall%K\\\(%c$$N%K/%c$$C%K\\\)]%n $$1-) +@ setitem(bwallform 9 $$fparse(format_timestamp_some $($_timess))$$(hblk)[$$(c2)+$$(c1)o$$(hblk)] [$$(cyn)$$N$$(hblk)/$$(cl)$$C$$(hblk)]$$(cl) $$1-) +@ setitem(bwallform 10 $$fparse(format_timestamp_some $($_timess))%K[%c*%C*%K] [%c$$N%K!%n$$C%K]%n $$1-) +@ setitem(bwallform 11 $$fparse(format_timestamp_some $($_timess))[$$N!$$C] $$1-) +@ setitem(bwallform 12 [$$N!$$C] $$1-) diff -aruN amn.orig/arrays/who.a amn/arrays/who.a --- amn.orig/arrays/who.a Wed Dec 31 19:00:00 1969 +++ amn/arrays/who.a Fri Oct 28 21:51:32 2005 @@ -0,0 +1,17 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. + +## who formats +@ delarray(whoform) +@ setitem(whoform 0 !) +@ setitem(whoform 1 %K[%C³%K] %c$$[10]center(10 $2) %K\\\($$[35]center(35 %n$4%W@%n$5)%K\\\) %K[%n$$[3]3%K] [%n$$6%m/%c$$7%K]) +@ setitem(whoform 2 $$[16]1 $$[9]2 $$[4]3 $$4@$$5 $$7-) +@ setitem(whoform 3 %Y$$[10]1 %W$$[10]2%w %c$$[3]3 %w$$4%R@%w$$5 \\\($$8-\\\) \\\($$6\\\)) + +## who footers +@ delarray(whofootform) +@ setitem(whofootform 0 !) +@ setitem(whofootform 1 ÀÄÄÄÄÄ---%cÄ%C--%cÄÄ%C-%cÄÄÄÄÄÄ---%KÄ%c--%KÄÄ%c-%KÄÄÄÄÄÄÄÄÄ--- -- -) +@ setitem(whofootform 2 *** $$1-) +@ setitem(whofootform 3 *** %Y$$1:%w %W$$2%w $$3-) + diff -aruN amn.orig/core/arrays.m amn/core/arrays.m --- amn.orig/core/arrays.m Tue Oct 11 15:39:13 2005 +++ amn/core/arrays.m Wed Dec 31 19:00:00 1969 @@ -1,776 +0,0 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. -# last modified: 9.07.05 - crapple -subpackage arrays - -## msg formats -@ delarray(mform) -@ setitem(mform 0 !) -@ setitem(mform 1 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\\\)%n $$3-) -@ setitem(mform 2 $$fparse(format_timestamp_some $($_timess))%K\\\[%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\\\]%n $$3-) -@ setitem(mform 3 $$fparse(format_timestamp_some $($_timess))%K\\\[%M$$1%K\\\(%m$$2%K\\\)]%n $$3-) -@ setitem(mform 4 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\)%n $$3-) -@ setitem(mform 5 $$fparse(format_timestamp_some $($_timess))%K[%c$$1%K\\\(%C$$2%K\\\)]%n $$3-) -@ setitem(mform 6 $$fparse(format_timestamp_some $($_timess))%K[%b$$1%K\\\(%B$$2%K\\\)]%n $$3-) -@ setitem(mform 7 $$fparse(format_timestamp_some $($_timess))%K.%m.%K\\\(%c$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) -@ setitem(mform 8 $$fparse(format_timestamp_some $($_timess))%K.%m.%K\\\(%c$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) -@ setitem(mform 9 $$fparse(format_timestamp_some $($_timess))%K.$$(c3).%K\\\($$(c3)$$1%K[$$(cl)$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\)%n $$3-) -@ setitem(mform 10 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K[$$(c4)$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) -@ setitem(mform 11 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[\%w$$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K\\\)]%n $$3-) -@ setitem(mform 12 $$fparse(format_timestamp_some $($_timess))$$(c3).%K.$$(c3)\\\(%w$$1$$(c3)[%K$$msar(g/@/$cparse($(c3)@)$(hblk)/./$cparse($(c3).)$(hblk)/$2)$$(c3)]\\\)%n $$3-) -@ setitem(mform 13 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c2).$$(hblk)[$$(c2)$$1$$(hblk)\\\($$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)$$(hblk)\\\)]$$(cl) $$3-) -@ setitem(mform 14 $$fparse(format_timestamp_some $($_timess))$$(cyn).$$(hblk).\\\($$(hcyn)$$1$$(hblk)\\\)$$(cl) $$3- $$(hblk)[$$(cyn)$$msar(g/./$(hblk).$(cl)/@/$(hblk)@$(cl)/$2)$$(hblk)]$$(cl)) -@ setitem(mform 15 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wm%K/$$(c2)$$1%K[$$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K]\\\)%n $$3-) -@ setitem(mform 16 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(c2)$$1$$(hblk)!$$(c2)$$2$$(hblk)\\\)$$(cl) $$3-) -@ setitem(mform 17 $$fparse(format_timestamp_some $($_timess))$$G %K[%n$$1%K/$$(c3)$$2%K]%n $$3-) -@ setitem(mform 18 $$fparse(format_timestamp_some $($_timess))$$G %K[%c$$1%K!%n$$before(@ $2)%W@%n$$after(@ $2)%K]%n $$3-) -@ setitem(mform 19 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(hwht)$$1$$(hblk)\\\($$(cl)$$2$$(hblk)\\\)\\\)$$(cl) $$3-) -@ setitem(mform 20 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(hwht)msg$$(hblk)/$$(hblu)$$1$$(hblk)[$$(blu)$$2$$(hblk)]\\\)$$(cl) $$3-) -@ setitem(mform 21 $$fparse(format_timestamp_some $($_timess))$$G %K\\\(%m$$1%K<%n$$before(@ $2)%W@%n$$after(@ $2)%K>\\\)%n $$3-) -@ setitem(mform 22 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c1).$$(hblk)\\\($$(c1)$$1$$(hblk)[$$(cl)$$sar(g/@/$(hblk)@$(cl)/$2)%K\\\)] %n$$3-) -@ setitem(mform 23 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\)]%n $$3-) -@ setitem(mform 24 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\)]%n $$3-) -@ setitem(mform 25 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\)%n $$3-) -@ setitem(mform 26 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K!$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\)%n $$3-) -@ setitem(mform 27 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)!%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)\)%n $$3-) -@ setitem(mform 28 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)!%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)\)%n $$3-) -@ setitem(mform 29 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K]%n $$3- %n%K[$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K]) -@ setitem(mform 30 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)$$1%K]%n $$3- %n%K[$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K]) -@ setitem(mform 31 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)]%n $$3- %n$$(c1)[%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)]) -@ setitem(mform 32 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)]%n $$3- %n$$(c3)[%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)]) -@ setitem(mform 33 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K]%n $$3- %n%K[%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K]) -@ setitem(mform 34 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)$$1%K]%n $$3- %n%K[%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K]) -@ setitem(mform 35 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$3- %n%K[$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K]) -@ setitem(mform 36 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$3- %n%K[$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K]) -@ setitem(mform 37 $$fparse(format_timestamp_some $($_timess))*$$1* $$3-) -@ setitem(mform 38 *$$1* $$3-) -## mform 39 - violence 8.06.05 -@ setitem(mform 39 $$fparse(format_timestamp_some $($_timess))%K.$$(hwht).$$(hblk)\\\($$(hwht)$$1$$(hblk)\\\[%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K]\\\)%n $$3-) -## mform 40-42 - crapple 8.30.05 -@ setitem(mform 40 $$fparse(format_timestamp_some $($_timess))%B\\\(%n$$1%B!%n$$before(@ $2)%G@%n$$after(@ $2)%B\)%n $$3-) -@ setitem(mform 41 $$fparse(format_timestamp_some $($_timess))%B\\\(%n$$1%B!%n$$before(@ $2)%B@%n$$after(@ $2)%B\)%n $$3-) -@ setitem(mform 42 $$fparse(format_timestamp_some $($_timess))%m\\\(%n$$1%m!%n$$before(@ $2)@$$after(@ $2)%m\)%n $$3-) - -## send msg formats -@ delarray(smform) -@ setitem(smform 0 !) -@ setitem(smform 1 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)msg%K!%n$$1%K\\\)%n $$2-) -@ setitem(smform 2 $$fparse(format_timestamp_some $($_timess))%K>\\\[$$(c1)msg%K!%n$$1%K\\\]%n $$2-) -@ setitem(smform 3 $$fparse(format_timestamp_some $($_timess))%K\\\[%rmsg%K\\\(%R$$1%K\\\)]$(cl) $$2-) -@ setitem(smform 4 $$fparse(format_timestamp_some $($_timess))%K¯[%nmsg%K\\\(%n$$1%K\\\)]%n $$2-) -@ setitem(smform 5 $$fparse(format_timestamp_some $($_timess))%K¯[%cmsg%K\\\(%C$$1%K\\\)]%n $$2-) -@ setitem(smform 6 $$fparse(format_timestamp_some $($_timess))%K¯[%bmsg%K\\\(%B$$1%K\\\)]%n $$2-) -@ setitem(smform 7 $$fparse(format_timestamp_some $($_timess))%K[%rmsg%K\\\(%R$$1%K\\\)]%n $$2-) -@ setitem(smform 8 $$fparse(format_timestamp_some $($_timess))%m.%K.[%Wm%nsg%K\\\(%c$$1%K\\\)]%n $$2-) -@ setitem(smform 9 $$fparse(format_timestamp_some $($_timess))%K¯[$$(c3)msg%K\\\($$(c4)$$1%K\\\)]%n $$2-) -@ setitem(smform 10 $$fparse(format_timestamp_some $($_timess))%K¯[$$(c1)msg%K\\\($$(c2)$$1%K\\\)]%n $$2-) -@ setitem(smform 11 $$fparse(format_timestamp_some $($_timess))%c.%K.[%Wm%nsg%K\\\(%c$$1%K\\\)]%n $$2-) -@ setitem(smform 12 $$fparse(format_timestamp_some $($_timess))$$(c3).%K.$$(c3)\\\(%Wm%nsg$$(c3)[%K$$1$$(c3)]\\\)%n $$2-) -@ setitem(smform 13 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c2).$$(hblk)[$$(hwht)m$$(cl)sg$$(hblk)\\\($$(c2)$$1$$(hblk)\\\)]$$(cl) $$2-) -@ setitem(smform 14 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(cyn)msg$$(hblk)[$$(cyn)$$1$$(hblk)]\\\)$$(cl) $$2-) -@ setitem(smform 15 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wsm%K/$$(c2)$$1%K\\\)%n $$2-) -@ setitem(smform 16 $$fparse(format_timestamp_some $($_timess))$$(hblk)-> \\\($$(c2)$$1$$(hblk)\\\)$$(cl) $$2-) -@ setitem(smform 17 $$fparse(format_timestamp_some $($_timess))$$G %K[%nmsg%K/$$(c3)$$1%K]%n $$2-) -@ setitem(smform 18 $$fparse(format_timestamp_some $($_timess))%K:> [%cmsg%K!%n$$1%K]%n $$2-) -@ setitem(smform 19 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(cl)msg$$(hblk)\\\($$(hwht)$$1$$(hblk)\\\)\\\)$$(cl) $$2-) -@ setitem(smform 20 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(hwht)msg$$(hblk)/$$(hblu)$$1$$(hblk)[$$(blu)*@*$$(hblk)]\\\) $$(cl)$$2-) -@ setitem(smform 21 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)msg%K!%n$$1%K]%n $$2-) -@ setitem(smform 22 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)msg%K!%n$$1%K\\\) %n$$2-) -@ setitem(smform 23 $$fparse(format_timestamp_some $($_timess))%K-> \\\(%mmsg%K<%n$$1%K>\\\)%n $$2-) -@ setitem(smform 24 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K\\\($$(c1)$$1%K\)]%n $$2-) -@ setitem(smform 25 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K\\\($$(c3)$$1%K\)]%n $$2-) -@ setitem(smform 26 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nmsg$$(c1)\\\(%n$$1$$(c1)\)]%n $$2-) -@ setitem(smform 27 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nmsg$$(c3)\\\(%n$$1$$(c3)\)]%n $$2-) -@ setitem(smform 28 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K/$$(c1)$$1%K]%n $$2-) -@ setitem(smform 29 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K/$$(c3)$$1%K]%n $$2-) -@ setitem(smform 30 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nmsg$$(c1)/%n$$1$$(c1)]%n $$2-) -@ setitem(smform 31 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nmsg$$(c3)/%n$$1$$(c3)]%n $$2-) -@ setitem(smform 32 $$fparse(format_timestamp_some $($_timess))%K\\\(%nmsg%K/$$(c1)$$1%K\)%n $$2-) -@ setitem(smform 33 $$fparse(format_timestamp_some $($_timess))%K\\\(%nmsg%K/$$(c3)$$1%K\)%n $$2-) -@ setitem(smform 34 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%nmsg$$(c1)/%n$$1$$(c1)\)%n $$2-) -@ setitem(smform 35 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%nmsg$$(c3)/%n$$1$$(c3)\)%n $$2-) -@ setitem(smform 36 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)> %K[$$(c1)$$1%K]%n $$2-) -@ setitem(smform 37 $$fparse(format_timestamp_some $($_timess))$$(c3)-$$(c4)> %K[$$(c3)$$1%K]%n $$2-) -@ setitem(smform 38 $$fparse(format_timestamp_some $($_timess))%n-$$(c1)> $$(c1)[%n$$1$$(c1)]%n $$2-) -@ setitem(smform 39 $$fparse(format_timestamp_some $($_timess))%n-$$(c3)> $$(c3)[%n$$1$$(c3)]%n $$2-) -@ setitem(smform 40 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)$$1%K\)%n $$2-) -@ setitem(smform 41 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c3)$$1%K\)%n $$2-) -@ setitem(smform 42 $$fparse(format_timestamp_some $($_timess))$$(c1)>\\\(%n$$1$$(c1)\)%n $$2-) -@ setitem(smform 43 $$fparse(format_timestamp_some $($_timess))$$(c3)>\\\(%n$$1$$(c3)\)%n $$2-) -@ setitem(smform 44 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)$$1%K]%n $$2-) -@ setitem(smform 45 $$fparse(format_timestamp_some $($_timess))%K>[$$(c3)$$1%K]%n $$2-) -@ setitem(smform 46 $$fparse(format_timestamp_some $($_timess))$$(c1)>[%n$$1$$(c1)]%n $$2-) -@ setitem(smform 47 $$fparse(format_timestamp_some $($_timess))$$(c3)>[%n$$1$$(c3)]%n $$2-) -@ setitem(smform 48 $$fparse(format_timestamp_some $($_timess))*$$1*> $$2-) -@ setitem(smform 49 *$$1*> $$2-) -## smform 50-53 - crapple - 8.06.05 - 54-55 - 8.30.05 -@ setitem(smform 50 $$fparse(format_timestamp_some $($_timess))%W-$$(cl)>%n%W \\\($$(cl)$$1%W\\\)%n $$2-) -@ setitem(smform 51 $$fparse(format_timestamp_some $($_timess))$$(cl)-%W>%n$$(hgrn) \\\($$(cl)$$1$$(hgrn)\\\)%n $$2-) -@ setitem(smform 52 $$fparse(format_timestamp_some $($_timess))$$(cl)-%w>%n \\\($$1\\\) $$2-) -@ setitem(smform 53 $$fparse(format_timestamp_some $($_timess))$$(cl)-%W>%n%W \\\($$(cl)$$1%W\\\)%n $$2-) -@ setitem(smform 54 $$fparse(format_timestamp_some $($_timess))$$(cl)-%W>%n$$(hblu) \\\($$(cl)$$1$$(hblu)\\\)%n $$2-) - -## public formats -@ delarray(pubform) -@ setitem(pubform 0 !) -@ setitem(pubform 1 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(pubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\\\)%n $$2-) -@ setitem(pubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<%n$$1$$(hmag)>%n $$2-) -@ setitem(pubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\(%n$$1$$(hmag)\\\)%n $$2-) -@ setitem(pubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<%n$$1$$(hblu)>%n $$2-) -@ setitem(pubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) -@ setitem(pubform 7 $$fparse(format_timestamp_some $($_timess))%b<%n$$1%b>%n $$2-) -@ setitem(pubform 8 $$fparse(format_timestamp_some $($_timess))%b\\\(%n$$1%b\\\)%n $$2-) -@ setitem(pubform 9 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(pubform 10 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$1%K>%n $$2-) -@ setitem(pubform 11 $$fparse(format_timestamp_some $($_timess))%K<$$(c3)$$1%K>%n $$2-) -@ setitem(pubform 12 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$1$$(c1)>%n $$2-) -@ setitem(pubform 13 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$1$$(c3)>%n $$2-) -@ setitem(pubform 14 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\)%n $$2-) -@ setitem(pubform 15 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K\)%n $$2-) -@ setitem(pubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K\)%n $$2-) -@ setitem(pubform 17 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)\)%n $$2-) -@ setitem(pubform 18 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)\)%n $$2-) -@ setitem(pubform 19 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$2-) -@ setitem(pubform 20 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)]%n $$2-) -@ setitem(pubform 21 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)]%n $$2-) -@ setitem(pubform 22 $$fparse(format_timestamp_some $($_timess))<$$1> $$2-) -@ setitem(pubform 23 <$$1> $$2-) -## pubform 24-26 - crapple 8.06.05 -@ setitem(pubform 24 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\(%n$$1$$(wht)\\\)%n $$2-) -@ setitem(pubform 25 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\(%n$$1$$(cl)\\\)%n $$2-) -@ setitem(pubform 26 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\(%n$$1$$(hwht)\\\)%n $$2-) - -## send public formats -@ delarray(spubform) -@ setitem(spubform 0 !) -@ setitem(spubform 1 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(spubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\\\)%n $$2-) -@ setitem(spubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<%n$$1$$(hmag)>%n $$2-) -@ setitem(spubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\(%n$$1$$(hmag)\\\)%n $$2-) -@ setitem(spubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<%n$$1$$(hblu)>%n $$2-) -@ setitem(spubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) -@ setitem(spubform 7 $$fparse(format_timestamp_some $($_timess))%K<%c$$1%K>%n $$2-) -@ setitem(spubform 8 $$fparse(format_timestamp_some $($_timess))%K\\\(%c$$1%K\\\)%n $$2-) -@ setitem(spubform 9 $$fparse(format_timestamp_some $($_timess))%b<%n$$1%b>%n $$2-) -@ setitem(spubform 10 $$fparse(format_timestamp_some $($_timess))%b\\\(%n$$1%b\\\)%n $$2-) -@ setitem(spubform 11 $$fparse(format_timestamp_some $($_timess))$$(sc1)<%n$$1$$(sc1)>%n $$2-) -@ setitem(spubform 12 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(spubform 13 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$1%K>%n $$2-) -@ setitem(spubform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$1$$(c1)>%n $$2-) -@ setitem(spubform 15 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$1$$(c3)>%n $$2-) -@ setitem(spubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\)%n $$2-) -@ setitem(spubform 17 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K\)%n $$2-) -@ setitem(spubform 18 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)\)%n $$2-) -@ setitem(spubform 19 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)\)%n $$2-) -@ setitem(spubform 20 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$2-) -@ setitem(spubform 21 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K]%n $$2-) -@ setitem(spubform 22 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)]%n $$2-) -@ setitem(spubform 23 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)]%n $$2-) -@ setitem(spubform 24 $$fparse(format_timestamp_some $($_timess))> $$2-) -@ setitem(spubform 25 > $$2-) -## sendpub 26-28 - crapple 8.06.05 - 29-30 - 8.30.05 -@ setitem(spubform 26 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\(%n$$1$$(wht)\\\)%n $$2-) -@ setitem(spubform 27 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\(%n$$1$$(cl)\\\)%n $$2-) -@ setitem(spubform 28 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\(%n$$1$$(hwht)\\\)%n $$2-) -@ setitem(spubform 29 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) -@ setitem(spubform 30 $$fparse(format_timestamp_some $($_timess))$$(mag)\\\(%n$$1$$(mag)\\\)%n $$2-) - -## send public other formats -@ delarray(spuboform) -@ setitem(spuboform 0 !) -@ setitem(spuboform 1 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K:%n$$2%K>%n $$3-) -@ setitem(spuboform 2 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K:%n$$2%K\\\)%n $$3-) -@ setitem(spuboform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<%n$$1%K:%n$$2$$(hmag)>%n $$3-) -@ setitem(spuboform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\(%n$$1%K:%n%N$$2$$(hmag)\\\)%n $$3-) -@ setitem(spuboform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<%n$$1%K:%n$$2$$(hblu)>%n $$3-) -@ setitem(spuboform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1%K:%n$$2$$(hblu)\\\)%n $$3-) -@ setitem(spuboform 7 $$fparse(format_timestamp_some $($_timess))$$(blu)\\\(%n$$1%K:%n$$2$$(blu)\\\)%n $$3-) -@ setitem(spuboform 8 $$fparse(format_timestamp_some $($_timess))$$(blu)<%n$$1%K:%n$$2$$(blu)>%n $$3-) -@ setitem(spuboform 9 $$fparse(format_timestamp_some $($_timess))%K<%n$$2%K/%n$$1%K>%n $$3-) -@ setitem(spuboform 10 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$2%K/$$(c1)$$1%K>%n $$3-) -@ setitem(spuboform 11 $$fparse(format_timestamp_some $($_timess))%K<$$(c3)$$2%K/$$(c3)$$1%K>%n $$3-) -@ setitem(spuboform 12 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$2$$(c1)/$$1$$(c1)>%n $$3-) -@ setitem(spuboform 13 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$2$$(c3)/$$1$$(c3)>%n $$3-) -@ setitem(spuboform 14 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$2%K/%n$$1%K\)%n $$3-) -@ setitem(spuboform 15 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$2%K/$$(c1)$$1%K\)%n $$3-) -@ setitem(spuboform 16 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$2%K/$$(c3)$$1%K\)%n $$3-) -@ setitem(spuboform 17 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$2$$(c1)/%n$$1$$(c1)\)%n $$3-) -@ setitem(spuboform 18 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$2$$(c3)/%n$$1$$(c3)\)%n $$3-) -@ setitem(spuboform 19 $$fparse(format_timestamp_some $($_timess))%K[%n$$2%K/%n$$1%K]%n $$3-) -@ setitem(spuboform 20 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$2$$(c1)/%n$$1$$(c1)]%n $$3-) -@ setitem(spuboform 21 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$2$$(c3)/%n$$1$$(c3)]%n $$3-) -@ setitem(spuboform 22 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K/%n$$2%K>%n $$3-) -@ setitem(spuboform 23 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$1%K/$$(c1)$$2%K>%n $$3-) -@ setitem(spuboform 24 $$fparse(format_timestamp_some $($_timess))%K<$$(c3)$$1%K/$$(c3)$$2%K>%n $$3-) -@ setitem(spuboform 25 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$1$$(c1)/$$2$$(c1)>%n $$3-) -@ setitem(spuboform 26 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$1$$(c3)/$$2$$(c3)>%n $$3-) -@ setitem(spuboform 27 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K/%n$$2%K\)%n $$3-) -@ setitem(spuboform 28 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K/$$(c1)$$2%K\)%n $$3-) -@ setitem(spuboform 29 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K/$$(c3)$$2%K\)%n $$3-) -@ setitem(spuboform 30 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)/%n$$2$$(c1)\)%n $$3-) -@ setitem(spuboform 31 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)/%n$$2$$(c3)\)%n $$3-) -@ setitem(spuboform 32 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K/%n$$2%K]%n $$3-) -@ setitem(spuboform 33 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)/%n$$2$$(c1)]%n $$3-) -@ setitem(spuboform 34 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)/%n$$2$$(c3)]%n $$3-) -@ setitem(spuboform 35 $$fparse(format_timestamp_some $($_timess))<$$1:$$2> $$3-) -@ setitem(spuboform 36 <$$1:$$2> $$3-) - -## signoff formats -@ delarray(signform) -@ setitem(signform 0 !) -@ setitem(signform 1 $$fparse(format_timestamp_some $($_timess))$$ztsignoff: %K\\\(%n$$1%K/%n$$2%K\\\)%n $$3-) -@ setitem(signform 2 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)signoff%K: $$(c2)$$1%K/$$(c2)$$2 %K\\\(%n$$3-%K\\\)) -@ setitem(signform 3 $$fparse(format_timestamp_some $($_timess))$$zt%nsignoff: %W$$1%K/%W$$2 %K\\\(%n$$3-%K\\\)) -@ setitem(signform 4 $$fparse(format_timestamp_some $($_timess))$$zt%c.%K.[%Ws%nignoff%K/%n$$1%K\\\(%w$$2%K\\\)]:%n $$3-) -@ setitem(signform 5 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)$$1$$(c2)/$$(c1)$$2 %nhas left irc%K:%n $$3-) -@ setitem(signform 6 $$fparse(format_timestamp_some $($_timess))$$zt%K.%m.%K[%Ws%nignoff%m.%n$$1%K\\\(%m$$2%K\\\)] %K\\\(%n$$3-%K\\\)) -@ setitem(signform 7 $$fparse(format_timestamp_some $($_timess))$$zt%K.%c.%K[%Ws%nignoff%c.%n$$1%K\\\(%c$$2%K\\\)] [%n$$3-%K]%n) -@ setitem(signform 8 $$fparse(format_timestamp_some $($_timess))$$zt%K\\\(%Wquit%K/$$(c2)$$1%K\\\) \\\(%n$$3-%K\\\)) -@ setitem(signform 9 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)signoff$$(hblk): $$(c2)$$1%K/$$(c1)$$2 %K\\\(%n$$3-%K\\\)) -@ setitem(signform 10 $$fparse(format_timestamp_some $($_timess))$$zt%K[%csignoff%K!%n$$2%K]%n $$3- %K[%nby%W!%n$$1%K]%n) -@ setitem(signform 11 $$fparse(format_timestamp_some $($_timess))$$ztsignoff%K/%n$$1 %K[%n$$3-%K]%n by %c$$2) -@ setitem(signform 12 $$fparse(format_timestamp_some $($_timess))$$zt%K[$$(c1)signoff%K/%n$$1%K]$$(c1) $$2 %K[%n$$3-%n%K]) -@ setitem(signform 13 $$fparse(format_timestamp_some $($_timess))$$zt%K[$$(c3)signoff%K/%n$$1%K]$$(c3) $$2 %K[%n$$3-%n%K]) -@ setitem(signform 14 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)signoff%K/%n$$2 $$(c1)$$1 %K[%n$$3-%n%K]) -@ setitem(signform 15 $$fparse(format_timestamp_some $($_timess))$$zt$$(c3)signoff%K/%n$$2 $$(c3)$$1 %K[%n$$3-%n%K]) -@ setitem(signform 16 $$fparse(format_timestamp_some $($_timess))$$ztSignoff: $$2 \\\($$3-\\\)) -@ setitem(signform 17 *** Signoff: $$2 \\\($$3-\\\)) -@ setitem(signform 18 $$fparse(format_timestamp_some $($_timess))$$zt%K[%Wquit%K/%n$$1%K] %W$$2 %K[%n$$3-%n%K]) -## join formats -@ delarray(joinform) -@ setitem(joinform 0 !) -@ setitem(joinform 1 $$fparse(format_timestamp_some $($_timess))$$(c4)$$1 %K[$$(c3)$$3%K]%n has joined $$2) -@ setitem(joinform 2 $$(c4)$$1 %K\\\($$(c3)$$3%K\\\)%n has joined $$2 $$Z) -@ setitem(joinform 3 %c.%K.[%Wj%noin%K/%n$$2%K]%n $$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$3)%K\\\)%n $$Z) -@ setitem(joinform 4 $$fparse(format_timestamp_some $($_timess))$$(c1)$$1 %K[$$(c2)$$3$$(c1)%K]%n has joined $$(c2)$$2) -@ setitem(joinform 5 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wj%noin%c.%n$$2%K] \\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$3)%K]\\\)%n) -@ setitem(joinform 6 $$fparse(format_timestamp_some $($_timess))%K.%m.%K[%Wj%noin%m.%n$$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$3)%K\\\)]%n to %m$$2) -@ setitem(joinform 7 $$G %K\\\(%Wjoin%K/%W$$2%K\\\)%n - %W$$1%K[$$(c1)$$before(@ $3)%K@$$(c1)$$after(@ $3)%K]%n $$Z) -@ setitem(joinform 8 $$G $$(c1)join$$(hblk)\\\($(cl)$$2$$(hblk)\\\)..$$(cl) $$(hwht)$$1$$(cl)!$$(c1)$$3%n $$Z) -@ setitem(joinform 9 $$fparse(format_timestamp_some $($_timess))%K[%cjoin%K!%n$$2%K]%n $$1%W.%n.%c$$3%n) -@ setitem(joinform 10 $$fparse(format_timestamp_some $($_timess))%cj%noin%K/%c$$2 %K[%n$$1%K!%c$$before(@ $3)%n@%c$$after(@ $3)%K]%n) -@ setitem(joinform 11 $$G $$1 \\\($$3\\\) has joined channel $$2) -@ setitem(joinform 12 $$G $$(c1)$$1 %K[$(cl)$$sar(g/@/$(hblk)@$(cl)/$3)$$(c1)%K]%n has joined $$(c2)$$2) -## join added 13-17 crapple 8.06.05 -@ setitem(joinform 13 $$(cl)$$1 %n$$(wht)\\\($$(cl)$$3$$(wht)\\\)%n has joined $$2 $$Z) -@ setitem(joinform 14 $$fparse(format_timestamp_some $($_timess))$$(wht)$$1%n $$(cl)\\\($$(cl)$$3$$(cl)\\\)%n has joined $$2) -@ setitem(joinform 15 $$(wht)$$1%n $$(hwht)\\\($$(cl)$$3$$(hwht)\\\)%n has joined $$2 $$Z) -@ setitem(joinform 16 $$fparse(format_timestamp_some $($_timess))$$(cl)$$1%n $$(wht)\\\($$(ck)$$3$$(wht)\\\)%n has joined $$(wht)$$2%n) -@ setitem(joinform 17 $$G $$(wht)$$1%n $$(hgrn)\\\($$(cl)$$3$$(hgrn)\\\)%n$$(cl) has joined $$(hblu)$$2%n$$(cl) $$Z%n) -## join added 18-19 violence 8.06.05 -@ setitem(joinform 18 $$fparse(format_timestamp_some $($_timess))%c$$1 %K\\\[%C$$3%K\\\]%n has joined %C$$2) -@ setitem(joinform 19 $$fparse(format_timestamp_some $($_timess))$$(c4)$$1 %K[$$(c3)$$3%K]%n has joined $$2) -@ setitem(joinform 20 $$G $$1 \\\($$3\\\) has joined $$2) -@ setitem(joinform 21 $$fparse(format_timestamp_some $($_timess))%K[%Wjoin%K/%n$$2%K]%W $$1 %K[%n$$3%K]%n) - -## leaves formats -@ delarray(leaveform) -@ setitem(leaveform 0 !) -@ setitem(leaveform 1 $$G $$(c1)$$1 %K\\\($$(c2)$$2%K\\\) %nhas left $$(c2)$$3 %K[%n$$4-%K]) -@ setitem(leaveform 2 $$G $$(c1)$$1 %K\\\[$$(c2)$$2%K\\\] %nhas left $$(c2)$$3 %K[%n$$4-%K]%n at $$Z) -@ setitem(leaveform 3 $$G $$1 %K[%w$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]%n has left $$3 %K[%W$$4-%K]) -@ setitem(leaveform 4 $$fparse(format_timestamp_some $($_timess))%c.%K.[%Wp%nart%K/%n$$3%K]%n $$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K\\\) %K[%n$$4-%K]%n) -@ setitem(leaveform 5 $$G %K.%c.%K[%Wp%nart%c.%n$$3%K]%n %K\\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n %K[%n$$4-%K]%n at $$Z) -@ setitem(leaveform 6 $$fparse(format_timestamp_some $($_timess))%K.%m.%K[%Wp%nart%m.%n$$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/$(hblk).$(cl)/$2)%K\\\)]%n of %m$$3 %K[%n$$4-%K]) -@ setitem(leaveform 7 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wpart%K/%W$$3%K\\\)%n - %W$$1%K[$$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K] \\\(%n$$4-%K\\\)) -@ setitem(leaveform 8 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)p%Kú$$(c2)$$3%K\\\)%n $$1%K[%n$$2%K] \\\(%n$$4-%K\\\)%n) -@ setitem(leaveform 9 $$G $$(c1)part$$(hblk)\\\($(cl)$$3$$(hblk)\\\).. $$(cl)$$1$$(hwht)!$$(c1)$$2%n $$Z) -@ setitem(leaveform 10 $$fparse(format_timestamp_some $($_timess))%K[%npart%K!%c$$3%K]%n $$1%W.%n.%c$$2%n) -@ setitem(leaveform 11 $$G part%K/%n$$3 %K[%n$$1%K!%n$$before(@ $2)%K@%n$$after(@ $2)%K]%n $$Z) -@ setitem(leaveform 12 $$G $$1 has left channel $$3) -## leaves 13-14 violence - 8.06.05 -@ setitem(leaveform 13 $$fparse(format_timestamp_some $($_timess))$$(hwht)$$1 %K\\\[%n$$before(@ $2)%K@%n$$after(@ $2)%K\\\]%n has left $$3 %K\\\[%n$$4-%K\\\]) -@ setitem(leaveform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)$$1 %K\\\[$$(c2)$$2%K\\\] %nhas left $$(c2)$$3 %K[%n$$4-%K]) -## leaves 15 - crapple - 8.06.05 -@ setitem(leaveform 15 $$G $$1 %K[%G$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]%n has left $$3 %K[%W$$4-%K]%n at $$Z) -@ setitem(leaveform 16 $$fparse(format_timestamp_some $($_timess))%K[%Wpart%K/%n$$3%K] %W$$1%K\\\(%n$$2%K\\\) [%n$$4%K]%n) - -## mode formats -@ delarray(modeform) -@ setitem(modeform 0 !) -@ setitem(modeform 1 $$fparse(format_timestamp_some $($_timess))$$ztmode%K$$(c3)$$2 %K[%W$$3 $$4-%K]%n by %W$$1) -@ setitem(modeform 2 $$fparse(format_timestamp_some $($_timess))$$zt%K\\\[$$(c1)mode%K!$$(c2)$$2%K\\\] %K"%W$$3 $$4-%K" %nby %w$$1) -@ setitem(modeform 3 $$fparse(format_timestamp_some $($_timess))$$zt%K[%Rmode%K\\\(%r$$2%K\)] %K[%R$$4-%K\\\(%n$$3%K\\\)]%n by %w$$1) -@ setitem(modeform 4 $$fparse(format_timestamp_some $($_timess))$$zt %cmode%C.%c$$2 %K\\\(%n$$3 $$4-%K\\\) %nby %n$$1) -@ setitem(modeform 5 $$fparse(format_timestamp_some $($_timess)) *** Mode change "$$3-" for $$2 by $$1) -@ setitem(modeform 6 *** Mode change "$$3-" for $$2 by $$1) -## 7-9 - violence - 8.06.05 -@ setitem(modeform 7 $$fparse(format_timestamp_some $($_timess))$$zt%cmode%C.%c$$2 %K\\\(%n$$3 $$4-%K\\\) %nby %n$$1) -@ setitem(modeform 8 $$fparse(format_timestamp_some $($_timess))%Mmode%K/%m$$2 %K\\\[$$(hwht)$$3-%K\\\] %nby $$(hwht)$$1) -@ setitem(modeform 9 $$fparse(format_timestamp_some $($_timess))%K\\\[%cmode%K\\\(%C$$2%K\\\) %c$$3 $$4-%K\\\] %nby %C$$1) - -## notice formats -@ delarray(notform) -@ setitem(notform 0 !) -@ setitem(notform 1 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K\\\(%n$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\\\)-%n $$3-) -@ setitem(notform 2 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K\\\[%n$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\\\]-%n $$3-) -@ setitem(notform 3 $$fparse(format_timestamp_some $($_timess))%K-%M$$1%K\\\(%m$$2%K\\\)- %n$$3-) -@ setitem(notform 4 $$fparse(format_timestamp_some $($_timess))%c.%K.%Wn%not%K\\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) -@ setitem(notform 5 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)\\\($$(hwht)$$1$$(c2)\\\)$$(c1)-%n $$3-) -@ setitem(notform 6 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%n$$1%K]%n $$3- %K\\\(%m$$sar(g/@/$(hmag)@$(mag)/$2)%K\\\)) -@ setitem(notform 7 $$fparse(format_timestamp_some $($_timess))%m.%K.[%c\$1%K]%n \$3- %K[%c\$2%K]%n) -@ setitem(notform 8 $$fparse(format_timestamp_some $($_timess))$$(hblk)-$$(c1)$$1$$(hblk)\\\($$(c2)$$2$$(hblk)\\\)-$$(cl) $$3-) -@ setitem(notform 9 $$fparse(format_timestamp_some $($_timess))%K-%Wn%K/$$(c2)$$1%K\\\($$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K\\\)-%n $$3-) -@ setitem(notform 10 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K\\\($$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\)-%n $$3-) -@ setitem(notform 11 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K\\\($$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\)-%n $$3-) -@ setitem(notform 12 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K-%n $$3-) -@ setitem(notform 13 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K!$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K-%n $$3-) -@ setitem(notform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)-%n$$1$$(c1)!%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)-%n $$3-) -@ setitem(notform 15 $$fparse(format_timestamp_some $($_timess))$$(c3)-%n$$1$$(c3)!%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)-%n $$3-) -@ setitem(notform 16 $$fparse(format_timestamp_some $($_timess))%K-$$(c1)$$1%K-%n $$3- %n%K-$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K-) -@ setitem(notform 17 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K-%n $$3- %n%K-$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K-) -@ setitem(notform 18 $$fparse(format_timestamp_some $($_timess))$$(c1)-%n$$1$$(c1)-%n $$3- %n$$(c1)-%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)-) -@ setitem(notform 19 $$fparse(format_timestamp_some $($_timess))$$(c3)-%n$$1$$(c3)-%n $$3- %n$$(c3)-%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)-) -@ setitem(notform 20 $$fparse(format_timestamp_some $($_timess))%K-$$(c1)$$1%K-%n $$3- %n%K-%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K-) -@ setitem(notform 21 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K-%n $$3- %n%K-%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K-) -@ setitem(notform 22 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K-%n $$3- %n%K-$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K-) -@ setitem(notform 23 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K-%n $$3- %n%K-$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K-) -@ setitem(notform 24 $$fparse(format_timestamp_some $($_timess)) -$$1- $$3-) -@ setitem(notform 25 -$$1- $$3-) - -## send notice formats -@ delarray(snotform) -@ setitem(snotform 0 !) -@ setitem(snotform 1 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)notice%K\\\($$(c2)$$1%K\\\)]%n $$2-) -@ setitem(snotform 2 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)notice%K\\\($$(c2)$$1%K\\\)\\\)%n $$2-) -@ setitem(snotform 3 $$fparse(format_timestamp_some $($_timess))%K[%rnotice%K\\\(%R$$1%K\\\)]%n $$2-) -@ setitem(snotform 4 $$fparse(format_timestamp_some $($_timess))%K¯$$(c2)\\\(%c$$1$$(c2)\\\)%n $$2-) -@ setitem(snotform 5 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wn%not%K\\\(%n$$1%K\\\)]%n $$2-) -@ setitem(snotform 6 $$fparse(format_timestamp_some $($_timess))%K¯%c[%K$$1%c]%n $$2-) -@ setitem(snotform 7 $$fparse(format_timestamp_some $($_timess))%m.%K.[%nno%Wt%K\\\(%m$$1%K\\\)]%n $$2-) -@ setitem(snotform 8 $$fparse(format_timestamp_some $($_timess))%K-> [%cnot%K!%n$$1%K]%n $$2-) -@ setitem(snotform 9 $$fparse(format_timestamp_some $($_timess))%K¯[$$(c1)notice%K\\\($$(c2)$$1%K\\\)]%n $$2-) -@ setitem(snotform 10 $$fparse(format_timestamp_some $($_timess))%K\-%Wsn%K/$$(c2)$$1%K-%n $$2-) -@ setitem(snotform 11 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K\\\($$(c1)$$1%K\)]%n $$2-) -@ setitem(snotform 12 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K\\\($$(c3)$$1%K\)]%n $$2-) -@ setitem(snotform 13 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nnot$$(c1)\\\(%n$$1$$(c1)\)]%n $$2-) -@ setitem(snotform 14 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nnot$$(c3)\\\(%n$$1$$(c3)\)]%n $$2-) -@ setitem(snotform 15 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K/$$(c1)$$1%K]%n $$2-) -@ setitem(snotform 16 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K/$$(c3)$$1%K]%n $$2-) -@ setitem(snotform 17 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nnot$$(c1)/%n$$1$$(c1)]%n $$2-) -@ setitem(snotform 18 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nnot$$(c3)/%n$$1$$(c3)]%n $$2-) -@ setitem(snotform 19 $$fparse(format_timestamp_some $($_timess))%K\\\(%nnot%K/$$(c1)$$1%K\)%n $$2-) -@ setitem(snotform 20 $$fparse(format_timestamp_some $($_timess))%K\\\(%nnot%K/$$(c3)$$1%K\)%n $$2-) -@ setitem(snotform 21 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%nnot$$(c1)/%n$$1$$(c1)\)%n $$2-) -@ setitem(snotform 22 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%nnot$$(c3)/%n$$1$$(c3)\)%n $$2-) -@ setitem(snotform 23 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)> %K[$$(c1)$$1%K]%n $$2-) -@ setitem(snotform 24 $$fparse(format_timestamp_some $($_timess))$$(c3)-$$(c4)> %K[$$(c3)$$1%K]%n $$2-) -@ setitem(snotform 25 $$fparse(format_timestamp_some $($_timess))%n-$$(c1)> $$(c1)[%n$$1$$(c1)]%n $$2-) -@ setitem(snotform 26 $$fparse(format_timestamp_some $($_timess))%n-$$(c3)> $$(c3)[%n$$1$$(c3)]%n $$2-) -@ setitem(snotform 27 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)$$1%K\)%n $$2-) -@ setitem(snotform 28 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c3)$$1%K\)%n $$2-) -@ setitem(snotform 29 $$fparse(format_timestamp_some $($_timess))$$(c1)>\\\(%n$$1$$(c1)\)%n $$2-) -@ setitem(snotform 30 $$fparse(format_timestamp_some $($_timess))$$(c3)>\\\(%n$$1$$(c3)\)%n $$2-) -@ setitem(snotform 31 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)$$1%K]%n $$2-) -@ setitem(snotform 32 $$fparse(format_timestamp_some $($_timess))%K>[$$(c3)$$1%K]%n $$2-) -@ setitem(snotform 33 $$fparse(format_timestamp_some $($_timess))$$(c1)>[%n$$1$$(c1)]%n $$2-) -@ setitem(snotform 34 $$fparse(format_timestamp_some $($_timess))$$(c3)>[%n$$1$$(c3)]%n $$2-) -@ setitem(snotform 35 $$fparse(format_timestamp_some $($_timess))-$$1-> $$2-) -@ setitem(snotform 36 -$$1-> $$2-) - -## send dcc formats -@ delarray(sdcform) -@ setitem(sdcform 0 !) -@ setitem(sdcform 1 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)dcc%K\\\($$(c2)$$1%K\\\)]%n $$2-) -@ setitem(sdcform 2 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)dcc%K\\\($$(c2)$$1%K\\\)\\\)%n $$2-) -@ setitem(sdcform 3 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wd%ncc%K\\\(%n$$1%K\\\)]%n $$2-) -@ setitem(sdcform 4 $$fparse(format_timestamp_some $($_timess))$$(c1).$$(hblk).[$$(c2)dcc$$(hblk)\\\($$(c1)$$1$$(hblk)\\\)]$$(cl) $$2-) -@ setitem(sdcform 5 $$fparse(format_timestamp_some $($_timess))%K[%rdcc%K\\\(%R$$1%K\\\)] %n$$2-) -@ setitem(sdcform 6 $$fparse(format_timestamp_some $($_timess))%K¯\\\($$(c2)dcc%K!$$(hwht)$$1%K\\\) %n$$2-) -@ setitem(sdcform 7 $$fparse(format_timestamp_some $($_timess))%K¯$$(cl)dcc%K!$$(hwht)$$1 $$(hblk)­ %n$$2-) -@ setitem(sdcform 8 $$fparse(format_timestamp_some $($_timess))$$zt $$(hblk)[$$(hgrn)dcc$$(hblk)\\\($$(grn)$$1$$(hblk)\\\)]$$(cl) $$2-) -@ setitem(sdcform 9 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K/$$(c1)dcc%K]%n $$2-) -@ setitem(sdcform 10 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K/$$(c3)dcc%K]%n $$2-) -@ setitem(sdcform 11 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)/%ndcc$$(c1)]%n $$2-) -@ setitem(sdcform 12 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)/%ndcc$$(c3)]%n $$2-) -@ setitem(sdcform 13 $$fparse(format_timestamp_some $($_timess))%K\\\(%ndcc%K!$$(c1)$$1%K\)%n $$2-) -@ setitem(sdcform 14 $$fparse(format_timestamp_some $($_timess))%K\\\(%ndcc%K!$$(c3)$$1%K\)%n $$2-) -@ setitem(sdcform 15 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%ndcc$$(c1)!%n$$1$$(c1)\)%n $$2-) -@ setitem(sdcform 16 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%ndcc$$(c3)!%n$$1$$(c3)\)%n $$2-) -@ setitem(sdcform 17 $$fparse(format_timestamp_some $($_timess))%K>\\\(%ndcc%K!$$(c1)$$1%K\)%n $$2-) -@ setitem(sdcform 18 $$fparse(format_timestamp_some $($_timess))%K>\\\(%ndcc%K!$$(c3)$$1%K\)%n $$2-) -@ setitem(sdcform 19 $$fparse(format_timestamp_some $($_timess))$$(c1)>\\\(%ndcc$$(c1)!%n$$1$$(c1)\)%n $$2-) -@ setitem(sdcform 20 $$fparse(format_timestamp_some $($_timess))$$(c3)>\\\(%ndcc$$(c3)!%n$$1$$(c3)\)%n $$2-) -@ setitem(sdcform 21 $$fparse(format_timestamp_some $($_timess))%K-$$(c1)> %K[$$(c1)=$$1%K]%n $$2-) -@ setitem(sdcform 22 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)> %K[$$(c3)=$$1%K]%n $$2-) -@ setitem(sdcform 23 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)> $$(c1)[%n=$$1$$(c1)]%n $$2-) -@ setitem(sdcform 24 $$fparse(format_timestamp_some $($_timess))$$(c3)-$$(c4)> $$(c3)[%n=$$1$$(c3)]%n $$2-) -@ setitem(sdcform 25 $$fparse(format_timestamp_some $($_timess))$$=> =$$1= $$2-) -@ setitem(sdcform 26 $$=> =$$1= $$2-) -## sent dcc - 27/slightly modified #8 - violence - 8.06.05 -@ setitem(sdcform 27 $$fparse(format_timestamp_some $($_timess))$$zt$$(hblk)[$$(hgrn)dcc$$(hblk)\\\($$(grn)$$1$$(hblk)\\\)]$$(cl) $$2-) - -## dcc formats -@ delarray(dcform) -@ setitem(dcform 0 !) -@ setitem(dcform 1 $$fparse(format_timestamp_some $($_timess))%K[$$(c2)$$1%K\\\($$(c1)dcc%K\\\)]%n $$2-) -@ setitem(dcform 2 $$fparse(format_timestamp_some $($_timess))%K[$$(c2)$$1%K\\\[$$(c1)dcc%K\\\]]%n $$2-) -@ setitem(dcform 3 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%w$$1%K\\\(%Wd%ncc%K\\\)] %n$$2-) -@ setitem(dcform 4 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c1).$$(hblk)[$$(c1)$$1$$(hblk)\\\($$(c2)dcc$$(hblk)\\\)] %n$$2-) -@ setitem(dcform 5 $$fparse(format_timestamp_some $($_timess))%K[%G$$1%K(%gdcc%K)] %n$$2-) -@ setitem(dcform 6 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c2)dcc%K!$$(hwht)$$1%K\\\) %n$$2-) -@ setitem(dcform 7 $$fparse(format_timestamp_some $($_timess))$(cl)dcc%K!$$(hwht)$$1 $$(hblk)­ %n$$2-) -@ setitem(dcform 8 $$fparse(format_timestamp_some $($_timess))$$zt $$(hblk)[$$(grn)$$1$$(hblk)\\\($$(hgrn)dcc$$(hblk)\\\)]$$(cl) $$2-) -@ setitem(dcform 9 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c1)dcc%K\)]%n $$2-) -@ setitem(dcform 10 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c3)dcc%K\)]%n $$2-) -@ setitem(dcform 11 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)\\\(%ndcc$$(c1)\)]%n $$2-) -@ setitem(dcform 12 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)\\\(%ndcc$$(c3)\)]%n $$2-) -@ setitem(dcform 13 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K!%ndcc%K\)%n $$2-) -@ setitem(dcform 14 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K!%ndcc%K\)%n $$2-) -@ setitem(dcform 15 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)!%ndcc$$(c1)\)%n $$2-) -@ setitem(dcform 16 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)!%ndcc$$(c3)\)%n $$2-) -@ setitem(dcform 17 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)=$$1%K]%n $$2-) -@ setitem(dcform 18 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)=$$1%K]%n $$2-) -@ setitem(dcform 19 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n=$$1$$(c1)]%n $$2-) -@ setitem(dcform 20 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n=$$1$$(c3)]%n $$2-) -@ setitem(dcform 21 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K!%ndcc%K]%n $$2-) -@ setitem(dcform 22 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)$$1%K!%ndcc%K]%n $$2-) -@ setitem(dcform 23 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)!%ndcc$$(c1)]%n $$2-) -@ setitem(dcform 24 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)!%ndcc$$(c3)]%n $$2-) -@ setitem(dcform 25 $$fparse(format_timestamp_some $($_timess))=$$1= $$2-) -@ setitem(dcform 26 =$$1= $$2-) -## dccform - 27/slightly modded #8 - violence - 8.06.05 -@ setitem(dcform 27 $$fparse(format_timestamp_some $($_timess))$$zt$$(hblk)[$$(grn)$$1$$(hblk)\\\($$(hgrn)dcc$$(hblk)\\\)]$$(cl) $$2-) - -## topic formats -@ delarray(topform) -@ setitem(topform 0 !) -@ setitem(topform 1 %K[%ntopic%K/$$(c3)$$2%K:%K[$$(c3)$$1%K]]:%n $$3-) -@ setitem(topform 2 %K\\\(%ntopic%K/$$(c3)$$2%K:%K[$$(c3)$$1%K]\\\):%n $$3-) -@ setitem(topform 3 %K[%ntopic%K/$$(c1)$$2%K:%K[$$(c1)$$1%K]]:%n $$3-) -@ setitem(topform 4 %K\\\(%ntopic%K/$$(c1)$$2%K:%K[$$(c1)$$1%K]\\\):%n $$3-) -@ setitem(topform 5 $$1 has changed the topic on channel $$2 to $$3-) -@ setitem(topform 6 $$fparse(format_timestamp_some $($_timess))$$1 has changed the topic on channel $$2 to $$3-) -@ setitem(topform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$2%K] %W$$1 %K[%n$$3-%K]%n) -@ delarray(notopform) -@ setitem(notopform 0 !) -@ setitem(notopform 1 %K[%ntopic%K/$$(c3)$$1%K]:%n %Rtopic not set%n) -@ setitem(notopform 2 %K\\\(%ntopic%K/$$(c3)$$1%K]\\\):%n %Rtopic not set%n) -@ setitem(notopform 3 %K[%ntopic%K/$$(c1)$$1%K]:%n %Rtopic not set%n) -@ setitem(notopform 4 %K\\\(%ntopic%K/$$(c1)$$1%K\\\):%n %Rtopic not set%n) -@ setitem(notopform 5 $$1 : $$2-) -@ setitem(notopform 6 $$fparse(format_timestamp_some $($_timess))$$1 : $$2-) -@ setitem(notopform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] %Rtopic not set%n) -@ delarray(settopform) -@ setitem(settopform 0 !) -@ setitem(settopform 1 %K[%ntopic%K/$$(c3)$$1%K]:%n $$2-) -@ setitem(settopform 2 %K\\\(%ntopic%K/$$(c3)$$1%K]\\\):%n $$2-) -@ setitem(settopform 3 %K[%ntopic%K/$$(c1)$$1%K]:%n $$2-) -@ setitem(settopform 4 %K\\\(%ntopic%K/$$(c1)$$1%K\\\):%n $$2-) -@ setitem(settopform 5 Topic for $$1: $$2-) -@ setitem(settopform 6 $$fparse(format_timestamp_some $($_timess))Topic for $$1: $$2-) -@ setitem(settopform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] $$2-) -@ delarray(topbyform) -@ setitem(topbyform 0 !) -@ setitem(topbyform 1 %K[%ntopic%K/$$(c3)$$1%K:%K[$$(c3)$$2%K]]:%n $$3-) -@ setitem(topbyform 2 %K\\\(%ntopic%K/$$(c3)$$1%K:%K[$$(c3)$$2%K]\\\):%n $$3-) -@ setitem(topbyform 3 %K[%ntopic%K/$$(c1)$$1%K:%K[$$(c1)$$2%K]]:%n $$3-) -@ setitem(topbyform 4 %K\\\(%ntopic%K/$$(c1)$$1%K:%K[$$(c1)$$2%K]\\\):%n $$3-) -@ setitem(topbyform 5 Topic for $$1 was set by $$2 on $$3-) -@ setitem(topbyform 6 $$fparse(format_timestamp_some $($_timess))Topic for $$1 was set by $$2 on $$3-) -@ setitem(topbyform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] %W$$2 %K[%n$$3-%K]%n) - -## ctcp formats -@ delarray(ctcpform) -@ setitem(ctcpform 0 !) -@ setitem(ctcpform 1 $$G $$(c1)$$1 %K\\\($$(c2)$$2%K\\\)%n requested $$(c1)$$4 $$5 %nfrom $$3) -@ setitem(ctcpform 2 $$G $$(c1)$$1 %K\\\[$$(c2)$$2%K]%n requested $$(c1)$$4 $$5%n from $$3) -@ setitem(ctcpform 3 %K>%n>%W> $$(hgrn)$$1 %K\\\[$$(grn)$$2%K]$$(grn) requested $$4 $$5 from $$3) -@ setitem(ctcpform 4 $$G $$(hwt)$$1 $$(hblk)[$$(wht)$$2$$(hblk)] $$(cl)requested $$(wht)$$4- $$(cl)from $$3) -@ setitem(ctcpform 5 $$G $$(hwt)$$1 $$(hblk)\\\($$(wht)$$2$$(hblk)\\\) $$(cl)requested $$(wht)$$4- $$(cl)from $$3) -@ setitem(ctcpform 6 $$G $$(c3)$$1 $$(hblk)\\\($$(c4)$$2$$(hblk)\\\) $$(cl)requested $$(c1)$$4- $$(cl)from $$3) -@ setitem(ctcpform 7 $$G $$(c3)$$1 $$(hblk)[$$(c4)$$2$$(hblk)] $$(cl)requested $$(c1)$$4- $$(cl)from $$3) -@ setitem(ctcpform 8 $$G $$(cyn)$$1 $$(hblk)[$$(cl)$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)$$(hblk)]$$(cl) requested $$(cyn)$$4- $$(cl)from $$3) -@ setitem(ctcpform 9 %K\\\(%Wctcp%K/$$(c2)$$1%K[$$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K]\\\) \\\(%W$$3%K\\\)%n $$4-) -@ setitem(ctcpform 10 $$G %cc%ntcp%K: %n$$3 %K[%n$$tolower(${[$5]?[$4-]:[$4]})%K]%n from %c$$1%n) -@ setitem(ctcpform 11 $$G CTCP $$5 from $$1 to $$3: $$4) - -## send ctcp formats -@ delarray(sctcpform) -@ setitem(sctcpform 0 !) -@ setitem(sctcpform 1 %K¯\\\($$(c1)ctcp%K!%W$$2%K\\\) %n$$3 $$4 $$5 $$6) -@ setitem(sctcpform 2 %K¯\\\[$$(c1)ctcp%K!%W$$2%K\\\] %n$$3 $$4 $$5 $$6) -@ setitem(sctcpform 3 %K[%rctcp%K\\\(%R$$2%K\\\)] %n$$3 $$4 $$5 $$6) -@ setitem(sctcpform 4 $$(hblk)¯[$$(wht)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)] $$(cl)$$3 $$4 $$5 $$6) -@ setitem(sctcpform 5 $$(hblk)¯\\\($$(wht)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)\\\) $$(cl)$$3 $$4 $$5 $$6) -@ setitem(sctcpform 6 $$(hblk)¯\\\($$(c3)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)\\\) $$(cl)$$3 $$4 $$5 $$6) -@ setitem(sctcpform 7 $$(hblk)¯[$$(c3)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)] $$(cl)$$3 $$4 $$5 $$6) -@ setitem(sctcpform 8 %K.%c.%K[%Wc%ntcp%K/%n$$2%K]%n $$3 $$4 $$5 $$6) -@ setitem(sctcpform 9 $$(hblk).$$(c2).$$(hblk)[$$(c2)c$$(c1)tcp$$(c2).$$(c1)$$2$$(hblk)]$(cl) $$3-) -@ setitem(sctcpform 10 %K\\\(%Wctcp%K/$$(c2)$$2%K\\\): %W$$3 %K\\\(%n$$4-%K\\\)) -@ setitem(sctcpform 11 %K:> %cc%ntcp%K:%c $$2 %K-%n $$3 $$4-) -@ setitem(sctcpform 12 [ctcp\\\($$2\\\)] $$3 $$4 $$5 $$6) -@ setitem(sctcpform 13 *** CTCP $$3 from $$N to $$2: $$4-) - -## echostr formats -@ delarray(echostr) -@ setitem(echostr 0 !) -@ setitem(echostr 1 $(hblk)[$(cyn)a+c$(hblk)]$(cl)) -@ setitem(echostr 2 $(mag).$(cl)-$(hblk)Ä$(cl)) -@ setitem(echostr 3 $(blu)ú$(hblk)ú$(blu)ú$(cl)) -@ setitem(echostr 4 $(hblk)ö$(cl)ö$(hblk)ö$(cl)) -@ setitem(echostr 5 $(cyn)ú$(hcyn)ù$(cyn)ø$(cl)) -@ setitem(echostr 6 $(cl)ø$(hblk)ù$(cl)ú$(cl)) -@ setitem(echostr 7 $(hblk)ú$(blu)ë$(hblk)ú$(cl)) -@ setitem(echostr 8 $(cyn)ì$(hblk)ì$(cyn)ì$(cl)) -@ setitem(echostr 9 $(blu)ú$(hblk)í$(blu)ú$(cl)) -@ setitem(echostr 10 $(hred)ù$(hwht)í$(hred)ù$(cl)) -@ setitem(echostr 11 $(hblk)Ä$(mag)Ä$(cyn)Ä$(cl)) -@ setitem(echostr 12 $(hblk)=$(cyn)=$(blu)=$(cl)) -@ setitem(echostr 13 $(hblk)Ä$(grn)Ä$(hgrn)Ä$(cl)) -@ setitem(echostr 14 $(hblk)-$(cyn)Ä$(cl)Ä) -@ setitem(echostr 15 $(hblk)ú$(hwht)ù$(hblk)ú$(cl)) -@ setitem(echostr 16 $(hblk)ú$(cyn)ë$(hblk)ú$(cl)) -@ setitem(echostr 17 $(hblk)ú$(cyn)ú$(cl)ú) -@ setitem(echostr 18 $(cl)Ä$(cyn)Ä$(hblk)Ä$(cl)) -@ setitem(echostr 19 $(hwht)ú$(cl)ú$(hblk)ú$(cl)) -@ setitem(echostr 20 $(hblk)Ä$(cl)Ä$(hwht)Ä$(cl)) -@ setitem(echostr 21 $(hblk)þ$(blu)þ$(hblu)þ$(cl)) -@ setitem(echostr 22 $(hblk)Ä$(cyn)Ä$(hcyn)Ä$(cl)) -@ setitem(echostr 23 $(hblk)Í$(cl)Í$(hwht)Í$(cl)) -@ setitem(echostr 24 $(hcyn)Ä$(cyn)Ä$(hblk)Ä$(cl)) -@ setitem(echostr 25 $(hblk)ð$(cl)ð$(hwht)ð$(cl)) -@ setitem(echostr 26 $(hblk)÷$(cl)÷$(hwht)÷$(cl)) -@ setitem(echostr 27 $(hblk)ù$(cl)­$(hwht)ù$(cl)) -@ setitem(echostr 28 $(hblk)-$(blu)Ä$(hblu)-$(cl)) -@ setitem(echostr 29 $(hblk)Ä$(hblk)Ä$(blu)Ä$(cl)) -@ setitem(echostr 30 $(hblk)‘$(hwht)‘$(cl)‘) -@ setitem(echostr 31 $(hblk)ú$(cl)ù$(hwht).$(cl)) -@ setitem(echostr 32 $(hblk)-$(hcyn):$(hblk)-$(cl)) -@ setitem(echostr 33 $(hblk)Ä$cparse($(blu)Ä)$cparse($(hblu)Ä)$(cl)) -@ setitem(echostr 34 $(hblk)ù$(hcyn)í$(hblk)ù$(cl)) -@ setitem(echostr 35 $(hblk)+$(c1)+$(c2)+$(cl)) -@ setitem(echostr 36 $(hblk)+$(c3)+$(c4)+$(cl)) -@ setitem(echostr 37 $(hblk)-$(c1)-$(c2)-$(cl)) -@ setitem(echostr 38 $(hblk)-$(c3)-$(c4)-$(cl)) -@ setitem(echostr 39 $(hblk)ù$(c1)ù$(c2)ù$(cl)) -@ setitem(echostr 40 $(hblk)ù$(c3)ù$(c4)ù$(cl)) -@ setitem(echostr 41 $(hblk)ú$(c1)ù$(c2).$(cl)) -@ setitem(echostr 42 $(hblk)ú$(c3)ù$(c4).$(cl)) -@ setitem(echostr 43 $(hblk)Ä$(c1)Ä$(c2)Ä$(cl)) -@ setitem(echostr 44 $(hblk)Ä$(c3)Ä$(c4)Ä$(cl)) -@ setitem(echostr 45 ***) -## echostr 46-51 added - phuzion - 12.04.99 -@ setitem(echostr 46 $(hblk)þ$(c1)þ$(c2)þ$(cl)) -@ setitem(echostr 47 $(hblk)‘$(c1)‘$(c2)‘$(cl)) -@ setitem(echostr 48 $(hblk)÷$(c1)÷$(c2)÷$(cl)) -@ setitem(echostr 49 $(hblk)ð$(c1)ð$(c2)ð$(cl)) -@ setitem(echostr 50 $(hblk)=$(c1)=$(c2)=$(cl)) -@ setitem(echostr 51 $(hblk)ö$(c1)ö$(c2)ö$(cl)) -## echostr crapple 52-57 added - crapple 8.06.05 -@ setitem(echostr 52 [S+Z]) -@ setitem(echostr 53 [A+C]) -@ setitem(echostr 54 ***) -@ setitem(echostr 55 [a+c]) -@ setitem(echostr 56 ===) -@ setitem(echostr 57 [a]) - -## ncomp formats -@ delarray(ncomp) -@ orig.ncomp=format_nick_comp -@ setitem(ncomp 0 !) -@ setitem(ncomp 1 :) -@ setitem(ncomp 2 :) -@ setitem(ncomp 3 :) -@ setitem(ncomp 4 .) -@ setitem(ncomp 5 .) -@ setitem(ncomp 6 .) -@ setitem(ncomp 7 ,) -@ setitem(ncomp 8 ,) -@ setitem(ncomp 9 ,) -@ setitem(ncomp 10 ;) -@ setitem(ncomp 11 -) -@ setitem(ncomp 12 ;) -@ setitem(ncomp 13 -) -@ setitem(ncomp 14 ,) -@ setitem(ncomp 15 :) -@ setitem(ncomp 16 ;) -@ setitem(ncomp 17 - ) -## ncomp 18-19 added - phuzion - 12.04.99 -@ setitem(ncomp 18 > ) -@ setitem(ncomp 19 > ) -@ setitem(ncomp 20 |>) -@ setitem(ncomp 21 ->) - -## sv formats -@ delarray(svform) -@ setitem(svform 0 !) -@ setitem(svform 1 $$word(0 $info(v))/$$sar(g/ /./$afterw(epic4 $info(v)))[$$info(i)] $$sar(g/././$tolower($uname())) $$sar(g/././$(a.ver)/$(a.rel)) $$scdesc) -@ setitem(svform 2 $$sar(g/././$(a.ver)/$(a.rel)) $$tolower($msar(g/././-/-/$J))[$$info(i)] $$scdesc) -@ setitem(svform 3 ircii/$$word(0 $info(v))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$sar(g/././$tolower($uname()))\($uname(%n)\) $$sar(g/././$(a.ver)/$(a.rel))) -@ setitem(svform 4 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$sar(g/././$(a.ver)\($(a.rel))\) $$scdesc) -@ setitem(svform 5 ircII $$toupper($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$uname() $$a.ver/$$a.rel) -@ setitem(svform 6 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$sar(g/././$tolower($uname()))\($uname(%n)\) $$sar(g/././$(a.ver)[$(a.rel))] $$scdesc) -@ setitem(svform 7 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$(a.ver)<$$(a.rel)> - ..$$strip(\(\) $scdesc)) -@ setitem(svform 8 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] : $$tolower($uname()) [$$(a.ver)$$(a.rel)]) -@ setitem(svform 9 $word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$tolower($uname()) $$a.ver/$$a.rel) -@ setitem(svform 10 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$(a.ver)$$sar(g/././$(a.rel)) ) -@ setitem(svform 11 $$(a.ver)$$sar(g/././$(a.rel)) $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)]) -@ setitem(svform 12 $$(a.ver)[$$(a.rel)] $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)]) -##svform 13-15 added - phuzion - 12.04.99 -- 16 added 12.05.99 -@ setitem(svform 13 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$tolower($uname(%s)-$uname(%%r)) - amnesiac/$$(a.rel)) -@ setitem(svform 14 $$toupper($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$uname(%s)-$$uname(%%r) - amnesiac!$$(a.rel)) -@ setitem(svform 15 $$toupper($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$uname(%s)-$$uname(%%r) - amnesiac/$$(a.rel)) -@ setitem(svform 16 $$tolower($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$tolower($uname(%s))-$$uname(%%r) - amnesiac/$$(a.rel)) -@ setitem(svform 17 ..$$word(0 $info(v))!$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$tolower($uname()) \\\($$a.ver/$$a.rel\\\) $$scdesc) -@ setitem(svform 18 $$sar(g/././$word(0 $info(v))/$word(1 $info(v)).$word(2 $info(v))).$$word(3 $info(v))[$$info(i)] $$tolower($sar(g/././$uname())) $$a.ver/$$sar(g/././$a.rel)) -##svform 19-20 added - zak - 7/30/05 - 21-26 -- fake version stuff. -@ setitem(svform 19 ircII $J $uname()) -@ setitem(svform 20 ircII $J[$info(i)] $uname()) -@ setitem(svform 21 ircii/$$word(0 $info(v))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$info(i)] sunos 5.10(insanity)amnesiac/$$(a.rel)) -@ setitem(svform 22 irssi v0.8.10-rc5 - running on OpenBSD Sparc64) -@ setitem(svform 23 ircII 20050423+ScrollZ 1.9.5 (19.12.2004)+Cdcc v1.8+OperMods v1.0 by acidflash - clear(01g))) -@ setitem(svform 24 ircII 20050423+ScrollZ 1.9.5 (19.12.2004)+Cdcc v1.8+OperMods v1.0 by acidflash - Almost there) -@ setitem(svform 25 BitchX-1.1-final+ by panasync - *IX :7A69!) -@ setitem(svform 26 mIRC v6.16 Khaled Mardam-Bey) - -## wall formats -@ delarray(wallform) -@ setitem(wallform 0 !) -@ setitem(wallform 1 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(c1)chanwall$$(hblk)-$(cl)$$1$$(hblk)/$$(cl)$$2$$(hblk)\\\)$$(cl) $$3-) -@ setitem(wallform 2 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\($$(hwht)*$$(c1)\\\) $$(c1)\\\($$(cl)$$1$$(hblk)/$$(hwht)$$2$$(c1)\\\)$$(cl) $$3-) -@ setitem(wallform 3 $$fparse(format_timestamp_some $($_timess))$$(cl)[$$(hgrn)BX-Wall$$(cl)/$$(hwht)$$2:$$1$$(cl)] $$3-) -@ setitem(wallform 4 $$fparse(format_timestamp_some $($_timess))$$(c1)[$$(hwht)w$$(cl)all$$(c1)/$$(cl)$$1$$(hblk):$$(cl)$$2$$(c1)]$$(cl) $$3-) -@ setitem(wallform 5 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wa%nmn%K/%nwall%K[%c$$1%K:%c$$2%K]\\\)%n $$3-) -@ setitem(wallform 6 $$fparse(format_timestamp_some $($_timess))%c<%Ka%K!%Ww%nall%c\\\(%n$$1%K/%n$$2%c\\\)>%n $$3-) -@ setitem(wallform 7 $$fparse(format_timestamp_some $($_timess))%K(%Wa%K/%nwall%K) [%n$$1%K:%n$$2%K]%n $$3-) -@ setitem(wallform 8 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wa%nmn%K/%nwall%K\\\(%c$$1%K/%c$$2%K\\\)]%n $$3-) -@ setitem(wallform 9 $$fparse(format_timestamp_some $($_timess))$$(hblk)[$$(c2)+$$(c1)o$$(hblk)] [$$(cyn)$$1$$(hblk)/$$(cl)$$2$$(hblk)]$$(cl) $$3-) -@ setitem(wallform 10 $$fparse(format_timestamp_some $($_timess))%K[%c*%C*%K] [%c$$1%K!%n$$2%K]%n $$3-) -@ setitem(wallform 11 $$fparse(format_timestamp_some $($_timess))[$$1!$$2] $$3-) -@ setitem(wallform 12 -*@$$2*-> $$3-) - -## bwall foramts -@ delarray(bwallform) -@ setitem(bwallform 0 !) -@ setitem(bwallform 1 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(c1)chanwall$$(hblk)-$$(cl)$$N$$(hblk)/$$(cl)$$C$$(hblk)\\\)$$(cl) $$1-) -@ setitem(bwallform 2 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\($$(hwht)*$$(c1)\\\) $$(c1)\\\($$(cl)$$N$$(hblk)/$$(hwht)$$C$$(c1)\\\)$$(cl) $$1-) -@ setitem(bwallform 3 $$fparse(format_timestamp_some $($_timess))$$(cl)[$$(hgrn)BX-Wall$$(cl)/$$(hwht)$$C:*$$(cl)] $$1-) -@ setitem(bwallform 4 $$fparse(format_timestamp_some $($_timess))$$(c1)[$$(hwht)w$$(cl)all$$(c1)/$$(cl)$$N$$(hblk):$$(cl)$$C$$(c1)]$$(cl) $$1-) -@ setitem(bwallform 5 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wa%K/%nwall%K[%c$$N%K:%c$$C%K]\\\)%n $$1-) -@ setitem(bwallform 6 $$fparse(format_timestamp_some $($_timess))%c<%Ka%K!%Ww%nall%c\\\(%n$$N%K/%n$$C%c\\\)>%n $$1-) -@ setitem(bwallform 7 $$fparse(format_timestamp_some $($_timess))%K(%Wa%nmn%K/%nwall%K) [%n$$N%K:%n$$C%K]%n $$1-) -@ setitem(bwallform 8 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wa%nmn%K/%nwall%K\\\(%c$$N%K/%c$$C%K\\\)]%n $$1-) -@ setitem(bwallform 9 $$fparse(format_timestamp_some $($_timess))$$(hblk)[$$(c2)+$$(c1)o$$(hblk)] [$$(cyn)$$N$$(hblk)/$$(cl)$$C$$(hblk)]$$(cl) $$1-) -@ setitem(bwallform 10 $$fparse(format_timestamp_some $($_timess))%K[%c*%C*%K] [%c$$N%K!%n$$C%K]%n $$1-) -@ setitem(bwallform 11 $$fparse(format_timestamp_some $($_timess))[$$N!$$C] $$1-) -@ setitem(bwallform 12 [$$N!$$C] $$1-) - -## away formats -@ delarray(awayform) -@ setitem(awayform 0 !) -@ setitem(awayform 1 [a!l/$$(awayl).p/$$(togpager)]) -@ setitem(awayform 2 [a|l!$$(awayl).p!$$(togpager)]) -@ setitem(awayform 3 [ac/l:$$(awayl) p:$$(togpager)]) -@ setitem(awayform 4 \\\(log/$$(awayl).page/$$(togpager)\)) -@ setitem(awayform 5 \\\(log!$$(awayl).page!$$(togpager)\)) -@ setitem(awayform 6 \[log/$$(awayl).page/$$(togpager)\]) -@ setitem(awayform 7 \[log!$$(awayl).page!$$(togpager)\]) -@ setitem(awayform 8 \(+lp\)) -@ setitem(awayform 9 ) -## 10-12 - crapple 8.30.05 -@ setitem(awayform 10 [BX-MsgLog On]) -@ setitem(awayform 11 [l/on p/off]) -@ setitem(awayform 12 (log:on/page:off)) - -## action formats -@ delarray(actform) -@ setitem(actform 0 !) -@ setitem(actform 1 $$fparse(format_timestamp_some $($_timess))$$zt $$(hwht)$$1 $$(cl)$$3-) -@ setitem(actform 2 $$fparse(format_timestamp_some $($_timess))$$(hblk)ð $$(hyel)$$1/$$2 $$(cl)$$3-) -@ setitem(actform 3 $$fparse(format_timestamp_some $($_timess))* $$1 $$3-) -@ setitem(actform 4 * $$1 $$3-) - -## action other formats -@ delarray(actoform) -@ setitem(actoform 0 !) -@ setitem(actoform 1 $$fparse(format_timestamp_some $($_timess))$$zt $$(hwht)$$1$$(hblk)!$$(cl)$$2 $$3-) -@ setitem(actoform 2 $$fparse(format_timestamp_some $($_timess))$$(hblk)* $$(cl)>$$(cyn)$$1 $$(cl)$$2 $$3-) -@ setitem(actoform 3 $$fparse(format_timestamp_some $($_timess))* $$1:$$2 $$3-) -@ setitem(actoform 4 * $$1:$$2 $$3-) - -## describe formats -@ delarray(descform) -@ setitem(descform 0 !) -@ setitem(descform 1 $$fparse(format_timestamp_some $($_timess))$$(c2)$$1$$(hblk)/$$(cl)$$2$$(cl) $$3-) -@ setitem(descform 2 $$fparse(format_timestamp_some $($_timess))*> $$1 $$3-) -@ setitem(descform 3 *> $$1 $$3-) - -## sent describe formats -@ delarray(sdescform) -@ setitem(sdescform 0 !) -@ setitem(sdescform 1 $$fparse(format_timestamp_some $($_timess))$$(cl)-> $$(hwht)$$1 $$(c3)$$N $$(cl)$$3-) -@ setitem(sdescform 2 $$fparse(format_timestamp_some $($_timess))* -> $$1: $$N $$3-) -@ setitem(sdescform 3 * -> $$1: $$N $$3-) - -## public notice formats -@ delarray(pubnotform) -@ setitem(pubnotform 0 !) -@ setitem(pubnotform 1 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K:%n$$2%n $$3-) -@ setitem(pubnotform 2 $$fparse(format_timestamp_some $($_timess))-$$1:$$2- $$3-) -@ setitem(pubnotform 3 -$$1:$$2- $$3-) - -## who formats -@ delarray(whoform) -@ setitem(whoform 0 !) -@ setitem(whoform 1 %K[%C³%K] %c$$[10]center(10 $2) %K\\\($$[35]center(35 %n$4%W@%n$5)%K\\\) %K[%n$$[3]3%K] [%n$$6%m/%c$$7%K]) -@ setitem(whoform 2 $$[16]1 $$[9]2 $$[4]3 $$4@$$5 $$7-) -@ setitem(whoform 3 %Y$$[10]1 %W$$[10]2%w %c$$[3]3 %w$$4%R@%w$$5 \\\($$8-\\\) \\\($$6\\\)) - - -## who footers -@ delarray(whofootform) -@ setitem(whofootform 0 !) -@ setitem(whofootform 1 ÀÄÄÄÄÄ---%cÄ%C--%cÄÄ%C-%cÄÄÄÄÄÄ---%KÄ%c--%KÄÄ%c-%KÄÄÄÄÄÄÄÄÄ--- -- -) -@ setitem(whofootform 2 *** $$1-) -@ setitem(whofootform 3 *** %Y$$1:%w %W$$2%w $$3-) - -## nick change formats -violence -@ delarray(nickform) -@ setitem(nickform 0 !) -@ setitem(nickform 1 $$G %w$$1 %nis now known as %m$$2) -@ setitem(nickform 2 $$G %w$$1 %nis now known as %m$$2 %n$$Z) -@ setitem(nickform 3 $$G %c$$1 %nis now known as %m$$2) -@ setitem(nickform 4 $$G %c$$1 %nis now known as %m$$2 %n$$Z) -@ setitem(nickform 5 $$G %g$$1 %nis now known as %G$$2) -@ setitem(nickform 6 $$G %g$$1 %nis now known as %G$$2 %n$$Z) -@ setitem(nickform 7 $$G %nnick change %K\\\(%c$$1 %K-> %m$$2%K\\\)) -@ setitem(nickform 8 $$G %nnick change %K\\\(%c$$1 %K-> %m$$2%K\\\) %n$$Z) -@ setitem(nickform 9 $$G %nnick change %K\\\(%g$$1 %K-> %G$$2%K\\\)) -@ setitem(nickform 10 $$G %nnick change %K\\\(%g$$1 %K-> %G$$2%K\\\) %n$$Z) -@ setitem(nickform 11 $$fparse(format_timestamp_some $($_timess))$$G %c$$1%n is now known as %m$$2) -@ setitem(nickform 12 $$fparse(format_timestamp_some $($_timess))$$G %W$$1 %nis now known as %m$$2) -@ setitem(nickform 13 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%c$$1 %K-> %m$$2%K\\\)) -@ setitem(nickform 14 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%W$$1 %K-> %m$$2%K\\\)) -@ setitem(nickform 15 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%W$$1 %K-> %W$$2%K\\\)) -@ setitem(nickform 16 $$G $$1 is now known as $$2) - -## timestamp formats -crapple -@ delarray(timeform) -@ setitem(timeform 0 !) -@ setitem(timeform 1 %K[%n$$Z%K]%n ) -@ setitem(timeform 2 %K[%n$$strftime($time()%X)%K]%n ) -@ setitem(timeform 3 [$$Z] ) -@ setitem(timeform 4 [$$strftime($time()%X)] ) -@ setitem(timeform 5 $$Z%c|%n ) -@ setitem(timeform 6 $$strftime($time()%X)%c|%n ) -@ setitem(timeform 7 $$Z ) -@ setitem(timeform 8 $$strftime($time()%X) ) -@ setitem(timeform 9 $$Z| ) -@ setitem(timeform 10 $$strftime($time()%X)| ) -@ setitem(timeform 11 $$Z%c|%n) -@ setitem(timeform 12 $$strftime($time()%X)%c|%n) -@ setitem(timeform 13 %K[%n$$Z%K]%n) -@ setitem(timeform 14 %K[%n$$strftime($time()%X)%K]%n) - -## kick formats -adam 9.7.05 -## $1 = kicked $2 = kickee $3 = channel $4+ = message -@ delarray(kickform) -@ setitem(kickform 0 !) -@ setitem(kickform 1 $$G $$1 was kicked off $$3 by $$(c3)$$2 %K\\\(%n$$4-%K\\\)) -@ setitem(kickform 2 $$fparse(format_timestamp_some $($_timess))$$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) -@ setitem(kickform 3 $$G $$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) -@ setitem(kickform 4 $$fparse(format_timestamp_some $($_timess))$$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) -@ setitem(kickform 5 $$fparse(format_timestamp_some $($_timess))%K[%nkick%K/%n$$3%K]%n $$1 by $$2 %K[%n$$4-%K]%n) -@ setitem(kickform 6 $$G $$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) diff -aruN amn.orig/docs/UPGRADE amn/docs/UPGRADE --- amn.orig/docs/UPGRADE Thu Oct 20 20:44:12 2005 +++ amn/docs/UPGRADE Fri Oct 28 21:47:15 2005 @@ -8,10 +8,8 @@ about their irc client uptimes *ahem*) ## upgrade info -## any to 1.2 r/1 (in theory) +## 1.2 to 1.2d r/3 (in theory) rm -rf /path/to/amn -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.fsetsave tar zxvf newver.tgz (in your home dir or dir you want it) or tar zxvf newver.tgz -C /path/to/where/you/want/it Date: Fri, 28 Oct 2005 22:10:59 -0400 (EDT) From: zak@ircii.org (Zak) -fix up some xecho the way they should be with $acban which skullY did not add back in certain places which involved /save looking quite ugly ;((( not that it's MUCH better, if anyone has a better idea we're open to suggestions. //zak //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 28 21:47:36 2005 +++ amn/CHANGES Fri Oct 28 22:08:55 2005 @@ -72,3 +72,5 @@ this will make some of the less experienced be more motivated to take on some new format tasks and the like. //zak -sync UPGRADE to reality. //zak +-fix up /save a bit better with correct alignment with skullY messed up + with his xecho skullYism's. bad skullY! //zak diff -aruN amn.orig/modules/abot/abot.m amn/modules/abot/abot.m --- amn.orig/modules/abot/abot.m Mon Oct 10 20:51:38 2005 +++ amn/modules/abot/abot.m Fri Oct 28 22:04:25 2005 @@ -69,7 +69,7 @@ for (@xx=0, xx will insert current topic for editing. //echo away /away set yourself away. //echo back /back set yourself back. +//echo tld /tld will show you the country for that TLD //echo readlog /readlog reads away msgs. [requires away module] //echo remlog /remlog erase away msgs. [requires away module] //echo orignick /orignick will attempt to regain(jupe) specified nick diff -aruN amn.old/core/format.m amn/core/format.m --- amn.old/core/format.m Fri Oct 21 20:53:21 2005 +++ amn/core/format.m Sun Oct 30 12:40:58 2005 @@ -63,7 +63,7 @@ alias mform.show { for (@mm=1, mm < numitems(mform), @mm++) { @format_msg=getitem(mform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_msg crapple zak@chowned.org hi.) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_msg crapple zak@chowned.org hi.) } xecho $acban /format a to set msg format xecho $acban current format set to $mform @@ -181,7 +181,7 @@ alias spuboform.show { for (@mm=1, mm < numitems(spuboform), @mm++) { @format_public_other=getitem(spuboform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_public_other crapple #amnesiac hi.) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_public_other crapple #amnesiac hi.) } xecho $acban /format e to set public other format xecho $acban current format set to $spuboform @@ -211,7 +211,7 @@ alias signform.show { for (@mm=1, mm < numitems(signform), @mm++) { @format_signoff=getitem(signform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_signoff #amnesiac crapple bye.) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_signoff #amnesiac crapple bye.) } xecho $acban /format f to set signoff format xecho $acban current format set to $signform @@ -241,7 +241,7 @@ alias joinform.show { for (@mm=1, mm < numitems(joinform), @mm++) { @format_join=getitem(joinform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_join crapple #amnesiac zak@chowned.org) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_join crapple #amnesiac zak@chowned.org) } xecho $acban /format g to set join format xecho $acban current format set to $joinform @@ -271,7 +271,7 @@ alias leaveform.show { for (@mm=1, mm < numitems(leaveform), @mm++) { @format_leave=getitem(leaveform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_leave crapple zak@chowned.org #amnesiac) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_leave crapple zak@chowned.org #amnesiac) } xecho $acban /format h to set leaveoff format xecho $acban current format set to $leaveform @@ -300,7 +300,7 @@ alias modeform.show { for (@mm=1, mm < numitems(modeform), @mm++) { @format_mode=getitem(modeform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_mode crapple #amnesiac +o kreca) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_mode crapple #amnesiac +o kreca) } xecho $acban /format i to set modeoff format xecho $acban current format set to $modeform @@ -357,7 +357,7 @@ alias pubnotform.show { for (@mm=1, mm < numitems(pubnotform), @mm++) { @format_public_notice=getitem(pubnotform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_public_notice crapple #amnesiac hi) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_public_notice crapple #amnesiac hi) } xecho $acban /format z to set public notice format xecho $acban current format set to $pubnotform @@ -417,7 +417,7 @@ alias sdcform.show { for (@mm=1, mm < numitems(sdcform), @mm++) { @ format_send_dcc_chat = getitem(sdcform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_send_dcc_chat crapple hi) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_send_dcc_chat crapple hi) } xecho $acban /format l to set send dcc chat format xecho $acban current format set to $sdcform @@ -448,7 +448,7 @@ alias dcform.show { for (@mm=1, mm < numitems(dcform), @mm++) { @ format_dcc_chat = getitem(dcform $mm) - xecho $acban $Cparse(%K[%n$mm%K]%n) $fparse(format_dcc_chat crapple hi) + xecho $Cparse(%K[%n$mm%K]%n) $fparse(format_dcc_chat crapple hi) } xecho $acban /format m to set dcc chat format xecho $acban current format set to $dcform @@ -611,7 +611,7 @@ alias ncomp.show { for (@nc=1, nc < numitems(ncomp), @nc++) { @format_nick_comp=getitem(ncomp $nc) - xecho $acban $Cparse("%K[%n$([2]nc)%K]%n %K<%ncrapple%K>%n") kreca$format_nick_comp hi! + xecho $Cparse("%K[%n$([2]nc)%K]%n %K<%ncrapple%K>%n") kreca$format_nick_comp hi! } xecho $acban /format r to set nick completion xecho $acban current format set to $ncomp diff -aruN amn.old/core/sets.m amn/core/sets.m --- amn.old/core/sets.m Fri Oct 21 13:56:55 2005 +++ amn/core/sets.m Sun Oct 30 12:14:41 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[2] +@rel_id=[3] @a.rel=[1.2 r/$rel_id] @a.date=[20051020] @_ss=[15] diff -aruN amn.old/core/trickle.m amn/core/trickle.m --- amn.old/core/trickle.m Mon Oct 10 20:51:38 2005 +++ amn/core/trickle.m Sun Oct 30 12:37:48 2005 @@ -35,7 +35,6 @@ } ## trickle example swiss army knife features. -alias filter {trickle $*} alias tscan {trickle $C $* who} alias tdeop {trickle $C $* deop} alias top {trickle $C $* op} @@ -69,7 +68,6 @@ //echo /trickle #somechan *!*@*aol.com kill //echo /trickle #somechan *!ident@* voice //echo /trickle * wildcard is not working at this time. -//echo /filter is also aliased to trickle for those who can't remember the cmd. //echo --------------------------------------------------------------------- } diff -aruN amn.old/modules/tc/tc.m amn/modules/tc/tc.m --- amn.old/modules/tc/tc.m Mon Oct 10 22:59:51 2005 +++ amn/modules/tc/tc.m Sun Oct 30 12:17:35 2005 @@ -68,13 +68,3 @@ on #-dcc_chat -12782 * tc.add_to_list =$0 on #-send_dcc_chat -12782 * tc.add_to_list =$0 -/* - * This alias doesnt work if you try to do something like: - * /m x .... - * because $x expands to your userhost, and that gets confusing. - * - * No, the lack of brackets around $0 is not a bug, thats how it works. - * Try it. If $0 is 'bc' and $bc is "bigcheese" then - * if ($0) -> if (bc) -> if ([bigcheese]) - */ -alias msg if \($0\) {//msg $($0) $1-} {//msg $0 $1-} Date: Sun, 30 Oct 2005 13:08:42 -0500 (EST) From: zak@ircii.org (Zak) -sync CHANGES to reality to reflect on the changes merged into -release. //zak diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Oct 28 22:08:55 2005 +++ amn/CHANGES Sun Oct 30 13:06:39 2005 @@ -74,3 +74,16 @@ -sync UPGRADE to reality. //zak -fix up /save a bit better with correct alignment with skullY messed up with his xecho skullYism's. bad skullY! //zak + +10.30.05 +----merge in following changes/fixes from snapshot to release +-clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca +-tc.m: Remove the msg alias since it breaks with dcc chats and most people +don't use it anyway. //skullY +-Revert action.m to use xecho -window to fix /me's in dcc query +windows. //kreca +country.m: Add a /tld to lookup a country. Requested by ml. //skullY +remove filter alias, as it conflicts with epic's $filter() //zak +-fixup the multiple /format inconsistencies found and done by Alien88 +thanks! //zak +----end following changes merged from -snapshot //zak Date: Mon, 31 Oct 2005 23:59:45 +0000 From: Zach White Cleanup the indentation in channel.m. Add a new command, invkick, to set +i, kick a user, wait 10 seconds, and remove +i. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Oct 31 23:19:51 2005 +++ amn/CHANGES Mon Oct 31 23:59:06 2005 @@ -87,3 +87,9 @@ -fixup the multiple /format inconsistencies found and done by Alien88 thanks! //zak ----end following changes merged from -snapshot //zak + +10.31.05 +-Add a usage statement to iban if the user doesn't pass an arg. //skullY +-Some code cleanup in channel.m. //skullY +-New command: invkick, sets +i, kicks the target, removes +i after 10 + seconds. //skullY diff amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Mon Oct 31 23:19:51 2005 +++ amn/core/channel.m Mon Oct 31 23:54:28 2005 @@ -5,7 +5,7 @@ ## op/oper commands. alias bki {bk $*;ignore $0 msgs} alias kbi {kb $*;ignore $0 msgs} -alias bkt {qk $*} +alias bkt qk $* alias ov operview alias unban ub $* alias clearbans ub $* @@ -29,6 +29,8 @@ alias +E {^mode $C +e $*} alias bk {bankick $*} alias kb {bankick $*} +alias ik invkick $* +alias ki invkick $* alias cmode {c $*} ## misc parts. @@ -103,8 +105,7 @@ } } -alias unkey (void) -{ +alias unkey { if (match(*k* $chanmode())) { //mode $C -k } else { @@ -112,24 +113,23 @@ } } -alias ban if (![$0]) { - xecho -b syn: /ban nick +alias ban { + if (![$0]) { + xecho -b syn: /ban nick }{ if (match(*!*@* $0)) { //mode $C +b $0 + }{ + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($_bt $0!$3@$4) + } + } }{ - if (userhost($0) == [@]) { - ^userhost $0 -cmd { - if ([$3@$4]!=[@]) { - //mode $C +b $mask($_bt $0!$3@$4) - - } - } - }{ - //mode $C +b $mask($_bt $0!$userhost($0)) - + //mode $C +b $mask($_bt $0!$userhost($0)) } - + } } } @@ -182,44 +182,60 @@ } } -alias kickban if (![$0]) { - xecho -b usage: /kickban nick - }{ if ( numwords($*) < 2) { - if (![$@1]) { - kick $* +alias kickban { + if (![$0]) { + xecho -b usage: /kickban nick + }{ + if ( numwords($*) < 2) { + if (![$@1]) { + kick $* }{ - kick $C $0 $1- - }} - if (userhost($0) == [@]) { - ^userhost $0 -cmd { - + kick $C $0 $1- + } + } + } + if (userhost($0) == [@]) { + ^userhost $0 -cmd { if ([$3@$4]!=[@]) { //mode $C +b $mask($_bt $0$3@$4) - } - } - }{ - //mode $C +b $mask($_bt $userhost($0)) - } + } + } + }{ + //mode $C +b $mask($_bt $userhost($0)) + } } -alias iban if ([$0]) { - if (userhost($0) == [@]) { - ^userhost $0 -cmd { - if ([$3@$4]!=[@]) { - //mode $C +b *!*$3@* +alias invkick { + if ([$0]) { + //mode $C +i + kick $* + timer 10 mode $C -i + } +} + +alias iban { + if ([$0]) { + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b *!*$3@* + } } + }{ + //mode $C +b *!*$before(@ $userhost($0))@* } + kick $* }{ - //mode $C +b *!*$before(@ $userhost($0))@* + xecho $acban Usage: iban } - kick $* } -alias op if (![$0]) { - banner.lchead - banner.mid syn: /op - banner.foot -}{ +alias op { + if (![$0]) { + banner.lchead + banner.mid syn: /op + banner.foot + }{ if (match(*#* $*)) { fe ($1-) ii jj kk ll { //mode $0 +oooo $ii $jj $kk $ll diff amn.orig/core/help.m amn/core/help.m --- amn.orig/core/help.m Mon Oct 31 23:19:51 2005 +++ amn/core/help.m Mon Oct 31 23:58:25 2005 @@ -2,7 +2,7 @@ # See the 'COPYRIGHT' file for more information. subpackage help -@hwords=[rn rk vocs bantype fset ban mko mkn massk orignick ub sping bkt dldir ps ls cd dns nslookup fkeys format q bans banstat wii mdop mdeop dop dv v scano scanv scann t k umode m j l wi ver c nochat chat bk op voice deop mop cycle mreop readlog wall user chops sv frelm tsave freln away back format config color sbcolor dict fsave sbar scan wk wlk wn wp wj wc csave banstat bankick cig cops devoice fctcp iban inv kickban kb links lk lsay mdv more mv mw nops not partall qk staynick supt theme tig unban untheme winhelp] +@hwords=[rn rk vocs bantype fset ban mko mkn massk orignick ub sping bkt dldir ps ls cd dns nslookup fkeys format q bans banstat wii mdop mdeop dop dv v scano scanv scann t k umode m j l wi ver c nochat chat bk op voice deop mop cycle mreop readlog wall user chops sv frelm tsave freln away back format config color sbcolor dict fsave sbar scan wk wlk wn wp wj wc csave banstat bankick cig cops devoice fctcp iban inv kickban kb invkick ik links lk lsay mdv more mv mw nops not partall qk staynick supt theme tig unban untheme winhelp] alias ahelp if (![$0]) { banner.head @_ohcenter=[${word(0 $geom()) / 2 + 40}] @@ -49,6 +49,8 @@ @ :links=[%Wu%nsage%K:%n /links will give you a server list of all the servers linked to current network @ :kickban=[%Wu%nsage%K:%n /kickban will kick and ban nick from current channel @ :kb=[%Wu%nsage%K:%n /kb will kick and ban nick from current channel. +@ :invkick=[%Wu%nsage%K:%n /invkick will set mode +i and kick nick from current channel. Removes +i after 10 secs. +@ :ik=[%Wu%nsage%K:%n /ik will set mode +i and kick nick from current channel. Removes +i after 10 secs. @ :inv=[%Wu%nsage%K:%n /inv will invite nick to current channel. @ :iban=[%Wu%nsage%K:%n /iban will ban nick by ident from current channel @ :fctcp=[%Wu%nsage%K:%n /fctcp nick/channel will send a fake ctcp to specifed nick or channel. Date: Tue, 1 Nov 2005 00:01:07 +0000 From: Zach White Whoops, missed a closing }. This should fix that. amn diff diff amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Mon Oct 31 23:59:50 2005 +++ amn/core/channel.m Tue Nov 1 00:00:45 2005 @@ -236,13 +236,14 @@ banner.mid syn: /op banner.foot }{ - if (match(*#* $*)) { - fe ($1-) ii jj kk ll { - //mode $0 +oooo $ii $jj $kk $ll - } - }{ - fe ($*) ii jj kk ll { - //mode $C +oooo $ii $jj $kk $ll + if (match(*#* $*)) { + fe ($1-) ii jj kk ll { + //mode $0 +oooo $ii $jj $kk $ll + } + }{ + fe ($*) ii jj kk ll { + //mode $C +oooo $ii $jj $kk $ll + } } } } From: Kreca Date: Tue, 1 Nov 2005 13:03:59 +0100 (CET) Fix tab.m to use the format_scan_users changes diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Nov 1 00:59:06 2005 +++ amn/CHANGES Tue Nov 1 13:01:08 2005 @@ -93,3 +93,7 @@ -Some code cleanup in channel.m. //skullY -New command: invkick, sets +i, kicks the target, removes +i after 10 seconds. //skullY + +11.01.05 +-Fix tab.m to comply with the format_scan_users changes, maybe we need a + format_tab_users? //kreca diff -aruN amn.orig/modules/tab/tab.m amn/modules/tab/tab.m --- amn.orig/modules/tab/tab.m Fri Oct 21 19:09:40 2005 +++ amn/modules/tab/tab.m Tue Nov 1 12:50:34 2005 @@ -16,10 +16,8 @@ } fe ($ulist) nu { - ^push uulist ..$nu + ^push uulist $nu } - - if ( #ulist == 1) { Date: Sun, 6 Nov 2005 20:35:57 -0500 (EST) From: zak@ircii.org (Zak) Log message: -import new document WINDOW_DISPLAY explaning the new strippings of various colors/codes etc.. via /set mangle_display. to help clear up some confusions. -sync E5-KNOWNBUGS from cvs. Modified files: docs/WINDOW_DISPLAY docs/E5-KNOWNBUGS //zak ---------------------- diff included ---------------------- diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Wed Oct 19 01:33:15 2005 +++ amn/docs/E5-KNOWNBUGS Sun Nov 6 20:33:02 2005 @@ -2,20 +2,17 @@ KNOWN ERRATA (eg, bugs, or unresolved requests): ------------------------------------------------ -* More gracious support for trickling horizontal resizes down to the window. +* str_to_mask() should be silent, callers should be warning. LOOK FOR IN THE FUTURE ----------------------- * An /on to go off when you add something to the input line. * Output rules -* GC of a lot of the newly scripted stuff * Support for CNOTICE -* Turn unified symbol table into an inode table (name, entry), entry in array +* More gracious support for trickling horizontal resizes down to the window. * /window noserv causes bad fd loop. (can't reproduce?) -* DBM support. * Is there some way to set what ^O resets to, a la mirc? * /CTCPs over /DCCs don't match up with their queries very well. -* alias foo {package x;load script} carries 'x' into 'script' ??? [See http://www.epicsol.org/PROJECTS for things to come in the future] [See http://www.epicsol.org/CHANGELOG5 for things that changed in the past] @@ -843,5 +840,40 @@ * Fix bogon in /xecho. doh. * Fix /who -real so it matches both with and without the hopcount. * Convert all uses of message_to() to message_setall(). yay! +* Permit alias_special_char() to slurp up function calls for new math. sigh. * Add the 'highlight' script which implements the highlight-ignore thingee * Whack the 'highlight ignore' feature as per discussion on the list. +* Add flush_all_symbols() which does a total cleanup of symbols at exit-time. +* Fix a few bugs +* Use flush_all_symbols() instead of /dump to catch memory leaks. +* Release epic5-0.0.7 (Disaffection) +* New file, levels.c, holds all the Mask and window level manip stuff. +* Move level_to_str/str_to_level, mask_to_str/str_to_mask to levels.c +* Change #define LEVEL_*'s into (int)s +* Use BIT_VALID() instead of NUMBER_OF_LEVELS, whack NUMBER_OF_LEVELS. +* Whack hardcoded level_types char array. yay! +* Change users of "LEVEL_CURRENT" into "LEVEL_NONE" and whack "LEVEL_CURRENT" +* Add "OTHER" window level, as replacement for "CRAP" +* Continue to honor "CRAP" as a synonym for "OTHER". +* New function $levelctl(), to add/query window levels. +* Window/lastlog levels can now be added at runtime. HUZZAH! +* I forgot that the level names are supposed to be plural (as per UPDATES). +* Stop doing any nagging on /quote. +* Regress temporarily with handling protocol messages +* This ends the final two users of find_fixed_array_item(). +* Nix find_fixed_array_item() and anything associated with it. +* Fix braino. +* Switch users of LEVEL_CRAP to LEVEL_OTHER. yay! +* Whack some unused functions and decls, make *toa() funcs return const. +* Roll get_window_by_name() into get_window_by_desc(), it's only user. +* DBM (hash table) support. See UDPATES +* Check for in configure, don't do DBM if it is absent. +* $dbmctl() always no-ops, returns empty string if dbm not available. +* Add 'd' to $info(o) if DBM support is included +* Add a check for solaris cc, moxy up the CFLAGS for larne. +* Fix compile breakage if both tparm() and base64() are missing. doh. +* Fail when maximum number of levels have been added. +* Note a few places the window refnum is changed. +* Add a pd implementation of sdbm, make $dbmctl() use it. +* Make configure warn harder if it looks like termcap/terminfo not found. +* Normalize the sdbm code, so it fits in with the epic way of doing things. diff -aruN amn.orig/docs/WINDOW_DISPLAY amn/docs/WINDOW_DISPLAY --- amn.orig/docs/WINDOW_DISPLAY Wed Dec 31 19:00:00 1969 +++ amn/docs/WINDOW_DISPLAY Sun Nov 6 20:20:35 2005 @@ -0,0 +1,149 @@ +Notes.. taken from the epic5/UPDATES file that should help people with +some confusion on the new mangle/color/functional changes in epic5. + +*** News 10/05/2005 -- New /SET, /SET MANGLE_DISPLAY, many sets removed + There is a new /SET, /SET MANGLE_DISPLAY, which mangles all output + being sent to your display, naturally. It works in the same way + that /set mangle_inbound, mangle_outbound, mangle_logfiles works, + and its default value is "NORMALIZE". You should always specify + either "NORMALIZE" or "MANGLE_ESCAPE" -- if you turn off both, then + it will be possible for remote people on irc to send raw escape + sequences to your display, and that is bad! + + The following /SETs have been superceded by recent changes, and have + been removed: + alt_charset blink_video bold_video + color display_ansi display_pc_characters + inverse_video underline_video + +*** News 10/05/2005 -- Unified string mangler/normalizer + Forget everything you thought you knew about the old mangler and + normalizer (sorry!). This is (believe it or not) much less complicated + than before, and certainly more well documented than before! + + EPIC5 now includes a unified mangler/normalizer that is used by the + following features: + (The above functions) + The input prompt + /lastlog -mangle + /log mangle + /set mangle_inbound + /set mangle_outbound + The status bar + + All characters are grouped into one of 9 "types": + 0 Normal chars 32-127, 160-255 + 1 High bit control chars 128-159 + 2 Escape char ^[ + 3 Color char ^C + 4 Highlight toggle ^B ^E ^F ^O ^V ^_ + 5 Unsafe char ^M (\r) + 6 Control char ^@ ^A ^D ^H ^K ^L ^N ^P ^Q + ^R ^T ^U ^W ^X ^Y ^Z ^\ ^] ^^ + 7 Beep ^G + 8 Tab ^I + 9 Non-destructive Space ^S + + There are the 12 following mangle types: + MANGLE_ESCAPES NORMALIZE STRIP_COLOR STRIP_REVERSE + STRIP_UNDERLINE STRIP_BOLD STRIP_BLINK STRIP_ND_SPACE + STRIP_ALT_CHAR STRIP_ALL_OFF STRIP_UNPRINTABLE STRIP_OTHER + + The mangle types transform the characters, according to this table: + ----------------------------------------------------------------------- + A = Character or sequence converted into an attribute + M = Character mangled (ie, ^A into ^VA^V) + S = Character stripped, sequence (if any) NOT stripped + X = Character stripped, sequence (if any) also stripped + T = Transformed into other (safe) chars + - = No transformation + + Type + 0 1 2 3 4 5 6 7 8 9 + (default) - - - - A - - T T T + NORMALIZE - - A A - X M - - - + MANGLE_ESCAPES - - S - - - - - - - + STRIP_COLOR - - - X - - - - - - + STRIP_* - - - - X - - - - - + STRIP_UNPRINTABLE - X S S X X X X - - + STRIP_OTHER X - - - - - - - X X + (/SET ALLOW_C1) - X - - - - - - - - + ----------------------------------------------------------------------- + + There are only *three* ambiguous cases: + * Type 2: + MANGLE_ESCAPES has first priority, then NORMALIZE, and + finally STRIP_UNPRINTABLE + * Type 3: + STRIP_UNPRINTABLE has first priority, then NORMALIZE, and + STRIP_COLOR. You need to use both NORMALIZE and STRIP_COLOR + to remove color changes in escape sequences + * Type 6: + STRIP_UNPRINTABLE has first priority over NORMALIZE. + +*** News 10/05/2005 -- "ANSI" mangle type linked to "NORMALIZE" + The mangler type "ANSI" has been renamed to "NORMALIZE". You can + continue to use "ANSI", but it will be silently changed to "NORMALIZE" + internally. + +*** News 08/30/2005 -- De-support of 7-bit-only terminal/emulators + Once upon a time, long long ago, on a planet far away, there + used to be terminals and terminal emulators that did not know + how to handle characters with the 8th bit set. Thankfully, + nobody uses these any more. There has been rudimentary support + in ircII clients to support this old hardware, but it is now + unnecessary and only causes to torment people who can't figure + out how to input their 8 bit characters! + + /SET EIGHT_BIT_CHARACTERS has been removed, and its behavior is + now hardcoded to the previous "ON" value. If you really need + 7-bit support, epic4 will always have it... + +*** News 08/30/2005 -- Simplification of display mangling, part one + There are 15 /set's that control how output to the display is + prepared ("mangled"). That's about 14 too many. The following + /set's are at best historical curiosities and do not serve any + modern purpose. Their function has been eliminated. + + BEEP_MAX TAB TAB_MAX ND_SPACE_MAX + +*** News 08/23/2005 -- New /window verb, /WINDOW FLUSH_SCROLLBACK + The /WINDOW FLUSH_SCROLLBACK option, which I already regret the + naming of, deletes all of the items in your scrollback buffer. + Because the scrollback buffer is used to paint your window, your + window will be cleared when you do this. + +*** News 08/10/2005 -- Mangle level "ALL" does not include "UNPRINTABLE" + This was a mistake, and "ALL" should never have included the + UNPRINTABLE mangle level. So if you want to do them both, then + just do ALL,UNPRINTABLE. Although you would never want to do + that, since UNPRINTABLE is more encompassing than ALL. + +*** News 08/05/2005 -- New mangle type, "UNPRINTABLE" + You can now mangle "UNPRINTABLE", which closely models the + /SET NO_CONTROL_LOG variable. When you mangle UNPRINTABLE, all + characters that are not printable (isgraph() || isspace()) will + be removed, which includes all of the highlight characters. + +*** News 08/05/2005 -- *** IMPORTANT *** Case insensitive changes + All case insensitive string comparisons should now be handled in + the CASEMAPPING=ascii sense. This means '{' and '[' are not equal, + and | and ~ and ] and } are not equal. + +*** News 08/05/2005 -- 005 CASEMAPPING value now handled (sort of) + Some networks use CASEMAPPING=ascii, which means that the characters + {|} are not the same as [~] as they are when CASEMAPPING=rfc1459. + So in order to keep track of nicks correctly on the former servers, + we now track CASEMAPPING and use it as best we can. + +*** News 05/10/2005 -- New window verb, /WINDOW KILLABLE (default on) + When you /WINDOW KILLABLE OFF, the following changes occur: + * /WINDOW KILL will fail[1] with an error message. + * /WINDOW KILL_ALL_HIDDEN will not kill the window. + * /WINDOW KILL_OTHERS will not kill the window. + * /WINDOW KILLSWAP will fail[1] with an error message. + [1] A failure of *any* /window operation causes any subsequent + operations in the same statement to be discarded, to avoid + accidentally operating on the wrong window. This behavior + is not a special-case. + From: Kreca Date: Mon, 7 Nov 2005 23:40:35 +0100 (CET) Cleanups to mjoin.m. No functional changes //kreca diff -aruN amn.orig/modules/mjoin/mjoin.m amn/modules/mjoin/mjoin.m --- amn.orig/modules/mjoin/mjoin.m Sat Oct 29 04:07:01 2005 +++ amn/modules/mjoin/mjoin.m Mon Nov 7 23:34:40 2005 @@ -4,132 +4,127 @@ ## some aliases for mjoin alias listc listchan -alias addjoin ajoin $* alias chanlist listchan alias ajlist listchan +alias addjoin addchan $* alias ajoin addchan $* alias unajoin delchan $* alias deljoin delchan $* alias rmjoin delchan $* alias unjoin delchan $* +alias mjhelp ajhelp ##end aliases. +@chansfile=[$(savepath).chan.save] + alias addchan { - if (![$0]) { + if (# == 0) { xecho (mjoin).. syn: /addchan chan1,chan2,chan3... (note. if the channel has a key then /addchan chan1 key, one by one.) - }{ + }{ @_ach=sar(g/,/ /$0) - if ([$1]) { + if ([$1]) { @_key=[$1] - fe ($_ach) a1 { + fe ($_ach) a1 { @setitem(chans 0 !) @setitem(chans $numitems(chans) $a1 $_key) - } - xecho $acban added $* to channel list - - }{ - fe ($_ach) a1 { - @setitem(chans 0 !) - @setitem(chans $numitems(chans) $a1) - } - xecho $acban added $* to channel list - } - } + } + xecho $acban added $* to channel list + }{ + fe ($_ach) a1 { + @setitem(chans 0 !) + @setitem(chans $numitems(chans) $a1) + } + xecho $acban added $* to channel list + } + } } + alias listchan { if (numitems(chans) == 1) { xecho $acban no channels current on list - }{ - banner.lchead - for (@xx=1, xx will add specified channel to mjoinlist -//echo addjoin /addjoin will add specified channel to mjoinlist -//echo delchan /delchan will delete channel from mjoin list -//echo listchan /listchan will show a list of channels on the mjoin list -//echo mjoin /mjoin will join all channels on mjoin list -//echo chansave /chansave will save mjoin list -//echo chanload /chanload will load mjoin list from ~/.chan.save -//echo -= Mjoin Quick Aliases =- -//echo listc/listchan ajlist/listchan chanlist/listchan -//echo addjoin/addchan ajoin/addchan -//echo unajoin/delchan deljoin/delchan rmjoin/delchan unjoin/delchan - -//echo ------------------------------------------------------------------- + if (#==0) { + //echo ----------------------= Mjoin Help =--------------------------- + //echo addchan /addchan will add specified channel to mjoinlist + //echo addjoin /addjoin will add specified channel to mjoinlist + //echo delchan /delchan will delete channel from mjoin list + //echo listchan /listchan will show a list of channels on the mjoin list + //echo mjoin /mjoin will join all channels on mjoin list + //echo chansave /chansave will save mjoin list + //echo chanload /chanload will load mjoin list from ~/.chan.save + //echo -= Mjoin Quick Aliases =- + //echo listc/listchan ajlist/listchan chanlist/listchan + //echo addjoin/addchan ajoin/addchan + //echo unajoin/delchan deljoin/delchan rmjoin/delchan unjoin/delchan + //echo ------------------------------------------------------------------- } } + +^eval load $chansfile +^chanload From: Kreca Date: Tue, 8 Nov 2005 22:53:13 +0100 (CET) -Make away message only display once when doing a /msg to a user who is marked away. The counter is reset after 120 seconds of inactivity, currently this time is hardcoded. Hopefully this will make zak shut up! //kreca diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Nov 1 13:01:08 2005 +++ amn/CHANGES Tue Nov 8 22:49:26 2005 @@ -96,4 +96,10 @@ 11.01.05 -Fix tab.m to comply with the format_scan_users changes, maybe we need a - format_tab_users? //kreca + format_tab_users? //kreca + +11.08.05 +-Make away message only display once when doing a /msg to a user who is + marked away. The counter is reset after 120 seconds of inactivity, + currently this time is hardcoded. Hopefully this will make zak shut up! + //kreca diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Wed Oct 26 21:54:52 2005 +++ amn/core/fsets.m Tue Nov 8 22:41:51 2005 @@ -171,8 +171,13 @@ ^on ^474 * abecho %m\(%n$1%m\)%n a fascist channel op has banned you. %m\(%n+b%m\) ## whois stuff - on ^311 * { + /* + Since 311-318 is an atomic operation we can safely do this crazy + ircii feature. + */ + stack push on 301 + on ^301 * xecho $fparse(format_whois_away $1-) if (format_whois_header) { xecho $fparse(format_whois_header) } @@ -183,13 +188,14 @@ } on ^319 * xecho $fparse(format_whois_channels $2-) on ^312 * xecho $fparse(format_whois_server $2 $3-) -on ^301 * xecho $fparse(format_whois_away $1-) + on ^317 * { xecho $fparse(format_whois_idle $2) xecho $fparse(format_whois_signon $1 $stime($3)) } on ^318 * { + stack pop on 301 if (format_whois_footer) { xecho $fparse(format_whois_footer) } diff -aruN amn.orig/core/hooks.m amn/core/hooks.m --- amn.orig/core/hooks.m Mon Oct 10 22:33:49 2005 +++ amn/core/hooks.m Tue Nov 8 22:44:14 2005 @@ -11,6 +11,25 @@ xecho -v -b signoff: $N \($*\) } +## catch the "user is away" message and only display it once. +## Thanks to fudd for this idea and inspiration from his script +## Note that this does not affect the output of /whois since the hook +## is pushed / popped //kreca +on ^301 "*" +{ + @:itemno = finditem(away_users $0) + if (itemno < 0) + { + xecho $fparse(format_whois_away $1-) + @:itemno=numitems(away_users) + @setitem(away_users $itemno $0) + } else if (time() - getitem(away_users_ts $itemno) > 120) { + xecho $fparse(format_whois_away $1-) + } + @setitem(away_users_ts $itemno $time()) +} + + ## chanalone hook ^on #-leave 123 "% % *" { if ([$0] != servernick() && remw($0 $chanusers($1)) == servernick()) { From: Kreca Date: Tue, 8 Nov 2005 23:14:13 +0100 (CET) Make /me's in non-current channels show correctly diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Nov 8 22:49:26 2005 +++ amn/CHANGES Tue Nov 8 23:11:40 2005 @@ -102,4 +102,5 @@ -Make away message only display once when doing a /msg to a user who is marked away. The counter is reset after 120 seconds of inactivity, currently this time is hardcoded. Hopefully this will make zak shut up! - //kreca + //kreca +-Make /me's in non-current channels show correctly //kreca diff -aruN amn.orig/core/action.m amn/core/action.m --- amn.orig/core/action.m Wed Oct 26 23:12:55 2005 +++ amn/core/action.m Tue Nov 8 23:08:00 2005 @@ -23,7 +23,11 @@ on ^action * { if (winchan($1)) { - xecho $fparse(format_action $0 $1 $2-) + if ( iscurchan($1) ) { + xecho $fparse(format_action $0 $1 $2-) + } { + xecho $fparse(format_action_other $0 $1 $2-) + } } { @:wqwin = myquerywin($0) if ( wqwin != [-1]) From: Kreca Date: Tue, 8 Nov 2005 23:28:58 +0100 (CET) update TODO-BUGS diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Wed Oct 26 00:58:41 2005 +++ amn/TODO-BUGS Tue Nov 8 23:25:32 2005 @@ -16,23 +16,10 @@ whatever it was set to works properly but it's kinda annoying when everything outputs at bk when it's not actually set to bk. -## highest priority TODO. --DOUBLEHIGHESTPRIORITYREQUEST. make away only output irritating static - only once, and flush from time to time so if person msg's like 50mins - later it'll show you your away msg once again.. sample code for example. - taken from fudd, with his permission. -on ^301 "*" -{ - if (matchitem(misc.away_users $0) < 0) - { - echo $fparse(WHOIS_AWAY $*) - @ setitem(misc.away_users $numitems(misc.away_users) $0) - @ setitem(misc.away_users_ts $numitems(misc.away_users_ts) $time()) - } -} -^^NOTE: at least it may be possible that ratbox ircd's will output the +? NOTE: at least it may be possible that ratbox ircd's will output the irriating damn away even when you have it silenced, perhaps there's a workaround? //zak +? Havnt seen this, if you still receive it give me a tell //kreca -fixdouble/fixwin or equiv for doublestats -make userlist support /addchan #chan,#chan2,#chan3 we already support * @@ -81,6 +68,11 @@ NONE for 'some bugs' ## bugs fixed. / projects done. +11.08.05 +## highest priority TODO. +! make away only output irritating static only once, 120 second idle timeout + fixed by kreca. + 10.10.05 - fixed thanks to skully to use the more portable DCC_RAW! //skullY ! /dict word, doesn't explictly close telnet in the background on some OS's. resulting in a nice spiked race condition. mebe need to add a kill -9? Date: Wed, 9 Nov 2005 00:14:20 +0000 From: Zach White Fix /lusers so now alien88 should be happy. I basically rewrote it all so if someone wants me to ugly it up again let me know or submit a patch. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Nov 8 23:49:43 2005 +++ amn/CHANGES Tue Nov 8 23:51:12 2005 @@ -104,3 +104,6 @@ currently this time is hardcoded. Hopefully this will make zak shut up! //kreca -Make /me's in non-current channels show correctly //kreca +-Fix /lusers for real this time. Works on every efnet server, sorta works + on freenode, doesn't seem to work on undernet but who cares about them + anyway? //skullY diff amn.orig/core/lusers.m amn/core/lusers.m --- amn.orig/core/lusers.m Tue Nov 8 23:49:43 2005 +++ amn/core/lusers.m Tue Nov 8 23:49:50 2005 @@ -1,69 +1,91 @@ # Copyright (c) 2003-2005 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # -## last modified by skullY on 2005 Aug 11. -## modded a bit to remove cruft by crapple on 2005 Oct 2 +## last modified by skullY on 2005 Nov 08 ## idea originally taken from argon. -## fixed by skullY because it was broked with the new math parser. -## It's still all ugly and there's at least one new hack, but really, who -## cares that much about lusers? <-- Alien88 does apparently ;( -crapple. +## Ok, so how we're doing this is completely broken. I'm going to just redo it +## so it's not all broken. -skullY subpackage lusers -on ^001 * # -on ^002 * # -on ^003 * # -on ^004 * { - @ _lu.v = [$2] +# /lusers server server is completely retarded. Fix it. +alias lusers { + if ([$0]) { + //lusers $0 $0 + }{ + //lusers + } } -on ^251 * { - //echo $(hwht)s$(cl)tatistics for $cparse($(c1)$S) - //echo $(hwht)ÚÄ$(cl)ÄÄ$cparse($(c1)Ä)$(cl)ÄÄ$(hwht)Ä$(cl)Ä$cparse($(c1)Ä)$(hblk)- -- - - ^on ^raw_irc "$S % $N :Highest connection count*" { - @ _lu.lum = _lu.um = [] - ^shook 266 0 0 0 0 0 0 0 +# Fucking loose-ass ircii protocol can bite me. +alias _getnum { + @_number = [$0] + fe ($1-) _word { + if (isnumber($_word)) { + if (_number < 1) { + @function_return = _word + break + }{ + @_number-- + } + } } - @ _lu.u = [$3] + [$6] - @ _lu.i = [$6] - @ _lu.s = [$9] } +on ^251 * { + @lusers.gvisible = [$3] + @lusers.ginvisible = [$6] + @lusers.servernum = [$9] +} + on ^252 * { - @ _lu.o = [$1] + @lusers.gopers = [$1] } +on ^253 * { + @lusers.unknown = [$1] +} + on ^254 * { - @ _lu.c = [$1] + @lusers.channels = [$1] } on ^255 * { - #@ _lu.lu = [$3] - @ _lu.ls = [$6] + @lusers.lusers = [$3] + @lusers.lservers = [$6] } on ^265 * { - @ _lu.lu = [$1] - @ _lu.lum = [$2] - ^assign _lu.lumd $2, + @lusers.lusers = _getnum(0 $strip(, $1-)) + @lusers.lusersmax = _getnum(1 $strip(, $1-)) } on ^266 * { - ^on ^raw_irc -"$S % $N :Highest connection count*" # - @ _lu.um = [$2] - ^assign _lu.umd $2, - ^set floating_point_math on - # next two lines don't make the new math parser bitch. -skullY - xecho $(hblk)[$cparse($(c2)³)$(hblk)] $cparse($(c2)g)$cparse($(c1)lobal users)$(hblk).. $(cl)$[6]_lu.u max$(c.hk) $(cl)$[7]_lu.umd $cparse($(c1)\()$(cl)$_lu.i invisible, $_lu.o operators$cparse($(c1)\)) - xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)l)$cparse($(c1)ocal users)$(hblk)... $(cl)$[6]_lu.lu max$(c.hk) $(cl)$[7]_lu.lumd $cparse($(c1)\()$(cl)$trunc(5 ${100 * (_lu.lu / _lu.u)})\%$cparse($(c1)\)) - xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)s)$cparse($(c1)ervers)$(hblk)....... $(cl)$[6]_lu.s $cparse($(c1)\()$(cl)$trunc(2 ${_lu.u / _lu.s}) avg users per server$cparse($(c1)\)) - xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)c)$cparse($(c1)hannels)$(hblk)...... $(cl)$[6]_lu.c $cparse($(c1)\()$(cl)$trunc(2 ${_lu.u / _lu.c}) avg users per channel$cparse($(c1)\)) + @lusers.gusers = _getnum(0 $strip(, $1-)) + @lusers.gusersmax = _getnum(1 $strip(, $1-)) } on ^250 * { - xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)c)$cparse($(c1)onnect count)$(hblk)..$(cl)$4 $5 $6 $7 $9 + @lusers.lconnectionmax = [$4] + @lusers.lconnectionstotal = [$strip(\( $7)] + xecho -b Statistics for $0: + if (lusers.unknown) { + xecho -b Unknown: $lusers.unknown unknown connection(s) + } + xecho -b Global Users: ${lusers.gusers}, $lusers.gusersmax max \($lusers.ginvisible invisible, $lusers.gopers opers\) + xecho -b Local Users: ${lusers.lusers}, $lusers.lusersmax max \($trunc(5 ${100 * (lusers.lusers / lusers.gusers)})%\) + xecho -b Servers: ${lusers.servernum} \(${lusers.gusers / lusers.servernum} avg users per server\) + xecho -b Channels: ${lusers.channels} \(${lusers.gusers / lusers.channels} avg users per channel\) + xecho -b Connect Count: $lusers.lconnectionmax max \($lusers.lusersmax clients\) \($lusers.lconnectionstotal received\) + ^assign -lusers } -on ^253 * { - xecho $(hblk)[$cparse($(c1)³)$(hblk)] $cparse($(c2)u)$cparse($(c1)nknown)$(hblk)........$(cl)$1 $2 $3 - +/* Old broken lusers code that I don't think is needed. Anyone know why this + was here? -skullY +on ^001 * # +on ^002 * # +on ^003 * # +on ^004 * { + @ _lu.v = [$2] } + +*/ Date: Wed, 9 Nov 2005 22:44:24 +0000 From: Zach White Fix ignore so it doesn't recurse anymore. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Nov 9 22:43:00 2005 +++ amn/CHANGES Wed Nov 9 22:44:10 2005 @@ -107,3 +107,7 @@ -Fix /lusers for real this time. Works on every efnet server, sorta works on freenode, doesn't seem to work on undernet but who cares about them anyway? //skullY + +11.09.05 +-Fix ignore since kreca can't figure out how to make an alias safely recurse + without crashing the client. //skullY diff amn.orig/core/ignore.m amn/core/ignore.m --- amn.orig/core/ignore.m Wed Nov 9 22:43:00 2005 +++ amn/core/ignore.m Wed Nov 9 22:43:03 2005 @@ -28,26 +28,29 @@ } } +alias _ighost { + if (match(*!*@* $0)) { + @function_return = [$0] + }{ + if (:uhost=getuhost($0)) { + @function_return = uhost + }{ + @function_return = [$0] + } + } +} + alias ignore { if (#) { - if (# > 1) { - if (match(*!*@* $0)) { - //ignore $* - }{ - if (:uhost=getuhost($0)) { - //ignore $uhost $1- - }{ - //ignore $* - } - } + if ([$1]) { + //ignore $_ighost($0) $1- }{ - ignore $0 all + //ignore $_ighost($0) all } }{ xecho -b Ignorance List: @:igns=numsort($ignorectl(REFNUMS)) if ( strlen($igns) ) { - fe ($igns) ignores { xecho -b [$ignores] $ignorectl(GET $ignores NICK) $ignorectl(GET $ignores LEVEL) } Date: Wed, 9 Nov 2005 22:57:19 +0000 From: Zach White Change if ([$1]) to if (# > 1). amn diff diff amn.orig/core/ignore.m amn/core/ignore.m --- amn.orig/core/ignore.m Wed Nov 9 22:44:28 2005 +++ amn/core/ignore.m Wed Nov 9 22:56:56 2005 @@ -42,7 +42,7 @@ alias ignore { if (#) { - if ([$1]) { + if (# > 1) { //ignore $_ighost($0) $1- }{ //ignore $_ighost($0) all Date: Wed, 9 Nov 2005 22:17:04 -0500 (EST) From: zak@ircii.org (Zak) Log message: -remove arrays.m it got added by accident. -update minor.. we're probably getting close to 1.3 release Modified files: CHANGES core/arrays.m core/sets.m //zak ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Nov 9 17:44:10 2005 +++ amn/CHANGES Wed Nov 9 22:11:58 2005 @@ -111,3 +111,5 @@ 11.09.05 -Fix ignore since kreca can't figure out how to make an alias safely recurse without crashing the client. //skullY +-update development version to 4. this should be the final development + minor before the 1.3 release. //zak diff -aruN amn.orig/core/arrays.m amn/core/arrays.m --- amn.orig/core/arrays.m Tue Oct 11 15:39:13 2005 +++ amn/core/arrays.m Wed Dec 31 19:00:00 1969 @@ -1,776 +0,0 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. -# last modified: 9.07.05 - crapple -subpackage arrays - -## msg formats -@ delarray(mform) -@ setitem(mform 0 !) -@ setitem(mform 1 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\\\)%n $$3-) -@ setitem(mform 2 $$fparse(format_timestamp_some $($_timess))%K\\\[%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\\\]%n $$3-) -@ setitem(mform 3 $$fparse(format_timestamp_some $($_timess))%K\\\[%M$$1%K\\\(%m$$2%K\\\)]%n $$3-) -@ setitem(mform 4 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\)%n $$3-) -@ setitem(mform 5 $$fparse(format_timestamp_some $($_timess))%K[%c$$1%K\\\(%C$$2%K\\\)]%n $$3-) -@ setitem(mform 6 $$fparse(format_timestamp_some $($_timess))%K[%b$$1%K\\\(%B$$2%K\\\)]%n $$3-) -@ setitem(mform 7 $$fparse(format_timestamp_some $($_timess))%K.%m.%K\\\(%c$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) -@ setitem(mform 8 $$fparse(format_timestamp_some $($_timess))%K.%m.%K\\\(%c$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) -@ setitem(mform 9 $$fparse(format_timestamp_some $($_timess))%K.$$(c3).%K\\\($$(c3)$$1%K[$$(cl)$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\)%n $$3-) -@ setitem(mform 10 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K[$$(c4)$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) -@ setitem(mform 11 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[\%w$$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K\\\)]%n $$3-) -@ setitem(mform 12 $$fparse(format_timestamp_some $($_timess))$$(c3).%K.$$(c3)\\\(%w$$1$$(c3)[%K$$msar(g/@/$cparse($(c3)@)$(hblk)/./$cparse($(c3).)$(hblk)/$2)$$(c3)]\\\)%n $$3-) -@ setitem(mform 13 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c2).$$(hblk)[$$(c2)$$1$$(hblk)\\\($$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)$$(hblk)\\\)]$$(cl) $$3-) -@ setitem(mform 14 $$fparse(format_timestamp_some $($_timess))$$(cyn).$$(hblk).\\\($$(hcyn)$$1$$(hblk)\\\)$$(cl) $$3- $$(hblk)[$$(cyn)$$msar(g/./$(hblk).$(cl)/@/$(hblk)@$(cl)/$2)$$(hblk)]$$(cl)) -@ setitem(mform 15 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wm%K/$$(c2)$$1%K[$$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K]\\\)%n $$3-) -@ setitem(mform 16 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(c2)$$1$$(hblk)!$$(c2)$$2$$(hblk)\\\)$$(cl) $$3-) -@ setitem(mform 17 $$fparse(format_timestamp_some $($_timess))$$G %K[%n$$1%K/$$(c3)$$2%K]%n $$3-) -@ setitem(mform 18 $$fparse(format_timestamp_some $($_timess))$$G %K[%c$$1%K!%n$$before(@ $2)%W@%n$$after(@ $2)%K]%n $$3-) -@ setitem(mform 19 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(hwht)$$1$$(hblk)\\\($$(cl)$$2$$(hblk)\\\)\\\)$$(cl) $$3-) -@ setitem(mform 20 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(hwht)msg$$(hblk)/$$(hblu)$$1$$(hblk)[$$(blu)$$2$$(hblk)]\\\)$$(cl) $$3-) -@ setitem(mform 21 $$fparse(format_timestamp_some $($_timess))$$G %K\\\(%m$$1%K<%n$$before(@ $2)%W@%n$$after(@ $2)%K>\\\)%n $$3-) -@ setitem(mform 22 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c1).$$(hblk)\\\($$(c1)$$1$$(hblk)[$$(cl)$$sar(g/@/$(hblk)@$(cl)/$2)%K\\\)] %n$$3-) -@ setitem(mform 23 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\)]%n $$3-) -@ setitem(mform 24 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\)]%n $$3-) -@ setitem(mform 25 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\)%n $$3-) -@ setitem(mform 26 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K!$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\)%n $$3-) -@ setitem(mform 27 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)!%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)\)%n $$3-) -@ setitem(mform 28 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)!%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)\)%n $$3-) -@ setitem(mform 29 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K]%n $$3- %n%K[$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K]) -@ setitem(mform 30 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)$$1%K]%n $$3- %n%K[$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K]) -@ setitem(mform 31 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)]%n $$3- %n$$(c1)[%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)]) -@ setitem(mform 32 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)]%n $$3- %n$$(c3)[%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)]) -@ setitem(mform 33 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K]%n $$3- %n%K[%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K]) -@ setitem(mform 34 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)$$1%K]%n $$3- %n%K[%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K]) -@ setitem(mform 35 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$3- %n%K[$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K]) -@ setitem(mform 36 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$3- %n%K[$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K]) -@ setitem(mform 37 $$fparse(format_timestamp_some $($_timess))*$$1* $$3-) -@ setitem(mform 38 *$$1* $$3-) -## mform 39 - violence 8.06.05 -@ setitem(mform 39 $$fparse(format_timestamp_some $($_timess))%K.$$(hwht).$$(hblk)\\\($$(hwht)$$1$$(hblk)\\\[%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K]\\\)%n $$3-) -## mform 40-42 - crapple 8.30.05 -@ setitem(mform 40 $$fparse(format_timestamp_some $($_timess))%B\\\(%n$$1%B!%n$$before(@ $2)%G@%n$$after(@ $2)%B\)%n $$3-) -@ setitem(mform 41 $$fparse(format_timestamp_some $($_timess))%B\\\(%n$$1%B!%n$$before(@ $2)%B@%n$$after(@ $2)%B\)%n $$3-) -@ setitem(mform 42 $$fparse(format_timestamp_some $($_timess))%m\\\(%n$$1%m!%n$$before(@ $2)@$$after(@ $2)%m\)%n $$3-) - -## send msg formats -@ delarray(smform) -@ setitem(smform 0 !) -@ setitem(smform 1 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)msg%K!%n$$1%K\\\)%n $$2-) -@ setitem(smform 2 $$fparse(format_timestamp_some $($_timess))%K>\\\[$$(c1)msg%K!%n$$1%K\\\]%n $$2-) -@ setitem(smform 3 $$fparse(format_timestamp_some $($_timess))%K\\\[%rmsg%K\\\(%R$$1%K\\\)]$(cl) $$2-) -@ setitem(smform 4 $$fparse(format_timestamp_some $($_timess))%K¯[%nmsg%K\\\(%n$$1%K\\\)]%n $$2-) -@ setitem(smform 5 $$fparse(format_timestamp_some $($_timess))%K¯[%cmsg%K\\\(%C$$1%K\\\)]%n $$2-) -@ setitem(smform 6 $$fparse(format_timestamp_some $($_timess))%K¯[%bmsg%K\\\(%B$$1%K\\\)]%n $$2-) -@ setitem(smform 7 $$fparse(format_timestamp_some $($_timess))%K[%rmsg%K\\\(%R$$1%K\\\)]%n $$2-) -@ setitem(smform 8 $$fparse(format_timestamp_some $($_timess))%m.%K.[%Wm%nsg%K\\\(%c$$1%K\\\)]%n $$2-) -@ setitem(smform 9 $$fparse(format_timestamp_some $($_timess))%K¯[$$(c3)msg%K\\\($$(c4)$$1%K\\\)]%n $$2-) -@ setitem(smform 10 $$fparse(format_timestamp_some $($_timess))%K¯[$$(c1)msg%K\\\($$(c2)$$1%K\\\)]%n $$2-) -@ setitem(smform 11 $$fparse(format_timestamp_some $($_timess))%c.%K.[%Wm%nsg%K\\\(%c$$1%K\\\)]%n $$2-) -@ setitem(smform 12 $$fparse(format_timestamp_some $($_timess))$$(c3).%K.$$(c3)\\\(%Wm%nsg$$(c3)[%K$$1$$(c3)]\\\)%n $$2-) -@ setitem(smform 13 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c2).$$(hblk)[$$(hwht)m$$(cl)sg$$(hblk)\\\($$(c2)$$1$$(hblk)\\\)]$$(cl) $$2-) -@ setitem(smform 14 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(cyn)msg$$(hblk)[$$(cyn)$$1$$(hblk)]\\\)$$(cl) $$2-) -@ setitem(smform 15 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wsm%K/$$(c2)$$1%K\\\)%n $$2-) -@ setitem(smform 16 $$fparse(format_timestamp_some $($_timess))$$(hblk)-> \\\($$(c2)$$1$$(hblk)\\\)$$(cl) $$2-) -@ setitem(smform 17 $$fparse(format_timestamp_some $($_timess))$$G %K[%nmsg%K/$$(c3)$$1%K]%n $$2-) -@ setitem(smform 18 $$fparse(format_timestamp_some $($_timess))%K:> [%cmsg%K!%n$$1%K]%n $$2-) -@ setitem(smform 19 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(cl)msg$$(hblk)\\\($$(hwht)$$1$$(hblk)\\\)\\\)$$(cl) $$2-) -@ setitem(smform 20 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(hwht)msg$$(hblk)/$$(hblu)$$1$$(hblk)[$$(blu)*@*$$(hblk)]\\\) $$(cl)$$2-) -@ setitem(smform 21 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)msg%K!%n$$1%K]%n $$2-) -@ setitem(smform 22 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)msg%K!%n$$1%K\\\) %n$$2-) -@ setitem(smform 23 $$fparse(format_timestamp_some $($_timess))%K-> \\\(%mmsg%K<%n$$1%K>\\\)%n $$2-) -@ setitem(smform 24 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K\\\($$(c1)$$1%K\)]%n $$2-) -@ setitem(smform 25 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K\\\($$(c3)$$1%K\)]%n $$2-) -@ setitem(smform 26 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nmsg$$(c1)\\\(%n$$1$$(c1)\)]%n $$2-) -@ setitem(smform 27 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nmsg$$(c3)\\\(%n$$1$$(c3)\)]%n $$2-) -@ setitem(smform 28 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K/$$(c1)$$1%K]%n $$2-) -@ setitem(smform 29 $$fparse(format_timestamp_some $($_timess))%K[%nmsg%K/$$(c3)$$1%K]%n $$2-) -@ setitem(smform 30 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nmsg$$(c1)/%n$$1$$(c1)]%n $$2-) -@ setitem(smform 31 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nmsg$$(c3)/%n$$1$$(c3)]%n $$2-) -@ setitem(smform 32 $$fparse(format_timestamp_some $($_timess))%K\\\(%nmsg%K/$$(c1)$$1%K\)%n $$2-) -@ setitem(smform 33 $$fparse(format_timestamp_some $($_timess))%K\\\(%nmsg%K/$$(c3)$$1%K\)%n $$2-) -@ setitem(smform 34 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%nmsg$$(c1)/%n$$1$$(c1)\)%n $$2-) -@ setitem(smform 35 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%nmsg$$(c3)/%n$$1$$(c3)\)%n $$2-) -@ setitem(smform 36 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)> %K[$$(c1)$$1%K]%n $$2-) -@ setitem(smform 37 $$fparse(format_timestamp_some $($_timess))$$(c3)-$$(c4)> %K[$$(c3)$$1%K]%n $$2-) -@ setitem(smform 38 $$fparse(format_timestamp_some $($_timess))%n-$$(c1)> $$(c1)[%n$$1$$(c1)]%n $$2-) -@ setitem(smform 39 $$fparse(format_timestamp_some $($_timess))%n-$$(c3)> $$(c3)[%n$$1$$(c3)]%n $$2-) -@ setitem(smform 40 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)$$1%K\)%n $$2-) -@ setitem(smform 41 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c3)$$1%K\)%n $$2-) -@ setitem(smform 42 $$fparse(format_timestamp_some $($_timess))$$(c1)>\\\(%n$$1$$(c1)\)%n $$2-) -@ setitem(smform 43 $$fparse(format_timestamp_some $($_timess))$$(c3)>\\\(%n$$1$$(c3)\)%n $$2-) -@ setitem(smform 44 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)$$1%K]%n $$2-) -@ setitem(smform 45 $$fparse(format_timestamp_some $($_timess))%K>[$$(c3)$$1%K]%n $$2-) -@ setitem(smform 46 $$fparse(format_timestamp_some $($_timess))$$(c1)>[%n$$1$$(c1)]%n $$2-) -@ setitem(smform 47 $$fparse(format_timestamp_some $($_timess))$$(c3)>[%n$$1$$(c3)]%n $$2-) -@ setitem(smform 48 $$fparse(format_timestamp_some $($_timess))*$$1*> $$2-) -@ setitem(smform 49 *$$1*> $$2-) -## smform 50-53 - crapple - 8.06.05 - 54-55 - 8.30.05 -@ setitem(smform 50 $$fparse(format_timestamp_some $($_timess))%W-$$(cl)>%n%W \\\($$(cl)$$1%W\\\)%n $$2-) -@ setitem(smform 51 $$fparse(format_timestamp_some $($_timess))$$(cl)-%W>%n$$(hgrn) \\\($$(cl)$$1$$(hgrn)\\\)%n $$2-) -@ setitem(smform 52 $$fparse(format_timestamp_some $($_timess))$$(cl)-%w>%n \\\($$1\\\) $$2-) -@ setitem(smform 53 $$fparse(format_timestamp_some $($_timess))$$(cl)-%W>%n%W \\\($$(cl)$$1%W\\\)%n $$2-) -@ setitem(smform 54 $$fparse(format_timestamp_some $($_timess))$$(cl)-%W>%n$$(hblu) \\\($$(cl)$$1$$(hblu)\\\)%n $$2-) - -## public formats -@ delarray(pubform) -@ setitem(pubform 0 !) -@ setitem(pubform 1 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(pubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\\\)%n $$2-) -@ setitem(pubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<%n$$1$$(hmag)>%n $$2-) -@ setitem(pubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\(%n$$1$$(hmag)\\\)%n $$2-) -@ setitem(pubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<%n$$1$$(hblu)>%n $$2-) -@ setitem(pubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) -@ setitem(pubform 7 $$fparse(format_timestamp_some $($_timess))%b<%n$$1%b>%n $$2-) -@ setitem(pubform 8 $$fparse(format_timestamp_some $($_timess))%b\\\(%n$$1%b\\\)%n $$2-) -@ setitem(pubform 9 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(pubform 10 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$1%K>%n $$2-) -@ setitem(pubform 11 $$fparse(format_timestamp_some $($_timess))%K<$$(c3)$$1%K>%n $$2-) -@ setitem(pubform 12 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$1$$(c1)>%n $$2-) -@ setitem(pubform 13 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$1$$(c3)>%n $$2-) -@ setitem(pubform 14 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\)%n $$2-) -@ setitem(pubform 15 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K\)%n $$2-) -@ setitem(pubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K\)%n $$2-) -@ setitem(pubform 17 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)\)%n $$2-) -@ setitem(pubform 18 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)\)%n $$2-) -@ setitem(pubform 19 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$2-) -@ setitem(pubform 20 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)]%n $$2-) -@ setitem(pubform 21 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)]%n $$2-) -@ setitem(pubform 22 $$fparse(format_timestamp_some $($_timess))<$$1> $$2-) -@ setitem(pubform 23 <$$1> $$2-) -## pubform 24-26 - crapple 8.06.05 -@ setitem(pubform 24 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\(%n$$1$$(wht)\\\)%n $$2-) -@ setitem(pubform 25 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\(%n$$1$$(cl)\\\)%n $$2-) -@ setitem(pubform 26 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\(%n$$1$$(hwht)\\\)%n $$2-) - -## send public formats -@ delarray(spubform) -@ setitem(spubform 0 !) -@ setitem(spubform 1 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(spubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\\\)%n $$2-) -@ setitem(spubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<%n$$1$$(hmag)>%n $$2-) -@ setitem(spubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\(%n$$1$$(hmag)\\\)%n $$2-) -@ setitem(spubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<%n$$1$$(hblu)>%n $$2-) -@ setitem(spubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) -@ setitem(spubform 7 $$fparse(format_timestamp_some $($_timess))%K<%c$$1%K>%n $$2-) -@ setitem(spubform 8 $$fparse(format_timestamp_some $($_timess))%K\\\(%c$$1%K\\\)%n $$2-) -@ setitem(spubform 9 $$fparse(format_timestamp_some $($_timess))%b<%n$$1%b>%n $$2-) -@ setitem(spubform 10 $$fparse(format_timestamp_some $($_timess))%b\\\(%n$$1%b\\\)%n $$2-) -@ setitem(spubform 11 $$fparse(format_timestamp_some $($_timess))$$(sc1)<%n$$1$$(sc1)>%n $$2-) -@ setitem(spubform 12 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(spubform 13 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$1%K>%n $$2-) -@ setitem(spubform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$1$$(c1)>%n $$2-) -@ setitem(spubform 15 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$1$$(c3)>%n $$2-) -@ setitem(spubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\)%n $$2-) -@ setitem(spubform 17 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K\)%n $$2-) -@ setitem(spubform 18 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)\)%n $$2-) -@ setitem(spubform 19 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)\)%n $$2-) -@ setitem(spubform 20 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$2-) -@ setitem(spubform 21 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K]%n $$2-) -@ setitem(spubform 22 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)]%n $$2-) -@ setitem(spubform 23 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)]%n $$2-) -@ setitem(spubform 24 $$fparse(format_timestamp_some $($_timess))> $$2-) -@ setitem(spubform 25 > $$2-) -## sendpub 26-28 - crapple 8.06.05 - 29-30 - 8.30.05 -@ setitem(spubform 26 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\(%n$$1$$(wht)\\\)%n $$2-) -@ setitem(spubform 27 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\(%n$$1$$(cl)\\\)%n $$2-) -@ setitem(spubform 28 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\(%n$$1$$(hwht)\\\)%n $$2-) -@ setitem(spubform 29 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) -@ setitem(spubform 30 $$fparse(format_timestamp_some $($_timess))$$(mag)\\\(%n$$1$$(mag)\\\)%n $$2-) - -## send public other formats -@ delarray(spuboform) -@ setitem(spuboform 0 !) -@ setitem(spuboform 1 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K:%n$$2%K>%n $$3-) -@ setitem(spuboform 2 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K:%n$$2%K\\\)%n $$3-) -@ setitem(spuboform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<%n$$1%K:%n$$2$$(hmag)>%n $$3-) -@ setitem(spuboform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\(%n$$1%K:%n%N$$2$$(hmag)\\\)%n $$3-) -@ setitem(spuboform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<%n$$1%K:%n$$2$$(hblu)>%n $$3-) -@ setitem(spuboform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1%K:%n$$2$$(hblu)\\\)%n $$3-) -@ setitem(spuboform 7 $$fparse(format_timestamp_some $($_timess))$$(blu)\\\(%n$$1%K:%n$$2$$(blu)\\\)%n $$3-) -@ setitem(spuboform 8 $$fparse(format_timestamp_some $($_timess))$$(blu)<%n$$1%K:%n$$2$$(blu)>%n $$3-) -@ setitem(spuboform 9 $$fparse(format_timestamp_some $($_timess))%K<%n$$2%K/%n$$1%K>%n $$3-) -@ setitem(spuboform 10 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$2%K/$$(c1)$$1%K>%n $$3-) -@ setitem(spuboform 11 $$fparse(format_timestamp_some $($_timess))%K<$$(c3)$$2%K/$$(c3)$$1%K>%n $$3-) -@ setitem(spuboform 12 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$2$$(c1)/$$1$$(c1)>%n $$3-) -@ setitem(spuboform 13 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$2$$(c3)/$$1$$(c3)>%n $$3-) -@ setitem(spuboform 14 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$2%K/%n$$1%K\)%n $$3-) -@ setitem(spuboform 15 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$2%K/$$(c1)$$1%K\)%n $$3-) -@ setitem(spuboform 16 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$2%K/$$(c3)$$1%K\)%n $$3-) -@ setitem(spuboform 17 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$2$$(c1)/%n$$1$$(c1)\)%n $$3-) -@ setitem(spuboform 18 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$2$$(c3)/%n$$1$$(c3)\)%n $$3-) -@ setitem(spuboform 19 $$fparse(format_timestamp_some $($_timess))%K[%n$$2%K/%n$$1%K]%n $$3-) -@ setitem(spuboform 20 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$2$$(c1)/%n$$1$$(c1)]%n $$3-) -@ setitem(spuboform 21 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$2$$(c3)/%n$$1$$(c3)]%n $$3-) -@ setitem(spuboform 22 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K/%n$$2%K>%n $$3-) -@ setitem(spuboform 23 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$1%K/$$(c1)$$2%K>%n $$3-) -@ setitem(spuboform 24 $$fparse(format_timestamp_some $($_timess))%K<$$(c3)$$1%K/$$(c3)$$2%K>%n $$3-) -@ setitem(spuboform 25 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$1$$(c1)/$$2$$(c1)>%n $$3-) -@ setitem(spuboform 26 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$1$$(c3)/$$2$$(c3)>%n $$3-) -@ setitem(spuboform 27 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K/%n$$2%K\)%n $$3-) -@ setitem(spuboform 28 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K/$$(c1)$$2%K\)%n $$3-) -@ setitem(spuboform 29 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K/$$(c3)$$2%K\)%n $$3-) -@ setitem(spuboform 30 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)/%n$$2$$(c1)\)%n $$3-) -@ setitem(spuboform 31 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)/%n$$2$$(c3)\)%n $$3-) -@ setitem(spuboform 32 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K/%n$$2%K]%n $$3-) -@ setitem(spuboform 33 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)/%n$$2$$(c1)]%n $$3-) -@ setitem(spuboform 34 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)/%n$$2$$(c3)]%n $$3-) -@ setitem(spuboform 35 $$fparse(format_timestamp_some $($_timess))<$$1:$$2> $$3-) -@ setitem(spuboform 36 <$$1:$$2> $$3-) - -## signoff formats -@ delarray(signform) -@ setitem(signform 0 !) -@ setitem(signform 1 $$fparse(format_timestamp_some $($_timess))$$ztsignoff: %K\\\(%n$$1%K/%n$$2%K\\\)%n $$3-) -@ setitem(signform 2 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)signoff%K: $$(c2)$$1%K/$$(c2)$$2 %K\\\(%n$$3-%K\\\)) -@ setitem(signform 3 $$fparse(format_timestamp_some $($_timess))$$zt%nsignoff: %W$$1%K/%W$$2 %K\\\(%n$$3-%K\\\)) -@ setitem(signform 4 $$fparse(format_timestamp_some $($_timess))$$zt%c.%K.[%Ws%nignoff%K/%n$$1%K\\\(%w$$2%K\\\)]:%n $$3-) -@ setitem(signform 5 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)$$1$$(c2)/$$(c1)$$2 %nhas left irc%K:%n $$3-) -@ setitem(signform 6 $$fparse(format_timestamp_some $($_timess))$$zt%K.%m.%K[%Ws%nignoff%m.%n$$1%K\\\(%m$$2%K\\\)] %K\\\(%n$$3-%K\\\)) -@ setitem(signform 7 $$fparse(format_timestamp_some $($_timess))$$zt%K.%c.%K[%Ws%nignoff%c.%n$$1%K\\\(%c$$2%K\\\)] [%n$$3-%K]%n) -@ setitem(signform 8 $$fparse(format_timestamp_some $($_timess))$$zt%K\\\(%Wquit%K/$$(c2)$$1%K\\\) \\\(%n$$3-%K\\\)) -@ setitem(signform 9 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)signoff$$(hblk): $$(c2)$$1%K/$$(c1)$$2 %K\\\(%n$$3-%K\\\)) -@ setitem(signform 10 $$fparse(format_timestamp_some $($_timess))$$zt%K[%csignoff%K!%n$$2%K]%n $$3- %K[%nby%W!%n$$1%K]%n) -@ setitem(signform 11 $$fparse(format_timestamp_some $($_timess))$$ztsignoff%K/%n$$1 %K[%n$$3-%K]%n by %c$$2) -@ setitem(signform 12 $$fparse(format_timestamp_some $($_timess))$$zt%K[$$(c1)signoff%K/%n$$1%K]$$(c1) $$2 %K[%n$$3-%n%K]) -@ setitem(signform 13 $$fparse(format_timestamp_some $($_timess))$$zt%K[$$(c3)signoff%K/%n$$1%K]$$(c3) $$2 %K[%n$$3-%n%K]) -@ setitem(signform 14 $$fparse(format_timestamp_some $($_timess))$$zt$$(c1)signoff%K/%n$$2 $$(c1)$$1 %K[%n$$3-%n%K]) -@ setitem(signform 15 $$fparse(format_timestamp_some $($_timess))$$zt$$(c3)signoff%K/%n$$2 $$(c3)$$1 %K[%n$$3-%n%K]) -@ setitem(signform 16 $$fparse(format_timestamp_some $($_timess))$$ztSignoff: $$2 \\\($$3-\\\)) -@ setitem(signform 17 *** Signoff: $$2 \\\($$3-\\\)) -@ setitem(signform 18 $$fparse(format_timestamp_some $($_timess))$$zt%K[%Wquit%K/%n$$1%K] %W$$2 %K[%n$$3-%n%K]) -## join formats -@ delarray(joinform) -@ setitem(joinform 0 !) -@ setitem(joinform 1 $$fparse(format_timestamp_some $($_timess))$$(c4)$$1 %K[$$(c3)$$3%K]%n has joined $$2) -@ setitem(joinform 2 $$(c4)$$1 %K\\\($$(c3)$$3%K\\\)%n has joined $$2 $$Z) -@ setitem(joinform 3 %c.%K.[%Wj%noin%K/%n$$2%K]%n $$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$3)%K\\\)%n $$Z) -@ setitem(joinform 4 $$fparse(format_timestamp_some $($_timess))$$(c1)$$1 %K[$$(c2)$$3$$(c1)%K]%n has joined $$(c2)$$2) -@ setitem(joinform 5 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wj%noin%c.%n$$2%K] \\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$3)%K]\\\)%n) -@ setitem(joinform 6 $$fparse(format_timestamp_some $($_timess))%K.%m.%K[%Wj%noin%m.%n$$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$3)%K\\\)]%n to %m$$2) -@ setitem(joinform 7 $$G %K\\\(%Wjoin%K/%W$$2%K\\\)%n - %W$$1%K[$$(c1)$$before(@ $3)%K@$$(c1)$$after(@ $3)%K]%n $$Z) -@ setitem(joinform 8 $$G $$(c1)join$$(hblk)\\\($(cl)$$2$$(hblk)\\\)..$$(cl) $$(hwht)$$1$$(cl)!$$(c1)$$3%n $$Z) -@ setitem(joinform 9 $$fparse(format_timestamp_some $($_timess))%K[%cjoin%K!%n$$2%K]%n $$1%W.%n.%c$$3%n) -@ setitem(joinform 10 $$fparse(format_timestamp_some $($_timess))%cj%noin%K/%c$$2 %K[%n$$1%K!%c$$before(@ $3)%n@%c$$after(@ $3)%K]%n) -@ setitem(joinform 11 $$G $$1 \\\($$3\\\) has joined channel $$2) -@ setitem(joinform 12 $$G $$(c1)$$1 %K[$(cl)$$sar(g/@/$(hblk)@$(cl)/$3)$$(c1)%K]%n has joined $$(c2)$$2) -## join added 13-17 crapple 8.06.05 -@ setitem(joinform 13 $$(cl)$$1 %n$$(wht)\\\($$(cl)$$3$$(wht)\\\)%n has joined $$2 $$Z) -@ setitem(joinform 14 $$fparse(format_timestamp_some $($_timess))$$(wht)$$1%n $$(cl)\\\($$(cl)$$3$$(cl)\\\)%n has joined $$2) -@ setitem(joinform 15 $$(wht)$$1%n $$(hwht)\\\($$(cl)$$3$$(hwht)\\\)%n has joined $$2 $$Z) -@ setitem(joinform 16 $$fparse(format_timestamp_some $($_timess))$$(cl)$$1%n $$(wht)\\\($$(ck)$$3$$(wht)\\\)%n has joined $$(wht)$$2%n) -@ setitem(joinform 17 $$G $$(wht)$$1%n $$(hgrn)\\\($$(cl)$$3$$(hgrn)\\\)%n$$(cl) has joined $$(hblu)$$2%n$$(cl) $$Z%n) -## join added 18-19 violence 8.06.05 -@ setitem(joinform 18 $$fparse(format_timestamp_some $($_timess))%c$$1 %K\\\[%C$$3%K\\\]%n has joined %C$$2) -@ setitem(joinform 19 $$fparse(format_timestamp_some $($_timess))$$(c4)$$1 %K[$$(c3)$$3%K]%n has joined $$2) -@ setitem(joinform 20 $$G $$1 \\\($$3\\\) has joined $$2) -@ setitem(joinform 21 $$fparse(format_timestamp_some $($_timess))%K[%Wjoin%K/%n$$2%K]%W $$1 %K[%n$$3%K]%n) - -## leaves formats -@ delarray(leaveform) -@ setitem(leaveform 0 !) -@ setitem(leaveform 1 $$G $$(c1)$$1 %K\\\($$(c2)$$2%K\\\) %nhas left $$(c2)$$3 %K[%n$$4-%K]) -@ setitem(leaveform 2 $$G $$(c1)$$1 %K\\\[$$(c2)$$2%K\\\] %nhas left $$(c2)$$3 %K[%n$$4-%K]%n at $$Z) -@ setitem(leaveform 3 $$G $$1 %K[%w$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]%n has left $$3 %K[%W$$4-%K]) -@ setitem(leaveform 4 $$fparse(format_timestamp_some $($_timess))%c.%K.[%Wp%nart%K/%n$$3%K]%n $$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K\\\) %K[%n$$4-%K]%n) -@ setitem(leaveform 5 $$G %K.%c.%K[%Wp%nart%c.%n$$3%K]%n %K\\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n %K[%n$$4-%K]%n at $$Z) -@ setitem(leaveform 6 $$fparse(format_timestamp_some $($_timess))%K.%m.%K[%Wp%nart%m.%n$$1%K\\\(%n$$msar(g/@/$(hblk)@$(cl)/$(hblk).$(cl)/$2)%K\\\)]%n of %m$$3 %K[%n$$4-%K]) -@ setitem(leaveform 7 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wpart%K/%W$$3%K\\\)%n - %W$$1%K[$$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K] \\\(%n$$4-%K\\\)) -@ setitem(leaveform 8 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)p%Kú$$(c2)$$3%K\\\)%n $$1%K[%n$$2%K] \\\(%n$$4-%K\\\)%n) -@ setitem(leaveform 9 $$G $$(c1)part$$(hblk)\\\($(cl)$$3$$(hblk)\\\).. $$(cl)$$1$$(hwht)!$$(c1)$$2%n $$Z) -@ setitem(leaveform 10 $$fparse(format_timestamp_some $($_timess))%K[%npart%K!%c$$3%K]%n $$1%W.%n.%c$$2%n) -@ setitem(leaveform 11 $$G part%K/%n$$3 %K[%n$$1%K!%n$$before(@ $2)%K@%n$$after(@ $2)%K]%n $$Z) -@ setitem(leaveform 12 $$G $$1 has left channel $$3) -## leaves 13-14 violence - 8.06.05 -@ setitem(leaveform 13 $$fparse(format_timestamp_some $($_timess))$$(hwht)$$1 %K\\\[%n$$before(@ $2)%K@%n$$after(@ $2)%K\\\]%n has left $$3 %K\\\[%n$$4-%K\\\]) -@ setitem(leaveform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)$$1 %K\\\[$$(c2)$$2%K\\\] %nhas left $$(c2)$$3 %K[%n$$4-%K]) -## leaves 15 - crapple - 8.06.05 -@ setitem(leaveform 15 $$G $$1 %K[%G$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]%n has left $$3 %K[%W$$4-%K]%n at $$Z) -@ setitem(leaveform 16 $$fparse(format_timestamp_some $($_timess))%K[%Wpart%K/%n$$3%K] %W$$1%K\\\(%n$$2%K\\\) [%n$$4%K]%n) - -## mode formats -@ delarray(modeform) -@ setitem(modeform 0 !) -@ setitem(modeform 1 $$fparse(format_timestamp_some $($_timess))$$ztmode%K$$(c3)$$2 %K[%W$$3 $$4-%K]%n by %W$$1) -@ setitem(modeform 2 $$fparse(format_timestamp_some $($_timess))$$zt%K\\\[$$(c1)mode%K!$$(c2)$$2%K\\\] %K"%W$$3 $$4-%K" %nby %w$$1) -@ setitem(modeform 3 $$fparse(format_timestamp_some $($_timess))$$zt%K[%Rmode%K\\\(%r$$2%K\)] %K[%R$$4-%K\\\(%n$$3%K\\\)]%n by %w$$1) -@ setitem(modeform 4 $$fparse(format_timestamp_some $($_timess))$$zt %cmode%C.%c$$2 %K\\\(%n$$3 $$4-%K\\\) %nby %n$$1) -@ setitem(modeform 5 $$fparse(format_timestamp_some $($_timess)) *** Mode change "$$3-" for $$2 by $$1) -@ setitem(modeform 6 *** Mode change "$$3-" for $$2 by $$1) -## 7-9 - violence - 8.06.05 -@ setitem(modeform 7 $$fparse(format_timestamp_some $($_timess))$$zt%cmode%C.%c$$2 %K\\\(%n$$3 $$4-%K\\\) %nby %n$$1) -@ setitem(modeform 8 $$fparse(format_timestamp_some $($_timess))%Mmode%K/%m$$2 %K\\\[$$(hwht)$$3-%K\\\] %nby $$(hwht)$$1) -@ setitem(modeform 9 $$fparse(format_timestamp_some $($_timess))%K\\\[%cmode%K\\\(%C$$2%K\\\) %c$$3 $$4-%K\\\] %nby %C$$1) - -## notice formats -@ delarray(notform) -@ setitem(notform 0 !) -@ setitem(notform 1 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K\\\(%n$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\\\)-%n $$3-) -@ setitem(notform 2 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K\\\[%n$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\\\]-%n $$3-) -@ setitem(notform 3 $$fparse(format_timestamp_some $($_timess))%K-%M$$1%K\\\(%m$$2%K\\\)- %n$$3-) -@ setitem(notform 4 $$fparse(format_timestamp_some $($_timess))%c.%K.%Wn%not%K\\\(%n$$1%K[%n$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]\\\)%n $$3-) -@ setitem(notform 5 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)\\\($$(hwht)$$1$$(c2)\\\)$$(c1)-%n $$3-) -@ setitem(notform 6 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%n$$1%K]%n $$3- %K\\\(%m$$sar(g/@/$(hmag)@$(mag)/$2)%K\\\)) -@ setitem(notform 7 $$fparse(format_timestamp_some $($_timess))%m.%K.[%c\$1%K]%n \$3- %K[%c\$2%K]%n) -@ setitem(notform 8 $$fparse(format_timestamp_some $($_timess))$$(hblk)-$$(c1)$$1$$(hblk)\\\($$(c2)$$2$$(hblk)\\\)-$$(cl) $$3-) -@ setitem(notform 9 $$fparse(format_timestamp_some $($_timess))%K-%Wn%K/$$(c2)$$1%K\\\($$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K\\\)-%n $$3-) -@ setitem(notform 10 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K\\\($$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K\)-%n $$3-) -@ setitem(notform 11 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K\\\($$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K\)-%n $$3-) -@ setitem(notform 12 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K!$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K-%n $$3-) -@ setitem(notform 13 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K!$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K-%n $$3-) -@ setitem(notform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)-%n$$1$$(c1)!%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)-%n $$3-) -@ setitem(notform 15 $$fparse(format_timestamp_some $($_timess))$$(c3)-%n$$1$$(c3)!%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)-%n $$3-) -@ setitem(notform 16 $$fparse(format_timestamp_some $($_timess))%K-$$(c1)$$1%K-%n $$3- %n%K-$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K-) -@ setitem(notform 17 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K-%n $$3- %n%K-$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K-) -@ setitem(notform 18 $$fparse(format_timestamp_some $($_timess))$$(c1)-%n$$1$$(c1)-%n $$3- %n$$(c1)-%n$$before(@ $2)$$(c1)@$$(cl)$$after(@ $2)$$(c1)-) -@ setitem(notform 19 $$fparse(format_timestamp_some $($_timess))$$(c3)-%n$$1$$(c3)-%n $$3- %n$$(c3)-%n$$before(@ $2)$$(c3)@$$(cl)$$after(@ $2)$$(c3)-) -@ setitem(notform 20 $$fparse(format_timestamp_some $($_timess))%K-$$(c1)$$1%K-%n $$3- %n%K-%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K-) -@ setitem(notform 21 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K-%n $$3- %n%K-%n$$before(@ $2)$$(hblk)@%n$$after(@ $2)%K-) -@ setitem(notform 22 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K-%n $$3- %n%K-$$(c1)$$before(@ $2)$$(hblk)@$$(c1)$$after(@ $2)%K-) -@ setitem(notform 23 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K-%n $$3- %n%K-$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K-) -@ setitem(notform 24 $$fparse(format_timestamp_some $($_timess)) -$$1- $$3-) -@ setitem(notform 25 -$$1- $$3-) - -## send notice formats -@ delarray(snotform) -@ setitem(snotform 0 !) -@ setitem(snotform 1 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)notice%K\\\($$(c2)$$1%K\\\)]%n $$2-) -@ setitem(snotform 2 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)notice%K\\\($$(c2)$$1%K\\\)\\\)%n $$2-) -@ setitem(snotform 3 $$fparse(format_timestamp_some $($_timess))%K[%rnotice%K\\\(%R$$1%K\\\)]%n $$2-) -@ setitem(snotform 4 $$fparse(format_timestamp_some $($_timess))%K¯$$(c2)\\\(%c$$1$$(c2)\\\)%n $$2-) -@ setitem(snotform 5 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wn%not%K\\\(%n$$1%K\\\)]%n $$2-) -@ setitem(snotform 6 $$fparse(format_timestamp_some $($_timess))%K¯%c[%K$$1%c]%n $$2-) -@ setitem(snotform 7 $$fparse(format_timestamp_some $($_timess))%m.%K.[%nno%Wt%K\\\(%m$$1%K\\\)]%n $$2-) -@ setitem(snotform 8 $$fparse(format_timestamp_some $($_timess))%K-> [%cnot%K!%n$$1%K]%n $$2-) -@ setitem(snotform 9 $$fparse(format_timestamp_some $($_timess))%K¯[$$(c1)notice%K\\\($$(c2)$$1%K\\\)]%n $$2-) -@ setitem(snotform 10 $$fparse(format_timestamp_some $($_timess))%K\-%Wsn%K/$$(c2)$$1%K-%n $$2-) -@ setitem(snotform 11 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K\\\($$(c1)$$1%K\)]%n $$2-) -@ setitem(snotform 12 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K\\\($$(c3)$$1%K\)]%n $$2-) -@ setitem(snotform 13 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nnot$$(c1)\\\(%n$$1$$(c1)\)]%n $$2-) -@ setitem(snotform 14 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nnot$$(c3)\\\(%n$$1$$(c3)\)]%n $$2-) -@ setitem(snotform 15 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K/$$(c1)$$1%K]%n $$2-) -@ setitem(snotform 16 $$fparse(format_timestamp_some $($_timess))%K[%nnot%K/$$(c3)$$1%K]%n $$2-) -@ setitem(snotform 17 $$fparse(format_timestamp_some $($_timess))$$(c1)[%nnot$$(c1)/%n$$1$$(c1)]%n $$2-) -@ setitem(snotform 18 $$fparse(format_timestamp_some $($_timess))$$(c3)[%nnot$$(c3)/%n$$1$$(c3)]%n $$2-) -@ setitem(snotform 19 $$fparse(format_timestamp_some $($_timess))%K\\\(%nnot%K/$$(c1)$$1%K\)%n $$2-) -@ setitem(snotform 20 $$fparse(format_timestamp_some $($_timess))%K\\\(%nnot%K/$$(c3)$$1%K\)%n $$2-) -@ setitem(snotform 21 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%nnot$$(c1)/%n$$1$$(c1)\)%n $$2-) -@ setitem(snotform 22 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%nnot$$(c3)/%n$$1$$(c3)\)%n $$2-) -@ setitem(snotform 23 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)> %K[$$(c1)$$1%K]%n $$2-) -@ setitem(snotform 24 $$fparse(format_timestamp_some $($_timess))$$(c3)-$$(c4)> %K[$$(c3)$$1%K]%n $$2-) -@ setitem(snotform 25 $$fparse(format_timestamp_some $($_timess))%n-$$(c1)> $$(c1)[%n$$1$$(c1)]%n $$2-) -@ setitem(snotform 26 $$fparse(format_timestamp_some $($_timess))%n-$$(c3)> $$(c3)[%n$$1$$(c3)]%n $$2-) -@ setitem(snotform 27 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c1)$$1%K\)%n $$2-) -@ setitem(snotform 28 $$fparse(format_timestamp_some $($_timess))%K>\\\($$(c3)$$1%K\)%n $$2-) -@ setitem(snotform 29 $$fparse(format_timestamp_some $($_timess))$$(c1)>\\\(%n$$1$$(c1)\)%n $$2-) -@ setitem(snotform 30 $$fparse(format_timestamp_some $($_timess))$$(c3)>\\\(%n$$1$$(c3)\)%n $$2-) -@ setitem(snotform 31 $$fparse(format_timestamp_some $($_timess))%K>[$$(c1)$$1%K]%n $$2-) -@ setitem(snotform 32 $$fparse(format_timestamp_some $($_timess))%K>[$$(c3)$$1%K]%n $$2-) -@ setitem(snotform 33 $$fparse(format_timestamp_some $($_timess))$$(c1)>[%n$$1$$(c1)]%n $$2-) -@ setitem(snotform 34 $$fparse(format_timestamp_some $($_timess))$$(c3)>[%n$$1$$(c3)]%n $$2-) -@ setitem(snotform 35 $$fparse(format_timestamp_some $($_timess))-$$1-> $$2-) -@ setitem(snotform 36 -$$1-> $$2-) - -## send dcc formats -@ delarray(sdcform) -@ setitem(sdcform 0 !) -@ setitem(sdcform 1 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)dcc%K\\\($$(c2)$$1%K\\\)]%n $$2-) -@ setitem(sdcform 2 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)dcc%K\\\($$(c2)$$1%K\\\)\\\)%n $$2-) -@ setitem(sdcform 3 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wd%ncc%K\\\(%n$$1%K\\\)]%n $$2-) -@ setitem(sdcform 4 $$fparse(format_timestamp_some $($_timess))$$(c1).$$(hblk).[$$(c2)dcc$$(hblk)\\\($$(c1)$$1$$(hblk)\\\)]$$(cl) $$2-) -@ setitem(sdcform 5 $$fparse(format_timestamp_some $($_timess))%K[%rdcc%K\\\(%R$$1%K\\\)] %n$$2-) -@ setitem(sdcform 6 $$fparse(format_timestamp_some $($_timess))%K¯\\\($$(c2)dcc%K!$$(hwht)$$1%K\\\) %n$$2-) -@ setitem(sdcform 7 $$fparse(format_timestamp_some $($_timess))%K¯$$(cl)dcc%K!$$(hwht)$$1 $$(hblk)­ %n$$2-) -@ setitem(sdcform 8 $$fparse(format_timestamp_some $($_timess))$$zt $$(hblk)[$$(hgrn)dcc$$(hblk)\\\($$(grn)$$1$$(hblk)\\\)]$$(cl) $$2-) -@ setitem(sdcform 9 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K/$$(c1)dcc%K]%n $$2-) -@ setitem(sdcform 10 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K/$$(c3)dcc%K]%n $$2-) -@ setitem(sdcform 11 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)/%ndcc$$(c1)]%n $$2-) -@ setitem(sdcform 12 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)/%ndcc$$(c3)]%n $$2-) -@ setitem(sdcform 13 $$fparse(format_timestamp_some $($_timess))%K\\\(%ndcc%K!$$(c1)$$1%K\)%n $$2-) -@ setitem(sdcform 14 $$fparse(format_timestamp_some $($_timess))%K\\\(%ndcc%K!$$(c3)$$1%K\)%n $$2-) -@ setitem(sdcform 15 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%ndcc$$(c1)!%n$$1$$(c1)\)%n $$2-) -@ setitem(sdcform 16 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%ndcc$$(c3)!%n$$1$$(c3)\)%n $$2-) -@ setitem(sdcform 17 $$fparse(format_timestamp_some $($_timess))%K>\\\(%ndcc%K!$$(c1)$$1%K\)%n $$2-) -@ setitem(sdcform 18 $$fparse(format_timestamp_some $($_timess))%K>\\\(%ndcc%K!$$(c3)$$1%K\)%n $$2-) -@ setitem(sdcform 19 $$fparse(format_timestamp_some $($_timess))$$(c1)>\\\(%ndcc$$(c1)!%n$$1$$(c1)\)%n $$2-) -@ setitem(sdcform 20 $$fparse(format_timestamp_some $($_timess))$$(c3)>\\\(%ndcc$$(c3)!%n$$1$$(c3)\)%n $$2-) -@ setitem(sdcform 21 $$fparse(format_timestamp_some $($_timess))%K-$$(c1)> %K[$$(c1)=$$1%K]%n $$2-) -@ setitem(sdcform 22 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)> %K[$$(c3)=$$1%K]%n $$2-) -@ setitem(sdcform 23 $$fparse(format_timestamp_some $($_timess))$$(c1)-$$(c2)> $$(c1)[%n=$$1$$(c1)]%n $$2-) -@ setitem(sdcform 24 $$fparse(format_timestamp_some $($_timess))$$(c3)-$$(c4)> $$(c3)[%n=$$1$$(c3)]%n $$2-) -@ setitem(sdcform 25 $$fparse(format_timestamp_some $($_timess))$$=> =$$1= $$2-) -@ setitem(sdcform 26 $$=> =$$1= $$2-) -## sent dcc - 27/slightly modified #8 - violence - 8.06.05 -@ setitem(sdcform 27 $$fparse(format_timestamp_some $($_timess))$$zt$$(hblk)[$$(hgrn)dcc$$(hblk)\\\($$(grn)$$1$$(hblk)\\\)]$$(cl) $$2-) - -## dcc formats -@ delarray(dcform) -@ setitem(dcform 0 !) -@ setitem(dcform 1 $$fparse(format_timestamp_some $($_timess))%K[$$(c2)$$1%K\\\($$(c1)dcc%K\\\)]%n $$2-) -@ setitem(dcform 2 $$fparse(format_timestamp_some $($_timess))%K[$$(c2)$$1%K\\\[$$(c1)dcc%K\\\]]%n $$2-) -@ setitem(dcform 3 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%w$$1%K\\\(%Wd%ncc%K\\\)] %n$$2-) -@ setitem(dcform 4 $$fparse(format_timestamp_some $($_timess))$$(hblk).$$(c1).$$(hblk)[$$(c1)$$1$$(hblk)\\\($$(c2)dcc$$(hblk)\\\)] %n$$2-) -@ setitem(dcform 5 $$fparse(format_timestamp_some $($_timess))%K[%G$$1%K(%gdcc%K)] %n$$2-) -@ setitem(dcform 6 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c2)dcc%K!$$(hwht)$$1%K\\\) %n$$2-) -@ setitem(dcform 7 $$fparse(format_timestamp_some $($_timess))$(cl)dcc%K!$$(hwht)$$1 $$(hblk)­ %n$$2-) -@ setitem(dcform 8 $$fparse(format_timestamp_some $($_timess))$$zt $$(hblk)[$$(grn)$$1$$(hblk)\\\($$(hgrn)dcc$$(hblk)\\\)]$$(cl) $$2-) -@ setitem(dcform 9 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c1)dcc%K\)]%n $$2-) -@ setitem(dcform 10 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K\\\($$(c3)dcc%K\)]%n $$2-) -@ setitem(dcform 11 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)\\\(%ndcc$$(c1)\)]%n $$2-) -@ setitem(dcform 12 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)\\\(%ndcc$$(c3)\)]%n $$2-) -@ setitem(dcform 13 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K!%ndcc%K\)%n $$2-) -@ setitem(dcform 14 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K!%ndcc%K\)%n $$2-) -@ setitem(dcform 15 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)!%ndcc$$(c1)\)%n $$2-) -@ setitem(dcform 16 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)!%ndcc$$(c3)\)%n $$2-) -@ setitem(dcform 17 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)=$$1%K]%n $$2-) -@ setitem(dcform 18 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)=$$1%K]%n $$2-) -@ setitem(dcform 19 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n=$$1$$(c1)]%n $$2-) -@ setitem(dcform 20 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n=$$1$$(c3)]%n $$2-) -@ setitem(dcform 21 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K!%ndcc%K]%n $$2-) -@ setitem(dcform 22 $$fparse(format_timestamp_some $($_timess))%K[$$(c3)$$1%K!%ndcc%K]%n $$2-) -@ setitem(dcform 23 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)!%ndcc$$(c1)]%n $$2-) -@ setitem(dcform 24 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)!%ndcc$$(c3)]%n $$2-) -@ setitem(dcform 25 $$fparse(format_timestamp_some $($_timess))=$$1= $$2-) -@ setitem(dcform 26 =$$1= $$2-) -## dccform - 27/slightly modded #8 - violence - 8.06.05 -@ setitem(dcform 27 $$fparse(format_timestamp_some $($_timess))$$zt$$(hblk)[$$(grn)$$1$$(hblk)\\\($$(hgrn)dcc$$(hblk)\\\)]$$(cl) $$2-) - -## topic formats -@ delarray(topform) -@ setitem(topform 0 !) -@ setitem(topform 1 %K[%ntopic%K/$$(c3)$$2%K:%K[$$(c3)$$1%K]]:%n $$3-) -@ setitem(topform 2 %K\\\(%ntopic%K/$$(c3)$$2%K:%K[$$(c3)$$1%K]\\\):%n $$3-) -@ setitem(topform 3 %K[%ntopic%K/$$(c1)$$2%K:%K[$$(c1)$$1%K]]:%n $$3-) -@ setitem(topform 4 %K\\\(%ntopic%K/$$(c1)$$2%K:%K[$$(c1)$$1%K]\\\):%n $$3-) -@ setitem(topform 5 $$1 has changed the topic on channel $$2 to $$3-) -@ setitem(topform 6 $$fparse(format_timestamp_some $($_timess))$$1 has changed the topic on channel $$2 to $$3-) -@ setitem(topform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$2%K] %W$$1 %K[%n$$3-%K]%n) -@ delarray(notopform) -@ setitem(notopform 0 !) -@ setitem(notopform 1 %K[%ntopic%K/$$(c3)$$1%K]:%n %Rtopic not set%n) -@ setitem(notopform 2 %K\\\(%ntopic%K/$$(c3)$$1%K]\\\):%n %Rtopic not set%n) -@ setitem(notopform 3 %K[%ntopic%K/$$(c1)$$1%K]:%n %Rtopic not set%n) -@ setitem(notopform 4 %K\\\(%ntopic%K/$$(c1)$$1%K\\\):%n %Rtopic not set%n) -@ setitem(notopform 5 $$1 : $$2-) -@ setitem(notopform 6 $$fparse(format_timestamp_some $($_timess))$$1 : $$2-) -@ setitem(notopform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] %Rtopic not set%n) -@ delarray(settopform) -@ setitem(settopform 0 !) -@ setitem(settopform 1 %K[%ntopic%K/$$(c3)$$1%K]:%n $$2-) -@ setitem(settopform 2 %K\\\(%ntopic%K/$$(c3)$$1%K]\\\):%n $$2-) -@ setitem(settopform 3 %K[%ntopic%K/$$(c1)$$1%K]:%n $$2-) -@ setitem(settopform 4 %K\\\(%ntopic%K/$$(c1)$$1%K\\\):%n $$2-) -@ setitem(settopform 5 Topic for $$1: $$2-) -@ setitem(settopform 6 $$fparse(format_timestamp_some $($_timess))Topic for $$1: $$2-) -@ setitem(settopform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] $$2-) -@ delarray(topbyform) -@ setitem(topbyform 0 !) -@ setitem(topbyform 1 %K[%ntopic%K/$$(c3)$$1%K:%K[$$(c3)$$2%K]]:%n $$3-) -@ setitem(topbyform 2 %K\\\(%ntopic%K/$$(c3)$$1%K:%K[$$(c3)$$2%K]\\\):%n $$3-) -@ setitem(topbyform 3 %K[%ntopic%K/$$(c1)$$1%K:%K[$$(c1)$$2%K]]:%n $$3-) -@ setitem(topbyform 4 %K\\\(%ntopic%K/$$(c1)$$1%K:%K[$$(c1)$$2%K]\\\):%n $$3-) -@ setitem(topbyform 5 Topic for $$1 was set by $$2 on $$3-) -@ setitem(topbyform 6 $$fparse(format_timestamp_some $($_timess))Topic for $$1 was set by $$2 on $$3-) -@ setitem(topbyform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] %W$$2 %K[%n$$3-%K]%n) - -## ctcp formats -@ delarray(ctcpform) -@ setitem(ctcpform 0 !) -@ setitem(ctcpform 1 $$G $$(c1)$$1 %K\\\($$(c2)$$2%K\\\)%n requested $$(c1)$$4 $$5 %nfrom $$3) -@ setitem(ctcpform 2 $$G $$(c1)$$1 %K\\\[$$(c2)$$2%K]%n requested $$(c1)$$4 $$5%n from $$3) -@ setitem(ctcpform 3 %K>%n>%W> $$(hgrn)$$1 %K\\\[$$(grn)$$2%K]$$(grn) requested $$4 $$5 from $$3) -@ setitem(ctcpform 4 $$G $$(hwt)$$1 $$(hblk)[$$(wht)$$2$$(hblk)] $$(cl)requested $$(wht)$$4- $$(cl)from $$3) -@ setitem(ctcpform 5 $$G $$(hwt)$$1 $$(hblk)\\\($$(wht)$$2$$(hblk)\\\) $$(cl)requested $$(wht)$$4- $$(cl)from $$3) -@ setitem(ctcpform 6 $$G $$(c3)$$1 $$(hblk)\\\($$(c4)$$2$$(hblk)\\\) $$(cl)requested $$(c1)$$4- $$(cl)from $$3) -@ setitem(ctcpform 7 $$G $$(c3)$$1 $$(hblk)[$$(c4)$$2$$(hblk)] $$(cl)requested $$(c1)$$4- $$(cl)from $$3) -@ setitem(ctcpform 8 $$G $$(cyn)$$1 $$(hblk)[$$(cl)$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)$$(hblk)]$$(cl) requested $$(cyn)$$4- $$(cl)from $$3) -@ setitem(ctcpform 9 %K\\\(%Wctcp%K/$$(c2)$$1%K[$$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K]\\\) \\\(%W$$3%K\\\)%n $$4-) -@ setitem(ctcpform 10 $$G %cc%ntcp%K: %n$$3 %K[%n$$tolower(${[$5]?[$4-]:[$4]})%K]%n from %c$$1%n) -@ setitem(ctcpform 11 $$G CTCP $$5 from $$1 to $$3: $$4) - -## send ctcp formats -@ delarray(sctcpform) -@ setitem(sctcpform 0 !) -@ setitem(sctcpform 1 %K¯\\\($$(c1)ctcp%K!%W$$2%K\\\) %n$$3 $$4 $$5 $$6) -@ setitem(sctcpform 2 %K¯\\\[$$(c1)ctcp%K!%W$$2%K\\\] %n$$3 $$4 $$5 $$6) -@ setitem(sctcpform 3 %K[%rctcp%K\\\(%R$$2%K\\\)] %n$$3 $$4 $$5 $$6) -@ setitem(sctcpform 4 $$(hblk)¯[$$(wht)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)] $$(cl)$$3 $$4 $$5 $$6) -@ setitem(sctcpform 5 $$(hblk)¯\\\($$(wht)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)\\\) $$(cl)$$3 $$4 $$5 $$6) -@ setitem(sctcpform 6 $$(hblk)¯\\\($$(c3)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)\\\) $$(cl)$$3 $$4 $$5 $$6) -@ setitem(sctcpform 7 $$(hblk)¯[$$(c3)ctcp$$(hblk)!$$(hwht)$$2$$(hblk)] $$(cl)$$3 $$4 $$5 $$6) -@ setitem(sctcpform 8 %K.%c.%K[%Wc%ntcp%K/%n$$2%K]%n $$3 $$4 $$5 $$6) -@ setitem(sctcpform 9 $$(hblk).$$(c2).$$(hblk)[$$(c2)c$$(c1)tcp$$(c2).$$(c1)$$2$$(hblk)]$(cl) $$3-) -@ setitem(sctcpform 10 %K\\\(%Wctcp%K/$$(c2)$$2%K\\\): %W$$3 %K\\\(%n$$4-%K\\\)) -@ setitem(sctcpform 11 %K:> %cc%ntcp%K:%c $$2 %K-%n $$3 $$4-) -@ setitem(sctcpform 12 [ctcp\\\($$2\\\)] $$3 $$4 $$5 $$6) -@ setitem(sctcpform 13 *** CTCP $$3 from $$N to $$2: $$4-) - -## echostr formats -@ delarray(echostr) -@ setitem(echostr 0 !) -@ setitem(echostr 1 $(hblk)[$(cyn)a+c$(hblk)]$(cl)) -@ setitem(echostr 2 $(mag).$(cl)-$(hblk)Ä$(cl)) -@ setitem(echostr 3 $(blu)ú$(hblk)ú$(blu)ú$(cl)) -@ setitem(echostr 4 $(hblk)ö$(cl)ö$(hblk)ö$(cl)) -@ setitem(echostr 5 $(cyn)ú$(hcyn)ù$(cyn)ø$(cl)) -@ setitem(echostr 6 $(cl)ø$(hblk)ù$(cl)ú$(cl)) -@ setitem(echostr 7 $(hblk)ú$(blu)ë$(hblk)ú$(cl)) -@ setitem(echostr 8 $(cyn)ì$(hblk)ì$(cyn)ì$(cl)) -@ setitem(echostr 9 $(blu)ú$(hblk)í$(blu)ú$(cl)) -@ setitem(echostr 10 $(hred)ù$(hwht)í$(hred)ù$(cl)) -@ setitem(echostr 11 $(hblk)Ä$(mag)Ä$(cyn)Ä$(cl)) -@ setitem(echostr 12 $(hblk)=$(cyn)=$(blu)=$(cl)) -@ setitem(echostr 13 $(hblk)Ä$(grn)Ä$(hgrn)Ä$(cl)) -@ setitem(echostr 14 $(hblk)-$(cyn)Ä$(cl)Ä) -@ setitem(echostr 15 $(hblk)ú$(hwht)ù$(hblk)ú$(cl)) -@ setitem(echostr 16 $(hblk)ú$(cyn)ë$(hblk)ú$(cl)) -@ setitem(echostr 17 $(hblk)ú$(cyn)ú$(cl)ú) -@ setitem(echostr 18 $(cl)Ä$(cyn)Ä$(hblk)Ä$(cl)) -@ setitem(echostr 19 $(hwht)ú$(cl)ú$(hblk)ú$(cl)) -@ setitem(echostr 20 $(hblk)Ä$(cl)Ä$(hwht)Ä$(cl)) -@ setitem(echostr 21 $(hblk)þ$(blu)þ$(hblu)þ$(cl)) -@ setitem(echostr 22 $(hblk)Ä$(cyn)Ä$(hcyn)Ä$(cl)) -@ setitem(echostr 23 $(hblk)Í$(cl)Í$(hwht)Í$(cl)) -@ setitem(echostr 24 $(hcyn)Ä$(cyn)Ä$(hblk)Ä$(cl)) -@ setitem(echostr 25 $(hblk)ð$(cl)ð$(hwht)ð$(cl)) -@ setitem(echostr 26 $(hblk)÷$(cl)÷$(hwht)÷$(cl)) -@ setitem(echostr 27 $(hblk)ù$(cl)­$(hwht)ù$(cl)) -@ setitem(echostr 28 $(hblk)-$(blu)Ä$(hblu)-$(cl)) -@ setitem(echostr 29 $(hblk)Ä$(hblk)Ä$(blu)Ä$(cl)) -@ setitem(echostr 30 $(hblk)‘$(hwht)‘$(cl)‘) -@ setitem(echostr 31 $(hblk)ú$(cl)ù$(hwht).$(cl)) -@ setitem(echostr 32 $(hblk)-$(hcyn):$(hblk)-$(cl)) -@ setitem(echostr 33 $(hblk)Ä$cparse($(blu)Ä)$cparse($(hblu)Ä)$(cl)) -@ setitem(echostr 34 $(hblk)ù$(hcyn)í$(hblk)ù$(cl)) -@ setitem(echostr 35 $(hblk)+$(c1)+$(c2)+$(cl)) -@ setitem(echostr 36 $(hblk)+$(c3)+$(c4)+$(cl)) -@ setitem(echostr 37 $(hblk)-$(c1)-$(c2)-$(cl)) -@ setitem(echostr 38 $(hblk)-$(c3)-$(c4)-$(cl)) -@ setitem(echostr 39 $(hblk)ù$(c1)ù$(c2)ù$(cl)) -@ setitem(echostr 40 $(hblk)ù$(c3)ù$(c4)ù$(cl)) -@ setitem(echostr 41 $(hblk)ú$(c1)ù$(c2).$(cl)) -@ setitem(echostr 42 $(hblk)ú$(c3)ù$(c4).$(cl)) -@ setitem(echostr 43 $(hblk)Ä$(c1)Ä$(c2)Ä$(cl)) -@ setitem(echostr 44 $(hblk)Ä$(c3)Ä$(c4)Ä$(cl)) -@ setitem(echostr 45 ***) -## echostr 46-51 added - phuzion - 12.04.99 -@ setitem(echostr 46 $(hblk)þ$(c1)þ$(c2)þ$(cl)) -@ setitem(echostr 47 $(hblk)‘$(c1)‘$(c2)‘$(cl)) -@ setitem(echostr 48 $(hblk)÷$(c1)÷$(c2)÷$(cl)) -@ setitem(echostr 49 $(hblk)ð$(c1)ð$(c2)ð$(cl)) -@ setitem(echostr 50 $(hblk)=$(c1)=$(c2)=$(cl)) -@ setitem(echostr 51 $(hblk)ö$(c1)ö$(c2)ö$(cl)) -## echostr crapple 52-57 added - crapple 8.06.05 -@ setitem(echostr 52 [S+Z]) -@ setitem(echostr 53 [A+C]) -@ setitem(echostr 54 ***) -@ setitem(echostr 55 [a+c]) -@ setitem(echostr 56 ===) -@ setitem(echostr 57 [a]) - -## ncomp formats -@ delarray(ncomp) -@ orig.ncomp=format_nick_comp -@ setitem(ncomp 0 !) -@ setitem(ncomp 1 :) -@ setitem(ncomp 2 :) -@ setitem(ncomp 3 :) -@ setitem(ncomp 4 .) -@ setitem(ncomp 5 .) -@ setitem(ncomp 6 .) -@ setitem(ncomp 7 ,) -@ setitem(ncomp 8 ,) -@ setitem(ncomp 9 ,) -@ setitem(ncomp 10 ;) -@ setitem(ncomp 11 -) -@ setitem(ncomp 12 ;) -@ setitem(ncomp 13 -) -@ setitem(ncomp 14 ,) -@ setitem(ncomp 15 :) -@ setitem(ncomp 16 ;) -@ setitem(ncomp 17 - ) -## ncomp 18-19 added - phuzion - 12.04.99 -@ setitem(ncomp 18 > ) -@ setitem(ncomp 19 > ) -@ setitem(ncomp 20 |>) -@ setitem(ncomp 21 ->) - -## sv formats -@ delarray(svform) -@ setitem(svform 0 !) -@ setitem(svform 1 $$word(0 $info(v))/$$sar(g/ /./$afterw(epic4 $info(v)))[$$info(i)] $$sar(g/././$tolower($uname())) $$sar(g/././$(a.ver)/$(a.rel)) $$scdesc) -@ setitem(svform 2 $$sar(g/././$(a.ver)/$(a.rel)) $$tolower($msar(g/././-/-/$J))[$$info(i)] $$scdesc) -@ setitem(svform 3 ircii/$$word(0 $info(v))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$sar(g/././$tolower($uname()))\($uname(%n)\) $$sar(g/././$(a.ver)/$(a.rel))) -@ setitem(svform 4 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$sar(g/././$(a.ver)\($(a.rel))\) $$scdesc) -@ setitem(svform 5 ircII $$toupper($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$uname() $$a.ver/$$a.rel) -@ setitem(svform 6 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$sar(g/././$tolower($uname()))\($uname(%n)\) $$sar(g/././$(a.ver)[$(a.rel))] $$scdesc) -@ setitem(svform 7 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$(a.ver)<$$(a.rel)> - ..$$strip(\(\) $scdesc)) -@ setitem(svform 8 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] : $$tolower($uname()) [$$(a.ver)$$(a.rel)]) -@ setitem(svform 9 $word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$tolower($uname()) $$a.ver/$$a.rel) -@ setitem(svform 10 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$(a.ver)$$sar(g/././$(a.rel)) ) -@ setitem(svform 11 $$(a.ver)$$sar(g/././$(a.rel)) $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)]) -@ setitem(svform 12 $$(a.ver)[$$(a.rel)] $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)]) -##svform 13-15 added - phuzion - 12.04.99 -- 16 added 12.05.99 -@ setitem(svform 13 $$word(0 $info(v))/$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$tolower($uname(%s)-$uname(%%r)) - amnesiac/$$(a.rel)) -@ setitem(svform 14 $$toupper($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$uname(%s)-$$uname(%%r) - amnesiac!$$(a.rel)) -@ setitem(svform 15 $$toupper($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$uname(%s)-$$uname(%%r) - amnesiac/$$(a.rel)) -@ setitem(svform 16 $$tolower($word(0 $info(v)))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] - $$tolower($uname(%s))-$$uname(%%r) - amnesiac/$$(a.rel)) -@ setitem(svform 17 ..$$word(0 $info(v))!$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$$info(i)] $$tolower($uname()) \\\($$a.ver/$$a.rel\\\) $$scdesc) -@ setitem(svform 18 $$sar(g/././$word(0 $info(v))/$word(1 $info(v)).$word(2 $info(v))).$$word(3 $info(v))[$$info(i)] $$tolower($sar(g/././$uname())) $$a.ver/$$sar(g/././$a.rel)) -##svform 19-20 added - zak - 7/30/05 - 21-26 -- fake version stuff. -@ setitem(svform 19 ircII $J $uname()) -@ setitem(svform 20 ircII $J[$info(i)] $uname()) -@ setitem(svform 21 ircii/$$word(0 $info(v))-$$word(1 $info(v)).$$word(2 $info(v)).$$word(3 $info(v))[$info(i)] sunos 5.10(insanity)amnesiac/$$(a.rel)) -@ setitem(svform 22 irssi v0.8.10-rc5 - running on OpenBSD Sparc64) -@ setitem(svform 23 ircII 20050423+ScrollZ 1.9.5 (19.12.2004)+Cdcc v1.8+OperMods v1.0 by acidflash - clear(01g))) -@ setitem(svform 24 ircII 20050423+ScrollZ 1.9.5 (19.12.2004)+Cdcc v1.8+OperMods v1.0 by acidflash - Almost there) -@ setitem(svform 25 BitchX-1.1-final+ by panasync - *IX :7A69!) -@ setitem(svform 26 mIRC v6.16 Khaled Mardam-Bey) - -## wall formats -@ delarray(wallform) -@ setitem(wallform 0 !) -@ setitem(wallform 1 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(c1)chanwall$$(hblk)-$(cl)$$1$$(hblk)/$$(cl)$$2$$(hblk)\\\)$$(cl) $$3-) -@ setitem(wallform 2 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\($$(hwht)*$$(c1)\\\) $$(c1)\\\($$(cl)$$1$$(hblk)/$$(hwht)$$2$$(c1)\\\)$$(cl) $$3-) -@ setitem(wallform 3 $$fparse(format_timestamp_some $($_timess))$$(cl)[$$(hgrn)BX-Wall$$(cl)/$$(hwht)$$2:$$1$$(cl)] $$3-) -@ setitem(wallform 4 $$fparse(format_timestamp_some $($_timess))$$(c1)[$$(hwht)w$$(cl)all$$(c1)/$$(cl)$$1$$(hblk):$$(cl)$$2$$(c1)]$$(cl) $$3-) -@ setitem(wallform 5 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wa%nmn%K/%nwall%K[%c$$1%K:%c$$2%K]\\\)%n $$3-) -@ setitem(wallform 6 $$fparse(format_timestamp_some $($_timess))%c<%Ka%K!%Ww%nall%c\\\(%n$$1%K/%n$$2%c\\\)>%n $$3-) -@ setitem(wallform 7 $$fparse(format_timestamp_some $($_timess))%K(%Wa%K/%nwall%K) [%n$$1%K:%n$$2%K]%n $$3-) -@ setitem(wallform 8 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wa%nmn%K/%nwall%K\\\(%c$$1%K/%c$$2%K\\\)]%n $$3-) -@ setitem(wallform 9 $$fparse(format_timestamp_some $($_timess))$$(hblk)[$$(c2)+$$(c1)o$$(hblk)] [$$(cyn)$$1$$(hblk)/$$(cl)$$2$$(hblk)]$$(cl) $$3-) -@ setitem(wallform 10 $$fparse(format_timestamp_some $($_timess))%K[%c*%C*%K] [%c$$1%K!%n$$2%K]%n $$3-) -@ setitem(wallform 11 $$fparse(format_timestamp_some $($_timess))[$$1!$$2] $$3-) -@ setitem(wallform 12 -*@$$2*-> $$3-) - -## bwall foramts -@ delarray(bwallform) -@ setitem(bwallform 0 !) -@ setitem(bwallform 1 $$fparse(format_timestamp_some $($_timess))$$(hblk)\\\($$(c1)chanwall$$(hblk)-$$(cl)$$N$$(hblk)/$$(cl)$$C$$(hblk)\\\)$$(cl) $$1-) -@ setitem(bwallform 2 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\($$(hwht)*$$(c1)\\\) $$(c1)\\\($$(cl)$$N$$(hblk)/$$(hwht)$$C$$(c1)\\\)$$(cl) $$1-) -@ setitem(bwallform 3 $$fparse(format_timestamp_some $($_timess))$$(cl)[$$(hgrn)BX-Wall$$(cl)/$$(hwht)$$C:*$$(cl)] $$1-) -@ setitem(bwallform 4 $$fparse(format_timestamp_some $($_timess))$$(c1)[$$(hwht)w$$(cl)all$$(c1)/$$(cl)$$N$$(hblk):$$(cl)$$C$$(c1)]$$(cl) $$1-) -@ setitem(bwallform 5 $$fparse(format_timestamp_some $($_timess))%K\\\(%Wa%K/%nwall%K[%c$$N%K:%c$$C%K]\\\)%n $$1-) -@ setitem(bwallform 6 $$fparse(format_timestamp_some $($_timess))%c<%Ka%K!%Ww%nall%c\\\(%n$$N%K/%n$$C%c\\\)>%n $$1-) -@ setitem(bwallform 7 $$fparse(format_timestamp_some $($_timess))%K(%Wa%nmn%K/%nwall%K) [%n$$N%K:%n$$C%K]%n $$1-) -@ setitem(bwallform 8 $$fparse(format_timestamp_some $($_timess))%K.%c.%K[%Wa%nmn%K/%nwall%K\\\(%c$$N%K/%c$$C%K\\\)]%n $$1-) -@ setitem(bwallform 9 $$fparse(format_timestamp_some $($_timess))$$(hblk)[$$(c2)+$$(c1)o$$(hblk)] [$$(cyn)$$N$$(hblk)/$$(cl)$$C$$(hblk)]$$(cl) $$1-) -@ setitem(bwallform 10 $$fparse(format_timestamp_some $($_timess))%K[%c*%C*%K] [%c$$N%K!%n$$C%K]%n $$1-) -@ setitem(bwallform 11 $$fparse(format_timestamp_some $($_timess))[$$N!$$C] $$1-) -@ setitem(bwallform 12 [$$N!$$C] $$1-) - -## away formats -@ delarray(awayform) -@ setitem(awayform 0 !) -@ setitem(awayform 1 [a!l/$$(awayl).p/$$(togpager)]) -@ setitem(awayform 2 [a|l!$$(awayl).p!$$(togpager)]) -@ setitem(awayform 3 [ac/l:$$(awayl) p:$$(togpager)]) -@ setitem(awayform 4 \\\(log/$$(awayl).page/$$(togpager)\)) -@ setitem(awayform 5 \\\(log!$$(awayl).page!$$(togpager)\)) -@ setitem(awayform 6 \[log/$$(awayl).page/$$(togpager)\]) -@ setitem(awayform 7 \[log!$$(awayl).page!$$(togpager)\]) -@ setitem(awayform 8 \(+lp\)) -@ setitem(awayform 9 ) -## 10-12 - crapple 8.30.05 -@ setitem(awayform 10 [BX-MsgLog On]) -@ setitem(awayform 11 [l/on p/off]) -@ setitem(awayform 12 (log:on/page:off)) - -## action formats -@ delarray(actform) -@ setitem(actform 0 !) -@ setitem(actform 1 $$fparse(format_timestamp_some $($_timess))$$zt $$(hwht)$$1 $$(cl)$$3-) -@ setitem(actform 2 $$fparse(format_timestamp_some $($_timess))$$(hblk)ð $$(hyel)$$1/$$2 $$(cl)$$3-) -@ setitem(actform 3 $$fparse(format_timestamp_some $($_timess))* $$1 $$3-) -@ setitem(actform 4 * $$1 $$3-) - -## action other formats -@ delarray(actoform) -@ setitem(actoform 0 !) -@ setitem(actoform 1 $$fparse(format_timestamp_some $($_timess))$$zt $$(hwht)$$1$$(hblk)!$$(cl)$$2 $$3-) -@ setitem(actoform 2 $$fparse(format_timestamp_some $($_timess))$$(hblk)* $$(cl)>$$(cyn)$$1 $$(cl)$$2 $$3-) -@ setitem(actoform 3 $$fparse(format_timestamp_some $($_timess))* $$1:$$2 $$3-) -@ setitem(actoform 4 * $$1:$$2 $$3-) - -## describe formats -@ delarray(descform) -@ setitem(descform 0 !) -@ setitem(descform 1 $$fparse(format_timestamp_some $($_timess))$$(c2)$$1$$(hblk)/$$(cl)$$2$$(cl) $$3-) -@ setitem(descform 2 $$fparse(format_timestamp_some $($_timess))*> $$1 $$3-) -@ setitem(descform 3 *> $$1 $$3-) - -## sent describe formats -@ delarray(sdescform) -@ setitem(sdescform 0 !) -@ setitem(sdescform 1 $$fparse(format_timestamp_some $($_timess))$$(cl)-> $$(hwht)$$1 $$(c3)$$N $$(cl)$$3-) -@ setitem(sdescform 2 $$fparse(format_timestamp_some $($_timess))* -> $$1: $$N $$3-) -@ setitem(sdescform 3 * -> $$1: $$N $$3-) - -## public notice formats -@ delarray(pubnotform) -@ setitem(pubnotform 0 !) -@ setitem(pubnotform 1 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K:%n$$2%n $$3-) -@ setitem(pubnotform 2 $$fparse(format_timestamp_some $($_timess))-$$1:$$2- $$3-) -@ setitem(pubnotform 3 -$$1:$$2- $$3-) - -## who formats -@ delarray(whoform) -@ setitem(whoform 0 !) -@ setitem(whoform 1 %K[%C³%K] %c$$[10]center(10 $2) %K\\\($$[35]center(35 %n$4%W@%n$5)%K\\\) %K[%n$$[3]3%K] [%n$$6%m/%c$$7%K]) -@ setitem(whoform 2 $$[16]1 $$[9]2 $$[4]3 $$4@$$5 $$7-) -@ setitem(whoform 3 %Y$$[10]1 %W$$[10]2%w %c$$[3]3 %w$$4%R@%w$$5 \\\($$8-\\\) \\\($$6\\\)) - - -## who footers -@ delarray(whofootform) -@ setitem(whofootform 0 !) -@ setitem(whofootform 1 ÀÄÄÄÄÄ---%cÄ%C--%cÄÄ%C-%cÄÄÄÄÄÄ---%KÄ%c--%KÄÄ%c-%KÄÄÄÄÄÄÄÄÄ--- -- -) -@ setitem(whofootform 2 *** $$1-) -@ setitem(whofootform 3 *** %Y$$1:%w %W$$2%w $$3-) - -## nick change formats -violence -@ delarray(nickform) -@ setitem(nickform 0 !) -@ setitem(nickform 1 $$G %w$$1 %nis now known as %m$$2) -@ setitem(nickform 2 $$G %w$$1 %nis now known as %m$$2 %n$$Z) -@ setitem(nickform 3 $$G %c$$1 %nis now known as %m$$2) -@ setitem(nickform 4 $$G %c$$1 %nis now known as %m$$2 %n$$Z) -@ setitem(nickform 5 $$G %g$$1 %nis now known as %G$$2) -@ setitem(nickform 6 $$G %g$$1 %nis now known as %G$$2 %n$$Z) -@ setitem(nickform 7 $$G %nnick change %K\\\(%c$$1 %K-> %m$$2%K\\\)) -@ setitem(nickform 8 $$G %nnick change %K\\\(%c$$1 %K-> %m$$2%K\\\) %n$$Z) -@ setitem(nickform 9 $$G %nnick change %K\\\(%g$$1 %K-> %G$$2%K\\\)) -@ setitem(nickform 10 $$G %nnick change %K\\\(%g$$1 %K-> %G$$2%K\\\) %n$$Z) -@ setitem(nickform 11 $$fparse(format_timestamp_some $($_timess))$$G %c$$1%n is now known as %m$$2) -@ setitem(nickform 12 $$fparse(format_timestamp_some $($_timess))$$G %W$$1 %nis now known as %m$$2) -@ setitem(nickform 13 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%c$$1 %K-> %m$$2%K\\\)) -@ setitem(nickform 14 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%W$$1 %K-> %m$$2%K\\\)) -@ setitem(nickform 15 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%W$$1 %K-> %W$$2%K\\\)) -@ setitem(nickform 16 $$G $$1 is now known as $$2) - -## timestamp formats -crapple -@ delarray(timeform) -@ setitem(timeform 0 !) -@ setitem(timeform 1 %K[%n$$Z%K]%n ) -@ setitem(timeform 2 %K[%n$$strftime($time()%X)%K]%n ) -@ setitem(timeform 3 [$$Z] ) -@ setitem(timeform 4 [$$strftime($time()%X)] ) -@ setitem(timeform 5 $$Z%c|%n ) -@ setitem(timeform 6 $$strftime($time()%X)%c|%n ) -@ setitem(timeform 7 $$Z ) -@ setitem(timeform 8 $$strftime($time()%X) ) -@ setitem(timeform 9 $$Z| ) -@ setitem(timeform 10 $$strftime($time()%X)| ) -@ setitem(timeform 11 $$Z%c|%n) -@ setitem(timeform 12 $$strftime($time()%X)%c|%n) -@ setitem(timeform 13 %K[%n$$Z%K]%n) -@ setitem(timeform 14 %K[%n$$strftime($time()%X)%K]%n) - -## kick formats -adam 9.7.05 -## $1 = kicked $2 = kickee $3 = channel $4+ = message -@ delarray(kickform) -@ setitem(kickform 0 !) -@ setitem(kickform 1 $$G $$1 was kicked off $$3 by $$(c3)$$2 %K\\\(%n$$4-%K\\\)) -@ setitem(kickform 2 $$fparse(format_timestamp_some $($_timess))$$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) -@ setitem(kickform 3 $$G $$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) -@ setitem(kickform 4 $$fparse(format_timestamp_some $($_timess))$$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) -@ setitem(kickform 5 $$fparse(format_timestamp_some $($_timess))%K[%nkick%K/%n$$3%K]%n $$1 by $$2 %K[%n$$4-%K]%n) -@ setitem(kickform 6 $$G $$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Fri Oct 28 10:04:36 2005 +++ amn/core/sets.m Wed Nov 9 22:13:40 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[3] +@rel_id=[4] @a.rel=[1.2d r/$rel_id] @a.date=[20051020] @_ss=[15] Date: Wed, 9 Nov 2005 22:29:02 -0500 (EST) From: zak@ircii.org (Zak) Log message: -add a random oper whois requested by xavier. Modified files: core/fsets.m //zak ---------------------- diff included ---------------------- diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Tue Nov 8 16:41:51 2005 +++ amn/core/fsets.m Wed Nov 9 22:27:53 2005 @@ -246,7 +246,8 @@ @ rcl.23 = [wants you to bend over] @ rcl.24 = [voted for Bush] @ rcl.25 = ['s face is more plastic than flesh] - $rcl[$rand(26)] + @ rcl.26 = ['s nick got unjuped when services.xo died] + $rcl[$rand(27)] ^randcl xecho $fparse(format_whois_operator $1 $rcl[$rand(26)]) } Date: Wed, 9 Nov 2005 22:32:20 -0500 (EST) From: zak@ircii.org (Zak) Log message: -oops. Modified files: core/fsets.m //zak ---------------------- diff included ---------------------- diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Wed Nov 9 22:27:53 2005 +++ amn/core/fsets.m Wed Nov 9 22:31:57 2005 @@ -249,7 +249,7 @@ @ rcl.26 = ['s nick got unjuped when services.xo died] $rcl[$rand(27)] ^randcl -xecho $fparse(format_whois_operator $1 $rcl[$rand(26)]) +xecho $fparse(format_whois_operator $1 $rcl[$rand(27)]) } ^on ^401 * { xecho $fparse(format_whois_header) From: Kreca Date: Wed, 16 Nov 2005 00:46:49 +0100 (CET) Hi guys, below is a diff with the changes I've made to the /config so far I'm not able to commit it until all sets have been changed to the new format I would appriceate some feedback, so if you're interested to know how it looks apply the patch. Currently the only vars that's of any interest is the configs under config protect to try them out type /config and /config protect a | /config protect b | /config protect c TODO: -Convert all the rest configs (sprot and *protect are done) -Upon /delmod the arrays should be refreshed to not show settings for unloaded modules I would appreciate some feedback! -kreca diff -aruN amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Tue Oct 11 02:51:38 2005 +++ amn/core/bans.m Tue Nov 15 23:53:45 2005 @@ -7,49 +7,41 @@ alias tban { ^on 367 - ^on ^367 * { - @setitem(bans.$1 $numitems(bans.$1) $2-) + @setitem(bans.$1 $numitems(bans.$1) $2-) } - ^on ^368 * { - on 367 - - if (numitems(bans.$2)) { - @chan=[$2] - for (@:xx=0,xx0 && cc<=numitems(bans.$chan)) { - - mode $chan -b $word(0 $getitem(bans.$chan ${cc-1})) - - } - - } + ^on ^368 * { + on 367 - + if (numitems(bans.$2)) { + @chan=[$2] + for (@:xx=0,xx0 && cc<=numitems(bans.$chan)) { + mode $chan -b $word(0 $getitem(bans.$chan ${cc-1})) } - - - @delarray(bans.$chan) - @chan=[] - ^on 368 - - - } - } - { - ^on 368 - + } } + @delarray(bans.$chan) + @chan=[] + ^on 368 - + } + }{ + ^on 368 - + } } ^mode $C b @@ -58,14 +50,14 @@ alias banstat { if (![$0]) { ^mode $C b - }{ - ^mode $0 b} - ^on ^367 * { - //echo $(hblk)[$(cl)$[15]1$(hblk)] [$(cl)$[9]before(! $3)$(hblk)] [$(cl)$2$(hblk)] $(cl)$word(3 $stime($4)) - } - wait -cmd ^on ^367 -"*" - - } + }{ + ^mode $0 b + } + ^on ^367 * { + //echo $(hblk)[$(cl)$[15]1$(hblk)] [$(cl)$[9]before(! $3)$(hblk)] [$(cl)$2$(hblk)] $(cl)$word(3 $stime($4)) + } + wait -cmd ^on ^367 -"*" +} alias takeall if (![$0]) { ^on ^367 * { @@ -74,7 +66,7 @@ for (@:xx=0,xx<4,@:xx+=4) { mode $C -bbbb $getitem(ubans $xx) $getitem(ubans ${xx+1}) $getitem(ubans ${xx+2}) $getitem(ubans ${xx+3}) } - @delarray(ubans) + @delarray(ubans) } } ^on ^368 * { @@ -92,70 +84,107 @@ if (match(*!*@* $0)) { mode $C -b $0 }{ - ^on ^367 * { - @setitem(ubans $numitems(ubans) $2) + ^on ^367 * { + @setitem(ubans $numitems(ubans) $2) } - ^mode $C +b - ^userhost $0 -cmd { - if (rmatchitem(ubans $0!$3@$4) == -2) { - }{ - ^mode $C -b $getitem(ubans $rmatchitem(ubans $0!$3@$4)) - } - - @delarray(ubans) - } - ^on ^368 ^* + ^mode $C +b + ^userhost $0 -cmd { + if (rmatchitem(ubans $0!$3@$4) == -2) { + }{ + ^mode $C -b $getitem(ubans $rmatchitem(ubans $0!$3@$4)) + } + @delarray(ubans) + } + ^on ^368 ^* } } -alias kob { - if (![$0]) { - xecho -v $acban kick on ban set to "$kickonban"} - if (match($0 on off)) {@kickonban = [$0] - xecho -v $acban kick on ban set to "$kickonban" - }{ - if ([$0]&&!match($0 on off)) { - xecho -v $acban invalid choice - } - } - - } -alias kops { - if (![$0]) { - xecho -v $acban kick ops on ban set to "$kickops"} - if (match($0 on off)) {@kickops = [$0] - xecho -v $acban kick ops on ban set to "$kickops" - }{ - if ([$0]&&!match($0 on off)) { - xecho -v $acban invalid choice - } - } - - } ^on #-mode_stripped 43 "% % +b*" { - if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { - fe ($onchannel($1)) n1 { + if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { + fe ($onchannel($1)) n1 { @bannick = pattern($3 $n1!$userhost($n1)) - if (kickops ==[on]) { - if (bannick) { - kick $1 $before(! $bannick) banned - } + if (kickops ==[on]) { + if (bannick) { + kick $1 $before(! $bannick) banned + } + } + if (kickops ==[off] && !ischanop($n1 $1)) { + if (bannick) { + kick $1 $before(! $bannick) banned } - if (kickops ==[off] && !ischanop($n1 $1)) { - if (bannick) { - kick $1 $before(! $bannick) banned - } } - } - - } + } + } + } +} + +# configurations +alias kob { + config.kickonban -s $* +} + +alias kops { + config.kickops -s $* +} + +alias bantype { + config.bantype -s $* +} + +alias config.kickops { + if ( [$0] == [-r] ) + { + return $kickops + } else if ([$0] == [-s]) { + if (# == 1) { + xecho -v $acban kick ops on ban set to "$kickops" + }{ + if (match($1 on off)) { + @kickops = [$1] + xecho -v $acban kick ops on ban set to "$kickops" + }{ + xecho -v $acban invalid choice + + } } + } +} -alias _selfban { - if ([$0]==[ON] || [$0]==[OFF]) { - @_ubanself = [$0] - xecho -v (sprot).. unban self set to $0 - }{ - xecho -v (sprot).. unban self set to $_ubanself +alias config.kickonban { + if ( [$0] == [-r] ) + { + return $kickonban + } else if ([$0] == [-s]) { + if (# == 1) { + xecho -v $acban kick on ban set to "$kickonban" + }{ + if (match($1 on off)) { + @kickonban = [$1] + xecho -v $acban kick on ban set to "$kickonban" + }{ + xecho -v $acban invalid choice + } + } } } + +## bantype config. [Norm/Better/Host/Domain] +alias config.bantype { + if ( [$0] == [-r] ) + { + return $bt_ + } else if ([$0] == [-s]) { + if (# == 1) { + xecho -v $acban bantype set to $bt_ + xecho -v $acban /bantype + }{ + switch ($1) { + (normal){@bt_=[normal];@_bt=6;xecho -v $acban bantype set to normal (n!*u@h.d n!*u@d.h)} + (better) {@bt_=[better];@_bt=3;xecho -v $acban bantype set to better (*!*u@*.d *!*u@d.*)} + (host) {@bt_=[host];@_bt=2;xecho -v $acban bantype set to host (*!*@h.d *!*@d.h)} + (domain) {@bt_=[domain];@_bt=4;xecho -v $acban bantype set to domain (*!*@*.d *!*@d.*)} + () {xecho -v $acban invalid choice } + } + } + } +} diff -aruN amn.orig/core/config amn/core/config --- amn.orig/core/config Mon Oct 3 05:01:33 2005 +++ amn/core/config Wed Nov 16 00:25:15 2005 @@ -1,28 +1,29 @@ # Copyright (c) 2003-2005 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. +/* cleararray oper cleararray away cleararray protect cleararray misc -eval osetitem protect (i) Kick on ban: [$(kickonban)] -eval osetitem protect (j) Kick ops: [$(kickops)] -eval osetitem protect (x) Ban Type: [$bt_] +eval osetitem protect kickonban Kick on ban: +eval osetitem protect kickops Kick ops: +eval osetitem protect bantype Ban Type: -eval osetitem misc (f) Auto-connect umode: [$getumode] -eval osetitem misc (h) Extended publics: [$(showop)] -eval osetitem misc (t) Timestamps: [$_tss] -eval osetitem misc (m) Dcc autoget: [$(autoget)] -eval osetitem misc (r) Pubstring: [$_pubnick] -eval osetitem misc (z) Double fixed window: [$(windowdoubles)] +eval osetitem misc getumode Auto-connect umode: +eval osetitem misc showop Extended publics: +eval osetitem misc timestamps Timestamps: +eval osetitem misc autoget Dcc autoget: +eval osetitem misc pubnick Pubstring: +eval osetitem misc windowdoubles Double fixed window: fe ($listarray(_mods)) n1 { if (n1 != [!] && fexist($(loadpath)modules/$(n1)/config)) { load $(loadpath)modules/$(n1)/config } } - +*/ eval aecho --------------------------= Away Settings =----------------------- printsection away eval aecho --------------------------= Protection Settings =----------------- diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Mon Oct 10 21:10:14 2005 +++ amn/core/config.m Wed Nov 16 00:27:50 2005 @@ -3,7 +3,7 @@ subpackage config alias setumode if (![$0]) {xecho -b current usermode set to: $getumode}{@ getumode = [$0];xecho -b usermodes set to: $getumode} -alias config { +alias oldconfig { @ :choice = [$1-] switch ($0) { @@ -36,6 +36,22 @@ # (5) {/savepath_ $choice} (*) {load $(loadpath)core/config;^//echo $G usage -> config setting>} }} +alias config { + if ( ! #) { + load $(loadpath)core/config + xecho -v $acban -> config
+ xecho -v $acban valid sections: + }{ + @:aname= [confa$0] + @:xx= ascii($1)-ascii(a) + @ :cur1 = getitem($aname $xx) + @:con1=word(0 $cur1) + eval @$$config.${con1}\(-s $2-\) + + } + + +} ## auto-bot password show toggle. undocumented unless ppl read this. alias bot_tog { @@ -82,13 +98,23 @@ { @aname= [confa$0] for (@xx=0, xx= numitems($aname) ) { @ :mod2 = [] } { - @ :mod2 = getitem($aname ${xx+1}) + @ :cur2=getitem($aname ${xx+1}) + @ :con2 = word(0 $cur2) + @ :mod2 = restw(1 $cur2) + @ :mod2 = [\($chr(${ascii(a)+xx+1})\) $mod2] + eval assign cval2 $$config.${con2}\(-r\) + @ :mod2= [$[27]mod2 [$cval2]] } if (strlen($mod1) < 35 && strlen($mod2)) { @@ -97,7 +123,6 @@ { @:mod1 = [$mod1 |] } - aecho $mod1 $mod2 } } @@ -136,22 +161,6 @@ ## end timestamp stuff. -## bantype config. [Norm/Better/Host/Domain] -alias bantype if (![$0]) { - xecho -b bantype set to $bt_ - xecho -b /bantype - }{ - - switch ($0) { - (normal) {@bt_=[normal];@_bt=6;xecho -b bantype set to normal (n!*u@h.d n!*u@d.h)} - (better) {@bt_=[better];@_bt=3;xecho -b bantype set to better (*!*u@*.d *!*u@d.*)} - (host) {@bt_=[host];@_bt=2;xecho -b bantype set to host (*!*@h.d *!*@d.h)} - (domain) {@bt_=[domain];@_bt=4;xecho -b bantype set to domain (*!*@*.d *!*@d.*)} - } - } - -## end bantype set. - ## auto-responses /resp1 /resp2 /resp3 /resp4 alias _pubn { if (![$0]) { @@ -195,3 +204,14 @@ alias resp4 _r4 $* ## end auto-response. + +eval osetitem protect kickonban Kick on ban: +eval osetitem protect kickops Kick ops: +eval osetitem protect bantype Ban Type: + +eval osetitem misc getumode Auto-connect umode: +eval osetitem misc showop Extended publics: +eval osetitem misc timestamps Timestamps: +eval osetitem misc autoget Dcc autoget: +eval osetitem misc pubnick Pubstring: +eval osetitem misc windowdoubles Double fixed window: diff -aruN amn.orig/core/mod.m amn/core/mod.m --- amn.orig/core/mod.m Tue Oct 11 02:51:38 2005 +++ amn/core/mod.m Wed Nov 16 00:35:50 2005 @@ -18,6 +18,9 @@ @setitem(_mods 0 !) @setitem(_mods $numitems(_mods) $a1) ^load $(loadpath)modules/$(a1)/$(a1).m + if (fexist($(loadpath)modules/$(n1)/config)) { + ^load $(loadpath)modules/$(n1)/config + } } xecho $acban loaded modules $_modules }{ @@ -26,6 +29,9 @@ @setitem(_mods 0 !) @setitem(_mods $numitems(_mods) $n1) ^load $(loadpath)modules/$(n1)/$(n1).m + if (fexist($(loadpath)modules/$(n1)/config)) { + ^load $(loadpath)modules/$(n1)/config + } ^push _mlist $n1 }{ xecho $acban $n1 module not found or already loaded. @@ -124,8 +130,11 @@ fe ($listarray(_mods)) n1 { if (n1 != [!]) { load $(loadpath)modules/$(n1)/$(n1).m - } - } + } + if (n1 != [!] && fexist($(loadpath)modules/$(n1)/config)) { + load $(loadpath)modules/$(n1)/config + } + } } alias mhelp modhelp diff -aruN amn.orig/modules/away/config amn/modules/away/config --- amn.orig/modules/away/config Tue Aug 30 09:55:02 2005 +++ amn/modules/away/config Tue Nov 15 22:55:41 2005 @@ -1,8 +1,8 @@ -eval osetitem away (a) A-setaway time: [$awayt] -eval osetitem away (g) A-setaway on/off: [$(togaway)] -eval osetitem away (e) A-msg: [$awayr] -eval osetitem away (n) A-pager: [$(togpager)] -eval osetitem away (b) A-log msgs: [$(msgl)] -eval osetitem away (c) A-log crap/miscs: [$(crapl)] -eval osetitem away (d) A-log notices: [$(notl)] -eval osetitem away (y) A-log dcc: [$(dccl)] +eval osetitem away A-setaway time: [$awayt] +eval osetitem away A-setaway on/off: [$(togaway)] +eval osetitem away A-msg: [$awayr] +eval osetitem away A-pager: [$(togpager)] +eval osetitem away A-log msgs: [$(msgl)] +eval osetitem away A-log crap/miscs: [$(crapl)] +eval osetitem away A-log notices: [$(notl)] +eval osetitem away A-log dcc: [$(dccl)] diff -aruN amn.orig/modules/flood/config amn/modules/flood/config --- amn.orig/modules/flood/config Wed May 25 22:24:30 2005 +++ amn/modules/flood/config Tue Nov 15 22:56:24 2005 @@ -1,2 +1,2 @@ -eval osetitem protect (k) Msgflood Sensor [$(msgfloodsensor)] -eval osetitem protect (l) Msgflood Timer: [$(mfloodtimer)] +eval osetitem protect Msgflood Sensor [$(msgfloodsensor)] +eval osetitem protect Msgflood Timer: [$(mfloodtimer)] diff -aruN amn.orig/modules/mjoin/config amn/modules/mjoin/config --- amn.orig/modules/mjoin/config Wed May 25 22:20:37 2005 +++ amn/modules/mjoin/config Tue Nov 15 22:56:59 2005 @@ -1 +1 @@ -eval osetitem misc (q) Auto-join new window: [$_jwin] +eval osetitem misc Auto-join new window: [$_jwin] diff -aruN amn.orig/modules/nlog/config amn/modules/nlog/config --- amn.orig/modules/nlog/config Fri Sep 2 23:15:19 2005 +++ amn/modules/nlog/config Tue Nov 15 22:56:11 2005 @@ -1,2 +1,2 @@ -eval osetitem misc (s) Log notify signoffs: [$nsolog] +eval osetitem misc Log notify signoffs: [$nsolog] diff -aruN amn.orig/modules/oper/config amn/modules/oper/config --- amn.orig/modules/oper/config Tue Aug 30 10:05:16 2005 +++ amn/modules/oper/config Tue Nov 15 22:56:43 2005 @@ -1,2 +1,2 @@ -eval osetitem oper (v) Oper modes with operview: [$_ovmode] -eval osetitem oper (u) Operview win size: [$_ovsize] +eval osetitem oper Oper modes with operview: [$_ovmode] +eval osetitem oper Operview win size: [$_ovsize] diff -aruN amn.orig/modules/orignick/config amn/modules/orignick/config --- amn.orig/modules/orignick/config Sat Aug 13 02:28:20 2005 +++ amn/modules/orignick/config Tue Nov 15 22:57:14 2005 @@ -1 +1 @@ -eval osetitem misc (p) Orignick Timer: [$(_ort)] +eval osetitem misc Orignick Timer: [$(_ort)] diff -aruN amn.orig/modules/sprot/config amn/modules/sprot/config --- amn.orig/modules/sprot/config Sun Jun 5 02:27:10 2005 +++ amn/modules/sprot/config Tue Nov 15 23:45:28 2005 @@ -1 +1 @@ -eval osetitem protect (w) Unbanself when banned [$_unbanself] +eval osetitem protect unbanself Unbanself when banned diff -aruN amn.orig/modules/sprot/sprot.m amn/modules/sprot/sprot.m --- amn.orig/modules/sprot/sprot.m Mon Oct 3 05:29:05 2005 +++ amn/modules/sprot/sprot.m Tue Nov 15 23:54:06 2005 @@ -18,3 +18,25 @@ } } } + +alias _selfban { + config.unbanself -s $* +} + +alias config.unbanself { + if ( [$0] == [-r] ) + { + return $_ubanself + } else if ([$0] == [-s]) { + if (# == 1) { + xecho -v (sprot).. unban self set to $_ubanself + }{ + if (match($1 on off)) { + @_ubanself = [$0] + xecho -v (sprot).. unban self set to $_ubanself + }{ + xecho -v $acban invalid choice + } + } + } +} diff -aruN amn.orig/modules/userlist/config amn/modules/userlist/config --- amn.orig/modules/userlist/config Wed May 25 22:23:05 2005 +++ amn/modules/userlist/config Tue Nov 15 22:57:37 2005 @@ -1 +1 @@ -eval osetitem protect (o) Auto-op delay Timer: [$_ss] +eval osetitem protect Auto-op delay Timer: [$_ss] Date: Wed, 16 Nov 2005 01:32:28 -0500 (EST) From: zak@ircii.org (Zak) Log message: -sync docs to reality... esp TODO-BUGS.. Modified files: TODO-BUGS docs/E5-KNOWNBUGS //zak ---------------------- diff included ---------------------- diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Tue Nov 8 17:25:32 2005 +++ amn/TODO-BUGS Wed Nov 16 01:30:15 2005 @@ -16,10 +16,13 @@ whatever it was set to works properly but it's kinda annoying when everything outputs at bk when it's not actually set to bk. -? NOTE: at least it may be possible that ratbox ircd's will output the -irriating damn away even when you have it silenced, perhaps there's a -workaround? //zak -? Havnt seen this, if you still receive it give me a tell //kreca +## higher priority todo. +-parse notify of you being umode +g when a person msg's you.. some info.. +[Alien88(dcc)] 718 <-- numeric +[Alien88(dcc)] wouldn't be bad to treat it as a message sorta +[Alien88(dcc)] i tend to loose them in channels a lot of times. <-- proplem +sample unparsed notice... +kreca kreca@euro.trash :is messaging you, and you have umode +g. -fixdouble/fixwin or equiv for doublestats -make userlist support /addchan #chan,#chan2,#chan3 we already support * @@ -27,16 +30,13 @@ and change the $match() to $rmatch() or something along those lines -better parses for /e /i outputs. --fix up arrays regarding description/publics /format x y z etc... - seems to be some confusion and not outputting backgrounded channels - on most available formats and other weirdness. -add a toggle to support bw or current theme(colors) in /relm and friends also make it reparse through current theme for consistecy during usage. -make /delchan #chan delete channel apparently some ppl are slow to understand the meaning of /delchan # so i guess we should add in this capability for users with that defect i.e Xavier. -## Higher priority requests. +## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. ## Procrastinated requests. @@ -68,6 +68,11 @@ NONE for 'some bugs' ## bugs fixed. / projects done. +11.16.05 - i think kreca fixed this a week ago.. +! fix up arrays regarding description/publics /format x y z etc... + seems to be some confusion and not outputting backgrounded channels + on most available formats and other weirdness. + 11.08.05 ## highest priority TODO. ! make away only output irritating static only once, 120 second idle timeout diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Wed Nov 9 22:27:53 2005 +++ amn/core/fsets.m Wed Nov 9 22:31:57 2005 @@ -249,7 +249,7 @@ @ rcl.26 = ['s nick got unjuped when services.xo died] $rcl[$rand(27)] ^randcl -xecho $fparse(format_whois_operator $1 $rcl[$rand(26)]) +xecho $fparse(format_whois_operator $1 $rcl[$rand(27)]) } ^on ^401 * { xecho $fparse(format_whois_header) diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Sun Nov 6 20:33:02 2005 +++ amn/docs/E5-KNOWNBUGS Wed Nov 16 01:20:03 2005 @@ -877,3 +877,4 @@ * Add a pd implementation of sdbm, make $dbmctl() use it. * Make configure warn harder if it looks like termcap/terminfo not found. * Normalize the sdbm code, so it fits in with the epic way of doing things. +* Fix several bogons in add_to_log, found by ce. From: Kreca Date: Thu, 17 Nov 2005 01:06:32 +0100 (CET) Hi guys, below is a diff with the changes I've made to the /config so far I'm not able to commit it until all sets have been changed to the new format I would appriceate some feedback, so if you're interested to know how it looks apply the patch. Currently the only vars that's of any interest is the configs under config protect to try them out type /config and /config protect a | /config protect b | /config protect c TODO: -Convert all the rest configs (sprot and *protect are done) -Upon /delmod the arrays should be refreshed to not show settings for unloaded modules I would appreciate some feedback! -kreca diff -aruN amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Tue Oct 11 02:51:38 2005 +++ amn/core/bans.m Tue Nov 15 23:53:45 2005 @@ -7,49 +7,41 @@ alias tban { ^on 367 - ^on ^367 * { - @setitem(bans.$1 $numitems(bans.$1) $2-) + @setitem(bans.$1 $numitems(bans.$1) $2-) } - ^on ^368 * { - on 367 - - if (numitems(bans.$2)) { - @chan=[$2] - for (@:xx=0,xx0 && cc<=numitems(bans.$chan)) { - - mode $chan -b $word(0 $getitem(bans.$chan ${cc-1})) - - } - - } + ^on ^368 * { + on 367 - + if (numitems(bans.$2)) { + @chan=[$2] + for (@:xx=0,xx0 && cc<=numitems(bans.$chan)) { + mode $chan -b $word(0 $getitem(bans.$chan ${cc-1})) } - - - @delarray(bans.$chan) - @chan=[] - ^on 368 - - - } - } - { - ^on 368 - + } } + @delarray(bans.$chan) + @chan=[] + ^on 368 - + } + }{ + ^on 368 - + } } ^mode $C b @@ -58,14 +50,14 @@ alias banstat { if (![$0]) { ^mode $C b - }{ - ^mode $0 b} - ^on ^367 * { - //echo $(hblk)[$(cl)$[15]1$(hblk)] [$(cl)$[9]before(! $3)$(hblk)] [$(cl)$2$(hblk)] $(cl)$word(3 $stime($4)) - } - wait -cmd ^on ^367 -"*" - - } + }{ + ^mode $0 b + } + ^on ^367 * { + //echo $(hblk)[$(cl)$[15]1$(hblk)] [$(cl)$[9]before(! $3)$(hblk)] [$(cl)$2$(hblk)] $(cl)$word(3 $stime($4)) + } + wait -cmd ^on ^367 -"*" +} alias takeall if (![$0]) { ^on ^367 * { @@ -74,7 +66,7 @@ for (@:xx=0,xx<4,@:xx+=4) { mode $C -bbbb $getitem(ubans $xx) $getitem(ubans ${xx+1}) $getitem(ubans ${xx+2}) $getitem(ubans ${xx+3}) } - @delarray(ubans) + @delarray(ubans) } } ^on ^368 * { @@ -92,70 +84,107 @@ if (match(*!*@* $0)) { mode $C -b $0 }{ - ^on ^367 * { - @setitem(ubans $numitems(ubans) $2) + ^on ^367 * { + @setitem(ubans $numitems(ubans) $2) } - ^mode $C +b - ^userhost $0 -cmd { - if (rmatchitem(ubans $0!$3@$4) == -2) { - }{ - ^mode $C -b $getitem(ubans $rmatchitem(ubans $0!$3@$4)) - } - - @delarray(ubans) - } - ^on ^368 ^* + ^mode $C +b + ^userhost $0 -cmd { + if (rmatchitem(ubans $0!$3@$4) == -2) { + }{ + ^mode $C -b $getitem(ubans $rmatchitem(ubans $0!$3@$4)) + } + @delarray(ubans) + } + ^on ^368 ^* } } -alias kob { - if (![$0]) { - xecho -v $acban kick on ban set to "$kickonban"} - if (match($0 on off)) {@kickonban = [$0] - xecho -v $acban kick on ban set to "$kickonban" - }{ - if ([$0]&&!match($0 on off)) { - xecho -v $acban invalid choice - } - } - - } -alias kops { - if (![$0]) { - xecho -v $acban kick ops on ban set to "$kickops"} - if (match($0 on off)) {@kickops = [$0] - xecho -v $acban kick ops on ban set to "$kickops" - }{ - if ([$0]&&!match($0 on off)) { - xecho -v $acban invalid choice - } - } - - } ^on #-mode_stripped 43 "% % +b*" { - if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { - fe ($onchannel($1)) n1 { + if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { + fe ($onchannel($1)) n1 { @bannick = pattern($3 $n1!$userhost($n1)) - if (kickops ==[on]) { - if (bannick) { - kick $1 $before(! $bannick) banned - } + if (kickops ==[on]) { + if (bannick) { + kick $1 $before(! $bannick) banned + } + } + if (kickops ==[off] && !ischanop($n1 $1)) { + if (bannick) { + kick $1 $before(! $bannick) banned } - if (kickops ==[off] && !ischanop($n1 $1)) { - if (bannick) { - kick $1 $before(! $bannick) banned - } } - } - - } + } + } + } +} + +# configurations +alias kob { + config.kickonban -s $* +} + +alias kops { + config.kickops -s $* +} + +alias bantype { + config.bantype -s $* +} + +alias config.kickops { + if ( [$0] == [-r] ) + { + return $kickops + } else if ([$0] == [-s]) { + if (# == 1) { + xecho -v $acban kick ops on ban set to "$kickops" + }{ + if (match($1 on off)) { + @kickops = [$1] + xecho -v $acban kick ops on ban set to "$kickops" + }{ + xecho -v $acban invalid choice + + } } + } +} -alias _selfban { - if ([$0]==[ON] || [$0]==[OFF]) { - @_ubanself = [$0] - xecho -v (sprot).. unban self set to $0 - }{ - xecho -v (sprot).. unban self set to $_ubanself +alias config.kickonban { + if ( [$0] == [-r] ) + { + return $kickonban + } else if ([$0] == [-s]) { + if (# == 1) { + xecho -v $acban kick on ban set to "$kickonban" + }{ + if (match($1 on off)) { + @kickonban = [$1] + xecho -v $acban kick on ban set to "$kickonban" + }{ + xecho -v $acban invalid choice + } + } } } + +## bantype config. [Norm/Better/Host/Domain] +alias config.bantype { + if ( [$0] == [-r] ) + { + return $bt_ + } else if ([$0] == [-s]) { + if (# == 1) { + xecho -v $acban bantype set to $bt_ + xecho -v $acban /bantype + }{ + switch ($1) { + (normal){@bt_=[normal];@_bt=6;xecho -v $acban bantype set to normal (n!*u@h.d n!*u@d.h)} + (better) {@bt_=[better];@_bt=3;xecho -v $acban bantype set to better (*!*u@*.d *!*u@d.*)} + (host) {@bt_=[host];@_bt=2;xecho -v $acban bantype set to host (*!*@h.d *!*@d.h)} + (domain) {@bt_=[domain];@_bt=4;xecho -v $acban bantype set to domain (*!*@*.d *!*@d.*)} + () {xecho -v $acban invalid choice } + } + } + } +} diff -aruN amn.orig/core/config amn/core/config --- amn.orig/core/config Mon Oct 3 05:01:33 2005 +++ amn/core/config Wed Nov 16 00:25:15 2005 @@ -1,28 +1,29 @@ # Copyright (c) 2003-2005 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. +/* cleararray oper cleararray away cleararray protect cleararray misc -eval osetitem protect (i) Kick on ban: [$(kickonban)] -eval osetitem protect (j) Kick ops: [$(kickops)] -eval osetitem protect (x) Ban Type: [$bt_] +eval osetitem protect kickonban Kick on ban: +eval osetitem protect kickops Kick ops: +eval osetitem protect bantype Ban Type: -eval osetitem misc (f) Auto-connect umode: [$getumode] -eval osetitem misc (h) Extended publics: [$(showop)] -eval osetitem misc (t) Timestamps: [$_tss] -eval osetitem misc (m) Dcc autoget: [$(autoget)] -eval osetitem misc (r) Pubstring: [$_pubnick] -eval osetitem misc (z) Double fixed window: [$(windowdoubles)] +eval osetitem misc getumode Auto-connect umode: +eval osetitem misc showop Extended publics: +eval osetitem misc timestamps Timestamps: +eval osetitem misc autoget Dcc autoget: +eval osetitem misc pubnick Pubstring: +eval osetitem misc windowdoubles Double fixed window: fe ($listarray(_mods)) n1 { if (n1 != [!] && fexist($(loadpath)modules/$(n1)/config)) { load $(loadpath)modules/$(n1)/config } } - +*/ eval aecho --------------------------= Away Settings =----------------------- printsection away eval aecho --------------------------= Protection Settings =----------------- diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Mon Oct 10 21:10:14 2005 +++ amn/core/config.m Wed Nov 16 00:27:50 2005 @@ -3,7 +3,7 @@ subpackage config alias setumode if (![$0]) {xecho -b current usermode set to: $getumode}{@ getumode = [$0];xecho -b usermodes set to: $getumode} -alias config { +alias oldconfig { @ :choice = [$1-] switch ($0) { @@ -36,6 +36,22 @@ # (5) {/savepath_ $choice} (*) {load $(loadpath)core/config;^//echo $G usage -> config setting>} }} +alias config { + if ( ! #) { + load $(loadpath)core/config + xecho -v $acban -> config
+ xecho -v $acban valid sections: + }{ + @:aname= [confa$0] + @:xx= ascii($1)-ascii(a) + @ :cur1 = getitem($aname $xx) + @:con1=word(0 $cur1) + eval @$$config.${con1}\(-s $2-\) + + } + + +} ## auto-bot password show toggle. undocumented unless ppl read this. alias bot_tog { @@ -82,13 +98,23 @@ { @aname= [confa$0] for (@xx=0, xx= numitems($aname) ) { @ :mod2 = [] } { - @ :mod2 = getitem($aname ${xx+1}) + @ :cur2=getitem($aname ${xx+1}) + @ :con2 = word(0 $cur2) + @ :mod2 = restw(1 $cur2) + @ :mod2 = [\($chr(${ascii(a)+xx+1})\) $mod2] + eval assign cval2 $$config.${con2}\(-r\) + @ :mod2= [$[27]mod2 [$cval2]] } if (strlen($mod1) < 35 && strlen($mod2)) { @@ -97,7 +123,6 @@ { @:mod1 = [$mod1 |] } - aecho $mod1 $mod2 } } @@ -136,22 +161,6 @@ ## end timestamp stuff. -## bantype config. [Norm/Better/Host/Domain] -alias bantype if (![$0]) { - xecho -b bantype set to $bt_ - xecho -b /bantype - }{ - - switch ($0) { - (normal) {@bt_=[normal];@_bt=6;xecho -b bantype set to normal (n!*u@h.d n!*u@d.h)} - (better) {@bt_=[better];@_bt=3;xecho -b bantype set to better (*!*u@*.d *!*u@d.*)} - (host) {@bt_=[host];@_bt=2;xecho -b bantype set to host (*!*@h.d *!*@d.h)} - (domain) {@bt_=[domain];@_bt=4;xecho -b bantype set to domain (*!*@*.d *!*@d.*)} - } - } - -## end bantype set. - ## auto-responses /resp1 /resp2 /resp3 /resp4 alias _pubn { if (![$0]) { @@ -195,3 +204,14 @@ alias resp4 _r4 $* ## end auto-response. + +eval osetitem protect kickonban Kick on ban: +eval osetitem protect kickops Kick ops: +eval osetitem protect bantype Ban Type: + +eval osetitem misc getumode Auto-connect umode: +eval osetitem misc showop Extended publics: +eval osetitem misc timestamps Timestamps: +eval osetitem misc autoget Dcc autoget: +eval osetitem misc pubnick Pubstring: +eval osetitem misc windowdoubles Double fixed window: diff -aruN amn.orig/core/mod.m amn/core/mod.m --- amn.orig/core/mod.m Tue Oct 11 02:51:38 2005 +++ amn/core/mod.m Wed Nov 16 00:35:50 2005 @@ -18,6 +18,9 @@ @setitem(_mods 0 !) @setitem(_mods $numitems(_mods) $a1) ^load $(loadpath)modules/$(a1)/$(a1).m + if (fexist($(loadpath)modules/$(n1)/config)) { + ^load $(loadpath)modules/$(n1)/config + } } xecho $acban loaded modules $_modules }{ @@ -26,6 +29,9 @@ @setitem(_mods 0 !) @setitem(_mods $numitems(_mods) $n1) ^load $(loadpath)modules/$(n1)/$(n1).m + if (fexist($(loadpath)modules/$(n1)/config)) { + ^load $(loadpath)modules/$(n1)/config + } ^push _mlist $n1 }{ xecho $acban $n1 module not found or already loaded. @@ -124,8 +130,11 @@ fe ($listarray(_mods)) n1 { if (n1 != [!]) { load $(loadpath)modules/$(n1)/$(n1).m - } - } + } + if (n1 != [!] && fexist($(loadpath)modules/$(n1)/config)) { + load $(loadpath)modules/$(n1)/config + } + } } alias mhelp modhelp diff -aruN amn.orig/modules/away/config amn/modules/away/config --- amn.orig/modules/away/config Tue Aug 30 09:55:02 2005 +++ amn/modules/away/config Tue Nov 15 22:55:41 2005 @@ -1,8 +1,8 @@ -eval osetitem away (a) A-setaway time: [$awayt] -eval osetitem away (g) A-setaway on/off: [$(togaway)] -eval osetitem away (e) A-msg: [$awayr] -eval osetitem away (n) A-pager: [$(togpager)] -eval osetitem away (b) A-log msgs: [$(msgl)] -eval osetitem away (c) A-log crap/miscs: [$(crapl)] -eval osetitem away (d) A-log notices: [$(notl)] -eval osetitem away (y) A-log dcc: [$(dccl)] +eval osetitem away A-setaway time: [$awayt] +eval osetitem away A-setaway on/off: [$(togaway)] +eval osetitem away A-msg: [$awayr] +eval osetitem away A-pager: [$(togpager)] +eval osetitem away A-log msgs: [$(msgl)] +eval osetitem away A-log crap/miscs: [$(crapl)] +eval osetitem away A-log notices: [$(notl)] +eval osetitem away A-log dcc: [$(dccl)] diff -aruN amn.orig/modules/flood/config amn/modules/flood/config --- amn.orig/modules/flood/config Wed May 25 22:24:30 2005 +++ amn/modules/flood/config Tue Nov 15 22:56:24 2005 @@ -1,2 +1,2 @@ -eval osetitem protect (k) Msgflood Sensor [$(msgfloodsensor)] -eval osetitem protect (l) Msgflood Timer: [$(mfloodtimer)] +eval osetitem protect Msgflood Sensor [$(msgfloodsensor)] +eval osetitem protect Msgflood Timer: [$(mfloodtimer)] diff -aruN amn.orig/modules/mjoin/config amn/modules/mjoin/config --- amn.orig/modules/mjoin/config Wed May 25 22:20:37 2005 +++ amn/modules/mjoin/config Tue Nov 15 22:56:59 2005 @@ -1 +1 @@ -eval osetitem misc (q) Auto-join new window: [$_jwin] +eval osetitem misc Auto-join new window: [$_jwin] diff -aruN amn.orig/modules/nlog/config amn/modules/nlog/config --- amn.orig/modules/nlog/config Fri Sep 2 23:15:19 2005 +++ amn/modules/nlog/config Tue Nov 15 22:56:11 2005 @@ -1,2 +1,2 @@ -eval osetitem misc (s) Log notify signoffs: [$nsolog] +eval osetitem misc Log notify signoffs: [$nsolog] diff -aruN amn.orig/modules/oper/config amn/modules/oper/config --- amn.orig/modules/oper/config Tue Aug 30 10:05:16 2005 +++ amn/modules/oper/config Tue Nov 15 22:56:43 2005 @@ -1,2 +1,2 @@ -eval osetitem oper (v) Oper modes with operview: [$_ovmode] -eval osetitem oper (u) Operview win size: [$_ovsize] +eval osetitem oper Oper modes with operview: [$_ovmode] +eval osetitem oper Operview win size: [$_ovsize] diff -aruN amn.orig/modules/orignick/config amn/modules/orignick/config --- amn.orig/modules/orignick/config Sat Aug 13 02:28:20 2005 +++ amn/modules/orignick/config Tue Nov 15 22:57:14 2005 @@ -1 +1 @@ -eval osetitem misc (p) Orignick Timer: [$(_ort)] +eval osetitem misc Orignick Timer: [$(_ort)] diff -aruN amn.orig/modules/sprot/config amn/modules/sprot/config --- amn.orig/modules/sprot/config Sun Jun 5 02:27:10 2005 +++ amn/modules/sprot/config Tue Nov 15 23:45:28 2005 @@ -1 +1 @@ -eval osetitem protect (w) Unbanself when banned [$_unbanself] +eval osetitem protect unbanself Unbanself when banned diff -aruN amn.orig/modules/sprot/sprot.m amn/modules/sprot/sprot.m --- amn.orig/modules/sprot/sprot.m Mon Oct 3 05:29:05 2005 +++ amn/modules/sprot/sprot.m Tue Nov 15 23:54:06 2005 @@ -18,3 +18,25 @@ } } } + +alias _selfban { + config.unbanself -s $* +} + +alias config.unbanself { + if ( [$0] == [-r] ) + { + return $_ubanself + } else if ([$0] == [-s]) { + if (# == 1) { + xecho -v (sprot).. unban self set to $_ubanself + }{ + if (match($1 on off)) { + @_ubanself = [$0] + xecho -v (sprot).. unban self set to $_ubanself + }{ + xecho -v $acban invalid choice + } + } + } +} diff -aruN amn.orig/modules/userlist/config amn/modules/userlist/config --- amn.orig/modules/userlist/config Wed May 25 22:23:05 2005 +++ amn/modules/userlist/config Tue Nov 15 22:57:37 2005 @@ -1 +1 @@ -eval osetitem protect (o) Auto-op delay Timer: [$_ss] +eval osetitem protect Auto-op delay Timer: [$_ss] From: Kreca Date: Thu, 17 Nov 2005 01:09:10 +0100 (CET) OPPS, Sent the wrong mail, here's the real commit -Huge changes to /config. The new format is /config
all the config sets and stuff has been redone //kreca -add undocumented public logging to /config //kreca -general cleanup of a lot of different files diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Nov 10 04:11:58 2005 +++ amn/CHANGES Thu Nov 17 01:03:31 2005 @@ -113,3 +113,11 @@ without crashing the client. //skullY -update development version to 4. this should be the final development minor before the 1.3 release. //zak + +17.09.05 +-Huge changes to /config. The new format is /config
+ all the config sets and stuff has been redone //kreca +-add undocumented public logging to /config //kreca +-general cleanup of a lot of different files + + diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Sun Oct 30 11:58:25 2005 +++ amn/amn.epic Wed Nov 16 23:58:06 2005 @@ -79,6 +79,7 @@ ## allow for permanent settings via ~/.amnrc ^eval ^load ~/.amnrc ^eval ^load $(loadpath)core/sets.m +^eval ^load $(loadpath)core/config.m #progress bar @_pcnt=[0] @@ -104,7 +105,7 @@ fe ($glob($(loadpath)arrays\/*.a)) ii { load $ii } ## core loading stuff. fe ($glob($(loadpath)core\/*.m)) mod { - if ( mod != [$(loadpath)core/compat.m] && mod != [$(loadpath)core/sets.m] ) { + if ( mod != [$(loadpath)core/compat.m] && mod != [$(loadpath)core/sets.m] && mod != [$(loadpath)core/config.m] ) { ^load $mod } } diff -aruN amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Tue Oct 11 02:51:38 2005 +++ amn/core/bans.m Wed Nov 16 23:55:25 2005 @@ -7,49 +7,41 @@ alias tban { ^on 367 - ^on ^367 * { - @setitem(bans.$1 $numitems(bans.$1) $2-) + @setitem(bans.$1 $numitems(bans.$1) $2-) } - ^on ^368 * { - on 367 - - if (numitems(bans.$2)) { - @chan=[$2] - for (@:xx=0,xx0 && cc<=numitems(bans.$chan)) { - - mode $chan -b $word(0 $getitem(bans.$chan ${cc-1})) - - } - - } + ^on ^368 * { + on 367 - + if (numitems(bans.$2)) { + @chan=[$2] + for (@:xx=0,xx0 && cc<=numitems(bans.$chan)) { + mode $chan -b $word(0 $getitem(bans.$chan ${cc-1})) } - - - @delarray(bans.$chan) - @chan=[] - ^on 368 - - - } - } - { - ^on 368 - + } } + @delarray(bans.$chan) + @chan=[] + ^on 368 - + } + }{ + ^on 368 - + } } ^mode $C b @@ -58,14 +50,14 @@ alias banstat { if (![$0]) { ^mode $C b - }{ - ^mode $0 b} - ^on ^367 * { - //echo $(hblk)[$(cl)$[15]1$(hblk)] [$(cl)$[9]before(! $3)$(hblk)] [$(cl)$2$(hblk)] $(cl)$word(3 $stime($4)) - } - wait -cmd ^on ^367 -"*" - - } + }{ + ^mode $0 b + } + ^on ^367 * { + //echo $(hblk)[$(cl)$[15]1$(hblk)] [$(cl)$[9]before(! $3)$(hblk)] [$(cl)$2$(hblk)] $(cl)$word(3 $stime($4)) + } + wait -cmd ^on ^367 -"*" +} alias takeall if (![$0]) { ^on ^367 * { @@ -74,7 +66,7 @@ for (@:xx=0,xx<4,@:xx+=4) { mode $C -bbbb $getitem(ubans $xx) $getitem(ubans ${xx+1}) $getitem(ubans ${xx+2}) $getitem(ubans ${xx+3}) } - @delarray(ubans) + @delarray(ubans) } } ^on ^368 * { @@ -92,70 +84,92 @@ if (match(*!*@* $0)) { mode $C -b $0 }{ - ^on ^367 * { - @setitem(ubans $numitems(ubans) $2) + ^on ^367 * { + @setitem(ubans $numitems(ubans) $2) } - ^mode $C +b - ^userhost $0 -cmd { - if (rmatchitem(ubans $0!$3@$4) == -2) { - }{ - ^mode $C -b $getitem(ubans $rmatchitem(ubans $0!$3@$4)) - } - - @delarray(ubans) - } - ^on ^368 ^* + ^mode $C +b + ^userhost $0 -cmd { + if (rmatchitem(ubans $0!$3@$4) == -2) { + }{ + ^mode $C -b $getitem(ubans $rmatchitem(ubans $0!$3@$4)) + } + @delarray(ubans) + } + ^on ^368 ^* } } -alias kob { - if (![$0]) { - xecho -v $acban kick on ban set to "$kickonban"} - if (match($0 on off)) {@kickonban = [$0] - xecho -v $acban kick on ban set to "$kickonban" - }{ - if ([$0]&&!match($0 on off)) { - xecho -v $acban invalid choice - } - } - - } -alias kops { - if (![$0]) { - xecho -v $acban kick ops on ban set to "$kickops"} - if (match($0 on off)) {@kickops = [$0] - xecho -v $acban kick ops on ban set to "$kickops" - }{ - if ([$0]&&!match($0 on off)) { - xecho -v $acban invalid choice - } - } - - } ^on #-mode_stripped 43 "% % +b*" { - if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { - fe ($onchannel($1)) n1 { + if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { + fe ($onchannel($1)) n1 { @bannick = pattern($3 $n1!$userhost($n1)) - if (kickops ==[on]) { - if (bannick) { - kick $1 $before(! $bannick) banned - } + if (kickops ==[on]) { + if (bannick) { + kick $1 $before(! $bannick) banned + } + } + if (kickops ==[off] && !ischanop($n1 $1)) { + if (bannick) { + kick $1 $before(! $bannick) banned } - if (kickops ==[off] && !ischanop($n1 $1)) { - if (bannick) { - kick $1 $before(! $bannick) banned - } } - } - - } - } + } + } + } +} -alias _selfban { - if ([$0]==[ON] || [$0]==[OFF]) { - @_ubanself = [$0] - xecho -v (sprot).. unban self set to $0 - }{ - xecho -v (sprot).. unban self set to $_ubanself +# configurations +alias kob { + config.kickonban -s $* +} + +alias kops { + config.kickops -s $* +} + +alias bantype { + config.bantype -s $* +} + +alias config.kickops { + if ( [$0] == [-r] ) + { + return $kickops + } else if ([$0] == [-s]) { + config.matchinput on|off kickops '$1' kick ops on ban + } +} + +alias config.kickonban { + if ( [$0] == [-r] ) + { + return $kickonban + } else if ([$0] == [-s]) { + config.matchinput on|off kickonban '$1' kick on ban } } + +## bantype config. [Norm/Better/Host/Domain] +alias config.bantype { + if ( [$0] == [-r] ) + { + return $bt_ + } else if ([$0] == [-s]) { + if (# == 1) { + xecho -v $acban bantype set to $bt_ + xecho -v $acban /bantype + }{ + switch ($1) { + (normal){@bt_=[normal];@_bt=6;xecho -v $acban bantype set to normal (n!*u@h.d n!*u@d.h)} + (better) {@bt_=[better];@_bt=3;xecho -v $acban bantype set to better (*!*u@*.d *!*u@d.*)} + (host) {@bt_=[host];@_bt=2;xecho -v $acban bantype set to host (*!*@h.d *!*@d.h)} + (domain) {@bt_=[domain];@_bt=4;xecho -v $acban bantype set to domain (*!*@*.d *!*@d.*)} + () {xecho -v $acban invalid choice } + } + } + } +} + +eval osetitem protect kickonban Kick on ban: +eval osetitem protect kickops Kick ops: +eval osetitem protect bantype Ban Type: diff -aruN amn.orig/core/config amn/core/config --- amn.orig/core/config Mon Oct 3 05:01:33 2005 +++ amn/core/config Thu Jan 1 01:00:00 1970 @@ -1,34 +0,0 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. - -cleararray oper -cleararray away -cleararray protect -cleararray misc - -eval osetitem protect (i) Kick on ban: [$(kickonban)] -eval osetitem protect (j) Kick ops: [$(kickops)] -eval osetitem protect (x) Ban Type: [$bt_] - -eval osetitem misc (f) Auto-connect umode: [$getumode] -eval osetitem misc (h) Extended publics: [$(showop)] -eval osetitem misc (t) Timestamps: [$_tss] -eval osetitem misc (m) Dcc autoget: [$(autoget)] -eval osetitem misc (r) Pubstring: [$_pubnick] -eval osetitem misc (z) Double fixed window: [$(windowdoubles)] - -fe ($listarray(_mods)) n1 { - if (n1 != [!] && fexist($(loadpath)modules/$(n1)/config)) { - load $(loadpath)modules/$(n1)/config - } -} - -eval aecho --------------------------= Away Settings =----------------------- -printsection away -eval aecho --------------------------= Protection Settings =----------------- -printsection protect -eval aecho --------------------------= Misc Settings =----------------------- -printsection misc -eval aecho --------------------------= Oper Settings =----------------------- -printsection oper -eval aecho ------------------------------------------------------------------ diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Mon Oct 10 21:10:14 2005 +++ amn/core/config.m Thu Nov 17 00:13:29 2005 @@ -2,8 +2,7 @@ # See the 'COPYRIGHT' file for more information. subpackage config -alias setumode if (![$0]) {xecho -b current usermode set to: $getumode}{@ getumode = [$0];xecho -b usermodes set to: $getumode} -alias config { +alias oldconfig { @ :choice = [$1-] switch ($0) { @@ -36,33 +35,29 @@ # (5) {/savepath_ $choice} (*) {load $(loadpath)core/config;^//echo $G usage -> config setting>} }} +alias config { + if ( # < 2 || match($0 away protect misc oper)== 0 ) { + if (match($0 away protect misc oper)) { + printsection $0 + }{ + fe (away protect misc oper) sec { + printsection $sec + } + } + eval aecho ------------------------------------------------------------------ + xecho -v $acban -> config
+ xecho -v $acban valid sections: + }{ + @:aname= [confa$0] + @:xx= ascii($1)-ascii(a) + @ :cur1 = getitem($aname $xx) + @:con1=word(0 $cur1) + eval @$$config.${con1}\(-s $2-\) -## auto-bot password show toggle. undocumented unless ppl read this. -alias bot_tog { - if (showtype==1) { - @ showtype = 2 - xecho -b (abot).. now showing passwords. - }{ - @ showtype = 1 - xecho -b (abot).. not showing passwords } + + } -## end auto-bot pass toggle. - -## window double toggle. -alias _double { - if (![$0]) { - xecho -b double fixed window set to $toupper($windowdoubles) - } - if (match($0 on off)) { - @windowdoubles = [$0] - xecho -b double fixed window set to $toupper($windowdoubles) - }{ - if ([$0]&&!match($0 on off)) { - xecho -b invalid choice - } - } -} ## modular /config output stuff. actually shows options when it does exist. alias osetitem @@ -80,15 +75,39 @@ } alias printsection { + switch ($0) { + (away) { + eval aecho --------------------------= Away Settings =----------------------- + } + (protect) { + eval aecho --------------------------= Protection Settings =----------------- + } + (misc) { + eval aecho --------------------------= Misc Settings =----------------------- + } + (oper) { + eval aecho --------------------------= Oper Settings =----------------------- + } + } @aname= [confa$0] for (@xx=0, xx= numitems($aname) ) { @ :mod2 = [] } { - @ :mod2 = getitem($aname ${xx+1}) + @ :cur2=getitem($aname ${xx+1}) + @ :con2 = word(0 $cur2) + @ :mod2 = restw(1 $cur2) + @ :mod2 = [\($chr(${ascii(a)+xx+1})\) $mod2] + ^eval assign cval2 $$config.${con2}\(-r\) + @ :mod2= [$[27]mod2 [$cval2]] } if (strlen($mod1) < 35 && strlen($mod2)) { @@ -97,28 +116,29 @@ { @:mod1 = [$mod1 |] } - aecho $mod1 $mod2 } } ## end /config output. -## timestamp some. timestamp all has been removed. -alias _tsmps { - if (![$0]) { - xecho -b timestamp is set to "$_tss" +## config helper alias +alias config.matchinput { + if ([$2]==['']) { + eval xecho -v $acban $$3- set to "$$$1" + }{ + @:aVar=mid(1 ${strlen($2)-2} $2) + if (match($aVar $split(| $0))) { + ^assign $1 $aVar + eval xecho -v $acban $$3- set to "$$$1" + }{ + xecho -v $acban invalid choice <$0> } - if (match($0 on off)) { - @_tss = [$0] - _timestampsome $_tss - xecho -b timestamp msgs,not,walls,pubs,dcc,signoff,oper set to "$_tss" - }{ - if ([$0]&&!match($0 on off)) { - xecho -b invalid choice - } - } - } + } +} + + +## timestamp some. timestamp all has been removed. alias _timestampsome { if (_tss==[on]) { @@ -136,57 +156,43 @@ ## end timestamp stuff. -## bantype config. [Norm/Better/Host/Domain] -alias bantype if (![$0]) { - xecho -b bantype set to $bt_ - xecho -b /bantype - }{ +## auto-responses /resp1 /resp2 /resp3 /resp4 +alias config.pubnick { + if ( [$0] == [-r] ) + { + return $_pubnick + } else if ([$0] == [-s]) { + if (#>1) { + @ _pubnick = [$1]; + } + xecho -v $acban primary auto-response set to "$_pubnick" - switch ($0) { - (normal) {@bt_=[normal];@_bt=6;xecho -b bantype set to normal (n!*u@h.d n!*u@d.h)} - (better) {@bt_=[better];@_bt=3;xecho -b bantype set to better (*!*u@*.d *!*u@d.*)} - (host) {@bt_=[host];@_bt=2;xecho -b bantype set to host (*!*@h.d *!*@d.h)} - (domain) {@bt_=[domain];@_bt=4;xecho -b bantype set to domain (*!*@*.d *!*@d.*)} - } } - -## end bantype set. +} -## auto-responses /resp1 /resp2 /resp3 /resp4 alias _pubn { - if (![$0]) { - abecho primary auto-response set to "$_pubnick" - }{ - abecho primary auto-response set to "$*" - @_pubnick=[$*] - } + config.pubnick -s $* } alias _r2 { - if (![$0]) { - xecho -b 2nd auto-response set to "$_r2" - }{ - xecho -b 2nd auto-response set to "$*" - @_r2=[$*] - } + if (#) { + @_r2=[$*] + } + xecho -v $acban 2nd auto-response set to "$_r2" } alias _r3 { - if (![$0]) { - xecho -b 3rd auto-response set to "$_r3" - }{ - xecho -b 3rd auto-response set to "$*" - @_r3=[$*] - } + if (#) { + @_r3=[$*] + } + xecho -v $acban 3rd auto-response set to "$_r3" } alias _r4 { - if (![$0]) { - xecho -b 4th auto-response set to "$_r4" - }{ - xecho -b 4th auto-response set to "$*" - @_r4=[$*] - } + if (#) { + @_r4=[$*] + } + xecho -v $acban 4th auto-response set to "$_r4" } ## put new additional auto-response aliases here for now. @@ -195,3 +201,50 @@ alias resp4 _r4 $* ## end auto-response. + +## other misc configs +alias config.umode { + if ( [$0] == [-r] ) + { + return $getumode + } else if ([$0] == [-s]) { + if (#>1) { + @ getumode = [$1]; + } + xecho -v $acban usermode set to: "$getumode" + + } +} + +alias config.timestamp { + if ( [$0] == [-r] ) { + return $_tss + } else if ([$0] == [-s]) { + config.matchinput on|off _tss '$1' timestamp msgs,not,walls,pubs,dcc,signoff,oper + } +} + +alias config.windowdoubles { + if ( [$0] == [-r] ) { + return $windowdoubles + } else if ([$0] == [-s]) { + config.matchinput on|off windowdoubles '$1' double fixed window + } +} + +alias setumode { + config.umode -s $* +} + +alias _tsmps { + config.timestamp -s $* +} + +alias _double { + config.windowdoubles -s $* +} + +eval osetitem misc umode Auto-connect umode: +eval osetitem misc timestamp Timestamps: +eval osetitem misc pubnick Pubstring: +eval osetitem misc windowdoubles Double fixed window: diff -aruN amn.orig/core/dcc.m amn/core/dcc.m --- amn.orig/core/dcc.m Mon Oct 10 23:35:17 2005 +++ amn/core/dcc.m Thu Nov 17 00:08:35 2005 @@ -75,19 +75,21 @@ } } +#config +alias config.dccag { + if ( [$0] == [-r] ) { + return $autoget + } else if ([$0] == [-s]) { + config.matchinput on|off autoget '$1' dcc autoget + } +} + alias dccag { - if (![$0]) { - xecho -b dcc autoget set to $toupper($autoget) - } - if (match($0 on off)) { - @autoget = [$0] - xecho -b dcc autoget set to $toupper($autoget) - }{ - if ([$0]&&!match($0 on off)) { - xecho -b invalid choice - } - } -} + config.dccag -s $* +} + +eval osetitem misc dccag Dcc autoget: +#end of config ## dcc menu help. alias dcchelp { diff -aruN amn.orig/core/mod.m amn/core/mod.m --- amn.orig/core/mod.m Tue Oct 11 02:51:38 2005 +++ amn/core/mod.m Wed Nov 16 00:35:50 2005 @@ -18,6 +18,9 @@ @setitem(_mods 0 !) @setitem(_mods $numitems(_mods) $a1) ^load $(loadpath)modules/$(a1)/$(a1).m + if (fexist($(loadpath)modules/$(n1)/config)) { + ^load $(loadpath)modules/$(n1)/config + } } xecho $acban loaded modules $_modules }{ @@ -26,6 +29,9 @@ @setitem(_mods 0 !) @setitem(_mods $numitems(_mods) $n1) ^load $(loadpath)modules/$(n1)/$(n1).m + if (fexist($(loadpath)modules/$(n1)/config)) { + ^load $(loadpath)modules/$(n1)/config + } ^push _mlist $n1 }{ xecho $acban $n1 module not found or already loaded. @@ -124,8 +130,11 @@ fe ($listarray(_mods)) n1 { if (n1 != [!]) { load $(loadpath)modules/$(n1)/$(n1).m - } - } + } + if (n1 != [!] && fexist($(loadpath)modules/$(n1)/config)) { + load $(loadpath)modules/$(n1)/config + } + } } alias mhelp modhelp diff -aruN amn.orig/core/modeshow.m amn/core/modeshow.m --- amn.orig/core/modeshow.m Tue Oct 11 02:51:38 2005 +++ amn/core/modeshow.m Wed Nov 16 23:48:13 2005 @@ -2,17 +2,26 @@ # See the 'COPYRIGHT' file for more information. subpackage modeshow +#config alias modeshow vocop $* alias showmodes vocop $* -alias vocop { - if ([$0]==[ON] || [$0]==[OFF]) { - @showop = [$0] - xecho $acban showing <@nick> and <+nick> in public set to $0 - }{ - xecho $acban extpub/modeshow set to $showop + +alias config.showop { + if ( [$0] == [-r] ) + { + return $showop + } else if ([$0] == [-s]) { + config.matchinput on|off showop '$1' showing <@nick> and <+nick> in public } } - + +alias vocop { + config.showop -s $* +} + +eval osetitem misc showop Extended publics: + +#end of config on ^public * { @extravar = [] diff -aruN amn.orig/modules/abot/abot.m amn/modules/abot/abot.m --- amn.orig/modules/abot/abot.m Sat Oct 29 04:04:25 2005 +++ amn/modules/abot/abot.m Thu Nov 17 00:14:25 2005 @@ -99,8 +99,6 @@ } } - - ^on #^hook 332 "channel_synch *" { @chan=[$1] @blah=getmatches(bots *$chan*) diff -aruN amn.orig/modules/away/away.m amn/modules/away/away.m --- amn.orig/modules/away/away.m Wed Oct 26 00:49:28 2005 +++ amn/modules/away/away.m Wed Nov 16 23:32:07 2005 @@ -11,106 +11,195 @@ alias remlog { if (fexist(~/.amn/away.log) == -1) { xecho $acban log file does not exist. - }{ - input "remove log? [y|n]: " { - if ([$0]==[y]) { - exec rm ~/.amn/away.log - xecho $acban ~/.amn/away.log deleted - }{ - xecho $acban remlog canceled - } + }{ + input "remove log? [y|n]: " { + if ([$0]==[y]) { + exec rm ~/.amn/away.log + xecho $acban ~/.amn/away.log deleted + }{ + xecho $acban remlog canceled + } } } } - alias readlog { more ~/.amn/away.log - } +} on -idle * if ([$0]!= 0) { if ([$0]== awayt && awaystat != 1 && togaway != [OFF]) { away autoaway after $0 mins - xecho $acban Auto-Away after $0 minutes + xecho $acban Auto-Away after $0 minutes } } ^on #-msg 332 * { if (awaystat && matchitem(awaymsgs $0) < 0) { - @setitem(awaymsgs $numitems(awaymsgs) $0) + @setitem(awaymsgs $numitems(awaymsgs) $0) } } on #-connect 1 * if (awaystat) { - //away $awaymsg - } + //away $awaymsg +} alias away { @awayl=[on] @awaystat=1 @awaytime=() - @awaymsg=[$0]?[$*]:awayr - //away away: \($(awaymsg)\) $fparse(format_away) - @awaytime=time() - - } + @awaymsg=[$0]?[$*]:awayr + //away away: \($(awaymsg)\) $fparse(format_away) + @awaytime=time() +} -alias back if ([$A]) { - @awayl=[off] - @awaystat=0 - @delarray(awaymsgs) - @backtime=time() +alias back { + if ([$A]) { + @awayl=[off] + @awaystat=0 + @delarray(awaymsgs) + @backtime=time() if (awaytime > [0]) { - @timediff=tdiff2(${backtime - awaytime}) + @timediff=tdiff2(${backtime - awaytime}) //away - xecho $acban type /readlog to view log. + xecho -v $acban type /readlog to view log. } }{ - xecho $acban you are not away.. + xecho -v $acban you are not away.. + } } -alias awaytime if ([$0]) { - @ awayt = [$0] - xecho $acban awaytime set to "$awayt" - } else { - xecho $acban awaytime set to "$awayt"} - -alias awaymsg if ([$0]) { - @ awayr = [$*] - xecho $acban away reason set to "$awayr" - } else { - xecho $acban away reason set to "$awayr"} - -alias awaytog { - if (![$0]) { - xecho $acban away toggle is set to "$togaway" +#configs +alias config.awaytime { + if ( [$0] == [-r] ) + { + return $awayt + } else if ([$0] == [-s]) { + if (# >1) { + @ awayt = [$1] } - if (match($0 on off)) {@togaway = [$0] - xecho $acban away toggle is set to "$togaway" - }{ - if ([$0]&&!match($0 on off)) { - xecho $acban invalid choice - } - } + xecho -v $acban away time set to "$awayt" + } +} +alias config.awaymsg { + if ( [$0] == [-r] ) + { + return $awayr + } else if ([$0] == [-s]) { + if (# >1) { + @ awayr = [$1] + } + xecho -v $acban away reason set to "$awayr" + } } -## pager crap here. +alias config.awaytog { + if ( [$0] == [-r] ) + { + return $togaway + } else if ([$0] == [-s]) { + config.matchinput on|off togaway '$1' away toggle + } +} + +alias config.awaylogcrap { + if ( [$0] == [-r] ) + { + return $crapl + } else if ([$0] == [-s]) { + config.matchinput on|off crapl '$1' misc crap logging + } +} + +alias config.awaylogmsg { + if ( [$0] == [-r] ) + { + return $msgl + } else if ([$0] == [-s]) { + config.matchinput on|off msgl '$1' msg logging + } +} + +alias config.awaylogdcc { + if ( [$0] == [-r] ) + { + return $dccl + } else if ([$0] == [-s]) { + config.matchinput on|off dccl '$1' dcc logging + } +} + +alias config.awaylognotice { + if ( [$0] == [-r] ) + { + return $notl + } else if ([$0] == [-s]) { + config.matchinput on|off notl '$1' notice logging + } +} + +alias config.awaylogpub { + if ( [$0] == [-r] ) + { + return $plog + } else if ([$0] == [-s]) { + config.matchinput on|off plog '$1' public logging + } +} + +alias config.awaypager { + if ( [$0] == [-r] ) + { + return $togpager + } else if ([$0] == [-s]) { + config.matchinput on|off togpager '$1' pager + } +} + +#aliases for backwards compability +alias awaytime { + config.awaytime -s $* +} + +alias awaymsg { + config.awaymsg -s $* +} + +alias awaytog { + config.awaytog -s $* +} + +alias logcrap { + config.awaylogcrap -s $* +} + +alias logm { + config.awaylogmsg -s $* +} + +alias logd { + config.awaylogdcc -s $* +} + +alias logn { + config.awaylognotice -s $* +} + +alias logpub { + config.awaylogpub -s $* +} + + alias pager { - if (![$0]) { - xecho $acban pager set to "$togpager" - } - if (match($0 on off)) { - @togpager = [$0] - xecho $acban pager set to "$togpager" - }{ - if ([$0]&&!match($0 on off)) { - xecho $acban invalid choice - } - } + config.awaypager -s $* } + + + +## pager crap here. ^on #-ctcp 2 "% % page*" { if (togpager != [off]) { @@ -166,74 +255,3 @@ @write($fd KICK $recvtime $1 kicked you off $2 for reason $3-) @close($fd)}} -## more aliases here..(logging) - -alias logcrap { - if (![$0]) { - xecho $acban misc crap logging set to "$crapl" - } - if (match($0 on off)) { - @crapl = [$0] - xecho $acban misc crap logging set to "$crapl" - }{ - if ([$0]&&!match($0 on off)) { - xecho $acban invalid choice - } - } -} - -alias logm { - if (![$0]) { - xecho $acban msg logging set to "$msgl" - } - if (match($0 on off)) { - @msgl = [$0] - xecho $acban msg logging set to "$msgl" - }{ - if ([$0]&&!match($0 on off)) { - xecho $acban invalid choice - } - } -} - -alias logd { - if (![$0]) { - xecho $acban dcc logging set to "$dccl" - } - if (match($0 on off)) { - @dccl = [$0] - xecho $acban dcc logging set to "$dccl" - }{ - if ([$0]&&!match($0 on off)) { - xecho $acban invalid choice - } - } -} - -alias logn { - if (![$0]) { - xecho $acban notice logging set to "$notl" - } - if (match($0 on off)) { - @notl = [$0] - xecho $acban notice logging set to "$notl" - }{ - if ([$0]&&!match($0 on off)) { - xecho $acban invalid choice - } - } -} - -alias logpub { - if (![$0]) { - xecho $acban public logging set to "$plog" - } - if (match($0 on off)) { - @plog = [$0] - xecho $acban public logging set to "$plog" - }{ - if ([$0]&&!match($0 on off)) { - xecho $acban invalid choice - } - } -} diff -aruN amn.orig/modules/away/config amn/modules/away/config --- amn.orig/modules/away/config Tue Aug 30 09:55:02 2005 +++ amn/modules/away/config Wed Nov 16 23:35:18 2005 @@ -1,8 +1,9 @@ -eval osetitem away (a) A-setaway time: [$awayt] -eval osetitem away (g) A-setaway on/off: [$(togaway)] -eval osetitem away (e) A-msg: [$awayr] -eval osetitem away (n) A-pager: [$(togpager)] -eval osetitem away (b) A-log msgs: [$(msgl)] -eval osetitem away (c) A-log crap/miscs: [$(crapl)] -eval osetitem away (d) A-log notices: [$(notl)] -eval osetitem away (y) A-log dcc: [$(dccl)] +eval osetitem away awaytime A-setaway time: +eval osetitem away awaytog A-setaway on/off: +eval osetitem away awaymsg A-msg: +eval osetitem away awaypager A-pager: +eval osetitem away awaylogmsg A-log msgs: +eval osetitem away awaylogcrap A-log crap/miscs: +eval osetitem away awaylognotice A-log notices: +eval osetitem away awaylogdcc A-log dcc: +eval osetitem away awaylogpub A-log public: diff -aruN amn.orig/modules/flood/config amn/modules/flood/config --- amn.orig/modules/flood/config Wed May 25 22:24:30 2005 +++ amn/modules/flood/config Thu Nov 17 00:30:20 2005 @@ -1,2 +1,2 @@ -eval osetitem protect (k) Msgflood Sensor [$(msgfloodsensor)] -eval osetitem protect (l) Msgflood Timer: [$(mfloodtimer)] +eval osetitem protect msgflood Msgflood Sensor: +eval osetitem protect msgftimer Msgflood Timer: diff -aruN amn.orig/modules/flood/flood.m amn/modules/flood/flood.m --- amn.orig/modules/flood/flood.m Mon Oct 10 22:50:35 2005 +++ amn/modules/flood/flood.m Thu Nov 17 00:30:34 2005 @@ -13,22 +13,40 @@ } } -alias msgflood if ([$0]) { - @msgfloodsensor=[$0] - xecho -b server msg flood sensor set to "$msgfloodsensor" -}{ - xecho -b server msg flood sensor set to "$msgfloodsensor" +alias config.msgflood { + if ( [$0] == [-r] ) + { + return $msgfloodsensor + } else if ([$0] == [-s]) { + if (#>1) { + @ msgfloodsensor = [$1]; + } + xecho -v $acban msg flood sensor set to: "$msgfloodsensor" + + } +} + +alias config.msgftimer { + if ( [$0] == [-r] ) + { + return $mfloodtimer + } else if ([$0] == [-s]) { + if (#>1) { + @ mfloodtimer = [$1]; + } + xecho -v $acban protect msg flood time set to: "$mfloodtimer" + + } } -alias msgftimer if ([$0]) { - @mfloodtimer=[$0] - xecho -b server protect msg flood time set to "$mfloodtimer" -}{ - xecho -b server protect msg flood time set to "$mfloodtimer" +alias msgflood { + config.msgflood -s $* +} + +alias msgftimer { + config.msgftimer -s $* } alias mtime msgftimer $* alias mftime msgftimer $* alias mflood {config k $*} - -oof diff -aruN amn.orig/modules/mjoin/config amn/modules/mjoin/config --- amn.orig/modules/mjoin/config Wed May 25 22:20:37 2005 +++ amn/modules/mjoin/config Thu Nov 17 00:20:16 2005 @@ -1 +1 @@ -eval osetitem misc (q) Auto-join new window: [$_jwin] +eval osetitem misc joinwin Auto-join new window: diff -aruN amn.orig/modules/mjoin/mjoin.m amn/modules/mjoin/mjoin.m --- amn.orig/modules/mjoin/mjoin.m Mon Nov 7 23:34:40 2005 +++ amn/modules/mjoin/mjoin.m Thu Nov 17 00:20:06 2005 @@ -62,17 +62,16 @@ } } -alias jwin { - if (#==0) { - xecho $acban join window set to "$_jwin" - }{ - if (match($0 on off)) { - @_jwin = [$0] - xecho $acban join window set to "$_jwin" - }{ - xecho $acban invalid choice - } +alias config.joinwin { + if ( [$0] == [-r] ) { + return $_jwin + } else if ([$0] == [-s]) { + config.matchinput on|off _jwin '$1' join window } +} + +alias jwin { + config.joinwin -s $* } alias mjoin { diff -aruN amn.orig/modules/nlog/config amn/modules/nlog/config --- amn.orig/modules/nlog/config Fri Sep 2 23:15:19 2005 +++ amn/modules/nlog/config Thu Nov 17 00:17:00 2005 @@ -1,2 +1,2 @@ -eval osetitem misc (s) Log notify signoffs: [$nsolog] +eval osetitem misc nlog Log notify signoffs: diff -aruN amn.orig/modules/nlog/nlog.m amn/modules/nlog/nlog.m --- amn.orig/modules/nlog/nlog.m Sat Oct 29 04:06:34 2005 +++ amn/modules/nlog/nlog.m Thu Nov 17 00:19:14 2005 @@ -23,18 +23,16 @@ } } -alias nsotog { - if ( [$#] ==0) { - xecho $acban notify signoff log toggle is set to "$nsolog" - } - if (match($0 on off)) { - @nsolog = [$0] - xecho $acban notify signoff log toggle is set to "$nsolog" - }{ - if ( [$#] &&!match($0 on off)) { - xecho $acban invalid choice, on or off. - } +alias config.nlog { + if ( [$0] == [-r] ) { + return $nsolog + } else if ([$0] == [-s]) { + config.matchinput on|off nsolog '$1' notify signoff log } +} + +alias nsotog { + config.nlog -s $* } diff -aruN amn.orig/modules/oper/config amn/modules/oper/config --- amn.orig/modules/oper/config Tue Aug 30 10:05:16 2005 +++ amn/modules/oper/config Thu Nov 17 00:35:18 2005 @@ -1,2 +1,2 @@ -eval osetitem oper (v) Oper modes with operview: [$_ovmode] -eval osetitem oper (u) Operview win size: [$_ovsize] +eval osetitem oper ovmode Oper modes with operview: +eval osetitem oper ovsize Operview win size: diff -aruN amn.orig/modules/oper/oper.m amn/modules/oper/oper.m --- amn.orig/modules/oper/oper.m Tue Oct 11 02:51:38 2005 +++ amn/modules/oper/oper.m Thu Nov 17 00:36:34 2005 @@ -30,24 +30,38 @@ } } -alias ovsize { - if (![$0]) { - xecho $acban operview window size set to "$_ovsize" - }{ - @_ovsize=[$0] - xecho $acban operview window size set to "$_ovsize" - } +alias config.ovsize { + if ( [$0] == [-r] ) + { + return $_ovsize + } else if ([$0] == [-s]) { + if (#>1) { + @ _ovsize = [$1]; + } + xecho -v $acban operview window size set to "$_ovsize" + } } - -alias ovmode { - if (![$0]) { - xecho $acban oper modes set to "$_ovmode" - }{ - @_ovmode=[$0] - xecho $acban oper modes set to "$_ovmode" - } + +alias config.ovmode { + if ( [$0] == [-r] ) + { + return $_ovmode + } else if ([$0] == [-s]) { + if (#>1) { + @ _ovmode = [$1]; + } + xecho -v $acban oper modes set to "$_ovmode" + } +} + +alias ovsize { + config.ovsize -s $* } +alias ovmode { + config.ovmode -s $* +} + /on -server_notice "*requesting gline for*" { @glineTarget=strip([] [$11]); @glineReason=strip([] [$12-]); diff -aruN amn.orig/modules/orignick/config amn/modules/orignick/config --- amn.orig/modules/orignick/config Sat Aug 13 02:28:20 2005 +++ amn/modules/orignick/config Thu Nov 17 00:23:13 2005 @@ -1 +1 @@ -eval osetitem misc (p) Orignick Timer: [$(_ort)] +eval osetitem misc origdelay Orignick Timer: diff -aruN amn.orig/modules/orignick/orignick.m amn/modules/orignick/orignick.m --- amn.orig/modules/orignick/orignick.m Tue Oct 11 02:51:38 2005 +++ amn/modules/orignick/orignick.m Thu Nov 17 00:23:03 2005 @@ -30,18 +30,23 @@ xecho $acban /orignick request canceled. } -alias setorig { - if (# == 0) { - xecho $acban orignick delay set to "$_ort" - return; - } - if ([$0] > 0 && [$0] <=20) { - @_ort = [$0] - xecho $acban orignick delay set to "$_ort" - }{ - xecho $acban time out of range. Valid numbers are 1-20 +alias config.origdelay { + if ( [$0] == [-r] ) { + return $_ort + } else if ([$0] == [-s]) { + if ([$1] > 0 && [$1] <=20) { + @_ort=[$1] + } else if (# > 1) { + xecho -v $acban time out of range. Valid numbers are 1-20 + } + xecho -v $acban orignick delay set to "$_ort" } } + +alias setorig { + config.origdelay -s $* +} + on #-channel_signoff 42 "*" { if ([$1] == nic) { diff -aruN amn.orig/modules/sprot/config amn/modules/sprot/config --- amn.orig/modules/sprot/config Sun Jun 5 02:27:10 2005 +++ amn/modules/sprot/config Tue Nov 15 23:45:28 2005 @@ -1 +1 @@ -eval osetitem protect (w) Unbanself when banned [$_unbanself] +eval osetitem protect unbanself Unbanself when banned diff -aruN amn.orig/modules/sprot/sprot.m amn/modules/sprot/sprot.m --- amn.orig/modules/sprot/sprot.m Mon Oct 3 05:29:05 2005 +++ amn/modules/sprot/sprot.m Tue Nov 15 23:54:06 2005 @@ -18,3 +18,25 @@ } } } + +alias _selfban { + config.unbanself -s $* +} + +alias config.unbanself { + if ( [$0] == [-r] ) + { + return $_ubanself + } else if ([$0] == [-s]) { + if (# == 1) { + xecho -v (sprot).. unban self set to $_ubanself + }{ + if (match($1 on off)) { + @_ubanself = [$0] + xecho -v (sprot).. unban self set to $_ubanself + }{ + xecho -v $acban invalid choice + } + } + } +} diff -aruN amn.orig/modules/userlist/config amn/modules/userlist/config --- amn.orig/modules/userlist/config Wed May 25 22:23:05 2005 +++ amn/modules/userlist/config Thu Nov 17 00:26:06 2005 @@ -1 +1 @@ -eval osetitem protect (o) Auto-op delay Timer: [$_ss] +eval osetitem protect aopdelay Auto-op delay Timer: diff -aruN amn.orig/modules/userlist/userlist.m amn/modules/userlist/userlist.m --- amn.orig/modules/userlist/userlist.m Sat Oct 29 04:04:54 2005 +++ amn/modules/userlist/userlist.m Thu Nov 17 00:25:57 2005 @@ -120,17 +120,21 @@ } } -alias setsec { - if (# == 0) { - xecho $acban autop delay set to "$_ss" - return; - } - if ([$0] > 0 && [$0] <=40) { - @_ss = [$0] - xecho $acban autop delay set to "$_ss" - }{ - xecho $acban time out of range. Valid numbers are 1 - 40 +alias config.aopdelay { + if ( [$0] == [-r] ) { + return $_ss + } else if ([$0] == [-s]) { + if ([$1] > 0 && [$1] <=40) { + @_ss=[$1] + } else if (# > 1) { + xecho -v $acban time out of range. Valid numbers are 1-40 + } + xecho -v $acban auto op delay set to "$_ss" } +} + +alias setsec { + config.aopdelay -s $* } on #-join 34 * { Date: Wed, 16 Nov 2005 19:53:11 -0500 (EST) From: zak@ircii.org (Zak) Log message: -increment minor. Modified files: CHANGES core/sets.m //zak ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Nov 16 19:03:31 2005 +++ amn/CHANGES Wed Nov 16 19:50:23 2005 @@ -119,5 +119,4 @@ all the config sets and stuff has been redone //kreca -add undocumented public logging to /config //kreca -general cleanup of a lot of different files - - \ No newline at end of file +-bump development version to 5 //zak diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Wed Nov 9 22:13:40 2005 +++ amn/core/sets.m Wed Nov 16 19:50:41 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[4] +@rel_id=[5] @a.rel=[1.2d r/$rel_id] @a.date=[20051020] @_ss=[15] From: Kreca Date: Thu, 17 Nov 2005 11:41:39 +0100 (CET) Cosmetical changes to /config. Read CHANGES diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Nov 17 01:50:23 2005 +++ amn/CHANGES Thu Nov 17 11:38:38 2005 @@ -120,3 +120,6 @@ -add undocumented public logging to /config //kreca -general cleanup of a lot of different files -bump development version to 5 //zak +-More cosmetical changes to /config. The output is formed after an 80x25 + terminal window. If anyone is using a window with less than 80 chars in width + please give us a msg. //kreca diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Wed Nov 16 23:58:06 2005 +++ amn/amn.epic Thu Nov 17 11:05:42 2005 @@ -70,9 +70,9 @@ ^on ^yell "% *Mode parser or server*" # ## script echo ##still need to clean some of this up. -alias abwecho xecho -v $acban $cparse($*) -alias awecho xecho -v $cparse($*) -alias aecho //echo $cparse($*) +alias abwecho xecho -v $acban $cparse($*) +alias awecho xecho -v $cparse($*) +alias aecho //echo $cparse($*) alias abecho xecho -b -- $cparse($*) alias ce //echo $cparse("$*") diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Thu Nov 17 00:13:29 2005 +++ amn/core/config.m Thu Nov 17 11:34:39 2005 @@ -2,49 +2,21 @@ # See the 'COPYRIGHT' file for more information. subpackage config -alias oldconfig { -@ :choice = [$1-] -switch ($0) { - - (a) {/awaytime $choice} - (b) {/logm $choice} - (c) {/logcrap $choice} - (d) {/logn $choice} - (e) {/awaymsg $choice} - (f) {setumode $choice} - (g) {awaytog $choice} - (h) {vocop $choice} - (i) {kob $choice} - (j) {kops $choice} - (k) {msgflood $choice} - (l) {msgftimer $choice} - (m) {dccag $choice} - (n) {pager $choice} - (o) {setsec $choice} - (p) {setorig $choice} - (q) {jwin $choice} - (r) {_pubn $choice} - (s) {nsotog $choice} - (t) {_tsmps $choice} - (u) {ovsize $choice} - (v) {ovmode $choice} - (w) {_selfban $choice} - (x) {bantype $choice} - (y) {/logd $choice} - (z) {_double $choice} -# (5) {/savepath_ $choice} - (*) {load $(loadpath)core/config;^//echo $G usage -> config setting>} -}} alias config { - if ( # < 2 || match($0 away protect misc oper)== 0 ) { + if ( # && match($0 away protect misc oper)==0) { + xecho -v $acban Invalid section. + xecho -v $acban -> config
+ xecho -v $acban valid sections: + + } else if ( # < 2) { if (match($0 away protect misc oper)) { - printsection $0 + config.printsection $0 }{ fe (away protect misc oper) sec { - printsection $sec + config.printsection $sec } } - eval aecho ------------------------------------------------------------------ + eval aecho ----------------------------------------------------------------------------- xecho -v $acban -> config
xecho -v $acban valid sections: }{ @@ -73,20 +45,20 @@ } } -alias printsection +alias config.printsection { switch ($0) { (away) { - eval aecho --------------------------= Away Settings =----------------------- + eval aecho ------------------------------= Away Settings =------------------------------ } (protect) { - eval aecho --------------------------= Protection Settings =----------------- + eval aecho ---------------------------= Protection Settings =--------------------------- } (misc) { - eval aecho --------------------------= Misc Settings =----------------------- + eval aecho ------------------------------= Misc Settings =------------------------------ } (oper) { - eval aecho --------------------------= Oper Settings =----------------------- + eval aecho ------------------------------= Oper Settings =------------------------------ } } @aname= [confa$0] @@ -96,7 +68,7 @@ @ :mod1 = restw(1 $cur1) @ :mod1 = [\($chr(${ascii(a)+xx})\) $mod1] ^eval assign cval1 $$config.${con1}\(-r\) - @ :mod1= [$[27]mod1 [$cval1]] + @ :mod1= [$[25]mod1 [$cval1]] if ( xx+1 >= numitems($aname) ) { @ :mod2 = [] @@ -107,11 +79,11 @@ @ :mod2 = restw(1 $cur2) @ :mod2 = [\($chr(${ascii(a)+xx+1})\) $mod2] ^eval assign cval2 $$config.${con2}\(-r\) - @ :mod2= [$[27]mod2 [$cval2]] + @ :mod2= [$[25]mod2 [$cval2]] } - if (strlen($mod1) < 35 && strlen($mod2)) + if (strlen($mod1) < 37 && strlen($mod2)) { - @:mod1 = [$[35]mod1 |] + @:mod1 = [$[37]mod1 |] } else if (strlen($mod2)) { @:mod1 = [$mod1 |] diff -aruN amn.orig/modules/oper/config amn/modules/oper/config --- amn.orig/modules/oper/config Thu Nov 17 00:35:18 2005 +++ amn/modules/oper/config Thu Nov 17 10:43:09 2005 @@ -1,2 +1,2 @@ -eval osetitem oper ovmode Oper modes with operview: +eval osetitem oper ovmode Operview modes: eval osetitem oper ovsize Operview win size: From: Kreca Date: Thu, 17 Nov 2005 13:38:02 +0100 (CET) Bump dev minor diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Nov 17 11:38:38 2005 +++ amn/CHANGES Thu Nov 17 13:35:12 2005 @@ -123,3 +123,4 @@ -More cosmetical changes to /config. The output is formed after an 80x25 terminal window. If anyone is using a window with less than 80 chars in width please give us a msg. //kreca +-bump development version to 6 //kreca diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Thu Nov 17 01:50:41 2005 +++ amn/core/sets.m Thu Nov 17 13:34:49 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[5] +@rel_id=[6] @a.rel=[1.2d r/$rel_id] @a.date=[20051020] @_ss=[15] Date: Thu, 17 Nov 2005 12:21:57 -0500 (EST) From: zak@ircii.org (Zak) Log message: -fix another kreca fuckup when whoising someone that's away being broke for about a week now and was too lazy to fix it until now... he came up with the fix, but allows me to commit for reason.... [kreca(dcc)] ahahaha, you need to have some credit too [kreca(dcc)] so people dont think you've lost it all ;( Modified files: core/fsets.m //zak ---------------------- diff included ---------------------- diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Wed Nov 16 18:40:18 2005 +++ amn/core/fsets.m Thu Nov 17 12:18:33 2005 @@ -177,7 +177,7 @@ ircii feature. */ stack push on 301 - on ^301 * xecho $fparse(format_whois_away $1-) + on ^301 * xecho $$fparse\(format_whois_away $$1-\) if (format_whois_header) { xecho $fparse(format_whois_header) } Date: Thu, 17 Nov 2005 12:39:19 -0500 (EST) From: zak@ircii.org (Zak) Log message: -remove original startup 'fixterm', requested by kreca. Modified files: amn.epic //zak ---------------------- diff included ---------------------- diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Thu Nov 17 05:05:42 2005 +++ amn/amn.epic Thu Nov 17 12:38:01 2005 @@ -114,7 +114,6 @@ ^modload oof -^fixterm ^update.f oof Date: Sat, 19 Nov 2005 02:08:39 -0500 (EST) From: zak@ircii.org (Zak) Log message: prioritize todo/bugs crap so we can get 1.3 out soon. Modified files: TODO-BUGS //zak ---------------------- diff included ---------------------- diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Wed Nov 16 18:38:57 2005 +++ amn/TODO-BUGS Sat Nov 19 02:06:50 2005 @@ -12,11 +12,14 @@ up right, but if modeshow/extpub is enabled (@crapple) won't have inline colors. it'll show up as probably colorized brackets and modeshow format colors. but not inline nick colors. found by adam. thanks!. +^^ will do when someone get's around to it to care enough. + $ /bwk does not show if the word is a kick or bwk after reloading. however whatever it was set to works properly but it's kinda annoying when everything outputs at bk when it's not actually set to bk. +^^ needs to be be corrected before release(hopefully) -## higher priority todo. +## higher priority todo. (stuff that needs to done before upcoming release) -parse notify of you being umode +g when a person msg's you.. some info.. [Alien88(dcc)] 718 <-- numeric [Alien88(dcc)] wouldn't be bad to treat it as a message sorta @@ -24,14 +27,6 @@ sample unparsed notice... kreca kreca@euro.trash :is messaging you, and you have umode +g. --fixdouble/fixwin or equiv for doublestats --make userlist support /addchan #chan,#chan2,#chan3 we already support * -it should be easy just add a $split(, $chanlist) -and change the $match() to $rmatch() -or something along those lines --better parses for /e /i outputs. --add a toggle to support bw or current theme(colors) in /relm and friends - also make it reparse through current theme for consistecy during usage. -make /delchan #chan delete channel apparently some ppl are slow to understand the meaning of /delchan # so i guess we should add in this capability for users with that defect i.e Xavier. @@ -49,12 +44,20 @@ kickops var. also add support to bwk to allow usage of wildcards. -@ some more documentation updates. a couple of more menu help systems. @ a amnesiac FAQ would be nice... any volunteers? + +@ fixdouble/fixwin or equiv for doublestats + @ an xy menu based help system for the xy module to add to /ehelp. -@ (Alien88_[alien@umich.edu]) if ov is toggled on - (Alien88_[alien@umich.edu]) reset opermodes //vote? +@ make userlist support /addchan #chan,#chan2,#chan3 we already support * + it should be easy just add a $split(, $chanlist) and change the $match() + to $rmatch() or something along those lines + +@ better parses for /e /i outputs. + +@ add a toggle to support bw or current theme(colors) in /relm and friends + also make it reparse through current theme for consistecy during usage. @ check to see if fkeys.m does need more @ bindctl usage in the future. (finished the todo of adding the @bindctl to do.fkey's alias) //zak Date: Sat, 19 Nov 2005 20:36:23 -0500 (EST) From: zak@ircii.org (Zak) Log message: correct some config aliases that kreca broke. Modified files: core/alias.m //zak ---------------------- diff included ---------------------- diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Fri Oct 28 04:54:59 2005 +++ amn/core/alias.m Sat Nov 19 20:34:58 2005 @@ -78,18 +78,17 @@ alias about {more $(loadpath)ans/about.ans} ## amnesiac configuration cmd's can be saved with /save -alias cumode {config f $*} -alias autoaway {config g $*} -alias kickonban {config i $*} -alias kickops {config j $*} -alias resp {config r $*} -alias timestamp {config t $*} +alias cumode {config misc a $*} +alias autoaway {config away b $*} +alias kickonban {config protect a $*} +alias kickops {config protect b $*} +alias resp {config misc c $*} +alias timestamp {config misc b $*} alias stamp {timestamp $*} -alias protect {config w $*} -alias otime {config p $*} -alias extpub {config h $*} +alias protect {config protect e $*} +alias otime {config misc h $*} +alias extpub {config misc f $*} alias tform {format 3 $*} -alias dstat {config z $*} ## compat aliases from other irc clients to emulate the same thing. alias awayt awaytime $* Date: Sun, 20 Nov 2005 21:49:07 -0500 (EST) From: zak@ircii.org (Zak) Log message: another whois parse from Alien88 Modified files: CHANGES core/fsets.m core/compat.m ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Nov 17 07:35:12 2005 +++ amn/CHANGES Sun Nov 20 21:46:50 2005 @@ -123,4 +123,7 @@ -More cosmetical changes to /config. The output is formed after an 80x25 terminal window. If anyone is using a window with less than 80 chars in width please give us a msg. //kreca --bump development version to 6 //kreca \ No newline at end of file +-bump development version to 6 //kreca + +20.09.05 +-add another whowas numeric(402) parse.. done by Alien88 thanks! //zak diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Fri Oct 7 10:35:57 2005 +++ amn/core/compat.m Sun Nov 20 21:44:56 2005 @@ -215,12 +215,17 @@ alias whowas (nick, number default "$num_of_whowas", void) { //whowas $nick $number; }; + addset auto_whowas bool { if ([$0] == [on]) { + ^on #-402 1 "*" { + whowas $1; + }; ^on #-401 1 "*" { whowas $1; }; } else { + ^on #-402 1 -"*"; ^on #-401 1 -"*"; }; }; diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Thu Nov 17 12:18:33 2005 +++ amn/core/fsets.m Sun Nov 20 21:44:56 2005 @@ -255,6 +255,14 @@ xecho $fparse(format_whois_header) xecho $fparse(format_whois_unknown $1) } + +## for /wii or whois nick nick +^on ^402 * { + xecho $fparse(format_whois_header) + xecho $fparse(format_whois_unknown $1) + xecho $fparse(format_whois_footer) +} + ^on ^369 * { xecho $fparse(format_whowas_footer) } Date: Sun, 20 Nov 2005 21:56:33 -0500 (EST) From: zak@ircii.org (Zak) Log message: correct dates noticed by Alien88 (thanks to kreca for fucking me up on this) Modified files: CHANGES ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Nov 17 07:35:12 2005 +++ amn/CHANGES Sun Nov 20 21:55:43 2005 @@ -114,7 +114,7 @@ -update development version to 4. this should be the final development minor before the 1.3 release. //zak -17.09.05 +11.17.05 -Huge changes to /config. The new format is /config
all the config sets and stuff has been redone //kreca -add undocumented public logging to /config //kreca @@ -123,4 +123,7 @@ -More cosmetical changes to /config. The output is formed after an 80x25 terminal window. If anyone is using a window with less than 80 chars in width please give us a msg. //kreca --bump development version to 6 //kreca \ No newline at end of file +-bump development version to 6 //kreca + +11.20.05 +-add another whowas numeric(402) parse.. done by Alien88 thanks! //zak diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Fri Oct 7 10:35:57 2005 +++ amn/core/compat.m Sun Nov 20 21:44:56 2005 @@ -215,12 +215,17 @@ alias whowas (nick, number default "$num_of_whowas", void) { //whowas $nick $number; }; + addset auto_whowas bool { if ([$0] == [on]) { + ^on #-402 1 "*" { + whowas $1; + }; ^on #-401 1 "*" { whowas $1; }; } else { + ^on #-402 1 -"*"; ^on #-401 1 -"*"; }; }; diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Thu Nov 17 12:18:33 2005 +++ amn/core/fsets.m Sun Nov 20 21:44:56 2005 @@ -255,6 +255,14 @@ xecho $fparse(format_whois_header) xecho $fparse(format_whois_unknown $1) } + +## for /wii or whois nick nick +^on ^402 * { + xecho $fparse(format_whois_header) + xecho $fparse(format_whois_unknown $1) + xecho $fparse(format_whois_footer) +} + ^on ^369 * { xecho $fparse(format_whowas_footer) } Date: Mon, 28 Nov 2005 05:51:49 +0000 From: Zach White Move sync.m to pasture. Hook 324 to get rid of the annoying 'Mode for channel is "+"' when the mode is not set. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Nov 28 05:33:53 2005 +++ amn/CHANGES Mon Nov 28 05:50:44 2005 @@ -127,3 +127,5 @@ 11.20.05 -add another whowas numeric(402) parse.. done by Alien88 thanks! //zak +-Move sync.m into pasture. //skullY +-Hook 324 for when modes aren't set. //skullY diff amn.orig/core/hooks.m amn/core/hooks.m --- amn.orig/core/hooks.m Mon Nov 28 05:33:53 2005 +++ amn/core/hooks.m Mon Nov 28 05:48:40 2005 @@ -116,3 +116,8 @@ ^on ^raw_irc "% PRIVMSG % :SOUND*" ^on ^raw_irc "% PRIVMSG % :ECHO*" ^on ^raw_irc "% PRIVMSG % :MP3*" + +# Deal with modes when they're not set +^on ^324 "% % +" { + xecho -b Mode for channel $1 is not set +} diff amn.orig/core/sync.m amn/core/sync.m --- amn.orig/core/sync.m Mon Nov 28 05:33:53 2005 +++ amn/core/sync.m Thu Jan 1 00:00:00 1970 @@ -1,27 +0,0 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. -subpackage sync - -## rain's utime_sub alias -alias utime_sub { - @:first=[$0.$pad(-6 0 $1)] - @:second=[$2.$pad(-6 0 $3)] - stack push set floating_point_math - ^set floating_point_math on - @:answer=first - second - stack pop set floating_point_math - return $trunc(6 $answer) -} - -## hop helped me by giving me this sync hook :) -on #-join 33 '$servernick($servernum()) *' { - @ jointime[$servernum()][$encode($tolower($1))] = utime() - wait -cmd who $1 -line {#} -end { - hook channel_synch $tolower($1) - @ :mytime = utime_sub($utime() $jointime[$servernum()][$encode($tolower($1))]) - ^assign -jointime[$servernum()][$encode($tolower($1))] - xecho -b -l crap join to $tolower($1) synced in $mytime seconds! - - } -} - diff amn.orig/modules/abot/abot.m amn/modules/abot/abot.m --- amn.orig/modules/abot/abot.m Mon Nov 28 05:33:53 2005 +++ amn/modules/abot/abot.m Mon Nov 28 05:36:12 2005 @@ -127,8 +127,6 @@ botload -#make sure sync.m get's loaded! -^eval ^load $(loadpath)core/sync.m alias abhelp abothelp alias abothelp { if (!$[0]) { diff amn.orig/modules/netsplit/netsplit.m amn/modules/netsplit/netsplit.m --- amn.orig/modules/netsplit/netsplit.m Mon Nov 28 05:33:53 2005 +++ amn/modules/netsplit/netsplit.m Mon Nov 28 05:36:18 2005 @@ -181,5 +181,3 @@ } # Many people contributed to this script. -#make sure sync.m get's loaded!. -^eval ^load $(loadpath)core/sync.m diff amn.orig/pasture/sync.m amn/pasture/sync.m --- amn.orig/pasture/sync.m Thu Jan 1 00:00:00 1970 +++ amn/pasture/sync.m Mon Nov 28 05:42:19 2005 @@ -0,0 +1,27 @@ +# Copyright (c) 2003-2005 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage sync + +## rain's utime_sub alias +alias utime_sub { + @:first=[$0.$pad(-6 0 $1)] + @:second=[$2.$pad(-6 0 $3)] + stack push set floating_point_math + ^set floating_point_math on + @:answer=first - second + stack pop set floating_point_math + return $trunc(6 $answer) +} + +## hop helped me by giving me this sync hook :) +on #-join 33 '$servernick($servernum()) *' { + @ jointime[$servernum()][$encode($tolower($1))] = utime() + wait -cmd who $1 -line {#} -end { + hook channel_synch $tolower($1) + @ :mytime = utime_sub($utime() $jointime[$servernum()][$encode($tolower($1))]) + ^assign -jointime[$servernum()][$encode($tolower($1))] + xecho -b -l crap join to $tolower($1) synced in $mytime seconds! + + } +} + Date: Mon, 28 Nov 2005 01:43:01 -0500 (EST) From: zak@ircii.org (Zak) Log message: initial reset of cmd line config aliases, more to come... skullY doesn't know the meaning of --delete when synching to a local copy remove core/config AGAIN. Modified files: CHANGES core/alias.m core/config.m core/config ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Nov 28 00:50:44 2005 +++ amn/CHANGES Mon Nov 28 01:40:25 2005 @@ -127,5 +127,8 @@ 11.20.05 -add another whowas numeric(402) parse.. done by Alien88 thanks! //zak + +11.28.05 -Move sync.m into pasture. //skullY -Hook 324 for when modes aren't set. //skullY +-move some config aliases into config.m which is more proper //zak diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Sat Nov 19 20:34:58 2005 +++ amn/core/alias.m Mon Nov 28 01:37:33 2005 @@ -77,19 +77,6 @@ alias a ahelp $* alias about {more $(loadpath)ans/about.ans} -## amnesiac configuration cmd's can be saved with /save -alias cumode {config misc a $*} -alias autoaway {config away b $*} -alias kickonban {config protect a $*} -alias kickops {config protect b $*} -alias resp {config misc c $*} -alias timestamp {config misc b $*} -alias stamp {timestamp $*} -alias protect {config protect e $*} -alias otime {config misc h $*} -alias extpub {config misc f $*} -alias tform {format 3 $*} - ## compat aliases from other irc clients to emulate the same thing. alias awayt awaytime $* alias verk {massk $*} diff -aruN amn.orig/core/config amn/core/config --- amn.orig/core/config Sun Oct 2 23:01:33 2005 +++ amn/core/config Wed Dec 31 19:00:00 1969 @@ -1,34 +0,0 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. - -cleararray oper -cleararray away -cleararray protect -cleararray misc - -eval osetitem protect (i) Kick on ban: [$(kickonban)] -eval osetitem protect (j) Kick ops: [$(kickops)] -eval osetitem protect (x) Ban Type: [$bt_] - -eval osetitem misc (f) Auto-connect umode: [$getumode] -eval osetitem misc (h) Extended publics: [$(showop)] -eval osetitem misc (t) Timestamps: [$_tss] -eval osetitem misc (m) Dcc autoget: [$(autoget)] -eval osetitem misc (r) Pubstring: [$_pubnick] -eval osetitem misc (z) Double fixed window: [$(windowdoubles)] - -fe ($listarray(_mods)) n1 { - if (n1 != [!] && fexist($(loadpath)modules/$(n1)/config)) { - load $(loadpath)modules/$(n1)/config - } -} - -eval aecho --------------------------= Away Settings =----------------------- -printsection away -eval aecho --------------------------= Protection Settings =----------------- -printsection protect -eval aecho --------------------------= Misc Settings =----------------------- -printsection misc -eval aecho --------------------------= Oper Settings =----------------------- -printsection oper -eval aecho ------------------------------------------------------------------ diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Thu Nov 17 05:34:39 2005 +++ amn/core/config.m Mon Nov 28 01:39:15 2005 @@ -216,6 +216,19 @@ config.windowdoubles -s $* } +## cmd line config aliases. +alias cumode {config misc a $*} +alias autoaway {config away b $*} +alias kickonban {config protect a $*} +alias kickops {config protect b $*} +alias resp {config misc c $*} +alias timestamp {config misc b $*} +alias stamp {timestamp $*} +alias protect {config protect e $*} +alias otime {config misc h $*} +alias extpub {config misc f $*} +alias tform {format 3 $*} + eval osetitem misc umode Auto-connect umode: eval osetitem misc timestamp Timestamps: eval osetitem misc pubnick Pubstring: Date: Mon, 28 Nov 2005 02:19:06 -0500 (EST) From: zak@ircii.org (Zak) Log message: merge windowhelp.m into ehelp.m cleanups of /config aliases which were kinda broken in the past two weeks, decided to fix it while doing some other minor cleanups now, before a release soon hopefully. note to skully core/winhelp.m IS NO LONGER EXISTENT. Modified files: CHANGES core/config.m core/winhelp.m core/ehelp.m away/away.m flood/flood.m mjoin/mjoin.m orignick/orignick.m sprot/sprot.m userlist/userlist.m ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Nov 28 01:40:25 2005 +++ amn/CHANGES Mon Nov 28 02:16:09 2005 @@ -132,3 +132,6 @@ -Move sync.m into pasture. //skullY -Hook 324 for when modes aren't set. //skullY -move some config aliases into config.m which is more proper //zak +-sync winhelp.m to ehelp.m where it should be. //zak +-minor cleanups of /config options in modules/core minor fixes + while i'm in there. //zak diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Mon Nov 28 01:39:15 2005 +++ amn/core/config.m Mon Nov 28 01:54:04 2005 @@ -217,16 +217,13 @@ } ## cmd line config aliases. -alias cumode {config misc a $*} -alias autoaway {config away b $*} -alias kickonban {config protect a $*} -alias kickops {config protect b $*} -alias resp {config misc c $*} -alias timestamp {config misc b $*} -alias stamp {timestamp $*} -alias protect {config protect e $*} -alias otime {config misc h $*} -alias extpub {config misc f $*} +alias cumode setumode $* +alias kickonban kob $* +alias kickops kops $* +alias resp _pubn $* +alias timestamp _tsmps $* +alias stamp timestamp $* +alias extpub modeshow $* alias tform {format 3 $*} eval osetitem misc umode Auto-connect umode: diff -aruN amn.orig/core/ehelp.m amn/core/ehelp.m --- amn.orig/core/ehelp.m Fri Oct 21 19:13:11 2005 +++ amn/core/ehelp.m Mon Nov 28 01:46:39 2005 @@ -111,3 +111,36 @@ } } + +alias winhelp { + if (!$[0]) { + +//echo --------------------= Windowing Help =----------------------------- + + //echo wc <window create> creates new hidden window + //echo wj <window join> creates new hidden window and joins specified channel + //echo wk <window kill> kills current window + //echo wlk <window leave kill> kills current window and parts channel + //echo cls <clear screen> clears notices/dcc/publics/etc in current window. + //echo wn <window next> window next switches to next hidden window + //echo wp <window prev> switches to previous hidden window + //echo mv <msg window> -hidden|split|kill + //echo wq <window query> /wq nick creates a query window with the nick + //echo wka <window kill all_hidden> attempts to kill all hidden windows. + //echo wko <window kill others> attempts to kill other windows on the screen if visible. + //echo wsl <window swap last> swaps to your last window. + input_char "menu paused hit the ANY key to continue " + pause + //echo wsa <window swap act> swaps to your activity window(s) from statbar. ie: act(3,4) + //echo wl <window list> lists windows in use + //echo wsg <window grow> grows current window ie: /wsg 7 + //echo wss <window shrink> shrinks current window ie: /wss 7 + //echo 1-25 <swap windows> swap windows ie: /1 for window 1 /2 for window 2 etc.. + //echo wlog <window log> toggles window logging + //echo wflush <window flush> window flush the scroll back epic5-0.0.6 and higher. + //echo wlevel <window levels> changes level of current window + //echo msgwin <msg window> wsl's then it wc's a window bound to msgs,notices +//echo --------------------------------------------------------------------------- + + } +} diff -aruN amn.orig/core/winhelp.m amn/core/winhelp.m --- amn.orig/core/winhelp.m Mon Oct 10 17:35:52 2005 +++ amn/core/winhelp.m Wed Dec 31 19:00:00 1969 @@ -1,36 +0,0 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. -subpackage winhelp - -alias winhelp { - if (!$[0]) { - -//echo --------------------= Windowing Help =----------------------------- - - //echo wc <window create> creates new hidden window - //echo wj <window join> creates new hidden window and joins specified channel - //echo wk <window kill> kills current window - //echo wlk <window leave kill> kills current window and parts channel - //echo cls <clear screen> clears notices/dcc/publics/etc in current window. - //echo wn <window next> window next switches to next hidden window - //echo wp <window prev> switches to previous hidden window - //echo mv <msg window> -hidden|split|kill - //echo wq <window query> /wq nick creates a query window with the nick - //echo wka <window kill all_hidden> attempts to kill all hidden windows. - //echo wko <window kill others> attempts to kill other windows on the screen if visible. - //echo wsl <window swap last> swaps to your last window. - input_char "menu paused hit the ANY key to continue " - pause - //echo wsa <window swap act> swaps to your activity window(s) from statbar. ie: act(3,4) - //echo wl <window list> lists windows in use - //echo wsg <window grow> grows current window ie: /wsg 7 - //echo wss <window shrink> shrinks current window ie: /wss 7 - //echo 1-25 <swap windows> swap windows ie: /1 for window 1 /2 for window 2 etc.. - //echo wlog <window log> toggles window logging - //echo wflush <window flush> window flush the scroll back epic5-0.0.6 and higher. - //echo wlevel <window levels> changes level of current window - //echo msgwin <msg window> wsl's then it wc's a window bound to msgs,notices -//echo --------------------------------------------------------------------------- - - } -} diff -aruN amn.orig/modules/away/away.m amn/modules/away/away.m --- amn.orig/modules/away/away.m Wed Nov 16 17:32:07 2005 +++ amn/modules/away/away.m Mon Nov 28 02:01:06 2005 @@ -2,12 +2,6 @@ # See the 'COPYRIGHT' file for more information. subpackage away -alias mlog {config b $*} -alias clog {config c $*} -alias nlog {config d $*} -alias dlog {config y $*} -alias playback readlog - alias remlog { if (fexist(~/.amn/away.log) == -1) { xecho $acban log file does not exist. @@ -197,8 +191,14 @@ config.awaypager -s $* } - - +## cmd line aliases. +alias mlog logm $* +alias clog logcrap $* +alias nlog logn $* +alias dlog logd $* +alias playback readlog +alias atime awaytime $* +alias atog awaytog $* ## pager crap here. ^on #-ctcp 2 "% % page*" { diff -aruN amn.orig/modules/flood/flood.m amn/modules/flood/flood.m --- amn.orig/modules/flood/flood.m Wed Nov 16 18:30:34 2005 +++ amn/modules/flood/flood.m Mon Nov 28 02:08:58 2005 @@ -49,4 +49,4 @@ alias mtime msgftimer $* alias mftime msgftimer $* -alias mflood {config k $*} +alias mflood msgflood $* diff -aruN amn.orig/modules/mjoin/mjoin.m amn/modules/mjoin/mjoin.m --- amn.orig/modules/mjoin/mjoin.m Wed Nov 16 18:20:06 2005 +++ amn/modules/mjoin/mjoin.m Mon Nov 28 02:05:36 2005 @@ -3,14 +3,11 @@ subpackage mjoin ## some aliases for mjoin -alias listc listchan alias chanlist listchan -alias ajlist listchan alias addjoin addchan $* alias ajoin addchan $* alias unajoin delchan $* alias deljoin delchan $* -alias rmjoin delchan $* alias unjoin delchan $* alias mjhelp ajhelp ##end aliases. diff -aruN amn.orig/modules/orignick/orignick.m amn/modules/orignick/orignick.m --- amn.orig/modules/orignick/orignick.m Wed Nov 16 18:23:03 2005 +++ amn/modules/orignick/orignick.m Mon Nov 28 02:03:30 2005 @@ -61,3 +61,6 @@ xecho $acban congrads nick juped. /staynick to cancel } } + +## cmd line config. +alias otime setorig $* diff -aruN amn.orig/modules/sprot/sprot.m amn/modules/sprot/sprot.m --- amn.orig/modules/sprot/sprot.m Tue Nov 15 17:54:06 2005 +++ amn/modules/sprot/sprot.m Mon Nov 28 02:10:02 2005 @@ -5,6 +5,9 @@ @kicklogo=[off] @klogo=[off] +## cmd line config. +alias protect _selfban $* + ^on #-mode_stripped 53 "% % +b*" { if (ischanop($N $1) && N != [$1]) { if (_ubanself == [on] && comatch(*!*$userhost($N) $3) > 0) { diff -aruN amn.orig/modules/userlist/userlist.m amn/modules/userlist/userlist.m --- amn.orig/modules/userlist/userlist.m Wed Nov 16 18:25:57 2005 +++ amn/modules/userlist/userlist.m Mon Nov 28 02:08:08 2005 @@ -28,6 +28,7 @@ alias delf userdel $* alias remf userdel $* alias unuser userdel $* +alias adelay setsec $* ## end compat. alias adduser { Date: Mon, 28 Nov 2005 03:16:02 -0500 (EST) From: zak@ircii.org (Zak) Log message: increment version, cleanup of some bantype/ban stuff/organizing. more to come yet. Modified files: CHANGES core/set.m core/channel.m core/alias.m core/bans.m ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Nov 28 02:16:09 2005 +++ amn/CHANGES Mon Nov 28 03:12:51 2005 @@ -135,3 +135,6 @@ -sync winhelp.m to ehelp.m where it should be. //zak -minor cleanups of /config options in modules/core minor fixes while i'm in there. //zak +-cleanup some uglyness of bans being in channel.m when it should be in + ban.m organize/comment things a bit better <-- more to come. //zak +-increment development version to 7. //zak diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Mon Nov 28 01:37:33 2005 +++ amn/core/alias.m Mon Nov 28 02:27:25 2005 @@ -171,7 +171,6 @@ } } - alias getuhost { if (userhost($0)==[@]) { wait for userhost $0 -cmd { @@ -236,6 +235,5 @@ //ctcp $0 version } } - oof diff -aruN amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Wed Nov 16 17:55:25 2005 +++ amn/core/bans.m Mon Nov 28 03:10:20 2005 @@ -2,6 +2,12 @@ # See the 'COPYRIGHT' file for more information. subpackage bans +## bantype vars(ugly hack for now) //crapple +@btn_ = [6] +@btb_ = [3] +@bth_ = [2] +@btd_ = [4] + ## Robohak's tban and takeall alias alias tban { @@ -100,6 +106,8 @@ } +## kickonban annoyance. (this will probably be removed in the future) + ^on #-mode_stripped 43 "% % +b*" { if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { fe ($onchannel($1)) n1 { @@ -117,6 +125,94 @@ } } } + +## ban aliases. +alias fuckem lban +alias lban mode $C +bbb *!*@0.0.0.0/1 *!*@128.0.0.0/1 *!*@0000::/1 $0 $0 $0 $0 +alias ip6ban {mode $C +b *!*@0000::/1} +alias ip4ban {mode $C +b *!*@0.0.0.0/1} +alias fakeop mode $C +oo-oo $0 $0 $0 $0 $0 $0 $0 $0 +alias hban {mode $C +b <3!<3@<3} + +## more complex ugly hacks. +alias ban { + if (![$0]) { + xecho -b syn: /ban nick + }{ + if (match(*!*@* $0)) { + //mode $C +b $0 + }{ + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($_bt $0!$3@$4) + } + } + }{ + //mode $C +b $mask($_bt $0!$userhost($0)) + } + } + } +} + +alias bankick { + if (![$0]) { + xecho -b syn: /bankick nick + }{ + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($_bt $0!$3@$4) + } + } + }{ + //mode $C -o+b $0 $mask($_bt $0!$userhost($0)) + } + kick $* + } +} + +alias kickban { + if (![$0]) { + xecho -b usage: /kickban nick + }{ + if ( numwords($*) < 2) { + if (![$@1]) { + kick $* + }{ + kick $C $0 $1- + } + } + } + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($_bt $0$3@$4) + } + } + }{ + //mode $C +b $mask($_bt $userhost($0)) + } +} + +alias iban { + if ([$0]) { + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b *!*$3@* + } + } + }{ + //mode $C +b *!*$before(@ $userhost($0))@* + } + kick $* + }{ + xecho $acban Usage: iban + } +} + +## end pollution. # configurations alias kob { diff -aruN amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Mon Oct 31 19:00:45 2005 +++ amn/core/channel.m Mon Nov 28 03:11:09 2005 @@ -38,14 +38,6 @@ alias dpart emopart $* alias lall partall -## diff ban types. -alias fuckem lban -alias lban mode $C +bbb *!*@0.0.0.0/1 *!*@128.0.0.0/1 *!*@0000::/1 $0 $0 $0 $0 -alias ip6ban {mode $C +b *!*@0000::/1} -alias ip4ban {mode $C +b *!*@0.0.0.0/1} -alias fakeop mode $C +oo-oo $0 $0 $0 $0 $0 $0 $0 $0 -alias hban {mode $C +b <3!<3@<3} - ## chan info. alias scano sco $* alias scanv scv $* @@ -113,26 +105,6 @@ } } -alias ban { - if (![$0]) { - xecho -b syn: /ban nick - }{ - if (match(*!*@* $0)) { - //mode $C +b $0 - }{ - if (userhost($0) == [@]) { - ^userhost $0 -cmd { - if ([$3@$4]!=[@]) { - //mode $C +b $mask($_bt $0!$3@$4) - } - } - }{ - //mode $C +b $mask($_bt $0!$userhost($0)) - } - } - } -} - alias inv { if (![$1]) { ^invite $0 $C @@ -165,46 +137,6 @@ } } -alias bankick { - if (![$0]) { - xecho -b syn: /bankick nick - }{ - if (userhost($0) == [@]) { - ^userhost $0 -cmd { - if ([$3@$4]!=[@]) { - //mode $C +b $mask($_bt $0!$3@$4) - } - } - }{ - //mode $C -o+b $0 $mask($_bt $0!$userhost($0)) - } - kick $* - } -} - -alias kickban { - if (![$0]) { - xecho -b usage: /kickban nick - }{ - if ( numwords($*) < 2) { - if (![$@1]) { - kick $* - }{ - kick $C $0 $1- - } - } - } - if (userhost($0) == [@]) { - ^userhost $0 -cmd { - if ([$3@$4]!=[@]) { - //mode $C +b $mask($_bt $0$3@$4) - } - } - }{ - //mode $C +b $mask($_bt $userhost($0)) - } -} - alias invkick { if ([$0]) { //mode $C +i @@ -213,23 +145,6 @@ } } -alias iban { - if ([$0]) { - if (userhost($0) == [@]) { - ^userhost $0 -cmd { - if ([$3@$4]!=[@]) { - //mode $C +b *!*$3@* - } - } - }{ - //mode $C +b *!*$before(@ $userhost($0))@* - } - kick $* - }{ - xecho $acban Usage: iban - } -} - alias op { if (![$0]) { banner.lchead @@ -326,7 +241,6 @@ mode $1 +o $0 } } } - alias lk if ([$0]) { fe ($nochops()) n1 { diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Thu Nov 17 07:34:49 2005 +++ amn/core/sets.m Mon Nov 28 02:22:54 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[6] +@rel_id=[7] @a.rel=[1.2d r/$rel_id] @a.date=[20051020] @_ss=[15] Date: Mon, 28 Nov 2005 03:50:32 -0500 (EST) From: zak@ircii.org (Zak) Log message: implement /bkn /bkh /bkd /bkb so ppl can specify bantypes on the fly when kicking the offender in current channel. requested by many. now it's kreca's turn to catch up on the slack. i am now offically on vacation ;D Modified files: CHANGES TODO-BUGS core/bans.m core/help.m ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Nov 28 02:16:09 2005 +++ amn/CHANGES Mon Nov 28 03:43:03 2005 @@ -135,3 +135,12 @@ -sync winhelp.m to ehelp.m where it should be. //zak -minor cleanups of /config options in modules/core minor fixes while i'm in there. //zak +-cleanup some uglyness of bans being in channel.m when it should be in + ban.m organize/comment things a bit better <-- more to come. //zak +-increment development version to 7. //zak +-finally got around to adding /bkh /bkn /bkb /bkd so users can bankick with + the prefered bantype on the fly. some explanation about the new bankick + types when one does /bkh nick it will bankick the offender out of the + current channel with type host. /bkh(host) /bkn(normal) /bkb(better) + /bkd(domain) requested by many. //zak + diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Sat Nov 19 02:06:50 2005 +++ amn/TODO-BUGS Mon Nov 28 03:46:47 2005 @@ -36,8 +36,6 @@ ## Procrastinated requests. @ rewrite topwin (removed to pasture). -@ A way to specify ban types on a per-ban basis. Either /bkn, /bkh, etc or - a flag to /kb? @ add a module to bwk involving. add repeat kick with option for # of repeats before kicking offender. should be toggable to allow specified channel..while making usage of the @@ -71,13 +69,16 @@ NONE for 'some bugs' ## bugs fixed. / projects done. +11.28.05 - finished by adding /bkn /bkh etc... //zak +! A way to specify ban types on a per-ban basis. Either /bkn, /bkh, etc or + a flag to /kb? + 11.16.05 - i think kreca fixed this a week ago.. ! fix up arrays regarding description/publics /format x y z etc... seems to be some confusion and not outputting backgrounded channels on most available formats and other weirdness. -11.08.05 -## highest priority TODO. +11.08.05 ! make away only output irritating static only once, 120 second idle timeout fixed by kreca. diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Mon Nov 28 01:37:33 2005 +++ amn/core/alias.m Mon Nov 28 02:27:25 2005 @@ -171,7 +171,6 @@ } } - alias getuhost { if (userhost($0)==[@]) { wait for userhost $0 -cmd { @@ -236,6 +235,5 @@ //ctcp $0 version } } - oof diff -aruN amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Wed Nov 16 17:55:25 2005 +++ amn/core/bans.m Mon Nov 28 03:32:41 2005 @@ -2,6 +2,12 @@ # See the 'COPYRIGHT' file for more information. subpackage bans +## bantype vars(ugly hack for now) //crapple +@btn_ = [6] +@btb_ = [3] +@bth_ = [2] +@btd_ = [4] + ## Robohak's tban and takeall alias alias tban { @@ -100,6 +106,8 @@ } +## kickonban annoyance. (this will probably be removed in the future) + ^on #-mode_stripped 43 "% % +b*" { if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { fe ($onchannel($1)) n1 { @@ -117,6 +125,169 @@ } } } + +## ban aliases. +alias fuckem lban +alias lban mode $C +bbb *!*@0.0.0.0/1 *!*@128.0.0.0/1 *!*@0000::/1 $0 $0 $0 $0 +alias ip6ban {mode $C +b *!*@0000::/1} +alias ip4ban {mode $C +b *!*@0.0.0.0/1} +alias fakeop mode $C +oo-oo $0 $0 $0 $0 $0 $0 $0 $0 +alias hban {mode $C +b <3!<3@<3} + +## more complex ugly hacks. +alias ban { + if (![$0]) { + xecho -b syn: /ban nick + }{ + if (match(*!*@* $0)) { + //mode $C +b $0 + }{ + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($_bt $0!$3@$4) + } + } + }{ + //mode $C +b $mask($_bt $0!$userhost($0)) + } + } + } +} + +alias bankick { + if (![$0]) { + xecho -b syn: /bankick nick + }{ + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($_bt $0!$3@$4) + } + } + }{ + //mode $C -o+b $0 $mask($_bt $0!$userhost($0)) + } + kick $* + } +} + +## ok this is a hack for now until someone has a better way of doing this +## basically this crap here allows you to specify the bantype you want to +## use on the fly without needing to set /bantype instead now we have +## /bkh(host) /bkb(better) /bkn(normal) /bkd(domain) followed by nick. + +alias bkh { + if (![$0]) { + xecho -b syn: /bkh nick + }{ + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($bth_ $0!$3@$4) + } + } + }{ + //mode $C -o+b $0 $mask($bth_ $0!$userhost($0)) + } + kick $* + } +} + +alias bkb { + if (![$0]) { + xecho -b syn: /bkb nick + }{ + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($btb_ $0!$3@$4) + } + } + }{ + //mode $C -o+b $0 $mask($btb_ $0!$userhost($0)) + } + kick $* + } +} + +alias bkn { + if (![$0]) { + xecho -b syn: /bkn nick + }{ + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($btn_ $0!$3@$4) + } + } + }{ + //mode $C -o+b $0 $mask($btn_ $0!$userhost($0)) + } + kick $* + } +} + +alias bkd { + if (![$0]) { + xecho -b syn: /bkd nick + }{ + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($btd_ $0!$3@$4) + } + } + }{ + //mode $C -o+b $0 $mask($btd_ $0!$userhost($0)) + } + kick $* + } +} + +## end bankick type on the fly hacks. + +alias kickban { + if (![$0]) { + xecho -b usage: /kickban nick + }{ + if ( numwords($*) < 2) { + if (![$@1]) { + kick $* + }{ + kick $C $0 $1- + } + } + } + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b $mask($_bt $0$3@$4) + } + } + }{ + //mode $C +b $mask($_bt $userhost($0)) + } +} + +alias iban { + if ([$0]) { + if (userhost($0) == [@]) { + ^userhost $0 -cmd { + if ([$3@$4]!=[@]) { + //mode $C +b *!*$3@* + } + } + }{ + //mode $C +b *!*$before(@ $userhost($0))@* + } + kick $* + }{ + xecho $acban Usage: iban + } +} + +## end pollution. # configurations alias kob { diff -aruN amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Mon Oct 31 19:00:45 2005 +++ amn/core/channel.m Mon Nov 28 03:11:09 2005 @@ -38,14 +38,6 @@ alias dpart emopart $* alias lall partall -## diff ban types. -alias fuckem lban -alias lban mode $C +bbb *!*@0.0.0.0/1 *!*@128.0.0.0/1 *!*@0000::/1 $0 $0 $0 $0 -alias ip6ban {mode $C +b *!*@0000::/1} -alias ip4ban {mode $C +b *!*@0.0.0.0/1} -alias fakeop mode $C +oo-oo $0 $0 $0 $0 $0 $0 $0 $0 -alias hban {mode $C +b <3!<3@<3} - ## chan info. alias scano sco $* alias scanv scv $* @@ -113,26 +105,6 @@ } } -alias ban { - if (![$0]) { - xecho -b syn: /ban nick - }{ - if (match(*!*@* $0)) { - //mode $C +b $0 - }{ - if (userhost($0) == [@]) { - ^userhost $0 -cmd { - if ([$3@$4]!=[@]) { - //mode $C +b $mask($_bt $0!$3@$4) - } - } - }{ - //mode $C +b $mask($_bt $0!$userhost($0)) - } - } - } -} - alias inv { if (![$1]) { ^invite $0 $C @@ -165,46 +137,6 @@ } } -alias bankick { - if (![$0]) { - xecho -b syn: /bankick nick - }{ - if (userhost($0) == [@]) { - ^userhost $0 -cmd { - if ([$3@$4]!=[@]) { - //mode $C +b $mask($_bt $0!$3@$4) - } - } - }{ - //mode $C -o+b $0 $mask($_bt $0!$userhost($0)) - } - kick $* - } -} - -alias kickban { - if (![$0]) { - xecho -b usage: /kickban nick - }{ - if ( numwords($*) < 2) { - if (![$@1]) { - kick $* - }{ - kick $C $0 $1- - } - } - } - if (userhost($0) == [@]) { - ^userhost $0 -cmd { - if ([$3@$4]!=[@]) { - //mode $C +b $mask($_bt $0$3@$4) - } - } - }{ - //mode $C +b $mask($_bt $userhost($0)) - } -} - alias invkick { if ([$0]) { //mode $C +i @@ -213,23 +145,6 @@ } } -alias iban { - if ([$0]) { - if (userhost($0) == [@]) { - ^userhost $0 -cmd { - if ([$3@$4]!=[@]) { - //mode $C +b *!*$3@* - } - } - }{ - //mode $C +b *!*$before(@ $userhost($0))@* - } - kick $* - }{ - xecho $acban Usage: iban - } -} - alias op { if (![$0]) { banner.lchead @@ -326,7 +241,6 @@ mode $1 +o $0 } } } - alias lk if ([$0]) { fe ($nochops()) n1 { diff -aruN amn.orig/core/help.m amn/core/help.m --- amn.orig/core/help.m Mon Oct 31 18:58:25 2005 +++ amn/core/help.m Mon Nov 28 03:38:38 2005 @@ -2,7 +2,7 @@ # See the 'COPYRIGHT' file for more information. subpackage help -@hwords=[rn rk vocs bantype fset ban mko mkn massk orignick ub sping bkt dldir ps ls cd dns nslookup fkeys format q bans banstat wii mdop mdeop dop dv v scano scanv scann t k umode m j l wi ver c nochat chat bk op voice deop mop cycle mreop readlog wall user chops sv frelm tsave freln away back format config color sbcolor dict fsave sbar scan wk wlk wn wp wj wc csave banstat bankick cig cops devoice fctcp iban inv kickban kb invkick ik links lk lsay mdv more mv mw nops not partall qk staynick supt theme tig unban untheme winhelp] +@hwords=[rn rk vocs bantype fset bkn bkh bkb bkd ban mko mkn massk orignick ub sping bkt dldir ps ls cd dns nslookup fkeys format q bans banstat wii mdop mdeop dop dv v scano scanv scann t k umode m j l wi ver c nochat chat bk op voice deop mop cycle mreop readlog wall user chops sv frelm tsave freln away back format config color sbcolor dict fsave sbar scan wk wlk wn wp wj wc csave banstat bankick cig cops devoice fctcp iban inv kickban kb invkick ik links lk lsay mdv more mv mw nops not partall qk staynick supt theme tig unban untheme winhelp] alias ahelp if (![$0]) { banner.head @_ohcenter=[${word(0 $geom()) / 2 + 40}] @@ -126,6 +126,10 @@ @ :mkn = [%Wu%nsage%K:%n /mkn text will kick all non op'd from channel @ :mko = [%Wu%nsage%K:%n /mko text will kick all ops from channel @ :massk = [%Wu%nsage%K:%n /massk will kick all users from the channel with specified version string +@ :bkh = [%Wu%nsage%K%n /bkh nick will ban nick with bantype host from current channel +@ :bkn = [%Wu%nsage%K%n /bkn nick will ban nick with bantype normal from current channel +@ :bkb = [%Wu%nsage%K%n /bkb nick will ban nick with bantype better from current channel +@ :bkd = [%Wu%nsage%K%n /bkd nick will ban nick with bantype domain from current channel @ :ban = [%Wu%nsage%K:%n /ban nick will ban nick's userhost from current channel @ :fkey = [%Wu%nsage%K:%n /fkey <#1-12> will set function keys to specified command @ :fset = [%Wu%nsage%K:%n /fset format_choice will change specified format diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Thu Nov 17 07:34:49 2005 +++ amn/core/sets.m Mon Nov 28 02:22:54 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[6] +@rel_id=[7] @a.rel=[1.2d r/$rel_id] @a.date=[20051020] @_ss=[15] Date: Mon, 28 Nov 2005 05:55:38 -0500 (EST) From: zak@ircii.org (Zak) Log message: Make fkey.m adapt to the new @ bindctl which actually works this time around. i think that's the last of all the old usages of ^bind. Modified files: CHANGES TODO-BUGS core/fkey.m ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Nov 28 03:43:03 2005 +++ amn/CHANGES Mon Nov 28 05:51:26 2005 @@ -143,4 +143,4 @@ types when one does /bkh nick it will bankick the offender out of the current channel with type host. /bkh(host) /bkn(normal) /bkb(better) /bkd(domain) requested by many. //zak - +-make fkey use proper bindings the RIGHT way this time //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Mon Nov 28 03:46:47 2005 +++ amn/TODO-BUGS Mon Nov 28 05:52:37 2005 @@ -57,10 +57,6 @@ @ add a toggle to support bw or current theme(colors) in /relm and friends also make it reparse through current theme for consistecy during usage. -@ check to see if fkeys.m does need more @ bindctl usage in the future. - (finished the todo of adding the @bindctl to do.fkey's alias) //zak - it broke as i released cvs13g backed out changes until later //zak. - @ finish up or scrap the adcc module, i really hate to touch this myself i have never heard of a request for this module nor have i heard a single complaint about it working or not working perhaps a vote? @@ -69,6 +65,11 @@ NONE for 'some bugs' ## bugs fixed. / projects done. +11.28.05 - tried tested and true! finally works this time around. //zak +! check to see if fkeys.m does need more @ bindctl usage in the future. + (finished the todo of adding the @bindctl to do.fkey's alias) //zak + it broke as i released cvs13g backed out changes until later //zak. + 11.28.05 - finished by adding /bkn /bkh etc... //zak ! A way to specify ban types on a per-ban basis. Either /bkn, /bkh, etc or a flag to /kb? diff -aruN amn.orig/core/fkey.m amn/core/fkey.m --- amn.orig/core/fkey.m Mon Oct 10 20:51:38 2005 +++ amn/core/fkey.m Mon Nov 28 05:48:07 2005 @@ -129,24 +129,24 @@ } } -^bind ^[[[A parse_command $fke1 -^bind ^[OP parse_command $fke1 -^bind ^[[11~ parse_command $fke1 -^bind ^[[[B parse_command $fke2 -^bind ^[OQ parse_command $fke2 -^bind ^[[12~ parse_command $fke2 -^bind ^[[[C parse_command $fke3 -^bind ^[OR parse_command $fke3 -^bind ^[[13~ parse_command $fke3 -^bind ^[[[D parse_command $fke4 -^bind ^[OS parse_command $fke4 -^bind ^[[14~ parse_command $fke4 -^bind ^[[[E parse_command $fke5 -^bind ^[[15~ parse_command $fke5 -^bind ^[[17~ parse_command $fke6 -^bind ^[[18~ parse_command $fke7 -^bind ^[[19~ parse_command $fke8 -^bind ^[[20~ parse_command $fke9 -^bind ^[[21~ parse_command $fke10 -^bind ^[[23~ parse_command $fke11 -^bind ^[[24~ parse_command $fke12 +@ bindctl(sequence ^[[[A set parse_command $fke1) +@ bindctl(sequence ^[OP set parse_command $fke1) +@ bindctl(sequence ^[[11~ set parse_command $fke1) +@ bindctl(sequence ^[[[B set parse_command $fke2) +@ bindctl(sequence ^[OQ set parse_command $fke2) +@ bindctl(sequence ^[[12~ set parse_command $fke2) +@ bindctl(sequence ^[[[C set parse_command $fke3) +@ bindctl(sequence ^[OR set parse_command $fke3) +@ bindctl(sequence ^[[13~ set parse_command $fke3) +@ bindctl(sequence ^[[[D set parse_command $fke4) +@ bindctl(sequence ^[OS set parse_command $fke4) +@ bindctl(sequence ^[[14~ set parse_command $fke4) +@ bindctl(sequence ^[[[E set parse_command $fke5) +@ bindctl(sequence ^[[15~ set parse_command $fke5) +@ bindctl(sequence ^[[17~ set parse_command $fke6) +@ bindctl(sequence ^[[18~ set parse_command $fke7) +@ bindctl(sequence ^[[19~ set parse_command $fke8) +@ bindctl(sequence ^[[20~ set parse_command $fke9) +@ bindctl(sequence ^[[21~ set parse_command $fke10) +@ bindctl(sequence ^[[23~ set parse_command $fke11) +@ bindctl(sequence ^[[24~ set parse_command $fke12) Date: Mon, 28 Nov 2005 06:38:22 -0500 (EST) From: zak@ircii.org (Zak) Log message: add CID parses, mostly for Alien88 but useful to me. kreca will finish adding the keybinding hooks later or maybe some subtle changes in case he doesn't like my COLOURS ;(((( see CHANGES for more info. Modified files: CHANGES TODO-BUGS core/fsets.m ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Nov 28 05:51:26 2005 +++ amn/CHANGES Mon Nov 28 06:33:51 2005 @@ -144,3 +144,9 @@ current channel with type host. /bkh(host) /bkn(normal) /bkb(better) /bkd(domain) requested by many. //zak -make fkey use proper bindings the RIGHT way this time //zak +-parse CID notifications nicely with a default level of msg, to help + people like me and some other's not miss it in channels, to modify + the behavior of it edit amn/core/fset.m look for CID. + somewhat some more to be done to this yet.(keybindings) + 06:30| irc.umich.edu zak@emogroupie.scenewhore.org (ninjazak) + ^^ sample output for umode +g //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Mon Nov 28 05:52:37 2005 +++ amn/TODO-BUGS Mon Nov 28 06:36:10 2005 @@ -20,13 +20,6 @@ ^^ needs to be be corrected before release(hopefully) ## higher priority todo. (stuff that needs to done before upcoming release) --parse notify of you being umode +g when a person msg's you.. some info.. -[Alien88(dcc)] 718 <-- numeric -[Alien88(dcc)] wouldn't be bad to treat it as a message sorta -[Alien88(dcc)] i tend to loose them in channels a lot of times. <-- proplem -sample unparsed notice... -kreca kreca@euro.trash :is messaging you, and you have umode +g. - -make /delchan #chan delete channel apparently some ppl are slow to understand the meaning of /delchan # so i guess we should add in this capability for users with that defect i.e Xavier. @@ -65,6 +58,9 @@ NONE for 'some bugs' ## bugs fixed. / projects done. +11.28.05 - just needs a hook.. kreca will finish the rest of it soon. //zak +! parse notify of you being umode +g when a person msg's you.. + 11.28.05 - tried tested and true! finally works this time around. //zak ! check to see if fkeys.m does need more @ bindctl usage in the future. (finished the todo of adding the @bindctl to do.fkey's alias) //zak diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Sun Nov 20 21:44:56 2005 +++ amn/core/fsets.m Mon Nov 28 06:29:38 2005 @@ -147,6 +147,13 @@ aecho $fparse(format_timestamp_some $($_timess))$(hwht)\<$(cl)knock$(hwht)\>$(cl) $(hred)$0$(cl) $(hwht)$(thenick)$(cl)$therest \($1\) } +## CID notification. +^on ^718 * { +@:thenick=word(0 $split(! $2)) +@:therest=mid($strlen($thenick) $strlen($2) $2) + xecho -l msg $fparse(format_timestamp_some $($_timess))$(hwht)\<$(cl)CID$(hwht)\>$(cl) $(hred)$0$(cl) $(hblu)$(thenick)$(cl)$therest \($1\) +} + ## topic stuff ^on ^331 * xecho -b $fparse(format_notopic $1-) ^on ^332 * xecho -b $fparse(format_settopic $1-) From: Kreca Date: Mon, 28 Nov 2005 23:21:21 +0100 (CET) large public_format cleanup check changelog diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Nov 28 12:33:51 2005 +++ amn/CHANGES Mon Nov 28 23:18:07 2005 @@ -150,3 +150,6 @@ somewhat some more to be done to this yet.(keybindings) 06:30| irc.umich.edu zak@emogroupie.scenewhore.org (ninjazak) ^^ sample output for umode +g //zak +-fix format public so it'll show colours when showop is on + more + logical separation. however this will break backwards compability + with saved formats, PLEASE REMOVE .amn BEFORE COMPLAINING. //kreca diff -aruN amn.orig/arrays/public.a amn/arrays/public.a --- amn.orig/arrays/public.a Sat Oct 29 03:50:50 2005 +++ amn/arrays/public.a Mon Nov 28 23:12:11 2005 @@ -4,33 +4,33 @@ ## public formats @ delarray(pubform) @ setitem(pubform 0 !) -@ setitem(pubform 1 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(pubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\\\)%n $$2-) -@ setitem(pubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<%n$$1$$(hmag)>%n $$2-) -@ setitem(pubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\(%n$$1$$(hmag)\\\)%n $$2-) -@ setitem(pubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<%n$$1$$(hblu)>%n $$2-) -@ setitem(pubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) -@ setitem(pubform 7 $$fparse(format_timestamp_some $($_timess))%b<%n$$1%b>%n $$2-) -@ setitem(pubform 8 $$fparse(format_timestamp_some $($_timess))%b\\\(%n$$1%b\\\)%n $$2-) -@ setitem(pubform 9 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(pubform 10 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$1%K>%n $$2-) -@ setitem(pubform 11 $$fparse(format_timestamp_some $($_timess))%K<$$(c3)$$1%K>%n $$2-) -@ setitem(pubform 12 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$1$$(c1)>%n $$2-) -@ setitem(pubform 13 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$1$$(c3)>%n $$2-) -@ setitem(pubform 14 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\)%n $$2-) -@ setitem(pubform 15 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K\)%n $$2-) -@ setitem(pubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c3)$$1%K\)%n $$2-) -@ setitem(pubform 17 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)\)%n $$2-) -@ setitem(pubform 18 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)\)%n $$2-) -@ setitem(pubform 19 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$2-) -@ setitem(pubform 20 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)]%n $$2-) -@ setitem(pubform 21 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)]%n $$2-) -@ setitem(pubform 22 $$fparse(format_timestamp_some $($_timess))<$$1> $$2-) -@ setitem(pubform 23 <$$1> $$2-) +@ setitem(pubform 1 $$fparse(format_timestamp_some $($_timess))%K<$$pubpad(%n 0 $1 $2-)%K>%n $$2-) +@ setitem(pubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\($$pubpad(%n 0 $1 $2-)%K\\\)%n $$2-) +@ setitem(pubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<$$pubpad(%n 0 $1 $2-)$$(hmag)>%n $$2-) +@ setitem(pubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\($$pubpad(%n 0 $1 $2-)$$(hmag)\\\)%n $$2-) +@ setitem(pubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<$$pubpad(%n 0 $1 $2-)$$(hblu)>%n $$2-) +@ setitem(pubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\($$pubpad(%n 0 $1 $2-)$$(hblu)\\\)%n $$2-) +@ setitem(pubform 7 $$fparse(format_timestamp_some $($_timess))%b<$$pubpad(%n 0 $1 $2-)%b>%n $$2-) +@ setitem(pubform 8 $$fparse(format_timestamp_some $($_timess))%b\\\($$pubpad(%n 0 $1 $2-)%b\\\)%n $$2-) +@ setitem(pubform 9 $$fparse(format_timestamp_some $($_timess))%K<$$pubpad(%n 0 $1 $2-)%K>%n $$2-) +@ setitem(pubform 10 $$fparse(format_timestamp_some $($_timess))%K<$$pubpad($c1 0 $1 $2-)%K>%n $$2-) +@ setitem(pubform 11 $$fparse(format_timestamp_some $($_timess))%K<$$pubpad($c3 0 $1 $2-)%K>%n $$2-) +@ setitem(pubform 12 $$fparse(format_timestamp_some $($_timess))$$(c1)<$$pubpad(%n 0 $1 $2-)$$(c1)>%n $$2-) +@ setitem(pubform 13 $$fparse(format_timestamp_some $($_timess))$$(c3)<$$pubpad(%n 0 $1 $2-)$$(c3)>%n $$2-) +@ setitem(pubform 14 $$fparse(format_timestamp_some $($_timess))%K\\\($$pubpad(%n 0 $1 $2-)%K\)%n $$2-) +@ setitem(pubform 15 $$fparse(format_timestamp_some $($_timess))%K\\\($$pubpad($c1 0 $1 $2-)%K\)%n $$2-) +@ setitem(pubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\($$pubpad($c3 0 $1 $2-)%K\)%n $$2-) +@ setitem(pubform 17 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\($$pubpad(%n 0 $1 $2-)$$(c1)\)%n $$2-) +@ setitem(pubform 18 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\($$pubpad(%n 0 $1 $2-)$$(c3)\)%n $$2-) +@ setitem(pubform 19 $$fparse(format_timestamp_some $($_timess))%K[$$pubpad(%n 0 $1 $2-)%K]%n $$2-) +@ setitem(pubform 20 $$fparse(format_timestamp_some $($_timess))$$(c1)[$$pubpad(%n 0 $1 $2-)$$(c1)]%n $$2-) +@ setitem(pubform 21 $$fparse(format_timestamp_some $($_timess))$$(c3)[$$pubpad(%n 0 $1 $2-)$$(c3)]%n $$2-) +@ setitem(pubform 22 $$fparse(format_timestamp_some $($_timess))<$$pubpad(%n 0 $1 $2-)> $$2-) +@ setitem(pubform 23 <$$pubpad(%n 0 $1 $2-)> $$2-) ## pubform 24-26 - crapple 8.06.05 -@ setitem(pubform 24 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\(%n$$1$$(wht)\\\)%n $$2-) -@ setitem(pubform 25 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\(%n$$1$$(cl)\\\)%n $$2-) -@ setitem(pubform 26 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\(%n$$1$$(hwht)\\\)%n $$2-) +@ setitem(pubform 24 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\($$pubpad(%n 0 $1 $2-)$$(wht)\\\)%n $$2-) +@ setitem(pubform 25 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\($$pubpad(%n 0 $1 $2-)$$(cl)\\\)%n $$2-) +@ setitem(pubform 26 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\($$pubpad(%n 0 $1 $2-)$$(hwht)\\\)%n $$2-) ## send public formats @ delarray(spubform) diff -aruN amn.orig/core/format.m amn/core/format.m --- amn.orig/core/format.m Sat Oct 22 08:51:32 2005 +++ amn/core/format.m Mon Nov 28 23:16:18 2005 @@ -103,7 +103,7 @@ alias pubform if ([$0]) { if (isnumber($0)&&[$0] to set public format xecho $acban current format set to $pubform diff -aruN amn.orig/core/modeshow.m amn/core/modeshow.m --- amn.orig/core/modeshow.m Wed Nov 16 23:48:13 2005 +++ amn/core/modeshow.m Mon Nov 28 23:13:17 2005 @@ -23,35 +23,40 @@ #end of config -on ^public * { - @extravar = [] - @thenick =[$0] +alias pubpad { + @:thenick=word(0 $split(: $2)) + @:thechan=word(1 $split(: $2)) + @:extravar=[] if (showop == [on]) { - if (ischanop($0 $1)) { - @extravar = [$(c5)@$(cl)] - } else if (ischanvoice($0 $1)) { - @extravar = [$(c5)+$(cl)] + if (ischanop($thenick $thechan)) { + @:extravar = [$(c5)@$(cl)] + } else if (ischanvoice($thenick $thechan)) { + @:extravar = [$(c5)+$(cl)] } } - if (match($_pubnick* $2-) > 0) { - @thenick=[$(hwht)$0$(cl)] - } - if (match($_r2* $2-) > 0) { - @thenick=[$(hwht)$0$(cl)] - } - if (match($_r3* $2-) > 0) { - @thenick=[$(hwht)$0$(cl)] - } - if (match($_r4* $2-) > 0) { - @thenick=[$(hwht)$0$(cl)] + if ([$1]>0) { + @:thenick=[$[$1]thenick] + if (!strlen($extravar)){ + @:thenick=[ $thenick] + } + } +/* split this up in two if statements, expression has too many operands */ + if ( match($_pubnick* $3-) > 0 || match($_r2* $3-) > 0 ) { + @:thenick=[$(hwht)$(thenick)$(cl)] } - if (winchan($0)==-1 || winchan($winchan($1)) != [$1] ) { - //echo $fparse(format_public $(extravar)$(thenick):$1 $2-) - } else { - //echo $fparse(format_public $(extravar)$thenick $2-) + if (match($_r3* $3-) > 0 || match($_r4* $3-) > 0) { + @:thenick=[$(hwht)$(thenick)$(cl)] } + if (!iscurchan($thechan)) { + return $(extravar)$0$(thenick):$thechan + } else { + return $(extravar)$0$(thenick) + } +} +on ^public * { + //echo $fparse(format_public $0:$1 $2-) } on ^public_other * { Date: Mon, 28 Nov 2005 17:44:22 -0500 (EST) From: zak@ircii.org (Zak) Log message: sync TODO-BUGS to reality.. major public_format fix. should make lots happy. Modified files: TODO-BUGS ---------------------- diff included ---------------------- diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Mon Nov 28 06:36:10 2005 +++ amn/TODO-BUGS Mon Nov 28 17:41:53 2005 @@ -8,12 +8,6 @@ ? = undecided/closed votes. ## bugs. -$ when using inline colors on public formats ie; (crapple) will show - up right, but if modeshow/extpub is enabled (@crapple) won't have inline - colors. it'll show up as probably colorized brackets and modeshow format - colors. but not inline nick colors. found by adam. thanks!. -^^ will do when someone get's around to it to care enough. - $ /bwk does not show if the word is a kick or bwk after reloading. however whatever it was set to works properly but it's kinda annoying when everything outputs at bk when it's not actually set to bk. @@ -58,6 +52,12 @@ NONE for 'some bugs' ## bugs fixed. / projects done. +11.28.05 - kreca finally figured out a fix/workaround see CHANGES. //kreca +! when using inline colors on public formats ie; (BcrappleB) will show + up right, but if modeshow/extpub is enabled (@crapple) won't have inline + colors. it'll show up as probably colorized brackets and modeshow format + colors. but not inline nick colors. found by adam. thanks!. + 11.28.05 - just needs a hook.. kreca will finish the rest of it soon. //zak ! parse notify of you being umode +g when a person msg's you.. Date: Mon, 28 Nov 2005 18:26:55 -0500 (EST) From: zak@ircii.org (Zak) Log message: add alt-y binding to CID requests, both levels are set to msg. clear up some cid aliases to make more sense. Modified files: CHANGES core/fsets.m core/alias.m core/bind.m ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Nov 28 17:18:07 2005 +++ amn/CHANGES Mon Nov 28 18:25:06 2005 @@ -152,4 +152,6 @@ ^^ sample output for umode +g //zak -fix format public so it'll show colours when showop is on + more logical separation. however this will break backwards compability - with saved formats, PLEASE REMOVE .amn BEFORE COMPLAINING. //kreca \ No newline at end of file + with saved formats, PLEASE REMOVE .amn BEFORE COMPLAINING. //kreca +-add keybinding of alt-y to CID to accept. add a bit more clearer + CID aliases. //zak diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Mon Nov 28 02:27:25 2005 +++ amn/core/alias.m Mon Nov 28 18:22:35 2005 @@ -27,11 +27,12 @@ ## cid(+g) alias accept { quote accept $*} -alias cid accept $* +alias cid acceptlist alias rmcid { quote accept -$*} alias acceptlist { quote accept * } +alias clist acceptlist +alias cdel rmcid $* alias cidlist acceptlist -alias rmaccept rmcid $* alias acceptdel rmcid $* ## dalnets dcc bullshit so called "protection" diff -aruN amn.orig/core/bind.m amn/core/bind.m --- amn.orig/core/bind.m Sun Oct 2 22:59:55 2005 +++ amn/core/bind.m Mon Nov 28 18:19:48 2005 @@ -23,6 +23,9 @@ @ bindctl(sequence ^Z set parse_command switchtarget) @ bindctl(sequence ^Wd set next_window) +## CID stuff. +^bind ^[y parse_command accept $pop(cidreq) + ## home/end on some terms. @ bindctl(sequence ^[[1~ set scroll_start) @ bindctl(sequence ^[[4~ set scroll_end) diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Mon Nov 28 06:29:38 2005 +++ amn/core/fsets.m Mon Nov 28 18:18:29 2005 @@ -152,6 +152,8 @@ @:thenick=word(0 $split(! $2)) @:therest=mid($strlen($thenick) $strlen($2) $2) xecho -l msg $fparse(format_timestamp_some $($_timess))$(hwht)\<$(cl)CID$(hwht)\>$(cl) $(hred)$0$(cl) $(hblu)$(thenick)$(cl)$therest \($1\) + push cidreq $1 + xecho -l msg $fparse(format_timestamp_some $($_timess))$(hwht)\<$(cl)CID$(hwht)\>$(cl) Press alt-Y to accept from $1 } ## topic stuff From: Kreca Date: Wed, 30 Nov 2005 00:02:31 +0100 (CET) Add theme lookgood by sirko/manta Modify all send_formats as we did with regular formats yesterday diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Nov 29 00:25:06 2005 +++ amn/CHANGES Tue Nov 29 23:58:05 2005 @@ -155,3 +155,11 @@ with saved formats, PLEASE REMOVE .amn BEFORE COMPLAINING. //kreca -add keybinding of alt-y to CID to accept. add a bit more clearer CID aliases. //zak + +11.29.05 +-add huge theme, lookgood, by sirko. Many thanks, new scan, statbar, + many formats, whois (8) etc. Type /theme lookgood to check it out! + the pubpad and spubpad functions were written with this theme in mind + currently it pads to the nick lenght 9 (efnet).//kreca +-clean up the send publics as I did with regular publics yesterday, + need to reload your theme to make formats work.//kreca diff -aruN amn.orig/arrays/action.a amn/arrays/action.a --- amn.orig/arrays/action.a Sat Oct 29 03:49:22 2005 +++ amn/arrays/action.a Tue Nov 29 22:43:07 2005 @@ -8,6 +8,7 @@ @ setitem(actform 2 $$fparse(format_timestamp_some $($_timess))$$(hblk)ð $$(hyel)$$1/$$2 $$(cl)$$3-) @ setitem(actform 3 $$fparse(format_timestamp_some $($_timess))* $$1 $$3-) @ setitem(actform 4 * $$1 $$3-) +@ setitem(actform 5 $$fparse(format_timestamp_some $($_timess))* $$(hgrn)$$1$$(cl) $$3-) ## action other formats @ delarray(actoform) @@ -16,6 +17,7 @@ @ setitem(actoform 2 $$fparse(format_timestamp_some $($_timess))$$(hblk)* $$(cl)>$$(cyn)$$1 $$(cl)$$2 $$3-) @ setitem(actoform 3 $$fparse(format_timestamp_some $($_timess))* $$1:$$2 $$3-) @ setitem(actoform 4 * $$1:$$2 $$3-) +@ setitem(actoform 5 $$fparse(format_timestamp_some $($_timess))* $$(hyel)$$2$$(cl):$$(hyel)$$1$$(cl) $$3-) ## describe formats @ delarray(descform) @@ -23,6 +25,7 @@ @ setitem(descform 1 $$fparse(format_timestamp_some $($_timess))$$(c2)$$1$$(hblk)/$$(cl)$$2$$(cl) $$3-) @ setitem(descform 2 $$fparse(format_timestamp_some $($_timess))*> $$1 $$3-) @ setitem(descform 3 *> $$1 $$3-) +@ setitem(descform 4 $$fparse(format_timestamp_some $($_timess))* -> $$(hyel)$$1$$(cl) $$3-) ## sent describe formats @ delarray(sdescform) @@ -30,3 +33,4 @@ @ setitem(sdescform 1 $$fparse(format_timestamp_some $($_timess))$$(cl)-> $$(hwht)$$1 $$(c3)$$N $$(cl)$$3-) @ setitem(sdescform 2 $$fparse(format_timestamp_some $($_timess))* -> $$1: $$N $$3-) @ setitem(sdescform 3 * -> $$1: $$N $$3-) +@ setitem(sdescform 4 $$fparse(format_timestamp_some $($_timess))* -> $$(hyel)$$N$$(cl) $$3-) diff -aruN amn.orig/arrays/ctcp.a amn/arrays/ctcp.a --- amn.orig/arrays/ctcp.a Sat Oct 29 03:49:35 2005 +++ amn/arrays/ctcp.a Tue Nov 29 22:43:43 2005 @@ -15,6 +15,7 @@ @ setitem(ctcpform 9 %K\\\(%Wctcp%K/$$(c2)$$1%K[$$(c1)$$before(@ $2)%K@$$(c1)$$after(@ $2)%K]\\\) \\\(%W$$3%K\\\)%n $$4-) @ setitem(ctcpform 10 $$G %cc%ntcp%K: %n$$3 %K[%n$$tolower(${[$5]?[$4-]:[$4]})%K]%n from %c$$1%n) @ setitem(ctcpform 11 $$G CTCP $$5 from $$1 to $$3: $$4) +@ setitem(ctcpform 12 $$fparse(format_timestamp_some $($_timess))$$G (%GCTCP%n) %C$$1%r[%c$$2%r]%n requested %g$$4 $$5%n from %r[%B$$3%r]%n) ## send ctcp formats @ delarray(sctcpform) @@ -32,3 +33,4 @@ @ setitem(sctcpform 11 %K:> %cc%ntcp%K:%c $$2 %K-%n $$3 $$4-) @ setitem(sctcpform 12 [ctcp\\\($$2\\\)] $$3 $$4 $$5 $$6) @ setitem(sctcpform 13 *** CTCP $$3 from $$N to $$2: $$4-) +@ setitem(sctcpform 14 $$fparse(format_timestamp_some $($_timess))$$G (%GCTCP%n) Sent %g$$3 $$4%n to %r[%B$$2%r]%n) diff -aruN amn.orig/arrays/dcc.a amn/arrays/dcc.a --- amn.orig/arrays/dcc.a Sat Oct 29 03:49:41 2005 +++ amn/arrays/dcc.a Tue Nov 29 22:44:32 2005 @@ -32,6 +32,7 @@ @ setitem(sdcform 26 $$=> =$$1= $$2-) ## sent dcc - 27/slightly modified #8 - violence - 8.06.05 @ setitem(sdcform 27 $$fparse(format_timestamp_some $($_timess))$$zt$$(hblk)[$$(hgrn)dcc$$(hblk)\\\($$(grn)$$1$$(hblk)\\\)]$$(cl) $$2-) +@ setitem(sdcform 28 $$fparse(format_timestamp_some $($_timess))\\\=> (%gdcc%n)%Y$$1%n : $$2-) ## dcc formats @ delarray(dcform) @@ -64,3 +65,4 @@ @ setitem(dcform 26 =$$1= $$2-) ## dccform - 27/slightly modded #8 - violence - 8.06.05 @ setitem(dcform 27 $$fparse(format_timestamp_some $($_timess))$$zt$$(hblk)[$$(grn)$$1$$(hblk)\\\($$(hgrn)dcc$$(hblk)\\\)]$$(cl) $$2-) +@ setitem(dcform 28 $$fparse(format_timestamp_some $($_timess))\\\<= (%Rdcc%n)%r$$1%n : $$2-) diff -aruN amn.orig/arrays/kick.a amn/arrays/kick.a --- amn.orig/arrays/kick.a Sat Oct 29 03:49:59 2005 +++ amn/arrays/kick.a Tue Nov 29 22:45:41 2005 @@ -2,7 +2,7 @@ # See the 'COPYRIGHT' file for more information. ## kick formats -adam 9.7.05 -## $1 = kicked $2 = kickee $3 = channel $4+ = message +## $1 = kicked $2 = kickee $3 = channel $4- = message @ delarray(kickform) @ setitem(kickform 0 !) @ setitem(kickform 1 $$G $$1 was kicked off $$3 by $$(c3)$$2 %K\\\(%n$$4-%K\\\)) @@ -11,3 +11,4 @@ @ setitem(kickform 4 $$fparse(format_timestamp_some $($_timess))$$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) @ setitem(kickform 5 $$fparse(format_timestamp_some $($_timess))%K[%nkick%K/%n$$3%K]%n $$1 by $$2 %K[%n$$4-%K]%n) @ setitem(kickform 6 $$G $$1 was kicked off $$3 by $$2 %K[%n$$4-%K]) +@ setitem(kickform 7 $$fparse(format_timestamp_some $($_timess))%m$$1%n Was kicked off %r[%B$$3%r]%n by %Y$$2%n \\\(%g$$4-%n\\\)) diff -aruN amn.orig/arrays/mode.a amn/arrays/mode.a --- amn.orig/arrays/mode.a Sat Oct 29 03:50:09 2005 +++ amn/arrays/mode.a Tue Nov 29 22:46:07 2005 @@ -14,3 +14,4 @@ @ setitem(modeform 7 $$fparse(format_timestamp_some $($_timess))$$zt%cmode%C.%c$$2 %K\\\(%n$$3 $$4-%K\\\) %nby %n$$1) @ setitem(modeform 8 $$fparse(format_timestamp_some $($_timess))%Mmode%K/%m$$2 %K\\\[$$(hwht)$$3-%K\\\] %nby $$(hwht)$$1) @ setitem(modeform 9 $$fparse(format_timestamp_some $($_timess))%K\\\[%cmode%K\\\(%C$$2%K\\\) %c$$3 $$4-%K\\\] %nby %C$$1) +@ setitem(modeform 10 $$fparse(format_timestamp_some $($_timess))** Mode Change %r[%C$$3-%r]%n On Channel %r[%B$$2%r]%n By %Y$$1%n) diff -aruN amn.orig/arrays/msg.a amn/arrays/msg.a --- amn.orig/arrays/msg.a Sat Oct 29 03:50:17 2005 +++ amn/arrays/msg.a Tue Nov 29 22:46:50 2005 @@ -48,6 +48,7 @@ @ setitem(mform 40 $$fparse(format_timestamp_some $($_timess))%B\\\(%n$$1%B!%n$$before(@ $2)%G@%n$$after(@ $2)%B\)%n $$3-) @ setitem(mform 41 $$fparse(format_timestamp_some $($_timess))%B\\\(%n$$1%B!%n$$before(@ $2)%B@%n$$after(@ $2)%B\)%n $$3-) @ setitem(mform 42 $$fparse(format_timestamp_some $($_timess))%m\\\(%n$$1%m!%n$$before(@ $2)@$$after(@ $2)%m\)%n $$3-) +@ setitem(mform 43 $$fparse(format_timestamp_some $($_timess))%R$$[9]1%n -> \\\%Y$$[9]N%n : $$3-) ## send msg formats @ delarray(smform) @@ -107,3 +108,4 @@ @ setitem(smform 52 $$fparse(format_timestamp_some $($_timess))$$(cl)-%w>%n \\\($$1\\\) $$2-) @ setitem(smform 53 $$fparse(format_timestamp_some $($_timess))$$(cl)-%W>%n%W \\\($$(cl)$$1%W\\\)%n $$2-) @ setitem(smform 54 $$fparse(format_timestamp_some $($_timess))$$(cl)-%W>%n$$(hblu) \\\($$(cl)$$1$$(hblu)\\\)%n $$2-) +@ setitem(smform 55 $$fparse(format_timestamp_some $($_timess))%Y$$[9]N%n -> \\\%R$$[9]1%n : $$2-) diff -aruN amn.orig/arrays/nick.a amn/arrays/nick.a --- amn.orig/arrays/nick.a Sat Oct 29 03:50:23 2005 +++ amn/arrays/nick.a Tue Nov 29 22:47:09 2005 @@ -20,3 +20,4 @@ @ setitem(nickform 14 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%W$$1 %K-> %m$$2%K\\\)) @ setitem(nickform 15 $$fparse(format_timestamp_some $($_timess))$$G %nnick change %K\\\(%W$$1 %K-> %W$$2%K\\\)) @ setitem(nickform 16 $$G $$1 is now known as $$2) +@ setitem(nickform 17 $$fparse(format_timestamp_some $($_timess))$$G %Y$$1%n Changed Nickname to %y$$2%n) diff -aruN amn.orig/arrays/notice.a amn/arrays/notice.a --- amn.orig/arrays/notice.a Sat Oct 29 03:50:35 2005 +++ amn/arrays/notice.a Tue Nov 29 22:47:56 2005 @@ -29,6 +29,7 @@ @ setitem(notform 23 $$fparse(format_timestamp_some $($_timess))%K-%n$$1%K-%n $$3- %n%K-$$(c3)$$before(@ $2)$$(hblk)@$$(c3)$$after(@ $2)%K-) @ setitem(notform 24 $$fparse(format_timestamp_some $($_timess)) -$$1- $$3-) @ setitem(notform 25 -$$1- $$3-) +@ setitem(notform 26 $$fparse(format_timestamp_some $($_timess))* %R$$1 $$3-%n) ## send notice formats @ delarray(snotform) @@ -69,6 +70,7 @@ @ setitem(snotform 34 $$fparse(format_timestamp_some $($_timess))$$(c3)>[%n$$1$$(c3)]%n $$2-) @ setitem(snotform 35 $$fparse(format_timestamp_some $($_timess))-$$1-> $$2-) @ setitem(snotform 36 -$$1-> $$2-) +@ setitem(snotform 37 $$fparse(format_timestamp_some $($_timess))* %R$$1 $$2-%n) ## public notice formats @ delarray(pubnotform) @@ -76,3 +78,4 @@ @ setitem(pubnotform 1 $$fparse(format_timestamp_some $($_timess))%K-$$(c3)$$1%K:%n$$2%n $$3-) @ setitem(pubnotform 2 $$fparse(format_timestamp_some $($_timess))-$$1:$$2- $$3-) @ setitem(pubnotform 3 -$$1:$$2- $$3-) +@ setitem(pubnotform 4 $$fparse(format_timestamp_some $($_timess))* %r[%B$$2%r]%n %G$$1 %G$$3-) diff -aruN amn.orig/arrays/part.a amn/arrays/part.a --- amn.orig/arrays/part.a Sat Oct 29 03:50:41 2005 +++ amn/arrays/part.a Tue Nov 29 22:48:13 2005 @@ -22,3 +22,4 @@ ## leaves 15 - crapple - 8.06.05 @ setitem(leaveform 15 $$G $$1 %K[%G$$msar(g/@/$(hblk)@$(cl)/./$(hblk).$(cl)/$2)%K]%n has left $$3 %K[%W$$4-%K]%n at $$Z) @ setitem(leaveform 16 $$fparse(format_timestamp_some $($_timess))%K[%Wpart%K/%n$$3%K] %W$$1%K\\\(%n$$2%K\\\) [%n$$4%K]%n) +@ setitem(leaveform 17 $$fparse(format_timestamp_some $($_timess))*** %y$$1%n Has Left %r[%B$$3%r]%n) diff -aruN amn.orig/arrays/public.a amn/arrays/public.a --- amn.orig/arrays/public.a Mon Nov 28 23:12:11 2005 +++ amn/arrays/public.a Tue Nov 29 22:57:32 2005 @@ -31,41 +31,44 @@ @ setitem(pubform 24 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\($$pubpad(%n 0 $1 $2-)$$(wht)\\\)%n $$2-) @ setitem(pubform 25 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\($$pubpad(%n 0 $1 $2-)$$(cl)\\\)%n $$2-) @ setitem(pubform 26 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\($$pubpad(%n 0 $1 $2-)$$(hwht)\\\)%n $$2-) +@ setitem(pubform 27 $$fparse(format_timestamp_some $($_timess))$$pubpad(%R 9 $1 $2-)%n: $$2-) ## send public formats @ delarray(spubform) @ setitem(spubform 0 !) -@ setitem(spubform 1 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(spubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\\\)%n $$2-) -@ setitem(spubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<%n$$1$$(hmag)>%n $$2-) -@ setitem(spubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\(%n$$1$$(hmag)\\\)%n $$2-) -@ setitem(spubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<%n$$1$$(hblu)>%n $$2-) -@ setitem(spubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) -@ setitem(spubform 7 $$fparse(format_timestamp_some $($_timess))%K<%c$$1%K>%n $$2-) -@ setitem(spubform 8 $$fparse(format_timestamp_some $($_timess))%K\\\(%c$$1%K\\\)%n $$2-) -@ setitem(spubform 9 $$fparse(format_timestamp_some $($_timess))%b<%n$$1%b>%n $$2-) -@ setitem(spubform 10 $$fparse(format_timestamp_some $($_timess))%b\\\(%n$$1%b\\\)%n $$2-) -@ setitem(spubform 11 $$fparse(format_timestamp_some $($_timess))$$(sc1)<%n$$1$$(sc1)>%n $$2-) -@ setitem(spubform 12 $$fparse(format_timestamp_some $($_timess))%K<%n$$1%K>%n $$2-) -@ setitem(spubform 13 $$fparse(format_timestamp_some $($_timess))%K<$$(c1)$$1%K>%n $$2-) -@ setitem(spubform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)<%n$$1$$(c1)>%n $$2-) -@ setitem(spubform 15 $$fparse(format_timestamp_some $($_timess))$$(c3)<%n$$1$$(c3)>%n $$2-) -@ setitem(spubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\(%n$$1%K\)%n $$2-) -@ setitem(spubform 17 $$fparse(format_timestamp_some $($_timess))%K\\\($$(c1)$$1%K\)%n $$2-) -@ setitem(spubform 18 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\(%n$$1$$(c1)\)%n $$2-) -@ setitem(spubform 19 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\(%n$$1$$(c3)\)%n $$2-) -@ setitem(spubform 20 $$fparse(format_timestamp_some $($_timess))%K[%n$$1%K]%n $$2-) -@ setitem(spubform 21 $$fparse(format_timestamp_some $($_timess))%K[$$(c1)$$1%K]%n $$2-) -@ setitem(spubform 22 $$fparse(format_timestamp_some $($_timess))$$(c1)[%n$$1$$(c1)]%n $$2-) -@ setitem(spubform 23 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)]%n $$2-) +@ setitem(spubform 1 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad(%n $1)%K>%n $$2-) +@ setitem(spubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad(%n $1)%K\\\)%n $$2-) +@ setitem(spubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<$$spubpad(%n $1)$$(hmag)>%n $$2-) +@ setitem(spubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\($$spubpad(%n $1)$$(hmag)\\\)%n $$2-) +@ setitem(spubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<$$spubpad(%n $1)$$(hblu)>%n $$2-) +@ setitem(spubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\($$spubpad(%n $1)$$(hblu)\\\)%n $$2-) +@ setitem(spubform 7 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad(%c $1)%K>%n $$2-) +@ setitem(spubform 8 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad(%c $1)%K\\\)%n $$2-) +@ setitem(spubform 9 $$fparse(format_timestamp_some $($_timess))%b<$$spubpad(%n $1)%b>%n $$2-) +@ setitem(spubform 10 $$fparse(format_timestamp_some $($_timess))%b\\\($$spubpad(%n $1)%b\\\)%n $$2-) +@ setitem(spubform 11 $$fparse(format_timestamp_some $($_timess))$$(sc1)<$$spubpad(%n $1)$$(sc1)>%n $$2-) +@ setitem(spubform 12 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad(%n $1)%K>%n $$2-) +@ setitem(spubform 13 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad($c1 $1)%K>%n $$2-) +@ setitem(spubform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)<$$spubpad(%n $1)$$(c1)>%n $$2-) +@ setitem(spubform 15 $$fparse(format_timestamp_some $($_timess))$$(c3)<$$spubpad(%n $1)$$(c3)>%n $$2-) +@ setitem(spubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad(%n $1)%K\)%n $$2-) +@ setitem(spubform 17 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad($c1 $1)%K\)%n $$2-) +@ setitem(spubform 18 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\($$spubpad(%n $1)$$(c1)\)%n $$2-) +@ setitem(spubform 19 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\($$spubpad(%n $1)$$(c3)\)%n $$2-) +@ setitem(spubform 20 $$fparse(format_timestamp_some $($_timess))%K[$$spubpad(%n $1)%K]%n $$2-) +@ setitem(spubform 21 $$fparse(format_timestamp_some $($_timess))%K[$$spubpad($c1 $1)%K]%n $$2-) +@ setitem(spubform 22 $$fparse(format_timestamp_some $($_timess))$$(c1)[$$spubpad(%n $1)$$(c1)]%n $$2-) +@ setitem(spubform 23 $$fparse(format_timestamp_some $($_timess))$$(c3)[$$spubpad(%n $1)$$(c3)]%n $$2-) @ setitem(spubform 24 $$fparse(format_timestamp_some $($_timess))> $$2-) @ setitem(spubform 25 > $$2-) ## sendpub 26-28 - crapple 8.06.05 - 29-30 - 8.30.05 -@ setitem(spubform 26 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\(%n$$1$$(wht)\\\)%n $$2-) -@ setitem(spubform 27 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\(%n$$1$$(cl)\\\)%n $$2-) -@ setitem(spubform 28 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\(%n$$1$$(hwht)\\\)%n $$2-) -@ setitem(spubform 29 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\(%n$$1$$(hblu)\\\)%n $$2-) -@ setitem(spubform 30 $$fparse(format_timestamp_some $($_timess))$$(mag)\\\(%n$$1$$(mag)\\\)%n $$2-) +@ setitem(spubform 26 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\($$spubpad(%n $1)$$(wht)\\\)%n $$2-) +@ setitem(spubform 27 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\($$spubpad(%n $1)$$(cl)\\\)%n $$2-) +@ setitem(spubform 28 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\($$spubpad(%n $1)$$(hwht)\\\)%n $$2-) +@ setitem(spubform 29 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\($$spubpad(%n $1)$$(hblu)\\\)%n $$2-) +@ setitem(spubform 30 $$fparse(format_timestamp_some $($_timess))$$(mag)\\\($$spubpad(%n $1)$$(mag)\\\)%n $$2-) +@ setitem(spubform 31 $$fparse(format_timestamp_some $($_timess))$$spubpad(%Y 9 $1)%n: $$2-) + ## send public other formats @ delarray(spuboform) @@ -106,3 +109,4 @@ @ setitem(spuboform 34 $$fparse(format_timestamp_some $($_timess))$$(c3)[%n$$1$$(c3)/%n$$2$$(c3)]%n $$3-) @ setitem(spuboform 35 $$fparse(format_timestamp_some $($_timess))<$$1:$$2> $$3-) @ setitem(spuboform 36 <$$1:$$2> $$3-) +@ setitem(spuboform 37 $$fparse(format_timestamp_some $($_timess))%R$$2:$$spubpad(%Y 9 $1)%n: $$3-) diff -aruN amn.orig/arrays/signoff.a amn/arrays/signoff.a --- amn.orig/arrays/signoff.a Sat Oct 29 03:51:02 2005 +++ amn/arrays/signoff.a Tue Nov 29 22:57:56 2005 @@ -22,3 +22,4 @@ @ setitem(signform 16 $$fparse(format_timestamp_some $($_timess))$$ztSignoff: $$2 \\\($$3-\\\)) @ setitem(signform 17 *** Signoff: $$2 \\\($$3-\\\)) @ setitem(signform 18 $$fparse(format_timestamp_some $($_timess))$$zt%K[%Wquit%K/%n$$1%K] %W$$2 %K[%n$$3-%n%K]) +@ setitem(signform 19 $$fparse(format_timestamp_some $($_timess))*** %y$$2%n %r[%B$$1%r]%n Quit Irc Because %g\\\($$3-\\\)%n) diff -aruN amn.orig/arrays/time.a amn/arrays/time.a --- amn.orig/arrays/time.a Sat Oct 29 03:51:08 2005 +++ amn/arrays/time.a Tue Nov 29 22:58:23 2005 @@ -18,3 +18,4 @@ @ setitem(timeform 12 $$strftime($time()%X)%c|%n) @ setitem(timeform 13 %K[%n$$Z%K]%n) @ setitem(timeform 14 %K[%n$$strftime($time()%X)%K]%n) +@ setitem(timeform 15 %r[%c$$strftime($time()%X)%r]%n ) diff -aruN amn.orig/arrays/topic.a amn/arrays/topic.a --- amn.orig/arrays/topic.a Sat Oct 29 03:51:14 2005 +++ amn/arrays/topic.a Tue Nov 29 22:59:23 2005 @@ -11,6 +11,8 @@ @ setitem(topform 5 $$1 has changed the topic on channel $$2 to $$3-) @ setitem(topform 6 $$fparse(format_timestamp_some $($_timess))$$1 has changed the topic on channel $$2 to $$3-) @ setitem(topform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$2%K] %W$$1 %K[%n$$3-%K]%n) +@ setitem(topform 8 $$fparse(format_timestamp_some $($_timess))** Topic On %r[%B$$2%r]%n : %M$$3-%n by %Y$$1%n) + @ delarray(notopform) @ setitem(notopform 0 !) @ setitem(notopform 1 %K[%ntopic%K/$$(c3)$$1%K]:%n %Rtopic not set%n) @@ -20,6 +22,8 @@ @ setitem(notopform 5 $$1 : $$2-) @ setitem(notopform 6 $$fparse(format_timestamp_some $($_timess))$$1 : $$2-) @ setitem(notopform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] %Rtopic not set%n) +@ setitem(notopform 8 $$fparse(format_timestamp_some $($_timess))$$G No Topic Set On Channel %r[%B$$1%r]%n) + @ delarray(settopform) @ setitem(settopform 0 !) @ setitem(settopform 1 %K[%ntopic%K/$$(c3)$$1%K]:%n $$2-) @@ -29,6 +33,8 @@ @ setitem(settopform 5 Topic for $$1: $$2-) @ setitem(settopform 6 $$fparse(format_timestamp_some $($_timess))Topic for $$1: $$2-) @ setitem(settopform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] $$2-) +@ setitem(settopform 8 $$fparse(format_timestamp_some $($_timess))$$G Topic for %r[%B$$1%r]%n : $$2-) + @ delarray(topbyform) @ setitem(topbyform 0 !) @ setitem(topbyform 1 %K[%ntopic%K/$$(c3)$$1%K:%K[$$(c3)$$2%K]]:%n $$3-) @@ -38,3 +44,4 @@ @ setitem(topbyform 5 Topic for $$1 was set by $$2 on $$3-) @ setitem(topbyform 6 $$fparse(format_timestamp_some $($_timess))Topic for $$1 was set by $$2 on $$3-) @ setitem(topbyform 7 $$fparse(format_timestamp_some $($_timess))%K[%Wtopic%K/%n$$1%K] %W$$2 %K[%n$$3-%K]%n) +@ setitem(topbyform 8 $$fparse(format_timestamp_some $($_timess))$$G Topic for %r[%B$$1%r]%n : Set By %Y$$2%n on $$3-) diff -aruN amn.orig/core/bind.m amn/core/bind.m --- amn.orig/core/bind.m Tue Nov 29 00:19:48 2005 +++ amn/core/bind.m Tue Nov 29 23:00:01 2005 @@ -54,6 +54,8 @@ @ bindctl(sequence ^W^X set parse_command window swap last) @ bindctl(sequence $chr(27 167) set parse_command ^_wsact) +@ bindctl(sequence meta1-a set ^swap_next_window) + ## some other kinda weird bindings for some terms/others @ bindctl(sequence ^[^I set PARSE_COMMAND ^window next) @ bindctl(sequence ^[1 set PARSE_COMMAND ^window swap 1) diff -aruN amn.orig/core/format.m amn/core/format.m --- amn.orig/core/format.m Mon Nov 28 23:16:18 2005 +++ amn/core/format.m Tue Nov 29 23:00:29 2005 @@ -461,8 +461,8 @@ @format_notopic=getitem(notopform $0) @format_settopic=getitem(settopform $0) @format_topicby=getitem(topbyform $0) - xecho -b $fparse(format_topic crapple #amnesiac RTFM) - xecho -b $fparse(format_notopic #amnesiac No topic is set.) + xecho $fparse(format_topic crapple #amnesiac RTFM) + xecho $fparse(format_notopic #amnesiac No topic is set.) xecho $acban this is your new topic format, /fsave to save. @topform = [$0] }{ diff -aruN amn.orig/core/modeshow.m amn/core/modeshow.m --- amn.orig/core/modeshow.m Mon Nov 28 23:13:17 2005 +++ amn/core/modeshow.m Tue Nov 29 23:14:18 2005 @@ -55,6 +55,26 @@ } } +alias spubpad { + @:thenick=word(0 $split(: $2)) + @:thechan=word(1 $split(: $2)) + @:extravar=[] + if (showop == [on]) { + if (ischanop($thenick $thechan)) { + @:extravar = [$(c5)@$(cl)] + } else if (ischanvoice($thenick $thechan)) { + @:extravar = [$(c5)+$(cl)] + } + } + if ([$1]>0) { + @:thenick=[$[$1]thenick] + if (!strlen($extravar)){ + @:thenick=[ $thenick] + } + } + return $(extravar)$0$(thenick) +} + on ^public * { //echo $fparse(format_public $0:$1 $2-) } @@ -77,17 +97,5 @@ } on ^send_public * { - @extravar = [] - if (showop == [on]) { - if (ischanop($N $0)) { - @extravar = [$(c5)@$(cl)] - } else if (ischanvoice($N $0)) { - @extravar = [$(c5)+$(cl)] - } - } - if (winchan($0)==-1 || winchan($winchan($0)) != [$0] ) { - //echo $fparse(format_send_public ${extravar}$N:$0 $1-) - } else { - //echo $fparse(format_send_public ${extravar}$N $1-) - } + //echo $fparse(format_send_public $N:$0 $1-) } diff -aruN amn.orig/core/sbar.m amn/core/sbar.m --- amn.orig/core/sbar.m Tue Oct 11 02:51:38 2005 +++ amn/core/sbar.m Tue Nov 29 23:00:46 2005 @@ -2,7 +2,7 @@ # See the 'COPYRIGHT' file for more information. subpackage sbar -@ sbar.max = 14 +@ sbar.max = 15 alias sbar if ([$0] && ([$0] <= sbar.max)) { @statbar=[stat.$0] @statnum=[$0] diff -aruN amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Fri Oct 28 15:53:59 2005 +++ amn/core/scan.m Tue Nov 29 23:41:27 2005 @@ -145,7 +145,7 @@ } alias sformat { - if ([$0] > 0 && [$0] <=7) { + if ([$0] > 0 && [$0] <=8) { @snf=[$0]; ^eval load ${loadpath}sc/scan.$0 } diff -aruN amn.orig/core/whois.m amn/core/whois.m --- amn.orig/core/whois.m Thu Oct 13 01:08:32 2005 +++ amn/core/whois.m Tue Nov 29 23:01:03 2005 @@ -11,6 +11,7 @@ (5) {@_whois=5;^eval load ${loadpath}wis/whois.5} (6) {@_whois=6;^eval load ${loadpath}wis/whois.6} (7) {@_whois=7;^eval load ${loadpath}wis/whois.7} + (8) {@_whois=8;^eval load ${loadpath}wis/whois.8} } xecho $acban whois format set to $(_whois) } diff -aruN amn.orig/sc/scan.8 amn/sc/scan.8 --- amn.orig/sc/scan.8 Thu Jan 1 01:00:00 1970 +++ amn/sc/scan.8 Tue Nov 29 23:53:53 2005 @@ -0,0 +1,17 @@ + # Copyright (c) 2003-2005 Amnesiac Software Project. + # See the 'COPYRIGHT' file for more information. +subpackage scan8 +alias mypad { + return $pad(${32-strlen($1-)} =) +} + +@format_scan_users=[$$(hgrn)===$$(red)[$$(cl)$$(hblu)$$4$$(red)]$$(hgrn)=====$$(red)[$$(mag)Chan-ops$$(hwht)/$$(hmag)$$1 $$(mag)Voiced$$(hwht)/$$(hmag)$$3 $$(mag)Unimportant Users$$(hwht)/$$(hmag)$$2$$(red)]$$(hgrn)] +@format_scan_users=[$(format_scan_users)$$mypad($*)] +@format_scan_width=15 +@format_scan_header=[] +@format_scan_nicks_border=[$$(hgrn)|$$(cl)] +@format_scan_nicks=[$$(blu)[$$(yel)$$fix.scan2($1)$$(blu)] +@format_scan_footer=[$$(hgrn)==============================================================================] +@format_scan_users_op=[$$(red)[$$(mag)o$$(hwht)/$$(hmag)$$1$$(red)]] +@format_scan_users_non=[$$(red)[$$(mag)n$$(hwht)/$$(hmag)$$1$$(red)]] +@format_scan_users_voc=[$$(red)[$$(mag)v$$(hwht)/$$(hmag)$$1$$(red)]] diff -aruN amn.orig/stats/stat.15 amn/stats/stat.15 --- amn.orig/stats/stat.15 Thu Jan 1 01:00:00 1970 +++ amn/stats/stat.15 Tue Nov 29 23:04:08 2005 @@ -0,0 +1,31 @@ +subpackage stat15 +^set input_prompt $(red)\[$(cl)$(hblu)$C$(cl)$(red)\] +alias stat15 { + +^set status_format1 $(red)\[%T$(red)] $(red)[$(cl)%*%=%@%N$(red)\($(cl)%#$(red)\)$(cl)%A$(red)]$(cl) %M %C%+ %!$(red)\($(c1)o$(hblk)/$(c2)%2 $(c1)v$(hblk)/$(c2)%4 $(c1)n$(hblk)/$(c2)%3$(red)\)$(red)] $(cl) $(sc1) %> %F %{2}S +^set status_format2 $(red)\[$(cl)$(c1)Lag $(c2)%1$(cl)$(red)\]$(cl) %Q %> $(red)\[$(c1)Win$(cl): $(c2)%R$(red)]$(cl) +#$(hblk)À$(sc2)Ù$(sc1)ÄÙ $(sc1)s$(hblk)/$(sc2)%{2}S$(cl) $(sc1)time$(hblk)/$(sc2)%T %F %Q %> %A $(hblk)[$(sc1)win$(hblk)/$(sc2)%R$(hblk)] $(sc1)ÀÄ$(sc2)À$(hblk)Ù +^set status_umode $(c2)+%#$(cl) +^set status_notify $(red)\[$(c1)Act$(cl): $(c2)%F$(cl)$(red)]$(cl) +^set status_server $(red)\[$(c1)%S$(red)]$(cl) +^set status_oper $(sc1)* +^set status_lag %L +^set status_channel $(red)[$(c1)%C$(cl) +^set status_mode $(red)\($(c2)+%+$(cl)$(red)\) +^set status_clock $(c1)%T$(cl) +^set status_chanop $(yel)@$(cl) +^set status_mail $(red)[$(c1)Mail$(cl): $(c2)%M$(red)]$(cl) +^set status_voice $(yel)+$(cl) +^set status_away $(hblk)[$(sc1)away$(hblk)] +^set status_hold_lines $(hblk)\[$(hwht)%B$(hblk)] +^set status_query $(red)[$(c1)Query$(cl): $(c2)%Q$(cl)$(red)]$(cl) +^set status_nickname $(c1)%N$(cl) +^set REVERSE_STATUS_LINE off +^set status_away $(red)\($(c1)Away$(red)\)$(cl) +^set status_halfop $(yel)\%$(cl) + +} +stat15 +@windowdoubles=[on] +^window double on +^timer -del 14 diff -aruN amn.orig/themes/lookgood.th amn/themes/lookgood.th --- amn.orig/themes/lookgood.th Thu Jan 1 01:00:00 1970 +++ amn/themes/lookgood.th Tue Nov 29 23:08:38 2005 @@ -0,0 +1,53 @@ +:Sirko +:uhhyea! +:lookgood +@auth=[Sirko] +@desc=[uhhyea!] +@name=[lookgood] +@scdesc=[\(uhhyea!\)] +@mform=43 +@smform=55 +@pubform=27 +@spubform=31 +@spuboform=37 +@pubnotform=4 +@signform=19 +@joinform=22 +@leaveform=[17] +@kickform=[7] +@modeform=10 +@notform=26 +@snotform=37 +@sdcform=28 +@dcform=28 +@topform=8 +@notopform=2 +@settopform=2 +@topbyform=2 +@ctcpform=12 +@sctcpform=14 +@echostr=45 +@ncomp=1 +@svform=12 +@snf=8 +@wallform = [8] +@bwallform=8 +@awayform=9 +@actform=5 +@actform=5 +@descform=4 +@sdescform=4 +@actform=5 +@statbar=[stat.15] +@timeform=[15] +@_whois=[8] +@c1=[ +@c2=[ +@c3=[ +@c4=[ +@c5=[ +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ +@acban=[[a+c]] diff -aruN amn.orig/wis/whois.8 amn/wis/whois.8 --- amn.orig/wis/whois.8 Thu Jan 1 01:00:00 1970 +++ amn/wis/whois.8 Tue Nov 29 23:06:07 2005 @@ -0,0 +1,21 @@ +^sfset format_whois_signon %G| %WSignon%n : $2- +^sfset format_whois_actual %G| %WActually%n : $3 +^sfset format_whois_header %G=%RWhois%G==========================================================%n +^sfset format_whois_ident %G| %WRegged Nick%n : Yes +^sfset format_whois_admin %G| %WAdmin%n : Yes +^sfset format_whois_nick %G| %Y$1%n %K\(%n$2@$3%K\)%n %K\(%n$country($rightw(1 $sar(g/./ / $3)))%K\)%n +^sfset format_whois_name %G| %WIrcname%n : $1- +^sfset format_whois_channels %G| %WChannels%n : $1- +^sfset format_whois_server %G| %WServer%n : $1%n \($2-\) +^sfset format_whois_away %G| %WAway%n : $1- +^sfset format_whois_operator %G| %WOperator%n : Yes +^sfset format_whois_idle %G| %WIdle%n : $tdiff($1) +^sfset format_whois_unknown %G|%n $G %Y$1%n : No such nick/channel +^sfset format_whois_footer %G================================================================%n + +^sfset format_whowas_header %G=%RWhoWas%G=========================================================%n +^sfset format_whowas_nick %G| %Y$1 %nwas %K\(%n$2@$3%K\)%n +^sfset format_whowas_name %G| %WIrcname%n : $1- +^sfset format_whowas_unknown %G|%n $G %Y$1%n : There was no such nickname +^sfset format_whowas_footer %G================================================================%n + From: Kreca Date: Wed, 30 Nov 2005 00:08:14 +0100 (CET) fix someones retardation ( the usual suspects fault) diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Nov 29 23:58:05 2005 +++ amn/CHANGES Wed Nov 30 00:05:02 2005 @@ -162,4 +162,5 @@ the pubpad and spubpad functions were written with this theme in mind currently it pads to the nick lenght 9 (efnet).//kreca -clean up the send publics as I did with regular publics yesterday, - need to reload your theme to make formats work.//kreca + need to reload your theme to make formats work.//kreca +-fix minor fuckup in /format 2 //kreca diff -aruN amn.orig/core/format.m amn/core/format.m --- amn.orig/core/format.m Tue Nov 29 23:00:29 2005 +++ amn/core/format.m Wed Nov 30 00:04:18 2005 @@ -793,7 +793,7 @@ @format_who=getitem(whoform $0) @format_who_footer=getitem(whofootform $0) //echo $fparse(format_who #amnesiac skullY H@ zwhite front.arpa.org irc.servercentral.net 0 The Work is Done and Then Forgotten) - //echo $fparse(format_who_footer irc.servercentral.net skully :End of /WHO list. + //echo $fparse(format_who_footer irc.servercentral.net skully :End of /WHO list.) xecho $acban this is your new who format, /fsave to save. @whoform = [$0] @whofootform = [$0] From: Kreca Date: Wed, 30 Nov 2005 00:13:50 +0100 (CET) fix accidentally broken send publics diff -aruN amn.orig/arrays/public.a amn/arrays/public.a --- amn.orig/arrays/public.a Tue Nov 29 22:57:32 2005 +++ amn/arrays/public.a Wed Nov 30 00:10:24 2005 @@ -36,37 +36,37 @@ ## send public formats @ delarray(spubform) @ setitem(spubform 0 !) -@ setitem(spubform 1 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad(%n $1)%K>%n $$2-) -@ setitem(spubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad(%n $1)%K\\\)%n $$2-) -@ setitem(spubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<$$spubpad(%n $1)$$(hmag)>%n $$2-) -@ setitem(spubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\($$spubpad(%n $1)$$(hmag)\\\)%n $$2-) -@ setitem(spubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<$$spubpad(%n $1)$$(hblu)>%n $$2-) -@ setitem(spubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\($$spubpad(%n $1)$$(hblu)\\\)%n $$2-) -@ setitem(spubform 7 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad(%c $1)%K>%n $$2-) -@ setitem(spubform 8 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad(%c $1)%K\\\)%n $$2-) -@ setitem(spubform 9 $$fparse(format_timestamp_some $($_timess))%b<$$spubpad(%n $1)%b>%n $$2-) -@ setitem(spubform 10 $$fparse(format_timestamp_some $($_timess))%b\\\($$spubpad(%n $1)%b\\\)%n $$2-) -@ setitem(spubform 11 $$fparse(format_timestamp_some $($_timess))$$(sc1)<$$spubpad(%n $1)$$(sc1)>%n $$2-) -@ setitem(spubform 12 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad(%n $1)%K>%n $$2-) -@ setitem(spubform 13 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad($c1 $1)%K>%n $$2-) -@ setitem(spubform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)<$$spubpad(%n $1)$$(c1)>%n $$2-) -@ setitem(spubform 15 $$fparse(format_timestamp_some $($_timess))$$(c3)<$$spubpad(%n $1)$$(c3)>%n $$2-) -@ setitem(spubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad(%n $1)%K\)%n $$2-) -@ setitem(spubform 17 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad($c1 $1)%K\)%n $$2-) -@ setitem(spubform 18 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\($$spubpad(%n $1)$$(c1)\)%n $$2-) -@ setitem(spubform 19 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\($$spubpad(%n $1)$$(c3)\)%n $$2-) -@ setitem(spubform 20 $$fparse(format_timestamp_some $($_timess))%K[$$spubpad(%n $1)%K]%n $$2-) -@ setitem(spubform 21 $$fparse(format_timestamp_some $($_timess))%K[$$spubpad($c1 $1)%K]%n $$2-) -@ setitem(spubform 22 $$fparse(format_timestamp_some $($_timess))$$(c1)[$$spubpad(%n $1)$$(c1)]%n $$2-) -@ setitem(spubform 23 $$fparse(format_timestamp_some $($_timess))$$(c3)[$$spubpad(%n $1)$$(c3)]%n $$2-) +@ setitem(spubform 1 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad(%n 0 $1)%K>%n $$2-) +@ setitem(spubform 2 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad(%n 0 $1)%K\\\)%n $$2-) +@ setitem(spubform 3 $$fparse(format_timestamp_some $($_timess))$$(hmag)<$$spubpad(%n 0 $1)$$(hmag)>%n $$2-) +@ setitem(spubform 4 $$fparse(format_timestamp_some $($_timess))$$(hmag)\\\($$spubpad(%n 0 $1)$$(hmag)\\\)%n $$2-) +@ setitem(spubform 5 $$fparse(format_timestamp_some $($_timess))$$(hblu)<$$spubpad(%n 0 $1)$$(hblu)>%n $$2-) +@ setitem(spubform 6 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\($$spubpad(%n 0 $1)$$(hblu)\\\)%n $$2-) +@ setitem(spubform 7 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad(%c 0 $1)%K>%n $$2-) +@ setitem(spubform 8 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad(%c 0 $1)%K\\\)%n $$2-) +@ setitem(spubform 9 $$fparse(format_timestamp_some $($_timess))%b<$$spubpad(%n 0 $1)%b>%n $$2-) +@ setitem(spubform 10 $$fparse(format_timestamp_some $($_timess))%b\\\($$spubpad(%n 0 $1)%b\\\)%n $$2-) +@ setitem(spubform 11 $$fparse(format_timestamp_some $($_timess))$$(sc1)<$$spubpad(%n 0 $1)$$(sc1)>%n $$2-) +@ setitem(spubform 12 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad(%n 0 $1)%K>%n $$2-) +@ setitem(spubform 13 $$fparse(format_timestamp_some $($_timess))%K<$$spubpad($c1 0 $1)%K>%n $$2-) +@ setitem(spubform 14 $$fparse(format_timestamp_some $($_timess))$$(c1)<$$spubpad(%n 0 $1)$$(c1)>%n $$2-) +@ setitem(spubform 15 $$fparse(format_timestamp_some $($_timess))$$(c3)<$$spubpad(%n 0 $1)$$(c3)>%n $$2-) +@ setitem(spubform 16 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad(%n 0 $1)%K\)%n $$2-) +@ setitem(spubform 17 $$fparse(format_timestamp_some $($_timess))%K\\\($$spubpad($c1 0 $1)%K\)%n $$2-) +@ setitem(spubform 18 $$fparse(format_timestamp_some $($_timess))$$(c1)\\\($$spubpad(%n 0 $1)$$(c1)\)%n $$2-) +@ setitem(spubform 19 $$fparse(format_timestamp_some $($_timess))$$(c3)\\\($$spubpad(%n 0 $1)$$(c3)\)%n $$2-) +@ setitem(spubform 20 $$fparse(format_timestamp_some $($_timess))%K[$$spubpad(%n 0 $1)%K]%n $$2-) +@ setitem(spubform 21 $$fparse(format_timestamp_some $($_timess))%K[$$spubpad($c1 0 $1)%K]%n $$2-) +@ setitem(spubform 22 $$fparse(format_timestamp_some $($_timess))$$(c1)[$$spubpad(%n 0 $1)$$(c1)]%n $$2-) +@ setitem(spubform 23 $$fparse(format_timestamp_some $($_timess))$$(c3)[$$spubpad(%n 0 $1)$$(c3)]%n $$2-) @ setitem(spubform 24 $$fparse(format_timestamp_some $($_timess))> $$2-) @ setitem(spubform 25 > $$2-) ## sendpub 26-28 - crapple 8.06.05 - 29-30 - 8.30.05 -@ setitem(spubform 26 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\($$spubpad(%n $1)$$(wht)\\\)%n $$2-) -@ setitem(spubform 27 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\($$spubpad(%n $1)$$(cl)\\\)%n $$2-) -@ setitem(spubform 28 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\($$spubpad(%n $1)$$(hwht)\\\)%n $$2-) -@ setitem(spubform 29 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\($$spubpad(%n $1)$$(hblu)\\\)%n $$2-) -@ setitem(spubform 30 $$fparse(format_timestamp_some $($_timess))$$(mag)\\\($$spubpad(%n $1)$$(mag)\\\)%n $$2-) +@ setitem(spubform 26 $$fparse(format_timestamp_some $($_timess))$$(wht)\\\($$spubpad(%n 0 $1)$$(wht)\\\)%n $$2-) +@ setitem(spubform 27 $$fparse(format_timestamp_some $($_timess))$$(cl)\\\($$spubpad(%n 0 $1)$$(cl)\\\)%n $$2-) +@ setitem(spubform 28 $$fparse(format_timestamp_some $($_timess))$$(hwht)\\\($$spubpad(%n 0 $1)$$(hwht)\\\)%n $$2-) +@ setitem(spubform 29 $$fparse(format_timestamp_some $($_timess))$$(hblu)\\\($$spubpad(%n 0 $1)$$(hblu)\\\)%n $$2-) +@ setitem(spubform 30 $$fparse(format_timestamp_some $($_timess))$$(mag)\\\($$spubpad(%n 0 $1)$$(mag)\\\)%n $$2-) @ setitem(spubform 31 $$fparse(format_timestamp_some $($_timess))$$spubpad(%Y 9 $1)%n: $$2-) Date: Tue, 29 Nov 2005 19:06:58 -0500 (EST) From: zak@ircii.org (Zak) Log message: sync documents to reality, increment minor tree is now considered frozen, only bugfixes a few small things that needs to be done before release(hopefully on friday) will be allowed. if you haven't updated lately please do so soon, and report any bugs to us enjoy. Modified files: CHANGES TODO-BUGS core/sets.m docs/E5-KNOWNBUGS docs/UPGRADE ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Nov 29 18:05:02 2005 +++ amn/CHANGES Tue Nov 29 19:00:12 2005 @@ -164,3 +164,5 @@ -clean up the send publics as I did with regular publics yesterday, need to reload your theme to make formats work.//kreca -fix minor fuckup in /format 2 //kreca +-sync docs to reality. //zak +-increment minor version. tree is now considered somewhat frozen. diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Mon Nov 28 17:41:53 2005 +++ amn/TODO-BUGS Tue Nov 29 18:59:06 2005 @@ -8,10 +8,13 @@ ? = undecided/closed votes. ## bugs. +NONE. + +## some bugs listed below.(not a huge priority for fixing) $ /bwk does not show if the word is a kick or bwk after reloading. however whatever it was set to works properly but it's kinda annoying when everything outputs at bk when it's not actually set to bk. -^^ needs to be be corrected before release(hopefully) + (will fix someday) ## higher priority todo. (stuff that needs to done before upcoming release) -make /delchan #chan delete channel apparently some ppl are slow to @@ -23,6 +26,7 @@ ## Procrastinated requests. @ rewrite topwin (removed to pasture). + @ add a module to bwk involving. add repeat kick with option for # of repeats before kicking offender. should be toggable to allow specified channel..while making usage of the @@ -41,15 +45,9 @@ @ better parses for /e /i outputs. -@ add a toggle to support bw or current theme(colors) in /relm and friends - also make it reparse through current theme for consistecy during usage. - @ finish up or scrap the adcc module, i really hate to touch this myself i have never heard of a request for this module nor have i heard a single complaint about it working or not working perhaps a vote? - -## some bugs listed below. -NONE for 'some bugs' ## bugs fixed. / projects done. 11.28.05 - kreca finally figured out a fix/workaround see CHANGES. //kreca diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Mon Nov 28 02:22:54 2005 +++ amn/core/sets.m Tue Nov 29 18:52:50 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[7] +@rel_id=[8] @a.rel=[1.2d r/$rel_id] @a.date=[20051020] @_ss=[15] diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Wed Nov 16 18:38:42 2005 +++ amn/docs/E5-KNOWNBUGS Tue Nov 29 19:00:41 2005 @@ -6,7 +6,6 @@ LOOK FOR IN THE FUTURE ----------------------- -* An /on to go off when you add something to the input line. * Output rules * Support for CNOTICE * More gracious support for trickling horizontal resizes down to the window. @@ -878,3 +877,4 @@ * Make configure warn harder if it looks like termcap/terminfo not found. * Normalize the sdbm code, so it fits in with the epic way of doing things. * Fix several bogons in add_to_log, found by ce. +* Add /on keybinding. Why do I know I'm going to regret this one? diff -aruN amn.orig/docs/UPGRADE amn/docs/UPGRADE --- amn.orig/docs/UPGRADE Fri Oct 28 21:47:15 2005 +++ amn/docs/UPGRADE Tue Nov 29 19:02:40 2005 @@ -8,8 +8,10 @@ about their irc client uptimes *ahem*) ## upgrade info -## 1.2 to 1.2d r/3 (in theory) +## 1.2 to 1.2d r/8 (in theory) rm -rf /path/to/amn +rm -rf ~/.amn/ +^^ can leave channel/shitlist/bwk/friends savefiles remove all others. tar zxvf newver.tgz (in your home dir or dir you want it) or tar zxvf newver.tgz -C /path/to/where/you/want/it Date: Wed, 30 Nov 2005 00:46:47 +0000 From: Zach White Add a todo item for parsing out info from on 005. Votes? amn diff diff amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Wed Nov 30 00:23:36 2005 +++ amn/TODO-BUGS Wed Nov 30 00:46:16 2005 @@ -23,6 +23,9 @@ ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. +@ Get some variables from numeric 005 so we can finetune some displays? + EG, get nick length so we can have formatted publics and /who with proper + output? ## Procrastinated requests. @ rewrite topwin (removed to pasture). Date: Wed, 30 Nov 2005 22:56:31 -0500 (EST) From: zak@ircii.org (Zak) Log message: a minor vote. Modified files: TODO-BUGS ---------------------- diff included ---------------------- diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Tue Nov 29 19:46:16 2005 +++ amn/TODO-BUGS Wed Nov 30 22:55:50 2005 @@ -23,9 +23,10 @@ ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. + @ Get some variables from numeric 005 so we can finetune some displays? EG, get nick length so we can have formatted publics and /who with proper - output? + output? <-- i crapple vote yay. "while shielding myself from kreca" ## Procrastinated requests. @ rewrite topwin (removed to pasture). Date: Wed, 30 Nov 2005 23:44:11 -0500 (EST) From: zak@ircii.org (Zak) Log message: more documentation updates/synchs, and a minor tweak to the nocturnal theme. Modified files: TODO-BUGS themes/nocturnal.th docs/amn-fuq.txt docs/amn-faq.txt ---------------------- diff included ---------------------- diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Tue Nov 29 19:46:16 2005 +++ amn/TODO-BUGS Wed Nov 30 22:55:50 2005 @@ -23,9 +23,10 @@ ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. + @ Get some variables from numeric 005 so we can finetune some displays? EG, get nick length so we can have formatted publics and /who with proper - output? + output? <-- i crapple vote yay. "while shielding myself from kreca" ## Procrastinated requests. @ rewrite topwin (removed to pasture). diff -aruN amn.orig/docs/amn-faq.txt amn/docs/amn-faq.txt --- amn.orig/docs/amn-faq.txt Sat Oct 22 07:42:32 2005 +++ amn/docs/amn-faq.txt Wed Nov 30 23:30:53 2005 @@ -13,6 +13,7 @@ are available. NOTE: We need a better help system. Think you can do it? Come talk to us on EFNet #amnesiac. + NOTE: also see amn/docs for further documentation. Q: How can I contribute? A: We need documentation and testing. Come to EFNet #amnesiac if you find @@ -33,14 +34,37 @@ Q: How do I load and unload modules? A: /addmod to load a module, /delmod to remove a module, /listmod to see - what's loaded, /vmod to see all the modules available. + what's loaded, /vmod to see all the modules available. /emod to see more + detailed description about the module. Q: How do I use windows? A: /wj to join a channel in a new window, ^Wc to create a new window, ^Wn to move to the next window, ^Wp to move to the previous window, ^Wk to kill the current window, ^W<0-9> to switch to the specified window, /<0-9> to - switch to the specified window. + switch to the specified window. esc<0-9> to switch to specified window. + /wk to kill current window. NOTE: We need better documentation on this. Any volunteers? + NOTE: see also /winhelp + +Q: How do i create a window dedicated to msgs? +A: /mw -hidden|split|kill <-- this should be self explanatory. + +Q: How do i make a dcc query window stay consistent? + One of the new features of epic5 has the ability to allow multiple + query's in a single window, at the time of this writing ctcp over dcc's + do not match up to their query windows very well. a workaround is to. + /wq =nick followed by /q nick you can swap between msg/dcc in the query + window via ctrl-x. + +Q: Where is the annoying ambiguous nickcomplete feature? +A: Under a ideal world we would like to see users use tab to complete + nicks in publics, whilest appending a : at the end of the specified + completed nick. i.e if user crapple is in current channel, do + hi cra which will complete the nick crapple or, cra : which + usually completes the nick in question usually with a greater chance + of accuracy, for those who want's the old nickcomplete and all of it's + broken glory. /addmod ncomp to load the nickcomplete module /format r + while choosing your poison don't forget to /save to keep your changes. Q: What's the best way to change behavior that I don't like? A: First, see if there's a /format or a /config for the behavior you want diff -aruN amn.orig/docs/amn-fuq.txt amn/docs/amn-fuq.txt --- amn.orig/docs/amn-fuq.txt Sat Oct 22 07:42:55 2005 +++ amn/docs/amn-fuq.txt Wed Nov 30 23:37:51 2005 @@ -17,6 +17,8 @@ ppl who helped contributed to this fuq. kreca ryan +skullY +hide and a bunch of others who we dont know about. also special thanks to the #epic/#amnesiac idiots for helping us @@ -72,7 +74,7 @@ A: ...... Q: how do I hack with Amnesiac? -A: /eval $decode(CPHBHFGJHECAGNGFCAGBGNCAHCGFHEGBHCGE) +A: /eval $decode(CPGFHIGFGDCAGLGJGMGMCACNDJCACNDB) Q: how can I spoof with Amnesiac? A: /disco host.to.spoof.com @@ -91,9 +93,9 @@ Q: how do I add aop for my inbred cousin HOW? A: /addmod userlist /adduser *!ident@somehostordomain.com #channel iops can only add 1 -channel at a time. or if the user is online. -/adduser nickname #channel iops -/config o to toggle the delay time for ops. +channel at a time. or use * for all channels. +if the user is online. /adduser nickname #channel iops +/adelay 1-40 will set the delay time for ops. in seconds. /save Q: how do I start epic+amnesiac? diff -aruN amn.orig/themes/nocturnal.th amn/themes/nocturnal.th --- amn.orig/themes/nocturnal.th Tue Oct 11 15:05:43 2005 +++ amn/themes/nocturnal.th Wed Nov 30 23:05:31 2005 @@ -1,7 +1,7 @@ -:crapple +:Fuck_Xmas :nocturnal :nocturnal -@auth=[crapple] +@auth=[Fuck_Xmas] @desc=[nocturnal] @name=[nocturnal] @scdesc=[\(nocturnal\)] @@ -14,15 +14,16 @@ @signform=4 @joinform=17 @leaveform=[15] +@kickform=[1] @modeform=1 @notform=19 @snotform=5 @sdcform=20 @dcform=5 @topform=4 -@notopform = [4] -@settopform = [4] -@topbyform = [4] +@notopform=4 +@settopform=4 +@topbyform=4 @ctcpform=3 @sctcpform=8 @echostr=45 @@ -38,7 +39,7 @@ @sdescform=2 @actform=2 @statbar=[stat.12] -@timeform=[12] +@timeform=[11] @_whois=[3] @c1=[ @c2=[ @@ -49,4 +50,4 @@ @sc2=[ @sc3=[ @sc4=[ -@acban=[\[a+c\]] +@acban=[[a+c]] Date: Fri, 2 Dec 2005 03:25:45 -0500 (EST) From: zak@ircii.org (Zak) Log message: more documentation updates/synchs, correct author in nocturnal theme. minor genhelp addition regarding /notify as well. Modified files: TODO-BUGS CHANGES themes/nocturnal.th docs/amn-faq.txt core/ehelp.m ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Nov 29 19:00:12 2005 +++ amn/CHANGES Fri Dec 2 03:16:58 2005 @@ -166,3 +166,6 @@ -fix minor fuckup in /format 2 //kreca -sync docs to reality. //zak -increment minor version. tree is now considered somewhat frozen. + +12.02.05 +-update some more docs //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Wed Nov 30 22:55:50 2005 +++ amn/TODO-BUGS Fri Dec 2 03:15:13 2005 @@ -24,6 +24,9 @@ ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. +@ bindshelp menu explaining our default binded functs. +@ cid help menu about efnet's umode +g. + @ Get some variables from numeric 005 so we can finetune some displays? EG, get nick length so we can have formatted publics and /who with proper output? <-- i crapple vote yay. "while shielding myself from kreca" @@ -37,8 +40,6 @@ kickops var. also add support to bwk to allow usage of wildcards. -@ a amnesiac FAQ would be nice... any volunteers? - @ fixdouble/fixwin or equiv for doublestats @ an xy menu based help system for the xy module to add to /ehelp. @@ -47,7 +48,7 @@ it should be easy just add a $split(, $chanlist) and change the $match() to $rmatch() or something along those lines -@ better parses for /e /i outputs. +@ better parses for /e /i outputs. //xavier or skullY needs to discuss this. @ finish up or scrap the adcc module, i really hate to touch this myself i have never heard of a request for this module nor have i heard a single diff -aruN amn.orig/core/ehelp.m amn/core/ehelp.m --- amn.orig/core/ehelp.m Mon Nov 28 01:46:39 2005 +++ amn/core/ehelp.m Fri Dec 2 03:22:50 2005 @@ -46,10 +46,15 @@ //echo back /back set yourself back. //echo readlog /readlog reads away msgs. [requires away module] //echo remlog /remlog erase away msgs. [requires away module] +input_char "menu paused hit the ANY key to continue " +pause //echo orignick /orignick will attempt to regain(jupe) specified nick //echo every 3 seconds(default) unless you specify time in /config. [orignick module] //echo staynick /staynick will cancel /orignick [orignick module] //echo tld /tld will show you the country for that TLD +//echo notify /notify will add specified nick to notify list +//echo /notify - will remove specified nick from notify list +//echo /notify will view online/offline nicks if any. //echo --------------------------------------------------------------------- } diff -aruN amn.orig/docs/amn-faq.txt amn/docs/amn-faq.txt --- amn.orig/docs/amn-faq.txt Wed Nov 30 23:30:53 2005 +++ amn/docs/amn-faq.txt Fri Dec 2 03:10:09 2005 @@ -14,6 +14,7 @@ NOTE: We need a better help system. Think you can do it? Come talk to us on EFNet #amnesiac. NOTE: also see amn/docs for further documentation. + NOTE: see also http://www.prbh.org/help/ for epic specific help. Q: How can I contribute? A: We need documentation and testing. Come to EFNet #amnesiac if you find @@ -84,6 +85,34 @@ Q: Why doesn't "/adduser #chan* iops" work? A: Because it doesn't. + +Q: How do i use notify? +A: /notify to view online/offline nicks if any. + /notify nick will add specified nick to notify list. + /notify -nick will remove specified nick from notify list. + +Q: How do i ignore someone, what do the types mean? +A: /ign nick if specified nick is online else + /ign *!ident@*.isp.com + /tig to remove ignores. + Some common ignore types. taken from epicsol.org's page. + ctcps filter in/out all CTCPs received + invites filter in/out all INVITEs received + msgs filter in/out all MSGs received (but not CTCPs) + notes filter in/out all NOTEs received + notices filter in/out all NOTICEs received + public filter in/out public channel conversation + wallops filter in/out operator WALLOPS + topics filter in/out all TOPIC changes + nicks filter in/out all NICK changes + joins filter in/out all channel JOINs + parts filter in/out all channel PARTs + crap filter QUIT, MODE, KICK and PONG + all everything listed above + +Q: How do i ignore a channel? +A: /cig #channel or /cig for current chan. + /tig to remove ignores. Q: Why doesn't epic5 have auto-reconnect? A: Because no one's written it yet. If you really need that use epic4. diff -aruN amn.orig/themes/nocturnal.th amn/themes/nocturnal.th --- amn.orig/themes/nocturnal.th Wed Nov 30 23:05:31 2005 +++ amn/themes/nocturnal.th Fri Dec 2 02:52:47 2005 @@ -1,7 +1,7 @@ -:Fuck_Xmas +:crapple :nocturnal :nocturnal -@auth=[Fuck_Xmas] +@auth=[crapple] @desc=[nocturnal] @name=[nocturnal] @scdesc=[\(nocturnal\)] Date: Fri, 2 Dec 2005 16:16:58 -0500 (EST) From: zak@ircii.org (Zak) Log message: Amnesiac 1.3 release is out. regen some files. more info to come. Modified files: CHANGES docs/CHANGES.rel core/sets.m ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Dec 2 03:16:58 2005 +++ amn/CHANGES Fri Dec 2 16:02:58 2005 @@ -1,171 +1,5 @@ -for further CHANGES info please read the docs/CHANGES.rel. +for further CHANGES info please read docs/CHANGES.rel. -10.20.05 - --fix _center alias to work again seems there's a bug or some change - in xecho -w perhaps the usage has been removed in epic5. which explains - why i didn't see the issue under epic4. //zak --resync amc.load to use _center again //zak --merge the above into -release. --somewhat general start of the amnesiac-fuq Frequently Unanswered -Questions. spinoff of the old bitchx.fuq docs/amn-fuq.txt //zak --new snapshot. -1.2d r/1 --Add the beginnings of a real faq. //skullY --fix some questionable skullyism's that forced me to make a release - and found the questionable skullyism to be a problem and to have - proof is just priceless (make latin1/ibm437/fixterm) work right again - apparently he need's to read up on shell functions 101, perhaps maybe - he was thinking people use !/bin/perl or just maybe he doesn't think ;(. - //zak - merged to release. --tyop in INSTALL - merged to release. //zak --merge amn-fuq.txt, amn-faq.txt to release //zak --Since epic5 removed xecho -w change all instances to just xecho. //skullY --Allow a channel name to be passed to /cops. //skullY --Fix the on who that cops sets upon completion. //skullY --country.m: Add a /tld to lookup a country. Requested by ml. //skullY --Add numbers to /format 2. How was this missing? //skullY -^^ added to -release //zak --sync TODO-BUGS to reality //zak --add stuff to TODO-BUGS //zak --fixup the multiple /format inconsistencies found and done by Alien88 - thanks! //zak --start of the proper way of using the ^on yell to suppress on what we really - want to suppress. it got removed somehow i presume skullY forgot to sync - before commit! //zak --sync TODO-BUGS to reality. //zak --bump snaprelease to r/2 //zak --remove the /rel cruft again as we have our /relm -l and friends working - i do not know why these are being recommitted *grumble* //zak --add new ASK-KEY to /about and amn-fuq.txt amn-faq.txt done by - xavier many thanks! //zak --update TODO-BUGS //zak --silence another yell we don't care about //zak --remove /filter alias as if in the future we use the clients $filter() it - would cause complications so use /trickle. ;) //zak --add a space for /about to make it look better //zak - -10.23.05 --add format_whois_ident for lame ircd's i.e bahamut //zak --silence another annoying yell. //zak - -10.26.05 --Fix all the scan.m garbage. I don't think that /scan should do anything - but call /names ($C|$*), but kreca says no leave that so he can fix that - part. //skullY --Big cleanup to scan.m, make /sco /scv /scn /scan on ^366 all use the same - alias to print scans. Get rid of the redundant formats - format_scan_onjoin_nicks_border and format_scan_onjoin_nicks. - This fixes what skully wanted to do in the comment above //kreca --Revert action.m to use xecho -window to fix /me's in dcc query - windows. //kreca - -10.28.05 --clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca --fix minor glitch in /scan that printed voiced and oped users twice //kreca --increase development version to 3 //zak --tc.m: Remove the msg alias since it breaks with dcc chats and most people - don't use it anyway. //skullY --toss out the fsckgin@!#!@ array. created a array directory for arrays - of various types in files, this is a bit cleaner imho, and much easier - for one to fine when they need to tweak or fsck something up. maybe - this will make some of the less experienced be more motivated to take - on some new format tasks and the like. //zak --sync UPGRADE to reality. //zak --fix up /save a bit better with correct alignment with skullY messed up - with his xecho skullYism's. bad skullY! //zak - -10.30.05 -----merge in following changes/fixes from snapshot to release --clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca --tc.m: Remove the msg alias since it breaks with dcc chats and most people -don't use it anyway. //skullY --Revert action.m to use xecho -window to fix /me's in dcc query -windows. //kreca -country.m: Add a /tld to lookup a country. Requested by ml. //skullY -remove filter alias, as it conflicts with epic's $filter() //zak --fixup the multiple /format inconsistencies found and done by Alien88 -thanks! //zak -----end following changes merged from -snapshot //zak - -10.31.05 --Add a usage statement to iban if the user doesn't pass an arg. //skullY --Some code cleanup in channel.m. //skullY --New command: invkick, sets +i, kicks the target, removes +i after 10 - seconds. //skullY - -11.01.05 --Fix tab.m to comply with the format_scan_users changes, maybe we need a - format_tab_users? //kreca - -11.08.05 --Make away message only display once when doing a /msg to a user who is - marked away. The counter is reset after 120 seconds of inactivity, - currently this time is hardcoded. Hopefully this will make zak shut up! - //kreca --Make /me's in non-current channels show correctly //kreca --Fix /lusers for real this time. Works on every efnet server, sorta works - on freenode, doesn't seem to work on undernet but who cares about them - anyway? //skullY - -11.09.05 --Fix ignore since kreca can't figure out how to make an alias safely recurse - without crashing the client. //skullY --update development version to 4. this should be the final development - minor before the 1.3 release. //zak - -11.17.05 --Huge changes to /config. The new format is /config
- all the config sets and stuff has been redone //kreca --add undocumented public logging to /config //kreca --general cleanup of a lot of different files --bump development version to 5 //zak --More cosmetical changes to /config. The output is formed after an 80x25 - terminal window. If anyone is using a window with less than 80 chars in width - please give us a msg. //kreca --bump development version to 6 //kreca - -11.20.05 --add another whowas numeric(402) parse.. done by Alien88 thanks! //zak - -11.28.05 --Move sync.m into pasture. //skullY --Hook 324 for when modes aren't set. //skullY --move some config aliases into config.m which is more proper //zak --sync winhelp.m to ehelp.m where it should be. //zak --minor cleanups of /config options in modules/core minor fixes - while i'm in there. //zak --cleanup some uglyness of bans being in channel.m when it should be in - ban.m organize/comment things a bit better <-- more to come. //zak --increment development version to 7. //zak --finally got around to adding /bkh /bkn /bkb /bkd so users can bankick with - the prefered bantype on the fly. some explanation about the new bankick - types when one does /bkh nick it will bankick the offender out of the - current channel with type host. /bkh(host) /bkn(normal) /bkb(better) - /bkd(domain) requested by many. //zak --make fkey use proper bindings the RIGHT way this time //zak --parse CID notifications nicely with a default level of msg, to help - people like me and some other's not miss it in channels, to modify - the behavior of it edit amn/core/fset.m look for CID. - somewhat some more to be done to this yet.(keybindings) - 06:30| irc.umich.edu zak@emogroupie.scenewhore.org (ninjazak) - ^^ sample output for umode +g //zak --fix format public so it'll show colours when showop is on + more - logical separation. however this will break backwards compability - with saved formats, PLEASE REMOVE .amn BEFORE COMPLAINING. //kreca --add keybinding of alt-y to CID to accept. add a bit more clearer - CID aliases. //zak - -11.29.05 --add huge theme, lookgood, by sirko. Many thanks, new scan, statbar, - many formats, whois (8) etc. Type /theme lookgood to check it out! - the pubpad and spubpad functions were written with this theme in mind - currently it pads to the nick lenght 9 (efnet).//kreca --clean up the send publics as I did with regular publics yesterday, - need to reload your theme to make formats work.//kreca --fix minor fuckup in /format 2 //kreca --sync docs to reality. //zak --increment minor version. tree is now considered somewhat frozen. - 12.02.05 --update some more docs //zak +-move old CHANGES to docs/CHANGES.rel +-recycle CHANGES for -snapshot. diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Tue Nov 29 18:52:50 2005 +++ amn/core/sets.m Fri Dec 2 15:58:04 2005 @@ -39,9 +39,9 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[8] -@a.rel=[1.2d r/$rel_id] -@a.date=[20051020] +@rel_id=[1] +@a.rel=[1.3 r/$rel_id] +@a.date=[20051202] @_ss=[15] @_ovsize=[5] @_ovmode=[fibxwzZsy] diff -aruN amn.orig/docs/CHANGES.rel amn/docs/CHANGES.rel --- amn.orig/docs/CHANGES.rel Thu Oct 20 20:47:58 2005 +++ amn/docs/CHANGES.rel Fri Dec 2 16:00:31 2005 @@ -545,3 +545,176 @@ -change version for 1.2 release 1. yes it's finally a release! //zak -sync CHANGES.rel to proper and create a new CHANGES file. -shrink EPIC-BUGS info as .7 is rolling out today/tomorrow as well. //zak + +Changes since amnesiac 1.2-rel + +10.20.05 + +-fix _center alias to work again seems there's a bug or some change + in xecho -w perhaps the usage has been removed in epic5. which explains + why i didn't see the issue under epic4. //zak +-resync amc.load to use _center again //zak +-merge the above into -release. +-somewhat general start of the amnesiac-fuq Frequently Unanswered +Questions. spinoff of the old bitchx.fuq docs/amn-fuq.txt //zak +-new snapshot. +1.2d r/1 +-Add the beginnings of a real faq. //skullY +-fix some questionable skullyism's that forced me to make a release + and found the questionable skullyism to be a problem and to have + proof is just priceless (make latin1/ibm437/fixterm) work right again + apparently he need's to read up on shell functions 101, perhaps maybe + he was thinking people use !/bin/perl or just maybe he doesn't think ;(. + //zak - merged to release. +-tyop in INSTALL - merged to release. //zak +-merge amn-fuq.txt, amn-faq.txt to release //zak +-Since epic5 removed xecho -w change all instances to just xecho. //skullY +-Allow a channel name to be passed to /cops. //skullY +-Fix the on who that cops sets upon completion. //skullY +-country.m: Add a /tld to lookup a country. Requested by ml. //skullY +-Add numbers to /format 2. How was this missing? //skullY +^^ added to -release //zak +-sync TODO-BUGS to reality //zak +-add stuff to TODO-BUGS //zak +-fixup the multiple /format inconsistencies found and done by Alien88 + thanks! //zak +-start of the proper way of using the ^on yell to suppress on what we really + want to suppress. it got removed somehow i presume skullY forgot to sync + before commit! //zak +-sync TODO-BUGS to reality. //zak +-bump snaprelease to r/2 //zak +-remove the /rel cruft again as we have our /relm -l and friends working + i do not know why these are being recommitted *grumble* //zak +-add new ASK-KEY to /about and amn-fuq.txt amn-faq.txt done by + xavier many thanks! //zak +-update TODO-BUGS //zak +-silence another yell we don't care about //zak +-remove /filter alias as if in the future we use the clients $filter() it + would cause complications so use /trickle. ;) //zak +-add a space for /about to make it look better //zak + +10.23.05 +-add format_whois_ident for lame ircd's i.e bahamut //zak +-silence another annoying yell. //zak + +10.26.05 +-Fix all the scan.m garbage. I don't think that /scan should do anything + but call /names ($C|$*), but kreca says no leave that so he can fix that + part. //skullY +-Big cleanup to scan.m, make /sco /scv /scn /scan on ^366 all use the same + alias to print scans. Get rid of the redundant formats + format_scan_onjoin_nicks_border and format_scan_onjoin_nicks. + This fixes what skully wanted to do in the comment above //kreca +-Revert action.m to use xecho -window to fix /me's in dcc query + windows. //kreca + +10.28.05 +-clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca +-fix minor glitch in /scan that printed voiced and oped users twice //kreca +-increase development version to 3 //zak +-tc.m: Remove the msg alias since it breaks with dcc chats and most people + don't use it anyway. //skullY +-toss out the fsckgin@!#!@ array. created a array directory for arrays + of various types in files, this is a bit cleaner imho, and much easier + for one to fine when they need to tweak or fsck something up. maybe + this will make some of the less experienced be more motivated to take + on some new format tasks and the like. //zak +-sync UPGRADE to reality. //zak +-fix up /save a bit better with correct alignment with skullY messed up + with his xecho skullYism's. bad skullY! //zak + +10.30.05 +----merge in following changes/fixes from snapshot to release +-clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca +-tc.m: Remove the msg alias since it breaks with dcc chats and most people +don't use it anyway. //skullY +-Revert action.m to use xecho -window to fix /me's in dcc query +windows. //kreca +country.m: Add a /tld to lookup a country. Requested by ml. //skullY +remove filter alias, as it conflicts with epic's $filter() //zak +-fixup the multiple /format inconsistencies found and done by Alien88 +thanks! //zak +----end following changes merged from -snapshot //zak + +10.31.05 +-Add a usage statement to iban if the user doesn't pass an arg. //skullY +-Some code cleanup in channel.m. //skullY +-New command: invkick, sets +i, kicks the target, removes +i after 10 + seconds. //skullY + +11.01.05 +-Fix tab.m to comply with the format_scan_users changes, maybe we need a + format_tab_users? //kreca + +11.08.05 +-Make away message only display once when doing a /msg to a user who is + marked away. The counter is reset after 120 seconds of inactivity, + currently this time is hardcoded. Hopefully this will make zak shut up! + //kreca +-Make /me's in non-current channels show correctly //kreca +-Fix /lusers for real this time. Works on every efnet server, sorta works + on freenode, doesn't seem to work on undernet but who cares about them + anyway? //skullY + +11.09.05 +-Fix ignore since kreca can't figure out how to make an alias safely recurse + without crashing the client. //skullY +-update development version to 4. this should be the final development + minor before the 1.3 release. //zak + +11.17.05 +-Huge changes to /config. The new format is /config
+ all the config sets and stuff has been redone //kreca +-add undocumented public logging to /config //kreca +-general cleanup of a lot of different files +-bump development version to 5 //zak +-More cosmetical changes to /config. The output is formed after an 80x25 + terminal window. If anyone is using a window with less than 80 chars in width + please give us a msg. //kreca +-bump development version to 6 //kreca + +11.20.05 +-add another whowas numeric(402) parse.. done by Alien88 thanks! //zak + +11.28.05 +-Move sync.m into pasture. //skullY +-Hook 324 for when modes aren't set. //skullY +-move some config aliases into config.m which is more proper //zak +-sync winhelp.m to ehelp.m where it should be. //zak +-minor cleanups of /config options in modules/core minor fixes + while i'm in there. //zak +-cleanup some uglyness of bans being in channel.m when it should be in + ban.m organize/comment things a bit better <-- more to come. //zak +-increment development version to 7. //zak +-finally got around to adding /bkh /bkn /bkb /bkd so users can bankick with + the prefered bantype on the fly. some explanation about the new bankick + types when one does /bkh nick it will bankick the offender out of the + current channel with type host. /bkh(host) /bkn(normal) /bkb(better) + /bkd(domain) requested by many. //zak +-make fkey use proper bindings the RIGHT way this time //zak +-parse CID notifications nicely with a default level of msg, to help + people like me and some other's not miss it in channels, to modify + the behavior of it edit amn/core/fset.m look for CID. + somewhat some more to be done to this yet.(keybindings) + 06:30| irc.umich.edu zak@emogroupie.scenewhore.org (ninjazak) + ^^ sample output for umode +g //zak +-fix format public so it'll show colours when showop is on + more + logical separation. however this will break backwards compability + with saved formats, PLEASE REMOVE .amn BEFORE COMPLAINING. //kreca +-add keybinding of alt-y to CID to accept. add a bit more clearer + CID aliases. //zak + +11.29.05 +-add huge theme, lookgood, by sirko. Many thanks, new scan, statbar, + many formats, whois (8) etc. Type /theme lookgood to check it out! + the pubpad and spubpad functions were written with this theme in mind + currently it pads to the nick lenght 9 (efnet).//kreca +-clean up the send publics as I did with regular publics yesterday, + need to reload your theme to make formats work.//kreca +-fix minor fuckup in /format 2 //kreca +-sync docs to reality. //zak +-increment minor version. tree is now considered somewhat frozen. + +12.02.05 +-update some more docs //zak +-release amnesiac 1.3 //zak Date: Fri, 2 Dec 2005 16:34:32 -0500 From: Zak Amnesiac 1.3 r/1 is out. some major changes involve cleanups of arrays public_formats scan_formats, a nice new theme which manta(sirko) implimented 'lookgood' public padding, couple of new formats. and the usual bugfixes and code cleanups url to webpage http://amnesiac.ircii.org download: http://amnesiac.ircii.org/amnesiac1.3r1.tgz please let me know of any bugs/issues. NOTE: you must remove everything in ~/.amn /path/to/amn except for shitlist/friends/bwk/channel/ignore savefiles before upgrading. failing to do so and reporting a bug will be ignored. users upgrading from the last snapshot release 1.2d/r8 ignore this notice. enjoy. CHANGES since last release. 10.20.05 -fix _center alias to work again seems there's a bug or some change in xecho -w perhaps the usage has been removed in epic5. which explains why i didn't see the issue under epic4. //zak -resync amc.load to use _center again //zak -merge the above into -release. -somewhat general start of the amnesiac-fuq Frequently Unanswered Questions. spinoff of the old bitchx.fuq docs/amn-fuq.txt //zak -new snapshot. 1.2d r/1 -Add the beginnings of a real faq. //skullY -fix some questionable skullyism's that forced me to make a release and found the questionable skullyism to be a problem and to have proof is just priceless (make latin1/ibm437/fixterm) work right again apparently he need's to read up on shell functions 101, perhaps maybe he was thinking people use !/bin/perl or just maybe he doesn't think ;(. //zak - merged to release. -tyop in INSTALL - merged to release. //zak -merge amn-fuq.txt, amn-faq.txt to release //zak -Since epic5 removed xecho -w change all instances to just xecho. //skullY -Allow a channel name to be passed to /cops. //skullY -Fix the on who that cops sets upon completion. //skullY -country.m: Add a /tld to lookup a country. Requested by ml. //skullY -Add numbers to /format 2. How was this missing? //skullY ^^ added to -release //zak -sync TODO-BUGS to reality //zak -add stuff to TODO-BUGS //zak -fixup the multiple /format inconsistencies found and done by Alien88 thanks! //zak -start of the proper way of using the ^on yell to suppress on what we really want to suppress. it got removed somehow i presume skullY forgot to sync before commit! //zak -sync TODO-BUGS to reality. //zak -bump snaprelease to r/2 //zak -remove the /rel cruft again as we have our /relm -l and friends working i do not know why these are being recommitted *grumble* //zak -add new ASK-KEY to /about and amn-fuq.txt amn-faq.txt done by xavier many thanks! //zak -update TODO-BUGS //zak -silence another yell we don't care about //zak -remove /filter alias as if in the future we use the clients $filter() it would cause complications so use /trickle. ;) //zak -add a space for /about to make it look better //zak 10.23.05 -add format_whois_ident for lame ircd's i.e bahamut //zak -silence another annoying yell. //zak 10.26.05 -Fix all the scan.m garbage. I don't think that /scan should do anything but call /names ($C|$*), but kreca says no leave that so he can fix that part. //skullY -Big cleanup to scan.m, make /sco /scv /scn /scan on ^366 all use the same alias to print scans. Get rid of the redundant formats format_scan_onjoin_nicks_border and format_scan_onjoin_nicks. This fixes what skully wanted to do in the comment above //kreca -Revert action.m to use xecho -window to fix /me's in dcc query windows. //kreca 10.28.05 -clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca -fix minor glitch in /scan that printed voiced and oped users twice //kreca -increase development version to 3 //zak -tc.m: Remove the msg alias since it breaks with dcc chats and most people don't use it anyway. //skullY -toss out the fsckgin@!#!@ array. created a array directory for arrays of various types in files, this is a bit cleaner imho, and much easier for one to fine when they need to tweak or fsck something up. maybe this will make some of the less experienced be more motivated to take on some new format tasks and the like. //zak -sync UPGRADE to reality. //zak -fix up /save a bit better with correct alignment with skullY messed up with his xecho skullYism's. bad skullY! //zak 10.30.05 ----merge in following changes/fixes from snapshot to release -clean up latin1 and fixterm, make them call REFRESH_SCREEN aswell //kreca -tc.m: Remove the msg alias since it breaks with dcc chats and most people don't use it anyway. //skullY -Revert action.m to use xecho -window to fix /me's in dcc query windows. //kreca country.m: Add a /tld to lookup a country. Requested by ml. //skullY remove filter alias, as it conflicts with epic's $filter() //zak -fixup the multiple /format inconsistencies found and done by Alien88 thanks! //zak ----end following changes merged from -snapshot //zak 10.31.05 -Add a usage statement to iban if the user doesn't pass an arg. //skullY -Some code cleanup in channel.m. //skullY -New command: invkick, sets +i, kicks the target, removes +i after 10 seconds. //skullY 11.01.05 -Fix tab.m to comply with the format_scan_users changes, maybe we need a format_tab_users? //kreca 11.08.05 -Make away message only display once when doing a /msg to a user who is marked away. The counter is reset after 120 seconds of inactivity, currently this time is hardcoded. Hopefully this will make zak shut up! //kreca -Make /me's in non-current channels show correctly //kreca -Fix /lusers for real this time. Works on every efnet server, sorta works on freenode, doesn't seem to work on undernet but who cares about them anyway? //skullY 11.09.05 -Fix ignore since kreca can't figure out how to make an alias safely recurse without crashing the client. //skullY -update development version to 4. this should be the final development minor before the 1.3 release. //zak 11.17.05 -Huge changes to /config. The new format is /config
all the config sets and stuff has been redone //kreca -add undocumented public logging to /config //kreca -general cleanup of a lot of different files -bump development version to 5 //zak -More cosmetical changes to /config. The output is formed after an 80x25 terminal window. If anyone is using a window with less than 80 chars in width please give us a msg. //kreca -bump development version to 6 //kreca 11.20.05 -add another whowas numeric(402) parse.. done by Alien88 thanks! //zak 11.28.05 -Move sync.m into pasture. //skullY -Hook 324 for when modes aren't set. //skullY -move some config aliases into config.m which is more proper //zak -sync winhelp.m to ehelp.m where it should be. //zak -minor cleanups of /config options in modules/core minor fixes while i'm in there. //zak -cleanup some uglyness of bans being in channel.m when it should be in ban.m organize/comment things a bit better <-- more to come. //zak -increment development version to 7. //zak -finally got around to adding /bkh /bkn /bkb /bkd so users can bankick with the prefered bantype on the fly. some explanation about the new bankick types when one does /bkh nick it will bankick the offender out of the current channel with type host. /bkh(host) /bkn(normal) /bkb(better) /bkd(domain) requested by many. //zak -make fkey use proper bindings the RIGHT way this time //zak -parse CID notifications nicely with a default level of msg, to help people like me and some other's not miss it in channels, to modify the behavior of it edit amn/core/fset.m look for CID. somewhat some more to be done to this yet.(keybindings) 06:30| irc.umich.edu zak@emogroupie.scenewhore.org (ninjazak) ^^ sample output for umode +g //zak -fix format public so it'll show colours when showop is on + more logical separation. however this will break backwards compability with saved formats, PLEASE REMOVE .amn BEFORE COMPLAINING. //kreca -add keybinding of alt-y to CID to accept. add a bit more clearer CID aliases. //zak 11.29.05 -add huge theme, lookgood, by sirko. Many thanks, new scan, statbar, many formats, whois (8) etc. Type /theme lookgood to check it out! the pubpad and spubpad functions were written with this theme in mind currently it pads to the nick lenght 9 (efnet).//kreca -clean up the send publics as I did with regular publics yesterday, need to reload your theme to make formats work.//kreca -fix minor fuckup in /format 2 //kreca -sync docs to reality. //zak -increment minor version. tree is now considered somewhat frozen. 12.02.05 -update some more docs //zak Date: Fri, 2 Dec 2005 16:40:35 -0500 (EST) From: zak@ircii.org (Zak) Log message: sync version to development so ppl can fuckup the tree again. Modified files: CHANGES core/sets.m ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Dec 2 16:02:58 2005 +++ amn/CHANGES Fri Dec 2 16:37:12 2005 @@ -1,5 +1,6 @@ for further CHANGES info please read docs/CHANGES.rel. 12.02.05 --move old CHANGES to docs/CHANGES.rel +-move old CHANGES to docs/CHANGES.rel -recycle CHANGES for -snapshot. +-unfreeze tree, change version to reflect -snapshot. //zak diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Fri Dec 2 15:58:04 2005 +++ amn/core/sets.m Fri Dec 2 16:37:33 2005 @@ -40,7 +40,7 @@ @awayr=[Not Here] @a.ver=[amnesiac] @rel_id=[1] -@a.rel=[1.3 r/$rel_id] +@a.rel=[1.3d r/$rel_id] @a.date=[20051202] @_ss=[15] @_ovsize=[5] Date: Sun, 4 Dec 2005 05:18:54 -0500 (EST) From: zak@ircii.org (Zak) Modified files: CHANGES core/fsets.m wis/whois.1 wis/whois.2 wis/whois.3 wis/whois.4 wis/whois.5 wis/whois.6 wis/whois.8 Log message: Add 3 unrealircd /whois parses for fikle, updated all except #7 cuz i'm tired and lazy. ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Fri Dec 2 16:37:12 2005 +++ amn/CHANGES Sun Dec 4 05:15:34 2005 @@ -4,3 +4,6 @@ -move old CHANGES to docs/CHANGES.rel -recycle CHANGES for -snapshot. -unfreeze tree, change version to reflect -snapshot. //zak + +12.04.05 +-add some unrealircd whois parses for fikle //zak diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Mon Nov 28 18:18:29 2005 +++ amn/core/fsets.m Sun Dec 4 04:36:30 2005 @@ -223,6 +223,19 @@ on ^307 * { xecho $fparse(format_whois_ident $*) } +## Unreal ircd stuff for fikle. +on ^310 * { + xecho $fparse(format_whois_active $*) +} + +on ^320 * { + xecho $fparse(format_whois_root $*) +} +on ^378 * { + xecho $fparse(format_whois_connect $*) +} +## End Unreal. + on ^308 * { xecho $fparse(format_whois_admin $1-) } diff -aruN amn.orig/wis/whois.1 amn/wis/whois.1 --- amn.orig/wis/whois.1 Sat Oct 22 22:40:18 2005 +++ amn/wis/whois.1 Sun Dec 4 04:52:17 2005 @@ -6,6 +6,9 @@ ^sfset format_whois_server $(hblk)[$(c2)³$(hblk)] $(c2)s$(c1)erver $(hblk).. $(cl)$1 \($2-\) ^sfset format_whois_away $(hblk)[$(c2)³$(hblk)] $(c2)a$(c1)way $(hblk)..$(cl) $1- ^sfset format_whois_actual $(hblk)[$(c2)³$(hblk)] $(c2)a$(c1)ctual $(hblk).. $(cl)$2 $msar(g/[/%K[%n/]/%K]%n/ $3) +^sfset format_whois_connect $(hblk)[$(c2)³$(hblk)] $(c2)c$(c1)onnect $(hblk).. $(cl)on $1 actual $6 +^sfset format_whois_active $(hblk)[$(c2)³$(hblk)] $(c2)a$(c1)ctive $(hblk).. $(cl)is active +^sfset format_whois_root $(hblk)[$(c2)³$(hblk)] $(c2)r$(c1)oot $(hblk).. $(cl)Services Root Admin ^sfset format_whois_login $(hblk)[$(c2)³$(hblk)] $(c2)l$(c1)ogin $(hblk).. $(cl) as $3 ^sfset format_whois_ident $(hblk)[$(c2)³$(hblk)] $(c2)i$(c1)dent $(hblk).. $(cl) identified ^sfset format_whois_operator $(hblk)[$(c2)³$(hblk)] $(c2)o$(c1)perator $(hblk).. $(cl)$1 $2- %K[%nOperator%K] diff -aruN amn.orig/wis/whois.2 amn/wis/whois.2 --- amn.orig/wis/whois.2 Sat Oct 22 22:41:30 2005 +++ amn/wis/whois.2 Sun Dec 4 04:55:57 2005 @@ -7,6 +7,9 @@ ^sfset format_whois_actual $(hblk)³ $(hwht)a$(cl)ctual $(hblk): $(cl)$2 $msar(g/[/%K[%n/]/%K]%n/ $3) ^sfset format_whois_login $(hblk)³ $(hwht)l$(cl)ogin $(hblk): $(cl) as $3 ^sfset format_whois_ident $(hblk)³ $(hwht)i$(cl)dent $(hblk): $(cl) identified +^sfset format_whois_connect $(hblk)³ $(hwht)c$(cl)onnect $(hblk): $(cl) on $1 actual $6 +^sfset format_whois_active $(hblk)³ $(hwht)a$(cl)ctive $(hblk): $(cl) is active +^sfset format_whois_root $(hblk)³ $(hwht)r$(cl)oot $(hblk): $(cl) Services Root Admin ^sfset format_whois_operator $(hblk)³ $(hwht)o$(cl)perator $(hblk): $(cl)$1 $2- %K[%nOperator%K] ^sfset format_whois_admin $(hblk)³ $(hwht)a$(cl)dmin $(hblk): $(cl)$1- ^sfset format_whois_idle $(hblk)³ $(hwht)i$(cl)dle $(hblk): $(cl)$tdiff($1) idle diff -aruN amn.orig/wis/whois.3 amn/wis/whois.3 --- amn.orig/wis/whois.3 Sat Oct 22 22:38:12 2005 +++ amn/wis/whois.3 Sun Dec 4 04:41:59 2005 @@ -5,8 +5,11 @@ ^sfset format_whois_server ³ server : $1 \($2-\) ^sfset format_whois_away ³ away : $1- ^sfset format_whois_actual ³ actual : $2 $msar(g/[/%K[%n/]/%K]%n/ $3) +^sfset format_whois_connect ³ connect : on $1 actual $6 ^sfset format_whois_login ³ login : as $3 ^sfset format_whois_ident ³ ident : identified +^sfset format_whois_active ³ active : is active +^sfset format_whois_root ³ root : Services Root Admin ^sfset format_whois_operator ³ operator : $1 $2- ^sfset format_whois_admin ³ admin : $1- ^sfset format_whois_idle ³ idle : $tdiff($1) idle diff -aruN amn.orig/wis/whois.4 amn/wis/whois.4 --- amn.orig/wis/whois.4 Sat Oct 22 22:42:04 2005 +++ amn/wis/whois.4 Sun Dec 4 04:59:34 2005 @@ -7,7 +7,10 @@ ^sfset format_whois_actual actual : $2 $msar(g/[/%K[%n/]/%K]%n/ $3) ^sfset format_whois_login login : as $3 ^sfset format_whois_ident ident : identified -^sfset format_whois_operator operator : $1 $3 +^sfset format_whois_connect connect : on $1 actual $6 +^sfset format_whois_active active : is active +^sfset format_whois_root root : Services Root Admin +^sfset format_whois_operator operator : $1 $2- ^sfset format_whois_admin admin : $1- ^sfset format_whois_idle idle : $tdiff($1) idle ^sfset format_whois_unknown $1: no such nick/channel diff -aruN amn.orig/wis/whois.5 amn/wis/whois.5 --- amn.orig/wis/whois.5 Sat Oct 22 22:43:14 2005 +++ amn/wis/whois.5 Sun Dec 4 05:03:17 2005 @@ -7,6 +7,9 @@ ^sfset format_whois_actual *** $1 actually $2 $msar(g/[/%K[%n/]/%K]%n/ $3) ^sfset format_whois_login *** $1 login as $3 ^sfset format_whois_ident *** $1 has identified +^sfset format_whois_connect *** connected on $1 actual $6 +^sfset format_whois_active *** is active +^sfset format_whois_root *** Services Root Admin ^sfset format_whois_operator *** $1 is an IRC Operator ^sfset format_whois_admin *** $1 is a Server Administrator ^sfset format_whois_idle *** idle: $tdiff($1) diff -aruN amn.orig/wis/whois.6 amn/wis/whois.6 --- amn.orig/wis/whois.6 Sat Oct 22 22:44:09 2005 +++ amn/wis/whois.6 Sun Dec 4 05:06:56 2005 @@ -7,6 +7,9 @@ ^sfset format_whois_actual %BActually %n:%B $3 ^sfset format_whois_login %BLogin %n: $1 login as $3 ^sfset format_whois_ident %BIdent %n: $1 has identified +^sfset format_whois_connect %BConnect %n: on $1 actual $6 +^sfset format_whois_active %BActive %n: is active +^sfset format_whois_root %BRoot %n: Services Root Admin ^sfset format_whois_operator %BIrcOp %n: $1 $2- ^sfset format_whois_admin %BIrcAdm %n: $1 is a Server Administrator ^sfset format_whois_idle %BIdle %n: $tdiff($1) diff -aruN amn.orig/wis/whois.8 amn/wis/whois.8 --- amn.orig/wis/whois.8 Tue Nov 29 17:06:07 2005 +++ amn/wis/whois.8 Sun Dec 4 05:11:47 2005 @@ -2,6 +2,9 @@ ^sfset format_whois_actual %G| %WActually%n : $3 ^sfset format_whois_header %G=%RWhois%G==========================================================%n ^sfset format_whois_ident %G| %WRegged Nick%n : Yes +^sfset format_whois_connect %G| %WConnect%n : On $1 Actual $6 +^sfset format_whois_active %G| %WActive%n : Is Active +^sfset format_whois_root %G| %WRoot%n : Services Root Admin ^sfset format_whois_admin %G| %WAdmin%n : Yes ^sfset format_whois_nick %G| %Y$1%n %K\(%n$2@$3%K\)%n %K\(%n$country($rightw(1 $sar(g/./ / $3)))%K\)%n ^sfset format_whois_name %G| %WIrcname%n : $1- Date: Sun, 4 Dec 2005 07:48:19 -0500 (EST) From: zak@ircii.org (Zak) Modified files: CHANGES core/action.m sc/scan.8 Log message: move padding to a better place for when client is reloaded or other things that may not cause it to load. see CHANGES. (the usual suspects) ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sun Dec 4 05:15:34 2005 +++ amn/CHANGES Sun Dec 4 07:46:45 2005 @@ -7,3 +7,7 @@ 12.04.05 -add some unrealircd whois parses for fikle //zak +-fix a krecism. move padding alias from scan.8 to action.m this is probably + not the ideal place for it, well have to grunt and gesture a lot since our + universal translators are broken to agree on where it should be.. + (Thinks AIX... being invented by aliens) //zak diff -aruN amn.orig/core/action.m amn/core/action.m --- amn.orig/core/action.m Tue Nov 8 17:08:00 2005 +++ amn/core/action.m Sun Dec 4 07:43:42 2005 @@ -47,4 +47,8 @@ } } +alias mypad { + return $pad(${32-strlen($1-)} =) +} + oof diff -aruN amn.orig/sc/scan.8 amn/sc/scan.8 --- amn.orig/sc/scan.8 Tue Nov 29 17:53:53 2005 +++ amn/sc/scan.8 Sun Dec 4 07:42:32 2005 @@ -1,9 +1,6 @@ # Copyright (c) 2003-2005 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage scan8 -alias mypad { - return $pad(${32-strlen($1-)} =) -} @format_scan_users=[$$(hgrn)===$$(red)[$$(cl)$$(hblu)$$4$$(red)]$$(hgrn)=====$$(red)[$$(mag)Chan-ops$$(hwht)/$$(hmag)$$1 $$(mag)Voiced$$(hwht)/$$(hmag)$$3 $$(mag)Unimportant Users$$(hwht)/$$(hmag)$$2$$(red)]$$(hgrn)] @format_scan_users=[$(format_scan_users)$$mypad($*)] From: Kreca Date: Sun, 4 Dec 2005 14:46:07 +0100 (CET) make /delchan support #channel argument as mjoinhelp incorectly stated (correct now) diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sun Dec 4 13:54:36 2005 +++ amn/CHANGES Sun Dec 4 14:42:12 2005 @@ -13,3 +13,5 @@ (Thinks AIX... being invented by aliens) //zak -fix /mjhelp /ajhelp skully broke this some time ago, just it took someone new to the script to report it broken.. found by cyb@efnet. +-make /delchan accept #channel as argument to shut zak, xavier and others + up. //kreca diff -aruN amn.orig/modules/mjoin/mjoin.m amn/modules/mjoin/mjoin.m --- amn.orig/modules/mjoin/mjoin.m Sun Dec 4 13:52:45 2005 +++ amn/modules/mjoin/mjoin.m Sun Dec 4 14:41:01 2005 @@ -19,18 +19,18 @@ xecho (mjoin).. syn: /addchan chan1,chan2,chan3... (note. if the channel has a key then /addchan chan1 key, one by one.) }{ @_ach=sar(g/,/ /$0) - if ([$1]) { - @_key=[$1] + if ([$1]) { + @_key=[$1] fe ($_ach) a1 { @setitem(chans 0 !) - @setitem(chans $numitems(chans) $a1 $_key) - } + @setitem(chans $numitems(chans) $a1 $_key) + } xecho $acban added $* to channel list }{ fe ($_ach) a1 { @setitem(chans 0 !) - @setitem(chans $numitems(chans) $a1) - } + @setitem(chans $numitems(chans) $a1) + } xecho $acban added $* to channel list } } @@ -38,7 +38,7 @@ alias listchan { if (numitems(chans) == 1) { - xecho $acban no channels current on list + xecho $acban no channels current on list }{ banner.lchead for (@xx=1, xx Add a new FAQ entry on adding new formats. amn diff diff amn.orig/docs/amn-faq.txt amn/docs/amn-faq.txt --- amn.orig/docs/amn-faq.txt Mon Dec 5 03:17:10 2005 +++ amn/docs/amn-faq.txt Mon Dec 5 03:26:30 2005 @@ -116,3 +116,8 @@ Q: Why doesn't epic5 have auto-reconnect? A: Because no one's written it yet. If you really need that use epic4. + +Q: I want to make this really great theme but I need to add some formats. How + do I do this? +A: You need to add the appropriate format in amn/arrays. If you add a new + whois or scan you need to add some example output to amn/wis or amn/scan. Date: Wed, 7 Dec 2005 19:02:27 +0000 From: Zach White Add a custom _wsact alias to vanilla.m that grabs windows from the right instead of the left. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Dec 5 03:27:51 2005 +++ amn/CHANGES Wed Dec 7 19:01:59 2005 @@ -16,3 +16,7 @@ -make /delchan accept #channel as argument to shut zak, xavier and others up. //kreca -Add a new FAQ entry on formats. //skullY + +12.07.05 +-vanilla.m: Add custom _wsact alias, that goes to the oldest window with + activity, not the newest. //skullY diff amn.orig/modules/vanilla/vanilla.m amn/modules/vanilla/vanilla.m --- amn.orig/modules/vanilla/vanilla.m Mon Dec 5 03:27:51 2005 +++ amn/modules/vanilla/vanilla.m Wed Dec 7 19:00:07 2005 @@ -21,3 +21,6 @@ } set clock_24hour on + +# Have F3 go to the oldest window, not the newest window. +alias _WSACT window swap $rightw(1 $notifywindows()); Date: Wed, 7 Dec 2005 19:08:12 -0500 (EST) From: zak@ircii.org (Zak) Modified files: CHANGES core/window.m vanilla/vanilla.m Log message: Move window_new_activity to go to old activity first then new as this seems more proper to me, yes kreca i suck skullY's dick ;( ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Dec 7 14:01:59 2005 +++ amn/CHANGES Wed Dec 7 19:05:11 2005 @@ -20,3 +20,4 @@ 12.07.05 -vanilla.m: Add custom _wsact alias, that goes to the oldest window with activity, not the newest. //skullY +^^ removed and added to core //zak diff -aruN amn.orig/core/window.m amn/core/window.m --- amn.orig/core/window.m Wed Oct 19 01:01:52 2005 +++ amn/core/window.m Wed Dec 7 18:59:56 2005 @@ -33,8 +33,12 @@ } } -alias _wsact { window swap $leftw(1 $notifywindows()) -;} +## comment out for now in case some ppl want the old behavior. +#alias _wsact { window swap $leftw(1 $notifywindows()) +#;} + +# Have F3 go to the oldest window, not the newest window. +alias _WSACT window swap $rightw(1 $notifywindows()); ## multiserv stuff. alias wcs if ([$0]) { diff -aruN amn.orig/modules/vanilla/vanilla.m amn/modules/vanilla/vanilla.m --- amn.orig/modules/vanilla/vanilla.m Wed Dec 7 14:00:07 2005 +++ amn/modules/vanilla/vanilla.m Wed Dec 7 18:58:39 2005 @@ -21,6 +21,3 @@ } set clock_24hour on - -# Have F3 go to the oldest window, not the newest window. -alias _WSACT window swap $rightw(1 $notifywindows()); Date: Sun, 11 Dec 2005 05:49:48 -0500 (EST) From: zak@ircii.org (Zak) Modified files: CHANGES core/sets.m Log message: regen new -stable release 1.3 r/2 regen snapshot version 1.3d r/2 should make ppl who are always reluctant to touch -snapshot thuttup about a few bugs. ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Dec 7 19:05:11 2005 +++ amn/CHANGES Sun Dec 11 05:47:19 2005 @@ -21,3 +21,7 @@ -vanilla.m: Add custom _wsact alias, that goes to the oldest window with activity, not the newest. //skullY ^^ removed and added to core //zak + +12.11.05 +-merge all of the above into 1.3 r/2 -release //zak +-increment development version to 2 as well //zak diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Fri Dec 2 16:37:33 2005 +++ amn/core/sets.m Sun Dec 11 05:46:53 2005 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[1] +@rel_id=[2] @a.rel=[1.3d r/$rel_id] @a.date=[20051202] @_ss=[15] Date: Sat, 24 Dec 2005 07:28:16 +0000 From: Zach White What genius decided that /p should be part? /p has been ping since the beginning of time, or at least the last 10 years which is farther back than I can remember so it may as well be the beginning of time. amn diff diff amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sat Dec 24 07:26:21 2005 +++ amn/CHANGES Sat Dec 24 07:26:59 2005 @@ -25,3 +25,7 @@ 12.11.05 -merge all of the above into 1.3 r/2 -release //zak -increment development version to 2 as well //zak + +12.24.05 +-Some genius made /p be part when /p has been ping since the beginning of + time. Fixed. //skullY diff amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Sat Dec 24 07:26:21 2005 +++ amn/core/alias.m Sat Dec 24 07:26:52 2005 @@ -63,7 +63,7 @@ alias m msg $* alias d describe $* alias j {/join $channame($0) $1-} -alias p part $* +alias p ping $* alias k kick $* alias l part $* alias host //userhost $* Date: Sun, 8 Jan 2006 16:10:19 -0500 (EST) From: zak@ircii.org (Zak) Modified files: TOO_MANY_TO_LIST Log message: -2006. ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sat Dec 24 02:26:59 2005 +++ amn/CHANGES Sun Jan 8 16:08:49 2006 @@ -29,3 +29,6 @@ 12.24.05 -Some genius made /p be part when /p has been ping since the beginning of time. Fixed. //skullY + +1.8.06 +-update copyright to 2006 //zak diff -aruN amn.orig/COPYRIGHT amn/COPYRIGHT --- amn.orig/COPYRIGHT Mon Oct 3 00:06:40 2005 +++ amn/COPYRIGHT Sun Jan 8 15:52:31 2006 @@ -1,6 +1,6 @@ /* - * Copyright (c) 2003-2005 Amnesiac Project - * Copyright (c) 2003-2005 EPIC Software Labs + * Copyright (c) 2003-2006 Amnesiac Project + * Copyright (c) 2003-2006 EPIC Software Labs * All rights reserved. * * Redistribution and use in source and binary forms, with or without diff -aruN amn.orig/INSTALL amn/INSTALL --- amn.orig/INSTALL Fri Oct 21 03:58:03 2005 +++ amn/INSTALL Sun Jan 8 15:52:45 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. before installing amnesiac remember this script is for epic it's not a diff -aruN amn.orig/README amn/README --- amn.orig/README Mon Oct 10 22:21:33 2005 +++ amn/README Sun Jan 8 15:52:54 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. * THE AMNESIAC HOME PAGE IS: http://amnesiac.ircii.org diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Thu Nov 17 12:38:01 2005 +++ amn/amn.epic Sun Jan 8 15:53:07 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. /* amnesiac by crapple mods/bugfixes by kreca diff -aruN amn.orig/arrays/action.a amn/arrays/action.a --- amn.orig/arrays/action.a Tue Nov 29 16:43:07 2005 +++ amn/arrays/action.a Sun Jan 8 16:05:13 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## action formats diff -aruN amn.orig/arrays/away.a amn/arrays/away.a --- amn.orig/arrays/away.a Fri Oct 28 21:49:28 2005 +++ amn/arrays/away.a Sun Jan 8 16:05:20 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## away formats diff -aruN amn.orig/arrays/ctcp.a amn/arrays/ctcp.a --- amn.orig/arrays/ctcp.a Tue Nov 29 16:43:43 2005 +++ amn/arrays/ctcp.a Sun Jan 8 16:05:26 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## ctcp formats diff -aruN amn.orig/arrays/dcc.a amn/arrays/dcc.a --- amn.orig/arrays/dcc.a Tue Nov 29 16:44:32 2005 +++ amn/arrays/dcc.a Sun Jan 8 16:05:33 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## send dcc formats diff -aruN amn.orig/arrays/echostr.a amn/arrays/echostr.a --- amn.orig/arrays/echostr.a Fri Oct 28 21:49:48 2005 +++ amn/arrays/echostr.a Sun Jan 8 16:05:40 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## echostr formats diff -aruN amn.orig/arrays/join.a amn/arrays/join.a --- amn.orig/arrays/join.a Fri Oct 28 21:49:53 2005 +++ amn/arrays/join.a Sun Jan 8 16:05:47 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## join formats diff -aruN amn.orig/arrays/kick.a amn/arrays/kick.a --- amn.orig/arrays/kick.a Tue Nov 29 16:45:41 2005 +++ amn/arrays/kick.a Sun Jan 8 16:05:54 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## kick formats -adam 9.7.05 diff -aruN amn.orig/arrays/mode.a amn/arrays/mode.a --- amn.orig/arrays/mode.a Tue Nov 29 16:46:07 2005 +++ amn/arrays/mode.a Sun Jan 8 16:06:01 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## mode formats diff -aruN amn.orig/arrays/msg.a amn/arrays/msg.a --- amn.orig/arrays/msg.a Tue Nov 29 16:46:50 2005 +++ amn/arrays/msg.a Sun Jan 8 16:06:08 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## msg formats diff -aruN amn.orig/arrays/nick.a amn/arrays/nick.a --- amn.orig/arrays/nick.a Tue Nov 29 16:47:09 2005 +++ amn/arrays/nick.a Sun Jan 8 16:06:15 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## nick change formats -violence diff -aruN amn.orig/arrays/nickcomp.a amn/arrays/nickcomp.a --- amn.orig/arrays/nickcomp.a Fri Oct 28 21:50:30 2005 +++ amn/arrays/nickcomp.a Sun Jan 8 16:06:23 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## nickcomp formats diff -aruN amn.orig/arrays/notice.a amn/arrays/notice.a --- amn.orig/arrays/notice.a Tue Nov 29 16:47:56 2005 +++ amn/arrays/notice.a Sun Jan 8 16:06:30 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## notice formats diff -aruN amn.orig/arrays/part.a amn/arrays/part.a --- amn.orig/arrays/part.a Tue Nov 29 16:48:13 2005 +++ amn/arrays/part.a Sun Jan 8 16:06:38 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## leaves/part formats diff -aruN amn.orig/arrays/public.a amn/arrays/public.a --- amn.orig/arrays/public.a Tue Nov 29 18:10:24 2005 +++ amn/arrays/public.a Sun Jan 8 16:06:45 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## public formats diff -aruN amn.orig/arrays/signoff.a amn/arrays/signoff.a --- amn.orig/arrays/signoff.a Tue Nov 29 16:57:56 2005 +++ amn/arrays/signoff.a Sun Jan 8 16:06:53 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## signoff formats diff -aruN amn.orig/arrays/time.a amn/arrays/time.a --- amn.orig/arrays/time.a Tue Nov 29 16:58:23 2005 +++ amn/arrays/time.a Sun Jan 8 16:07:03 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## timestamp formats -crapple diff -aruN amn.orig/arrays/topic.a amn/arrays/topic.a --- amn.orig/arrays/topic.a Tue Nov 29 16:59:23 2005 +++ amn/arrays/topic.a Sun Jan 8 16:07:09 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## topic formats diff -aruN amn.orig/arrays/version.a amn/arrays/version.a --- amn.orig/arrays/version.a Fri Oct 28 21:51:21 2005 +++ amn/arrays/version.a Sun Jan 8 16:07:17 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## sversion formats diff -aruN amn.orig/arrays/wall.a amn/arrays/wall.a --- amn.orig/arrays/wall.a Fri Oct 28 21:51:27 2005 +++ amn/arrays/wall.a Sun Jan 8 16:07:24 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## wall formats diff -aruN amn.orig/arrays/who.a amn/arrays/who.a --- amn.orig/arrays/who.a Fri Oct 28 21:51:32 2005 +++ amn/arrays/who.a Sun Jan 8 16:07:33 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## who formats diff -aruN amn.orig/core/action.m amn/core/action.m --- amn.orig/core/action.m Sun Dec 4 07:43:42 2005 +++ amn/core/action.m Sun Jan 8 15:59:26 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage action diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Sat Dec 24 02:26:52 2005 +++ amn/core/alias.m Sun Jan 8 15:59:33 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage alias diff -aruN amn.orig/core/banner.m amn/core/banner.m --- amn.orig/core/banner.m Sun Oct 2 22:59:08 2005 +++ amn/core/banner.m Sun Jan 8 15:59:40 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. /* 2005 crapple */ diff -aruN amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Mon Nov 28 03:32:41 2005 +++ amn/core/bans.m Sun Jan 8 15:59:47 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage bans diff -aruN amn.orig/core/bind.m amn/core/bind.m --- amn.orig/core/bind.m Tue Nov 29 17:00:01 2005 +++ amn/core/bind.m Sun Jan 8 15:59:56 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage binds diff -aruN amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Mon Nov 28 03:11:09 2005 +++ amn/core/channel.m Sun Jan 8 16:00:05 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage channel diff -aruN amn.orig/core/color.m amn/core/color.m --- amn.orig/core/color.m Sun Oct 2 23:00:43 2005 +++ amn/core/color.m Sun Jan 8 16:00:12 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage color diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Sun Nov 20 21:44:56 2005 +++ amn/core/compat.m Sun Jan 8 16:00:19 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage compat diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Mon Nov 28 01:54:04 2005 +++ amn/core/config.m Sun Jan 8 16:00:26 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage config diff -aruN amn.orig/core/country.m amn/core/country.m --- amn.orig/core/country.m Fri Oct 21 19:10:22 2005 +++ amn/core/country.m Sun Jan 8 16:00:33 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage country diff -aruN amn.orig/core/dcc.m amn/core/dcc.m --- amn.orig/core/dcc.m Wed Nov 16 18:08:35 2005 +++ amn/core/dcc.m Sun Jan 8 16:00:41 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage dcc diff -aruN amn.orig/core/ehelp.m amn/core/ehelp.m --- amn.orig/core/ehelp.m Fri Dec 2 03:22:50 2005 +++ amn/core/ehelp.m Sun Jan 8 16:00:48 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage ehelp diff -aruN amn.orig/core/eimodes.m amn/core/eimodes.m --- amn.orig/core/eimodes.m Mon Oct 10 17:35:25 2005 +++ amn/core/eimodes.m Sun Jan 8 16:00:55 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage eimodes diff -aruN amn.orig/core/exec.m amn/core/exec.m --- amn.orig/core/exec.m Sun Oct 2 23:03:18 2005 +++ amn/core/exec.m Sun Jan 8 16:01:01 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage exec diff -aruN amn.orig/core/fkey.m amn/core/fkey.m --- amn.orig/core/fkey.m Mon Nov 28 05:48:07 2005 +++ amn/core/fkey.m Sun Jan 8 16:01:08 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage fkey diff -aruN amn.orig/core/format.m amn/core/format.m --- amn.orig/core/format.m Tue Nov 29 18:04:18 2005 +++ amn/core/format.m Sun Jan 8 16:01:15 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage format diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Sun Dec 4 04:36:30 2005 +++ amn/core/fsets.m Sun Jan 8 16:01:24 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage fsets diff -aruN amn.orig/core/getusers.m amn/core/getusers.m --- amn.orig/core/getusers.m Sun Oct 2 23:04:18 2005 +++ amn/core/getusers.m Sun Jan 8 16:01:31 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage getusers diff -aruN amn.orig/core/help.m amn/core/help.m --- amn.orig/core/help.m Mon Nov 28 03:38:38 2005 +++ amn/core/help.m Sun Jan 8 16:01:37 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage help diff -aruN amn.orig/core/hooks.m amn/core/hooks.m --- amn.orig/core/hooks.m Mon Nov 28 00:48:40 2005 +++ amn/core/hooks.m Sun Jan 8 16:01:45 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage hooks diff -aruN amn.orig/core/ignore.m amn/core/ignore.m --- amn.orig/core/ignore.m Wed Nov 9 17:56:56 2005 +++ amn/core/ignore.m Sun Jan 8 16:01:53 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage ignore diff -aruN amn.orig/core/lag.m amn/core/lag.m --- amn.orig/core/lag.m Mon Oct 10 16:37:52 2005 +++ amn/core/lag.m Sun Jan 8 16:02:00 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage lag diff -aruN amn.orig/core/lusers.m amn/core/lusers.m --- amn.orig/core/lusers.m Tue Nov 8 18:49:50 2005 +++ amn/core/lusers.m Sun Jan 8 16:02:07 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # ## last modified by skullY on 2005 Nov 08 diff -aruN amn.orig/core/mod.m amn/core/mod.m --- amn.orig/core/mod.m Tue Nov 15 18:35:50 2005 +++ amn/core/mod.m Sun Jan 8 16:02:14 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage mod diff -aruN amn.orig/core/modeshow.m amn/core/modeshow.m --- amn.orig/core/modeshow.m Tue Nov 29 17:14:18 2005 +++ amn/core/modeshow.m Sun Jan 8 16:02:22 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage modeshow diff -aruN amn.orig/core/more.m amn/core/more.m --- amn.orig/core/more.m Mon Oct 10 16:38:45 2005 +++ amn/core/more.m Sun Jan 8 16:02:29 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # this taken from EPIC4 dist written by archon subpackage more diff -aruN amn.orig/core/notify.m amn/core/notify.m --- amn.orig/core/notify.m Sun Oct 2 23:09:30 2005 +++ amn/core/notify.m Sun Jan 8 16:02:36 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage notify diff -aruN amn.orig/core/paste.m amn/core/paste.m --- amn.orig/core/paste.m Mon Oct 10 20:51:38 2005 +++ amn/core/paste.m Sun Jan 8 16:02:45 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # hops little paste script so you can paste shit without worrying about # commands....ctrl-p to toggle.. /set paste for some other shit. diff -aruN amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Tue Oct 11 14:55:15 2005 +++ amn/core/save.m Sun Jan 8 16:02:53 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage save diff -aruN amn.orig/core/sbar.m amn/core/sbar.m --- amn.orig/core/sbar.m Tue Nov 29 17:00:46 2005 +++ amn/core/sbar.m Sun Jan 8 16:03:02 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage sbar diff -aruN amn.orig/core/sbcolor.m amn/core/sbcolor.m --- amn.orig/core/sbcolor.m Sun Oct 2 23:11:05 2005 +++ amn/core/sbcolor.m Sun Jan 8 16:03:10 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage sbcolor diff -aruN amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Tue Nov 29 17:41:27 2005 +++ amn/core/scan.m Sun Jan 8 16:03:19 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage scan diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Sun Dec 11 05:46:53 2005 +++ amn/core/sets.m Sun Jan 8 16:03:28 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage sets diff -aruN amn.orig/core/theme.m amn/core/theme.m --- amn.orig/core/theme.m Tue Oct 11 14:55:44 2005 +++ amn/core/theme.m Sun Jan 8 16:03:40 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## codelogic's theme module, thanx to robohak for help w/ padding ## modified crapple/kreca 05 diff -aruN amn.orig/core/trickle.m amn/core/trickle.m --- amn.orig/core/trickle.m Sat Oct 22 08:42:22 2005 +++ amn/core/trickle.m Sun Jan 8 16:03:51 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage trickle diff -aruN amn.orig/core/update.m amn/core/update.m --- amn.orig/core/update.m Sun Oct 2 23:12:44 2005 +++ amn/core/update.m Sun Jan 8 16:03:59 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage update diff -aruN amn.orig/core/users.m amn/core/users.m --- amn.orig/core/users.m Mon Oct 10 20:51:38 2005 +++ amn/core/users.m Sun Jan 8 16:04:06 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## last modified by crapple on 9.1.05 subpackage users diff -aruN amn.orig/core/version.m amn/core/version.m --- amn.orig/core/version.m Sun Oct 2 23:16:33 2005 +++ amn/core/version.m Sun Jan 8 16:04:14 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage version diff -aruN amn.orig/core/wall.m amn/core/wall.m --- amn.orig/core/wall.m Fri Oct 21 13:09:23 2005 +++ amn/core/wall.m Sun Jan 8 16:04:21 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage wall diff -aruN amn.orig/core/whois.m amn/core/whois.m --- amn.orig/core/whois.m Tue Nov 29 17:01:03 2005 +++ amn/core/whois.m Sun Jan 8 16:04:29 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage whois diff -aruN amn.orig/core/window.m amn/core/window.m --- amn.orig/core/window.m Wed Dec 7 18:59:56 2005 +++ amn/core/window.m Sun Jan 8 16:04:35 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # last modified by crapple 9.2.05 # windowing stuff diff -aruN amn.orig/modules/abot/abot.m amn/modules/abot/abot.m --- amn.orig/modules/abot/abot.m Mon Nov 28 00:36:12 2005 +++ amn/modules/abot/abot.m Sun Jan 8 15:54:32 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage autobot diff -aruN amn.orig/modules/adcc/adcc.m amn/modules/adcc/adcc.m --- amn.orig/modules/adcc/adcc.m Mon Oct 10 16:42:54 2005 +++ amn/modules/adcc/adcc.m Sun Jan 8 15:54:46 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage adcc diff -aruN amn.orig/modules/aol/aol.m amn/modules/aol/aol.m --- amn.orig/modules/aol/aol.m Sun Oct 2 23:20:12 2005 +++ amn/modules/aol/aol.m Sun Jan 8 15:54:59 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # taken from enigma. nutbar. # moved lsay here on 10.2.05 - crapple diff -aruN amn.orig/modules/away/away.m amn/modules/away/away.m --- amn.orig/modules/away/away.m Mon Nov 28 02:01:06 2005 +++ amn/modules/away/away.m Sun Jan 8 15:55:12 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage away diff -aruN amn.orig/modules/bwk/bwk.m amn/modules/bwk/bwk.m --- amn.orig/modules/bwk/bwk.m Fri Oct 28 22:05:50 2005 +++ amn/modules/bwk/bwk.m Sun Jan 8 15:55:27 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage bwk diff -aruN amn.orig/modules/clones/clones.m amn/modules/clones/clones.m --- amn.orig/modules/clones/clones.m Mon Oct 10 20:51:38 2005 +++ amn/modules/clones/clones.m Sun Jan 8 15:55:37 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # taken from cypress //zak subpackage clones diff -aruN amn.orig/modules/dict/dict.m amn/modules/dict/dict.m --- amn.orig/modules/dict/dict.m Tue Oct 11 07:31:15 2005 +++ amn/modules/dict/dict.m Sun Jan 8 15:55:48 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # most of this taken from crackrock and made a lot better. server var # taken from pv. diff -aruN amn.orig/modules/flood/flood.m amn/modules/flood/flood.m --- amn.orig/modules/flood/flood.m Mon Nov 28 02:08:58 2005 +++ amn/modules/flood/flood.m Sun Jan 8 15:55:59 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage flood diff -aruN amn.orig/modules/http/http.m amn/modules/http/http.m --- amn.orig/modules/http/http.m Tue Dec 20 06:07:12 2005 +++ amn/modules/http/http.m Sun Jan 8 15:56:11 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # HTTP client library. Provides some useful commands for communicating with # servers that speak HTTP. Written by skullY. diff -aruN amn.orig/modules/mjoin/mjoin.m amn/modules/mjoin/mjoin.m --- amn.orig/modules/mjoin/mjoin.m Sun Dec 4 08:41:01 2005 +++ amn/modules/mjoin/mjoin.m Sun Jan 8 15:56:24 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage mjoin diff -aruN amn.orig/modules/ncomp/ncomp.m amn/modules/ncomp/ncomp.m --- amn.orig/modules/ncomp/ncomp.m Mon Oct 10 20:51:38 2005 +++ amn/modules/ncomp/ncomp.m Sun Jan 8 15:56:36 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage ncomp diff -aruN amn.orig/modules/netsplit/netsplit.m amn/modules/netsplit/netsplit.m --- amn.orig/modules/netsplit/netsplit.m Mon Nov 28 00:36:18 2005 +++ amn/modules/netsplit/netsplit.m Sun Jan 8 15:56:47 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # Taken from the base epic5/scripts. # diff -aruN amn.orig/modules/nlog/nlog.m amn/modules/nlog/nlog.m --- amn.orig/modules/nlog/nlog.m Wed Nov 16 18:19:14 2005 +++ amn/modules/nlog/nlog.m Sun Jan 8 15:56:58 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage nlog diff -aruN amn.orig/modules/oper/oper.m amn/modules/oper/oper.m --- amn.orig/modules/oper/oper.m Wed Nov 16 18:36:34 2005 +++ amn/modules/oper/oper.m Sun Jan 8 15:57:09 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage oper diff -aruN amn.orig/modules/orignick/orignick.m amn/modules/orignick/orignick.m --- amn.orig/modules/orignick/orignick.m Mon Nov 28 02:03:30 2005 +++ amn/modules/orignick/orignick.m Sun Jan 8 15:57:19 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage orignick diff -aruN amn.orig/modules/query/query.m amn/modules/query/query.m --- amn.orig/modules/query/query.m Mon Oct 10 20:51:38 2005 +++ amn/modules/query/query.m Sun Jan 8 15:57:30 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage query diff -aruN amn.orig/modules/relay/relay.m amn/modules/relay/relay.m --- amn.orig/modules/relay/relay.m Sat Oct 22 02:55:36 2005 +++ amn/modules/relay/relay.m Sun Jan 8 15:57:41 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # last modified by crapple 10.2.05 - added /rel(smn) -l hacks for xavier. subpackage relay diff -aruN amn.orig/modules/services/services.m amn/modules/services/services.m --- amn.orig/modules/services/services.m Sun Oct 2 23:28:01 2005 +++ amn/modules/services/services.m Sun Jan 8 15:57:53 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # nickserv/chanserv/operserv etc.. module. subpackage services diff -aruN amn.orig/modules/shitlist/shitlist.m amn/modules/shitlist/shitlist.m --- amn.orig/modules/shitlist/shitlist.m Fri Oct 28 22:05:14 2005 +++ amn/modules/shitlist/shitlist.m Sun Jan 8 15:58:03 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage shitlist diff -aruN amn.orig/modules/sprot/sprot.m amn/modules/sprot/sprot.m --- amn.orig/modules/sprot/sprot.m Mon Nov 28 02:10:02 2005 +++ amn/modules/sprot/sprot.m Sun Jan 8 15:58:13 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage sprot diff -aruN amn.orig/modules/tab/tab.m amn/modules/tab/tab.m --- amn.orig/modules/tab/tab.m Tue Nov 1 06:50:34 2005 +++ amn/modules/tab/tab.m Sun Jan 8 15:58:23 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage tab diff -aruN amn.orig/modules/userlist/userlist.m amn/modules/userlist/userlist.m --- amn.orig/modules/userlist/userlist.m Mon Nov 28 02:08:08 2005 +++ amn/modules/userlist/userlist.m Sun Jan 8 15:58:45 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # based on void/codelogic's autobot 98 # modded by crapple 05 diff -aruN amn.orig/modules/vanilla/vanilla.m amn/modules/vanilla/vanilla.m --- amn.orig/modules/vanilla/vanilla.m Wed Dec 7 18:58:39 2005 +++ amn/modules/vanilla/vanilla.m Sun Jan 8 15:58:57 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # Make amnesiac behave a bit more like default epic with tc and netsplit # loaded, just the way skullY likes it. diff -aruN amn.orig/modules/xy/xy.m amn/modules/xy/xy.m --- amn.orig/modules/xy/xy.m Sun Oct 2 23:31:02 2005 +++ amn/modules/xy/xy.m Sun Jan 8 15:59:12 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage xy From zak@nocturnal.geekunderground.org Sun Jan 8 16:15:33 2006 Return-Path: X-Spam-Checker-Version: SpamAssassin 3.1.0 (2005-09-13) on nocturnal.geekunderground.org X-Spam-Level: X-Spam-Status: No, score=-1.4 required=5.0 tests=ALL_TRUSTED autolearn=no version=3.1.0 Received: from nocturnal.geekunderground.org (zak@localhost.geekunderground.org [127.0.0.1]) by nocturnal.geekunderground.org (8.13.4/8.13.4) with ESMTP id k08LExIX001604 (version=TLSv1/SSLv3 cipher=DHE-DSS-AES256-SHA bits=256 verify=NO) for ; Sun, 8 Jan 2006 16:14:59 -0500 (EST) Received: (from zak@localhost) by nocturnal.geekunderground.org (8.13.4/8.13.3/Submit) id k08LExB5032054 for amnesiac@ircii.org; Sun, 8 Jan 2006 16:14:59 -0500 (EST) Message-Id: <200601082114.k08LExB5032054@nocturnal.geekunderground.org> Subject: amnesiac-changes To: amnesiac@ircii.org Date: Sun, 8 Jan 2006 16:14:58 -0500 (EST) From: zak@ircii.org (Zak) X-Mailer: ELM [version 2.4ME+ PL66 (25)] MIME-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Status: RO Content-Length: 35683 Lines: 876 Modified files: CHANGES TODO-BUGS docs/E5-KNOWNBUGS Log message: sync docs to reality. ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sat Dec 24 02:26:59 2005 +++ amn/CHANGES Sun Jan 8 16:11:26 2006 @@ -29,3 +29,7 @@ 12.24.05 -Some genius made /p be part when /p has been ping since the beginning of time. Fixed. //skullY + +1.8.06 +-update copyright to 2006 //zak +-sync documents to reality. diff -aruN amn.orig/COPYRIGHT amn/COPYRIGHT --- amn.orig/COPYRIGHT Mon Oct 3 00:06:40 2005 +++ amn/COPYRIGHT Sun Jan 8 15:52:31 2006 @@ -1,6 +1,6 @@ /* - * Copyright (c) 2003-2005 Amnesiac Project - * Copyright (c) 2003-2005 EPIC Software Labs + * Copyright (c) 2003-2006 Amnesiac Project + * Copyright (c) 2003-2006 EPIC Software Labs * All rights reserved. * * Redistribution and use in source and binary forms, with or without diff -aruN amn.orig/INSTALL amn/INSTALL --- amn.orig/INSTALL Fri Oct 21 03:58:03 2005 +++ amn/INSTALL Sun Jan 8 15:52:45 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. before installing amnesiac remember this script is for epic it's not a diff -aruN amn.orig/README amn/README --- amn.orig/README Mon Oct 10 22:21:33 2005 +++ amn/README Sun Jan 8 15:52:54 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. * THE AMNESIAC HOME PAGE IS: http://amnesiac.ircii.org diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Fri Dec 2 03:15:13 2005 +++ amn/TODO-BUGS Sun Jan 8 16:12:46 2006 @@ -15,11 +15,10 @@ whatever it was set to works properly but it's kinda annoying when everything outputs at bk when it's not actually set to bk. (will fix someday) +$ /ignsave seems kinda borked at times or something, probably another + krecaism. ## higher priority todo. (stuff that needs to done before upcoming release) --make /delchan #chan delete channel apparently some ppl are slow to - understand the meaning of /delchan # so i guess we should add in this - capability for users with that defect i.e Xavier. ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Thu Nov 17 12:38:01 2005 +++ amn/amn.epic Sun Jan 8 15:53:07 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. /* amnesiac by crapple mods/bugfixes by kreca diff -aruN amn.orig/arrays/action.a amn/arrays/action.a --- amn.orig/arrays/action.a Tue Nov 29 16:43:07 2005 +++ amn/arrays/action.a Sun Jan 8 16:05:13 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## action formats diff -aruN amn.orig/arrays/away.a amn/arrays/away.a --- amn.orig/arrays/away.a Fri Oct 28 21:49:28 2005 +++ amn/arrays/away.a Sun Jan 8 16:05:20 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## away formats diff -aruN amn.orig/arrays/ctcp.a amn/arrays/ctcp.a --- amn.orig/arrays/ctcp.a Tue Nov 29 16:43:43 2005 +++ amn/arrays/ctcp.a Sun Jan 8 16:05:26 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## ctcp formats diff -aruN amn.orig/arrays/dcc.a amn/arrays/dcc.a --- amn.orig/arrays/dcc.a Tue Nov 29 16:44:32 2005 +++ amn/arrays/dcc.a Sun Jan 8 16:05:33 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## send dcc formats diff -aruN amn.orig/arrays/echostr.a amn/arrays/echostr.a --- amn.orig/arrays/echostr.a Fri Oct 28 21:49:48 2005 +++ amn/arrays/echostr.a Sun Jan 8 16:05:40 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## echostr formats diff -aruN amn.orig/arrays/join.a amn/arrays/join.a --- amn.orig/arrays/join.a Fri Oct 28 21:49:53 2005 +++ amn/arrays/join.a Sun Jan 8 16:05:47 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## join formats diff -aruN amn.orig/arrays/kick.a amn/arrays/kick.a --- amn.orig/arrays/kick.a Tue Nov 29 16:45:41 2005 +++ amn/arrays/kick.a Sun Jan 8 16:05:54 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## kick formats -adam 9.7.05 diff -aruN amn.orig/arrays/mode.a amn/arrays/mode.a --- amn.orig/arrays/mode.a Tue Nov 29 16:46:07 2005 +++ amn/arrays/mode.a Sun Jan 8 16:06:01 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## mode formats diff -aruN amn.orig/arrays/msg.a amn/arrays/msg.a --- amn.orig/arrays/msg.a Tue Nov 29 16:46:50 2005 +++ amn/arrays/msg.a Sun Jan 8 16:06:08 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## msg formats diff -aruN amn.orig/arrays/nick.a amn/arrays/nick.a --- amn.orig/arrays/nick.a Tue Nov 29 16:47:09 2005 +++ amn/arrays/nick.a Sun Jan 8 16:06:15 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## nick change formats -violence diff -aruN amn.orig/arrays/nickcomp.a amn/arrays/nickcomp.a --- amn.orig/arrays/nickcomp.a Fri Oct 28 21:50:30 2005 +++ amn/arrays/nickcomp.a Sun Jan 8 16:06:23 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## nickcomp formats diff -aruN amn.orig/arrays/notice.a amn/arrays/notice.a --- amn.orig/arrays/notice.a Tue Nov 29 16:47:56 2005 +++ amn/arrays/notice.a Sun Jan 8 16:06:30 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## notice formats diff -aruN amn.orig/arrays/part.a amn/arrays/part.a --- amn.orig/arrays/part.a Tue Nov 29 16:48:13 2005 +++ amn/arrays/part.a Sun Jan 8 16:06:38 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## leaves/part formats diff -aruN amn.orig/arrays/public.a amn/arrays/public.a --- amn.orig/arrays/public.a Tue Nov 29 18:10:24 2005 +++ amn/arrays/public.a Sun Jan 8 16:06:45 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## public formats diff -aruN amn.orig/arrays/signoff.a amn/arrays/signoff.a --- amn.orig/arrays/signoff.a Tue Nov 29 16:57:56 2005 +++ amn/arrays/signoff.a Sun Jan 8 16:06:53 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## signoff formats diff -aruN amn.orig/arrays/time.a amn/arrays/time.a --- amn.orig/arrays/time.a Tue Nov 29 16:58:23 2005 +++ amn/arrays/time.a Sun Jan 8 16:07:03 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## timestamp formats -crapple diff -aruN amn.orig/arrays/topic.a amn/arrays/topic.a --- amn.orig/arrays/topic.a Tue Nov 29 16:59:23 2005 +++ amn/arrays/topic.a Sun Jan 8 16:07:09 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## topic formats diff -aruN amn.orig/arrays/version.a amn/arrays/version.a --- amn.orig/arrays/version.a Fri Oct 28 21:51:21 2005 +++ amn/arrays/version.a Sun Jan 8 16:07:17 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## sversion formats diff -aruN amn.orig/arrays/wall.a amn/arrays/wall.a --- amn.orig/arrays/wall.a Fri Oct 28 21:51:27 2005 +++ amn/arrays/wall.a Sun Jan 8 16:07:24 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## wall formats diff -aruN amn.orig/arrays/who.a amn/arrays/who.a --- amn.orig/arrays/who.a Fri Oct 28 21:51:32 2005 +++ amn/arrays/who.a Sun Jan 8 16:07:33 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## who formats diff -aruN amn.orig/core/action.m amn/core/action.m --- amn.orig/core/action.m Sun Dec 4 07:43:42 2005 +++ amn/core/action.m Sun Jan 8 15:59:26 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage action diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Sat Dec 24 02:26:52 2005 +++ amn/core/alias.m Sun Jan 8 15:59:33 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage alias diff -aruN amn.orig/core/banner.m amn/core/banner.m --- amn.orig/core/banner.m Sun Oct 2 22:59:08 2005 +++ amn/core/banner.m Sun Jan 8 15:59:40 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. /* 2005 crapple */ diff -aruN amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Mon Nov 28 03:32:41 2005 +++ amn/core/bans.m Sun Jan 8 15:59:47 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage bans diff -aruN amn.orig/core/bind.m amn/core/bind.m --- amn.orig/core/bind.m Tue Nov 29 17:00:01 2005 +++ amn/core/bind.m Sun Jan 8 15:59:56 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage binds diff -aruN amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Mon Nov 28 03:11:09 2005 +++ amn/core/channel.m Sun Jan 8 16:00:05 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage channel diff -aruN amn.orig/core/color.m amn/core/color.m --- amn.orig/core/color.m Sun Oct 2 23:00:43 2005 +++ amn/core/color.m Sun Jan 8 16:00:12 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage color diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Sun Nov 20 21:44:56 2005 +++ amn/core/compat.m Sun Jan 8 16:00:19 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage compat diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Mon Nov 28 01:54:04 2005 +++ amn/core/config.m Sun Jan 8 16:00:26 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage config diff -aruN amn.orig/core/country.m amn/core/country.m --- amn.orig/core/country.m Fri Oct 21 19:10:22 2005 +++ amn/core/country.m Sun Jan 8 16:00:33 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage country diff -aruN amn.orig/core/dcc.m amn/core/dcc.m --- amn.orig/core/dcc.m Wed Nov 16 18:08:35 2005 +++ amn/core/dcc.m Sun Jan 8 16:00:41 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage dcc diff -aruN amn.orig/core/ehelp.m amn/core/ehelp.m --- amn.orig/core/ehelp.m Fri Dec 2 03:22:50 2005 +++ amn/core/ehelp.m Sun Jan 8 16:00:48 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage ehelp diff -aruN amn.orig/core/eimodes.m amn/core/eimodes.m --- amn.orig/core/eimodes.m Mon Oct 10 17:35:25 2005 +++ amn/core/eimodes.m Sun Jan 8 16:00:55 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage eimodes diff -aruN amn.orig/core/exec.m amn/core/exec.m --- amn.orig/core/exec.m Sun Oct 2 23:03:18 2005 +++ amn/core/exec.m Sun Jan 8 16:01:01 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage exec diff -aruN amn.orig/core/fkey.m amn/core/fkey.m --- amn.orig/core/fkey.m Mon Nov 28 05:48:07 2005 +++ amn/core/fkey.m Sun Jan 8 16:01:08 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage fkey diff -aruN amn.orig/core/format.m amn/core/format.m --- amn.orig/core/format.m Tue Nov 29 18:04:18 2005 +++ amn/core/format.m Sun Jan 8 16:01:15 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage format diff -aruN amn.orig/core/fsets.m amn/core/fsets.m --- amn.orig/core/fsets.m Sun Dec 4 04:36:30 2005 +++ amn/core/fsets.m Sun Jan 8 16:01:24 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage fsets diff -aruN amn.orig/core/getusers.m amn/core/getusers.m --- amn.orig/core/getusers.m Sun Oct 2 23:04:18 2005 +++ amn/core/getusers.m Sun Jan 8 16:01:31 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage getusers diff -aruN amn.orig/core/help.m amn/core/help.m --- amn.orig/core/help.m Mon Nov 28 03:38:38 2005 +++ amn/core/help.m Sun Jan 8 16:01:37 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage help diff -aruN amn.orig/core/hooks.m amn/core/hooks.m --- amn.orig/core/hooks.m Mon Nov 28 00:48:40 2005 +++ amn/core/hooks.m Sun Jan 8 16:01:45 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage hooks diff -aruN amn.orig/core/ignore.m amn/core/ignore.m --- amn.orig/core/ignore.m Wed Nov 9 17:56:56 2005 +++ amn/core/ignore.m Sun Jan 8 16:01:53 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage ignore diff -aruN amn.orig/core/lag.m amn/core/lag.m --- amn.orig/core/lag.m Mon Oct 10 16:37:52 2005 +++ amn/core/lag.m Sun Jan 8 16:02:00 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage lag diff -aruN amn.orig/core/lusers.m amn/core/lusers.m --- amn.orig/core/lusers.m Tue Nov 8 18:49:50 2005 +++ amn/core/lusers.m Sun Jan 8 16:02:07 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # ## last modified by skullY on 2005 Nov 08 diff -aruN amn.orig/core/mod.m amn/core/mod.m --- amn.orig/core/mod.m Tue Nov 15 18:35:50 2005 +++ amn/core/mod.m Sun Jan 8 16:02:14 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage mod diff -aruN amn.orig/core/modeshow.m amn/core/modeshow.m --- amn.orig/core/modeshow.m Tue Nov 29 17:14:18 2005 +++ amn/core/modeshow.m Sun Jan 8 16:02:22 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage modeshow diff -aruN amn.orig/core/more.m amn/core/more.m --- amn.orig/core/more.m Mon Oct 10 16:38:45 2005 +++ amn/core/more.m Sun Jan 8 16:02:29 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # this taken from EPIC4 dist written by archon subpackage more diff -aruN amn.orig/core/notify.m amn/core/notify.m --- amn.orig/core/notify.m Sun Oct 2 23:09:30 2005 +++ amn/core/notify.m Sun Jan 8 16:02:36 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage notify diff -aruN amn.orig/core/paste.m amn/core/paste.m --- amn.orig/core/paste.m Mon Oct 10 20:51:38 2005 +++ amn/core/paste.m Sun Jan 8 16:02:45 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # hops little paste script so you can paste shit without worrying about # commands....ctrl-p to toggle.. /set paste for some other shit. diff -aruN amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Tue Oct 11 14:55:15 2005 +++ amn/core/save.m Sun Jan 8 16:02:53 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage save diff -aruN amn.orig/core/sbar.m amn/core/sbar.m --- amn.orig/core/sbar.m Tue Nov 29 17:00:46 2005 +++ amn/core/sbar.m Sun Jan 8 16:03:02 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage sbar diff -aruN amn.orig/core/sbcolor.m amn/core/sbcolor.m --- amn.orig/core/sbcolor.m Sun Oct 2 23:11:05 2005 +++ amn/core/sbcolor.m Sun Jan 8 16:03:10 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage sbcolor diff -aruN amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Tue Nov 29 17:41:27 2005 +++ amn/core/scan.m Sun Jan 8 16:03:19 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage scan diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Sun Dec 11 05:46:53 2005 +++ amn/core/sets.m Sun Jan 8 16:03:28 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage sets diff -aruN amn.orig/core/theme.m amn/core/theme.m --- amn.orig/core/theme.m Tue Oct 11 14:55:44 2005 +++ amn/core/theme.m Sun Jan 8 16:03:40 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## codelogic's theme module, thanx to robohak for help w/ padding ## modified crapple/kreca 05 diff -aruN amn.orig/core/trickle.m amn/core/trickle.m --- amn.orig/core/trickle.m Sat Oct 22 08:42:22 2005 +++ amn/core/trickle.m Sun Jan 8 16:03:51 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage trickle diff -aruN amn.orig/core/update.m amn/core/update.m --- amn.orig/core/update.m Sun Oct 2 23:12:44 2005 +++ amn/core/update.m Sun Jan 8 16:03:59 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage update diff -aruN amn.orig/core/users.m amn/core/users.m --- amn.orig/core/users.m Mon Oct 10 20:51:38 2005 +++ amn/core/users.m Sun Jan 8 16:04:06 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. ## last modified by crapple on 9.1.05 subpackage users diff -aruN amn.orig/core/version.m amn/core/version.m --- amn.orig/core/version.m Sun Oct 2 23:16:33 2005 +++ amn/core/version.m Sun Jan 8 16:04:14 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage version diff -aruN amn.orig/core/wall.m amn/core/wall.m --- amn.orig/core/wall.m Fri Oct 21 13:09:23 2005 +++ amn/core/wall.m Sun Jan 8 16:04:21 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage wall diff -aruN amn.orig/core/whois.m amn/core/whois.m --- amn.orig/core/whois.m Tue Nov 29 17:01:03 2005 +++ amn/core/whois.m Sun Jan 8 16:04:29 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage whois diff -aruN amn.orig/core/window.m amn/core/window.m --- amn.orig/core/window.m Wed Dec 7 18:59:56 2005 +++ amn/core/window.m Sun Jan 8 16:04:35 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # last modified by crapple 9.2.05 # windowing stuff diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Tue Nov 29 19:00:41 2005 +++ amn/docs/E5-KNOWNBUGS Sun Jan 8 16:10:56 2006 @@ -2,7 +2,7 @@ KNOWN ERRATA (eg, bugs, or unresolved requests): ------------------------------------------------ -* str_to_mask() should be silent, callers should be warning. +[none] LOOK FOR IN THE FUTURE ----------------------- @@ -12,6 +12,10 @@ * /window noserv causes bad fd loop. (can't reproduce?) * Is there some way to set what ^O resets to, a la mirc? * /CTCPs over /DCCs don't match up with their queries very well. +* $xform()s for SED and DEF +* str_to_mask() should be silent, callers should be warning. +* Add /window indent, to overrule /set indent. +* A way to control what counts as a space on the fly (via a /set?) [See http://www.epicsol.org/PROJECTS for things to come in the future] [See http://www.epicsol.org/CHANGELOG5 for things that changed in the past] @@ -878,3 +882,13 @@ * Normalize the sdbm code, so it fits in with the epic way of doing things. * Fix several bogons in add_to_log, found by ce. * Add /on keybinding. Why do I know I'm going to regret this one? +* Add partial implementation of $xform() (see UPDATES) +* Add shell of implementation of new_send_text() which i hope to finish... +* Fix bug in $b64decode() +* Add /window indent, allowing you to overrule /set indent per-window basis. +* Make window breaking use /window indent +* But /set indent still overrules any /window indent's you've set. :/ +* Fix $windowctl(GET TOPLINE ) -- is numbered from 1, not 0. +* Implement xforms for CTCP. +* Fix $urlencode() so it encodes the + char. +* Fix various compiler issues. diff -aruN amn.orig/modules/abot/abot.m amn/modules/abot/abot.m --- amn.orig/modules/abot/abot.m Mon Nov 28 00:36:12 2005 +++ amn/modules/abot/abot.m Sun Jan 8 15:54:32 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage autobot diff -aruN amn.orig/modules/adcc/adcc.m amn/modules/adcc/adcc.m --- amn.orig/modules/adcc/adcc.m Mon Oct 10 16:42:54 2005 +++ amn/modules/adcc/adcc.m Sun Jan 8 15:54:46 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage adcc diff -aruN amn.orig/modules/aol/aol.m amn/modules/aol/aol.m --- amn.orig/modules/aol/aol.m Sun Oct 2 23:20:12 2005 +++ amn/modules/aol/aol.m Sun Jan 8 15:54:59 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # taken from enigma. nutbar. # moved lsay here on 10.2.05 - crapple diff -aruN amn.orig/modules/away/away.m amn/modules/away/away.m --- amn.orig/modules/away/away.m Mon Nov 28 02:01:06 2005 +++ amn/modules/away/away.m Sun Jan 8 15:55:12 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage away diff -aruN amn.orig/modules/bwk/bwk.m amn/modules/bwk/bwk.m --- amn.orig/modules/bwk/bwk.m Fri Oct 28 22:05:50 2005 +++ amn/modules/bwk/bwk.m Sun Jan 8 15:55:27 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage bwk diff -aruN amn.orig/modules/clones/clones.m amn/modules/clones/clones.m --- amn.orig/modules/clones/clones.m Mon Oct 10 20:51:38 2005 +++ amn/modules/clones/clones.m Sun Jan 8 15:55:37 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # taken from cypress //zak subpackage clones diff -aruN amn.orig/modules/dict/dict.m amn/modules/dict/dict.m --- amn.orig/modules/dict/dict.m Tue Oct 11 07:31:15 2005 +++ amn/modules/dict/dict.m Sun Jan 8 15:55:48 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # most of this taken from crackrock and made a lot better. server var # taken from pv. diff -aruN amn.orig/modules/flood/flood.m amn/modules/flood/flood.m --- amn.orig/modules/flood/flood.m Mon Nov 28 02:08:58 2005 +++ amn/modules/flood/flood.m Sun Jan 8 15:55:59 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage flood diff -aruN amn.orig/modules/http/http.m amn/modules/http/http.m --- amn.orig/modules/http/http.m Tue Dec 20 06:07:12 2005 +++ amn/modules/http/http.m Sun Jan 8 15:56:11 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # HTTP client library. Provides some useful commands for communicating with # servers that speak HTTP. Written by skullY. diff -aruN amn.orig/modules/mjoin/mjoin.m amn/modules/mjoin/mjoin.m --- amn.orig/modules/mjoin/mjoin.m Sun Dec 4 08:41:01 2005 +++ amn/modules/mjoin/mjoin.m Sun Jan 8 15:56:24 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage mjoin diff -aruN amn.orig/modules/ncomp/ncomp.m amn/modules/ncomp/ncomp.m --- amn.orig/modules/ncomp/ncomp.m Mon Oct 10 20:51:38 2005 +++ amn/modules/ncomp/ncomp.m Sun Jan 8 15:56:36 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage ncomp diff -aruN amn.orig/modules/netsplit/netsplit.m amn/modules/netsplit/netsplit.m --- amn.orig/modules/netsplit/netsplit.m Mon Nov 28 00:36:18 2005 +++ amn/modules/netsplit/netsplit.m Sun Jan 8 15:56:47 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # Taken from the base epic5/scripts. # diff -aruN amn.orig/modules/nlog/nlog.m amn/modules/nlog/nlog.m --- amn.orig/modules/nlog/nlog.m Wed Nov 16 18:19:14 2005 +++ amn/modules/nlog/nlog.m Sun Jan 8 15:56:58 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage nlog diff -aruN amn.orig/modules/oper/oper.m amn/modules/oper/oper.m --- amn.orig/modules/oper/oper.m Wed Nov 16 18:36:34 2005 +++ amn/modules/oper/oper.m Sun Jan 8 15:57:09 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage oper diff -aruN amn.orig/modules/orignick/orignick.m amn/modules/orignick/orignick.m --- amn.orig/modules/orignick/orignick.m Mon Nov 28 02:03:30 2005 +++ amn/modules/orignick/orignick.m Sun Jan 8 15:57:19 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage orignick diff -aruN amn.orig/modules/query/query.m amn/modules/query/query.m --- amn.orig/modules/query/query.m Mon Oct 10 20:51:38 2005 +++ amn/modules/query/query.m Sun Jan 8 15:57:30 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage query diff -aruN amn.orig/modules/relay/relay.m amn/modules/relay/relay.m --- amn.orig/modules/relay/relay.m Sat Oct 22 02:55:36 2005 +++ amn/modules/relay/relay.m Sun Jan 8 15:57:41 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # last modified by crapple 10.2.05 - added /rel(smn) -l hacks for xavier. subpackage relay diff -aruN amn.orig/modules/services/services.m amn/modules/services/services.m --- amn.orig/modules/services/services.m Sun Oct 2 23:28:01 2005 +++ amn/modules/services/services.m Sun Jan 8 15:57:53 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # nickserv/chanserv/operserv etc.. module. subpackage services diff -aruN amn.orig/modules/shitlist/shitlist.m amn/modules/shitlist/shitlist.m --- amn.orig/modules/shitlist/shitlist.m Fri Oct 28 22:05:14 2005 +++ amn/modules/shitlist/shitlist.m Sun Jan 8 15:58:03 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage shitlist diff -aruN amn.orig/modules/sprot/sprot.m amn/modules/sprot/sprot.m --- amn.orig/modules/sprot/sprot.m Mon Nov 28 02:10:02 2005 +++ amn/modules/sprot/sprot.m Sun Jan 8 15:58:13 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage sprot diff -aruN amn.orig/modules/tab/tab.m amn/modules/tab/tab.m --- amn.orig/modules/tab/tab.m Tue Nov 1 06:50:34 2005 +++ amn/modules/tab/tab.m Sun Jan 8 15:58:23 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage tab diff -aruN amn.orig/modules/userlist/userlist.m amn/modules/userlist/userlist.m --- amn.orig/modules/userlist/userlist.m Mon Nov 28 02:08:08 2005 +++ amn/modules/userlist/userlist.m Sun Jan 8 15:58:45 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # based on void/codelogic's autobot 98 # modded by crapple 05 diff -aruN amn.orig/modules/vanilla/vanilla.m amn/modules/vanilla/vanilla.m --- amn.orig/modules/vanilla/vanilla.m Wed Dec 7 18:58:39 2005 +++ amn/modules/vanilla/vanilla.m Sun Jan 8 15:58:57 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. # Make amnesiac behave a bit more like default epic with tc and netsplit # loaded, just the way skullY likes it. diff -aruN amn.orig/modules/xy/xy.m amn/modules/xy/xy.m --- amn.orig/modules/xy/xy.m Sun Oct 2 23:31:02 2005 +++ amn/modules/xy/xy.m Sun Jan 8 15:59:12 2006 @@ -1,4 +1,4 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. +# Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage xy Date: Wed, 11 Jan 2006 04:04:08 -0500 (EST) From: zak@ircii.org (Zak) Modified files: TODO-BUGS Log message: add some more todo's for the new year. ---------------------- diff included ---------------------- diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Sun Jan 8 16:12:46 2006 +++ amn/TODO-BUGS Wed Jan 11 04:02:56 2006 @@ -19,6 +19,11 @@ krecaism. ## higher priority todo. (stuff that needs to done before upcoming release) +@ remove the said epic4 support it no longer works right on epic4 + i beleive amnesiac1.2r3 is the last version to work right on epic4. +@ set proper variables i.e savefiles in amn.epic not sets.m which is more + proper. +@ some documentation updates about epic4/5... ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. Date: Wed, 11 Jan 2006 04:30:02 -0500 (EST) From: zak@ircii.org (Zak) Modified files: CHANGES INSTALL amn.epic docs/UPGRADE core/sets.m Log message: remove epic4 support, sync docs to reality, increment epic5 compatability version, rearrange some static variables from sets.m to amn.epic no real functional changes. ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sun Jan 8 16:11:26 2006 +++ amn/CHANGES Wed Jan 11 04:27:34 2006 @@ -33,3 +33,10 @@ 1.8.06 -update copyright to 2006 //zak -sync documents to reality. + +1.11.06 +-remove epic4 support it has been broken on epic4 for some time, update + epic5 compatability version as well while in the general area. //zak +-increment development version to 3 //zak +-some minor static var changes into amn.epic from core/sets.m //zak +-sync more documents to reality. //zak diff -aruN amn.orig/INSTALL amn/INSTALL --- amn.orig/INSTALL Sun Jan 8 15:52:45 2006 +++ amn/INSTALL Wed Jan 11 04:27:57 2006 @@ -10,24 +10,13 @@ Amnesiac is still extremely ALPHA, some things may break/not work/or even crash the client! (mainly because epic5 is still not exactly stable yet) --recent epic4 support. -in theory it should work flawlessly in between with epic4 and 5, however -for the time being i would recommend epic5, but feedbacks would be -appreciated on epic4. +-epic4 support has been removed as of 1.11.06 last known version to probably +work is amnesiac1.3r3 check the README NOTES TODO-BUGS EPIC-BUGS Files if you are experiencing any weird problems/errors. more documents can also be found in ~/amn/docs check these before reporting a bug!. -last note: -up until epic5.0.0.6 epic5 does NOT load the script until AFTER you have -connected to the irc server. (this is not a bug!) specify epic5 -B to load -the script before connecting to the server on earlier versions. -yes you must specify -B to ensure all the settings are set right to make the -script work properly. bug reports when not using -B on startup on -epic5.0.0.5 release and before will be ignored. unless it can be reproduce -easily with -B usage. - install: How to install this package: @@ -41,7 +30,6 @@ o to start: epic5 -B -n somenick -H somevhost.com o on occasion epic5 -B -H somevhost.com somenick irc.someserver.com - o and or epic(4) -B -H somehost somenick irc.something.com ^^ does not have to be specified in that particular order and or use of all the options shown above. diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Sun Jan 8 15:53:07 2006 +++ amn/amn.epic Wed Jan 11 04:20:33 2006 @@ -16,10 +16,9 @@ @ delarray($array); } -## determine if we need to load comptability functs or not. +## load comptability functs @loadpath=[$before(-1 / $word(1 $loadinfo()))/] @epicver=word(0 $info(v)) -if (epicver != [epic4] ) { ## functions for epic5 ^eval ^load $(loadpath)core/compat.m ## compiling sets... @@ -33,16 +32,26 @@ xaddset num_of_whowas int; xaddset show_end_of_msgs bool; xaddset show_who_hopcount bool; - ## epic5 must sets here. + ## epic5 core sets here. (do not remove) set auto_reconnect off; set history_save_file ~/.epic_history; set history_remove_dupes on; set history_save_position on; set history_timestamp on; -} + ## allow for user customizable settings. ^eval ^load $(loadpath)settings +## static vars for savefiles. +@savepath=[~/.amn/] +@savefile=[.a.save] +@fsavefile=[.a.fsave] +@igsfile=[.a.ig.save] +@csavefile=[.a.csave] +@fsetsavefile=[.a.fsetsave] +@nsavefile=[.a.nsavefile] +@modfile=[$(savepath).mod.save] + ## remove certain sets for cosmetics. other cosmetic adjustments here. set -status_user set -status_format1 @@ -54,9 +63,9 @@ eval set word_break $strip(. $word_break) ###### TOUCH BELOW THIS LINE AND YOU DESERVE WHATEVER YOU GET, SUCKA. ###### -if(epicver == [epic4] && V < 20040819){ - //quit wrong epic version, try the latest version of epic4. -} if (V < 20050315 ){ +if(epicver == [epic4] { + //quit wrong epic version, try the latest version of epic5. +} if (V < 20050520 ){ //quit wrong epic version, try the latest version of epic5. } diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Sun Jan 8 16:03:28 2006 +++ amn/core/sets.m Wed Jan 11 04:19:30 2006 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[2] +@rel_id=[3] @a.rel=[1.3d r/$rel_id] @a.date=[20051202] @_ss=[15] @@ -60,20 +60,12 @@ @fke10=[userlist] @fke11=[shitlist] @fke12=[ehelp] -@savepath=[~/.amn/] @crapl=[on] @msgl=[on] @notl=[on] @plog=[on] @dccl=[on] @togaway=[off] -@savefile=[.a.save] -@fsavefile=[.a.fsave] -@igsfile=[.a.ig.save] -@csavefile=[.a.csave] -@fsetsavefile=[.a.fsetsave] -@nsavefile=[.a.nsavefile] -@modfile=[$(savepath).mod.save] @getumode=[iw] @showop=[off] @autoget=[off] diff -aruN amn.orig/docs/UPGRADE amn/docs/UPGRADE --- amn.orig/docs/UPGRADE Tue Nov 29 19:02:40 2005 +++ amn/docs/UPGRADE Wed Jan 11 04:25:45 2006 @@ -8,7 +8,7 @@ about their irc client uptimes *ahem*) ## upgrade info -## 1.2 to 1.2d r/8 (in theory) +## 1.2 to 1.3* (in theory) rm -rf /path/to/amn rm -rf ~/.amn/ ^^ can leave channel/shitlist/bwk/friends savefiles remove all others. Date: Sat, 14 Jan 2006 01:36:45 -0500 (EST) From: zak@ircii.org (Zak) Modified files: TODO-BUGS amn.epic Log message: fix braindead if == cleanup a bit of TODO's ---------------------- diff included ---------------------- diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Wed Jan 11 04:02:56 2006 +++ amn/TODO-BUGS Sat Jan 14 01:34:38 2006 @@ -21,9 +21,6 @@ ## higher priority todo. (stuff that needs to done before upcoming release) @ remove the said epic4 support it no longer works right on epic4 i beleive amnesiac1.2r3 is the last version to work right on epic4. -@ set proper variables i.e savefiles in amn.epic not sets.m which is more - proper. -@ some documentation updates about epic4/5... ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Wed Jan 11 04:20:33 2006 +++ amn/amn.epic Sat Jan 14 01:33:49 2006 @@ -63,8 +63,8 @@ eval set word_break $strip(. $word_break) ###### TOUCH BELOW THIS LINE AND YOU DESERVE WHATEVER YOU GET, SUCKA. ###### -if(epicver == [epic4] { - //quit wrong epic version, try the latest version of epic5. +if (epicver == [epic4]) { + //quit wrong epic version, try the latest version of epic5. } if (V < 20050520 ){ //quit wrong epic version, try the latest version of epic5. } Date: Sat, 24 Dec 2005 21:07:36 +0100 From: Jonas Trollvik To: Zach White Subject: Re: amnesiac-changes thanks, this has been bothering me too On 12/24/05, Zach White wrote: > What genius decided that /p should be part? /p has been ping since the > beginning of time, or at least the last 10 years which is farther back > than I can remember so it may as well be the beginning of time. > amn diff > diff amn.orig/CHANGES amn/CHANGES > --- amn.orig/CHANGES Sat Dec 24 07:26:21 2005 > +++ amn/CHANGES Sat Dec 24 07:26:59 2005 > @@ -25,3 +25,7 @@ > 12.11.05 > -merge all of the above into 1.3 r/2 -release //zak > -increment development version to 2 as well //zak > + > +12.24.05 > +-Some genius made /p be part when /p has been ping since the beginning of > + time. Fixed. //skullY > diff amn.orig/core/alias.m amn/core/alias.m > --- amn.orig/core/alias.m Sat Dec 24 07:26:21 2005 > +++ amn/core/alias.m Sat Dec 24 07:26:52 2005 > @@ -63,7 +63,7 @@ > alias m msg $* > alias d describe $* > alias j {/join $channame($0) $1-} > -alias p part $* > +alias p ping $* > alias k kick $* > alias l part $* > alias host //userhost $* > From: Kreca Date: Tue, 24 Jan 2006 11:25:17 +0100 (CET) 1.24.06 -Fix bugs in tsave that created broken .th files. //kreca -Added theme ansiless which is good if you like to use charset iso-8859-1 on irc. This will work with almost any character set expect utf... You can see this theme on the screenshot page. //kreca diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Jan 11 10:27:34 2006 +++ amn/CHANGES Tue Jan 24 11:23:40 2006 @@ -40,3 +40,9 @@ -increment development version to 3 //zak -some minor static var changes into amn.epic from core/sets.m //zak -sync more documents to reality. //zak + +1.24.06 +-Fix bugs in tsave that created broken .th files. //kreca +-Added theme ansiless which is good if you like to use charset iso-8859-1 + on irc. This will work with almost any character set expect utf... + You can see this theme on the screenshot page. //kreca diff -aruN amn.orig/core/theme.m amn/core/theme.m --- amn.orig/core/theme.m Sun Jan 8 22:03:40 2006 +++ amn/core/theme.m Tue Jan 24 11:19:27 2006 @@ -6,74 +6,74 @@ alias tsave if ([$1]) { @ blahfile = $0 - if (fexist($(loadpath)themes/$0.th)) { + if (fexist($(loadpath)themes/$0.th)) { @ rename($(loadpath)themes/$0.th $(loadpath)themes/$0.th.old) - ^exec rm $(loadpath)themes/$0.th.old 1> /dev/null 2> /dev/null - } - @saveth = open($(loadpath)themes/$0.th W T) - @author = N - @desc = [$1] - @name = [$0] - @ write($saveth :$author) - @ write($saveth :$desc) - @ write($saveth :$name) - @ write($saveth @auth=[$N]) - @ write($saveth @desc=[$desc]) - @ write($saveth @name=[$name]) - @ write($saveth @scdesc=[\\\($desc\\\)]) - @ write($saveth @mform=$mform) - @ write($saveth @smform=$smform) - @ write($saveth @pubform=$pubform) - @ write($saveth @spubform=$spubform) - @ write($saveth @spuboform=$spuboform) - @ write($saveth @pubnotform=$pubnotform) - @ write($saveth @signform=$signform) - @ write($saveth @joinform=$joinform) - @ write($saveth @leaveform=[$leaveform]) - @ write($saveth @kickform=[$kickform]) - @ write($saveth @modeform=$modeform) - @ write($saveth @notform=$notform) - @ write($saveth @snotform=$snotform) - @ write($saveth @sdcform=$sdcform) - @ write($saveth @dcform=$dcform) - @ write($saveth @topform=$topform) - @ write($saveth @notopform=$notopform) - @ write($saveth @settopform=$settopform) - @ write($saveth @topbyform=$topbyform) - @ write($saveth @ctcpform=$ctcpform) - @ write($saveth @sctcpform=$sctcpform) - @ write($saveth @echostr=$echostr) - @ write($saveth @ncomp=$ncomp) - @ write($saveth @svform=$svform) - @ write($saveth @snf=$snf) - @ write($saveth @wallform = [$wallform]) - @ write($saveth @bwallform=$bwallform) - @ write($saveth @awayform=$awayform) - @ write($saveth @actform=$actform) - @ write($saveth @actform=$actform) - @ write($saveth @descform=$descform) - @ write($saveth @sdescform=$sdescform) - @ write($saveth @actform=$actform) - @ write($saveth @statbar=[$statbar]) - @ write($saveth @timeform=[$timeform]) - @ write($saveth @_whois=[$_whois]) - @ write($saveth @c1=[$c1) - @ write($saveth @c2=[$c2) - @ write($saveth @c3=[$c3) - @ write($saveth @c4=[$c4) - @ write($saveth @c5=[$c5) - @ write($saveth @sc1=[$sc1) - @ write($saveth @sc2=[$sc2) - @ write($saveth @sc3=[$sc3) - @ write($saveth @sc4=[$sc4) - @ write($saveth @acban=[$acban]) - @ close($saveth) - xecho $acban saved theme file [$(loadpath)themes/$(name).th] $desc - ^load $(loadpath)themes/$(name).th - ^eval load $(loadpath)core/fsets.m - ^eval load $(loadpath)core/arrays.m - ^update.f - ^getusers + ^exec rm $(loadpath)themes/$0.th.old 1> /dev/null 2> /dev/null + } + @saveth = open($(loadpath)themes/$0.th W T) + @author = N + @desc = [$1-] + @name = [$0] + @ write($saveth :$author) + @ write($saveth :$desc) + @ write($saveth :$name) + @ write($saveth @auth=[$N]) + @ write($saveth @desc=[$desc]) + @ write($saveth @name=[$name]) + @ write($saveth @scdesc=[\\\($desc\\\)]) + @ write($saveth @mform=[$mform]) + @ write($saveth @smform=[$smform]) + @ write($saveth @pubform=[$pubform]) + @ write($saveth @spubform=[$spubform]) + @ write($saveth @spuboform=[$spuboform]) + @ write($saveth @pubnotform=[$pubnotform]) + @ write($saveth @signform=[$signform]) + @ write($saveth @joinform=[$joinform]) + @ write($saveth @leaveform=[$leaveform]) + @ write($saveth @kickform=[$kickform]) + @ write($saveth @modeform=[$modeform]) + @ write($saveth @notform=[$notform]) + @ write($saveth @snotform=[$snotform]) + @ write($saveth @sdcform=[$sdcform]) + @ write($saveth @dcform=[$dcform]) + @ write($saveth @topform=[$topform]) + @ write($saveth @notopform=[$notopform]) + @ write($saveth @settopform=[$settopform]) + @ write($saveth @topbyform=[$topbyform]) + @ write($saveth @ctcpform=[$ctcpform]) + @ write($saveth @sctcpform=[$sctcpform]) + @ write($saveth @echostr=[$echostr]) + @ write($saveth @ncomp=[$ncomp]) + @ write($saveth @svform=[$svform]) + @ write($saveth @snf=[$snf]) + @ write($saveth @wallform = [$wallform]) + @ write($saveth @bwallform=[$bwallform]) + @ write($saveth @awayform=[$awayform]) + @ write($saveth @actform=[$actform]) + @ write($saveth @actform=[$actform]) + @ write($saveth @descform=[$descform]) + @ write($saveth @sdescform=[$sdescform) + @ write($saveth @actform=[$actform]) + @ write($saveth @statbar=[$statbar]) + @ write($saveth @timeform=[$timeform]) + @ write($saveth @_whois=[$_whois]) + @ write($saveth @c1=[$c1]) + @ write($saveth @c2=[$c2]) + @ write($saveth @c3=[$c3]) + @ write($saveth @c4=[$c4]) + @ write($saveth @c5=[$c5]) + @ write($saveth @sc1=[$sc1]) + @ write($saveth @sc2=[$sc2]) + @ write($saveth @sc3=[$sc3]) + @ write($saveth @sc4=[$sc4]) + @ write($saveth @acban=[$acban]) + @ close($saveth) + xecho $acban saved theme file [$(loadpath)themes/$(name).th] $desc + ^load $(loadpath)themes/$(name).th + ^eval load $(loadpath)core/fsets.m + ^eval load $(loadpath)core/arrays.m + ^update.f + ^getusers }{ xecho $acban $scriptname usage: /tsave diff -aruN amn.orig/themes/ansiless.th amn/themes/ansiless.th --- amn.orig/themes/ansiless.th Thu Jan 1 01:00:00 1970 +++ amn/themes/ansiless.th Tue Jan 24 11:20:23 2006 @@ -0,0 +1,53 @@ +:kreca +:For iso-8859-1 support +:ansiless +@auth=[kreca] +@desc=[For iso-8859-1 support] +@name=[ansiless] +@scdesc=[\(ansiless\)] +@mform=[37] +@smform=[48] +@pubform=[5] +@spubform=[5] +@spuboform=[5] +@pubnotform=[] +@signform=[3] +@joinform=[18] +@leaveform=[13] +@kickform=[1] +@modeform=[1] +@notform=[24] +@snotform=[35] +@sdcform=[25] +@dcform=[25] +@topform=[5] +@notopform=[5] +@settopform=[5] +@topbyform=[5] +@ctcpform=[11] +@sctcpform=[12] +@echostr=[45] +@ncomp=[15] +@svform=[20] +@snf=[3] +@wallform = [2] +@bwallform=[2] +@awayform=[9] +@actform=[3] +@actform=[3] +@descform=[2] +@sdescform=[2 +@actform=[3] +@statbar=[stat.13] +@timeform=[1] +@_whois=[4] +@c1=[] +@c2=[] +@c3=[] +@c4=[] +@c5=[] +@sc1=[] +@sc2=[] +@sc3=[] +@sc4=[] +@acban=[***] From: Kreca Date: Tue, 24 Jan 2006 11:53:47 +0100 (CET) Small bug fix in the commit I just did diff -aruN amn.orig/core/theme.m amn/core/theme.m --- amn.orig/core/theme.m Tue Jan 24 11:19:27 2006 +++ amn/core/theme.m Tue Jan 24 11:31:44 2006 @@ -52,16 +52,16 @@ @ write($saveth @actform=[$actform]) @ write($saveth @actform=[$actform]) @ write($saveth @descform=[$descform]) - @ write($saveth @sdescform=[$sdescform) + @ write($saveth @sdescform=[$sdescform]) @ write($saveth @actform=[$actform]) @ write($saveth @statbar=[$statbar]) @ write($saveth @timeform=[$timeform]) @ write($saveth @_whois=[$_whois]) - @ write($saveth @c1=[$c1]) - @ write($saveth @c2=[$c2]) - @ write($saveth @c3=[$c3]) - @ write($saveth @c4=[$c4]) - @ write($saveth @c5=[$c5]) + @ write($saveth @c1=[$c1) + @ write($saveth @c2=[$c2) + @ write($saveth @c3=[$c3) + @ write($saveth @c4=[$c4) + @ write($saveth @c5=[$c5) @ write($saveth @sc1=[$sc1]) @ write($saveth @sc2=[$sc2]) @ write($saveth @sc3=[$sc3]) diff -aruN amn.orig/themes/ansiless.th amn/themes/ansiless.th --- amn.orig/themes/ansiless.th Tue Jan 24 11:20:23 2006 +++ amn/themes/ansiless.th Tue Jan 24 11:30:39 2006 @@ -36,18 +36,18 @@ @actform=[3] @actform=[3] @descform=[2] -@sdescform=[2 +@sdescform=[2] @actform=[3] @statbar=[stat.13] @timeform=[1] @_whois=[4] -@c1=[] -@c2=[] -@c3=[] -@c4=[] -@c5=[] -@sc1=[] -@sc2=[] -@sc3=[] -@sc4=[] +@c1=[\[0m] +@c2=[\[0m] +@c3=[\[0m] +@c4=[\[0m] +@c5=[\[0;36m] +@sc1=[\[0m] +@sc2=[\[0m] +@sc3=[\[0m] +@sc4=[\[0m] @acban=[***] Date: Wed, 25 Jan 2006 06:02:57 -0500 (EST) From: zak@ircii.org (Zak) Modified files: CHANGES TODO-BUGS core/compat.m core/window.m core/hooks.m core/exec.m core/scan.m Log message: move edit_topic to hooks.m remove a unused function *i think* 'fix.scan4' make ignore save/work right again *grumble*, some cleanups more to come soon... sync todo/bugs to reality. ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Tue Jan 24 05:23:40 2006 +++ amn/CHANGES Wed Jan 25 05:54:05 2006 @@ -46,3 +46,11 @@ -Added theme ansiless which is good if you like to use charset iso-8859-1 on irc. This will work with almost any character set expect utf... You can see this theme on the screenshot page. //kreca + +1.25.06 +-Make ignore work/save right again.. i accidentally removed functions that +required it to work.. i blame drugs //zak +-Move edit_topic which is essentially a hook from core/exec.m to +core/hooks.m where it probably should have bee originally //zak +-added a few/removed a few windowing aliases for epic5.. /windent /indent +-some other cleanups..more to come //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Sat Jan 14 01:34:38 2006 +++ amn/TODO-BUGS Wed Jan 25 06:01:25 2006 @@ -15,12 +15,8 @@ whatever it was set to works properly but it's kinda annoying when everything outputs at bk when it's not actually set to bk. (will fix someday) -$ /ignsave seems kinda borked at times or something, probably another - krecaism. ## higher priority todo. (stuff that needs to done before upcoming release) -@ remove the said epic4 support it no longer works right on epic4 - i beleive amnesiac1.2r3 is the last version to work right on epic4. ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. @@ -56,6 +52,10 @@ complaint about it working or not working perhaps a vote? ## bugs fixed. / projects done. +1.25.06 - my first ever mistake, kreca was actually innocent for once //zak +! /ignsave seems kinda borked at times or something, probably another + krecaism. + 11.28.05 - kreca finally figured out a fix/workaround see CHANGES. //kreca ! when using inline colors on public formats ie; (BcrappleB) will show up right, but if modeshow/extpub is enabled (@crapple) won't have inline diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Sun Jan 8 16:00:19 2006 +++ amn/core/compat.m Wed Jan 25 05:45:39 2006 @@ -44,6 +44,16 @@ # written by David B. Kratter and distributed with EPIC5. # Thanks BlackJac! +alias igmask (pattern, void) { + return $ignorectl(pattern $pattern); +}; + +alias igtype (pattern, void) { + fe ($ignorectl(get $ignorectl(refnum $pattern) levels)) ii { + push function_return ${ii =~ [+*] ? [$rest(1 $ii)] : sar(#/##$sar(#^#DONT-#$ii))}; + }; +}; + alias servergroup (refnum default "$serverctl(from_server)", void) { if (:group = serverctl(get $refnum group)) { return $group; diff -aruN amn.orig/core/exec.m amn/core/exec.m --- amn.orig/core/exec.m Sun Jan 8 16:01:01 2006 +++ amn/core/exec.m Wed Jan 25 04:51:23 2006 @@ -34,26 +34,3 @@ ^on ^exec_exit "dns % %" { xecho -c [dns] ----------------------------------------- } - -## edit topic stuff from the epic5 source tree.. used for the /topic_input -## by kreca. -alias edit_topic -{ - ^local thetopic - ^stack push on 333 - ^stack push on 332 - ^stack push on 331 - ^on ^333 * # - ^on ^332 * { - bless - @ thetopic = [$2-] - } - ^on ^331 * # - ^topic - ^wait - ^parsekey erase_line - ^xtype -literal /topic $thetopic - stack pop on 331 - stack pop on 332 - stack pop on 333 -} diff -aruN amn.orig/core/hooks.m amn/core/hooks.m --- amn.orig/core/hooks.m Sun Jan 8 16:01:45 2006 +++ amn/core/hooks.m Wed Jan 25 04:51:09 2006 @@ -37,6 +37,29 @@ } } +## edit topic stuff from the epic5 source tree.. used for the /topic_input +## by kreca. +alias edit_topic +{ + ^local thetopic + ^stack push on 333 + ^stack push on 332 + ^stack push on 331 + ^on ^333 * # + ^on ^332 * { + bless + @ thetopic = [$2-] + } + ^on ^331 * # + ^topic + ^wait + ^parsekey erase_line + ^xtype -literal /topic $thetopic + stack pop on 331 + stack pop on 332 + stack pop on 333 +} + ## uptime hooks. on #-msg 22 * {@lrm=[$1-];@lrmn=[$0]} diff -aruN amn.orig/core/scan.m amn/core/scan.m --- amn.orig/core/scan.m Sun Jan 8 16:03:19 2006 +++ amn/core/scan.m Wed Jan 25 04:57:25 2006 @@ -34,11 +34,6 @@ } } -alias fix.scan4 { - @_t=msar(g/@/$(hcyn)@$(cl)/+/$(hcyn)+$(cl)/$fix.nick($0)) - @function_return=_t -} - alias printnames { @:lnick=sar(g/?//$sar(g/.//$2-)) @:lchan=[$1] diff -aruN amn.orig/core/window.m amn/core/window.m --- amn.orig/core/window.m Sun Jan 8 16:04:35 2006 +++ amn/core/window.m Wed Jan 25 04:48:59 2006 @@ -33,10 +33,6 @@ } } -## comment out for now in case some ppl want the old behavior. -#alias _wsact { window swap $leftw(1 $notifywindows()) -#;} - # Have F3 go to the oldest window, not the newest window. alias _WSACT window swap $rightw(1 $notifywindows()); @@ -87,9 +83,8 @@ alias wadd window add $* alias rwadd dq $* -## topwin stuff for broken topwin module. -alias topoff window toplines 0 -alias topdel topoff +## topwin stuff for broken topwin module/some other reasons. +alias topdel window toplines 0 alias rtop topoff ## window shortcuts. @@ -115,6 +110,8 @@ alias wnotify window notify toggle alias wnlevel window notify_level $* alias wskip window skip toggle +alias windent window indent toggle +alias indent set indent $* alias wswap window swappable toggle alias wfix window fixed toggle alias wlast window lastlog $* Date: Wed, 25 Jan 2006 09:30:09 -0500 (EST) From: zak@ircii.org (Zak) Modified files: CHANGES TODO-BUGS amn.epic settings core/compat.m core/sets.m docs/sample.amnrc docs/sample.epicrc oper/oper.m Removed Filed: core/notify.m core/sbcolor.m pasture/sync.m Log message: Cleanups of more cruft merge silly files i.e notify to core/hooks.m while merging sbcolor to core/color.m pending a major cleanup of pure uglyness change some default settings. -new function; /set suppress_server_motd *gulp* -new function; /beep; /set beep_on_msg for some hooks. (untested) -refix auto_reconnect (not really tested) -refix auto_rejoin_delay -sync sample docs to reality(subtle changes) -mangle_logfiles now strip all annoying crap per default. -operview/opervision window indenting without the need to /set indent which overrides all windows(new recent feature in epic5) to allow toggable indenting between windows via /window indent. -increment development version -add various requests to TODO-BUGS now skullY/kreca can stop claiming there's nothing much left to do ;p ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Jan 25 05:54:05 2006 +++ amn/CHANGES Wed Jan 25 09:16:38 2006 @@ -54,3 +54,24 @@ core/hooks.m where it probably should have bee originally //zak -added a few/removed a few windowing aliases for epic5.. /windent /indent -some other cleanups..more to come //zak +-add some /sets which were removed from stock epic5 + AUTO_RECONNECT AUTO_RECONNECT_DELAY AUTO_REJOIN_DELAY SURPRESS_SERVER_MOTD + disable auto_rejoin per default from amn/settings + auto_reconnect is a really ugly hack, be sure to connect to an irc + server first with at least 4 working servers in /server output before + /set auto_reconnect on, USE AT YOUR OWN RISK. //zak +-add /set suppress_server_motd; *gulp* default setting is off, requested by + some. //zak +-start of support for /beep /beep_on_msg for some hooks. action,ctcp, + msg,notice,oper-notice,server-notice,wallop,who. untested at this time + feedback would be appreciated on if it works ot not ;) //zak +-set mangle_logfiles to strip all annoying crap per default. //zak +-operview/opervision window now indents per default, since epic5 rel .8 + individual windows can be toggled for indenting on or off /set indent will + overide /window indent for all windows, discussion with Alien88 who wanted + this capability before the holidays. //zak +-merge sbcolor to core/color.m(still needs major cleanup) //zak +-merge notify to core/hooks.m +^^ sbcolor.m/notify.m has been removed after the merge. //zak +-remove pasture/sync.m i doubt anyone will miss it. //zak +-increment development version //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Wed Jan 25 06:01:25 2006 +++ amn/TODO-BUGS Wed Jan 25 09:03:48 2006 @@ -17,6 +17,18 @@ (will fix someday) ## higher priority todo. (stuff that needs to done before upcoming release) +@ add a /config set for auto-rejoin. +@ a better auto-reconnect idea, the somewhat refixed auto-reconnect + might be a bit more reliable/stable, but still a hack nonetheless. +@ some possible easy(unlikely) way of being able to /save most common /sets? +@ patterns/something still seems screwy from time to time with so-called + 'ghost nicks showing up in the channel fix?/pattern issue? ircd issue? +@ cleanup the silly ugly usages of stupid arrays in color.m +@ make * wildcard actually work in /trickle +@ add some topwin module, kreca has to start a discussion about some topwin + script he might have permission for us to use/modify/rip ;) +@ start scanning for similar patterns for stupid usage/duplicates of + dynamic/static variables and the like(cleanup code) ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Sat Jan 14 01:33:49 2006 +++ amn/amn.epic Wed Jan 25 08:30:09 2006 @@ -28,16 +28,22 @@ addset history_remove_dupes bool; addset history_save_position bool; addset history_timestamp bool; - xaddset auto_rejoin_delay int; + addset auto_reconnect bool; + addset auto_reconnect_delay int; + addset auto_rejoin_delay int; xaddset num_of_whowas int; xaddset show_end_of_msgs bool; xaddset show_who_hopcount bool; ## epic5 core sets here. (do not remove) set auto_reconnect off; + set auto_reconnect_delay 10 + set auto_rejoin_delay 5 set history_save_file ~/.epic_history; set history_remove_dupes on; set history_save_position on; set history_timestamp on; + set beep_on_msg none; + set suppress_server_motd off; ## allow for user customizable settings. ^eval ^load $(loadpath)settings diff -aruN amn.orig/core/color.m amn/core/color.m --- amn.orig/core/color.m Sun Jan 8 16:00:12 2006 +++ amn/core/color.m Wed Jan 25 08:35:54 2006 @@ -76,3 +76,46 @@ ^getusers } } + +alias sbcolour sbcolor $* +alias sbcolor { +@:clear = [$(cl)] +@:blue = [$(blu)] +@:green = [$(grn)] +@:cyan = [$(cyn)] +@:red = [$(red)] +@:magenta = [$(mag)] +@:yellow = [$(yel)] +@:white = [$(wht)] +@:hblack = [$(hblk)] +@:hblue = [$(hblu)] +@:hgreen = [$(hgrn)] +@:hcyan = [$(hcyn)] +@:hred = [$(hred)] +@:hmagenta = [$(hmag)] +@:hyello = [$(hyel)] +@:hwhite = [$(hwht)] +@:bwhite = [$(bwht)] +@:bmagenta = [$(bmag)] +@:bblue = [$(bblu)] +@:bred = [$(bred)] +@:bblack = [$(bblk)] +@:bgreen = [$(bgrn)] +@:byellow = [$(byel)] +@:bcyan = [$(bcyn)] + if ([$0]) {@sc1 = [$($0)]} + if ([$1]) {@sc2 = [$($1)]} + if ([$2]) {@sc3 = [$($2)]} + if ([$3]) {@sc4 = [$($3)]} +if (![$1]) { +abwecho $scriptname usage $(cyn):$(cl) /sbcolor color1 color2 color3 color4 +abwecho color statbar config set to $(sc1)color1 $(sc2)color2 $(sc3)color3 $(sc4)color4 +abwecho available colors $(cyn): $(cl)clear $(blu)blue $(grn)green $(cyn)cyan $(red)red $(mag)magenta $(yel)yellow $(wht)white +abwecho $(hblk)hblack $(hblu)hblue $(hgrn)hgreen $(hcyn)hcyan $(hred)hred $(hmag)hmagenta $(hyel)hyello $(hwht)hwhite $(bwht)bwhite +abwecho $(bmag)bmagenta$(cl) $(bblu)bblue$(cl) $(bred)bred$(cl) $(bblk)bblack$(cl) $(byel)byellow$(cl) $(bcyn)bcyan$(cl) +} +{abwecho color statbar config set to $(sc1)color1 $(sc2)color2 $(sc3)color3 $(sc4)color4 +^eval ^load $(loadpath)stats/$statbar +#update.f +} +} diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Wed Jan 25 05:45:39 2006 +++ amn/core/compat.m Wed Jan 25 08:29:26 2006 @@ -188,6 +188,7 @@ }; ## complex sets below. + ## FULL_STATUS_LINE addset full_status_line bool { @@ -268,7 +269,7 @@ ## nasty hack at making a auto-reconnect //zak ^on #-server_lost 18 "*" { if (getset(auto_reconnect) == [on]) { - if (:delay = getset(auto_reconnect_delay)) { + if ((:delay = getset(auto_reconnect_delay)) > 0) { timer -w $winnum() $delay server +; } else { defer server +; @@ -535,3 +536,97 @@ set auto_new_nick_length 9; addset auto_new_nick_list str; + +## annoying client beep functionality requested by some taken from +## builtins src/epic5/scripts by BlackJac. +## Copyright (c) 2005 David B. Kratter (BlackJac@EFNet) + +# BEEP_ON_MSG +addset beep_on_msg str; + +^on #-action 1 "*" { + if (getset(beep_on_msg) == [all] || findw(action $getset(beep_on_msg)) > -1) { + beep; + }; +}; + +^on #-ctcp 1 "*" { + if (getset(beep_on_msg) == [all] || findw(ctcp $getset(beep_on_msg)) > -1) { + beep; + }; +}; + + +^on #-msg 1 "*" { + if (getset(beep_on_msg) == [all] || findw(msgs $getset(beep_on_msg)) > -1) { + beep; + }; +}; + +^on #-notice 1 "*" { + if (getset(beep_on_msg) == [all] || findw(notices $getset(beep_on_msg)) > -1) { + beep; + }; +}; + +^on #-oper_notice 1 "*" { + if (getset(beep_on_msg) == [all] || findw(opnotes $getset(beep_on_msg)) > -1) { + beep; + }; +}; + +^on #-server_notice 1 "*" { + if (getset(beep_on_msg) == [all] || findw(snotes $getset(beep_on_msg)) > -1) { + beep; + }; +}; + +^on #-wallop 1 "*" { + if (getset(beep_on_msg) == [all] || findw(wallops $getset(beep_on_msg)) > -1) { + beep; + }; +}; + +^on #-who 1 "*" { + if (getset(beep_on_msg) == [all] || findw(crap $getset(beep_on_msg)) > -1) { + beep; + }; +}; + +## motd suppressions. taken from src/epic5/scripts written by +## Jeremy Nelson +addset suppress_server_motd bool; + +# # # +@ negser = getserial(HOOK - 0); +@ posser = getserial(HOOK + 0); + +# The first time we see the MOTD, trigger the "doing motd" flag. +on #^375 $negser * { + if (!done_motd[$lastserver()]) { + ^assign doing_motd[$lastserver()] 1; + }; +}; +# When we see the end of the first MOTD, trigger the "done motd" flag. +on #^376 $posser * { + if (doing_motd[$lastserver()]) { + ^assign -doing_motd[$lastserver()]; + ^assign done_motd[$lastserver()] 1; + }; +}; +# When the connection is closed, reset the flag. +on #^server_lost $posser * { + ^assign -done_motd[$lastserver()]; +}; + +# Only suppress the first MOTD from each server connection. +for i in (372 375 376 377) { + on ^$i * { + if (getset(suppress_server_motd) == 'ON' && doing_motd[$lastserver()]) { + return; + }; + xecho -b $1-; + }; +}; + +#hop'y2k+3 diff -aruN amn.orig/core/hooks.m amn/core/hooks.m --- amn.orig/core/hooks.m Wed Jan 25 04:51:09 2006 +++ amn/core/hooks.m Wed Jan 25 08:32:59 2006 @@ -37,6 +37,15 @@ } } +## notify hook. +^on ^notify_signon * { + awecho $G $(c1)signon $(cl)by $(c1)$0$(hblk)!$(cl)$sar(g/@/$(hblk)@$(cl)/$1-) at $Z +} + +^on ^notify_signoff * { + awecho $G $(c1)signoff $(cl)by $(c1)$0 at $Z +} + ## edit topic stuff from the epic5 source tree.. used for the /topic_input ## by kreca. alias edit_topic diff -aruN amn.orig/core/notify.m amn/core/notify.m --- amn.orig/core/notify.m Sun Jan 8 16:02:36 2006 +++ amn/core/notify.m Wed Dec 31 19:00:00 1969 @@ -1,13 +0,0 @@ -# Copyright (c) 2003-2006 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. -subpackage notify - -^on ^notify_signon * { - awecho $G $(c1)signon $(cl)by $(c1)$0$(hblk)!$(cl)$sar(g/@/$(hblk)@$(cl)/$1-) at $Z -} - -^on ^notify_signoff * { - awecho $G $(c1)signoff $(cl)by $(c1)$0 at $Z -} - - \ No newline at end of file diff -aruN amn.orig/core/sbcolor.m amn/core/sbcolor.m --- amn.orig/core/sbcolor.m Sun Jan 8 16:03:10 2006 +++ amn/core/sbcolor.m Wed Dec 31 19:00:00 1969 @@ -1,46 +0,0 @@ -# Copyright (c) 2003-2006 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. -subpackage sbcolor - -alias sbcolour sbcolor $* -alias sbcolor { -@:clear = [$(cl)] -@:blue = [$(blu)] -@:green = [$(grn)] -@:cyan = [$(cyn)] -@:red = [$(red)] -@:magenta = [$(mag)] -@:yellow = [$(yel)] -@:white = [$(wht)] -@:hblack = [$(hblk)] -@:hblue = [$(hblu)] -@:hgreen = [$(hgrn)] -@:hcyan = [$(hcyn)] -@:hred = [$(hred)] -@:hmagenta = [$(hmag)] -@:hyello = [$(hyel)] -@:hwhite = [$(hwht)] -@:bwhite = [$(bwht)] -@:bmagenta = [$(bmag)] -@:bblue = [$(bblu)] -@:bred = [$(bred)] -@:bblack = [$(bblk)] -@:bgreen = [$(bgrn)] -@:byellow = [$(byel)] -@:bcyan = [$(bcyn)] - if ([$0]) {@sc1 = [$($0)]} - if ([$1]) {@sc2 = [$($1)]} - if ([$2]) {@sc3 = [$($2)]} - if ([$3]) {@sc4 = [$($3)]} -if (![$1]) { -abwecho $scriptname usage $(cyn):$(cl) /sbcolor color1 color2 color3 color4 -abwecho color statbar config set to $(sc1)color1 $(sc2)color2 $(sc3)color3 $(sc4)color4 -abwecho available colors $(cyn): $(cl)clear $(blu)blue $(grn)green $(cyn)cyan $(red)red $(mag)magenta $(yel)yellow $(wht)white -abwecho $(hblk)hblack $(hblu)hblue $(hgrn)hgreen $(hcyn)hcyan $(hred)hred $(hmag)hmagenta $(hyel)hyello $(hwht)hwhite $(bwht)bwhite -abwecho $(bmag)bmagenta$(cl) $(bblu)bblue$(cl) $(bred)bred$(cl) $(bblk)bblack$(cl) $(byel)byellow$(cl) $(bcyn)bcyan$(cl) -} -{abwecho color statbar config set to $(sc1)color1 $(sc2)color2 $(sc3)color3 $(sc4)color4 -^eval ^load $(loadpath)stats/$statbar -#update.f -} -} diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Wed Jan 11 04:19:30 2006 +++ amn/core/sets.m Wed Jan 25 06:54:57 2006 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[3] +@rel_id=[4] @a.rel=[1.3d r/$rel_id] @a.date=[20051202] @_ss=[15] diff -aruN amn.orig/docs/sample.amnrc amn/docs/sample.amnrc --- amn.orig/docs/sample.amnrc Fri Oct 7 11:00:58 2005 +++ amn/docs/sample.amnrc Wed Jan 25 08:17:46 2006 @@ -5,3 +5,5 @@ set auto_rejoin off set auto_rejoin_delay 10 set num_of_whowas 1 +set no_control_log on +set beep on diff -aruN amn.orig/docs/sample.epicrc amn/docs/sample.epicrc --- amn.orig/docs/sample.epicrc Thu Sep 1 09:45:26 2005 +++ amn/docs/sample.epicrc Wed Jan 25 08:19:13 2006 @@ -24,9 +24,7 @@ #set LOAD_PATH ~/.epic:~/.irc:/usr/local/share/epic5//script:. #set REALNAME seymour butts set BEEP OFF -set BEEP_MAX 0 set CLOCK_24HOUR ON -set MANGLE_LOGFILES ALL set NO_FAIL_DISCONNECT ON set NO_CONTROL_LOG ON diff -aruN amn.orig/modules/oper/oper.m amn/modules/oper/oper.m --- amn.orig/modules/oper/oper.m Sun Jan 8 15:57:09 2006 +++ amn/modules/oper/oper.m Wed Jan 25 08:48:29 2006 @@ -82,7 +82,7 @@ }{ abecho $banner toggled operview on. - ^window new fixed on size $_ovsize name OperView level snotes,opnotes,wallops;umode +$_ovmode + ^window new fixed on size $_ovsize name OperView level snotes,opnotes,wallops;indent on;umode +$_ovmode # ^set status_server [%S] ^set status_format [operview] %> [$servername($winserv(OperView))] ^window back diff -aruN amn.orig/pasture/sync.m amn/pasture/sync.m --- amn.orig/pasture/sync.m Mon Nov 28 00:42:19 2005 +++ amn/pasture/sync.m Wed Dec 31 19:00:00 1969 @@ -1,27 +0,0 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. -subpackage sync - -## rain's utime_sub alias -alias utime_sub { - @:first=[$0.$pad(-6 0 $1)] - @:second=[$2.$pad(-6 0 $3)] - stack push set floating_point_math - ^set floating_point_math on - @:answer=first - second - stack pop set floating_point_math - return $trunc(6 $answer) -} - -## hop helped me by giving me this sync hook :) -on #-join 33 '$servernick($servernum()) *' { - @ jointime[$servernum()][$encode($tolower($1))] = utime() - wait -cmd who $1 -line {#} -end { - hook channel_synch $tolower($1) - @ :mytime = utime_sub($utime() $jointime[$servernum()][$encode($tolower($1))]) - ^assign -jointime[$servernum()][$encode($tolower($1))] - xecho -b -l crap join to $tolower($1) synced in $mytime seconds! - - } -} - diff -aruN amn.orig/settings amn/settings --- amn.orig/settings Mon Oct 10 19:40:07 2005 +++ amn/settings Wed Jan 25 08:39:18 2006 @@ -3,15 +3,16 @@ ## overriden with new script versions. or via script. set history_circleq on set high_bit_esc 0 -set insert_mode on set -continued_line set dcc_sliding_window 1024 set dcc_timeout 600 -set auto_rejoin on +set auto_rejoin off set auto_rejoin_delay 5 set num_of_whowas 2 -set auto_whowas on +set auto_whowas on set indent off +set mangle_logfiles all +set suppress_server_motd off set show_who_hopcount on set show_channel_names off set mode_stripper on Date: Wed, 25 Jan 2006 11:02:24 -0500 (EST) From: zak@ircii.org (Zak) Modified files: CHANGES core/save.m core/config.m core/window.m core/channel.m core/bans.m core/sets.m core/alias.m Created Files: pasture/bans.m Log message: -cleanup of more pointless/small ambiguous aliases no one really uses. -remove stupid kickonban feature and all of its broken glory ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Jan 25 09:16:38 2006 +++ amn/CHANGES Wed Jan 25 10:54:36 2006 @@ -75,3 +75,8 @@ ^^ sbcolor.m/notify.m has been removed after the merge. //zak -remove pasture/sync.m i doubt anyone will miss it. //zak -increment development version //zak +-scrap kickonban, you know... the most annoying thing that most +idiots/misconfigured clients use just to piss some of us off. i feel +for the poor sap who kicks me next time, 'amnesiac has that feature +too excuse no longer applies ;D' //zak +-remove some small/useless/cluttered aliases no one really uses. //zak diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Sun Jan 8 15:59:33 2006 +++ amn/core/alias.m Wed Jan 25 10:27:42 2006 @@ -84,7 +84,6 @@ alias csc clear;sc ## exec commands. -alias iwhois {exec whois $0 $*} alias touch {exec touch $0- $*} alias ls ^exec ls -F $* alias osv {^exec -o uname -amnvp} @@ -103,9 +102,7 @@ alias lls {set lastlog $*} alias mirc {set mirc_broken_resume toggle} alias ircname {set realname $*} -alias shist {set scrollback $*} alias uinfo {set user_information $*} -alias vctcp {set verbose_ctcp togggle} alias mon {set old_math_parser on} alias moff {set old_math_parser off} alias ioff {set -input_prompt} diff -aruN amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Sun Jan 8 15:59:47 2006 +++ amn/core/bans.m Wed Jan 25 10:20:40 2006 @@ -106,32 +106,10 @@ } -## kickonban annoyance. (this will probably be removed in the future) - -^on #-mode_stripped 43 "% % +b*" { - if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { - fe ($onchannel($1)) n1 { - @bannick = pattern($3 $n1!$userhost($n1)) - if (kickops ==[on]) { - if (bannick) { - kick $1 $before(! $bannick) banned - } - } - if (kickops ==[off] && !ischanop($n1 $1)) { - if (bannick) { - kick $1 $before(! $bannick) banned - } - } - } - } -} - ## ban aliases. alias fuckem lban alias lban mode $C +bbb *!*@0.0.0.0/1 *!*@128.0.0.0/1 *!*@0000::/1 $0 $0 $0 $0 alias ip6ban {mode $C +b *!*@0000::/1} -alias ip4ban {mode $C +b *!*@0.0.0.0/1} -alias fakeop mode $C +oo-oo $0 $0 $0 $0 $0 $0 $0 $0 alias hban {mode $C +b <3!<3@<3} ## more complex ugly hacks. @@ -290,9 +268,6 @@ ## end pollution. # configurations -alias kob { - config.kickonban -s $* -} alias kops { config.kickops -s $* @@ -311,15 +286,6 @@ } } -alias config.kickonban { - if ( [$0] == [-r] ) - { - return $kickonban - } else if ([$0] == [-s]) { - config.matchinput on|off kickonban '$1' kick on ban - } -} - ## bantype config. [Norm/Better/Host/Domain] alias config.bantype { if ( [$0] == [-r] ) @@ -341,6 +307,5 @@ } } -eval osetitem protect kickonban Kick on ban: eval osetitem protect kickops Kick ops: eval osetitem protect bantype Ban Type: diff -aruN amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Sun Jan 8 16:00:05 2006 +++ amn/core/channel.m Wed Jan 25 10:02:58 2006 @@ -12,8 +12,7 @@ alias not {^topic -$C } alias untopic not alias bans banstat -alias alldop mdeop -alias alldeop mdep +alias alldeop mdeop alias mdop mdeop alias dop {deop $*} alias allop mop diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Sun Jan 8 16:00:26 2006 +++ amn/core/config.m Wed Jan 25 10:21:21 2006 @@ -218,7 +218,6 @@ ## cmd line config aliases. alias cumode setumode $* -alias kickonban kob $* alias kickops kops $* alias resp _pubn $* alias timestamp _tsmps $* diff -aruN amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Sun Jan 8 16:02:53 2006 +++ amn/core/save.m Wed Jan 25 10:23:01 2006 @@ -31,7 +31,6 @@ @write($savemt @awayr = [$awayr]) @write($savemt @statbar=[$statbar]) @write($savemt @showop = [$showop]) - @write($savemt @kickonban = [$kickonban]) @write($savemt @kickops =[$kickops]) @write($savemt @getumode=[$getumode]) @write($savemt @msgfloodsensor=[$msgfloodsensor]) diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Wed Jan 25 06:54:57 2006 +++ amn/core/sets.m Wed Jan 25 10:24:13 2006 @@ -45,7 +45,6 @@ @_ss=[15] @_ovsize=[5] @_ovmode=[fibxwzZsy] -@kickonban=[off] @kickops=[off] @togpager=[off] @fke1=[wholeft] diff -aruN amn.orig/core/window.m amn/core/window.m --- amn.orig/core/window.m Wed Jan 25 04:48:59 2006 +++ amn/core/window.m Wed Jan 25 09:58:07 2006 @@ -79,9 +79,7 @@ alias qw wq $* alias q query $* alias dq window remove $* -alias qd dq $* alias wadd window add $* -alias rwadd dq $* ## topwin stuff for broken topwin module/some other reasons. alias topdel window toplines 0 @@ -106,7 +104,6 @@ alias wlog window log toggle alias wfile window logfile $* alias wlevel window level $* -alias winfo window alias wnotify window notify toggle alias wnlevel window notify_level $* alias wskip window skip toggle diff -aruN amn.orig/pasture/bans.m amn/pasture/bans.m --- amn.orig/pasture/bans.m Wed Dec 31 19:00:00 1969 +++ amn/pasture/bans.m Wed Jan 25 10:16:33 2006 @@ -0,0 +1,42 @@ +# Copyright (c) 2003-2006 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +## it's time to take out this peice of trash. (kick on ban crap) +## RIP 1.25.06 -Zak + +## kickonban annoyance. (this will probably be removed in the future) + +^on #-mode_stripped 43 "% % +b*" { + if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { + fe ($onchannel($1)) n1 { + @bannick = pattern($3 $n1!$userhost($n1)) + if (kickops ==[on]) { + if (bannick) { + kick $1 $before(! $bannick) banned + } + } + if (kickops ==[off] && !ischanop($n1 $1)) { + if (bannick) { + kick $1 $before(! $bannick) banned + } + } + } + } +} + +## end pollution. + +# configurations +alias kob { + config.kickonban -s $* +} + +alias config.kickonban { + if ( [$0] == [-r] ) + { + return $kickonban + } else if ([$0] == [-s]) { + config.matchinput on|off kickonban '$1' kick on ban + } +} + +eval osetitem protect kickonban Kick on ban: Date: Sun, 29 Jan 2006 05:24:02 -0500 (EST) From: zak@ircii.org (Zak) Modified files: CHANGES docs/amn-faq.txt docs/amn-fuq.txt docs/UNTESTED core/window.m core/ehelp.m core/eimodes.m Created Files: pasture/bans.m Log message: -cleanup of some cluttered aliases -add better documentation about the usage of auto_reconnect -sync various documents to reality -new core functions for server/connection stuff core/server.m in hopes to make some things easier for users who have 'ADD' since knowing all the /server switches is so hard ;p -new menu for the above feature /shelp ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Jan 25 10:54:36 2006 +++ amn/CHANGES Sun Jan 29 05:12:47 2006 @@ -80,3 +80,12 @@ for the poor sap who kicks me next time, 'amnesiac has that feature too excuse no longer applies ;D' //zak -remove some small/useless/cluttered aliases no one really uses. //zak + +1.29.06 +-add core/server.m for more ease of use for some people who have problems + using /server switches, see /shelp for more info. //zak +-add AUTO_RECONNECT document about how to use the auto_reconnect hack that + has been in the script for some time that stayed undocumented *gulp* //zak +-merge some things from window.m(multiserv) to server.m //zak +-sync the following document to reality amn-faq.txt amn-fuq.tx UNTESTED //zak +-add new /shelp menu for the recent /server addition stuff. //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Wed Jan 25 09:03:48 2006 +++ amn/TODO-BUGS Sun Jan 29 04:26:05 2006 @@ -27,7 +27,7 @@ @ make * wildcard actually work in /trickle @ add some topwin module, kreca has to start a discussion about some topwin script he might have permission for us to use/modify/rip ;) -@ start scanning for similar patterns for stupid usage/duplicates of +@ start scanning for similar patterns for stupid usage/duplicates of dynamic/static variables and the like(cleanup code) ## lower priority requests. diff -aruN amn.orig/core/ehelp.m amn/core/ehelp.m --- amn.orig/core/ehelp.m Sun Jan 8 16:00:48 2006 +++ amn/core/ehelp.m Sun Jan 29 05:03:00 2006 @@ -18,6 +18,7 @@ //echo chelp <config help> config shortcut help menu. [core] //echo fhelp <look/feel help> amnesiac look/feel help menu. [core] //echo ghelp <general help> general client/user cmds help. [core] + //echo shelp <server help> server/connection help cmds. [core] //echo mhelp <module help> module help menu. [core] //echo winhelp <window help> window shortcuts help menu. [core] //echo dcchelp <dcc help> dcc usage/binds help menu. [core] diff -aruN amn.orig/core/eimodes.m amn/core/eimodes.m --- amn.orig/core/eimodes.m Sun Jan 8 16:00:55 2006 +++ amn/core/eimodes.m Sun Jan 29 05:13:45 2006 @@ -3,9 +3,7 @@ subpackage eimodes ## simple aliases. -alias istat invs alias exempt exs -alias ixs invs alias invites invs alias tpi tinv alias tpe texp diff -aruN amn.orig/core/server.m amn/core/server.m --- amn.orig/core/server.m Wed Dec 31 19:00:00 1969 +++ amn/core/server.m Sun Jan 29 05:05:13 2006 @@ -0,0 +1,39 @@ +# Copyright (c) 2003-2006 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage server + +## first crack at aliases for multiserver/connection/modifying etc.. +alias svlist server +alias sadd {server -add $*} +alias sdel {server -delete $*} +alias snick {server -add $0:6667::$1-} +alias ssl {server -add $0:::::IRC-SSL} +alias snext {server +} +alias sprev {server -} + +## multiserv stuff. +alias wcs if ([$0]) { + ^window new server $0 hide swap last channel "$channame($1) $2-" + }{ + xecho $acban usage: /wcs server channel key +} +alias wns wcs $* + +alias shelp servhelp +alias servhelp { + if (!$[0]) { + +//echo ---------------------= Server Usage Help =------------------------- +//echo svlist /svlist views currently available servers. +//echo sadd /sadd adds the given server to the server list +//echo snick /snick add the given server to the server list +//echo with specified nick +//echo ssl /ssl add the given server as type ssl to the server list +//echo snext /snext To switch to the next server in your list +//echo sprev /sprev To switch to the previous server in your list +//echo --------------------------------------------------------------------- + + } +} + +oof diff -aruN amn.orig/core/window.m amn/core/window.m --- amn.orig/core/window.m Wed Jan 25 09:58:07 2006 +++ amn/core/window.m Sun Jan 29 04:43:26 2006 @@ -36,14 +36,6 @@ # Have F3 go to the oldest window, not the newest window. alias _WSACT window swap $rightw(1 $notifywindows()); -## multiserv stuff. -alias wcs if ([$0]) { - ^window new server $0 hide swap last channel "$channame($1) $2-" - }{ - xecho $acban usage: /wcs server channel key -} -alias wns wcs $* - # Returns the names of all channels belonging to a specific window. # If no window is specified the current window is used. # Taken from darkstar. diff -aruN amn.orig/docs/AUTO_RECONNECT amn/docs/AUTO_RECONNECT --- amn.orig/docs/AUTO_RECONNECT Wed Dec 31 19:00:00 1969 +++ amn/docs/AUTO_RECONNECT Sun Jan 29 04:22:10 2006 @@ -0,0 +1,43 @@ +Warning: HIGHLY EXPERIMENTAL, may get you killed/dlined or just may not +reconnect at all, you have been warned. + +The most important thing is to make sure your list of servers do work. +to make a list of servers to reconnect to there are a couple of ways to +acheive this. +1) before compiling edit source/include/config.h +2) export/setenv using the IRCSERVER variable: + export IRCSERVER="irc.foo.com irc.bar.com irc.foobar.com" +3) Commandline: epic5 -H vanityhost.com ircnick irc.foo.com irc.bar.com +4) inside a running client: + /server [sample output below] +*** 0) irc.umich.edu 6667 (crapple) [] IRC [ACTIVE] +*** 1) irc.ipv6.homelien.no 6667 [] IRC [RECONNECT] +*** 2) irc.ipv6.choopa.net 6667 [] IRC [RECONNECT] + Let's add more servers to the list + /server -add irc.bar.com + /server -add irc.foo.com +*** Server [irc.bar.com] added as server 3 +*** Server [irc.foo.com] added as server 4 + the output should now look something like this. +*** 0) irc.umich.edu 6667 (crapple) [] IRC [ACTIVE] +*** 1) irc.ipv6.homelien.no 6667 [] IRC [RECONNECT] +*** 2) irc.ipv6.choopa.net 6667 [] IRC [RECONNECT] +*** 3) irc.bar.com 6667 [] IRC [RECONNECT] +*** 4) irc.foo.com 6667 [] IRC [RECONNECT] + In case we want to remove irc.ipv6.choopa.net which is now dead + /server -del 2 +*** Deleting server [2] + + When you feel comfortable with your server listing setup + ONLY DO THIS AFTER YOU HAVE CONNECTED TO AN IRC SERVER BEFORE ENABLING. + /set auto_reconnect on + It should auto_reconnect you to the next server in the list when you + ping out or get killed, please report any bugs/oddities no matter how + subtle to zak@ircii.org. + + Scripters: we are open to suggestions for improving our auto_reconnect + i.e options to save the current server list/remove/modify easily on + the fly. feel free to e-mail me or join us on efnet @ #amnesiac. + and or drop me a line crapple@efnet + +-Zak diff -aruN amn.orig/docs/UNTESTED amn/docs/UNTESTED --- amn.orig/docs/UNTESTED Fri Sep 2 22:58:45 2005 +++ amn/docs/UNTESTED Sun Jan 29 04:23:16 2006 @@ -1,13 +1,4 @@ -adcc.mod still needs to be tested/verified. -and or rewritten. - -topwin.mod - is unstable apparently it's this good. -right from the person who wrote it himself!. -[kreca_(dcc)] I need to fix the topwin module ->(dcc!kreca_) yes you do -[kreca_(dcc)] it's been so bad I havnt been using it myself ->(dcc!kreca_) hahaha -[kreca_(dcc)] ;p +adcc.mod still needs to be tested/verified or rewritten. crapple //zak@ircii.org diff -aruN amn.orig/docs/amn-faq.txt amn/docs/amn-faq.txt --- amn.orig/docs/amn-faq.txt Sun Dec 4 22:26:30 2005 +++ amn/docs/amn-faq.txt Sun Jan 29 04:24:08 2006 @@ -1,4 +1,4 @@ -Amnesiac FAQ 0.1 +Amnesiac FAQ 0.1.1 d. ^b. ,$ ,b.^b ,s$b .dP^`Sb d^`b. `$$' d. ,s`$b d'$b l'$'`b .$$$ $d$'`$b d$' `$b `$. ` $$ d'$b dP' `b @@ -115,8 +115,18 @@ /tig to remove ignores. Q: Why doesn't epic5 have auto-reconnect? -A: Because no one's written it yet. If you really need that use epic4. - +A: Because it is one of the things the epic author has never liked, i agree + That it has to be one of the more annoying features of reconnecting, + hammering ircds because people don't know how to update the server list + or they've been banned however, we do have a 'hack' in amnesiac for a + attempt at creating an auto_reconnect like behavior it may break + it may mess things up or get you killed you have been warned if you wish + to enable it, after you have connected to some irc server do /server make + sure you have at least 4 working servers you know you can reconnect to + /set auto_reconnect on to enable it. for those mere mortals who wish to + improve/make a better auto_reconnect script, the code is in core/compat.m + see docs/AUTO_RECONNECT for more information. + Q: I want to make this really great theme but I need to add some formats. How do I do this? A: You need to add the appropriate format in amn/arrays. If you add a new diff -aruN amn.orig/docs/amn-fuq.txt amn/docs/amn-fuq.txt --- amn.orig/docs/amn-fuq.txt Wed Nov 30 23:37:51 2005 +++ amn/docs/amn-fuq.txt Sun Jan 29 04:24:35 2006 @@ -167,5 +167,5 @@ A: /alias cmd somelongfunctionorcommand Q: will there be a auto_reconnect script for epic5? -A: someday, for now use epic4 if you guys really want the annoying -auto-reconnect feature. +A: see amn-faq.txt for more information on the auto_reconnect hackery. + see also docs/AUTO_RECONNECT for further info Date: Sun, 29 Jan 2006 05:28:44 -0500 From: Zak Subject: Re: amnesiac-changes * Zak [2006-01-29 05:24:02 -0500]: [snip] |> Created Files: pasture/bans.m ^^ perhaps it's time for me to put the crackpipe away it should read Files Added: docs/AUTO_RECONNECT core/server.m cu //zak -- "Only two things are infinite, the universe and human stupidity, and I'm not sure about the former." - Albert Einstein From: Kreca Date: Mon, 30 Jan 2006 00:22:12 +0100 (CET) -add auto_rejoin and auto_rejoin_delay to config misc //kreca diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sun Jan 29 11:12:47 2006 +++ amn/CHANGES Mon Jan 30 00:20:26 2006 @@ -89,3 +89,4 @@ -merge some things from window.m(multiserv) to server.m //zak -sync the following document to reality amn-faq.txt amn-fuq.tx UNTESTED //zak -add new /shelp menu for the recent /server addition stuff. //zak +-add auto_rejoin and auto_rejoin_delay to config misc //kreca diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Wed Jan 25 14:30:09 2006 +++ amn/amn.epic Mon Jan 30 00:07:27 2006 @@ -16,38 +16,6 @@ @ delarray($array); } -## load comptability functs -@loadpath=[$before(-1 / $word(1 $loadinfo()))/] -@epicver=word(0 $info(v)) - ## functions for epic5 - ^eval ^load $(loadpath)core/compat.m - ## compiling sets... - addset auto_rejoin bool; - addset history_circleq bool; - addset history_save_file str; - addset history_remove_dupes bool; - addset history_save_position bool; - addset history_timestamp bool; - addset auto_reconnect bool; - addset auto_reconnect_delay int; - addset auto_rejoin_delay int; - xaddset num_of_whowas int; - xaddset show_end_of_msgs bool; - xaddset show_who_hopcount bool; - ## epic5 core sets here. (do not remove) - set auto_reconnect off; - set auto_reconnect_delay 10 - set auto_rejoin_delay 5 - set history_save_file ~/.epic_history; - set history_remove_dupes on; - set history_save_position on; - set history_timestamp on; - set beep_on_msg none; - set suppress_server_motd off; - -## allow for user customizable settings. -^eval ^load $(loadpath)settings - ## static vars for savefiles. @savepath=[~/.amn/] @savefile=[.a.save] @@ -58,6 +26,45 @@ @nsavefile=[.a.nsavefile] @modfile=[$(savepath).mod.save] + +###### TOUCH BELOW THIS LINE AND YOU DESERVE WHATEVER YOU GET, SUCKA. ###### + +## load comptability functs +@loadpath=[$before(-1 / $word(1 $loadinfo()))/] +@epicver=word(0 $info(v)) + +## functions for epic5 +^eval ^load $(loadpath)core/compat.m + +## compiling sets... +addset auto_rejoin bool; +addset history_circleq bool; +addset history_save_file str; +addset history_remove_dupes bool; +addset history_save_position bool; +addset history_timestamp bool; +addset auto_reconnect bool; +addset auto_reconnect_delay int; +addset auto_rejoin_delay int; +xaddset num_of_whowas int; +xaddset show_end_of_msgs bool; +xaddset show_who_hopcount bool; + +## epic5 core sets here. (do not remove) +set auto_reconnect off; +set auto_reconnect_delay 10 +set auto_rejoin_delay 5 +set history_save_file ~/.epic_history; +set history_remove_dupes on; +set history_save_position on; +set history_timestamp on; +set beep_on_msg none; +set suppress_server_motd off; + +## allow for user customizable settings. +^eval ^load $(loadpath)settings + + ## remove certain sets for cosmetics. other cosmetic adjustments here. set -status_user set -status_format1 @@ -65,10 +72,11 @@ set quit_message $tolower($J) - $randread($(loadpath)quit.reasons) window 1 level none window 1 name - + ## hack to not break URLS. eval set word_break $strip(. $word_break) -###### TOUCH BELOW THIS LINE AND YOU DESERVE WHATEVER YOU GET, SUCKA. ###### + if (epicver == [epic4]) { //quit wrong epic version, try the latest version of epic5. } if (V < 20050520 ){ diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Wed Jan 25 16:21:21 2006 +++ amn/core/config.m Mon Jan 30 00:18:59 2006 @@ -196,6 +196,30 @@ } } +alias config.auto_rejoin { + if ( [$0] == [-r] ) { + return $tolower($getset(auto_rejoin)) + } else if ([$0] == [-s]) { + @tmpvar=tolower($getset(auto_rejoin)) + config.matchinput on|off tmpvar '$1' auto rejoin + ^set auto_rejoin $tmpvar + } +} + +alias config.auto_rejoin_delay { + if ( [$0] == [-r] ) + { + return $getset(auto_rejoin_delay) + } else if ([$0] == [-s]) { + if (#>1) { + ^set auto_rejoin_delay $1 + + } + xecho -v $acban Auto rejoin delay set to: "$getset(auto_rejoin_delay)" + + } +} + alias config.windowdoubles { if ( [$0] == [-r] ) { return $windowdoubles @@ -228,4 +252,6 @@ eval osetitem misc umode Auto-connect umode: eval osetitem misc timestamp Timestamps: eval osetitem misc pubnick Pubstring: +eval osetitem misc auto_rejoin Auto rejoin: +eval osetitem misc auto_rejoin_delay Auto rejoin delay: eval osetitem misc windowdoubles Double fixed window: diff -aruN amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Wed Jan 25 16:23:01 2006 +++ amn/core/save.m Mon Jan 30 00:09:05 2006 @@ -53,6 +53,8 @@ @write($savemt @_r3 = [$_r3]) @write($savemt @_r4 = [$_r4]) @write($savemt @acban = [$acban]) + @write($savemt set auto_rejoin $getset(auto_rejoin)) + @write($savemt set auto_rejoin_delay $getset(auto_rejoin_delay)) @close($savemt) xecho $acban (core).. settings saved to $savefile } Date: Wed, 8 Feb 2006 13:19:33 -0500 (EST) From: zak@ircii.org (Zak) Modified files: INSTALL README TODO-BUGS Log message: -sync various documents to reality ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sun Jan 29 18:20:26 2006 +++ amn/CHANGES Wed Feb 8 13:17:55 2006 @@ -89,4 +89,7 @@ -merge some things from window.m(multiserv) to server.m //zak -sync the following document to reality amn-faq.txt amn-fuq.tx UNTESTED //zak -add new /shelp menu for the recent /server addition stuff. //zak --add auto_rejoin and auto_rejoin_delay to config misc //kreca \ No newline at end of file +-add auto_rejoin and auto_rejoin_delay to config misc //kreca + +2.8.06 +-sync documents to reality. //zak diff -aruN amn.orig/INSTALL amn/INSTALL --- amn.orig/INSTALL Wed Jan 11 04:27:57 2006 +++ amn/INSTALL Wed Feb 8 13:13:43 2006 @@ -7,8 +7,8 @@ if you do not know what epic is then you don't need this irc script. other notes: -Amnesiac is still extremely ALPHA, some things may break/not work/or even -crash the client! (mainly because epic5 is still not exactly stable yet) +Amnesiac should be fairly stable we're probably out of the ALPHA stage, +so BETA might be a better description of how well the script functions. -epic4 support has been removed as of 1.11.06 last known version to probably work is amnesiac1.3r3 diff -aruN amn.orig/README amn/README --- amn.orig/README Sun Jan 8 15:52:54 2006 +++ amn/README Wed Feb 8 13:16:53 2006 @@ -3,10 +3,9 @@ * THE AMNESIAC HOME PAGE IS: http://amnesiac.ircii.org THE AMNESIAC IRC CHANNEL IS: #amnesiac on EFNet -* Amnesiac is still extremely ALPHA, some things may break/not work/or even - crash the client! (mainly because epic5 is still not exactly stable yet) - recent support for epic4 however it has not be throroughly tested, - feedbacks would be appreciated. +* Amnesiac has came a long ways in the past year, it was previously ALPHA. + unless there are any complaints in the near future it will be considered + BETA(fairly stable, however some bugs will probably still arise) * The INSTALL file gives detailed instructions how to install amnesiac. diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Sun Jan 29 04:26:05 2006 +++ amn/TODO-BUGS Wed Feb 8 13:11:16 2006 @@ -17,13 +17,11 @@ (will fix someday) ## higher priority todo. (stuff that needs to done before upcoming release) -@ add a /config set for auto-rejoin. -@ a better auto-reconnect idea, the somewhat refixed auto-reconnect - might be a bit more reliable/stable, but still a hack nonetheless. @ some possible easy(unlikely) way of being able to /save most common /sets? @ patterns/something still seems screwy from time to time with so-called 'ghost nicks showing up in the channel fix?/pattern issue? ircd issue? @ cleanup the silly ugly usages of stupid arrays in color.m +@ /bans output is really not consistent any ideas for a better output? @ make * wildcard actually work in /trickle @ add some topwin module, kreca has to start a discussion about some topwin script he might have permission for us to use/modify/rip ;) @@ -32,6 +30,8 @@ ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. +@ a better auto-reconnect idea, the somewhat refixed auto-reconnect + might be a bit more reliable/stable, but still a hack nonetheless. @ bindshelp menu explaining our default binded functs. @ cid help menu about efnet's umode +g. @@ -41,21 +41,15 @@ output? <-- i crapple vote yay. "while shielding myself from kreca" ## Procrastinated requests. -@ rewrite topwin (removed to pasture). - -@ add a module to bwk involving. - add repeat kick with option for # of repeats before kicking offender. - should be toggable to allow specified channel..while making usage of the - kickops var. - also add support to bwk to allow usage of wildcards. - +@ add support to bwk to allow usage of wildcards. @ fixdouble/fixwin or equiv for doublestats - @ an xy menu based help system for the xy module to add to /ehelp. + @ make userlist support /addchan #chan,#chan2,#chan3 we already support * it should be easy just add a $split(, $chanlist) and change the $match() to $rmatch() or something along those lines +^^ don't count on this happening anytime soon @ better parses for /e /i outputs. //xavier or skullY needs to discuss this. From: Kreca Date: Thu, 9 Feb 2006 00:24:07 +0100 (CET) -move settings to settings.default //kreca -add /setsave which saves all the settings in settings.default to ~/.amn/.a.settings. This removes the need of modifying the old settings file aswell as customized ~/.amnrc //kreca -add setsave to saveall aka /save //kreca Note that I did a big cleanup to amn.epic (reorganized it more logically) and other files Modified files amn/core/alias.m amn/core/compat.m amn/core/mod.m amn/core/save.m amn/core amn/amn.epic amn/CHANGES amn/settings.default amn diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES 2006-02-08 18:17:55.000000000 +0000 +++ amn/CHANGES 2006-02-09 00:21:28.000000000 +0000 @@ -93,3 +93,8 @@ 2.8.06 -sync documents to reality. //zak +-move settings to settings.default //kreca +-add /setsave which saves all the settings in settings.default to + ~/.amn/.a.settings. This removes the need of modifying the old settings file + aswell as customized ~/.amnrc //kreca +-add setsave to saveall aka /save //kreca diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic 2006-01-29 23:07:27.000000000 +0000 +++ amn/amn.epic 2006-02-09 00:13:51.000000000 +0000 @@ -20,11 +20,12 @@ @savepath=[~/.amn/] @savefile=[.a.save] @fsavefile=[.a.fsave] +@setsavefile=[.a.settings] @igsfile=[.a.ig.save] @csavefile=[.a.csave] @fsetsavefile=[.a.fsetsave] @nsavefile=[.a.nsavefile] -@modfile=[$(savepath).mod.save] +@modfile=[.mod.save] ###### TOUCH BELOW THIS LINE AND YOU DESERVE WHATEVER YOU GET, SUCKA. ###### @@ -33,93 +34,105 @@ @loadpath=[$before(-1 / $word(1 $loadinfo()))/] @epicver=word(0 $info(v)) -## functions for epic5 -^eval ^load $(loadpath)core/compat.m - -## compiling sets... -addset auto_rejoin bool; -addset history_circleq bool; -addset history_save_file str; -addset history_remove_dupes bool; -addset history_save_position bool; -addset history_timestamp bool; -addset auto_reconnect bool; -addset auto_reconnect_delay int; -addset auto_rejoin_delay int; -xaddset num_of_whowas int; -xaddset show_end_of_msgs bool; -xaddset show_who_hopcount bool; +if (epicver == [epic4]) { + //quit wrong epic version, try the latest version of epic5. +} if (V < 20050520 ){ + //quit wrong epic version, try the latest version of epic5. +} -## epic5 core sets here. (do not remove) -set auto_reconnect off; -set auto_reconnect_delay 10 -set auto_rejoin_delay 5 -set history_save_file ~/.epic_history; -set history_remove_dupes on; -set history_save_position on; -set history_timestamp on; -set beep_on_msg none; -set suppress_server_motd off; +#supported modules +@_modules=[ncomp flood abot sprot aol query away dict mjoin netsplit adcc oper orignick relay shitlist tab tc userlist bwk clones vanilla xy nlog services] -## allow for user customizable settings. -^eval ^load $(loadpath)settings +#progress bar +@_pcnt=[0] +alias oof { + @_pcnt=_pcnt+1 + ^eval set input_prompt $$(hblk)[$$cparse($(c1)$[20]repeat($_pcnt þ))$$(hblk)] [$$(cl)${_pcnt*5}$$(hwht)%$$(hblk)] +} +## script echo ##still need to clean some of this up. +alias abwecho xecho -v $acban $cparse($*) +alias awecho xecho -v $cparse($*) +alias aecho //echo $cparse($*) +alias abecho xecho -b -- $cparse($*) +alias ce //echo $cparse("$*") ## remove certain sets for cosmetics. other cosmetic adjustments here. set -status_user set -status_format1 set -status_format2 set quit_message $tolower($J) - $randread($(loadpath)quit.reasons) + window 1 level none window 1 name - -## hack to not break URLS. -eval set word_break $strip(. $word_break) - - -if (epicver == [epic4]) { - //quit wrong epic version, try the latest version of epic5. -} if (V < 20050520 ){ - //quit wrong epic version, try the latest version of epic5. -} - -#supported modules -@_modules=[ncomp flood abot sprot aol query away dict mjoin netsplit adcc oper orignick relay shitlist tab tc userlist bwk clones vanilla xy nlog services] - ## proper yell silence. as we do not want to silence all yells. ## this is the beginning of a proper silence. ^on ^yell "File not found*" # ^on ^yell "*INFO*" # ^on ^yell "% *Mode parser or server*" # -## script echo ##still need to clean some of this up. -alias abwecho xecho -v $acban $cparse($*) -alias awecho xecho -v $cparse($*) -alias aecho //echo $cparse($*) -alias abecho xecho -b -- $cparse($*) -alias ce //echo $cparse("$*") +## functions for epic5 +^eval ^load $(loadpath)core/compat.m + +## compiling sets... +## In epic5-0.0.8 I had to remove all ; after these sets to make it work +## this only seems to work in the pf loader //kreca +addset auto_rejoin bool +addset auto_rejoin_delay int +addset history_circleq bool +addset history_save_file str +addset history_remove_dupes bool +addset history_save_position bool +addset history_timestamp bool +addset auto_reconnect bool +addset auto_reconnect_delay int +xaddset num_of_whowas int +xaddset show_end_of_msgs bool +xaddset show_who_hopcount bool + +## epic5 core sets here. (do not remove) +set auto_reconnect off +set auto_reconnect_delay 10 + + +set auto_rejoin_delay 5 +set history_save_file ~/.epic_history +set history_remove_dupes on +set history_save_position on +set history_timestamp on +set beep_on_msg none +set suppress_server_motd off + + +################################ +## LOADING CUSTOMIZABLE FILES ## +################################ + +## allow for user customizable settings. +^eval ^load $(loadpath)settings.default ## allow for permanent settings via ~/.amnrc ^eval ^load ~/.amnrc + +oof ^eval ^load $(loadpath)core/sets.m ^eval ^load $(loadpath)core/config.m -#progress bar -@_pcnt=[0] -alias oof { - @_pcnt=_pcnt+1 - ^eval set input_prompt $$(hblk)[$$cparse($(c1)$[20]repeat($_pcnt þ))$$(hblk)] [$$(cl)${_pcnt*5}$$(hwht)%$$(hblk)] -} - -oof ## load script files here. ^eval $mkdir($(savepath)) ^eval ^load $(savepath)$savefile +^eval ^load $(savepath)$setsavefile ^eval ^load $(savepath)$csavefile ^eval ^load $(savepath)$fsavefile ^eval ^load $(savepath)$igsfile -^eval ^load $(modfile) +^eval ^load $(savepath)$modfile + +##End of loading customizable files + + + ^eval set banner $banner oof diff -aruN amn.orig/core/mod.m amn/core/mod.m --- amn.orig/core/mod.m 2006-01-08 21:02:14.000000000 +0000 +++ amn/core/mod.m 2006-02-08 23:27:07.000000000 +0000 @@ -104,13 +104,13 @@ } alias modsave { - @rename($modfile $modfile~) - @savemt = open($modfile W) - for (@xx=1, xx Subject: Re: amnesiac-changes I just need to remind you guys this commit needs a lot of testing also I found out that addset name type; doesnt work when using the default loader which we are using, at least not in .0.0.8. Im not sure when this changed but it seems to have worked with .0.0.7 I removed the ; and it worked. Seems to be the pf loader, can someone please investigate this and why it worked on geekunderground Regards Kreca Date: Thu, 9 Feb 2006 12:46:05 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: CHANGES TODO-BUGS amn.epic mod.defaults core/config.m core/getusers.m core/sets.m ans/modlist.ans ans/modules.ans stats/stat.14 Files Removed: modules/clones/* Log message: -some minor code cleanups/commenting of confusing objects. -scan clones module has been removed, use /trickle /ehelp trickle -disable loading mjoin(ajoin) module per default /addmod mjoin -stop statbar 14 from breaking some other statbars. -hook skullY's http module into the base as it has been just sitting there for some time, it's feature is currently undocumeted. -bugfix: /stamp /timestamp; on/off works on the fly again. -increment minor. ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Wed Feb 8 19:21:28 2006 +++ amn/CHANGES Thu Feb 9 12:28:03 2006 @@ -98,3 +98,16 @@ ~/.amn/.a.settings. This removes the need of modifying the old settings file aswell as customized ~/.amnrc //kreca -add setsave to saveall aka /save //kreca + +2.9.06 +-cleanup/comment some confusions, remove more probably broken getusers hooks + while in the general area. //zak +-fix /stamp /timestamp to actually turn on/off on the fly slight help/fix + by kreca //zak +-remove outdated/ugly channel clone scan module.. /trickle is preferred + for weeding out clones/drones/spammers etc.. see /ehelp trickle //zak +-remove mjoin(ajoin) module from default startup //zak +-hook in skullY's http module (undocumented at this time) //zak +-remove status_insert* from stat.14 hopefully fixes breakage against + some other statbars. //zak +-bump up minor ver (5) //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Wed Feb 8 13:11:16 2006 +++ amn/TODO-BUGS Thu Feb 9 12:35:55 2006 @@ -25,8 +25,6 @@ @ make * wildcard actually work in /trickle @ add some topwin module, kreca has to start a discussion about some topwin script he might have permission for us to use/modify/rip ;) -@ start scanning for similar patterns for stupid usage/duplicates of - dynamic/static variables and the like(cleanup code) ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. @@ -44,7 +42,6 @@ @ add support to bwk to allow usage of wildcards. @ fixdouble/fixwin or equiv for doublestats @ an xy menu based help system for the xy module to add to /ehelp. - @ make userlist support /addchan #chan,#chan2,#chan3 we already support * it should be easy just add a $split(, $chanlist) and change the $match() diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Wed Feb 8 19:13:51 2006 +++ amn/amn.epic Thu Feb 9 12:18:31 2006 @@ -41,7 +41,7 @@ } #supported modules -@_modules=[ncomp flood abot sprot aol query away dict mjoin netsplit adcc oper orignick relay shitlist tab tc userlist bwk clones vanilla xy nlog services] +@_modules=[ncomp flood abot sprot aol query away dict mjoin netsplit adcc oper orignick relay shitlist tab tc userlist bwk vanilla xy nlog services http] #progress bar @_pcnt=[0] @@ -66,8 +66,7 @@ window 1 level none window 1 name - -## proper yell silence. as we do not want to silence all yells. -## this is the beginning of a proper silence. +## proper yell silence. as we do not want to silence all ^on ^yell "File not found*" # ^on ^yell "*INFO*" # ^on ^yell "% *Mode parser or server*" # @@ -95,8 +94,6 @@ ## epic5 core sets here. (do not remove) set auto_reconnect off set auto_reconnect_delay 10 - - set auto_rejoin_delay 5 set history_save_file ~/.epic_history set history_remove_dupes on @@ -112,8 +109,6 @@ ## allow for user customizable settings. ^eval ^load $(loadpath)settings.default -## allow for permanent settings via ~/.amnrc -^eval ^load ~/.amnrc oof ^eval ^load $(loadpath)core/sets.m @@ -129,10 +124,8 @@ ^eval ^load $(savepath)$igsfile ^eval ^load $(savepath)$modfile -##End of loading customizable files +## End of loading customizable files - - ^eval set banner $banner oof @@ -153,15 +146,17 @@ ^update.f oof +## Comment for stoners: ^getusers is used when dump/reload while in a chan +## or loading after one connects to a server. ^getusers -oof +## I really need to start commenting more /* not quite positive on this */ ^_timestampsome # We're finished, display ans. ^eval ^load $(loadpath)ans/amc.load wait eval _center $a.ver/$a.rel for $(J)[$info(i)] loaded... - +oof ^eval ^load $(savepath)$fsetsavefile eval ^qsbar $after(. $statbar) diff -aruN amn.orig/ans/modlist.ans amn/ans/modlist.ans --- amn.orig/ans/modlist.ans Mon Oct 10 23:01:06 2005 +++ amn/ans/modlist.ans Thu Feb 9 12:20:13 2006 @@ -2,7 +2,7 @@ eval //echo [abot] [*] [away] [*] [dict] [*] eval //echo [mjoin] [*] [oper] [*] [relay] [*] eval //echo [tab] [*] [netsplit] [*] [orignick] [*] -eval //echo [clones] [M] [ncomp] [M] [adcc] [M] +eval //echo [http] [M] [ncomp] [M] [adcc] [M] eval //echo [flood] [M] [nlog] [M] [query] [M] eval //echo [sprot] [M] [aol] [M] [bwk] [M] eval //echo [xy] [M] [shitlist] [M] [userlist] [M] diff -aruN amn.orig/ans/modules.ans amn/ans/modules.ans --- amn.orig/ans/modules.ans Mon Oct 10 23:02:01 2005 +++ amn/ans/modules.ans Thu Feb 9 12:21:36 2006 @@ -9,7 +9,6 @@ eval //echo [tab] - extended tab completion [*] eval //echo [netsplit] - netsplit detector [*] eval //echo [orignick] - orignick/jupenick [*] -eval //echo [clones] - scan for clones in current chan [M] eval //echo [ncomp] - nick completion [M] eval //echo [adcc] - xdcc/dcc pack/offers [M] eval //echo [flood] - msg flood protection [M] diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Sun Jan 29 18:18:59 2006 +++ amn/core/config.m Thu Feb 9 10:08:18 2006 @@ -192,7 +192,8 @@ if ( [$0] == [-r] ) { return $_tss } else if ([$0] == [-s]) { - config.matchinput on|off _tss '$1' timestamp msgs,not,walls,pubs,dcc,signoff,oper + config.matchinput on|off _tss '$1' Time stamp events + ^_timestampsome } } diff -aruN amn.orig/core/getusers.m amn/core/getusers.m --- amn.orig/core/getusers.m Sun Jan 8 16:01:31 2006 +++ amn/core/getusers.m Thu Feb 9 11:38:11 2006 @@ -2,8 +2,10 @@ # See the 'COPYRIGHT' file for more information. subpackage getusers -## some parts are questionable. will need more pruning in the future. //zak -## see fsets.m for other getusers. +## Last modified by crapple 2.9.06 +## more cleanup is surely needed. (see obfuscate below) +## see core/fsets.m - lines 109-125 (more preferred as it works) //crapple + alias getusers { if ([$0]) { @__chan=C @@ -15,15 +17,16 @@ ^set status_user4 $#pattern(*+* $channel()) } +## stupid obfuscated hooks (it might break something if removed) +## ^^ will probably make people who look at this comment feel good +## about our scripting pratices.. (i would be pleasantly surprised +## if someone actually notices) ^on ^switch_channels * {^getusers} ^on #-switch_windows 43 * { xeval -s $winserv($3) ^getusers -} - +} +## more obfuscated crap ^on #-353 2 * {^getusers} ^on #-channel_sync 23 * {^getusers} -^on #-join 33 * {^getusers;} -^on #-leave 44 * {^getusers;} -^on #-kick 66 * {^getusers} oof diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Wed Jan 25 10:24:13 2006 +++ amn/core/sets.m Thu Feb 9 12:13:12 2006 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[4] +@rel_id=[5] @a.rel=[1.3d r/$rel_id] @a.date=[20051202] @_ss=[15] diff -aruN amn.orig/mod.defaults amn/mod.defaults --- amn.orig/mod.defaults Fri Sep 16 17:16:10 2005 +++ amn/mod.defaults Thu Feb 9 12:11:29 2006 @@ -1,9 +1,8 @@ @mods.1=[abot] @mods.2=[away] @mods.3=[dict] -@mods.4=[mjoin] -@mods.5=[netsplit] -@mods.6=[oper] -@mods.7=[orignick] -@mods.8=[relay] -@mods.9=[tab] +@mods.4=[netsplit] +@mods.5=[oper] +@mods.6=[orignick] +@mods.7=[relay] +@mods.8=[tab] diff -aruN amn.orig/modules/clones/clones.m amn/modules/clones/clones.m --- amn.orig/modules/clones/clones.m Sun Jan 8 15:55:37 2006 +++ amn/modules/clones/clones.m Wed Dec 31 19:00:00 1969 @@ -1,35 +0,0 @@ -# Copyright (c) 2003-2006 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. -# taken from cypress //zak -subpackage clones - -alias getclones { - @ delarray(clones) - @ setitem(clones 0) - ^local chan, people, check, ii, jj, i - @ chan = ![$0]?C:match($0 $mychannels())?[$0]:C, people = chanusers($chan) - - fe ($people) ii { - fe ($people) jj { - if ((ii!=jj) && (after(@ $userhost($ii))==after(@ $userhost($jj)))) { - if (matchitem(clones $jj)==-2) { - @ setitem(clones $numitems(clones) $jj) - } - } - } - } - @ function_return =chan - - -} -alias clones { - ^local chan - @chan= getclones($*) - xecho $acban clones on $chan: [${numitems(clones)-1} total..] - for (@ i=1,i%F$(hblk)\[$(cyn)win$(mag)\($(cl)%R$(mag)\)$(hblk)\] 50ͼ ^set status_hold $(mag)\($(cl)hold$(mag)\) ^set status_hold_lines $(hblk)\[$(cl)%B$(mag)/$(cyn)hold$(hblk)\] -^set status_insert $(mag)\($(cl)ins$(mag)\) ^set status_mail $(hblk)\[$(cl)%M$(mag)/$(cyn)mail$(hblk)\] ^set status_mode $(mag)\($(hwht)+$(cl)%+$(mag)\) ^set status_nickname $(cyn)%N$(cl) Date: Mon, 13 Feb 2006 22:17:02 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: CHANGES core/compat.m Log message: -add better reconnect script from epic5/scripts dir, please test also will add documentation for it's usage later. view core/compat.m for reference. ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Thu Feb 9 12:28:03 2006 +++ amn/CHANGES Mon Feb 13 22:14:41 2006 @@ -111,3 +111,7 @@ -remove status_insert* from stat.14 hopefully fixes breakage against some other statbars. //zak -bump up minor ver (5) //zak + +2.13.06 +-add better reconnect script from epic5/scripts dir. /network + will add documentation for it's usage later. //zak diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Thu Feb 9 12:18:31 2006 +++ amn/amn.epic Mon Feb 13 22:03:55 2006 @@ -86,7 +86,7 @@ addset history_save_position bool addset history_timestamp bool addset auto_reconnect bool -addset auto_reconnect_delay int +addset reconnect_time int xaddset num_of_whowas int xaddset show_end_of_msgs bool xaddset show_who_hopcount bool diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Wed Feb 8 19:01:10 2006 +++ amn/core/compat.m Mon Feb 13 22:02:40 2006 @@ -266,16 +266,144 @@ }; }; -## nasty hack at making a auto-reconnect //zak -^on #-server_lost 18 "*" { - if (getset(auto_reconnect) == [on]) { - if ((:delay = getset(auto_reconnect_delay)) > 0) { - timer -w $winnum() $delay server +; - } else { - defer server +; - }; - }; -}; +## much improved reconnect script taken from epic5/scripts dir + +alias network (action, network) { + switch ($action) { + (add) { + if (network != []) { + fec ($network) i { + if (!isalpha($i)) { + echo syntax error: network name must be only alpha + return + } + } + if (reconn[groups][$network]) { + echo network $network already exists + } else { + @ reconn[groups][$network] = 1 + echo network $network added + } + } else { + echo not enough params. syntax: /network add + } + } + (del) { + if (network != []) { + if (reconn[groups][$network]) { + ^assign -reconn.groups.$network + ^assign -reconn.channels.$network + echo network $network removed + } else { + echo network $network doesn't exist + } + } else { + echo not enough params. syntax: /network del + } + } + (list) { + @ :j = 0 + foreach reconn.groups i { + @ j++ + echo $i + } + if (j == 0) { + echo no networks + } + } + (*) { + echo syntax: /network [[add|del ]|list] + } + } +} +on #-SERVER_STATUS 27 "% % %" { + switch ($2) { + (EOF) (ERROR) { + @ :gr = servergroup($0) + if (reconn[groups][$gr]) { + if ([$1] == [ACTIVE]) { + @ reconn[channels][$gr] = mychannels($0) + } + @ reconn[timeout][$gr] = [$getset(reconnect_time) $0] + } + } + (ACTIVE) { + @ :gr = servergroup($0) + if (reconn[channels][$gr] != []) { + fe ($reconn[channels][$gr]) i { + xeval -s $0 JOIN $i + } + ^assign -reconn.channels.$gr + } + } + (*) { + if ([$3] == [CLOSING] && [$2] != [EOF] && [$2] != [ERROR]) { + @ :gr = servergroup($0) + ^assign -reconn.timeout.$gr + ^assign -reconn.channels.$gr + } + } + } +} +timer -ref _reconn -repeat -1 -GENERAL 60 _reconn +alias _reconn { + foreach reconn.timeout i { + @ :minleft = word(0 $reconn[timeout][$i]) + @ :lastsv = word(1 $reconn[timeout][$i]) + @ minleft-- + if (minleft > 0) { + @ reconn[timeout][$i] = [$minleft $lastsv] + } else { + ^ASSIGN -reconn.timeout.$i + @ :found = [] + fe ($winrefs()) win { + if (winserv($win) == lastsv) { + PUSH found $win + } + } + if (found != []) { + @ :next = nextserv($lastsv) + if (next != -1) { + fe ($found) j { + window refnum $j SERVER $next + } + } + } + } + } +} +alias nextserv (ref) { + @ :gr = servergroup($ref) + if (gr == []) { + return -1 + } + @ :servers = serverctl(GMATCH $gr) + @ :num = numwords($servers) + if (num == 0) { + return -1 + } + if (num == 1) { + return $word(0 $servers) + } + @ :found = -1 + @ :idx = 0 + fe ($servers) i { + if (i == ref) { + @ found = idx + break + } + @ idx++ + } + if (found == -1) { + return -1 + } + @ num-- + if (num == found) { + return $word(0 $servers) + } else { + return $word(${found+1} $servers) + } +} #things below are just various things taken from the epic5/scripts source dir #to make this script compatable with epic5 without needing to use the builtins diff -aruN amn.orig/settings.default amn/settings.default --- amn.orig/settings.default Wed Feb 8 19:23:40 2006 +++ amn/settings.default Mon Feb 13 22:05:14 2006 @@ -11,6 +11,7 @@ set auto_whowas on set indent off set mangle_logfiles all +set reconnect_time 5 set suppress_server_motd off set show_who_hopcount on set show_channel_names off Date: Mon, 20 Feb 2006 19:22:33 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: CHANGES TODO-BUGS amn.epic settings.default core/compat.m core/save.m docs/E5-KNOWNBUGS docs/sample.epicrc themes/nocturnal.th Removed Files: docs/UPGRADE.old docs/sample.amnrc Log message: -various cleanups/and probably screwups of helpfiles/docs -re-add my old auto_reconnect hack it's my old way of doing it and i know it works, since no one feedback me on the newer auto_reconnect both will stay for now, pick your poison. -update my nocturnal theme -add various sets while allowing /save to overide the default 3 things of mention lastlog/scrollback in stock epic is 756/256 i beleive i increased the default values to 1000/1000 this will make a slight increase of ram usage apx 2MB more on most OS /set clock_24hour is enabled per default i think most of our userbase uses this per default anyways if you do not like this timeset /set clock_24hour off /save to revert to the old way. -NOTE: users please test the snapshot and report any bugs back as we're soon to probably be near another release, any volunteers to help with documentation? as usual http://amnesiac.ircii.org/ac-snap.tgz to grab the latest snapshot this commit is already synched to to www. ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Feb 13 22:14:41 2006 +++ amn/CHANGES Mon Feb 20 19:03:37 2006 @@ -115,3 +115,15 @@ 2.13.06 -add better reconnect script from epic5/scripts dir. /network will add documentation for it's usage later. //zak + +2.20.06 +-re-add my old auto_reconnect hack since no one tested the 'newer /network' + reconnect(at least i know mine works for me but it's not for the faint of + heart) //zak +-update my current theme to my liking nocturnal //zak +-add default sets for scrollback/lastlog of 1000 *gulp* NOTE: this will use + apx 8MB/ram when full depending on the OS //zak +-add default change of clock to 24hour //zak +-add /set lastlog /set scrollback /set clock_24hour to save settings /save + /setsave //zak +-resync some docs //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Thu Feb 9 12:35:55 2006 +++ amn/TODO-BUGS Mon Feb 20 19:04:50 2006 @@ -8,7 +8,8 @@ ? = undecided/closed votes. ## bugs. -NONE. +/tsave when using different manually set /sbcolor seems to break some +statbars /adump manually using the /saved sets is a workaround. ## some bugs listed below.(not a huge priority for fixing) $ /bwk does not show if the word is a kick or bwk after reloading. however @@ -17,7 +18,6 @@ (will fix someday) ## higher priority todo. (stuff that needs to done before upcoming release) -@ some possible easy(unlikely) way of being able to /save most common /sets? @ patterns/something still seems screwy from time to time with so-called 'ghost nicks showing up in the channel fix?/pattern issue? ircd issue? @ cleanup the silly ugly usages of stupid arrays in color.m diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Mon Feb 13 22:03:55 2006 +++ amn/amn.epic Mon Feb 20 18:44:13 2006 @@ -80,6 +80,8 @@ ## this only seems to work in the pf loader //kreca addset auto_rejoin bool addset auto_rejoin_delay int +addset auto_reconnect_delay int +addset reconnect_time int addset history_circleq bool addset history_save_file str addset history_remove_dupes bool diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Mon Feb 13 22:02:40 2006 +++ amn/core/compat.m Mon Feb 20 18:45:23 2006 @@ -266,6 +266,17 @@ }; }; +## nasty hack at making a auto-reconnect //zak +^on #-server_lost 18 "*" { + if (getset(auto_reconnect) == [on]) { + if ((:delay = getset(auto_reconnect_delay)) > 0) { + timer -w $winnum() $delay server +; + } else { + defer server +; + }; + }; +}; + ## much improved reconnect script taken from epic5/scripts dir alias network (action, network) { diff -aruN amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Wed Feb 8 18:30:11 2006 +++ amn/core/save.m Mon Feb 20 19:01:43 2006 @@ -57,7 +57,7 @@ } alias setsave { - @:allsets = [history_circleq high_bit_esc dcc_sliding_window dcc_timeout auto_rejoin auto_rejoin_delay num_of_whowas auto_whowas indent mangle_logfiles suppress_server_motd show_who_hopcount show_channel_names mode_stripper client_information user_information notify_on_termination new_server_lastlog_level switch_channels_between_windows word_break] + @:allsets = [history_circleq high_bit_esc dcc_sliding_window dcc_timeout auto_rejoin auto_rejoin_delay num_of_whowas auto_whowas indent mangle_logfiles suppress_server_motd show_who_hopcount show_channel_names mode_stripper clock_24hour client_information user_information notify_on_termination new_server_lastlog_level lastlog scrollback switch_channels_between_windows word_break] @rename($(savepath)$setsavefile $(savepath)$setsavefile~) @savemt = open($(savepath)$setsavefile W T) diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Sun Jan 8 16:10:56 2006 +++ amn/docs/E5-KNOWNBUGS Mon Feb 20 18:36:34 2006 @@ -2,7 +2,7 @@ KNOWN ERRATA (eg, bugs, or unresolved requests): ------------------------------------------------ -[none] +* Handling keypresses should overrule protocol enforcement (on_notice, etc) LOOK FOR IN THE FUTURE ----------------------- diff -aruN amn.orig/docs/UPGRADE amn/docs/UPGRADE --- amn.orig/docs/UPGRADE Wed Jan 11 04:25:45 2006 +++ amn/docs/UPGRADE Mon Feb 20 19:07:23 2006 @@ -8,10 +8,8 @@ about their irc client uptimes *ahem*) ## upgrade info -## 1.2 to 1.3* (in theory) +## 1.3 to 1.3d* (in theory) rm -rf /path/to/amn -rm -rf ~/.amn/ -^^ can leave channel/shitlist/bwk/friends savefiles remove all others. tar zxvf newver.tgz (in your home dir or dir you want it) or tar zxvf newver.tgz -C /path/to/where/you/want/it diff -aruN amn.orig/docs/UPGRADE.old amn/docs/UPGRADE.old --- amn.orig/docs/UPGRADE.old Thu Sep 1 07:55:00 2005 +++ amn/docs/UPGRADE.old Wed Dec 31 19:00:00 1969 @@ -1,136 +0,0 @@ -/* this file will not be updated anymore, and will be removed in the near - future. //zak */ - -READ THIS READ THIS READ THIS HAVE YOU READ THIS COMMENT YES? YES?? HELLO? -/* NOTE: this is for older alpha release of amnesiac. please see the UPGRADE - file in amn/UPGRADE of which you should read this here is mainly here for - informational purposes. */ - -## info. -here i will note from time to time on the 'upgrade' howto, for the changes -you need to make or remove to update without restarting your client using -/adump. first off in order to use adump you must have an ~/.epicrc which -loads your amn.epic from somewhere(since amnesiac does not have to be -placed in ~/amn it could be in ~/irc/amnesiac/ or whatever. and savefiles -will always go in ~/.amn now we got that covered. let's move on. -(this is not for the faint of heart this is for people who have a big ego -about their irc client uptimes *ahem*) - -## file changes to update. - -::cvs-1 to cvs2 -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -then type /adump in the irc client. - -::cvs-1/2 to cvs-3 -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -then type /adump in the irc client. - -::cvs-1/2/3/4 to cvs 5 -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -then /adump - provided you updated your epicrc to ~/amn/amn.epic -::this is very theoretical due to how the modules have been redone, -::(it worked for me but use at your own risk!) for cvs/6 - -::all to cvs/6 -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -then /adump - -::all to cvs-7. (in theory) -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -rm -rf ~/.amn/.a.fsetsave -rm -rf ~/.amn/.a.fsave -then /adump - -::all to cvs-8. (in theory) -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -rm -rf ~/.amn/.a.fsetsave -rm -rf ~/.amn/.a.fsave -then /adump - -::all to cvs-9. (in theory) -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -rm -rf ~/.amn/.a.fsetsave -rm -rf ~/.amn/.a.fsave -then /adump - -::cvs-8/9 to cvs-10 (in theory) -rm -rf ~/.amn/.mod.save -then /adump - -<=8 to cvs-10. (in theory) -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -rm -rf ~/.amn/.a.fsetsave -rm -rf ~/.amn/.a.fsave -then /adump - -::cvs-8/9/10 to cvs-11g (in theory) -rm -rf ~/.amn/.mod.save -then /adump - -::<=8 to cvs-11g (in theory) -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -rm -rf ~/.amn/.a.fsetsave -rm -rf ~/.amn/.a.fsave -then /adump - -::cvs-8/9/10/11 to cvs-12g. (in theory) -rm -rf ~/.amn/.mod.save -then /adump - -::<=8 to cvs-12g. -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -rm -rf ~/.amn/.a.fsetsave -rm -rf ~/.amn/.a.fsave -then /adump - -::cvs-8/9/10/11/12 to cvs13g (in theory) -rm -rf /path/to/amn -rm -rf ~/.amn/.mod.save -then /adump - -::<=8 to cvs-13g. -rm -rf /path/to/amn -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -rm -rf ~/.amn/.a.fsetsave -rm -rf ~/.amn/.a.fsave -then /adump - -::cvs-8/9/10/11/12 to cvs14 (in theory) -rm -rf /path/to/amn -rm -rf ~/.amn/.mod.save -then /adump - -::<=8 to cvs-14. -rm -rf /path/to/amn -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.save -rm -rf ~/.amn/.a.fsetsave -rm -rf ~/.amn/.a.fsave -then /adump - -::cvs-8/9/10/11/12 to cvs14s (in theory) -rm -rf /path/to/amn -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.fsetsave -then /adump - -::cvs-8/9/10/11/12 to 1.1d/p* -rm -rf /path/to/amn -rm -rf ~/.amn/.mod.save -rm -rf ~/.amn/.a.csave -rm -rf ~/.amn/.a.fsave -rm -rf ~/.amn/.a.fsetsave -rm -rf ~/.amn/.a.save -then /adump diff -aruN amn.orig/docs/sample.amnrc amn/docs/sample.amnrc --- amn.orig/docs/sample.amnrc Wed Jan 25 08:17:46 2006 +++ amn/docs/sample.amnrc Wed Dec 31 19:00:00 1969 @@ -1,9 +0,0 @@ -## sample ~/.amnrc file to prevent amnesiac from overriding your -## customized settings. -set history_circleq off -set dcc_sliding_window 512 -set auto_rejoin off -set auto_rejoin_delay 10 -set num_of_whowas 1 -set no_control_log on -set beep on diff -aruN amn.orig/docs/sample.epicrc amn/docs/sample.epicrc --- amn.orig/docs/sample.epicrc Wed Jan 25 08:19:13 2006 +++ amn/docs/sample.epicrc Mon Feb 20 19:05:40 2006 @@ -6,27 +6,15 @@ # # To use this file, simply copy it to ~/.epicrc or ~/.ircrc -# add your sets here. as they are not saved with /save -# some example sets are listed here that ppl might want to adjust. -# uncomment the ones that are commented to use them you may change -# the values of the commented/uncommented options. +# Not all /sets need to be be added here anymore as most common modified sets +# get saved on /save /setsave see amn/settings.default for commonly saved +# /sets. -# NOTE: lastlog/scrollback can eat up a lot of ram, so so arbitrarily large -# values should be avoided on restricted shell accounts or boxes with low -# amount of ram to waste. having both lastlog and scrollback set to 1024 -# eats up to about 10-15mb of ram, depending on the OS and how well the random -# stack is. i use 2500/1024 myself which is about 30MB/30MB on OpenBSD. - #set DCC_STORE_PATH ~/porn <-- isn't that all ppl transfer on irc anyways? #set DCC_USE_GATEWAY_ADDR ON -#set LASTLOG 1024 -#set SCROLLBACK 1024 #set LOAD_PATH ~/.epic:~/.irc:/usr/local/share/epic5//script:. -#set REALNAME seymour butts -set BEEP OFF -set CLOCK_24HOUR ON +set REALNAME seymour butts set NO_FAIL_DISCONNECT ON -set NO_CONTROL_LOG ON # Load amnesiac on client startup. load ~/amn/amn.epic diff -aruN amn.orig/settings.default amn/settings.default --- amn.orig/settings.default Mon Feb 13 22:05:14 2006 +++ amn/settings.default Mon Feb 20 19:01:17 2006 @@ -3,10 +3,13 @@ set history_circleq on set high_bit_esc 0 set -continued_line +set clock_24hour on set dcc_sliding_window 1024 set dcc_timeout 600 set auto_rejoin off set auto_rejoin_delay 5 +set lastlog 1000 +set scrollback 1000 set num_of_whowas 2 set auto_whowas on set indent off diff -aruN amn.orig/themes/nocturnal.th amn/themes/nocturnal.th --- amn.orig/themes/nocturnal.th Fri Dec 2 02:52:47 2005 +++ amn/themes/nocturnal.th Mon Feb 20 18:31:28 2006 @@ -1,44 +1,44 @@ :crapple +:crapple :nocturnal -:nocturnal @auth=[crapple] -@desc=[nocturnal] +@desc=[crapple] @name=[nocturnal] -@scdesc=[\(nocturnal\)] -@mform=41 -@smform=54 -@pubform=5 -@spubform=15 -@spuboform=8 -@pubnotform=1 -@signform=4 -@joinform=17 +@scdesc=[\(crapple\)] +@mform=[41] +@smform=[54] +@pubform=[5] +@spubform=[15] +@spuboform=[8] +@pubnotform=[1] +@signform=[4] +@joinform=[17] @leaveform=[15] @kickform=[1] -@modeform=1 -@notform=19 -@snotform=5 -@sdcform=20 -@dcform=5 -@topform=4 -@notopform=4 -@settopform=4 -@topbyform=4 -@ctcpform=3 -@sctcpform=8 -@echostr=45 -@ncomp=15 -@svform=4 -@snf=3 +@modeform=[1] +@notform=[19] +@snotform=[5] +@sdcform=[25] +@dcform=[25] +@topform=[4] +@notopform=[4] +@settopform=[4] +@topbyform=[4] +@ctcpform=[3] +@sctcpform=[8] +@echostr=[45] +@ncomp=[15] +@svform=[4] +@snf=[3] @wallform = [4] -@bwallform=4 -@awayform=9 -@actform=2 -@actform=2 -@descform=2 -@sdescform=2 -@actform=2 -@statbar=[stat.12] +@bwallform=[4] +@awayform=[9] +@actform=[2] +@actform=[2] +@descform=[2] +@sdescform=[2] +@actform=[2] +@statbar=[stat.14] @timeform=[11] @_whois=[3] @c1=[ @@ -46,8 +46,8 @@ @c3=[ @c4=[ @c5=[ -@sc1=[ -@sc2=[ -@sc3=[ -@sc4=[ +@sc1=[] +@sc2=[] +@sc3=[] +@sc4=[] @acban=[[a+c]] Date: Sat, 25 Feb 2006 21:59:11 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: CHANGES TODO-BUGS docs/UPGRADE core/compat.m core/alias.m core/hooks.m core/sets.m core/update.m Log message: -cleanups of UPGRADE and it's methods. -new upgrade commands /gnsap /usnap /upgrade /fupgrade see docs/UPGRADE -rename /beep to /tbeep (beep toggle) to stop interfering with our re-added epic5 /beep support /set beep on /set beep_on_msgs all is now known to work feedback from klepto thanks! -increment silencing of other ppl's away to 260 instead of 120 for us slackers who are usually slow to respond. -sync TODO-BUGS to reality, remove some old projects done <-- there are things listed that needs to be done before our release, wakeup kreca and skullY ;p -increment minor ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Feb 20 19:03:37 2006 +++ amn/CHANGES Sat Feb 25 21:49:28 2006 @@ -127,3 +127,15 @@ -add /set lastlog /set scrollback /set clock_24hour to save settings /save /setsave //zak -resync some docs //zak + +2.25.06 +-rename /beep /tbeep (interferes with re-addition of beep from builtins) + /set beep on; /set beep_on_msg all works/verified by klepto thanks! //zak +-sync our TODO-BUGS a bit more, removed some finished projects info //zak + ^^ Come on guys we need to get the todo's done before our release. +-increase our away silencing time to 260 instead of 120, for some of us who + delay our response cause of 'distraction' i.e me //zak +-add /upgrade, /fupgrade please see docs/UPGRADE before attempting + ^^ much improved ease of use for upgrading the script cleanup UPGRADE doc + while in the general area as well //zak +-increment minor //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Mon Feb 20 19:04:50 2006 +++ amn/TODO-BUGS Sat Feb 25 21:50:31 2006 @@ -8,8 +8,8 @@ ? = undecided/closed votes. ## bugs. -/tsave when using different manually set /sbcolor seems to break some -statbars /adump manually using the /saved sets is a workaround. +$ /tsave when using different manually set /sbcolor seems to break some + statbars /adump manually using the /saved sets is a workaround. ## some bugs listed below.(not a huge priority for fixing) $ /bwk does not show if the word is a kick or bwk after reloading. however @@ -25,13 +25,14 @@ @ make * wildcard actually work in /trickle @ add some topwin module, kreca has to start a discussion about some topwin script he might have permission for us to use/modify/rip ;) +@ /kick should be able to parse multiple requests i.e /kick nick1,nick2 +@ look more into our new /upgrade features may need more improvements/ideas. ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. -@ a better auto-reconnect idea, the somewhat refixed auto-reconnect - might be a bit more reliable/stable, but still a hack nonetheless. @ bindshelp menu explaining our default binded functs. + @ cid help menu about efnet's umode +g. @ Get some variables from numeric 005 so we can finetune some displays? @@ -54,117 +55,25 @@ i have never heard of a request for this module nor have i heard a single complaint about it working or not working perhaps a vote? + ## bugs fixed. / projects done. 1.25.06 - my first ever mistake, kreca was actually innocent for once //zak ! /ignsave seems kinda borked at times or something, probably another krecaism. -11.28.05 - kreca finally figured out a fix/workaround see CHANGES. //kreca -! when using inline colors on public formats ie; (BcrappleB) will show - up right, but if modeshow/extpub is enabled (@crapple) won't have inline - colors. it'll show up as probably colorized brackets and modeshow format - colors. but not inline nick colors. found by adam. thanks!. - 11.28.05 - just needs a hook.. kreca will finish the rest of it soon. //zak ! parse notify of you being umode +g when a person msg's you.. -11.28.05 - tried tested and true! finally works this time around. //zak -! check to see if fkeys.m does need more @ bindctl usage in the future. - (finished the todo of adding the @bindctl to do.fkey's alias) //zak - it broke as i released cvs13g backed out changes until later //zak. - 11.28.05 - finished by adding /bkn /bkh etc... //zak ! A way to specify ban types on a per-ban basis. Either /bkn, /bkh, etc or a flag to /kb? -11.16.05 - i think kreca fixed this a week ago.. -! fix up arrays regarding description/publics /format x y z etc... - seems to be some confusion and not outputting backgrounded channels - on most available formats and other weirdness. - -11.08.05 -! make away only output irritating static only once, 120 second idle timeout - fixed by kreca. - -10.10.05 - fixed thanks to skully to use the more portable DCC_RAW! //skullY -! /dict word, doesn't explictly close telnet in the background on some - OS's. resulting in a nice spiked race condition. mebe need to add a kill -9? - -10.1.05 - finished thanks to kreca getting off his slackass //zak/kreca. -! make a toggle for whether we want window double on/off so we don't - hardcode /wc /wj etc.. to window double per default. - -9.18.05 - finished. /dcchelp for info //zak -! make a dcc help menu. - -9.16.05 - fixed a bug with kickform not existing per default. //zak -! kickform default used to echo the kick not showing an actual format - this was a problem for several development releases it should now - be fixed without requiring one to set one in /format 4. - -9.9.05 - good enough for now. will make /relm -l in the future. //zak -! added a /rel alias see /rhelp or /ehelp for more info on this. - and the CHANGES. might not be exactly to xaviers satisfaction. - add a /relm -l alias to redirect to relm for dumb bitchx users. - 9/2/05 finally done this bit, /addbwk for the syntax or /bwhelp. //kreca. ! toggle for kickban or just kick for the bwk module. -9/2/05 done and cleaned up the hard coded default of on. //kreca -! add toggle for notify logging types; on/off signon/signoffs. - -9/2/05 fixed now. //zak -! format timestamps which uses seconds do not update time. - -9/2/05 fixed but still needs something better in the future. //zak -! when doing /q x-somenick if the nick has the - in it breaks /query - -8/30/05 - no longer reproduceable? //zak -! kreca asked me to add this addition to the TODO file i presume this - means he might actually do more ;( - -> [kreca_(dcc)] kreca fix dccme - -> [kreca_(dcc)] to output to the right window - -8/30/05 - this seems to possibly be fixed now. hopefully. //zak -! /me from another nick if in a query doesn't always output to the right - window it may be said in a query when it was meant for channel. - -8/30/05 yay finally fixed by kreca... //zak. -! delword # does not work. workaround... /delword word #channel - should make it so one can do /delword #. else what's the point of - having the numerics there? - -8/30/05 - has been verified and indeedy it works and as annoying as - before! //zak -! test to verify some of the confusing hooks in various parts of the tree - regarding the unbanself protection i have never tested the sprot module - or know if it works... i don't even know if anyone uses it. - -8/12/05 should be fixed now. hopefully we do not need to enable old_math -compatability anymore. everyone please test all functions!. -! need to redo the formats stuff somewhere or possibly arrays(*gulp*) - for the new_math parser. -^^also fix anything else regarding breakage to the new math. (grumble) - 8/7/05 doesn't look like this is needed move to here votes closed. //zak - maybe? for - glines... <@skullY> you could if ([$0]==[y] || [$0]==[yes]) //vote? - -8/7/05 pretty much happy with where this is at now... //zak -! Redo /ahelp fucking ugly. //any sucke^H^H^Hnice volunteers? - -7/30/05 fixed/relm/paste/relwm etc.. can now be outputted to an active - window see changelog. //zak -! pmsg broke, fucks up client, /paste should output to current window - and or query/msg etc.. and get rid of /pmsg altogether would be nice. - (hop is planning on making a shit output to current window not just chan - in the near future...however we should have some temp fix until then) - -8/6/05 fixed one night by accident when totally trashed on alcohol it - was such a hard fix too /eval set word_break $strip(. $word_break) kreca - should be ashamed of himself. //zak (apparently not proper fix just a hack) -! make sure when urls are broken, dont leave two extra spaces between - this might be impossible to do since it's controlled by epic //kreca and of course! UNSURPRISING BUG FIXES. diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Wed Feb 8 18:59:54 2006 +++ amn/core/alias.m Sat Feb 25 20:23:43 2006 @@ -98,7 +98,7 @@ alias aww {set auto_whowas toggle} alias cmd {set command_chars $*} alias debug {set debug $*} -alias beep {set beep toggle} +alias tbeep {set beep toggle} alias lls {set lastlog $*} alias mirc {set mirc_broken_resume toggle} alias ircname {set realname $*} diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Mon Feb 20 18:45:23 2006 +++ amn/core/compat.m Sat Feb 25 20:36:07 2006 @@ -278,6 +278,7 @@ }; ## much improved reconnect script taken from epic5/scripts dir +## untested. -Zak alias network (action, network) { switch ($action) { diff -aruN amn.orig/core/hooks.m amn/core/hooks.m --- amn.orig/core/hooks.m Wed Jan 25 08:32:59 2006 +++ amn/core/hooks.m Sat Feb 25 20:37:07 2006 @@ -23,7 +23,7 @@ xecho $fparse(format_whois_away $1-) @:itemno=numitems(away_users) @setitem(away_users $itemno $0) - } else if (time() - getitem(away_users_ts $itemno) > 120) { + } else if (time() - getitem(away_users_ts $itemno) > 260) { xecho $fparse(format_whois_away $1-) } @setitem(away_users_ts $itemno $time()) diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Thu Feb 9 12:13:12 2006 +++ amn/core/sets.m Sat Feb 25 20:38:38 2006 @@ -39,7 +39,7 @@ @awayl=[on] @awayr=[Not Here] @a.ver=[amnesiac] -@rel_id=[5] +@rel_id=[6] @a.rel=[1.3d r/$rel_id] @a.date=[20051202] @_ss=[15] diff -aruN amn.orig/core/update.m amn/core/update.m --- amn.orig/core/update.m Sun Jan 8 16:03:59 2006 +++ amn/core/update.m Sat Feb 25 21:42:57 2006 @@ -41,3 +41,38 @@ ^sip2 } } + +## force/simple 'upgrade' from really old versions. (adv users only) +alias upgrade { + ^exec rm -rf $(savepath).a.save* + ^exec rm -rf $(savepath).a.csave* + ^exec rm -rf $(savepath).a.fsave* + ^exec rm -rf $(savepath).a.fsetsave* + ^exec rm -rf $(savepath).mod.save* + ^exec rm -rf $(savepath).a.settings* + xecho [a+c] core savefiles purged /adump to reload +} +alias fupgrade { + ^exec rm -rf $(savepath).a.save* + ^exec rm -rf $(savepath).a.csave* + ^exec rm -rf $(savepath).a.fsave* + ^exec rm -rf $(savepath).a.fsetsave* + ^exec rm -rf $(savepath).mod.save* + ^exec rm -rf $(savepath).a.settings* + ^exec rm -rf $(savepath).a.notify.save* + xecho [a+c] purged common savefiles... restarting amnesiac defaults + dump all;fe ($getarrays()) n1 {@delarray($n1)};unload * fe;load ~/.epicrc +} + +alias gsnap { + xecho [a+c] attempting to get latest snapshot + xecho [a+c] file will be saved to ~/ac-snap.tgz + exec wget -nv http://amnesiac.ircii.org/ac-snap.tgz +} + +alias usnap { + xecho [a+c] attempting to update ~/amn + ^exec rm -rf ~/amn + ^exec tar zxf ~/ac-snap.tgz + xecho [a+c] current snapshot ready... /adump to load +} diff -aruN amn.orig/docs/UPGRADE amn/docs/UPGRADE --- amn.orig/docs/UPGRADE Mon Feb 20 19:07:23 2006 +++ amn/docs/UPGRADE Sat Feb 25 21:48:11 2006 @@ -1,18 +1,55 @@ -here i will note from time to time on the 'upgrade' howto, for the changes -you need to make or remove to update without restarting your client using -/adump. first off in order to use adump you must have an ~/.epicrc which -loads your amn.epic from somewhere(since amnesiac does not have to be -placed in ~/amn it could be in ~/irc/amnesiac/ or whatever. and savefiles -will always go in ~/.amn now we got that covered. let's move on. -(this is not for the faint of heart this is for people who have a big ego -about their irc client uptimes *ahem*) +Warning the following may screw up your script, remove precious savefiles or +render the client unusable, you have been warned. -## upgrade info +Commands of use. +/gsnap (grabs latest snapshot) <- requires wget installed. +/usnap (updates ~/amn after one does /gsnap... UNTESTED) +/adump (restarts/reloads the script) +/upgrade (removes common non-backwards compatable savefiles) +/fupgrade (removes extra common non-backwards comptable savefiles; auto + reloads the script to defaults) + +Before you can use the above commands you must have an ~/.epicrc that may +look something like the following example +21:08:09>zak@nocturnal:zak 5:0> cat .epicrc +/load ~/amn/amn.epic + +## /adump info and why. +/adump is more of a scripters command, there are various usages of this cmd, +i.e when playing with /sets and or formats/sbars etc.. something went wrong +/adump will dump and reload/configure the script from it's last /save position +(basically last working config before it got messed up) + +## /gnsap info. +Note: requires wget installed in theory it should save to your current home + directory as ac-snap.tgz +when the file is fetched.. you should see something like this. +21:40:49 URL:http://amnesiac.ircii.org/ac-snap.tgz [178779/178779] +-> "ac-snap.tgz" [1] + +## /upgrade /fupgrade info +/upgrade will remove common savefiles but will not reload the script until +you tell it to i.e /adump there are various usages for this. + +/fupgrade will remove extra common savefiles dump and reload the script to +defaults. + +## Upgrading from various version info. ## 1.3 to 1.3d* (in theory) rm -rf /path/to/amn -tar zxvf newver.tgz (in your home dir or dir you want it) +tar zxf newver.tgz (in your home dir or dir you want it) or -tar zxvf newver.tgz -C /path/to/where/you/want/it -lastly +tar zxf newver.tgz -C /path/to/where/you/want/it /adump (in the client) + +## Upgrading from 1.1x 1.2x to 1.3d +rm -rf /path/to/amn +tar zxf newver.tgz (in your home dir or dir you want it) +or +tar zxf newver.tgz -C /path/to/where/you/want/it + +/adump +/fupgrade + +done. Date: Tue, 28 Feb 2006 02:56:07 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: CHANGES TODO-BUGS core/channel.m Log message: -/kick nick1,nick2 now works, done by kreca comitted by me ;p ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sat Feb 25 21:49:28 2006 +++ amn/CHANGES Tue Feb 28 02:53:40 2006 @@ -139,3 +139,6 @@ ^^ much improved ease of use for upgrading the script cleanup UPGRADE doc while in the general area as well //zak -increment minor //zak + +2.28.06 +-/kick nick1,nick2,etc - support - requested by klepto, writen by kreca //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Sat Feb 25 21:50:31 2006 +++ amn/TODO-BUGS Tue Feb 28 02:51:09 2006 @@ -25,8 +25,6 @@ @ make * wildcard actually work in /trickle @ add some topwin module, kreca has to start a discussion about some topwin script he might have permission for us to use/modify/rip ;) -@ /kick should be able to parse multiple requests i.e /kick nick1,nick2 -@ look more into our new /upgrade features may need more improvements/ideas. ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. @@ -57,6 +55,9 @@ ## bugs fixed. / projects done. +2.28.05 - /kick nick1,nick2 support, written by kreca. //zak +! /kick should be able to parse multiple requests i.e /kick nick1,nick2 + 1.25.06 - my first ever mistake, kreca was actually innocent for once //zak ! /ignsave seems kinda borked at times or something, probably another krecaism. diff -aruN amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Wed Jan 25 10:02:58 2006 +++ amn/core/channel.m Tue Feb 28 02:49:16 2006 @@ -113,15 +113,22 @@ } alias kick { - if (numwords($*) == 0) { - xecho -b Usage: /KICK [reason]; - return - } - if ( numwords($*) < 2) { - //kick $C $0 $randread($(loadpath)kick.reasons) - }{ - //kick $C $0 $1- + if (ischannel($0) ) { + @:target=[$0] + @:people=[$1] + @:reason=[$2-] + } { + @:target=[$C] + @:people=[$0] + @:reason=[$1-] } + + if (numwords($reason) == 0 ) { + @:reason=randread($(loadpath)kick.reasons) + } + + fe ($split(, $people)) cur { //kick $target $cur $reason } + } alias 4op { From: Kreca Date: Sun, 5 Mar 2006 02:01:09 +0100 (CET) Fix stupid bug in tsave. Modified files amn/themes amn/core/theme.m amn/core amn/CHANGES amn diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES 2006-02-28 07:53:40.000000000 +0000 +++ amn/CHANGES 2006-03-05 01:59:01.000000000 +0000 @@ -142,3 +142,6 @@ 2.28.06 -/kick nick1,nick2,etc - support - requested by klepto, writen by kreca //zak + +3.04.06 +-fix a bug in tsave which saved sbar colours incorrectly //kreca diff -aruN amn.orig/core/theme.m amn/core/theme.m --- amn.orig/core/theme.m 2006-01-24 10:31:44.000000000 +0000 +++ amn/core/theme.m 2006-03-05 01:58:11.000000000 +0000 @@ -62,10 +62,10 @@ @ write($saveth @c3=[$c3) @ write($saveth @c4=[$c4) @ write($saveth @c5=[$c5) - @ write($saveth @sc1=[$sc1]) - @ write($saveth @sc2=[$sc2]) - @ write($saveth @sc3=[$sc3]) - @ write($saveth @sc4=[$sc4]) + @ write($saveth @sc1=[$sc1) + @ write($saveth @sc2=[$sc2) + @ write($saveth @sc3=[$sc3) + @ write($saveth @sc4=[$sc4) @ write($saveth @acban=[$acban]) @ close($saveth) xecho $acban saved theme file [$(loadpath)themes/$(name).th] $desc Date: Sat, 4 Mar 2006 20:15:31 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: TODO-BUGS docs/E5-KNOWNBUGS Log message: -sync todo/bugs to reality, we have no known bugs thanks to kreca's beautifully well done fix to /tsave in his last commit /sarcasm Wonder how long it'll take before someone finds a bug for us to fix now ;p ---------------------- diff included ---------------------- diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Tue Feb 28 02:51:09 2006 +++ amn/TODO-BUGS Sat Mar 4 20:11:04 2006 @@ -8,8 +8,7 @@ ? = undecided/closed votes. ## bugs. -$ /tsave when using different manually set /sbcolor seems to break some - statbars /adump manually using the /saved sets is a workaround. +NONE ## some bugs listed below.(not a huge priority for fixing) $ /bwk does not show if the word is a kick or bwk after reloading. however diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Mon Feb 20 18:36:34 2006 +++ amn/docs/E5-KNOWNBUGS Sat Mar 4 20:11:46 2006 @@ -2,7 +2,7 @@ KNOWN ERRATA (eg, bugs, or unresolved requests): ------------------------------------------------ -* Handling keypresses should overrule protocol enforcement (on_notice, etc) + LOOK FOR IN THE FUTURE ----------------------- @@ -16,6 +16,8 @@ * str_to_mask() should be silent, callers should be warning. * Add /window indent, to overrule /set indent. * A way to control what counts as a space on the fly (via a /set?) +* Handling keypresses should overrule protocol enforcement (on_notice, etc) +* Support for 64 bit ints could be more widespread [See http://www.epicsol.org/PROJECTS for things to come in the future] [See http://www.epicsol.org/CHANGELOG5 for things that changed in the past] @@ -892,3 +894,7 @@ * Implement xforms for CTCP. * Fix $urlencode() so it encodes the + char. * Fix various compiler issues. +* Release epic5-0.0.8 (Prevarication) +* Fix various larnification issues uncovered by ircfuzz. +* Fix make install issue found by nutbar (thanks!) +* Release epic5-0.2.0 (Vicissitude) Date: Sun, 5 Mar 2006 01:20:49 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: CHANGES TODO-BUGS amn.epic core/alias.m core/bans.m core/eimodes.m core/channel.m themes/nocturnal.th docs/UPGRADE mod/vanilla/vanilla.m Renamed Files: core/sets.m -> core/main.m ans/amc.load -> ans/startup.ans Files Removed: pasture/bans.m pasture/topwin/* Files Added: pasture/bans.patch docs/MODULES Log message: -various cleanups/removals of cluttered aliases -/bans output is more like it should have been ages ago(shows date) strip default ansi for those who wants ansi in the bans output see pasture/bans.patch to re-add ansi "patch < filename.patch" -make /i work again(oops) -rename core/sets.m -> core/main.m ans/amc.load -> ans/startup.ans -remove pasture/bans.m, pasture/topwin* -slightly change formatting of /e /i (exempts/invites) -new doc about voting/modules and possible removals in the future docs/MODULES -refix my theme(nocturnal) now that /tsave works like it should -remove duplicate clock_24hr from vanilla -add sirko to greets -zap some whitespaces -increment minor More to come in a bit i need a break ;p ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sat Mar 4 20:59:01 2006 +++ amn/CHANGES Sun Mar 5 01:11:51 2006 @@ -145,3 +145,18 @@ 3.04.06 -fix a bug in tsave which saved sbar colours incorrectly //kreca + +3.5.06 +-various cleanups/removals of cluttered aliases //zak +-/bans output is more like it should have been ages ago(shows date) strip + default ansi for those who wants ansi in the bans output see + pasture/bans.patch to re-add ansi "patch < filename.patch" //zak +-make /i work again(oops) //zak +-rename core/sets.m -> core/main.m ans/amc.load -> ans/startup.ans //zak +-remove pasture/bans.m, pasture/topwin* //zak +-slightly change formatting of /e /i (exempts/invites) //zak +-new doc about voting/modules and possible removals in the future + docs/MODULES //zak +-refix my theme(nocturnal) now that /tsave works like it should //zak +-add sirko to greets //zak +-increment minor //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Tue Feb 28 02:51:09 2006 +++ amn/TODO-BUGS Sun Mar 5 00:41:34 2006 @@ -8,8 +8,7 @@ ? = undecided/closed votes. ## bugs. -$ /tsave when using different manually set /sbcolor seems to break some - statbars /adump manually using the /saved sets is a workaround. +NONE ## some bugs listed below.(not a huge priority for fixing) $ /bwk does not show if the word is a kick or bwk after reloading. however @@ -21,7 +20,6 @@ @ patterns/something still seems screwy from time to time with so-called 'ghost nicks showing up in the channel fix?/pattern issue? ircd issue? @ cleanup the silly ugly usages of stupid arrays in color.m -@ /bans output is really not consistent any ideas for a better output? @ make * wildcard actually work in /trickle @ add some topwin module, kreca has to start a discussion about some topwin script he might have permission for us to use/modify/rip ;) @@ -47,15 +45,20 @@ to $rmatch() or something along those lines ^^ don't count on this happening anytime soon -@ better parses for /e /i outputs. //xavier or skullY needs to discuss this. - @ finish up or scrap the adcc module, i really hate to touch this myself i have never heard of a request for this module nor have i heard a single complaint about it working or not working perhaps a vote? ## bugs fixed. / projects done. -2.28.05 - /kick nick1,nick2 support, written by kreca. //zak +3.5.06 - modified to not be as cluttered there may be modifications sometime + in the future skullY or Xavier can still discuss this issue. //zak +! better parses for /e /i outputs. + +3.5.06 - date added to output, also stripped default ansi. //zak +! /bans output is really not consistent any ideas for a better output? + +2.28.06 - /kick nick1,nick2 support, written by kreca. //zak ! /kick should be able to parse multiple requests i.e /kick nick1,nick2 1.25.06 - my first ever mistake, kreca was actually innocent for once //zak diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Mon Feb 20 18:44:13 2006 +++ amn/amn.epic Sun Mar 5 00:27:59 2006 @@ -3,11 +3,11 @@ /* amnesiac by crapple mods/bugfixes by kreca pr0pz and thanks go to void!, xavier!, fudd, BlackJac, hop, criminal, krimson, -twez, azel, violence, whitney, skullY, Alien88, kreca, eater, grimzy, adam, -ryan, and any others out there who have helped out. +twez, azel, violence, whitney, skullY, Alien88, kreca, eater, grimzy, adam, +ryan, sirko and any others out there who have helped out. */ -package amnesiac +subpackage amnesiac #wipe out uneeded junk. dump all; @@ -113,7 +113,7 @@ ^eval ^load $(loadpath)settings.default oof -^eval ^load $(loadpath)core/sets.m +^eval ^load $(loadpath)core/main.m ^eval ^load $(loadpath)core/config.m @@ -136,7 +136,7 @@ fe ($glob($(loadpath)arrays\/*.a)) ii { load $ii } ## core loading stuff. fe ($glob($(loadpath)core\/*.m)) mod { - if ( mod != [$(loadpath)core/compat.m] && mod != [$(loadpath)core/sets.m] && mod != [$(loadpath)core/config.m] ) { + if ( mod != [$(loadpath)core/compat.m] && mod != [$(loadpath)core/main.m] && mod != [$(loadpath)core/config.m] ) { ^load $mod } } @@ -156,7 +156,7 @@ ^_timestampsome # We're finished, display ans. -^eval ^load $(loadpath)ans/amc.load +^eval ^load $(loadpath)ans/startup.ans wait eval _center $a.ver/$a.rel for $(J)[$info(i)] loaded... oof diff -aruN amn.orig/ans/amc.load amn/ans/amc.load --- amn.orig/ans/amc.load Thu Oct 20 22:01:34 2005 +++ amn/ans/amc.load Wed Dec 31 19:00:00 1969 @@ -1,13 +0,0 @@ -aecho -eval _center When I was a child I had a fever -eval _center My hands felt just like two balloons -eval _center I've got that feeling once again -eval _center I can't explain, you would not understand -eval _center This is not how I am -eval _center I have become comfortably numb -aecho -eval _center Pink Floyd - Comfortably numb. -aecho -aecho -eval _center Note: see /about for additional information. -aecho diff -aruN amn.orig/ans/startup.ans amn/ans/startup.ans --- amn.orig/ans/startup.ans Wed Dec 31 19:00:00 1969 +++ amn/ans/startup.ans Thu Oct 20 22:01:34 2005 @@ -0,0 +1,13 @@ +aecho +eval _center When I was a child I had a fever +eval _center My hands felt just like two balloons +eval _center I've got that feeling once again +eval _center I can't explain, you would not understand +eval _center This is not how I am +eval _center I have become comfortably numb +aecho +eval _center Pink Floyd - Comfortably numb. +aecho +aecho +eval _center Note: see /about for additional information. +aecho diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Sat Feb 25 20:23:43 2006 +++ amn/core/alias.m Sat Mar 4 23:18:22 2006 @@ -1,9 +1,9 @@ -# Copyright (c) 2003-2006 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. +# Copyright (c) 2003-2006 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. subpackage alias -## last modified by crapple 10.1.05 +## last modified by crapple 3.4.06 ## various commands. alias sc scan $* @@ -29,11 +29,9 @@ alias accept { quote accept $*} alias cid acceptlist alias rmcid { quote accept -$*} -alias acceptlist { quote accept * } -alias clist acceptlist +alias aclist { quote accept * } +alias clist aclist alias cdel rmcid $* -alias cidlist acceptlist -alias acceptdel rmcid $* ## dalnets dcc bullshit so called "protection" alias allow dccallow $* @@ -96,7 +94,6 @@ ## builtin simplification aliases. alias arejoin {set auto_rejoin toggle} alias aww {set auto_whowas toggle} -alias cmd {set command_chars $*} alias debug {set debug $*} alias tbeep {set beep toggle} alias lls {set lastlog $*} diff -aruN amn.orig/core/bans.m amn/core/bans.m --- amn.orig/core/bans.m Wed Jan 25 10:20:40 2006 +++ amn/core/bans.m Sat Mar 4 23:53:15 2006 @@ -60,7 +60,7 @@ ^mode $0 b } ^on ^367 * { - //echo $(hblk)[$(cl)$[15]1$(hblk)] [$(cl)$[9]before(! $3)$(hblk)] [$(cl)$2$(hblk)] $(cl)$word(3 $stime($4)) + //echo [$[12]1] [$[9]before(! $3)] [$2$] $midw(1 3 $stime($4)) } wait -cmd ^on ^367 -"*" } @@ -109,8 +109,6 @@ ## ban aliases. alias fuckem lban alias lban mode $C +bbb *!*@0.0.0.0/1 *!*@128.0.0.0/1 *!*@0000::/1 $0 $0 $0 $0 -alias ip6ban {mode $C +b *!*@0000::/1} -alias hban {mode $C +b <3!<3@<3} ## more complex ugly hacks. alias ban { diff -aruN amn.orig/core/channel.m amn/core/channel.m --- amn.orig/core/channel.m Tue Feb 28 02:49:16 2006 +++ amn/core/channel.m Sat Mar 4 23:28:00 2006 @@ -20,12 +20,12 @@ alias v voice $* alias t topic $* alias c {^mode $C $*} -alias i ixs +alias i invs alias e exs alias -I {^mode $C -I $*} alias -E {^mode $C -e $*} alias +I {^mode $C +I $*} -alias +E {^mode $C +e $*} +alias +E {^mode $C +e $*} alias bk {bankick $*} alias kb {bankick $*} alias ik invkick $* @@ -33,7 +33,6 @@ alias cmode {c $*} ## misc parts. -alias epart emopart $* alias dpart emopart $* alias lall partall @@ -53,6 +52,7 @@ part $sar(g/ /,/$mychannels()) } +## oper /who in #chan alias cops { ^on who -* ^on ^who * { @@ -72,11 +72,13 @@ } } +## does anyone still use this? alias sync { @cmodes=[$M] /c +m - $cmodes;/c -m + $cmodes } +## opervision mode alias omode { if ([$0]==[on]) { umode +sckf @@ -86,6 +88,7 @@ } } +## temp bk alias qk { if (![$0]) { xecho $acban usage: /qk - will bankick specified nick then unban them after 5 seconds. @@ -261,6 +264,7 @@ } } } + alias mko if ([$0]) { fe ($remw($N $chops())) n1 { k $n1 $* diff -aruN amn.orig/core/eimodes.m amn/core/eimodes.m --- amn.orig/core/eimodes.m Sun Jan 29 05:13:45 2006 +++ amn/core/eimodes.m Sun Mar 5 00:35:34 2006 @@ -119,7 +119,7 @@ }{ ^mode $0 I} ^on ^346 * { - //echo [$C] [$2] by [$3]/[$midw(1 3 $stime($4))] + //echo [$C] [$2] [$3] [$midw(1 3 $stime($4))] } wait -cmd ^on ^347 -"*" @@ -173,10 +173,10 @@ }{ ^mode $0 e} ^on ^348 * { - //echo [$C] [$2] by [$3]/[$midw(1 3 $stime($4))] - } - wait -cmd ^on ^349 -"*" - } + //echo [$C] [$2] [$3] [$midw(1 3 $stime($4))] + } + wait -cmd ^on ^349 -"*" + } alias etall if (![$0]) { ^on ^348 * { diff -aruN amn.orig/core/main.m amn/core/main.m --- amn.orig/core/main.m Wed Dec 31 19:00:00 1969 +++ amn/core/main.m Sun Mar 5 00:18:53 2006 @@ -0,0 +1,127 @@ +# Copyright (c) 2003-2006 Amnesiac Software Project. +# See the 'COPYRIGHT' file for more information. +subpackage main + +## colour vars. +@ cl = [\\[0m] +@ blk = [\\[0\;30m] +@ blu = [\\[0\;34m] +@ grn = [\\[0\;32m] +@ cyn = [\\[0\;36m] +@ red = [\\[0\;31m] +@ mag = [\\[0\;35m] +@ yel = [\\[0\;33m] +@ wht = [\\[0\;37m] +@ hblk = [\\[1\;30m] +@ hblu = [\\[1\;34m] +@ hgrn = [\\[1\;32m] +@ hcyn = [\\[1\;36m] +@ hred = [\\[1\;31m] +@ hmag = [\\[1\;35m] +@ hyel = [\\[1\;33m] +@ hwht = [\\[1\;37m] +@ bwht = [\\[47m] +@ bmag = [\\[45m] +@ bblu = [\\[44m] +@ bred = [\\[41m] +@ bblk = [\\[40m] +@ bgrn = [\\[42m] +@ byel = [\\[43m] +@ bcyn = [\\[46m] + +## default assigns +@_ort=[3] +@_bt=[3] +@bt_=[better] +@mfloodtimer=[10] +@msgfloodsensor=[60] +@awayt=[60] +@awayl=[on] +@awayr=[Not Here] +@a.ver=[amnesiac] +@rel_id=[7] +@a.rel=[1.3d r/$rel_id] +@a.date=[20051202] +@_ss=[15] +@_ovsize=[5] +@_ovmode=[fibxwzZsy] +@kickops=[off] +@togpager=[off] +@fke1=[wholeft] +@fke2=[wl] +@fke3=[wsa] +@fke4=[scan] +@fke5=[uptime] +@fke6=[dcc] +@fke7=[listchan] +@fke8=[listbot] +@fke9=[config] +@fke10=[userlist] +@fke11=[shitlist] +@fke12=[ehelp] +@crapl=[on] +@msgl=[on] +@notl=[on] +@plog=[on] +@dccl=[on] +@togaway=[off] +@getumode=[iw] +@showop=[off] +@autoget=[off] +@_jwin=[on] +@_pubnick=N +@_tss=[on] +@_r2=[dugewfe] +@_r3=[efguowe] +@_r4=[fgsiuso] +@_boxhead = [ $(hwht)Ú$(cl)Ä$cparse($(c1)Ä)$(cl)ÄÄÄÄÄ$cparse($(c1)ÄÄÄ)$cparse($(c2)ÄÄÄ)$cparse($(c1)Ä)$(cl)Ä$(hblk)Ä- - Ä -$(cl)] +@_boxfoot = [ $cparse($(c1)À)$cparse($(c3)Ä)$(hblk)- ÄÄ -$(cl)] +@_ubanself=[off] + +## default theme vars. +@mform=[39] +@smform=[52] +@pubform=[1] +@spubform=[3] +@spuboform=[1] +@pubnotform=[1] +@signform=[4] +@joinform=[16] +@leaveform=[3] +@modeform=[4] +@notform=[19] +@snotform=[21] +@sdcform=[19] +@dcform=[15] +@topform=[4] +@ctcpform=[3] +@sctcpform=[8] +@echostr=[57] +@ncomp=[15] +@svform=[18] +@snf=[3] +@wallform = [2] +@bwallform=[4] +@awayform=[5] +@actform=[2] +@descform=[2] +@sdescform=[1] +@statbar=[stat.11] +@whoform=[1] +@whofootform=[1] +@nickform=[3] +@timeform=[1] +@kickform=[1] +@_whois=[4] +@acban=[\[a+c\]] + +## default color and sbar color var. +@c1 = [\\[0\;36m] +@c2 = [\\[1\;36m] +@c3 = [\\[0\;35m] +@c4 = [\\[1\;35m] +@c5 = [\\[0\;36m] +@sc1=[\\[0\;36m] +@sc2=[\\[1\;36m] +@sc3=[\\[0m] +@sc4=[\\[0\;34m] diff -aruN amn.orig/core/sets.m amn/core/sets.m --- amn.orig/core/sets.m Sat Feb 25 20:38:38 2006 +++ amn/core/sets.m Wed Dec 31 19:00:00 1969 @@ -1,127 +0,0 @@ -# Copyright (c) 2003-2006 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. -subpackage sets - -## colour vars. -@ cl = [\\[0m] -@ blk = [\\[0\;30m] -@ blu = [\\[0\;34m] -@ grn = [\\[0\;32m] -@ cyn = [\\[0\;36m] -@ red = [\\[0\;31m] -@ mag = [\\[0\;35m] -@ yel = [\\[0\;33m] -@ wht = [\\[0\;37m] -@ hblk = [\\[1\;30m] -@ hblu = [\\[1\;34m] -@ hgrn = [\\[1\;32m] -@ hcyn = [\\[1\;36m] -@ hred = [\\[1\;31m] -@ hmag = [\\[1\;35m] -@ hyel = [\\[1\;33m] -@ hwht = [\\[1\;37m] -@ bwht = [\\[47m] -@ bmag = [\\[45m] -@ bblu = [\\[44m] -@ bred = [\\[41m] -@ bblk = [\\[40m] -@ bgrn = [\\[42m] -@ byel = [\\[43m] -@ bcyn = [\\[46m] - -## default assigns -@_ort=[3] -@_bt=[3] -@bt_=[better] -@mfloodtimer=[10] -@msgfloodsensor=[60] -@awayt=[60] -@awayl=[on] -@awayr=[Not Here] -@a.ver=[amnesiac] -@rel_id=[6] -@a.rel=[1.3d r/$rel_id] -@a.date=[20051202] -@_ss=[15] -@_ovsize=[5] -@_ovmode=[fibxwzZsy] -@kickops=[off] -@togpager=[off] -@fke1=[wholeft] -@fke2=[wl] -@fke3=[wsa] -@fke4=[scan] -@fke5=[uptime] -@fke6=[dcc] -@fke7=[listchan] -@fke8=[listbot] -@fke9=[config] -@fke10=[userlist] -@fke11=[shitlist] -@fke12=[ehelp] -@crapl=[on] -@msgl=[on] -@notl=[on] -@plog=[on] -@dccl=[on] -@togaway=[off] -@getumode=[iw] -@showop=[off] -@autoget=[off] -@_jwin=[on] -@_pubnick=N -@_tss=[on] -@_r2=[dugewfe] -@_r3=[efguowe] -@_r4=[fgsiuso] -@_boxhead = [ $(hwht)Ú$(cl)Ä$cparse($(c1)Ä)$(cl)ÄÄÄÄÄ$cparse($(c1)ÄÄÄ)$cparse($(c2)ÄÄÄ)$cparse($(c1)Ä)$(cl)Ä$(hblk)Ä- - Ä -$(cl)] -@_boxfoot = [ $cparse($(c1)À)$cparse($(c3)Ä)$(hblk)- ÄÄ -$(cl)] -@_ubanself=[off] - -## default theme vars. -@mform=[39] -@smform=[52] -@pubform=[1] -@spubform=[3] -@spuboform=[1] -@pubnotform=[1] -@signform=[4] -@joinform=[16] -@leaveform=[3] -@modeform=[4] -@notform=[19] -@snotform=[21] -@sdcform=[19] -@dcform=[15] -@topform=[4] -@ctcpform=[3] -@sctcpform=[8] -@echostr=[57] -@ncomp=[15] -@svform=[18] -@snf=[3] -@wallform = [2] -@bwallform=[4] -@awayform=[5] -@actform=[2] -@descform=[2] -@sdescform=[1] -@statbar=[stat.11] -@whoform=[1] -@whofootform=[1] -@nickform=[3] -@timeform=[1] -@kickform=[1] -@_whois=[4] -@acban=[\[a+c\]] - -## default color and sbar color var. -@c1 = [\\[0\;36m] -@c2 = [\\[1\;36m] -@c3 = [\\[0\;35m] -@c4 = [\\[1\;35m] -@c5 = [\\[0\;36m] -@sc1=[\\[0\;36m] -@sc2=[\\[1\;36m] -@sc3=[\\[0m] -@sc4=[\\[0\;34m] diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Mon Feb 20 18:36:34 2006 +++ amn/docs/E5-KNOWNBUGS Sat Mar 4 20:11:46 2006 @@ -2,7 +2,7 @@ KNOWN ERRATA (eg, bugs, or unresolved requests): ------------------------------------------------ -* Handling keypresses should overrule protocol enforcement (on_notice, etc) + LOOK FOR IN THE FUTURE ----------------------- @@ -16,6 +16,8 @@ * str_to_mask() should be silent, callers should be warning. * Add /window indent, to overrule /set indent. * A way to control what counts as a space on the fly (via a /set?) +* Handling keypresses should overrule protocol enforcement (on_notice, etc) +* Support for 64 bit ints could be more widespread [See http://www.epicsol.org/PROJECTS for things to come in the future] [See http://www.epicsol.org/CHANGELOG5 for things that changed in the past] @@ -892,3 +894,7 @@ * Implement xforms for CTCP. * Fix $urlencode() so it encodes the + char. * Fix various compiler issues. +* Release epic5-0.0.8 (Prevarication) +* Fix various larnification issues uncovered by ircfuzz. +* Fix make install issue found by nutbar (thanks!) +* Release epic5-0.2.0 (Vicissitude) diff -aruN amn.orig/docs/MODULES amn/docs/MODULES --- amn.orig/docs/MODULES Wed Dec 31 19:00:00 1969 +++ amn/docs/MODULES Sun Mar 5 01:01:30 2006 @@ -0,0 +1,11 @@ +Possible removals in the future or just put on the website if people really +want to keep it (page not created specifically for modules yet) + +The following contributors/users of amnesiac are giving priority when it +comes to voting of removal/addition of questionable modules/objects. + +kreca, skullY, Xavier, criminal, ryan, violence, Alien88 + +VOTE: +scrap ncomp module? (i presume i'll get the majority on this) +scrap adcc module? (again possible majority) diff -aruN amn.orig/docs/UPGRADE amn/docs/UPGRADE --- amn.orig/docs/UPGRADE Sat Feb 25 21:48:11 2006 +++ amn/docs/UPGRADE Sun Mar 5 00:43:31 2006 @@ -36,7 +36,7 @@ ## Upgrading from various version info. ## 1.3 to 1.3d* (in theory) -rm -rf /path/to/amn +rm -rf /path/to/amn <-- IMPORTANT tar zxf newver.tgz (in your home dir or dir you want it) or tar zxf newver.tgz -C /path/to/where/you/want/it diff -aruN amn.orig/modules/vanilla/vanilla.m amn/modules/vanilla/vanilla.m --- amn.orig/modules/vanilla/vanilla.m Sun Jan 8 15:58:57 2006 +++ amn/modules/vanilla/vanilla.m Sun Mar 5 01:13:00 2006 @@ -19,5 +19,3 @@ names $C } } - -set clock_24hour on diff -aruN amn.orig/pasture/bans.m amn/pasture/bans.m --- amn.orig/pasture/bans.m Wed Jan 25 10:16:33 2006 +++ amn/pasture/bans.m Wed Dec 31 19:00:00 1969 @@ -1,42 +0,0 @@ -# Copyright (c) 2003-2006 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. -## it's time to take out this peice of trash. (kick on ban crap) -## RIP 1.25.06 -Zak - -## kickonban annoyance. (this will probably be removed in the future) - -^on #-mode_stripped 43 "% % +b*" { - if (kickonban == [on] && [$3] != [*!*@*] && rmatch(*!*$userhost($N) $3) == 0) { - fe ($onchannel($1)) n1 { - @bannick = pattern($3 $n1!$userhost($n1)) - if (kickops ==[on]) { - if (bannick) { - kick $1 $before(! $bannick) banned - } - } - if (kickops ==[off] && !ischanop($n1 $1)) { - if (bannick) { - kick $1 $before(! $bannick) banned - } - } - } - } -} - -## end pollution. - -# configurations -alias kob { - config.kickonban -s $* -} - -alias config.kickonban { - if ( [$0] == [-r] ) - { - return $kickonban - } else if ([$0] == [-s]) { - config.matchinput on|off kickonban '$1' kick on ban - } -} - -eval osetitem protect kickonban Kick on ban: diff -aruN amn.orig/pasture/bans.patch amn/pasture/bans.patch --- amn.orig/pasture/bans.patch Wed Dec 31 19:00:00 1969 +++ amn/pasture/bans.patch Sat Mar 4 23:56:11 2006 @@ -0,0 +1,11 @@ +--- bans.m Sat Mar 4 23:53:15 2006 ++++ /home/zak/tmp/bans.m Sat Mar 4 23:56:03 2006 +@@ -60,7 +60,7 @@ + ^mode $0 b + } + ^on ^367 * { +- //echo [$[12]1] [$[9]before(! $3)] [$2$] $midw(1 3 $stime($4)) ++ //echo $(hblk)[$(cl)$[12]1$(hblk)] [$(cl)$[9]before(! $3)$(hblk)] [$(cl)$2$(hblk)] $(cl)$midw(1 3 $stime($4)) + } + wait -cmd ^on ^367 -"*" + } diff -aruN amn.orig/pasture/topwin/topwin.m amn/pasture/topwin/topwin.m --- amn.orig/pasture/topwin/topwin.m Sun Oct 2 23:31:26 2005 +++ amn/pasture/topwin/topwin.m Wed Dec 31 19:00:00 1969 @@ -1,22 +0,0 @@ -# Copyright (c) 2003-2005 Amnesiac Software Project. -# See the 'COPYRIGHT' file for more information. -subpackage topwin - -alias fixtopic { - @cwin=winchan($0) - if ( cwin != -1) { - window $cwin toplines 1 - window $cwin topline 1 "$0: $1-" - } - -} -^on #-topic 10 * { - fixtopic $1 $2- -} - -^on #-332 10 * { - fixtopic $1 $2- -} -^on #-331 10 * { - fixtopic $1 No topic is set -} diff -aruN amn.orig/themes/nocturnal.th amn/themes/nocturnal.th --- amn.orig/themes/nocturnal.th Mon Feb 20 18:31:28 2006 +++ amn/themes/nocturnal.th Sun Mar 5 00:20:29 2006 @@ -1,10 +1,10 @@ :crapple -:crapple :nocturnal +:nocturnal @auth=[crapple] -@desc=[crapple] +@desc=[nocturnal] @name=[nocturnal] -@scdesc=[\(crapple\)] +@scdesc=[\(nocturnal\)] @mform=[41] @smform=[54] @pubform=[5] @@ -38,7 +38,7 @@ @descform=[2] @sdescform=[2] @actform=[2] -@statbar=[stat.14] +@statbar=[stat.12] @timeform=[11] @_whois=[3] @c1=[ @@ -46,8 +46,8 @@ @c3=[ @c4=[ @c5=[ -@sc1=[] -@sc2=[] -@sc3=[] -@sc4=[] +@sc1=[ +@sc2=[ +@sc3=[ +@sc4=[ @acban=[[a+c]] Date: Sun, 5 Mar 2006 03:09:38 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: CHANGES TODO-BUGS core/alias.m core/ehelp.m Log message: -fix /cid which i broke in previous commit. -new help menu /cidhelp -sync TODO-BUGS to reality. ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sun Mar 5 01:11:51 2006 +++ amn/CHANGES Sun Mar 5 03:06:13 2006 @@ -160,3 +160,4 @@ -refix my theme(nocturnal) now that /tsave works like it should //zak -add sirko to greets //zak -increment minor //zak +-new help menu for CID/Accept (umode +g) /cidhelp //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Sun Mar 5 00:41:34 2006 +++ amn/TODO-BUGS Sun Mar 5 03:05:22 2006 @@ -27,10 +27,6 @@ ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. -@ bindshelp menu explaining our default binded functs. - -@ cid help menu about efnet's umode +g. - @ Get some variables from numeric 005 so we can finetune some displays? EG, get nick length so we can have formatted publics and /who with proper output? <-- i crapple vote yay. "while shielding myself from kreca" @@ -38,6 +34,7 @@ ## Procrastinated requests. @ add support to bwk to allow usage of wildcards. @ fixdouble/fixwin or equiv for doublestats + @ an xy menu based help system for the xy module to add to /ehelp. @ make userlist support /addchan #chan,#chan2,#chan3 we already support * @@ -51,6 +48,11 @@ ## bugs fixed. / projects done. +3.5.06 - don't really need a binds help menu i'll probably create some + txtfile in the future. cidhelp is now added /cidhelp //zak +- bindshelp menu explaining our default binded functs. +! cid help menu about efnet's umode +g. + 3.5.06 - modified to not be as cluttered there may be modifications sometime in the future skullY or Xavier can still discuss this issue. //zak ! better parses for /e /i outputs. diff -aruN amn.orig/core/alias.m amn/core/alias.m --- amn.orig/core/alias.m Sat Mar 4 23:18:22 2006 +++ amn/core/alias.m Sun Mar 5 02:48:31 2006 @@ -27,7 +27,7 @@ ## cid(+g) alias accept { quote accept $*} -alias cid acceptlist +alias cid aclist alias rmcid { quote accept -$*} alias aclist { quote accept * } alias clist aclist diff -aruN amn.orig/core/ehelp.m amn/core/ehelp.m --- amn.orig/core/ehelp.m Sun Jan 29 05:03:00 2006 +++ amn/core/ehelp.m Sun Mar 5 02:59:29 2006 @@ -16,6 +16,7 @@ //echo rhelp <relay help> relay/paste help menu. [module] //echo svhelp <services help> nserv/cserv/etc.. help menu. [module] //echo chelp <config help> config shortcut help menu. [core] + //echo cidhelp <cid help> cid/accept (umode +g) help. [core] //echo fhelp <look/feel help> amnesiac look/feel help menu. [core] //echo ghelp <general help> general client/user cmds help. [core] //echo shelp <server help> server/connection help cmds. [core] @@ -116,6 +117,20 @@ //echo ------------------------------------------------------------------------- } +} + +alias cidhelp { + if (!$[0]) { + +//echo ------------------------= CID Help =----------------------- +//echo accept /accept will accept msgs from specified nick +//echo cid /cid will show nicks accepted for msgs if any +//echo clist /clist will show nicks accepted for msgs if any +//echo cdel /cdel will remove specified nick +//echo rmcid /rmcid will remove specified nick +//echo ------------------------------------------------------------ + + } } alias winhelp { Date: Sun, 5 Mar 2006 11:34:55 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: CHANGES core/window.m core/config.m core/save.m core/hooks.m core/main.m Log message: -New feature /ptrap(public trap) idea based on highlight by BlackJac /ptrap will trap any word or phrase you want to be notified about in your hidden windows i.e /ptrap word1 word2 "some phrase" it will trap the word or phrase in a hidden channel and notify you when someone says some specified word or phrase in the hidden channel you should see something like *** (trap) xcrapple in #channel at [window #3] at this time it doesn't tell which trigger was set off. //zak ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sun Mar 5 03:06:13 2006 +++ amn/CHANGES Sun Mar 5 11:30:55 2006 @@ -161,3 +161,10 @@ -add sirko to greets //zak -increment minor //zak -new help menu for CID/Accept (umode +g) /cidhelp //zak +-new feature /ptrap (idea based off highlight by BlackJac) + /ptrap will trap any word or phrase you want to be notified about in + your hidden windows i.e /ptrap word1 word2 "some phrase" it will trap + the word or phrase in a hidden channel and notify you when someone says + some specified word or phrase in the hidden channel you should see + something like *** (trap) xcrapple in #channel at [window #3] at this time + it doesn't tell which trigger was set off. //zak diff -aruN amn.orig/core/config.m amn/core/config.m --- amn.orig/core/config.m Thu Feb 9 10:08:18 2006 +++ amn/core/config.m Sun Mar 5 11:08:34 2006 @@ -229,6 +229,16 @@ } } +alias _pubtrap { + if (#) { + @pubtrap=[$*] + } + xecho -v $acban notification set to "$pubtrap" + ^assign $pubtrap +} + +alias ptrap _pubtrap $* + alias setumode { config.umode -s $* } diff -aruN amn.orig/core/hooks.m amn/core/hooks.m --- amn.orig/core/hooks.m Sat Feb 25 20:37:07 2006 +++ amn/core/hooks.m Sun Mar 5 11:14:16 2006 @@ -29,6 +29,17 @@ @setitem(away_users_ts $itemno $time()) } +## public trapping(idea taken from highlight which was written by Blackjac) +## more to be done here in the near future. -Zak +## Copyright (c) 2004 David B. Kratter (BlackJac@EFNet) +fe (public public_other) hh { + ^on #-$hh 4 '% % *\\\\[$$pubtrap\\\\]*' { + @ :window = winchan($1); + if (!winvisible($window)) { + xecho -b -c (trap) $0 in $1 at [window #$window] + } + } +} ## chanalone hook ^on #-leave 123 "% % *" { diff -aruN amn.orig/core/main.m amn/core/main.m --- amn.orig/core/main.m Sun Mar 5 00:18:53 2006 +++ amn/core/main.m Sun Mar 5 11:18:12 2006 @@ -38,6 +38,7 @@ @awayt=[60] @awayl=[on] @awayr=[Not Here] +@pubtrap=[] @a.ver=[amnesiac] @rel_id=[7] @a.rel=[1.3d r/$rel_id] diff -aruN amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Mon Feb 20 19:01:43 2006 +++ amn/core/save.m Sun Mar 5 11:11:36 2006 @@ -37,6 +37,7 @@ @write($savemt @togaway = [$togaway]) @write($savemt @autoget = [$autoget]) @write($savemt @togpager = [$togpager]) + @write($savemt @pubtrap = [$pubtrap]) @write($savemt @windowdoubles = [$windowdoubles]) @write($savemt @bt_ = [$bt_]) @write($savemt @_bt = [$_bt]) diff -aruN amn.orig/core/window.m amn/core/window.m --- amn.orig/core/window.m Sun Jan 29 04:43:26 2006 +++ amn/core/window.m Sun Mar 5 10:11:46 2006 @@ -41,16 +41,16 @@ # Taken from darkstar. alias winchannels (win default "$winnum()", void) { - @ :serv = winserv($win); + @ :serv = winserv($win) for chan in ($mychannels($serv)) { xeval -s $serv { if (winchan($chan) == win) { - @ push(function_return $chan); - }; - }; - }; -}; + @ push(function_return $chan) + } + } + } +} ## shortend aliases. alias wc {^window new hide swap last} Date: Sat, 18 Mar 2006 05:15:55 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: TODO-BUGS docs/E5-KNOWNBUGS Log message: -Sync document to reality, remove a knownbug (unreproduceable?) possibly fixed when kreca rewrote the scan funct a few months back, if anyone still notices the weird nicks/scans send in reports/let us know thanks. ---------------------- diff included ---------------------- diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Sun Mar 5 03:05:22 2006 +++ amn/TODO-BUGS Sat Mar 18 05:10:02 2006 @@ -17,8 +17,6 @@ (will fix someday) ## higher priority todo. (stuff that needs to done before upcoming release) -@ patterns/something still seems screwy from time to time with so-called - 'ghost nicks showing up in the channel fix?/pattern issue? ircd issue? @ cleanup the silly ugly usages of stupid arrays in color.m @ make * wildcard actually work in /trickle @ add some topwin module, kreca has to start a discussion about some topwin @@ -48,6 +46,11 @@ ## bugs fixed. / projects done. +3.18.06 - this hasnt been reported in some time, if someone still encounters + this bug. please snapshot the screen with how the scan output looks. //zak +- patterns/something still seems screwy from time to time with so-called + 'ghost nicks showing up in the channel fix?/pattern issue? ircd issue? + 3.5.06 - don't really need a binds help menu i'll probably create some txtfile in the future. cidhelp is now added /cidhelp //zak - bindshelp menu explaining our default binded functs. diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Sat Mar 4 20:11:46 2006 +++ amn/docs/E5-KNOWNBUGS Sat Mar 18 05:11:11 2006 @@ -24,877 +24,8 @@ THE CHANGELOG SINCE THE LAST RELEASE: ------------------------------------- -* Nix auto-append-of-$* feature (args_flag to expand_alias/parse_inline) HUZZAH! -* Fix provided scripts to add $* when necessary. -* Fix up Makefile, configure, et al, to use epic5/ directories. -* Make message_from() work from a queue; call pop_message_from() to GC -* Removed unused variables -* Add /xdebug message_from to watch the message_from queue at work. -* Nix save_message_from(), restore_message_from(), unneeded now. -* Remove /set beep_on_msg, a half-broken feature which can be scripted. -* Nix /set beep_when_away, a 1-line scriptable feature. -* Add new noise level %, (/ON %TYPE); like ^ but doesn't turn off display -* Use message_from() for setting all target/levels -* Nix set_lastlog_message_level(), have lastlog use who_level/who_from now -* Make message_from() use a queue to store old values -* Make everybody pop off their message_from() under pain of panic -* This ensures every output context can be safely interrupted! HUZZAH! -* Unify the flood, ignore, and lastlog levels. -* *_FLOOD -> LEVEL_*, LOG_* -> LEVEL_*, IGNORE_* -> LEVEL_* -* Add KICK, QUIT, and MODE levels -* Nix #define DEFAULT_BEEP_ON_MSG and #define DEFAULT_BEEP_WHEN_AWAY -* Differentiate between a "mask" (bitmask) and a "level" (integer) -* Don't call them "lastlog levels" any more, they're just "levels" -* Create levels.h, which contain the definitions for all of the level stuff -* Create macro, _X(x) which converts a level name to a mask -* Create macro, _Y(x) which converts a level integer to a mask -* Nix beep_on_level global variable -* Create "Mask" struct which contains an integer to hide a "mask" behind. -* This prevents me from comparing a "mask" to a "level" by mistake. -* Convert many functions and variables to the "Mask" type -* Rename a bunch of functions and variables that use "mask" and not "level" -* Make KICKs, PARTs, QUITs, MODEs, et al use their new special levels! -* All levels now mean everything in every context! HUZZAH! -* Release EPIC5-0.0.1 -* Make empty_string const. Now we're cooking with gas! -* Const correctness madness! -* Compile /ON patterns into regexes and use regexec() to parse them. -* Fix matching of /on type "*" to always have a weight of 1. (rb adm) -* Tack a ^ and $ onto regexes in pattern2regex(). -* Flexible hooks need to have 'hook->regexpr' set to NULL to avoid segfault -* commit 1013: -* Use a "status" variable in server, instead of a plurality of binary flags -* Process usermodes as strings only. -* Nix 'flags', 'flags2' and 'umodes', 's_takes_arg', and 'eof'. -* Change update_user_mode() to take a server refnum. -* Nix $serverctl(... UMODES) -* Change server_is_registered() so it takes a server name and our nickname. -* Add server_is_unregistered() which i'll use in the future. -* Hook /on server_lost all the time in close_server() by popular request. -* Make $version() always return "2.8" since all servers are 2.8 servers. -* Check /set auto_rejoin_connect at disconnect-time, instead of connect-time. -* Use a "is_server_active()" function instead of "did_server_rejoin_channels" -* Move the guts of got_initial_version_28() into server_is_registered() -* Call "server_is_registered()" from 001, which loads ircrc among other things. -* Reduce 004 so it only sets the server's version string id. -* Nix got_initial_version_28 -* Allow client_connect() to be nonblocking -* Allow Getaddrinfo() and Freeaddrinfo() to be called extern. -* Track writable sockets in 'global_max_fd' too. -* Keep a list of AI's for server addresses in the server code -* When server connection lost before registration, use the next AI -* Implement set_server_status(), which controls where server is in lifetime -* Nix reconnect(), which is replaced by close_server + set_server_status(). -* Nix server_reconnects_to(), we no longer reconnect to servers. -* Make /xdebug server_connect the default for this commit at least -* Call window_check_servers() every time through io(), because... -* Make window_check_servers() look for disconnected servers and restart them. -* Add add_mode_to_str() which adds a channel or usermode to a string (sorted) -* Make usermodes use add_mode_to_str() -* Make channel modes use add_mode_to_str() -* Now modes are not stored in bitmasks, not hard-coded at compile time. HUZZAH! -* Nix "inactive" field in channels, channels are thrown away at disconnect -* Don't allow channels to move between servers, natch. -* Nix all the code to handle disconnected channels and such. -* Use change_window_server() to move windows to new servers, because... -* Make window_check_servers() auto-close windowless servers. -* Make change_window_server(, NOSERV) cause a disconnect from -* Don't honor /set auto_reconnect, we don't ever reconnect. -* Fix printf() error in /on kick default output -* Add new server state, SERVER_RECONNECT which means "i can be connected" -* So now SERVER_CLOSED means "don't reconnect me" -* Allow /server, /window server, and /reconnect to change CLOSED -> RECONNECT -* Make server connections nonblocking. -* Server connections are now nonrecursive, nonblocking, multi-protocol. HUZZAH! -* GC a bunch of server code dealing with reconnection we don't use now. -* Don't call window_check_servers() other than io() for sanity reasons. -* Make /window server just change server, let w_c_s() bootstrap connection -* Remove many window->channel->server sanity checks. -* Backslash a bunch of regular pattern chars that are metachars in regexes -* Nix note support -* Revamp notice.c for its eventual assimiliation into parse.c -* Assimilate notice.c into parse.c. *poof* -* Fix some compiler issues and so forth -* Nix the NOTE level. -* Move load_ircrc() to irc.c, nix "startup_file" global var. -* Always change server state using set_server_status(), because... -* Add /ON SERVER_STATUS, $0 is refnum, $1 is old state, $2 is new state -* Delete /on widelist, no longer used -* Prototype mode string manipulation functions -* Reorganize names.h to reflect new realities -* Prototype (Get|Free)addrinfo() now that server.c uses them. -* Nix /window bind, rebind, unbound; $windowctl(* BIND_CHANNEL *) -* Be careful what modes we add to modestr in update_channel_mode. -* GC some old epic4 macros which we don't use -* Fix a typo that b0rked /on server_status -* Force output for a server connection to go to its connected window. -* Make /server reset server's status, so it can be reconnected to. -* Make /reconnect work on servers that are not already open. -* Don't just cavalierly change window's servers. -* Prefer close_server(i, NULL); over change_window_server(i, NOSERV); -* Allow windows to stay connected to closed servers. -* Nix window's "old server", now they're unnecessary. HUZZAH! -* Mop up channel stuff that coped with window-old-server. -* Break backwards compatability and make /window + reconnect to ser. -* Break backwards compatability and make /window - disconnect from serv -* Hide a bunch more debugging output behind /xdebug server_connect -* Refactor change_window_server(). -* Make /window discon the same as /window noserv, total disconnection. -* Don't do anything on 465 (YOUREBANNEDCREEP) -- this will be scripted -* Totaly refactor /SERVER -- documentation of course yet to come! -* Make new_open[_for_write] take a callback function, stash it in io_rec. -* Add handle_filedescs() which takes select() results and calls callbacks -* Make io() call handle_filedescs() instead of the four callback functions. -* This is the first stage of an extendable callback event looper! huzzah! -* Fix io() to call do_server(-1) to do ssl timeouts. bleh. -* Hide new_select() behind wait_select(), which will hold the result fd_set's -* Don't make do_filedesc() take fd_set's, but rather get them from wait_select. -* Be cautious and when redrawing one screen, redraw all screens. -* Refactor io() some more; no explicit dependancy on select() now -* Refactor io(), optimize placement of some of the post-select operations. -* When wserv changes size, recalculate windows, and allow io() to redraw it. -* Fix typo in do_server() that caused a blocking read. doh! (rb adm) -* Abstract fd handling in newio.[ch] through #defines -* Add fd handling with freebsd's kqueue(). Huzzah! (not turned on by default) -* Refactor how dgets() works with incomplete SSL reads, slurp up everything -* Nix the bletcherous do_server(-1) hack in io(). -* Fix a few more bogons in do_server(). -* Abstract the reading function out of dgets() via an argument -* Add unix_read(), the default reader for dgets() -* Add ssl_reader(), a dgets-like reader for SSL connections -* Add server_ssl_reader(), a dgets reader for servers using SSL. -* I probably broke SSL servers by doing this -- report bugs please! -* Import epic4 commits 674 through 692, inclusive. -* Import epic4 commits 693 through 710, inclusive (epic4-2.0 final) -* Change _X and _Y macros to LEVEL and LEVELMASK for linux (sigh) -* Add a searchbuf() 8 bit clean byte-finder for future use. -* Convert flood checking, ignore checking, lastlog, logfiles to int masks. -* Convert message_from to int masks. -* Undo that lame damage -- convert all level handling to "signal-like" -* Each level is individual, and masks are stored in types like (sigset_t). -* Comparing one mask against each other requires O(N^2) operation. bummer. -* But now levels are officially stored in opaque data type! -* And that data type is not limited to 32 bits! HUZZAH! -* Add 6 new lastlog levels (USER5-USER10) to celebrate. -* Reduce the size of level masks to 1 byte, to save cpu. -* Add turn_on_level() and turn_off_level(), for reasons that escape me. -* Nix the /help command, make howl's scripted replacement the default. -* Add $cofilter() entry so you can use it (it was already written) -* Make dcc connections ($connect, /dcc get, /dcc chat) nonblocking -* /DCC RESUME is totaly broken by this. Will fix later, maybe ;-) -* Add $startupfile(), which returns the epicrc/ircrc file that was loaded -* Offer unknown ctcp requests through /on ctcp_request before /on ctcp. -* Fix /DCC RESUME so it works with nonblocking connects. -* GC all of the blocking connect code. EPIC is fully nonblocking connect! -* Make sure that servers go through SERVER_EOF state on eof! -* Track waiting/pending channels using a nicklist per window. -* Nix $winbound() and all the other stuff relating to bound channels -* Fix bug with binding/initializing the 255 key -* Fix bug with TOGGLE_STOP_SCREEN keybinding. -* Revamp /window describe so it includes a lot more useful info. -* Wrap send_ctcp in message_from()s to send to the right window. -* Add /xecho -f, which suppersses widnow notify events (%F) -* Move Lastlog definition to lastlog.c, leave stub behind for window.h -* Add window_all_channels(), return all windows for channel from names.c -* Change boolean vartype for windows and status: int -> short. -* Add do_short_boolean(), like do_boolean(), but it takes a short. -* Make the default server quit message "Leaving" -* Have /window describe show all the channels in a window. -* Have /window describe show nicks, channels in flat list, not one per line. -* Make sure to use the server's default quit message when closing it. -* Create a prototype of atoll() for compat systems. -* If a /set indent line would indent > 1/3 of the screen, indent to 1/3, not 0. -* Add a counter to WNickList, for tracking queries -* Each window gets a "current query counter", to find it's current query. -* Adding nicks with /window add gives them query counters of 0 -* Adding nicks with /window query gives them next higher query counter. -* Removing query with /window query, still removes from nick list! -* New binding "SWITCH_QUERY" to switch between queries, duh! -* Nix "query_list" in Window, totaly dynamic now, huzzah! -* Fix places using "query_list" to use "get_equery_by_refnum()" -* Refactor add_to_screen(). wheee! -* Change "Update %H on status bar..." to "Update %B on status bar..." -* So $windowctl(... QUERY_NICK ...) returns empty string now. -* Split (Window)->miscflags into "notify_when_hidden" and "notified" -* Add $windowctl(... NOTIFY ...) and $windowctl(... NOTIFIED ...) -* Change $windowctl(GET MISCFLAGS) to always return 0. -* Make /window notify and /window notified take ON|OFF|TOGGLE. -* New function, $strtol( ), convert in base to base 10. -* New function, $tobase( ), convert in base 10 to base . -* GC a bunch of unused code, unused files, that kind of stuff. -* Make all of the level names plural, it's more forgiving that way. -* Release EPIC5-0.0.2 -* Fix /window channel. Ooops! -* Add a timer list dump for when a polling loop is detected. -* Prefer timers over i/o to avoid the polling loop bug. ick. -* Move some defines from comands.h to where they belong -* Add and remove func decls in header files as necessary. -* Add /wait = which returns when a nonblocking dcc connection finishes -* Make all keybinding funcs/decls use the BUILT_IN_KEYBINDING macro. -* Make the BUILT_IN_KEYBINDING macro use unsigned chars. -* Hide (struct Key) inside keys.c, and use (void *) to hold state. -* Make the input line use (unsigned char), not (char), huzzah! -* Make the "othername" ($3 in /on dcc_raw "E") the port number. -* Avoid a NULL deref with "parse_command" keybinding. -* Add $regcomp_cs() for black, case sensitive regex matching. -* Fix (maybe?) a NULL deref with prepare_display() that hsoc tripped across. -* Revert all the regex stuff for /on's -- the idea needs a lot more thoguht. -* Create one unified "hook" table for numerics and named hooks -* Nuke "numeric lists" as separate beast in hook.c -* Refactor code to only worry about one hook table. -* Refactor do_hook() to re-start at start of list every time /on runs -* This makes it 100% safe to edit/delete /on's from within /on's, HUZZAH! -* Revert /on type ^"pattern" to epic4 behavior (suppressive action) -* Add /on type !"pattern" to act like ircII's /on type ^"pattern" (exceptive) -* Add /window kill_all_others for rain. -* Add /set old_server_lastlog_level, for when you merge windows to servers. -* Add %{2}W status expando for black, shows /set status_window in all windows. -* Fix a bug with hook pattern counting found by hsoc and adm. -* Update to newest help script from howl -* Add a "slowcat" script I wrote for larne. -* Add $serverctl(GET * STATUS) for ce. -* Fix typo with $logctl(REFNUM ), rb Zlonix -* Split alias item to hold commands and variables separately -* Nix COMMAND_COMPLETION keybinding. Script replacement forthcoming. -* Nix "Use your nickname as alias for /me" feature. -* Nix automatic command completion (ie, /whoi no longer expands to /whois) -* Work towards not using 'command' var in builtin commands. -* This will allow me to get rid of 'server_func' in builtin command data type -* Nix the 'flags' var in builtin command data type. -* Nix the 'serv_command' var in builtin command data type. -* Create 'init_builtin_commands' to run at startup, add commands to alias -* Shimmy find_cmd_alias to ignore built in commands for now. Not for long! -* So built in commands should be hung off of aliases now. -* Create 'builtins' script that aliases some previously builtin commands. -* Load this script from global. Don't forget to alarm users. -* Fix up parse_command() to get aliases and built in commands from aliases. -* This unifies commands and alias name spaces. HUZZAH! -* Optimize some stuff now that I've finished this. -* Unify the built in functions with the command/alias list. HUZZAH! -* Begin massive refactorization of alias.c, redefining "Alias" as "Symbol" -* Refactor parse_line() with a bunch of front end call_* functions. -* And a general parse_line() front end, "runcmds()". -* Roll builtin expandos in with the user variables -* Roll variables and commands together into one name space. HUZZAH! -* Nix the caches for the global name space, for now. -* I definitely broke /stack alias|assign here. I'll fix it later. -* Inline expandos are now officially strings instead of a single char. -* Fix bug with $unshift() that popped up. -* Move after_expando() to ircaux.c. I think it belongs there more. -* Fix double-free of command alias arglists. rb adm. -* Add a "saved" list item off of the Symbol type to store /stack'ed stuff. -* Implement stack push|pop|list for all 6 symbol types. -* Nix the "line/global" tracking for symbols -* Rename "filename" tracking for symbols to "package" -* Create clone_arglist() to clone an arglist, duh. -* Change "user_variable_stub" symbol field to be an integer -* Stash the stubbed filename in "user_variable" if stub is set. -* Make stripcrap(ALL) exclude "ALL_OFF", so I can... -* Fix bug with $stripcrap(ALL,-BOLD ^B^B^Btest). (rb BlackJac) -* Make the #define Char const char thing global to all of epic now. -* Whack /set scroll. -* Create a "/set data" type (VARIABLE) which is union of (int) and (char *). -* Expose VARIABLE and variable types in vars.h for others to use. -* Break init of /set's into two parts, one to malloc() the set data -* The second part is to init the default values once command line is done. -* Fix some warnings from --with-warns -* Fix all /set callbacks to accept a (void *)(VARIABLE *) variable -* /Set callbacks can now directly modify the /set via that variable! -* So don't allow direct setting of /set's from outside vars.c. -* Everybody must use set_var_value() which is the backend to /set. -* Whack the /IRCNAME and /REALNAME variable -- use /SET REALNAME, eh! -* Hack up /xecho -x to bide my time until i whack all those /sets it uses. -* Don't call set_input_prompt() in main() any more, it's handled elsewhere. -* Whack /set logfile callback, since nobody seems to have missed it. -* Whack the "number" (float) data in /set since i wasn't gonna use it. -* Whack the "GLOBAL/CHANGED" tracking in /set's. Tell me if you miss this. -* Unify output of /set values as "[New|Current] value of is " -* Don't limit the size of /set continued_line, this will be revisited soon. -* Quick and dirty hack to work around adm's bug, will fix this later. -* Fix bogon in make_string_var(). -* Fix bogon with /set variables not being initialized early enough. -* Add the rest of funcs to do builtin var support in unified symbol table. -* Change the unified data type for builtin funcs to (IrcVariable *). -* Implement "buckets", for O(N) scans of the unified symbol table. -* Change DEFAULT_USERINFO to DEFAULT_USER_INFORMATION to match the /set. -* Make the *_VAR stuff in vars.h 'int's. -* Change USER_INFO_VAR to USER_INFORMATION_VAR to match the /set. -* Change CLIENTINFO_VAR to CLIENT_INFORMATION_VAR to match the /set. -* Change STATUS_NICK_VAR to STATUS_NICKNAME_VAR to match the set. -* Put the defn of (struct IrcVariable) in vars.h, to expose to unified table. -* Convert all uses of now defunct (enum VAR_TYPES) to (int) -* Create "make_string_var_bydata", converts (IrcVariable *) to malloc string -* Change get_var_alias() to return (IrcVariable *) -* In that function that outputs set values, use make_string_var_bydata(). -* Change hardcoded *_VAR uses into pointers to *_VAR, for deref at runtime. -* Major revamp of vars.c, to wholly create built in vars at runtime. -* Built in variables are stored in unified symbol table and vars.c xref array. -* *_VAR values now point through xref array to the actual variable data. -* Nix the now unnecessary get_variable_index(). -* Add create_user_set(), backend for /SET -CREATE -* Add /SET -CREATE [{}] -* Need to go back and implement the {} thing. -* Revamp how /set works, using buckets, to implement auto-completion. -* $getsets() is not implemented yet, do that too. -* When looking up $, use the unified symbol table. HUZZAH! -* Refactor IrcVariable to not depend on having the varname. -* This will lead to multiple hard links to the same /set value in the future. -* Nix the 'name' and 'hash' values in IrcVariable, no longer needed. -* Make all uses of "realname" use the /set realname variable (rb adm) -* Nix the global "realname" variable, use /set realname for all. -* Fix bug with free_bucket() -* Fix compile warnings in vars.c -* Store built in variable xref table in a bucket. -* When changing a user-created /set, start calling the user's scriptback -* Allow the user's scriptback to call /set to override the user's value. -* Tell the user that they created a new /set. -* Support +I from ratbox, for adm. -* Make $getsets() work again. -* Fix alloca() warning for freebsd-current -* Fix warnings about static variables not used -* Fix /set notify_level, which is supposed to cascade to /window notify_level -* Fix /set lastlog_level, same thing. -* Implement /window notify_name for %{1}F, for howl (irssi-like status notify) -* Add support for ircnet's "unique id" nicknames from epic4 -* Fix $winline() from epic4. -* Fix /who -d[iagnose] from epic4. -* Remove limits on timer refnames. -* Add $mktime() from howl. -* Nix /save and pray nobody notices. -* Implement pmatch_* stuff in alias.c to use the unified symbol table. -* Commands, functions, and expandos now 100% integrated. HUZZAH! -* Reimplement $get(set|command|function)s() to use the pmatch_* stuff. -* So they now pick up changes at runtime. HUZZAH! -* Allow built in /set to be conditionally added to the "set bucket" -* Don't put user-created /set's in the bucket -* Allow user to replace one user-created /sets but not builtin sets. -* Allow mangling of ALT_CHAR -- how did this ever get missed? -* Fix $currchans() so it works the way the documentation says it does. -* Fix some const correctness issues, introduce others. bleh. -* Fix typo that caused /set -create twice to crash and burn. -* Fix memory leak, rb CE. -* Fix $getset() which is supposed to be case insensitive (typo), rb Xavier -* Make the work buffer for %F and %{1}F much bigger (2k, was 80 bytes) -* Avoid NULL deref on brok^H^H^H^Hempty numeric replies -* Fix aliasctl(): values returned by pmatch_* are not to be freed. (rb ce) -* Better handling of damaged /who x,y responses from some servers. -* Make $function() call builtin, and $:function() call alias -* I need to make sure to add an /xdebug to make $function() call alias! -* Nix calls to dcc_connected(, 0) which were always bogus. -* Create print_arglist() for printing alias arglists, natch. -* Fix crash from /queue -del for = + 1 (rb black) -* Show arglist when creating and listing aliases. -* Fix memory leaks of buckets when user grabs /on set. -* Add a "alternate names" bucket to server data. -* Create a whole new api for querying and creating server refnums. -* Fix crash with /dump on (/dump all) -* Add $serverctl(GET|SET ALTNAME) get and set server alternate desigs -* Add $serverctl(GET|SET ALTNAMES) get and set entire list. -* Fix memory leak with /on set -* Fix memory leak with /timer -* Fix $server*() functions, when passed no arguments. -* Add /msg -/ thingee, i really need to document this. -* Add /window toplines , reserve N lines as nonscrollable on top of window -* Add /window topline "" change the Nth topline to -* You can have 1 to 9 toplines. -* Don't allow /window toplines to be a negative number! -* Fix dcc compile error with --without-ipv6 -* Add $windowctl(GET ref TOPLINE num) and $windowctl(GET ref TOPLINES) -* Revert changes to 1.59 of alias.c, which leaked accidentally. -* Add -L and -S command line options (ce) -* Reset "from_server" after every window operation -* If /window doesn't change current_window, revert from_server to orig value -* If /window changes current_window, reset from_server to cur_win->serv; -* Altered the dcc_lost hook to return strerr() info. -* Fixed $aliasctl(* match [mask]) to return only aliases and assigns. -* Add %{3}W which is like %W but it's active for all input windows. -* Support efnet's +e and +I numeric replies. -* Add a bunch of stuff to debug the who_queue to find and fix adm's bug. -* Remove a debugging line i forgot about. -* Fix memory leak with remove_from_comma_list(). -* Add $winquery(), written by howl -* Add $hookctl(), written by howl, who needs to write an UPDATES entry. -* Rolled /disconnect and /reconnect into the same code. -* This allows /reconnect to use an optional servernum argument. -* Changed "/server -a" to leave the new or selected server as the current - server, which is the historical behaviour. -* The server_established hook is now thrown in the context of that server. -* Fixed a missing comma bug in remove_from_comma_list(). -* Fix ALL/ALL_OFF thing from epic4. -* Fix $logctl() from epic4. -* Fix bug with % followed by \ in wildcard patterns from epic4. -* Fix a compile error when doing password protection (bug 12) (from epic4) -* When creating the 'epic' symlink, use a relative path for jm. (bug 9) (epic4) -* Allow package to be set when overwriting existing alias with no package. -* Add arglists to hooks (by howl, who I will pester to document this). Woot! -* Finish $hookctl(), by howl. -* After connect()ing to a server, save the remote peername -* This fixes $serverctl(GET PORT) -* This also fixes $servports(), which should work as (not) documented. -* Fix for notify_signon default handler, from larne. thanks! -* Add $serverctl(GET ADDRFAMILY), returns "ipv4", "ipv6" or "unix" -* Allow /hostname /, separately set v4/v6 vhosts! (see UPDATES) -* Don't always panic if a fd isn't ready, it might have been new_close()d. -* New internal function set_mask_by_winref() allows changing window's level. -* Make /xdebug regex_debug outputs privileged yell()s, just for sanity. -* Change /set new_server_lastlog_level to take effect on 001 (see UPDATES) -* Refactor window_check_servers() to work with server's current window only. -* Roll forward all the rest of changes from epic4 (i think) -* Add /ON NEW_NICKNAME, when epic needs a new nickname from you. -* Run 'make depend', fix compile errors, fix 'environment' script -* Fix bug that brought up all servers at once. -* Fix /window topline so it doesn't chop/wrap-off last word. -* Fix misleading error message if /exec -direct fails. -* Add $logctl(CURRENT), refnum of the current logfile, -1 if none. -* Hide ArgListT in alias.h to only those who need it, to save numbers.c -* Fix up a lot of compile warnings all over the place. -* Some changes to $hookctl() might need feedback from howl... -* Fix vhost support so we can do inbound sockets again. -* Fix add_to_screen() so /query nick catches /dcc chat nick. (rb adm) -* Fix /away -all which sends a bogus string to the server. (rb rain) -* Fix /dump. doh. -* Add $symbolctl(). See UPDATES. -* Fix auto-completion bogosity with $symbolctl(). -* Release epic5-0.0.3 -* Add %{3}S, showing the server's group instead of its name. -* Fix compile bugs for non-ipv6 users with the dual-vhost stuff. -* Fix null deref with /window flush when not in hold mode. -* Fix $symbolctl(pmatch *) crash -* Auto-create server's first altname, make %S and %{1}S use it. -* Don't add mode types 2, 3, or 4 (takes-args) to the channel mode string. -* This makes ircnet's +R not show up on the status bar. -* Fix /dmsg =, for Q. -* Add $serverctl(GET PROTOCOL), returns IRC or IRC-SSL -* Fix /dmsg = again, fix compiler warnings. -* Whack dgets() into submission regarding incomplete unbuffered lines. -* Revamp how partial lines from an /exec process are handled. -* Major refactoring of newio system: -* Change main io() look into a "fill" cycle and a "drain" cycle, using buffers -* Change new_open() to take an io policy to perform when fd is "ready" -* Use token to determine if an fd is "dirty" or "clean" (is data ready?) -* Process accept()s through newio/dgets. -* Merge nonblocking connects as just another type of new_open() policy. -* Nonblocking connects emit sockaddr info when connected for dgets(). -* Change dgets() to not perform io, but just drain from the buffer -* Now all data goes through dgets()! huzzah! -* Nuke kqueue support for the moment (will come back later) -* Hide the "holding" status of a fd inside the IO metadata. -* This allows me to support "holding" in other IO models. -* Major refactoring of ssl support: -* Move all meta-data about ssl in ssl.c in a linked list -* As much as possible, have server treat the ssl case as "normal" -* Implement all ssl interfaces even in non-ssl case, guard with panics -* Null-terminate after a read, just for laughs and giggles. -* Add a dgets_buffer() to inject data into dgets() system. -* Fix up dgets() so it has read() like semantics. -* Fix up dgets() callers to use it like a read() type function. -* Turn off /xdebug server_connected hardcoded at startup for now. -* Fix up unix_* io functions to use dgets_buffer(). -* Fix do_filedesc() to repeatedly call callback until buffer is clean -* Move set_socket_options() to network.c, make do_filedesc() global func -* No longer null terminate the read()s, unnecessary now. -* Fix pattern matching of "\%" so [H*] is matched by [%\*%]. -* Refactor $sar() and $msar() so they share as much code as possible. -* Refactor newio, support select/kqueue/poll (#define's in newio.h) -* ... Getting closer to not needing select! -* Fix SSL. -* Fix a bunch of misc compiler warnings -* Remove restrictions on /QUOTE, so there! -* Add pthread support to newio for larne. HUZZAH! -* I'm sure a zillion things are broken, so it's time to test! -* Remove a panic that broke /wait. -* Fix uninitialized variables in msar/sar. -* Fix $sar() and $msar() so they don't infinitely substitute without buonds. -* Fix more bugs, yay! -* Fix SSL server connections. -* Fix bugs with /exec, INET6. -* Fix /window scroll_backwards/forwards. -* Try to auto-detect select(2) failures. -* Fix the second lamest bug ever. DO NOT DO CONTNIUE WITHIN WHILE (0) DUMMY. -* Fix accept() with pthreads. Nonblocking + pthreads == Bad. -* Throw away all unused addrs when we are registered, to ensure no reconnects. -* Comment out a bunch of oper-only stuff in 2.8script which opers seem to hate. -* Implement a proper built in /INVITE command. See UPDATES -* Revert 2.8script change. -* Add "subpackage" command, which i'll document later. -* Package up 'global', and '2.8script' and 'basical' so they can be /unload'ed. -* Don't load "global" if user has their own startup script. -* Don't load "global" if the -q option is set, either. -* Thus, the "global" script acts as a default "epicrc" for those without one. -* THIS IS BACKWARDS INCOMPATABLE. SEE UPDATES FOR IMPORTANT INFORMATION. -* Nix the "loading_global" variable, only used by hooks. -* Fix /on 005 so it shows the /on 005's and not all numeric hooks. -* If Accept() fails, tell the user straight-way so I can debug this. -* Fix /window name - so it redraws the status bar. -* Refactor the error stuff by eliminating my_strerror() and dgets_errno. -* Error messages are now delivered on multiple levels as info is available. -* This may get annoying, but it's a lot more accurate now! -* Change inet_* functions to return int's since their retval is unused. -* Add a new internal "syserr()" function that generates formatted errors. -* Syserr's look like say()s but they act like yell()s. (can hook with /on yell) -* Keep an counter in the server stuff so we can count off as addrs are used. -* So the error message in /ON DCC_LOST is always just "ERROR" now. -* Fix various compiler warnings and stuff. -* Add $hookctl(GET HOOK STRING), return /load'able format of ON -* Fix some debugging outbound in switch_hostname(), doh! -* Roll set_socket_options() into a new Socket() function. -* Roll connections to AF_UNIX sockets into the mainline stuff. -* Roll nonblocking/connect/nonblocking into Connect(). -* Add AF_UNIX support to Getnameinfo() to remove annoying errors. -* When doing recovery from EBADF in select, only check fd's we're using -* Just puke if configured for kqueue() and kqueue() fails. -* Don't puke on default 353 output if the userlist arg is missing. (for ratbox) -* Permit doing /window name to change case of window's name. -* Fix more compiler warnings. -* Fix accept() with pthreads. -* When accept()ing with pthreads, can the new conn really be nonblocking? -* Add --with-multiplex=[select|poll|freebsd-kqueue|pthread] to configure -* Check thread-safety of SSL in configure when using pthreads. -* Don't unconditionally skip leading :'s in symbol names. -* When calling functions, handle skipping leading :'s specially. -* Add support for pthread locking for ssl to ssl.c -* Add %{2}+ and %{3}+ status expandos that only show the mode string. -* Use AI_ADDRCONFIG flag to tell getaddrinfo() we only want addrs we can use. -* Fix SSL with pthreads -- need to establish SSL before calling SSL_read! -* Fix compiling with kqueue, call it --with-multiplex=freebsd-kqueue -* Hide SSL capability behind "client_ssl_enabled()", nix all #ifdef HAVE_SSL -* Fix up the configure script so ./configure --help lines up all nice. -* Don't emit spurious warnings when user hits control-c -* Don't try to figure out disconnected server's port from sockaddr, duh! -* Prefer timers over i/o to prevent polling loop panics. -* Check return value of uzfopen() before checking the stat field. -* Fix compile error for #define UNAME_HACK -* Fix crash when you do $open(/file/doesnt/exist R) -* Add an /on 338 default handler. -* Fix integer underflow with log file refnums -* Rename STATUS_USER0 to STATUS_USER for backwards compat. oops! -* Whack BRACE_LOAD_HACK, it's been unsupported for a while. PF loader rules! -* Don't allow /botmode if #define NO_BOTS -* Fix DCC connections instantly "timing out"? (Check on this) -* Whack FLOATING_POINT_SUPPORT and depend only on /set floating_point_math -* Add $hookctl(SET LIST IMPLIED ) though it's off by default. -* If you do turn it on, it shows up as 'h' in $info(o) -* Sort logfiles by refnum, so new refnums always go at the end of the list. -* Fix up 338 again, oops! -* Keep timestamps along with lastlog entries. -* Add $line( -TIME), return the timestamp when was added to lastlog. -* Remove some #define's from config.h that are not referenced any longer. -* Remove #define QUIT_ON_OPERATOR_KILL because 1 line of script defeats it. -* Add some debugging stuff, try to trap lost dcc filedescs. -* Release EPIC5-0.0.4 (Scurrilous) -* Make /xecho -v output to current window if it's visible. -* Permit status updates right away, instead of after first connection. -* If /input is done in hidden window, switch to the main window. -* Make arglists look a little less odd for fudd. -* Change "ERROR --" to "INFO --" to not alarm people as much. -* Change a few other warnings to not be so alarming. -* Change new_realloc() to not move ptr if it is big enough to hold new size. -* Fix all the status_* sub-formats to not have any hardcoded size limits. -* Fixes from darwin that they "forgot" to submit upstream. -* Fix file descriptor leak, alerted by ce. -* Add Blackjac's 'history' script. Into the Abyss! -* Comment out all of the history code. It compiles. Will GC it later. -* Round one of blackjac's 'builtins' script. -* Comment out a ton of now-scripted sets. Will GC it later. -* Take a new arg to new_open() to control whether INFO -- errors are output. -* Don't output the "INFO --" things for dcc or execs -* Fix how i nixed /set reverse_status_bar, i totaly botched this. -* Ok. I botched /set full_status_line too. -* OK. I really botched /set show_channel_names. Ugh. not my day! -* OK! OK! OK! So i commited the wrong builtins script. argh! -* Ach. Better not to know. -* Check for arc4random() in configure, don't use compat.c version if possible. -* GC "fill_it_out" code which has been deactive for a while. -* Fix translation casting error for zlonix -* Allow current_package() to return NULL, handle that as special case. -* Refactor the startup loading stuff -* Move a couple of loads out of basical and into global. -* Round two of blackjac's builtins script. -* Cleanse 2.8script of stuff that has bitrotted to death. -* Whack the invite in 2.8script, the builtin is much smarter! -* Fix various things for fudd's loadformats script. -* Add $serverctl(LAST_SERVER) and $serverctl(FROM_SERVER) for blackjac. -* Comment out the round 2 $win*() functions. -* Make //ignore output less visually jarring (change a tab to a space) -* Permit /set -new_server_lastlog_level which won't change levels on /server -* Permit /set -old_server_lastlog_level which will just confuse epic. ;-) -* Add $windowctl(GET DISPLAY_SIZE), same as $winsize() -* Add $windowctl(GET SCREEN), same as $winscreen() -* Add $windowctl(GET LINE ), same as $winline() -* Fix $servernick() -* Make /bind "compress" string, and bind and print it compressed. -* This fixes /bind'ing literal characters being displayed literally. -* Round 3 of blackjac's builtins script -* Round 1 of fudd's loadformats script. -* Fix some "all-the-world's-an-int" bugs reported by xlc (aix's compiler). -* New version of tabkey.ce from fudd. -* Comment out the round 3 $serv*() functions and other stuff. -* Another new version of tabkey.ce from fudd -* A new loadformats from fudd. -* Add $dccctl(UPDATES_STATUS [0|1]), returns old value -* Add $dccctl([SET|GET] UPDATES_STATUS [0|1]). -* Allow /on ^dcc_activity * # to suppress status bar redrawing. -* Another altchan.bj from black. -* Auto-delete sequences if you delete the keybinding they're bound to. -* Fix bogon in the dcc update-status stuff for fudd. -* Release EPIC5-0.0.5 (Indifference) -* More builtins goodness from blackjac. (Round 4) -* Re-fix bogon in the dcc update-status stuff for fudd (again) -* Make /xdebug new_math the default, you can /xdebug old_math to go back. -* Make /xdebug new_math and /xdebug -new_math no-ops. -* Don't do %#p in printf formats, since it has no effect. (%p is better). -* Comment out $[r]igmask(), $[r]igtype(), round 4 functions. -* Comment out /set -create as has been threatened for months. -* Change /on leave to /on part. -* Only ever do one io event per call through select() or poll() -* Do put_echo() and not add_to_screen() in /window echo so it can be logged -* GC functions and sets from 'builtins' -* GC history.c and history.h, huzzah! -* Add $serverctl(GET * LOCALPORT) (fudd) -* Add larne's support for solaris ports, which i modified a bit, so blame me! -* Fix $windowctl(GET * QUERY_NICK) -* Don't do WHO on anonymous channels (channel mode +a) (for ircnet users) -* Don't set server's default nickname until we first try to connect. -* For ircnet users, after a /nick , the def nick should be "0". -* Even privileged_yell()s need to be run through normalize_string()! -* Implement $windowctl(SET TOPLINE ) -* Reorganize how nickname changes are handled, before I refactor stuff. -* I stopped forcing client-side checking of nickname changes here. -* Add /window killable to allow you to make windows unkillable -* Nickname rejections are handled through /on new_nickname solely now. -* New builtins from blackjac. -* When changing EXPIRATION in $ignorectl(), set a new /timer. -* Some source cleanup, in prep for the logical-sized window support. -* Create "marshall_getaddrinfo" which musters getaddrinfo() into one block. -* New builtins, history from blackjac -* Don't object to mode changes with trailing spaces. -* New script, "newnick" from blackjac. -* Add marshalling functions for getaddrinfo() -* Use getaddrinfo marshalls + dgets to simulate nonblocking dns lookups. -* New newio io type, "NULL" which i'll probably whack later. -* _VERY_ preliminary support for nonblocking dns on server connects. -* You should assume it's very buggy, and be patient and report bugs. -* Add support for single and double quoted strings in new math parser. -* Put all handling of /set quit_message et al in close_server(). -* Fix /quit to pass unspecified quit message as NULL to irc_exit(). -* Fix irc_exit() to handle unspec. quit message as NULL to close_all_serves() -* Fix close_all_servers() to not change quit message for NULL. -* This allows /quit to use (not override) each server's quit message! -* This also allows a single %s in /set quit_message to be honored everywhere! -* Fix up do_server() so anything that happens is wrapped in message_from()s. -* Show the server list for /window server instead of an error. -* By default, as server, defaults to port 0 -* By default, port 0 changes to irc_port (6667) for a new server -* This means any use of in a server context picks up 1st -* The -B command line option (load startup file before connect) is now default. -* Don't do LOCAL_COPY within an infinite loop, leads to stack exahustion. -* Support new signal, SIGUSR2 which throws "system_exception". -* Teach the block commands about "system_exception" so they can be stopped. -* Whack a bunch of unused timers from vars.c. (see UPDATES) -* Sync up config.h, vars.h, and vars.c with each other. -* Add "domains" to timers, server timers, window timer, general timers -* When timers go off, latch back to their domain -* Allow timers to self-cancel if their latched item has gone away -* Add /timer -general to set a general timer. -* Make /timer -win or /timer -serv set a window or serv timer especially. -* Ooops. I really botched that. Make epic5 start again. -* Don't offer non-"TELLUSER" ctcps via /on ctcp_reply (ACTION/SED/UTC) -* Implement $windowctl(SET .. NOTIFY_NAME) for howl. -* Fix a few things with the dns helper. -* In /on type '', Set $* so can match against itself. -* Move 'addset', 'delset' from 'builtins' to its own script. -* Remove commented out obsolete stuff from 'functions' script. -* Pf-ify the 'help' script. -* Desupport a bunch of scripts. See UPDATES. -* PF-ify all of the remaining scripts. -* Convert several scripts from /on set to /addset. -* When a window is resized, make sure scrollback is bigger than new size. -* Add multiple stricmp tables, "ascii" and "rfc1459" -* Make all string insensitive compares use "ascii" -* Add black's ornamentation on the addset script. -* Fix some regression scripts -* Fix pf bugs with various scripts. -* Add the [$func](args) capability to the new math parser. -* Add the === and !== literal equivalence (case sensitive) operators. -* Sort of set the case sensitive mapping to use in the 005 handler (hack!) -* Fix error recovery of ssl connections. -* Fix up how relative filenames are found with /load. See UPDATES -* Add ascii_str[n]icmp and rfc1459_str[n]icmp for use with alists. -* Make nick+channel name lookups handled according to 005 CASEMAPPING! -* Begin the work of "normalizing" argument handling to /dcc commands. -* Convert some more dcc commands, making progress! -* Fix pf problems with tabkey.jm -* Add "UNPRINTABLE" as a mangle type, remove all non-printable chars. -* Add /set old_math_parser, to turn on the old math parser (don't do this! :P) -* Whack /xdebug old_math -* Rename 'altchan.bj' to 'altchan' -* Add new server state, "ERROR" which triggers for non-recoverable socket errs. -* Try to give some trailing context for unmatched braces/bracket/parens. -* Fix bug in marshall_getaddrinfo. DOH! -* Add humanize_number() to compat.c, and fix compiler warnings. -* Change /exec -out to output to the current target, (*gulp*) -* Add /lastlog -mangle to permit you to match against mangled lines. -* Add per-window activity data, for weirdo and howl, see UPDATES -* Initialize activity_format and activity_data when creating window. doh! -* Fix /dcc get, and I probably should fix other things as well. -* Add a couple of new behaviors for /dcc get, see UPDATES -* Fix a bunch of compiler warnings. -* Release epic5-0.0.6 (Osculator) -* Fix "ALL" mangle level to not include "UNPRINTABLE" -* Fix /on 367 in 2.8script, from larne. -* Wrap output caused by /exec callbacks in message_from()s, for weirdo. -* Wrap scripted set callbacks in window_display = 0 to simulate /on ^set. -* Add /window flush_scrollback, see UPDATES -* Fix braino that caused /set's in your ircrc to be echoed. -* Add configure glop to figure out intmax_t on c90 systems. -* Use "intmax_t" for dcc byte counts, eliminate notion of "packets". -* Use INTMAX_FORMAT to format intmax_t's in printf formats. -* Change %D status bar expando to look like "0.1Kb of 2.3Mb" (no packets) -* Choke on dcc send offers that don't have file sizes. -* Make a feeble attempt to handle 32-bit rollover on dcc get's > 2gb. -* Use "intmax_t" for the new math parser, 64 bit int's ahoy! -* Use INTMAX_FORMAT to format intmax_t's in new math parser. -* Fix bug with comma operator in new math parser that crazyeddy found. -* Whack support for 7 bit terminals (8 bit support is now assumed) -* Whack support for /set eight_bit_characters -* Whack support for /set beep_max, tab, tab_max, and nd_space_max -* A new $mask() from jm, who needs to write an UPDATES entry for me. =) -* Split handling of ESC seqs out of normalize_string() into skip_esc_seq(). -* Remove some now unused xdebugs, fix compile warnings. -* Fix $stripc() to be a clone of $stripcrap(), just to strip colors -* Nix the now unused strcpy_nocolorcodes(). -* Fix up read_color_seq() to return an offset, not ptr, a la skip_ctl_c_seq(). -* Fix mangle_line() to use read_color_seq instead of skip_ctl_c_seq -* Nix the now unused skip_ctl_c_seq(). Only one thing now reads ^C's! HUZZAH. -* Rename skip_esc_seq() to read_esc_seq() just because. -* Begin moving logic|display_attributes towards a change model system -* Begin a radical change on how characters are given "state" (see source) -* Basically 8 bit chars (except c1 chars) are treated as "always printable" now -* Mangle a few other callers to logic_attributes, i'm sure these are b0rked. -* Fix some bugs, naturally. -* Nix the (apparantly) unused normalize_never_xlate global variable. -* Add function comments to some stuff in screen.c (comments! the horor!) -* Move read_esc_seq so it's closer to read_color_seq. -* State 1 chars (C1 chars) are stripped unless /set allow_c1_chars -* State 6 chars (Control chars) are stripped unless TERM_CAN_GCHAR is set -* State 4 chars (Highlight chars) are handled singly -* Plus, ALL_OFF is not generated unless you do an ALL_OFF! HUZZAH! -* Nix the last vestiges of the unsupported ROM_CHAR feature. -* Nix some now unused function decls in screen.h -* Add new_normalize_line, which is a unified normalizer/mangler (*gulp*) -* Cut over $stripcrap() to use new_normalize_line (*double gulp*) -* Rename "ANSI" mangle type to "NORMALIZE", but still accept "ANSI" -* Nix the gxlate table, and change ^T from State 4 to State 6 character. -* Add support for dgets buffer type -2 (only return full buffers) -* Use buffer type -2 for reading nonblocking dns addrs, fixes probs on solaris. -* Fix alignment issues on sparc. Thanks to crapple for his assistance! -* Convert the other users of mangle_line() to new_normalize_string (*gulp!*) -* Fix another 32-bit/64-bit cast problem with karll arrays (rb crapple) -* Include if we can, for no particular reason... -* Nix now unused mangle_line(). yay! -* Use (intptr_t) instead of (intmax_t) to treat pointers as integers... -* Try to handle failures from the dns helpers with more grace. -* Add the idea of a "visible" and "invisible" lastlog entry -* Always skip "invisible" lastlog entries, handle them when trimming, etc. -* Rename remove_from_lastlog() to trim_lastlog() and have it do looping -* Unconditionally keep every item in the lastlog, even if it's "hidden". -* When screen changes width, purge+recreate all window's scrollback -* Add /window rebuild_scrollback to manually invoke this process. -* For now, auto-recreate unholds all, and cancels scrollback -* Add /window auto_scrollback to opt-out of auto-recreate feature -* Store each window's width individually, don't refer to server -* Use each window's personal width to re-break lines (more on this later) -* Fix so "/window lastlog foo" doesn't delete your lastlog! -* Change all the builtin functions to use new_normalize_string(). -* Change the input prompt to use new_normalize_string(). -* Add /set mangle_display. HUZZAH! -* Change the display stuff to new_normalize_string() and /set mangle_display -* Whack the now unused normalize_string(). HUZZAH! HUZZAH! HUZZAH! -* Change the seperator of the mangler-type-parser to be spaces and not commas. -* Start keeping a monotonically increasing refnum for all lastlog items -* Change add_to_lastlog() to return the lastlog refnum -* Change add_to[_window]_scrollback]() to take the lastlog refnum -* Cross-link scrollback items with the corresponding lastlog refnum. -* Save scrollback/hold position across scrollback rebuilds -* This means rebuilding doesn't affect scrollback/hold users! HUZZAH! -* Whack the now unnecessary /window auto_scrollback (mis)feature. -* Don't unconditionally unclear after rebuild, if everything still fits. -* Fix /xecho -x -* Remove /set alt_charset, blink_video, bold_video, color, display_ansi -* Remove /set display_pc_characters, inverse_video, underline_video. HUZZAH! -* Force \r (carriage return) to be type 5 char (never printable ever) -* Handle \f as a special case in new_normalize_string for the status bar. -* Do some re-org in screen.c, screen.h -* Roll window_disp() into its only caller, add_to_window(). -* Change create_new_screen() into a void function -* Nix some func decls in windows.h that don't exist any more -* Add message_setall(), lets you save to_window on the message_from stack. -* Replace users of message_to() with message_setall(). -* Replace direct users of to_window with message_setall(). yay! -* /XECHO got rewritten as part of this. See UPDATES -* Fix various compiler warnings. -* Add a bsd licensed base64 encode/decode in compat.c -* Add $b64encode() and $b64decode(). -* Make the new math parser not slurp up function param lists in lvalues -* Make function calling a full blown operator in the new math parser. -* Call remove_brackets() in call_function -* All this will permit $foo[bar](args) to work as well as ${foo[bar](args)}. -* Remove some unused global variables -* Permit function calls on rval in new math parser, by special request of ce. -* Fix /away -all so it doesn't error on gaps in server list (weirdo) -* Fix bogon in /xecho. doh. -* Fix /who -real so it matches both with and without the hopcount. -* Convert all uses of message_to() to message_setall(). yay! -* Permit alias_special_char() to slurp up function calls for new math. sigh. -* Add the 'highlight' script which implements the highlight-ignore thingee -* Whack the 'highlight ignore' feature as per discussion on the list. -* Add flush_all_symbols() which does a total cleanup of symbols at exit-time. -* Fix a few bugs -* Use flush_all_symbols() instead of /dump to catch memory leaks. -* Release epic5-0.0.7 (Disaffection) -* New file, levels.c, holds all the Mask and window level manip stuff. -* Move level_to_str/str_to_level, mask_to_str/str_to_mask to levels.c -* Change #define LEVEL_*'s into (int)s -* Use BIT_VALID() instead of NUMBER_OF_LEVELS, whack NUMBER_OF_LEVELS. -* Whack hardcoded level_types char array. yay! -* Change users of "LEVEL_CURRENT" into "LEVEL_NONE" and whack "LEVEL_CURRENT" -* Add "OTHER" window level, as replacement for "CRAP" -* Continue to honor "CRAP" as a synonym for "OTHER". -* New function $levelctl(), to add/query window levels. -* Window/lastlog levels can now be added at runtime. HUZZAH! -* I forgot that the level names are supposed to be plural (as per UPDATES). -* Stop doing any nagging on /quote. -* Regress temporarily with handling protocol messages -* This ends the final two users of find_fixed_array_item(). -* Nix find_fixed_array_item() and anything associated with it. -* Fix braino. -* Switch users of LEVEL_CRAP to LEVEL_OTHER. yay! -* Whack some unused functions and decls, make *toa() funcs return const. -* Roll get_window_by_name() into get_window_by_desc(), it's only user. -* DBM (hash table) support. See UDPATES -* Check for in configure, don't do DBM if it is absent. -* $dbmctl() always no-ops, returns empty string if dbm not available. -* Add 'd' to $info(o) if DBM support is included -* Add a check for solaris cc, moxy up the CFLAGS for larne. -* Fix compile breakage if both tparm() and base64() are missing. doh. -* Fail when maximum number of levels have been added. -* Note a few places the window refnum is changed. -* Add a pd implementation of sdbm, make $dbmctl() use it. -* Make configure warn harder if it looks like termcap/terminfo not found. -* Normalize the sdbm code, so it fits in with the epic way of doing things. -* Fix several bogons in add_to_log, found by ce. -* Add /on keybinding. Why do I know I'm going to regret this one? -* Add partial implementation of $xform() (see UPDATES) -* Add shell of implementation of new_send_text() which i hope to finish... -* Fix bug in $b64decode() -* Add /window indent, allowing you to overrule /set indent per-window basis. -* Make window breaking use /window indent -* But /set indent still overrules any /window indent's you've set. :/ -* Fix $windowctl(GET TOPLINE ) -- is numbered from 1, not 0. -* Implement xforms for CTCP. -* Fix $urlencode() so it encodes the + char. -* Fix various compiler issues. -* Release epic5-0.0.8 (Prevarication) -* Fix various larnification issues uncovered by ircfuzz. -* Fix make install issue found by nutbar (thanks!) -* Release epic5-0.2.0 (Vicissitude) +* Make GET_INT_ARG() support 64 bit ints, for future use +* Make $fseek() support 64 bit file offsets (yay!) +* Begin converting some time_t uses over to 64 bits, Just In Case +* Make $numsort(), $strtol(), $tobase() support 64 bit ints. +* Make $stat() support 64 bit ints where possible. Date: Wed, 29 Mar 2006 22:49:26 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: TODO-BUGS Log message: -Sync TODO-BUGS to reality, i guess people are finally starting to find some unsurprising bugs, if anyone else has noticed anything else that's been acting weird please report!. now kreca can get to work ;p ---------------------- diff included ---------------------- diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Sat Mar 18 05:10:02 2006 +++ amn/TODO-BUGS Wed Mar 29 22:46:59 2006 @@ -8,7 +8,11 @@ ? = undecided/closed votes. ## bugs. -NONE +$ =nick= bug: if you use /msg nic and their nick ends in a \ + =nick= it prefixes it with another \, so it'll be nick\\ +$ if you /msg #channel + where #channel != $C + it'll show up formatted as a public to $C ## some bugs listed below.(not a huge priority for fixing) $ /bwk does not show if the word is a kick or bwk after reloading. however Date: Sat, 1 Apr 2006 01:35:14 -0500 (EST) From: zak@ircii.org (Zak) Modified Files: CHANGES TODO-BUGS core/dcc.m core/hooks.m core/server.m core/ehelp.m Log message: -add a request to TODO-BUGS -remove dcc cluttered aliases no one probably uses -make /autoget work again -/ptrap now does timestamps -fix braino in /ehelp there was 2 versions of /shelp by accident renamed static shelp to svhelp(server help) ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Sun Mar 5 11:30:55 2006 +++ amn/CHANGES Sat Apr 1 01:31:21 2006 @@ -168,3 +168,11 @@ some specified word or phrase in the hidden channel you should see something like *** (trap) xcrapple in #channel at [window #3] at this time it doesn't tell which trigger was set off. //zak + +4.1.06 +-cleanup dcc, make /autoget work again //zak +-add timestamp to /ptrap it's in a static form at this time using $Z //zak +-fix braino in /ehelp noticed by xavier rename shelp to /svhelp (server help) + /shelp (shitlist help) which caused a conflict when shitlist module was + loaded. //zak +-sync TODO-BUGS to reality //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Wed Mar 29 22:46:59 2006 +++ amn/TODO-BUGS Sat Apr 1 01:18:13 2006 @@ -25,6 +25,7 @@ @ make * wildcard actually work in /trickle @ add some topwin module, kreca has to start a discussion about some topwin script he might have permission for us to use/modify/rip ;) +@ make input_prompt save/sbars on /tsave requested by dan. ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. diff -aruN amn.orig/core/dcc.m amn/core/dcc.m --- amn.orig/core/dcc.m Sun Jan 8 16:00:41 2006 +++ amn/core/dcc.m Sat Apr 1 01:16:17 2006 @@ -14,9 +14,6 @@ alias dcg dcc close get $* alias dcs dcc close send $* alias dcx dcc close chat $* -alias dcxa dcc close chat $* -alias dcsa dcc close send $* -alias dcga dcc close get $* alias dca dcc closeall alias dcn {dcc close * $0} alias dkill dcn $* @@ -27,7 +24,7 @@ alias uldir cd $* ## config alias. -alias autoget {config m $*} +alias autoget dccag $* ## hooks. on ^211 * { diff -aruN amn.orig/core/ehelp.m amn/core/ehelp.m --- amn.orig/core/ehelp.m Sun Mar 5 02:59:29 2006 +++ amn/core/ehelp.m Sat Apr 1 01:26:15 2006 @@ -19,7 +19,7 @@ //echo cidhelp <cid help> cid/accept (umode +g) help. [core] //echo fhelp <look/feel help> amnesiac look/feel help menu. [core] //echo ghelp <general help> general client/user cmds help. [core] - //echo shelp <server help> server/connection help cmds. [core] + //echo svhelp <server help> server/connection help cmds. [core] //echo mhelp <module help> module help menu. [core] //echo winhelp <window help> window shortcuts help menu. [core] //echo dcchelp <dcc help> dcc usage/binds help menu. [core] diff -aruN amn.orig/core/hooks.m amn/core/hooks.m --- amn.orig/core/hooks.m Sun Mar 5 11:14:16 2006 +++ amn/core/hooks.m Sat Apr 1 01:21:58 2006 @@ -36,7 +36,7 @@ ^on #-$hh 4 '% % *\\\\[$$pubtrap\\\\]*' { @ :window = winchan($1); if (!winvisible($window)) { - xecho -b -c (trap) $0 in $1 at [window #$window] + xecho -b -c $Z (trap) $0 in $1 at [window #$window] } } } diff -aruN amn.orig/core/server.m amn/core/server.m --- amn.orig/core/server.m Sun Jan 29 05:05:13 2006 +++ amn/core/server.m Sat Apr 1 01:25:52 2006 @@ -19,7 +19,7 @@ } alias wns wcs $* -alias shelp servhelp +alias svhelp servhelp alias servhelp { if (!$[0]) { From: Kreca Date: Mon, 10 Apr 2006 15:35:56 +0200 (CEST) -fix send public other & clean up the file //kreca This was a lot of work, public other is already mixed up with send public other (we have no real public other format at this point) fix up all the lame usage of _r2 _r3 _r4 *COUGH* *COUGH* check the main.m commits Modified files amn/core/main.m amn/core/modeshow.m amn/core amn/TODO-BUGS amn/CHANGES amn diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES 2006-04-01 06:31:21.000000000 +0000 +++ amn/CHANGES 2006-04-10 14:31:11.000000000 +0000 @@ -176,3 +176,6 @@ /shelp (shitlist help) which caused a conflict when shitlist module was loaded. //zak -sync TODO-BUGS to reality //zak + +4.10.06 +-fix send public other & clean up the file //kreca diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS 2006-04-01 06:18:13.000000000 +0000 +++ amn/TODO-BUGS 2006-04-10 14:32:57.000000000 +0000 @@ -10,9 +10,6 @@ ## bugs. $ =nick= bug: if you use /msg nic and their nick ends in a \ =nick= it prefixes it with another \, so it'll be nick\\ -$ if you /msg #channel - where #channel != $C - it'll show up formatted as a public to $C ## some bugs listed below.(not a huge priority for fixing) $ /bwk does not show if the word is a kick or bwk after reloading. however @@ -51,6 +48,11 @@ ## bugs fixed. / projects done. +4.10.06 +$ if you /msg #channel + where #channel != $C + it'll show up formatted as a public to $C + 3.18.06 - this hasnt been reported in some time, if someone still encounters this bug. please snapshot the screen with how the scan output looks. //zak - patterns/something still seems screwy from time to time with so-called diff -aruN amn.orig/core/main.m amn/core/main.m --- amn.orig/core/main.m 2006-03-05 16:18:12.000000000 +0000 +++ amn/core/main.m 2006-04-10 14:30:18.000000000 +0000 @@ -72,9 +72,9 @@ @_jwin=[on] @_pubnick=N @_tss=[on] -@_r2=[dugewfe] -@_r3=[efguowe] -@_r4=[fgsiuso] +@_r2=[] +@_r3=[] +@_r4=[] @_boxhead = [ $(hwht)Ú$(cl)Ä$cparse($(c1)Ä)$(cl)ÄÄÄÄÄ$cparse($(c1)ÄÄÄ)$cparse($(c2)ÄÄÄ)$cparse($(c1)Ä)$(cl)Ä$(hblk)Ä- - Ä -$(cl)] @_boxfoot = [ $cparse($(c1)À)$cparse($(c3)Ä)$(hblk)- ÄÄ -$(cl)] @_ubanself=[off] diff -aruN amn.orig/core/modeshow.m amn/core/modeshow.m --- amn.orig/core/modeshow.m 2006-01-08 21:02:22.000000000 +0000 +++ amn/core/modeshow.m 2006-04-10 14:28:45.000000000 +0000 @@ -23,6 +23,16 @@ #end of config +alias highlightpub { + fe (_pubnick _r2 _3 _4) cur { + eval local cursearch $$$cur + if ( strlen($cursearch) && match($cursearch* $1-) > 0 ) { + return $(hwht)$0$(cl) + } + } + return $0 +} + alias pubpad { @:thenick=word(0 $split(: $2)) @:thechan=word(1 $split(: $2)) @@ -40,13 +50,7 @@ @:thenick=[ $thenick] } } -/* split this up in two if statements, expression has too many operands */ - if ( match($_pubnick* $3-) > 0 || match($_r2* $3-) > 0 ) { - @:thenick=[$(hwht)$(thenick)$(cl)] - } - if (match($_r3* $3-) > 0 || match($_r4* $3-) > 0) { - @:thenick=[$(hwht)$(thenick)$(cl)] - } + @:thenick = highlightpub($thenick $3-) if (!iscurchan($thechan)) { return $(extravar)$0$(thenick):$thechan @@ -83,19 +87,31 @@ @extravar = [] @thenick =[$0] if (showop == [on]) { - if (ischanop($0 $1)) { + if (ischanop($thenick $1)) { @extravar = [$(c5)@$(cl)] - } else if (ischanvoice($0 $1)) { + } else if (ischanvoice($thenick $1)) { @extravar = [$(c5)+$(cl)] } } - if (match($_pubnick* $2-) > 0) { - @thenick=[$(hwht)$0$(cl)] - } - //echo $fparse(format_public_other $(extravar)$(thenick) $1 $2-) + @:thenick = highlightpub($thenick $2-) + //echo $fparse(format_public_other $(extravar)$(thenick) $1 $2-) } on ^send_public * { - //echo $fparse(format_send_public $N:$0 $1-) + if ( iscurchan($0)) { + //echo $fparse(format_send_public $N:$0 $1-) + } { + /* Compensate for lame setup of send_public_other */ + @extravar = [] + @thenick =N + if (showop == [on]) { + if (ischanop($N $0)) { + @extravar = [$(c5)@$(cl)] + } else if (ischanvoice($N $0)) { + @extravar = [$(c5)+$(cl)] + } + } + //echo $fparse(format_public_other $(extravar)$(thenick) $0 $1-) + } } From: Kreca Date: Mon, 10 Apr 2006 23:07:25 +0200 (CEST) Clean up color.m. Replace the human readable color vars with a translation string a lot cleaner and even error checking upon errnous input Modified files amn/core/color.m amn/core amn/TODO-BUGS amn/CHANGES amn diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES 2006-04-10 14:31:11.000000000 +0000 +++ amn/CHANGES 2006-04-10 22:04:32.000000000 +0000 @@ -179,3 +179,4 @@ 4.10.06 -fix send public other & clean up the file //kreca +-clean up color.m + report errnous input //kreca \ No newline at end of file diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS 2006-04-10 14:32:57.000000000 +0000 +++ amn/TODO-BUGS 2006-04-10 22:05:12.000000000 +0000 @@ -18,7 +18,6 @@ (will fix someday) ## higher priority todo. (stuff that needs to done before upcoming release) -@ cleanup the silly ugly usages of stupid arrays in color.m @ make * wildcard actually work in /trickle @ add some topwin module, kreca has to start a discussion about some topwin script he might have permission for us to use/modify/rip ;) @@ -49,9 +48,11 @@ ## bugs fixed. / projects done. 4.10.06 -$ if you /msg #channel +! if you /msg #channel where #channel != $C it'll show up formatted as a public to $C +! cleanup the silly ugly usages of stupid arrays in color.m + 3.18.06 - this hasnt been reported in some time, if someone still encounters this bug. please snapshot the screen with how the scan output looks. //zak diff -aruN amn.orig/core/color.m amn/core/color.m --- amn.orig/core/color.m 2006-01-25 13:35:54.000000000 +0000 +++ amn/core/color.m 2006-04-10 22:03:17.000000000 +0000 @@ -1,121 +1,68 @@ # Copyright (c) 2003-2006 Amnesiac Software Project. # See the 'COPYRIGHT' file for more information. subpackage color - +@translatetbl=[clear.cl!blue.blu!green.grn!cyan.cyn!red.red!magenta.mag!yellow.yel!white.wht!hblack.hblk!hblue.hblu!hgreen.hgrn!hcyan.hcyn!hred.hred!hmagenta.hmag!hyello.hyel!hwhite.hwht!bwhite.bwht!bmagenta.bmag!bblue.bblu!bred.bred!bblack.bblk!bgreen.bgrn!byellow.byel!bcyan.bcyn] alias colour color $* -alias color { +alias sbcolour sbcolor $* -@:clear = [$(cl)] -@:blue = [$(blu)] -@:green = [$(grn)] -@:cyan = [$(cyn)] -@:red = [$(red)] -@:magenta = [$(mag)] -@:yellow = [$(yel)] -@:white = [$(wht)] -@:hblack = [$(hblk)] -@:hblue = [$(hblu)] -@:hgreen = [$(hgrn)] -@:hcyan = [$(hcyn)] -@:hred = [$(hred)] -@:hmagenta = [$(hmag)] -@:hyello = [$(hyel)] -@:hwhite = [$(hwht)] -@:bwhite = [$(bwht)] -@:bmagenta = [$(bmag)] -@:bblue = [$(bblu)] -@:bred = [$(bred)] -@:bblack = [$(bblk)] -@:bgreen = [$(bgrn)] -@:byellow = [$(byel)] -@:bcyan = [$(bcyn)] +alias colorusage { + abwecho available colors $(cyn): + @:outp=[] + @:ctr=0 + fe ( $split(! $translatetbl) ) curcol { + if ( ctr > 8) { + abwecho $outp + @:outp=[] + @:ctr=0 + } + @:ctr=ctr+1 + @:name = word(0 $split(. $curcol)) + @:var = word(1 $split(. $curcol)) + @:outp = [$(outp)$($var)$name%n ] + } + abwecho $outp +} -/* -@:clear = [%n] -@:blue = [%b] -@:green = [%g] -@:cyan = [%c] -@:red = [%r] -@:magenta = [%m] -@:yellow = [%y] -@:white = [%w] -@:hblack = [%K] -@:hblue = [%B] -@:hgreen = [%G] -@:hcyan = [%C] -@:hred = [%R] -@:hmagenta = [%M] -@:hyello = [%Y] -@:hwhite = [%W] -@:bwhite = [%7] -@:bmagenta = [%5] -@:bblue = [%4] -@:bred = [%1] -@:bblack = [%0] -@:bgreen = [%2] -@:byellow = [%3] -@:bcyan = [%6] -*/ - if ([$0]) {@c1 = [$($0)]} - if ([$1]) {@c2 = [$($1)]} - if ([$2]) {@c3 = [$($2)]} - if ([$3]) {@c4 = [$($3)]} - if ([$3]) {@c5 = [$($4)]} -if (![$1]) { -abwecho $a.ver usage $(cyn):$(cl) /color color1 color2 color3 color4 color5 -abwecho color config set to $(c1)color1 $(c2)color2 $(c3)color3 $(c4)color4 $(c5)color5 -abwecho available colors $(cyn): $(cl)clear $(blu)blue $(grn)green $(cyn)cyan $(red)red $(mag)magenta $(yel)yellow $(wht)white -abwecho $(hblk)hblack $(hblu)hblue $(hgrn)hgreen $(hcyn)hcyan $(hred)hred $(hmag)hmagenta $(hyel)hyello $(hwht)hwhite $(bwht)bwhite -abwecho $(bmag)bmagenta$(cl) $(bblu)bblue$(cl) $(bred)bred$(cl) $(bblk)bblack$(cl) $(byel)byellow$(cl) $(bcyn)bcyan$(cl) - }{ -abwecho color config set to $(c1)color1 $(c2)color2 $(c3)color3 $(c4)color4 $(c5)color5 +alias getcolor { + fe ( $split(! $translatetbl) ) curcol { + @:name = word(0 $split(. $curcol)) + @:var = word(1 $split(. $curcol)) + if ( name == [$0] ) { + return $($var) + } + } + echo Unknown colour $0 +} -^eval load $(loadpath)core/fsets.m -^eval load $(loadpath)core/arrays.m -#^update.f -^getusers +alias color { + if (#>4) { + @c1 = getcolor($0) + @c2 = getcolor($1) + @c3 = getcolor($2) + @c4 = getcolor($3) + @c5 = getcolor($4) + abwecho color config set to $(c1)color1 $(c2)color2 $(c3)color3 $(c4)color4 $(c5)color5 + ^eval load $(loadpath)core/fsets.m + ^eval load $(loadpath)core/arrays.m + ^getusers + }{ + abwecho $a.ver usage $(cyn):$(cl) /color color1 color2 color3 color4 color5 + abwecho color config set to $(c1)color1 $(c2)color2 $(c3)color3 $(c4)color4 $(c5)color5 + colorusage } } -alias sbcolour sbcolor $* alias sbcolor { -@:clear = [$(cl)] -@:blue = [$(blu)] -@:green = [$(grn)] -@:cyan = [$(cyn)] -@:red = [$(red)] -@:magenta = [$(mag)] -@:yellow = [$(yel)] -@:white = [$(wht)] -@:hblack = [$(hblk)] -@:hblue = [$(hblu)] -@:hgreen = [$(hgrn)] -@:hcyan = [$(hcyn)] -@:hred = [$(hred)] -@:hmagenta = [$(hmag)] -@:hyello = [$(hyel)] -@:hwhite = [$(hwht)] -@:bwhite = [$(bwht)] -@:bmagenta = [$(bmag)] -@:bblue = [$(bblu)] -@:bred = [$(bred)] -@:bblack = [$(bblk)] -@:bgreen = [$(bgrn)] -@:byellow = [$(byel)] -@:bcyan = [$(bcyn)] - if ([$0]) {@sc1 = [$($0)]} - if ([$1]) {@sc2 = [$($1)]} - if ([$2]) {@sc3 = [$($2)]} - if ([$3]) {@sc4 = [$($3)]} -if (![$1]) { -abwecho $scriptname usage $(cyn):$(cl) /sbcolor color1 color2 color3 color4 -abwecho color statbar config set to $(sc1)color1 $(sc2)color2 $(sc3)color3 $(sc4)color4 -abwecho available colors $(cyn): $(cl)clear $(blu)blue $(grn)green $(cyn)cyan $(red)red $(mag)magenta $(yel)yellow $(wht)white -abwecho $(hblk)hblack $(hblu)hblue $(hgrn)hgreen $(hcyn)hcyan $(hred)hred $(hmag)hmagenta $(hyel)hyello $(hwht)hwhite $(bwht)bwhite -abwecho $(bmag)bmagenta$(cl) $(bblu)bblue$(cl) $(bred)bred$(cl) $(bblk)bblack$(cl) $(byel)byellow$(cl) $(bcyn)bcyan$(cl) -} -{abwecho color statbar config set to $(sc1)color1 $(sc2)color2 $(sc3)color3 $(sc4)color4 -^eval ^load $(loadpath)stats/$statbar -#update.f -} + if (#>3) { + @sc1 = getcolor($0) + @sc2 = getcolor($1) + @sc3 = getcolor($2) + @sc4 = getcolor($3) + abwecho color statbar config set to $(sc1)color1 $(sc2)color2 $(sc3)color3 $(sc4)color4 + ^eval ^load $(loadpath)stats/$statbar + } { + abwecho $scriptname usage $(cyn):$(cl) /sbcolor color1 color2 color3 color4 + abwecho color statbar config set to $(sc1)color1 $(sc2)color2 $(sc3)color3 $(sc4)color4 + colorusage + } } Date: Fri, 21 Apr 2006 08:21:13 -0400 (EDT) From: zak@ircii.org (Zak) Modified Files: CHANGES TODO-BUGS amn.epic quit.reasons docs/E5-KNOWNBUGS core/compat.m : main.m : save.m Log message: -sync E5-KNOWNBUGS -prioritize,sync TODO-BUGS -increment minor to 8 (very close to a new release) -remove so-called 'improved' reconnect script which was taken from source/scripts directory, if anyone has any better idea's for a reconnect script, even one with some idea's please contact me -/set input_prompt now get's /saved -remove some 'lame quit reasons' ---------------------- diff included ---------------------- diff -aruN amn.orig/CHANGES amn/CHANGES --- amn.orig/CHANGES Mon Apr 10 18:04:32 2006 +++ amn/CHANGES Fri Apr 21 08:18:28 2006 @@ -179,4 +179,14 @@ 4.10.06 -fix send public other & clean up the file //kreca --clean up color.m + report errnous input //kreca \ No newline at end of file +-clean up color.m + report errnous input //kreca + +4.21.06 +-sync E5-KNOWNBUGS //zak +-prioritize,sync TODO-BUGS //zak +-increment minor to 8 (very close to a new release) //zak +-remove so-called 'improved' reconnect script which was taken from +source/scripts directory, if anyone has any better idea's for a reconnect +script, even one with some idea's please contact me //zak +-/set input_prompt saves with /save //zak +-remove some 'lame quit reasons' requested by grimzy //zak diff -aruN amn.orig/TODO-BUGS amn/TODO-BUGS --- amn.orig/TODO-BUGS Mon Apr 10 18:05:12 2006 +++ amn/TODO-BUGS Fri Apr 21 08:15:18 2006 @@ -7,22 +7,22 @@ $ = knownbug. ? = undecided/closed votes. -## bugs. -$ =nick= bug: if you use /msg nic and their nick ends in a \ - =nick= it prefixes it with another \, so it'll be nick\\ +## high priority knownbugs. +$ timestamping on away stays static(doesn't change) -## some bugs listed below.(not a huge priority for fixing) +## high priority todo. (stuff that needs to done before upcoming release) +@ make * wildcard actually work in /trickle +@ add some topwin module, kreca has to start a discussion about some topwin + script he might have permission for us to use/modify/rip ;) + +## some bugs listed below.(not a huge priority for fixing) [Lower Priority] $ /bwk does not show if the word is a kick or bwk after reloading. however whatever it was set to works properly but it's kinda annoying when everything outputs at bk when it's not actually set to bk. (will fix someday) +$ =nick= bug: if you use /msg nic and their nick ends in a \ + =nick= it prefixes it with another \, so it'll be nick\\ -## higher priority todo. (stuff that needs to done before upcoming release) -@ make * wildcard actually work in /trickle -@ add some topwin module, kreca has to start a discussion about some topwin - script he might have permission for us to use/modify/rip ;) -@ make input_prompt save/sbars on /tsave requested by dan. - ## lower priority requests. @ add a topiclock alias (like bitchx) for xavier. @@ -47,6 +47,9 @@ ## bugs fixed. / projects done. +4.21.05 - slightly diff idea implimented input_prompt use /save instead. +! make input_prompt save/sbars on /tsave + 4.10.06 ! if you /msg #channel where #channel != $C diff -aruN amn.orig/amn.epic amn/amn.epic --- amn.orig/amn.epic Sun Mar 5 00:27:59 2006 +++ amn/amn.epic Fri Apr 21 08:10:36 2006 @@ -81,14 +81,12 @@ addset auto_rejoin bool addset auto_rejoin_delay int addset auto_reconnect_delay int -addset reconnect_time int addset history_circleq bool addset history_save_file str addset history_remove_dupes bool addset history_save_position bool addset history_timestamp bool addset auto_reconnect bool -addset reconnect_time int xaddset num_of_whowas int xaddset show_end_of_msgs bool xaddset show_who_hopcount bool diff -aruN amn.orig/core/compat.m amn/core/compat.m --- amn.orig/core/compat.m Sat Feb 25 20:36:07 2006 +++ amn/core/compat.m Fri Apr 21 08:07:20 2006 @@ -277,146 +277,6 @@ }; }; -## much improved reconnect script taken from epic5/scripts dir -## untested. -Zak - -alias network (action, network) { - switch ($action) { - (add) { - if (network != []) { - fec ($network) i { - if (!isalpha($i)) { - echo syntax error: network name must be only alpha - return - } - } - if (reconn[groups][$network]) { - echo network $network already exists - } else { - @ reconn[groups][$network] = 1 - echo network $network added - } - } else { - echo not enough params. syntax: /network add - } - } - (del) { - if (network != []) { - if (reconn[groups][$network]) { - ^assign -reconn.groups.$network - ^assign -reconn.channels.$network - echo network $network removed - } else { - echo network $network doesn't exist - } - } else { - echo not enough params. syntax: /network del - } - } - (list) { - @ :j = 0 - foreach reconn.groups i { - @ j++ - echo $i - } - if (j == 0) { - echo no networks - } - } - (*) { - echo syntax: /network [[add|del ]|list] - } - } -} -on #-SERVER_STATUS 27 "% % %" { - switch ($2) { - (EOF) (ERROR) { - @ :gr = servergroup($0) - if (reconn[groups][$gr]) { - if ([$1] == [ACTIVE]) { - @ reconn[channels][$gr] = mychannels($0) - } - @ reconn[timeout][$gr] = [$getset(reconnect_time) $0] - } - } - (ACTIVE) { - @ :gr = servergroup($0) - if (reconn[channels][$gr] != []) { - fe ($reconn[channels][$gr]) i { - xeval -s $0 JOIN $i - } - ^assign -reconn.channels.$gr - } - } - (*) { - if ([$3] == [CLOSING] && [$2] != [EOF] && [$2] != [ERROR]) { - @ :gr = servergroup($0) - ^assign -reconn.timeout.$gr - ^assign -reconn.channels.$gr - } - } - } -} -timer -ref _reconn -repeat -1 -GENERAL 60 _reconn -alias _reconn { - foreach reconn.timeout i { - @ :minleft = word(0 $reconn[timeout][$i]) - @ :lastsv = word(1 $reconn[timeout][$i]) - @ minleft-- - if (minleft > 0) { - @ reconn[timeout][$i] = [$minleft $lastsv] - } else { - ^ASSIGN -reconn.timeout.$i - @ :found = [] - fe ($winrefs()) win { - if (winserv($win) == lastsv) { - PUSH found $win - } - } - if (found != []) { - @ :next = nextserv($lastsv) - if (next != -1) { - fe ($found) j { - window refnum $j SERVER $next - } - } - } - } - } -} -alias nextserv (ref) { - @ :gr = servergroup($ref) - if (gr == []) { - return -1 - } - @ :servers = serverctl(GMATCH $gr) - @ :num = numwords($servers) - if (num == 0) { - return -1 - } - if (num == 1) { - return $word(0 $servers) - } - @ :found = -1 - @ :idx = 0 - fe ($servers) i { - if (i == ref) { - @ found = idx - break - } - @ idx++ - } - if (found == -1) { - return -1 - } - @ num-- - if (num == found) { - return $word(0 $servers) - } else { - return $word(${found+1} $servers) - } -} - #things below are just various things taken from the epic5/scripts source dir #to make this script compatable with epic5 without needing to use the builtins #or too many nonessential aliases/hooks/crap. and some actual improvements. diff -aruN amn.orig/core/main.m amn/core/main.m --- amn.orig/core/main.m Mon Apr 10 10:30:18 2006 +++ amn/core/main.m Fri Apr 21 08:07:58 2006 @@ -40,7 +40,7 @@ @awayr=[Not Here] @pubtrap=[] @a.ver=[amnesiac] -@rel_id=[7] +@rel_id=[8] @a.rel=[1.3d r/$rel_id] @a.date=[20051202] @_ss=[15] diff -aruN amn.orig/core/save.m amn/core/save.m --- amn.orig/core/save.m Sun Mar 5 11:11:36 2006 +++ amn/core/save.m Fri Apr 21 08:12:59 2006 @@ -58,7 +58,7 @@ } alias setsave { - @:allsets = [history_circleq high_bit_esc dcc_sliding_window dcc_timeout auto_rejoin auto_rejoin_delay num_of_whowas auto_whowas indent mangle_logfiles suppress_server_motd show_who_hopcount show_channel_names mode_stripper clock_24hour client_information user_information notify_on_termination new_server_lastlog_level lastlog scrollback switch_channels_between_windows word_break] + @:allsets = [history_circleq high_bit_esc dcc_sliding_window dcc_timeout auto_rejoin auto_rejoin_delay num_of_whowas auto_whowas indent mangle_logfiles suppress_server_motd show_who_hopcount show_channel_names mode_stripper clock_24hour client_information user_information notify_on_termination new_server_lastlog_level lastlog scrollback switch_channels_between_windows word_break input_prompt] @rename($(savepath)$setsavefile $(savepath)$setsavefile~) @savemt = open($(savepath)$setsavefile W T) diff -aruN amn.orig/docs/E5-KNOWNBUGS amn/docs/E5-KNOWNBUGS --- amn.orig/docs/E5-KNOWNBUGS Sat Mar 18 05:11:11 2006 +++ amn/docs/E5-KNOWNBUGS Fri Apr 21 08:01:33 2006 @@ -2,7 +2,21 @@ KNOWN ERRATA (eg, bugs, or unresolved requests): ------------------------------------------------ - +* displayble_unival() returns 1 if unicode val is displayable, 0 if not. + - Used in input_do_calculate_width() + - Used in update_input() [ugh] +* calc_unival_width() returns number of columns a unicode val takes up. +* calc_unival_length() returns number of bytes a unicode sequence takes up. +* calc_unival() converts unicode sequence into an (unsigned) +* utf8_sequence() converts an (unsigned) into a unicode sequence. +* mbdata_init() loads an mb_data with an iconv dataset. +* mbdata_done() unloads an mb_data. +* decode_mb() converts "anything" into utf-8 using an mb_data. + - Used in input.c:set_input() + - Used in input.c:set_input_prompt() + - Used in screen.c:my_strlen_i() [string width counter] + - Used in screen.c:split_up_line() to count non-attribute chars. +* Some way to call an alias in a variable indirectly LOOK FOR IN THE FUTURE ----------------------- @@ -29,3 +43,4 @@ * Begin converting some time_t uses over to 64 bits, Just In Case * Make $numsort(), $strtol(), $tobase() support 64 bit ints. * Make $stat() support 64 bit ints where possible. +* Add 'channelmonitor' script from larne. Thanks! diff -aruN amn.orig/quit.reasons amn/quit.reasons --- amn.orig/quit.reasons Sat Aug 6 19:43:53 2005 +++ amn/quit.reasons Fri Apr 21 08:16:26 2006 @@ -1,6 +1,5 @@ crack the liars smile WHAT? THE ROOF IS ON FIRE? -you have the nicest teeth I ever cummed across. stop it dad! You're crushing my smokes! Guns make holes in people. Weed makes people giggle and eat cake. look at the lost souls, they seem so black. @@ -9,7 +8,5 @@ I'm your little nightmare Error 467: Illegal brain function. Process terminated Press [ESC] to detonate or any other key to explode -Backup not found! A)bort, R)etry or P)anic? A)bort, R)etry, I)gnore, V)alium? -A)bort, R)etry, P)retend this never happened... I really dispise you internet know-it-alls