Public Quotes System (current version: 1.32)

[speechles]

Ok, it was missing indeed. Added it, enabled it with the bot. Still does not work.

When someone tries one of the commands:

[16:47:11] Tcl error [pubqsys::quote]: illegal channel: USERSNICKNAME

On snap dog, that isn't cool... So ran the thing myself this time, tested it, and now she works...exactly as you desire.

http://ereader.kiczek.com/public_quotes_chanops.txt

Enjoys

[x0x]

Works like a charm!

[x0x]

Ups! I see these errors on the bot console

[20:59:41] Tcl error in script for 'timer19':
[20:59:41] can't read "instance(#MYCHANNELglobal)": no such element in array

[speechles]

Ups! I see these errors on the bot console

[20:59:41] Tcl error in script for 'timer19':
[20:59:41] can't read "instance(#MYCHANNELglobal)": no such element in array

Indeed, it's the odd shimmering effect rampant in this script it causes problems.. I've hopefully fixed the issue you were having with the timers. If not, shout out again.


Attempt x3: http://ereader.kiczek.com/public_quotes_chanops.txt

[c0urier]

That one gives:
[18:58:04] Tcl error in script for 'timer3':
[18:58:04] missing close-bracket
in expression "[info exists instance($..."

It's line 793:
Wrong:

Code: Select all

if {[info exists instance($chan$type)} {

Correct:

Code: Select all

if {[info exists instance($chan$type)]} {

[x0x]

Correct. I want my normal users to be able to !randquote, !quote, !quoteinfo with the script above. Now all commands are channel ops only. How to change this?

[caesar]

Code: Select all

proc pubqsys::channel_check {chan nick} {
      if {[channel get $chan quotes] && [isop $nick $chan]} { return 1 }
	return 0
}

this proc is doing that, so either add a variable where you could set this channel_check on/off, like this:

Code: Select all

variable channel_check 0

added in the settings area, and replace the above proc with:

Code: Select all

proc pubqsys::channel_check {chan nick} {
      variable channel_check
      if {$channel_check && [isop $nick $chan]} { return 1 }
	return 0
}

or create a channel flag and enable it per channel where you want it to be active only for channel operators, like this:

Code: Select all

setudef flag channel_check

added in the settings area, and replace the above proc with:

Code: Select all

proc pubqsys::channel_check {chan nick} {
      if {[channel get $chan channel_check] && [isop $nick $chan]} { return 1 }
	return 0
}

[x0x]

Both don't work... nothing happens.

[play4free2]

I am running speechles's Attempt x3 Version and just found an error.

Short description:
If you do !findquote in any channel other then the one the quote was added in, the command don't work.

Long description:
If I do in a different channel: !findquote #channel <search arguments>
I am getting:
[17:23:40] Tcl error [pubqsys::findquote]: no such channel record <-- In DCC Chat

If I do in a different channel: !findquote -all <search arguments>
I get no error but I don't get a reply from the bot.

If I do in a different channel: !findquote #channel
I am getting:
[6:29pm] <BotNick> ::: Error : Empty database. <-- In Channel

All other commands seem to work fine in a different channel then the quote was added and the bot finds the channel record

Examples:
!quote 1 #channel works
!randquote #channel works
etc.

NOTE: I already edited It's line 793

Thanks for any help fixing the issue

Edit/Update: I removed speechles's Attempt x3 Version and replaced it with the original one from the Archives and now everything works with no errors.