egghelp/eggheads community

Voice user if in MYSQL db

2007-04-13T11:46:03-04:00

OK that didn't work, but you prompted me to sort it myself:

Replace:
pushmode $chan +v $nick
With:
putserv "MODE $channel +v $nick"

And Replace:
pushmode $chan -v $newnick
With:
putserv "MODE $channel -v $newnick"

Thanks

Statistics: Posted by traxwriter — Fri Apr 13, 2007 11:46 am

Voice user if in MYSQL db

2007-04-13T05:15:15-04:00

Thats great thanks DayCuts

Statistics: Posted by traxwriter — Fri Apr 13, 2007 5:15 am

Re: Voice user if in MYSQL db

2007-04-07T02:55:14-04:00

All you really need to do is use pushmode after the user online messages.

Altered script (not tested but should be fine).

Code:

load /usr/lib/mysqltcl-2.30/libmysqltcl2.30.sopackage require mysqltclset db_handle [mysqlconnect -host localhost -socket /var/run/mysqld/mysqld.sock -user user -password pass -db database]bind join - "#channel *" join_mainbind part - "#channel *" part_mainbind sign - "#channel *" sign_mainbind nick - "#channel *" nick_mainproc sign_main {nick uhost hand channel reason} {global db_handle botnick  if {$nick==$botnick} {return 0}  set sql "UPDATE users SET onirc = 'no' WHERE username = '$nick'"  putloglev d * "ircstats: executing $sql"  set result [mysqlexec $db_handle $sql]  if {$result != 1} {    putlog "SQL - Error"  } else {     set id [mysqlinsertid $db_handle]     puthelp "PRIVMSG $channel :5 User Offline: \002$nick\002 - IRC bonus disabled"  }}proc join_main {nick uhost hand channel} {global db_handle botnick  if {$nick==$botnick} {return 0}  set sql "UPDATE users SET onirc = 'yes' WHERE username = '$nick'"  putloglev d * "ircstats: executing $sql"  set result [mysqlexec $db_handle $sql]  if {$result != 1} {    putlog "SQL - error"  } else {     set id [mysqlinsertid $db_handle]     puthelp "PRIVMSG $channel :9 User Online: \002$nick\002 - IRC bonus enabled."     pushmode $channel +v $nick  }}proc part_main {nick uhost hand channel msg} {global db_handle botnick  if {$nick==$botnick} {return 0}  set sql "UPDATE users SET onirc = 'no' WHERE username = '$nick'"  putloglev d * "ircstats: executing $sql"  set result [mysqlexec $db_handle $sql]  if {$result != 1} {    putlog "SQL - Error"  } else {     set id [mysqlinsertid $db_handle]     puthelp "PRIVMSG $channel :5 User Offline: \002$nick\002 - IRC bonus disabled"  }}proc nick_main {nick uhost handle channel newnick} {global db_handle botnick#  if {$nick==$botnick} {return 0}  set sql "UPDATE users SET onirc = 'no' WHERE username = '$nick'"  putloglev d * "ircstats: executing $sql"  set result [mysqlexec $db_handle $sql]  if {$result != 1} {    set sql "UPDATE users SET onirc = 'yes' WHERE username = '$newnick'"    putloglev d * "ircstats: executing $sql"    set result [mysqlexec $db_handle $sql]    putlog "SQL - Error"    if {$result != 1} {      putlog "SQL - Error"    } else {       set id [mysqlinsertid $db_handle]       puthelp "PRIVMSG $channel :9 User Online \002$newnick\002 - IRC bonus enabled"       pushmode $channel +v $newnick    }  } else {     set id [mysqlinsertid $db_handle]     puthelp "PRIVMSG $channel :5 User Offline \002$nick\002 - IRC bonus disabled"     pushmode -v $newnick  }}

Stand alone script.

Code:

load /usr/lib/mysqltcl-2.30/libmysqltcl2.30.sopackage require mysqltclset vdb_handle [mysqlconnect -host localhost -socket /var/run/mysqld/mysqld.sock -user user -password pass -db database]bind join - "#channel *" vjoin_mainbind nick - "#channel *" vnick_mainproc vjoin_main {nick uhost hand channel} {  global vdb_handle botnick  if {$nick==$botnick} {return 0}  set nickv [mysqlescape $nick]  set sql "SELECT username FROM users WHERE username = '$nickv' LIMIT 1"  putloglev d * "ircstats: executing $sql"  set result [mysqlsel $db_handle $sql -flatlist]  if {[llength [split $result]] == 1} {    pushmode $chan +v $nick  }}proc vnick_main {nick uhost handle channel newnick} {  global vdb_handle botnick  if {$newnick==$botnick} {return 0}  set sql "SELECT username FROM users WHERE username = '[mysqlescape $newnick]' LIMIT 1"  putloglev d * "ircstats: executing $sql"  set result [mysqlsel $db_handle $sql -flatlist]  if {[llength [split $result1]] == 1} {    pushmode $chan +v $newnick  } else {    pushmode $chan -v $newnick  }}

Statistics: Posted by DayCuts — Sat Apr 07, 2007 2:55 am

Voice user if in MYSQL db

2007-03-29T10:42:31-04:00

Hi,

I'm looking for a script that will voice a user if their name is in a mysql db

if they are not in the db print "Please use your site name to gain your IRC bonus $username"

Thanks in advance

I have a irc idle script I wondder if I could integrate into that:

Code:

load /usr/lib/mysqltcl-2.30/libmysqltcl2.30.sopackage require mysqltclset db_handle [mysqlconnect -host localhost -socket /var/run/mysqld/mysqld.sock -user user -password pass -db database]bind join - "#channel *" join_mainbind part - "#channel *" part_mainbind sign - "#channel *" sign_mainbind nick - "#channel *" nick_mainproc sign_main {nick uhost hand channel reason} {global db_handle botnick  if {$nick==$botnick} {return 0}  set sql "UPDATE users SET onirc = 'no' WHERE username = '$nick'"  putloglev d * "ircstats: executing $sql"  set result [mysqlexec $db_handle $sql]  if {$result != 1} {    putlog "SQL - Error"  } else {     set id [mysqlinsertid $db_handle]     puthelp "PRIVMSG $channel :5 User Offline: \002$nick\002 - IRC bonus disabled"  }}proc join_main {nick uhost hand channel} {global db_handle botnick  if {$nick==$botnick} {return 0}  set sql "UPDATE users SET onirc = 'yes' WHERE username = '$nick'"  putloglev d * "ircstats: executing $sql"  set result [mysqlexec $db_handle $sql]  if {$result != 1} {    putlog "SQL - error"  } else {     set id [mysqlinsertid $db_handle]     puthelp "PRIVMSG $channel :9 User Online: \002$nick\002 - IRC bonus enabled."  }}proc part_main {nick uhost hand channel msg} {global db_handle botnick  if {$nick==$botnick} {return 0}  set sql "UPDATE users SET onirc = 'no' WHERE username = '$nick'"  putloglev d * "ircstats: executing $sql"  set result [mysqlexec $db_handle $sql]  if {$result != 1} {    putlog "SQL - Error"  } else {     set id [mysqlinsertid $db_handle]     puthelp "PRIVMSG $channel :5 User Offline: \002$nick\002 - IRC bonus disabled"  }}proc nick_main {nick uhost handle channel newnick} {global db_handle botnick#  if {$nick==$botnick} {return 0}  set sql "UPDATE users SET onirc = 'no' WHERE username = '$nick'"  putloglev d * "ircstats: executing $sql"  set result [mysqlexec $db_handle $sql]  if {$result != 1} {    set sql "UPDATE users SET onirc = 'yes' WHERE username = '$newnick'"    putloglev d * "ircstats: executing $sql"    set result [mysqlexec $db_handle $sql]    putlog "SQL - Error"    if {$result != 1} {      putlog "SQL - Error"    } else {       set id [mysqlinsertid $db_handle]       puthelp "PRIVMSG $channel :9 User Online \002$newnick\002 - IRC bonus enabled"    }  } else {     set id [mysqlinsertid $db_handle]     puthelp "PRIVMSG $channel :5 User Offline \002$nick\002 - IRC bonus disabled"  }}

Statistics: Posted by traxwriter — Thu Mar 29, 2007 10:42 am