timevoice changing in a regchat

[barman]

What do i have to change so that ppl have to demand in pm a voice, waiting at their turn and than talk a few minutes? when they leave the room they have to renew their registration.

[DragnLord]

untested

Code: Select all

set vchannel "#channel"
bind msg - voiceme voiceme

proc voiceme {n u h t} {
   if {[onchan $n $::vchannel]} {putserv "MODE $::vchannel +v $n"}
   else {putserv "PRIVMSG $n :You are not in $::vchannel"}
}

[speechles]

Code: Select all

if {[onchan $n $::vchannel]} {putserv "MODE $::vchannel +v $n"
} else {putserv "PRIVMSG $n :You are not in $::vchannel"}

Pretty sure you gotta have it like this, as else isn't really a tcl command but an uninterpreted token (in the same class as then) used to construct if/then/else evaluations. If is required, then or else are merely cosmetic (optional).

Code: Select all

if {condition} then {do this
} else {do that}

if {condition}{do this
}{do that}

[DragnLord]

Probably, I usually just use a straight format.
That's what I get for trying to make it "easily readable".

Code: Select all

set vchannel "#channel"
bind msg - voiceme voiceme

proc voiceme {n u h t} {
   if {[onchan $n $::vchannel]} {putserv "MODE $::vchannel +v $n"} else {putserv "PRIVMSG $n :You are not in $::vchannel"}
}

[Edit: the forum splits it, so make it a single line and it's fine]

[barman]

Probably, I usually just use a straight format.
That's what I get for trying to make it "easily readable".

Code: Select all

set vchannel "#channel"
bind msg - voiceme voiceme

proc voiceme {n u h t} {
   if {[onchan $n $::vchannel]} {putserv "MODE $::vchannel +v $n"} else {putserv "PRIVMSG $n :You are not in $::vchannel"}
}

[Edit: the forum splits it, so make it a single line and it's fine]

then they wait at their turn? Where do i have to put the code in the script?