View

List Sounds

Snippet Author: FURBY
Rated:

Snippet Description: load it in your remotes, press f3, select a sound, select a channel, and hit play

#######################################
# Sound System by Paul                #
# server: irc2.snm.co.nz              #
# channels: #[gn]lobby #[cp]help/bdesk#
# channels: #opers                    #
#######################################
alias f3 {
  dialog -m sound sound
}
on 1:dialog:sound:sclick:2: {
  sound $did(4).seltext
  echo $did(5).seltext 4played to channel : $did(4).seltext
  dialog -c sound
}
on 1:dialog:sound:sclick:3: {
  splay $did(4).seltext 
}
alias sndfind {
  :ONE
  If ($findfile(%snd.dir,*.wav,%file.cur) == $null) { /chnfind | halt } 
  Else { //did -a sound 4 $findfile(%snd.dir,*.wav,%file.cur) }
  inc %file.cur
  goto ONE
}
alias chnfind {
  :ONE
  If ($chan(%chan.cur) == $null) { halt | /unset %chan.cur }  
  Else { //did -a sound 5 $chan(%chan.cur) }
  inc %chan.cur
  goto ONE
} 
dialog sound {
  title "Sound Player"
  size -1 -1 300 420
  text "Pick A Sound:" 6, 10 1 100 15
  text "Pick A Channel to Play sound in:" 7, 10 319 250 14
  list 4, 10 15 280 320
  list 5, 10 330 280 67
  button "Preview Sound" 3, 25 385 80 25
  button "Play To Channel" 2 ,115 385 100 25 
  button "Close" 1 ,225 385 50 25, OK
}

Favorite Script -

Smilies	Message:
	Comments:

X-Static Codes

Search

Scripting

Links

Sponsors

Stats

View

List Sounds