Seperate PM

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	3.0
Scores Submitted	2
Date Added	Jun 14, 2008
Last Updated	Jun 14, 2008
Tags	messege pm private script seperate

Introduction

It's not in very good order, and it's pretty much pointless, but I thought that it was somewhat worth posting. I got help from Kou, mostly to get rid of some of the issues I couldn't fix. It was just a few simple problems with the code--forgetting autovs and autohs, along with $crlf. But it should work fine. Be aware that it may block out other people from sending a PM to you while you run it.

Grab the Code

;;Hopefully this will work for you people. ^_^

Dialog spm {
  size 100 100 202 221
  title "Seperate PM"
  edit "", 1, 1 1 200 144, autovs, multi, read
  button "Clear", 2, 1 145 200 18
  button "Change", 3, 1 162 100 18
  edit "", 4, 100 162 100 18, return
  edit "", 5, 1 181 200 18, autohs
  button "Send", 6, 1 198 200 24, flat
}

On *:Dialog:spm:sclick:*: {
  if ($did == 2) { did -r spm 1 }
  if ($did == 3) { set %pm $did(4) | echo -a You have switched PM dialog to [ %pm ] $+ ! | .msg %pm -- I wish to speak with you, %pm -- (RihtPm 1.0) }
  if ($did == 6) { 
    if ($did(5) !== $Null) { stmg %pm $did(5) | haltdef | did -a spm 1 [ $me ] says: $did(5) $crlf | did -r spm 5 }
    elseif ($did(5) == $Null) { beep 1 4 | echo -a 11-12-2 You can't send nothing! 12-11- }
  }
}

On *:Dialog:spm:init:*: {
  set %spm On
}
On *:Dialog:spm:close:*: {
  set %spm Off
}

On ^*:Text:*:?: {
  if (%spm = on) {
    if ($Nick = %pm) { did -a spm 1 [ %pm ] says: $1- $crlf }
    if ($Nick != %pm) { .timer 1 2 .notice $nick Talking to someone else. }
    haltdef
  }
}
On ^*:Action:*:?: {
  if (%spm = on) {
    haltdef
    if ($Nick = %pm) { haltdef | did -a spm 1 * $+ [ %pm ] $1- $crlf }
    .timer 1 2 .notice $nick Talking to someone else.
  }
}

alias stmg {
  .msg $1 $2-
}

alias spm {
  dialog -mdiaov spm spm
}

menu nicklist,channel,status,query {
  Seperate Pm: /spm
}

Comments

(10) RSS

Go to Bottom

vaseline28

Comments: 134

mIRC Snippet: Seperate PM
Posted on Jun 14, 2008 11:45 am

Looks good!

Quote:

if ($did(5) !== $Null)

this will also work and is marginally shorter:

Quote:

if ($did(5))

Riht_2

Comments: 43

mIRC Snippet: Seperate PM
Posted on Jun 14, 2008 5:59 pm

Eh. Ah well, it works.

Korvin

Comments: 238

mIRC Snippet: Seperate PM
Posted on Jun 14, 2008 6:05 pm

* /msg: insufficient parameters (line 46, script18.txt)

Korvin

Comments: 238

mIRC Snippet: Seperate PM
Posted on Jun 14, 2008 6:14 pm

very inefficient, and easily expanded http://www.hawkee.com/snippet/3082/ my sister made that, and honestly, its a lot better than yours, and i say that in the kindest way, just use it as insperation and ideas, also your dialog can easily be expanded to allow channel talking also:

Code:

On ^*:Text:*:%pm: {
if (%spm = on) {
if ($active = %pm) { did -a spm 1 $+(<,$nick>) says: $1- $crlf }
haltdef
}
}

jonesy44

Comments: 936

mIRC Snippet: Seperate PM
Posted on Jun 14, 2008 7:01 pm

Your sister is hot ..

:)

-> Can i have her number pleaseh? :]

Korvin

Comments: 238

mIRC Snippet: Seperate PM
Posted on Jun 14, 2008 7:38 pm

i dont have it, she was a foster sister, and she got transferred awhile back

srsly look at the date =/

jonesy44

Comments: 936

mIRC Snippet: Seperate PM
Posted on Jun 14, 2008 7:44 pm

oh .. that\'s too bad :[

Korvin

Comments: 238

mIRC Snippet: Seperate PM
Posted on Jun 14, 2008 7:46 pm

for who?

mountaindew

Comments: 1,550

mIRC Snippet: Seperate PM
Posted on Jun 14, 2008 9:16 pm

Code:

if ($Nick = %pm) { did -a spm 1 [ %pm ] says: $1- $crlf }
if ($Nick != %pm) { .timer 1 2 .notice $nick Talking to someone else. }

Use else

Riht_2

Comments: 43

mIRC Snippet: Seperate PM
Posted on Jun 15, 2008 8:14 pm

Complaints about channels is unnecessary, it\'s for PM only.

Seperate PM

Introduction

Grab the Code

Comments

Riht_2

My Snippet Tags

Contact

Sponsors


Last seen: Jun 14, 2008 Profile Snippets (13) Images (2) Comments Received (91) Comments Submitted (43) Forum Posts (2)