Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - morbid

Pages: [1] 2 3 4
1
mIRC Code Snippets / Raws
« on: February 28, 2011, 05:13:09 pm »
?????????????????????????????????????????????????????????????
?                      Raws                                 ?
?????????????????????????????????????????????????????????????

????????????????????????100 Series????????????????????????????

raw 001:*: echo -s 12,1--->14,1?0,1Connection Information12,1:14,1?15,1 $2- | halt
raw 002:*: echo -s 12,1--->14,1?0,1Connection Information12,1:14,1?15,1 $2- | halt
raw 003:*: echo -s 12,1--->14,1?0,1Connection Information12,1:14,1?15,1 $2- | halt
raw 004:*: echo -s 12,1--->14,1?0,1Server Mode12,1:14,1?15,1 $2- | halt

????????????????????????200 Series????????????????????????????

raw 204:*: echo -a 12,1--->14,1?0,1Trace12,1:14,1?15,1 $2- | halt
raw 212:*: echo -s 12,1--->14,1?0,1Stats M12,1:14,1?15,1 $2- | halt
raw 205:*: echo -a 12,1--->14,1?0,1Trace12,1:14,1?15,1 $2- | halt
raw 216:*: echo -s 12,1--->14,1?0,1Stats K12,1:14,1?15,1 $2- | halt
raw 243:*: echo -s 12,1--->14,1?0,1Stats O12,1:14,1?15,1 $3- | halt
raw 251:*: echo -s 12,1--->14,1?0,1Lusers12,1:14,1?15,1 $2- | halt
raw 252:*: echo -s 12,1--->14,1?0,1Operators Online12,1:14,1?15,1  $2- | halt
raw 253:*: echo -s 12,1--->14,1?0,1Unknown Connections12,1:14,1?15,1  $2- | halt
raw 254:*: echo -s 12,1--->14,1?0,1Channels Formed12,1:14,1?15,1 $2- | halt
raw 255:*: echo -s 12,1--->14,1?0,1Lusers12,1:14,1?15,1 $2- | halt
raw 256:*: echo -s 12,1--->14,1?0,1Server Info12,1:14,1?15,1 $2- | halt
raw 257:*: echo -s 12,1--->14,1?0,1Server Info12,1:14,1?15,1 $2- | halt
raw 258:*: echo -s 12,1--->14,1?0,1Server Info12,1:14,1?15,1 $2- | halt
raw 259:*: echo -s 12,1--->14,1?0,1Server Info12,1:14,1?15,1 $2- | halt
raw 265:*: echo -s 12,1--->14,1?0,1Global Users12,1:14,1?15,1 $3- | halt
raw 295:*: echo -s 12,1--->14,1?0,1IRC Server Admin12,1:14,1?15,1 Yes | halt

????????????????????????300 Series????????????????????????????


