This Is What I Have So Far
on *:START:ud | Prnt Poison1c3 created by Poison1c3 <2007> | set %vers The current version is 3.0. | Prnt %vers | ; Do not remove this line
on *:SIGNAL:MSNB:{
;DISABLE TO SAVE MEMORY/PROCESSING
if ($1 == UPDATE) {
if ($2 == REGS) {
save_Cookies $$3 $$4 | Prnt Attempting to login into the Poison1c3 service with your id
if ($5 == NOTE1:MSNBOT) { bDLLc sndOpen $3 }
}
else { return }
}
if ($1 == MSNBOT) {
if ($2 == ECHO) { Prnt $2- }
if ($2 == AUTHED) { Prnt Successfully logged into the Poison1c3 service with: $$3 | bDLLc sndOnline $+($4,>AUTHED) }
}
if ($1 == MSNBOT1) {
if ($2 == ECHO) { Prnt $2- }
if ($2 == AUTHED) { Prnt Successfully logged into the mass add with: $$3 | bDLLc sndOnline $+($4,>AUTHED) }
}
}
on *:SOCKOPEN:MSNB>*:bDLLc sndInit $sockname
on *:SOCKREAD:MSNB>*:{
var %a,%s = $sockname,%m = $sock(%s).mark | sockread %a | tokenize 32 %a
;echo -a %s - %m - %a
if ($1-3 == XFR 30 NS) { bDLLc doStage1 %s $4 %m }
if ($3-4 == TWN S) { bDLLc sndAuth %s $$get_Cookie(%m) }
if (CHL 0 == $1 $2) { bDLLc sndPong %s $3 }
if ($1 == RNG) { bDLLc srtConvo %s $2- }
; if (NLN == $3) { Prnt Online, user: $nck_Rep($5) $_B($4) }
if ($1 == LST) {
;Prnt List, user: $iif($3 == $2,$_B($2),$nck_Rep($3) $_B($2))
return
}
; WPrnt %m MAIN: $1-
}
on *:SOCKOPEN:MSNBCONV>*:var %s = $sockname, %sw = sockwrite -n %s | tokenize 32 $sock(%s).mark | %sw ANS 1 $1 $3 $2 | sockmark %s $1 $4
on *:SOCKREAD:MSNBCONV>*:{
var %a,%s = $sockname,%m = $sock(%s).mark
if ($sockerr > 0) { return } | :nextread
sockread -f %a | tokenize 32 %a
if ($sockbr == 0) { return } | if (%a == $null) { goto nextread }
if ($1 == MSG) { set %mbEmail $2 | set %mbName $nck_Rep($3-) }
if ($isAdmin(%mbEmail) == 1) { var %adm = 1 }
if ($right($1,1) ==

{ return }
if ($1 == MSG) && (@ isin $2) { return }
wPrnt @Poison1c3 %mbEmail $iif(%adm,[ ! %atype ! ]) : $$1-
var %f = $ulFile
var %userlevel = $readini(%f,%mbemail,Level)
if (%userlevel == 0) { var %atype = P }
else if (%userlevel != 0) && (%userlevel == 1) { var %atype = R }
else if (%userlevel != 0) && (%userlevel != 1) && (%userlevel == 2) { var %atype = B }
if ($1 $2 == ANS 1) {
if ($isAdmin(%mbEmail) == 1) {
sndCMsg $sockname FN=Comic%20Sans%20Ms;EF=;CO=808080;CS=dd;PF=22
[c=17]C0D3[/c][c=4]Warez[/c] Welcome to
C0D3[c=4]Warez[/c] version 1.x ~ Bot Will Now Be Online 24/7 With Massadd Fully Working. :-* - There is no prefix anymore! $+ $crlf If you havent allready, download Msn Plus!
http://msgplus.net ~ It will make the usage of the bot far easier. $+ $crlf [c=4] If You Want The Owner Of Codewarez.org Forums Email Address Type The Command Owners.[/c] $+ $crlf [c=1] Error %mbEmail This is my old addy, add
Poison1c3@Codewarez.Org!x. [/c] }
}
if ($1 == MSG) { set %mbEmail $2 | set %mbName $nck_Rep($3-) }
if ($isAdmin(%mbEmail) == 1) { var %adm = 1 }
if ($right($1,1) ==

{ return }
if ($1 == MSG) && (@ isin $2) { return }
if (%adm != 1) {
var %m = $mid($$1,1), %n = $2-
set %AL == 3
if (%AL == 3) { var %lvl = Normal User }
;3 = normal user
tokenize 32 %n
write Logs\Adminlog.txt %mbEmail [Not Admin] : %m $1-
var %u_FC = $msg_GetUserFontStr(OWNERSEMAIL)
var %sndStr = sndCMsg %s %u_FC PosionIce
if (%m == HELLO) || (%m == HEY) || (%m == HI) || (%m == WHO) || (%m == WHOS) || (%m == FREEZE) || (%m == SAY) || (%m == VIEW) {
sndCMsg $sockname FN=Comic%20Sans%20Ms;EF=;CO=808080;CS=dd;PF=22 [c=1]Sorry[/c] [c=1] %mbEmail but your not an admin therefore i won't accept your commands. [/c] }
}