|
Joined: Apr 2005
Posts: 1,009
Hoopy frood
|
OP
Hoopy frood
Joined: Apr 2005
Posts: 1,009 |
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... ?
|
|
|
|
Joined: Dec 2002
Posts: 3,547
Hoopy frood
|
Hoopy frood
Joined: Dec 2002
Posts: 3,547 |
Hmm, not sure if it works but it's using listbox not text.
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 }
}
|
|
|
|
Joined: Apr 2005
Posts: 1,009
Hoopy frood
|
OP
Hoopy frood
Joined: Apr 2005
Posts: 1,009 |
when clicked on send i get this:
* /dialog: 'wallops' name in use (line 934, dialogs.mrc)
|
|
|
|
Joined: Dec 2002
Posts: 3,547
Hoopy frood
|
Hoopy frood
Joined: Dec 2002
Posts: 3,547 |
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.
|
|
|
|
Joined: Apr 2005
Posts: 1,009
Hoopy frood
|
OP
Hoopy frood
Joined: Apr 2005
Posts: 1,009 |
i get error coz of this...
alias wallops { /dialog -m wallops wallops }
weird...
|
|
|
|
Joined: Dec 2002
Posts: 3,547
Hoopy frood
|
Hoopy frood
Joined: Dec 2002
Posts: 3,547 |
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.
|
|
|
|
Joined: Apr 2005
Posts: 1,009
Hoopy frood
|
OP
Hoopy frood
Joined: Apr 2005
Posts: 1,009 |
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 ?
|
|
|
|
Joined: Dec 2002
Posts: 3,547
Hoopy frood
|
Hoopy frood
Joined: Dec 2002
Posts: 3,547 |
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 $+(<,$nick,>) $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.
|
|
|
|
Joined: Apr 2005
Posts: 1,009
Hoopy frood
|
OP
Hoopy frood
Joined: Apr 2005
Posts: 1,009 |
if you have time and patience i would be gratefull =)
|
|
|
|
Joined: Dec 2002
Posts: 3,547
Hoopy frood
|
Hoopy frood
Joined: Dec 2002
Posts: 3,547 |
Sure, no problem..
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 $+(<,$nick,>) $1- | .timer 1 1 did -a wallops 1 $timestamp $+(<,$nick,>) $1-
}
on *:Dialog:wallops:sclick:3: {
if ($did($dname,2).text) { !wallops $did($dname,2).text }
}
|
|
|
|
Joined: Apr 2005
Posts: 1,009
Hoopy frood
|
OP
Hoopy frood
Joined: Apr 2005
Posts: 1,009 |
1 question, will this code work on mirc 6.01-6.03 ?
coz opers are "walloping" but nothing is recived in txt box
Last edited by raZOR; 07/04/05 11:14 PM.
IceCapped
|
|
|
|
Joined: Dec 2002
Posts: 3,547
Hoopy frood
|
Hoopy frood
Joined: Dec 2002
Posts: 3,547 |
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.
|
|
|
|
|