# With the exception of the F7 help routine and nxsetup (from crackrock), all of
# this code is originally mine, and the ANSI bugs in BX discovered by me.
# Some of this code is messy, I know, but I changed a bunch of stuff and was too
# lazy to tighen it.  Oh well.
#
# NovaX aka NovaWolf
#
#
#      Don't distribute this, the /x commands shouldn't be given to lamers.


^assign BLNK 
^assign CL 
^assign BLK 
^assign RED 
^assign GRN 
^assign YEL 
^assign BLU 
^assign MAG 
^assign CYN 
^assign WHT 
^assign BBLK 
^assign BRED 
^assign BGRN 
^assign BYEL 
^assign BBLU 
^assign BMAG 
^assign BCYN 
^assign BWHT 
^assign HBLK 
^assign HRED 
^assign HGRN 
^assign HYEL 
^assign HBLU 
^assign HMAG 
^assign HCYN 
^assign HWHT 

alias cansid {
@ myvar4 = [$strlen($0-)] - 6
@ myvar = [$strlen($0-)] - 3
@ myvar2 = [$strlen($0-)] - 2 
@ myvar3 = [$strlen($0-)] - 1
@ myvar1 = [$strlen($0-)] - 4
@ function_return = [${HWHT}$left(1 $0-)${HCYN}$mid(1 1 $0-)${CL}${CYN}$mid(2 1 $0-)${HBLK}$mid(3 $myvar4 $0-)${CL}${CYN}$mid($myvar 1 $0-)${HCYN}$mid($myvar2 1 $0-)${HWHT}$mid($myvar3 1 $0-)${CL}]
}

alias cansil {
@ myvar1 = [$strlen($0-)] - 4
@ myvar2 = [$strlen($0-)] - 2 
@ myvar3 = [$strlen($0-)] - 1
@ function_return = [${HWHT}$left(1 $0-)${HCYN}$mid(1 1 $0-)${CL}${CYN}$mid(2 $myvar1 $0-)${HCYN}$mid($myvar2 1 $0-)${HWHT}$mid($myvar3 1 $0-)${CL}]
}

alias mansid {
@ myvar = [$strlen($0-)] - 3
@ myvar1 = [$strlen($0-)] - 4
@ myvar2 = [$strlen($0-)] - 2 
@ myvar3 = [$strlen($0-)] - 1
@ myvar4 = [$strlen($0-)] - 6
@ function_return = [${HWHT}$left(1 $0-)${HMAG}$mid(1 1 $0-)${CL}${MAG}$mid(2 1 $0-)${HBLK}$mid(3 $myvar4 $0-)${CL}${MAG}$mid($myvar 1 $0-)${HMAG}$mid($myvar2 1 $0-)${HWHT}$mid($myvar3 1 $0-)${CL}]
}

alias mansil {
@ myvar1 = [$strlen($0-)] - 4
@ myvar2 = [$strlen($0-)] - 2 
@ myvar3 = [$strlen($0-)] - 1
@ function_return = [${HWHT}$left(1 $0-)${HMAG}$mid(1 1 $0-)${CL}${MAG}$mid(2 $myvar1 $0-)${HMAG}$mid($myvar2 1 $0-)${HWHT}$mid($myvar3 1 $0-)${CL}]
}

alias nxhelp.bind {
	^bind ~ nothing
	/nxhelp
	^timer 1 ^bind ~ self_insert
}

