egghelp/eggheads community

cry for help

2004-10-15T13:40:24-04:00

No awyeah, the point was to create a messenger that does a pm if that person wants to get pm'ed and gets noticed if he doesnt want pm's

Statistics: Posted by metroid — Fri Oct 15, 2004 1:40 pm

cry for help

2004-10-15T09:50:51-04:00

The problem is with the variable you are trying to pass on to the new procedure as user has already defined.

Why are you trying to do it in two procedures? Do it in one simple as that (i.e. in msg:userflag). It might be a bit messy but, it would certainly work and be a bit faster.

Statistics: Posted by awyeah — Fri Oct 15, 2004 9:50 am

cry for help

2004-10-15T09:22:58-04:00

Well, i dont know how exactly, but it works now

Statistics: Posted by metroid — Fri Oct 15, 2004 9:22 am

cry for help

2004-10-15T03:46:38-04:00

Well thats my problem user, If i change q:msg it doesn't work anymore as it keeps giving me errors when i do, And as i put it to $text it doesnt work either as it has privmsg a user with a line :E

What did you change and what error did you get?

Statistics: Posted by user — Fri Oct 15, 2004 3:46 am

cry for help

2004-10-15T02:11:44-04:00

Well thats my problem user, If i change q:msg it doesn't work anymore as it keeps giving me errors when i do, And as i put it to $text it doesnt work either as it has privmsg a user with a line :E

Statistics: Posted by metroid — Fri Oct 15, 2004 2:11 am

Re: cry for help

2004-10-14T16:25:11-04:00

Code:

set userflag 0proc q:msg {text} {    global userflag    if {$userflag == "0"} {putquick "NOTICE $text :$text"} else {putquick "PRIVMSG $text :$text"}}proc msg:userflag {nick uhost hand text} {set a [getuser $hand XTRA userflag]putlog "1"if {$a == ""} {q:msg "PRIVMSG $nick :Your userflags are: (none)"putlog "2"} elseif {$a == "0"} {q:msg "NOTICE $nick :Your userflags are: +n"putlog "3"} elseif {$a == "1"} {putlog "4"q:msg "NOTICE $nick :Your userflags are: +m"}

I just can't get this work

I think it works just fine..but maybe not as you intended
The argument you pass to q:msg is used both as a target and as a message (putquick "NOTICE $text :$text"), so the resulting string sent to the irc server will be something like this:

"NOTICE PRIVMSG someNick :Your userflags are: something :PRIVMSG someNick :Your userflags are: something"

which doesn't make much sense to me...poor "PRIVMSG"/"NOTICE" will get alot of one-word notices (because of the misplaced colon)

Statistics: Posted by user — Thu Oct 14, 2004 4:25 pm

cry for help

2004-10-14T16:13:15-04:00

Display errors if any. And what about the bind, don't you need to bind it to something?

Statistics: Posted by DarkJFMan — Thu Oct 14, 2004 4:13 pm

cry for help

2004-10-14T12:30:17-04:00

Code:

set userflag 0proc q:msg {text} {    global userflag    if {$userflag == "0"} {putquick "NOTICE $text :$text"} else {putquick "PRIVMSG $text :$text"}}proc msg:userflag {nick uhost hand text} {set a [getuser $hand XTRA userflag]putlog "1"if {$a == ""} {q:msg "PRIVMSG $nick :Your userflags are: (none)"putlog "2"} elseif {$a == "0"} {q:msg "NOTICE $nick :Your userflags are: +n"putlog "3"} elseif {$a == "1"} {putlog "4"q:msg "NOTICE $nick :Your userflags are: +m"}

I just can't get this work

Statistics: Posted by metroid — Thu Oct 14, 2004 12:30 pm