raw 301:*: echo -s 12,1--->14,1?0,1Away12,1:14,1?15,1 $3- | halt
raw 305:*: echo -a 12,1--->14,1?0,1You Are No Longer Set As Away14,1? | halt
raw 306:*: echo -a 12,1--->14,1?0,1You Are Now Set As Away14,1? | halt
raw 307:*: echo -s 12,1--->14,1?0,1Registered User12,1:14,114,1? Yes | halt
raw 308:*: echo -s 12,1--->14,1?0,1 Server Admin12,1:14,1?15,1 Yes | halt
raw 309:*: echo -s 12,1--->14,1?0,1Services Admin12,1:14,1?15,1 Yes | halt
raw 310:*: echo -s 12,1--->14,1?0,1Raw Info12,1:14,1?15,1 $4- | halt
raw 311:*: echo -a 12,1--->14,1|0,1Start of Whois on12,1:0,1 $2 14,1| | echo -a 12,1--->0,1Nick12,1: 0,1 $2 | echo -a 12,1--->0,1Fullname12,1: 0,1 $6- | echo -a 12,1--->0,1Hostname12,1: 0,1 $3 $+ @ $+ $4  | halt
raw 312:*: echo -a 12,1--->0,1Server12,1: 0,1 $3 12,1/0,1 $+ $4- $+ 12,1/0,1 IP12,1:0,1 $serverip   
raw 313:*: echo -a 12,1--->0,1Status12,1:14,1 $5-  | halt
raw 314:*: echo -a 12,1--->14,1Names12,1:14,1 $2- | halt 
raw 317:*: if (%nodisp != On)  echo -a 12,1--->0,1Idle12,1:14,1 $duration($3,hh nn ss) | if (%nodisp != On)  echo -a 12,1--->0,1Signed On12,1:14,1 $asctime($4 $+ , dddd mmmm dd yyyy) @ $asctime(hh:ntt)  | halt
raw 318:*: echo -a 12,1--->14,1|0,1End Of Whois14,1| | halt
raw 319:*: echo -a 12,1--->0,1Channels12,1:14,1 $3- | halt
raw 320:*: echo -a 12,1--->0,1Modes12,1:14,1 $5- | halt
raw 328:*: echo -a 12,1--->14,1?0,1IP14,1?12,1: 0,1 $7- | halt
raw 332:*: echo $2 12,1--->14,1?0,1Current Topic12,1:14,1?15,1 $3- | halt
raw 333:*: echo $2 12,1--->14,1?0,1Topic Set By12,1:14,1?15,1 $3 | halt
raw 341:*: echo -a 12,1--->14,1?0,1Invite12,1:14,1?15,1 $2 Has Been Invited Here | halt
raw 369:*: echo -a 12,1--->14,1?0,1Whowas12,1:14,1?15,1 $2- | halt
raw 372:*: echo -s 12,1--->14,1?0,1MOTD12,1:14,1?15,1 $2- | halt
raw 374:*: echo -s 12,1--->14,1?14,1Error12,1:14,1?15,1 $2- | halt
raw 375:*: echo -s 12,1--->14,1?0,1MOTD12,1:14,1?15,1 $Server Message Of The Day | halt
raw 376:*: echo -s 12,1--->14,1?0,1End Of MOTD14,1? | halt
raw 377:*: echo -s 12,1--->14,1?0,1MOTD12,1:14,1?15,1 - $2- | halt
raw 378:*: echo -s 12,1--->14,1?0,1Raw Info12,1:14,1?15,1 $2 is connecting from $6- | halt
raw 379:*: echo -a 12,1--->14,1?0,1Using Modes12,1:14,1?15,1 $6- | halt
raw 381:*: echo -a 12,1--->14,1?0,1You Are Now An IRC Oper14,1?12,1. | halt

????????????????????????400 Series????????????????????????????


raw 401:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1No Such Nick ( $+ $2 $+ ) | halt
raw 402:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1No Such Server12,1. | halt
raw 403:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1No Such Channel ( $+ $2 $+ )  | halt
raw 404:*: echo -a 12,1--->14,1?14,1Error14,1?12,1:0,1Cannot send to channel12,1:0,1No external messages12,1.  | halt
raw 405:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1You12,1'14,1re On Too Many Channels12,1. | halt
raw 406:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1There Was No Such Nick ( $+ $2 $+ ) | halt
raw 408:*: echo -a 12,1--->0,114,1?Error12,1:14,1?15,1You cannot use colors on this channel12,1. Message not sent12,1. | halt
raw 409:*: echo -s 12,1--->0,114,1?Error12,1:14,1?15,1 No Origin Specified12,1.  | halt
raw 421:*: echo -s 12,1--->14,1?14,1Error14,1?12,1:0,1 $2 is an unknown command12,1.  | halt
raw 422:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1Motd File Missing12,1.   | halt
raw 423:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1Administrative Info Unavailable12,1.  | halt 
raw 431:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1No Nick Givin12,1.   | halt
raw 432:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1Erroneus Nickname $2- | halt
raw 433:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1Nickname $2 already in use12,1. | halt
raw 436:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1Nickname collision KILL $2- | halt
raw 437:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1Cannot change nickname while banned on channel12,1. $2- | halt
raw 441:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1 $2 Is Not On $3  | halt
raw 442:*: echo -2 12,1--->14,1?0,1Error12,1:14,1?15,1You12,1'14,1re Not On $2  | halt
raw 443:*: echo -2 12,1--->14,1?0,1Error12,1:14,1?15,1 $2 Is Aready On $3  | halt
raw 444:*: echo -2 12,1--->14,1?0,1Error12,1:14,1?15,1User Not Logged In12,1.    | halt
raw 451:*: echo -2 12,1--->14,1?0,1Error12,1:14,1?15,1You Have Not Registered12,1.   | halt
raw 461:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1Not Enough Parameters Givin12,1.   | halt
raw 462:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1You May Not Reregister12,1.   | halt
raw 464:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1 OPER Password is Incorrect12,1. | halt
raw 465:*: echo -s 12,1--->14,1?0,1You're Banned From This Server14,1?12,1.   | halt
raw 467:*: echo -a 12,1--->14,1?0,1Channel Key Already Set14,1?12,1.   | halt
raw 471:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1Cannot join channel12,1(14,1+i12,1) $2- | halt
raw 472:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1 Unknown Mode Char ( $+ $2 $+ )  | halt
raw 473:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1Cannot join channel12,1(14,1+i12,1) | halt
raw 474:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1Cannot join channel12,1(14,1+b12,1)  | halt
raw 475:*: echo -a 12,1--->14,1?0,1Error12,1:14,1?15,1Cannot join channel12,1(14,1+k12,1) | halt
raw 477:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1Cannot join channel12,1(14,1+j12,1)  | halt
raw 481:*: echo -s 12,1--->14,1?0,1Error14,1?12,1:14,1?15,1You12,1'0,1re not an IRC operator12,1.  | halt
raw 482:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1You12,1'0,1re not a channel operator on12,1.  | halt
raw 491:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1No O12,1-0,1Lines for your host12,1.  | halt

