#!/usr/bin/liquidsoap
#set("init.daemon.pidfile.path","./<script>.pid")
%include "am-filters/filtroam.inc.liq"


default = playlist("/ftp/neanderthal/playlist", mode="random", reload=600)
jingles = playlist("ftp/neanderthal/jingles")
default = random(weights = [ 1, 10 ],[ jingles, default ])
live = audio_to_stereo(input.http("http://radiolina.info:8000/radiomario-live"))

jatta = playlist("/ftp/radiodimassa/JattaNerA")
cattivi = playlist("/ftp/neanderthal/palinsesto/cattivi_pensieri")
contro_greca = playlist("/ftp/neanderthal/palinsesto/controinformazione_dalla_grecia")
info_vario = playlist("/ftp/neanderthal/palinsesto/info_vario")
rise = playlist("/ftp/neanderthal/rise_above")
bile = playlist("/ftp/neanderthal/bile")
back = playlist("/ftp/neanderthal/back_to_basics)
brodo = playlist("/ftp/neanderthal/brodo")
mutillo = playlist("/ftp/neanderthal/mutillo")
onanista = playlist("/ftp/neanderthal/onanista")
murotorto = playlist("/ftp/neanderthal/murotorto")

info = random([ jatta, cattivi, contro_greca, info_vario ])

lunedi =
	switch(track_sensitive = false,
	[
		({10h-12h}, info),
		({12h-16h}, default),
		({16h-18h}, random([ rise, bile]),
		({18h-20h}, back)
	])

martedi =
	switch(track_sensitive = false,
	[
		({10h-12h}, info),
		({12h-16h}, default),
		({16h-18h}, mutillo),
		({18h-20h}, brodo)
	])

mercoledi =
	switch(track_sensitive = false,
	[
		({10h-12h}, info),
		({12h-16h}, default),
		({16h-18h}, onanista),
		({18h-20h}, default)
	])

giovedi =
	switch(track_sensitive = false,
	[
		({10h-12h}, info),
		({12h-16h}, default),
		({16h-18h}, jatta),
		({18h-20h}, default)
	])

venerdi =
	switch(track_sensitive = false,
	[
		({10h-12h}, info),
		({12h-16h}, default),
		({16h-18h}, murotorto),
		({18h-20h}, 4stracci)
	])

sabato =
	switch(track_sensitive = false,
	[
		({10h-12h}, info),
		({12h-16h}, default),
		({16h-18h}, brodo),
		({18h-20h}, default)
	])

domenica =
	switch(track_sensitive = true,
	[
		({10h-12h}, info),
		({12h-16h}, default),
		({16h-18h}, default),
		({18h-20h}, default)
	])

palinsesto =

    switch(track_sensitive= false,
    [
	({1w}, lunedi),
	({2w}, martedi),
        ({3w}, mercoledi),
        ({4w}, giovedi),
        ({5w}, venerdi),
        ({6w}, sabato),
        ({7w}, domenica)
    ])

radio = fallback(track_sensitive = false, [live, palinsesto, default])
radioAM = amplify(3.,override="replay_gain",filtroAM(radio))


output.icecast(
  %mp3(bitrate=128),
  mount="/radiomario-128.mp3",
  host="radiolina.info", port=8000, password="donthackme",
  fallible=true,
  radio)

output.icecast(
	%mp3(bitrate=128),
	mount="radiomario-AM",
	host="radiolina.info", port=8000, password="donthackme",
	fallible=true,
	audio_to_stereo(radioAM))