alias nxhelp {
	eval echo       NovaX2.0beta Help
	eval echo 
	eval echo 	/sayml Says something in a light magenta scheme
	eval echo 	/saymd Same as above except darker scheme        þ
	eval echo 	/saycl Same as /sayml except a cyan scheme
	eval echo 	/saycd If you can't figure it out, you're hopeless þ
	eval echo
	eval echo 	Commands below here work on other ppl using BX < 68e-T8
	eval echo
	eval echo 	/xprompt <nick or chan> text Change users prompt to text
	eval echo 	/xclear <nick or chan> Text Clears their screen and leaves text at the top
	eval echo 	/xsay <text> Puts text on the left side of their monitor 
	eval echo 	Note:         /xsay goes to the whole channel
	eval echo 	/svc display the special NX version   þ
	eval echo
	eval echo       þ means eggdrops will kick you when used, cuz they think it's an
	eval echo             Avalanche flood...they'll ignore you for a while afterwards.
}
^bind META3-8 PARSE_COMMAND nxhelp.bind
eval assign novax.ver ${MAG}Nova${HWHT}X ${CL}${MAG}2${HMAG}.${CL}${MAG}0á
alias saycd //say $cansid($0-)
alias saycl //say $cansil($0-)
alias saymd //say $mansid($0-)
alias sayml //say $mansil($0-)
alias xprompt //msg $0 ${BLK}$chr(27)[3Bm$chr(27)[50Dm${HBLK}$ <${CL}${CYN}$1-${HBLK}>${WHT}
alias xclear //msg $0 ${BLK}$chr(27)[Hm$chr(27)[Jm${BLNK}${HRED}$1-
alias xsay //say ${BLK}$chr(27)[50Dm${WHT}$0-
alias svc //say $cansil(R0xing yer screen wif) $novax.ver

alias novax.setup {
  @ _t = toupper($[1]0)
  if (index($_t ABCDE) != -1) {
      if ([$0]==[A]) {input "Server to spoof on: " if ([$0]) {
        ^assign spoofserv $0}}
      if ([$0]==[B]) {input "Port to spoof on: " if ([$0]) {
        ^assign spoofport $0}}
      if ([$0]==[C]) {input "Nick of spoof: " if ([$0]) {
        ^assign spoofnick $0
        ^set flood_protection $fprot}}
      if ([$0]==[D]) {input "Address of spoof: " if ([$0]) {
        ^assign spoofaddy $0}}
      if ([$0]==[E]) {input "Whois info for spoof: " if ([$0]) {
        ^assign gecos $0-}}
      }{nxsetup}
  ^assign -_t
}
alias nxsetup {
echo /save to change your settings when done
echo A: Server            :                [$spoofserv]
echo B: Port              :                [$spoofport]
echo C: Nick              :                [$spoofnick]
echo D: Address           :                [$spoofaddy]
echo E: Whois info        :                [$gecos]
input "Enter letter to change <enter=abort>: " if ([$0]) {novax.setup $[1]0}
}
alias nxsave {
saveall
eval ^exec rm ~/.BitchX/.NovaX.sav
eval ^exec -name ereet cat > ~/.BitchX/.NovaX.sav
eval ^exec -in %ereet #NovaX config
eval ^exec -in %ereet @spoofserv = [$spoofserv]
eval ^exec -in %ereet @spoofport = [$spoofport]
eval ^exec -in %ereet @spoofnick = [$spoofnick]
eval ^exec -in %ereet @spoofaddy = [$spoofaddy]
eval ^exec -in %ereet @gecos = [$gecos]
eval ^exec -close %ereet
}

alias spoof {
	     ^exec -name spoof sirc3 -d -f -i $spoofserv:$spoofport $spoofnick $spoofaddy "$gecos"
	     //echo ${HRED}=== ${HBLU} Loading spoof as $spoofnick on $spoofserv
	    }
alias spm ^exec -in %spoof privmsg $0 :$1-
alias spn ^exec -in %spoof notice $0 :$1-
alias spj ^exec -in %spoof join $0 $1-
alias spl ^exec -in %spoof part $0
alias spq {
	   ^exec -in %spoof quit :$0-
	   ^exec -kill %spoof
	   //echo ${HRED}=== ${HBLU}Spoof closed.
	   }

eval if (!NX) {
	set format_version $format_version + Nova$chr(15)X$chr(15)2.0á
	}
if (NX) //echo $mansil(NovaX loaded, but version not modified due to previous loading)
eval assign nickcomp [$chr(15)$$0$chr(15)]$chr(15):$chr(15)$$1-
eval set format_nick_comp ${nickcomp}
eval set format_nick_Auto ${nickcomp}
@NX = 1