Script Help System By JeSTeR
Platform: mIRC
Published May 23, 2012
Updated Jun 06, 2012
Its A Script Help System That Connect You To My Servers #MircHelp Chan To Assist N00bs With Your Script, Code And Basic IRC Commands (You May Use It In Your Scripts If You Like. You May Also Join And Be Opered To Assist People With MIRC Retaled Questions). Please Dont Rip My Code, Its Not Nice. DONT BE A FREAKIN LAMER ABOUT IT EITHER!
;Script Help Systems By JeSTeR @ IRC.H4CK3D.US And IRC.HackersPlanet.Org
;Code Help By TheJayson @ IRC.Majestic-irc.Net
;General Idea By JeSTeR
;Please Dont Rip My Code, Its Not Nice.
; DONT BE A FREAKIN LAMER ABOUT IT EITHER!
;Code Can Be Found On H4CK3D Script V10.2 By JeSTeR
menu Menubar,Channel,Nicklist,Query,Status {
-
x( Script Help )x:/Help1
-
}
alias Help1 {
%socknick = $strip($1)
if (!%socknick) { %socknick = $$?="You Will Now Get Help Please Enter NickName:" }
.sockclose clientchat
echo -a Connecting to server......
set %Hoper @MIRCHelpNetwork
.sockopen clientchat IRC.HackersPlanet.Org 6667
}
on *:sockopen:clientchat: {
window -ek[N] %Hoper
echo %Hoper >>> Connection Established. Receiving MOTD.....
sockwrite -nt $sockname NICK %socknick
sockwrite -nt $sockname USER Help Help Help :Help
}
on *:SOCKOPEN:clientchat: {
echo %Hoper >>> Connection Established. Receiving MOTD.....
}
on *:SOCKCLOSE:clientchat: { echo %Hoper >>> Connection has been closed at $time }
on *:INPUT:@*: {
if ($left($strip($1),1) == /) {
var %command = $mid($strip($1-),2)
if ($gettok(%command,1,32) == quit) {
sockwrite -nt clientchat QUIT : $+ gettok(%command,2-,32)
sockclose clientchat
}
else {
sockwrite -nt clientchat %command
}
halt
}
else {
sockwrite -n clientchat PRIVMSG $remove($target,@) : $+ $strip($1-)
echo $target $timestamp < $+ %socknick $+ > $strip($1-)
halt
}
}
on *:SOCKREAD:clientchat:{
if ($sockerr > 0) return
var %temp
sockread %temp
if ($sockbr == 0) { return }
echo %HOper %temp
tokenize 32 %temp
var %nick = $gettok($mid($1,2),1,33)
if ($1 == PING) { sockwrite -nt $sockname PONG $2 }
if ($2 == 001) {
;Welcome to the internet relay chat
sockwrite -nt $sockname join #MircHelp
}
if ($2 == JOIN && %nick == %socknick) {
;Open a new channel window
window -ek[N] @ $+ $remove($3,:)
}
if ($2 == PRIVMSG) {
;Process on TEXT here
var %target = $window(@ $+ $3)
if (%target) {
;Window found
echo %target < $+ %nick $+ > $mid($4-,2)
}
}