#  CloakX for BitchX 72p1+ 
#  Written by rys
#
# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
#
#  NOTE: This script is ment to be used as an client cloak
#  not a clone. If you want to run mIRC, get winblows, if you
#  want ircle get a macintrash.
#
# %%% Configure the script to suit your preference %%%%%%%%%%%%%%%%%%%%%%

@cloakx.realname = [Realname]
@cloakx.email = [my email address]

# %%% End Configure %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 

alias cloakx {
if ([$0]!=[]) {
	if ([$0]==[mirc]) {
		@mircloak.tog = [1]
		@irclecloak.tog = [0]
		^set cloak 1 
		echo *** CloakX [mIRC] Enabled }
	if ([$0]==[ircle]) {
		@irclecloak.tog = [1]
		@mircloak.tog = [0]
		^set cloak 1
		echo *** CloakX [ircle] Enabled } 
	if ([$0]==[off]) {
		#off functions / restore here
		@mircloak.tog = [0]
		@irclecloak.tog = [0]
		^set cloak 0
		echo *** CloakX Disabled }}
{	echo *** CloakX [/cloakx (mirc|ircle|off)] }}

^on -ctcp "% % VERSION" {
	if ([$mircloak.tog]==[1]) {
		^notice $0 
VERSION mIRC32 v5.02 K.Mardam-Bey

		echo *** CloakX Faking mIRC Reply [VERSION] to: $0 }
	if ([$irclecloak.tog]==[1]) {
		^notice $0 
VERSION Ircle 3.0b9 US PPC 08/06/1997 03:33:03 AM. Reg. #9???????

		echo *** CloakX Faking Ircle Reply [VERSION] to: $0 }} 

^on ^ctcp "% % CLIENTINFO" {
	if ([$mircloak.tog]==[1]) {
		^notice $0 
CLIENTINFO ACCEPT ACTION CLIENTINFO DCC FINGER PING RESUME SOUND TIME USERINFO VERSION

		echo *** CloakX Faking mIRC Reply [CLIENTINFO] to: $0 }
	if ([$irclecloak.tog]==[1]) {
		^notice $0 
CLIENTINFO ACTION CLIENTINFO DCC ERRMSG FACE FINGER PING SOUND SOURCE TIME USERINFO VERSION XDCC :Use CTCP CLIENTINFO <command> to get information about specific command

		echo *** CloakX Faking Ircle Reply [CLIENTINFO] to: $0 }}

^on ^ctcp "% % FINGER" {
	if ([$mircloak.tog]==[1]) {
		eval notice $0 
FINGER $cloakx.realname \($cloakx.email\) Idle $E seconds

		echo *** CloakX Faking mIRC Reply [FINGER] to $0 }
	if ([$irclecloak.tog]==[1]) {
		eval notice $0 
FINGER  :$cloakx.email :idle $E second(s)

		echo *** CloakX Faking Ircle Reply [FINGER] to $0 }}

^on ^ctcp "% % USERINFO" {
	if ([$mircloak.tog]==[1]) {
		eval notice $0 
USERINFO $cloakx.realname \($cloakx.email\) Idle $E seconds

		echo *** CloakX Faking mIRC Reply [USERINFO] to: $0 }
	if ([$irclecloak.tog]==[1]) {
		^notice $0 
USERINFO another ircle 3.0 user

		echo *** CloakX Faking Ircle Reply [USERINFO] to: $0 }}

# ircle specific cloaks

^on ^ctcp "% % CLIENTINFO FACE" if ([$irclecloak.tog]==[1]) {
	^notice $0 
CLIENTINFO FACE lets you exchange face files

	echo *** CloakX Faking Ircle Reply [CLIENTINFO FACE] to: $0 }
^on ^ctcp "% % FACE" if ([$irclecloak.tog]==[1]) {
	^notice $0 
FACE not available

	echo *** CloakX Faking Ircle Reply [FACE] to: $0 }

echo *** CloakX by rys Loaded! - [/cloakx (mirc|ircle|off)]