????????????????????????500 Series????????????????????????????


raw 501:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1Unknown Mode Flag12,1.   | halt
raw 510:*: echo -s 12,1--->14,1?0,1Error12,1:14,1?15,1You must resolve the nickname conflict before you can proceed12,1. | halt

2
mIRC Code Snippets / Re: Alias ASCII's
« on: February 27, 2011, 07:08:53 am »
Or I dunno, Don't be lazy. Load the code. Do the trigger and if you don't like it unload the code ^_^

3
mIRC Code Snippets / Re: Auto level on join.
« on: February 27, 2011, 06:57:43 am »
Quote from: King_Hual on February 26, 2011, 07:37:23 pm
Quote from: Glow on February 26, 2011, 03:15:25 pm
Sure I will. Im planning to make my own channel bot(like Whale)^^.

Channel bots are PHP :>

Eh not necessarily..Service BOTS are PHP.
My bot CRIm (mIRC backwards)
Was a chatspace/Irc-d bot. And it was all Irc coding

4
mIRC Code Snippets / Ircop Scanner
« on: February 25, 2011, 05:22:25 pm »

type /ircop-scan

then scan ;/



Code: [Select]
;;; Groups
#ircop.netscan off
raw 352:*:{ haltdef | did -a $ircop.scanner 11 $6 }
raw 315:*:{ haltdef | .disable #ircop.netscan }
#ircop.netscan end
#ircop.chanscan off
raw 352:*:{ haltdef | if (* isin $7) did -a $ircop.scanner 12 $6 }
raw 315:*:{ haltdef | .disable #ircop.chanscan }
#ircop.netscan end


;;; Dialogs
on *:dialog:ircop-scan:*:*:{
  if ($devent == init) {
    $mdxin
    dll $mdx SetMircVersion $version
    dll $mdx MarkDialog $dname
    dll $mdx SetDialog $dname BGColor $color(1)
    dll $mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 background $color(1)
    dll $mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 textbg $color(1)
    dll $mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 text $color(14)
  }
}
Dialog IrcOp.scanner.dialog {
  Title "IrcOp Scanner v1.4 - Scanner"
  icon icon\morbid.ico
  Size -1 -1 200 103
  Option DBU

  Button "Ok", 1, 3 89 30 12, Ok Default
  Button "Cancel", 2, 36 89 30 12, Cancel

  Box "Network", 5, 3 2 73 84,
  Box "Channel", 6, 79 2 73 84,
  Box "Options", 7, 155 2 40 84,

  Button "Scan", 8, 25 73 30 10,
  Button "Scan", 9, 83 73 30 10,
  Button "Refresh", 19, 118 73 30 10,

  Combo 10, 83 60 66 100, Sort Drop

  list 11, 7 10 65 67, sort autovs autohs
  list 12, 83 10 65 54, sort autovs autohs

  Button "Query", 13, 160 11 30 10,
  Button "Notice", 14, 160 23 30 10,
  Button "CTCP", 15, 160 35 30 10,
  Button "Whois", 16, 160 47 30 10,
  Button "Ignore", 17, 160 59 30 10,
  Button "Notify", 18, 160 71 30 10,
}
Dialog IrcOp.ctcp.dialog {
  Title "IrcOp Scanner - CTCP"
  Size -1 -1 102 74
  Option DBU

  Button "Send", 1, 3 60 30 12, Ok Default
  Button "Cancel", 2, 36 60 30 12, Cancel

  Box "CTCPs", 4, 3 2 96 55,

  Radio "Ping", 5, 7 11 30 10,
  Radio "Time", 6, 7 22 30 10,
  Radio "Version", 7, 7 33 30 10,
  Radio "Other:", 8, 7 44 30 10,
  Edit "", 9, 39 44 56 10,
}

;;; Aliases
alias ircop-scan { dialog -m $ircop.scanner $ircop.scanner }
alias -l ircop.scanner { return ircop.scanner.dialog }
alias -l ircop.ctcp { return ircop.ctcp.dialog }
alias -l ircop.rechan {
  did -r $ircop.scanner 10 1 | ircop.addchan | did -c $ircop.scanner 10 1
  if ($did($ircop.scanner,10) ischan) { did -e $ircop.scanner 9 }
  else { did -b $ircop.scanner 9 }
}
alias -l ircop.scan {
  if ($1 == net) { .enable #ircop.netscan | who 0 o }
  elseif ($1 == chan) { .enable #ircop.chanscan | who $did($ircop.scanner,10,$did($ircop.scanner,10).sel).text }
}
alias -l ircop.addchan {
  var %~ircop.channum = 0
  while (%~ircop.channum >= 0) {
    inc %~ircop.channum
    var %~ircop.chan = $chan(%~ircop.channum)
    if (%~ircop.chan == $null) { goto Break }
    did -a $ircop.scanner 10 %~ircop.chan
  }
  :Break
}


;;; Remote Events
on *:DIALOG:ircop.scanner.dialog:init:0:{
  did -b $ircop.scanner 13,14,15,16,17,18
  if ($server) { ircop.addchan | did -c $ircop.scanner 10 1 }
  else { did -b $ircop.scanner 8,9,10,19 }
  if ($did(10,$did(10).sel) == $null) { did -b $ircop.scanner 9 }
}
on *:DIALOG:ircop.ctcp.dialog:Init:0:{ did -c $ircop.ctcp 5 | did -b $ircop.ctcp 9 }
on *:DIALOG:ircop.scanner.dialog:Sclick:*:{
  if ($did == 1) { $iif($dialog($ircop.ctcp),dialog -x $ircop.ctcp) | unset %~ircop.* }
  if ($did == 2) { $iif($dialog($ircop.ctcp),dialog -x $ircop.ctcp) | unset %~ircop.* }
  if ($did == 8) { did -r $ircop.scanner 11 | $ircop.scan(net) }
  if ($did == 9) { did -r $ircop.scanner 12 | $ircop.scan(chan) }
  if ($did == 11) {
    did -e $ircop.scanner 13,14,15,16,17,18
    if ($address($did(11,$did(11).sel),0) isignore) { did -o $ircop.scanner 17 1 UnIgnore }
    else { did -o $ircop.scanner 17 1 Ignore }
    if ($address($did(11,$did(11).sel),0) isnotify) { did -o $ircop.scanner 18 1 UnNotify }
    else { did -o $ircop.scanner 18 1 Notify }
  }
  if ($did == 13) { query $did(11,$did(11).sel) }
  if ($did == 14) { notice $did(11,$did(11).sel) $$?="Notice to send to user:" }
  if ($did == 15) {
    if ($dialog($ircop.ctcp)) { dialog -v $ircop.ctcp $ircop.ctcp }
    else { %~ircop.ctcpnick = $did(11,$did(11).sel) | dialog -m $ircop.ctcp $ircop.ctcp }
  }
  if ($did == 16) { whois $did(11,$did(11).sel) }
  if ($did == 17) {
    if ($address($did(11,$did(11).sel),0) isignore) { ignore -r $address($did(11,$did(11).sel),0) | did -o $ircop.scanner 17 1 Ignore }
    else { ignore -cktinp $address($did(11,$did(11).sel),0) | did -o $ircop.scanner 17 1 UnIgnore }
  }
  if ($did == 18) {
    if ($address($did(11,$did(11).sel),0) isnotify) { notify -r $address($did(11,$did(11).sel),0) | did -o $ircop.scanner 18 1 Notify }
    else { notify $address($did(11,$did(11).sel),0) | did -o $ircop.scanner 18 1 UnNotify }
  }
  if ($did == 19) { ircop.rechan }
}
on *:DIALOG:ircop.scanner.dialog:DClick:*:{
  if ($did == 11) { if ($server) whois $did(11,$did(11).sel) }
  if ($did == 12) { if ($server) whois $did(12,$did(12).sel) }
}
on *:DIALOG:ircop.ctcp.dialog:Sclick:*:{
  if ($did == 1) {
    if ($did(5).state) { ctcp %~ircop.ctcpnick Ping }
    if ($did(6).state) { ctcp %~ircop.ctcpnick Time }
    if ($did(7).state) { ctcp %~ircop.ctcpnick Version }
    if ($did(8).state) {
      if ($did(9)) { ctcp %~ircop.ctcpnick $strip($did(9)) }
      else { echo $colour(Info) -s * /ctcp: insufficient parameters }
    }
    unset %~ircop.ctcpnick
  }
  if (($did == 5) || ($did == 6) || ($did == 7)) { did -b $ircop.ctcp 9 }
  if ($did == 8) { did -e $ircop.ctcp 9 }
}
on *:CONNECT:{
  if ($dialog($ircop.scanner)) {
    did -e $ircop.scanner 8,10,19
    if ($did($ircop.scanner,10)) { did -e $ircop.scanner 9 }
  }
}
on *:DISCONNECT:{
  if ($dialog($ircop.scanner)) { did -b $ircop.scanner 8,9,10,19 }
}
on me:JOIN:#:{ ircop.rechan }
on me:PART:#:{ ircop.rechan }

5
mIRC Code Snippets / Re: Trial Reset
« on: February 25, 2011, 04:39:55 pm »
Quote from: Jane on February 25, 2011, 01:15:38 pm
Not working for me, morbid.

hm. maybe mirc overwrite this ini-key when exit. just check [about] and [user] section in your $mircini if you install mirc in portable mode, or HKEY_LOCAL_MACHINE\SOFTWARE\mIRC\LastRun in registry editor (Start -> Run -> regedit).



Or you can also just go to start then Run > Regedit > current_user > Software > Delete the mirc folder.

6
mIRC Code Snippets / Trial Reset
« on: February 24, 2011, 07:32:56 pm »
Just a simple resetting of your trial sub. with mIRC I used it for the longest but then I paid for it.


FYI: You don't need this snippet if you have a paid version.[/i]


Code: [Select]
alias trial {
  if ($readini($mircini,about,portable) == yes) {
    remini $qt($mircini) user lastrun
  }
  else {
    comopen trial WScript.Shell
    comclose trial $com(trial,RegDelete,3,bstr,HKEY_CURRENT_USER\Software\mIRC\LastRun\)
  }
  echo -s Now you can restart mIRC
}
 

Type /trial
and then you will see this

Quote
* Opened Com 'trial' (WScript.Shell)
-
* Closed Com 'trial'
-
Now you can restart mIRC

7
Off topic / Re: Let's write the story!
« on: February 24, 2011, 04:41:03 pm »
And glow would still be a stuck up :D

8
Off topic / Re: Ranting
« on: February 24, 2011, 04:37:48 pm »
Quote from: Glow on February 24, 2011, 10:31:41 am
Ehh you only save the files on a USB stick?

*PULLS HAIR OUT.. Okay, Glow, Let's break this down one step at a time.

1. Okay, I do not own a computer. How do I use a script without a computer?
2. :D I will put it on a thumbdrive so I can use it as a portable USB device to plug into College computers.
3.OH NO. After months of the Thumb Drive a.k.a. USB stick Crashed. LOST EVERYTHING.
4. BUT WAIT, There's hope. There is a program to retrieve lost programs that are, in my opinion, AMAZING.
5. Happiness dies down when I realize that ALL college computers have an administrator password and won't let me download said program's.
6. Sad face

9
mIRC Code Snippets / Re: Alias ASCII's
« on: February 24, 2011, 04:31:17 pm »
Quote from: King_Hual on February 24, 2011, 04:01:04 pm
Quote from: Glow on February 22, 2011, 08:22:12 am
Nice script, but next time post a code of the thing that will be shown after you used the script, so people will know what they will use. :p

And next time, you should notice that the forum CAN'T READ ASCII SO HE CAN'T SHOW THE EFFECT OF THE SCRIPT

LOL no.. But I can do this.





10
Off topic / Re: Ranting
« on: February 24, 2011, 07:38:43 am »
my thumb drive or usb stick is what was crashed

11
Off topic / Wanna Laugh?
« on: February 23, 2011, 09:31:04 pm »
Okay this was back When I really didn't know about scripting or anything. Most of the dialogs I had help with.
But anyways First script.

I've come a long way....

12
Off topic / Re: Ranting
« on: February 23, 2011, 09:28:44 pm »
A USB stick is a thumbdrive.

13
Off topic / Re: Let's write the story!
« on: February 23, 2011, 08:56:38 pm »
Buttered carmel popcorn

14
Off topic / Ranting
« on: February 23, 2011, 08:55:21 pm »
Okay, So I store my script on my thumbdrive. Because I don't use the same computer over and over again.
Well my thumbdrive decided to "reformatt" it's self and I lost everything
Found a program to find some of the files. THe only file I found was an OLD version of Epimetheus so yeah Really pissed. :(

15
Off topic / Re: Let's write the story!
« on: February 23, 2011, 07:55:04 pm »
His head exploded.

Pages: [1] 2 3 4