wallop - mIRC Discussion Forums

is there possibility if to transfer wallop msg's into txtbox on dialog and use another txtbox like mirc has to write/send messages ?

something like some msn is but just plain simple text no stupid icons/colors etc... ?

Hmm, not sure if it works but it's using listbox not text.

Code:

dialog wallops {
  title "Wallops Handler"
  size -1 -1 152 113
  option dbu
  list 1, 1 1 150 82, size hsbar vsbar
  edit "", 2, 1 85 112 10
  button "Send", 3, 116 85 34 11
  button "Close", 4, 44 99 50 10
}

on *:Wallops:*: {
  if ($dialog(wallops)) { did -a wallops 1 $1- by $nick }
}

on *:Dialog:wallops:sclick:3: {
  if ($did($dname,2).text) { wallops $did($dname,2).text }
}

when clicked on send i get this:

* /dialog: 'wallops' name in use (line 934, dialogs.mrc)

I have that in a fresh script file and it seems to be working for me to an extent and that is I'm not opered up so I'm getting the following message:

Permission Denied, You do not have the correct irc operator privileges.

i get error coz of this...

alias wallops {
/dialog -m wallops wallops
}

weird...

Code:

alias wallops {
  if (!$dialog(wallops)) dialog -dm wallops wallops
}

dialog wallops {
  title "Wallops Handler"
  size -1 -1 152 113
  option dbu
  list 1, 1 1 150 82, size hsbar vsbar
  edit "", 2, 1 85 112 10
  button "Send", 3, 116 85 34 11
  button "Close", 4, 44 99 50 10
}

on *:Wallops:*: {
  if ($dialog(wallops)) { 
    wallops
    did -a wallops 1 $1- by $nick 
  }
}

on *:Dialog:wallops:sclick:3: {
  if ($did($dname,2).text) { [color:red]![/color]wallops $did($dname,2).text }
}

/wallops - will open your dialog.
/!wallops - will send wallops messages.

Notice the exclamation mark, that needs to be there in order to cancel out your wallops alias.

niceeee

1 more question

(since no1 is on wallops atm) will this dialog
also show timestamps or not and can it be done so it can show ?

Code:

alias wallops {
  if (!$dialog(wallops)) dialog -dm wallops wallops
}

dialog wallops {
  title "Wallops Handler"
  size -1 -1 152 113
  option dbu
  list 1, 1 1 150 82, size hsbar vsbar
  edit "", 2, 1 85 112 10
  button "Send", 3, 116 85 34 11
  button "Close", 4, 44 99 50 10
}

on *:Wallops:*: {
  if ($dialog(wallops)) { 
    wallops
    did -a wallops 1 $timestamp $+(&lt;,$nick,&gt;) $1- 
  }
}

on *:Dialog:wallops:sclick:3: {
  if ($did($dname,2).text) { !wallops $did($dname,2).text }
}

It wont keep record of your Wallop Messages, as soon as you close the dialog the messages are lost but I can add that for you if you want.

if you have time and patience i would be gratefull =)

Sure, no problem..

Code:

alias wallops {
  if (!$dialog(wallops)) dialog -dm wallops wallops
}

dialog wallops {
  title "Wallops Handler"
  size -1 -1 152 113
  option dbu
  list 1, 1 1 150 82, size hsbar vsbar
  edit "", 2, 1 85 112 10
  button "Send", 3, 116 85 34 11
  button "Close", 4, 44 99 50 10
}

on *:Dialog:wallops:init:*: {
  if ($exists(wallops.txt)) { play -s wallops.txt 30 }
}

on *:Wallops:*: {
  wallops
  write wallops.txt did -a wallops 1 $timestamp $+(&lt;,$nick,&gt;) $1- |  .timer 1 1 did -a wallops 1 $timestamp $+(&lt;,$nick,&gt;) $1-
}

on *:Dialog:wallops:sclick:3: {
  if ($did($dname,2).text) { !wallops $did($dname,2).text }
}

1 question, will this code work on mirc 6.01-6.03 ?

coz opers are "walloping" but nothing is recived in txt box

Well, it should do. But I have v6.16 so I can't vouch for it but I don't see how it can't work.

Works perfectly fine for me hehe.