#: smoke.bx by ice-man

alias icebx if ([$0]) {
 ^msg $0 no, i cant make or offer ice/bx anymore.
 ^msg $0 please dont ask, im sick of explaining@! [automsg]
}

@blnk=[\[5m]
@cl=[\[0m]
@blh=[\[34m]
@mag=[\[35m]
@cyn=[\[36m]
@wht=[\[37m]
@red=[\[31m]
@grn=[\[32m]
@yel=[\[33m]
@hblk=[\[1;30m]
@hgrn=[\[1;32m]
@hblu=[\[1;34m]
@hmag=[\[1;35m]
@hcyn=[\[1;36m]
@hwht=[\[1;37m]
@hred=[\[1;31m]
@hgrn=[\[1;32m]
@hyel=[\[1;33m]
@bblu=[\[44m]
@bblk=[\[40m]
@bred=[\[41m]
@bgrn=[\[42m]
@byel=[\[43m]
@bblu=[\[44m]
@bmag=[\[45m]
@bcyn=[\[46m]
@bwht=[\[47m]
@bg=[\[44m]

@sm.ec=[$(hblk)ú$(cl)ú$(hwht)ú$(cl)]
@sm.ec2=[$(hblk)Ä$(cl)Ä$(hwht)Ä$(cl)]
@sm.act=[$(hblk)!$(cl)]
@sm.k=[\[s!k\]]
@sm.kb=[\[s!bk\]]
@sm.ver=[\(smoke!a1\)]

^set aop off
^set auto_away on
^set auto_away_time 10
^set auto_whowas off
^set beep off
^set beep_on_msg none
^set cdcc_prompt %K[%Wc%ndcc%K]%n
^set client_information  fade away into the night..
^set channel_name_width 20
^set flood_protection off
^set kick_ops off
^set msglog_level msgs notices
^set num_opmodes 4
^eval set show_numerics_str $(sm.ec)

^set status_away $(cl)ú $(hwht)away$(cl)!
^set status_channel $(cl)$(hwht)%C
^set status_chanop $(cl)@
^set status_clock $(hwht)$sar(/:/$(cl).$(hwht)/$sar(/am/$(cl)!$(hwht)am$(cl)/$sar(/pm/$(cl)!$(hwht)pm$(cl)/%T)))
^set status_does_expandos on
^set status_lag $(cl)ú $(hwht)lag$(cl)!$(hwht)%L
^set status_mail $(cl)ú $(hwht)mail$(cl)!$(hwht)%M
^set status_mode $(cl)$(hblk)\($(cl)+$(hwht)%+$(hblk)\)
^set status_msgcount $(hwht)%^
^set status_nick $(cl)$(hwht)%N
^set status_notify $(cl)ú $(hwht)act$(cl)!$(hwht)%F
^set status_query $(cl)$(hblk)[$(cl)query$(cyn)/$(hwht)%Q$(hblk)]
^set status_server $(cl)ú $(hwht)$sar(g/./$(cl).$(hwht)/$tolower(%S))
^set status_topic $sar(/\(/\(/%-)
^set status_umode $(cl)$(hblk)\($(cl)+$(hwht)%#$(hblk)\)
^set status_users $(cl)ú o$(hwht)%! $(cl)n$(hwht)%! $(cl)i$(hwht)%! $(cl)v$(hwht)%! $(cl)f$(hwht)%!$(cl) ú 
^set status_user1 $(cl)$(hwht)Ú$(cl)Ä
^set status_user2 $(cl)³ 
^set status_user3 $(cl)$(hblk)ÄÄ$(cl)ÄÄ$(hwht)Ä¿$(cl)
^set status_user4 $(cl) ³
^set status_voice $(cl)+
^set status_format $(cl)Ú$(cl) %N%#%A]%M [On: %@%=%C%+%W] %Q %H%B
^set status_format1 %1 %@%=%N%# %S %L%A%^ %F %Q %> %3
^set status_format2 %2 %C%+%W %! %T %M %> %4
^set status_format3 $(cl)$(hblk)[$(hwht)t$(cl): %-$(hblk)]$(cl)
^set input_prompt $(hblk)ÀÄ$(cl)Ä$(hwht)>$(cl) 

^set format_away  is away, $3- [l!$tolower($msglog)]
^set format_back is back.. [gone!$1h$2m$3s]
^set format_bwall %K[%n+%Wo%K] [%Ww%nallop%K.%W$1%K/%n$2%K]%n $4-
^set format_channel_signoff $G %K[%nquit%W!%n$tolower($3)%K] [%n$1%W!%n$4-%K]%n
^set format_ctcp $(sm.ec2) %K[%Gctcp%n!%g$tolower($4-)%K] [%G$1%n!%g$2%K(%n$tolower($sar(/$N/you/$3))%K)]%n
^set format_ctcp_cloak $(sm.ec2) %C$1 %K[%c$2%K]%c requested $4- from $3
^set format_ctcp_cloak_func $(sm.ec2) %C$1 %K[%c$2%K]%c requested $4- from $3
^set format_ctcp_cloak_func_user $(sm.ec2) %C$1 %K[%c$2%K]%c requested $4- from you
^set format_ctcp_cloak_unknown $(sm.ec2) %K[%Gctcp%n!%g$tolower($4-)%K] [%G$1%n!%g$2%K/%n$tolower($sar(/$N/you/$3))%K]
^set format_ctcp_cloak_unknown_user $(sm.ec2) %K[%Gctcp%n!%g$tolower($4-)%K] [%G$1%n!%g$2%K/%n$tolower($sar(/$N/you/$3))%K]
^set format_ctcp_cloak_user $(sm.ec2) %C$1 %K[%c$2%K]%c requested $4- from you
^set format_ctcp_func $(sm.ec2) %G$1 %K[%g$2%K]%g requested $4- from
^set format_ctcp_reply $(sm.ec2) %K[%Greply%n!%g$tolower($3)%K] %K[%G$1%K(%n$4-%K)]%n
^set format_dcc_chat %K(%R$1%n!%rdcc%K)%n $3-
^set format_join $G %K[%Wjoin%n!%W$tolower($3)%K] %K[%W$1%n!%W$2%K]%n
^set format_kick $G %K[%Wkick%n!%W$tolower($2)%K] %n$3%K(%n$4-%K) [%Wby%n!%W$1%K]%n
^set format_leave $G %K[%npart%W!%n$tolower($3)%K] %K[%n$1%W!%n$2%K]%n
^set format_mode $G %K[%Wmode%n!%W$tolower($3)%K] %n$4- %K[%Wby%n!%W$1%K]%n
^set format_msg $(sm.ec2) %K[%C$1%n!%c$2%K]%n $3-
^set format_msglog [$tolower($0)!$1] ($2) $3-
^set format_names $G %KÚ%nÄÄ%WÄ %K[%Wusers%K(%W$1%n!%W$2%K)]%c $3%WÄ%nÄÄ%KÄ  ÄÄ  Ä Ä%n
^set format_names_banner $G %K³%n 
^set format_names_bot $G %KÚ%nÄÄ%WÄ %K[%Wbots%K(%W$1%n!%W$2%K)]%c $3%WÄ%nÄÄ%KÄ  ÄÄ  Ä Ä%n
^set format_names_botcolor %K[%C$0%G$[10]1%K]%n
^set format_names_footer $G %KÀÄÄ%nÄÄÄ%WÄÄÄÄÄÄÄÄÄÄÄÄÄÄ%nÄÄ %WÄ  %nÄÄÄ  %KÄ  ÄÄÄ ÄÄ ÄÄ  Ä   Ä   -%n
^set format_names_friend $G %K[%Wfriends%K(%W$1%n!%W$2%K)]%c $3%WÄ%nÄÄ%KÄ  ÄÄ  Ä Ä%n
^set format_names_friendcolor %K[%C$0%Y$[10]1%K]%n
^set format_names_ircop $G %KÚ%nÄÄ%WÄ %K[%Wircops%K(%W$1%n!%W$2%K)]%c $3%WÄ%nÄÄ%KÄ  ÄÄ  Ä Ä%n
^set format_names_nickcolor  %n$[10]1
^set format_names_nonop $G %KÚ%nÄÄ%WÄ %K[%Wnonops%K(%W$1%n!%W$2%K)]%c $3%WÄ%nÄÄ%KÄ  ÄÄ  Ä Ä%n
^set format_names_op $G %KÚ%nÄÄ%WÄ %K[%Wops%K(%W$1%n!%W$2%K)]%c $3%WÄ%nÄÄ%KÄ  ÄÄ  Ä Ä%n
^set format_names_opcolor %n$0%W$[10]1
^set format_names_shit $G %KÚ%nÄÄ%WÄ %K[%Wshitlist%K(%W$1%n!%W$2%K)]%c $3%WÄ%nÄÄ%KÄ  ÄÄ  Ä Ä%n
^set format_names_shitcolor %K[%C$0%n%R$[10]1%K]%n
^set format_names_voice $G %KÚ%nÄÄ%WÄ %K[%Wvoiced%K(%W$1%n!%W$2%K)]%c $3%WÄ%nÄÄ%KÄ  ÄÄ  Ä Ä%n
^set format_names_voicecolor %Wv%n$[10]1
^set format_nickname $G %K[%Wnick%n!%W$tolower($C)%K]%n %K[%n$1 %K-%n> %W$3%K]%n
^set format_nickname_other $G %K[%Wnick%n!%W$tolower($C)%K]%n %K[%n$1 %K-%n> %W$4%K]%n
^set format_nickname_user $G %K[%Wnick%n!%W$tolower($C)%K]%n %K[%n$1%K(%Wyou%K) -%n> %W$3%K]%n
^set format_notice %K-%P$1%K-%n $3-
^set format_public %K(%n$1%K)%n $3-
^set format_public_ar %K(%W$1%K)%n $3-
^set format_public_msg %K(%n$1%K/%n$3%K)%n $4-
^set format_public_msg_ar %K(%W$1%K/%n$3%K)%n $4-
^set format_public_notice %K-%P$1%K/%p$3%K-%n $4-
^set format_public_notice_ar %K-%P$1%K/%p$3%K-%n $4-
^set format_public_other %K(%n$1%K/%n$2%K)%n $3-
^set format_public_other_ar %K(%W$1%K/%n$2%K)%n $3-
^set format_relm [$1!$sar(g/@/@/$tolower($2))] $4-
^set format_reln -$1!$sar(/@/@/$2)- $4-
^set format_relsm (msg!$1) $2-
^set format_relsn (notice!$1) $2-
^set format_send_ctcp ¯ %K(%Gctcp%n!%g$1%K)%n $2
^set format_send_dcc_chat ¯ %K(%rdcc%n!%R$1%K)%n $2-
^set format_send_msg ¯ %K(%Cmsg%n!%c$1%K)%n $3-
^set format_send_notice ¯ %K(%Pnot%n!%p$1%K)%n $3-
^set format_send_public %K[%n$2%K]%n $3-
^set format_server_notice %n!%W$1%n!%n $2-
^set format_topic $G %K[%Wtopic%n!%W$tolower($1)%K]%n $2-
^set format_topic_change $G %K[%Wtopic%n!%W$tolower($2)%K]%n $3- %K[%Wby%n!%W$1%K]%n
^set format_topic_setby $G %K[%Wtopic%n!%W$tolower($1)%K]%n %K[%W$2%n!%W$stime($3)%K]%n
^set format_topic_unset $G %K[%Wtopic%n!%W$tolower($2)%K]%n unset %K[%Wby%n!%W$1%K]%n
^set format_users %K[%n$[10]1%K]%K[%n%n$4%W$[9]2%K]%K[%n$[33]3%K]%K[%n$[17]0%K]
^set format_version epic+bx$sar(/BitchX-//$J) + $(sm.ver)

alias & {^alias}
& bk {kb}
& gone {away}
& flm {frelm}
& fln {freln}
& flsm {say $fparse(format_relsm ! $0 $1-^O)}
& flsn {say $fparse(format_relsm ! $0 $1-^O)}
& frelm {if ([$1]) {@f.m=[$0-];userhost $0 -cmd {if ([$3]&&[$4]!=[<UNKNOWN>]){say $fparse(format_relm ! $0 $3@$4 $(f.m))}}{echo $(0): no such nick/channel}}}
& freln {if ([$1]) {@f.n=[$0-];userhost $0 -cmd {if ([$3]&&[$4]!=[<UNKNOWN>]){say $fparse(format_reln ! $0 $3@$4 $(f.n))}}{echo $(0): no such nick/channel}}}
& j {if ([$0]) {join $0-;^window bind $0}}
& k {if ([$1]) {kick $C $0 $sm.k $1-}{kick $C $0 $sm.k be gone.}}
& kb {if ([$1]) {ban $0;^kick $C $0 $sm.kb $1-}{ban $0;kick $C $0 $sm.kb be gone.}}
& sc {scan}
& stat.upd {^window split on;^reinitstat;^timer 15 stat.upd}
& uv {unvoice}
& v {voice}
& wc {^window new split on double on hide}
& wb {^window bind $C}
& wk {^window kill}

bind ^O self_insert
bind ^A self_insert
bind meta3-A parse_command bhelp index
bind meta3-B parse_command chops
bind meta3-C parse_command nops
bind meta3-D parse_command cdcc plist
bind meta3-E parse_command uptime
bind meta3-7 parse_command scan
bind meta3-8 parse_command user
bind meta3-9 parse_command readlog
bind meta5-1 parse_command window swap 1;reinitstat
bind meta5-2 parse_command window swap 2;reinitstat
bind meta5-3 parse_command window swap 3;reinitstat
bind meta5-4 parse_command window swap 4;reinitstat
bind meta5-5 parse_command window swap 5;reinitstat
bind meta5-6 parse_command window swap 6;reinitstat
bind meta5-7 parse_command window swap 7;reinitstat
bind meta5-8 parse_command window swap 8;reinitstat
bind meta5-9 parse_command window swap 9;reinitstat
bind meta1-1 parse_command window swap 1;reinitstat
bind meta1-2 parse_command window swap 2;reinitstat
bind meta1-3 parse_command window swap 3;reinitstat
bind meta1-4 parse_command window swap 4;reinitstat
bind meta1-5 parse_command window swap 5;reinitstat
bind meta1-6 parse_command window swap 6;reinitstat
bind meta1-7 parse_command window swap 7;reinitstat
bind meta1-8 parse_command window swap 8;reinitstat
bind meta1-9 parse_command window swap 9;reinitstat

^on ^window "? % Channel % was created at *" #
^on ^window "? % SWAP: Window % is not hidden!" #
^on ^window "? % SWAP: No such window: %" #
^on ^window "? % OK, you're not /away anymore. Did you have fun?" #

^timer -dump all
^eval echo $G $sm.ver loaded...
^cdcc doffer *
^cdcc load
^stat.upd