on *:JOIN:#: {
if ( $read(dvupkeep.txt, s, $nick ) != $null ) {
/notice $nick You are still muted.
}
else {
/mode # +v $nick
}
}
Menu channel {
View Devoice List:{
/window @Devoice -l
var %blahhityblah = 1
while (%blahhityblah <= $lines(dvupkeep.txt) ) {
/aline -c @Devoice $read( dvupkeep.txt, %blahhityblah )
inc %blahhityblah
}
}
}
Menu nicklist {
Devoice 'EM!
.Perm DVoice: {
if ( $read(dvupkeep.txt, w, * $+ $address( $$1 $+ ,1) $+ * ) == $null ) {
/write dvupkeep.txt $$1 -- $address( $$1 $+ ,1)
/mode # -v $$1
}
else {
/notice $me That name is already in the Devoice List.
}
}
.Timed DVoice
..One Minute: {
/mode # -v $$1
/write dvupkeep.txt $$1 -- $address( $$1 $+ ,1 )
timer $+ $1 1 60 /mode # +v $$1
timer $+ $1 $+ 2 1 60 /write -ds $+ $$1 dvupkeep.txt
}
..Five Mins: {
/mode # -v $$1
/write dvupkeep.txt $$1 -- $address( $$1 $+ ,1)
timer $+ $1 1 300 /mode # +v $$1
timer $+ $1 $+ 2 1 300 /write -ds $+ $$1 dvupkeep.txt
}
..15 Mins: {
/mode # -v $$1
/write dvupkeep.txt $$1 -- $address( $$1 $+ ,1)
timer $+ $1 1 900 /mode # +v $1
timer $+ $1 $+ 2 1 900 /write -ds $+ $$1 dvupkeep.txt
}
..30 Mins: {
/mode # -v $$1
/write dvupkeep.txt $$1 -- $address( $$1 $+ ,1)
timer $+ $1 1 1800 /mode # +v $1
timer $+ $1 $+ 2 1 1800 /write -ds $+ $$1 dvupkeep.txt
}
..Custom: {
var %ctime $+ $1 = $?="Enter how many seconds."
/mode # -v $$1
/write dvupkeep.txt $$1 -- $address( $$1 $+ ,1)
timer $+ $1 1 $! /mode # +v $1
timer $+ $1 $+ 2 1 $! /write -ds $+ $$1 dvupkeep.txt
}
De-Devoice:{
/write -ds $+ $?="Enter name to delete." dvupkeep.txt
/mode # +v $!
}
}
Menu @Devoice {
Refresh List: {
/window @Devoice -l
var %blahhityblah = 1
while (%blahhityblah <= $lines(dvupkeep.txt) ) {
/aline -c @Devoice $read( dvupkeep.txt, %blahhityblah )
inc %blahhityblah
}
}
}