Need help with Devoice Script

Print Thread

#51268 25/09/03 04:21 AM

Joined: Dec 2002

Posts: 416

Othello

Fjord artisan

Othello

Fjord artisan

Joined: Dec 2002

Posts: 416

I am trying to write a devoice script that will devoice a nick
who triggers a auto voice script just to get a +v. What I have
done is when a nick triggers the ctcp command to get a
voice. The script waits 10 1/2 minutes befor it devoices the nick.if they don't share there files. For some reason the script
devoices the nick anyway. Any Suggestions, Ideas or input?

Code:

 
 [color:red] 
ctcp *:*:*: {
  if (!$window(@av)) { window -lh @AV }
  if ( SLOTS isin $1 ) || ( sound isin $1 ) || ( Mp3 isin $1 ) {
    if ( $nick isop # ) || ( $nick == $me ) { return }
    var %nick = $nick
    %fline = $fline(@AV,%nick,1,0)
    if (%fline) { .timer $+ %nick off }
    else { 
      iline @AV 1 %nick
      ./cnick $nick 4
 [color:green]       Timer Triggers the devoice  [/color] 
;      .timer $+ %nick 1 330 mode # -v $nick 
 [color:green]       I use this to color the nick instead of -v the nick [/color]
       .timer $+ %nick 1 330 ./cnick $nick 6  
    }
  }
}

ON *:PART:#: {
  var %nick = $nick
  %fline = $fline(@AV,%nick,1,0)
  if (%fline) { dline @AV %fline | .timer $+ %nick off | ./cnick -r $nick }
}

ON *:QUIT: {
  var %nick = $nick
  %fline = $fline(@AV,%nick,1,0)
  if (%fline) { dline @AV %fline | .timer $+ %nick off | ./cnick -r $nick }
}

ON *:DEVOICE:#: { ./cnick -r $nick }

ON *:OP:#: {
  var %nick = $nick
  %fline = $fline(@AV,%nick,1,0)
  if (%fline) { dline @AV %fline | .timer $+ %nick off | ./cnick -r $nick }
}
 [/color]

Re: Need help with Devoice Script

#51269 25/09/03 04:24 PM

Joined: Jun 2003

Posts: 238

r0ck0

Fjord artisan

r0ck0

Fjord artisan

Joined: Jun 2003

Posts: 238

Code:

ctcp *:*:*: {
  if (!$window(@av)) window -lh @AV
  if ([color:red]([/color]$nick isop #) || ($nick == $me[color:red])[/color]) return
  if ([color:red]([/color]SLOTS isin $1) || (SOUND isin $1) || (Mp3 isin $1[color:red])[/color]) {
    var %nick = $nick,%fline = $fline(@AV,%nick,1,0)
    if (%fline) .timer $+ %nick off
    else {
      iline @AV 1 %nick
      .cnick $nick 4
      ; Timer Triggers the devoice
      ; .timer $+ %nick 1 330 mode # -v $nick
      ; I use this to color the nick instead of -v the nick
      .timer $+ %nick 1 330 .cnick $nick 6
    }
  }
}
on *:PART:#: {
  var %nick = $nick,%fline = $fline(@AV,%nick,1,0)
  if (%fline) {
    dline @AV %fline
    .timer $+ %nick off
    .cnick -r %nick
 }
}
on *:QUIT: {
  var %nick = $nick,%fline = $fline(@AV,%nick,1,0)
  if (%fline) {
    dline @AV %fline
    .timer $+ %nick off
    .cnick -r %nick
 }
}
on *:DEVOICE:#:.cnick -r [color:red]$vnick[/color]
on *:OP:#: {
  var %nick = [color:red]$opnick[/color],%fline = $fline(@AV,%nick,1,0)
  if (%fline) {
    dline @AV %fline
    .timer $+ %nick off
    .cnick -r %nick
 }
}

Re: Need help with Devoice Script #51270 26/09/03 01:08 AM
Joined: Dec 2002 Posts: 27 RI, USA V VinnyD Ameglian cow
VinnyD Ameglian cow V Joined: Dec 2002 Posts: 27 RI, USA	Your script only checks for ctcp events. If the nick on the timer does not send a ctcp command to the channel you code will devoice the user.

Re: Need help with Devoice Script #51271 26/09/03 06:29 PM
Joined: Dec 2002 Posts: 416 O Othello OP Fjord artisan
OP Othello Fjord artisan O Joined: Dec 2002 Posts: 416	Yes the script is only triggered by ctcp events. I have also added a ON TEXT section to monitor a nick using a 10 minute 30 sec timer to make sure I give them enough time to send a play msg to the channel but Using the script to color the nicks to see who the script should devoice the script still devoices the nicks who are playing to the channels. Mybe I have not set the timers long enough to give the nick time to send a play msg. I thought betweek SPR and SDFIND they had there timers maxed out at 10 minutes.

Link Copied to Clipboard

Forums Scripts & Popups Need help with Devoice Script