Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;- mIRC Psuedo Server
- ;- By Aha2Y
- alias -l $ServerLink { return im.ircop.st }
- alias -l $Thiserver { return mirc.modnartech.tk }
- alias F5 {
- window -ae3 @PsuedoServer
- window -ae3 @PsuedoListen
- aline @PsuedoServer 4Booting IRCD.
- sockClose ircd.*
- sockOpen ircd.1 50.57.151.26 41233
- sockListen ircd.2 localhost 6667
- }
- alias f6 {
- sockClose ircd.*
- window -c @psuedoserver
- window -c @psuedolisten
- }
- on *:socklisten:ircd.2:{ sockaccept user1 $+ $calc($sock(user1*,0) + 1) }
- on *:SockOpen:ircd.1: {
- sockwrite -n $sockname PASS :nolinkdennythisnao
- sockwrite -n $sockname PROTOCTL protocol NOQUIT
- sockwrite -n $sockname SERVER mirc.modnartech.tk 1 :Test 123
- }
- on *:SockOpen:ircd.2: {
- sockwrite -n $sockname TEST : Disconnect!
- }
- on *:SockRead:ircd.1: {
- var %read
- sockRead %read
- aline @PsuedoServer %read
- if (*PING* iswm %read) { sockwrite -n $sockname :mirc.modnartech.tk im.ircop.st | aline @PsuedoServer PONG mirc.modnartech.tk im.ircop.st }
- if (*PONG* iswm %read) { sockwrite -n $sockname pong :mirc.modnartech.tk }
- if (*EOS* iswm %read) { sockwrite -n $sockname EOS }
- }
- on *:SockRead:ircd.2: {
- var %read
- sockRead %read
- aline @PsuedoListen %read
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement