#!/usr/bin/liquidsoap
 set log.dir = "/home/laurent/scripts/scud_radio/"
 set log.stdout = true
 
 default = single("/home/laurent/scripts/scud_radio/jingle.mp3")
 jingles = single("/home/laurent/scripts/scud_radio/jingle.mp3")
 security = single("/home/laurent/scripts/scud_radio/security.mp3")
 
 cool = playlist("/home/laurent/scripts/scud_radio/cool.m3u")
 divr = playlist("/home/laurent/scripts/scud_radio/divr.m3u")
 fest = playlist("/home/laurent/scripts/scud_radio/fest.m3u")
 rock = playlist("/home/laurent/scripts/scud_radio/rock.m3u")
 trad = playlist("/home/laurent/scripts/scud_radio/trad.m3u")
 
 radio = fallback([request.queue(id="request"),
 			switch(track_sensitive=false,[
				 ({ 0h-7h }, cool),
				 ({ 7h-8h }, divr),
				 ({ 8h-9h }, fest),
				 ({ 9h-10h }, rock),
			     ({ 10h-11h }, trad),
				 ({ 11h-12h }, cool),
				 ({ 12h-13h }, divr),
				 ({ 13h-14h }, fest),
				 ({ 14h-15h }, rock),
				 ({ 15h-17h }, trad),
				 ({ 17h-19h }, cool),
				 ({ 19h-20h }, divr),
				 ({ 20h-21h }, fest),
				 ({ 21h-22h }, rock),
				 ({ 22h-0h }, trad),
			]), default])

 radio = random(weights=[1,5],[echo(jingles), radio])
 
 source = fallback(track_sensitive=false,[radio, security])
 
 output.icecast.vorbis(host = "localhost",
 					   port = 8000,
					   password = "hackme",
					   mount = "scud-radio.ogg",
					   source,
					   description = "Scud radio",
					   url = "http://www.renaissance-of-scud.com",
					   genre = "Traditionnel, Rock, Festif, Cool, Divers, ...")