#!/bin/bash
cd "$(dirname "${BASH_SOURCE[0]}")"

#GTKDIALOG=gtkdialog/gtkdialog_x86_64
GTKDIALOG=gtkdialog/gtkdialog_i386

radioBtn() {
        echo '<button>
                                <label>'$1'</label>
                                <action>./play "'$1'" "'$2'"</action>
                        </button>'
}

MAIN_DIALOG='
<window title="Radio">
	<vbox>
		<hbox>
                        '"`radioBtn "Radio 1" http://bbcmedia.ic.llnwd.net/stream/bbcmedia_radio1_mf_p`"'
                        '"`radioBtn "Radio 2" http://bbcmedia.ic.llnwd.net/stream/bbcmedia_radio2_mf_p`"'
                        '"`radioBtn "Radio 3" http://bbcmedia.ic.llnwd.net/stream/bbcmedia_radio3_mf_p`"'
                        '"`radioBtn "Radio 4" http://bbcmedia.ic.llnwd.net/stream/bbcmedia_radio4fm_mf_p`"'
                        '"`radioBtn "Radio 4 Extra" http://bbcmedia.ic.llnwd.net/stream/bbcmedia_radio4extra_mf_p`"'
                        '"`radioBtn "Radio 5 Live" http://bbcmedia.ic.llnwd.net/stream/bbcmedia_radio5live_mf_p`"'
                        '"`radioBtn "Radio 6 Music" http://bbcmedia.ic.llnwd.net/stream/bbcmedia_6music_mf_p`"'
		</hbox>
		<hbox>
                        '"`radioBtn "BBC Cornwall" http://bbcmedia.ic.llnwd.net/stream/bbcmedia_lrcorn_mf_p`"'
                        '"`radioBtn "BBC Devon" http://bbcmedia.ic.llnwd.net/stream/bbcmedia_lrdevon_mf_p`"'
                        '"`radioBtn "Pirate FM" https://str4.sad.ukrd.com/pirate?rp=3.1.2&ts=1553703504&norequeue=1`"'
		</hbox>
		<hbox>
                        '"`radioBtn "R1 Dubstep" https://streaming.radionomy.com/R1Dubstep`"'
                        '"`radioBtn "R1 Melodic Dubstep" https://streaming.radionomy.com/R1MelodicDubstep`"'
                        '"`radioBtn "Dubstep.fm" https://www.dubstep.fm/256aac.m3u`"'
                        '"`radioBtn "Dubstep Radio" http://198.15.94.34:8018/stream`"'
		</hbox>
		<hbox>
                        '"`radioBtn "HBR1 Tranceponder" http://radio.hbr1.com:19800/trance.ogg.m3u`"'
                        '"`radioBtn "HBR1 Tronic Lounge" http://radio.hbr1.com:19800/tronic.ogg.m3u`"'
                        '"`radioBtn "HBR1 Dream Factory" http://radio.hbr1.com:19800/ambient.ogg.m3u`"'
		</hbox>
		<hbox>
                        '"`radioBtn "Rock Radio Beograd" https://mastermedia.shoutca.st/proxy/rockradio?mp=/stream`"'
                        '"`radioBtn "Rocklovers" http://ml0.t4e.dj:80/rocklovers_high.mp3`"'
                        '"`radioBtn "SUN Rock" http://80.82.229.202:8000/sun-rock.mp3`"'
                        '"`radioBtn "ABSOLUTEROCKRADIO" http://streaming211.radionomy.com:80/ABSOLUTEROCKRADIO`"'
                        '"`radioBtn "MetalRockDotFM" http://streaming316.radionomy.com:80/MetalRockDotFM`"'
                        '"`radioBtn "Sweet home" http://streaming211.radionomy.com:80/100-PROGRESSIVEROCK`"'
		</hbox>
                <hbox>
                        '"`radioBtn "80s Online Radio" http://149.56.195.94:8404/autodj`"'
                        '"`radioBtn "Radio Classic 70-80-90" http://comet.shoutca.st:8279/stream3_autodj`"'
                        '"`radioBtn "70s Disco Nights" http://149.56.195.94:8413/autodj`"'
                        '"`radioBtn "70sPopUp" http://streaming316.radionomy.com:80/70sPopUp_64.aac`"'
                        '"`radioBtn "Addictive-70s" http://streaming211.radionomy.com:80/Addictive-70s`"'
                        '"`radioBtn "Dynamic80" http://streaming211.radionomy.com:80/Dynamic80`"'
                        '"`radioBtn "Live the 80s" http://radio.wanderingsheep.tv:8009/80s`"'
                        '"`radioBtn "Juicy80sRadio" http://streaming211.radionomy.com:80/Juicy80sRadio`"'
                  </hbox>
              		<hbox>
                        '"`radioBtn "Pilot Lounge" http://188.254.50.254:8000/pilot_lounge_mp3`"'
                        '"`radioBtn "Punk FM" http://94.23.26.22:8090/live.mp3`"'
                        '"`radioBtn "Verket opus" http://mustafejen.se:8000/verket.opus`"'
                        '"`radioBtn "Celtic-Folk-Punk" http://streaming211.radionomy.com:80/Celtic-Folk-Punk`"'
                        '"`radioBtn "Record Russian Hits" http://air.radiorecord.ru:8102/russianhits_320`"'
                        '"`radioBtn "Radio Dom Druzhbi" http://62.109.3.230:80/dom_druzhby.mp3`"'
                        '"`radioBtn "100CHILL" http://streaming211.radionomy.com:80/100-CHILL`"'
                        '"`radioBtn "Radio House" http://142.44.135.172:8001/listen`"'
                  </hbox>
                  <hbox>
                          '"`radioBtn "AmbianceReggae" http://streaming211.radionomy.com:80/Ambiance-Reggae`"'
                          '"`radioBtn "UbuntuFM Reggae Radio" http://streaming307.radionomy.com:80/UbuntuFM-Reggae`"'
                          '"`radioBtn "ReggaeNation" http://streaming313.radionomy.com:80/ReggaeNation`"'
                          '"`radioBtn "HearMe - Reggae" http://hearme.fm:8549/stream`"'
                          '"`radioBtn "Reggaewave Radio" http://rascast.podzone.org:8014/reggaewave`"'
                          '"`radioBtn "Big Reggae Mix" http://ais-sa2.wdc01.cdnstream.com:80/2294_64.aac`"'
                          '"`radioBtn "Hoy Si Que Se Bebe (Acapella)" http://113fm-edge2.cdnstream.com:80/5228_128`"'
                          </hbox>
                          <hbox>
                  '"`radioBtn "Organlive.com" http://play.organlive.com:8002/320`"'
                  '"`radioBtn "Classical Music" http://radio-nice.ru:4350/radio`"'
                  '"`radioBtn "ClassicRadioInternational" http://streaming211.radionomy.com:80/ClassicRadioInternational`"'
                  '"`radioBtn "Piano Di Notte" http://radio.anothermusicproject.com:8000/pianodinotte`"'
                  '"`radioBtn "El Rossinyol" http://streaming211.radionomy.com:80/Misterium`"'
                </hbox>
                <hbox>
                  '"`radioBtn "jungle_128" http://air.radiorecord.ru:805/jungle_128`"'
                  '"`radioBtn "RadioSon.ru" http://www.radioson.ru:8009/JungleDnB.RadioSon.ru.mp3`"'
                  '"`radioBtn "radio-nice" http://radio-nice.ru:8150/stream`"'
                  '"`radioBtn "hearme.fm" http://hearme.fm:8157/stream`"'
                </hbox>
                <hbox>
                  '"`radioBtn "English 909" https://listen.radioking.com/radio/425977/stream/479497`"'
                </hbox>
                <text wrap="false" xalign="0.5" selectable="true">
                         <variable>txtTitles</variable>
                         <label>This text will be overwritten with the data from the command.</label>
                         <input>./info</input>
                </text>
                <timer interval="1" visible="false">
                        <action>refresh:txtTitles</action>
                </timer>

		<hbox>
    <button>
      <input file icon="media-record"></input>
      <label>Download</label>
      <action>(echo ; date ; ./info)  >> download.txt</action>
    </button>
    <button>
      <input file icon="face-angry"></input>
      <label>Hate!</label>
      <action>(echo ; date ; ./info)  >> hate.txt</action>
    </button>
			<button>
				<input file icon="media-playback-stop-symbolic"></input>
				<label>Stop</label>
                                <action function="exit">stop</action>
			</button>
		</hbox>
	</vbox>
</window>
'
export MAIN_DIALOG

case $1 in
	-d | --dump) echo "$MAIN_DIALOG" ;;
	*) $GTKDIALOG -G +10000 +10000 --space-expand=true --space-fill=true --program=MAIN_DIALOG ;;
esac

./stop