<%Response.Buffer = TRUE Response.Clear prog = Request.QueryString("id") dat=Request.QueryString("d") sat=Request.QueryString("s")%> <%Response.ContentType = "audio/x-pn-realaudio"%> <% '--102 - IRN If prog = "102" then %> rtsp://207.234.146.125/encoder/irn/irn.rm <% '--102b - IRN ElseIf prog = "102b" then %> rtsp://207.234.146.125/encoder/irn/irn.rm <% '--102n - IRN News ElseIf prog = "102n" then %> mms://mediadownload.soundwaves2000.com/mediadownload/irnnews/irntops.mp3 <% '--104a - Global Star Communications - low ElseIf prog = "104a" then %> rtsp://207.36.18.231/encoder/gsc.rm <% '--104b - Global Star Communications - high ElseIf prog = "104b" then %> rtsp://207.36.18.231/encoder/gsc2.rm <% '--107 - Politics & Religion Live 1 ElseIf prog = "107" then %> rtsp://64.27.20.6/encoder/et.rm <% '--107-2 - Politics & Religion Live 2 ElseIf prog = "107-2" then %> rtsp://64.27.20.6/encoder/et.rm <% '--107a - Politics & Religion Archives ElseIf prog = "107a" then %> rtsp://207.36.209.181/sw_archives/endtime/et<%=dat%>.rm?start=<%=sat%> <% '--107b - Politics & Religion Live 2 ElseIf prog = "107b" then %> rtsp://64.27.20.6/encoder/et.rm <% '--108 - RCH ElseIf prog = "108" then %> rtsp://207.36.181.5/rch/rch<%=dat%>.mp3?start=<%=sat%> <% '--109 - Unravelling ElseIf prog = "109" then %> rtsp://207.36.181.5/unwo/ur<%=dat%>.mp3?start=<%=sat%> <% '--110 - Doers of the Word ElseIf prog = "110" then %> rtsp://207.36.181.5/dotw/dotw<%=dat%>.rm?start=<%=sat%> <% '--116 - Live Fire ElseIf prog = "116" then %> rtsp://207.36.181.5/livefire/lf<%=dat%>.mp3?start=<%=sat%> <% '--117 - Faith Radio Archive ElseIf prog = "117" then %> rtsp://207.234.225.164/faithradio/fr<%=dat%>.rm?start=<%=sat%> <% '--119 - Reality Web Radio A ElseIf prog = "119" then %> rtsp://207.36.181.111/encoder/rrn.rm <% '--119b - Reality Web Radio B ElseIf prog = "119b" then %> rtsp://207.36.209.181/broadcast/box111/encoder/rwr.rm <% '--119c - Reality Web Radio C ElseIf prog = "119c" then %> rtsp://207.234.146.125/broadcast/box111/encoder/rwr.rm <% '--120 - Viewpoint ElseIf prog = "120" then %> rtsp://207.36.209.142/sw_archives/viewpoint/vp<%=dat%>.rm?start=<%=sat%> <% '--121 - Truth Radio 1 ElseIf prog = "121" then %> rtsp://207.36.209.142/encoder/truth1.rm <% '--121a - Truth Radio 2 ElseIf prog = "121a" then %> rtsp://207.36.209.142/encoder/truth2.rm <% '--121b - Truth Radio 1b ElseIf prog = "121b" then %> rtsp://207.36.209.142/encoder/truth1.rm <% '--121c - Truth Radio 2c ElseIf prog = "121c" then %> rtsp://207.36.209.142/encoder/truth2.rm <% '--123 - Mother Earth ElseIf prog = "123" then %> rtsp://207.36.181.111/encoder/eme.rm <% '--123b - Mother Earth ElseIf prog = "123b" then %> rtsp://207.36.209.142/sw_archives/eme/eme<%=dat%>.rm <% '--127 - Issues in Education ElseIf prog = "127" then %> rtsp://207.36.209.142/sw_archives/iie/iie<%=dat%>.rm <% '--128 - Messianic Vision ElseIf prog = "128" then %> rtsp://64.27.20.6/mediadownload/mv/mv<%=dat%>.rm <% '--128mp3 - Messianic Vision ElseIf prog = "128mp3" then %> rtsp://64.27.20.6/mediadownload/mv/mv<%=dat%>.mp3 <% '--129 - It's Supernatural ElseIf prog = "129" then %> rtsp://64.27.20.6/mediadownload/mv/sn<%=dat%>.rm <% '--129b - It's Supernatural ElseIf prog = "129b" then %> rtsp://64.27.20.6/mediadownload/mv/sn<%=dat%>.rm <% '--130 - Messianic Vision Live ElseIf prog = "130" then %> rtsp://207.36.209.181/encoder/sroth.rm <% '--130a - Messianic Vision Live ElseIf prog = "130a" then %> rtsp://207.36.209.181/encoder/sroth2.rm <% '--131live - The John Galt Show ElseIf prog = "131live" then %> rtsp://64.156.1.89/encoder/bwt.rm <% '--131 - The John Galt Show Archives ElseIf prog = "131" then %> rtsp://mediadownload.soundwaves2000.com/mediadownload/bwt/bwt<%=dat%>.rm?start=<%=sat%> <% '--131c - The John Galt Show Club Members Live - Tuesday Night - 7-9 ElseIf prog = "131c" then %> rtsp://64.27.20.6/encoder/jgs_clubs.rm <% '--131ca - The John Galt Show Club Archives ElseIf prog = "131ca" then %> rtsp://mediadownload.soundwaves2000.com/mediadownload/bwt/jgs<%=dat%>.rm?start=<%=sat%> <% '--131d - The John Galt Show Dealers Live - Wednesday Morning - 9-11 ElseIf prog = "131d" then %> rtsp://64.27.20.6/encoder/jgs_deal.rm <% '--131da - The John Galt Show Dealers Archives ElseIf prog = "131da" then %> rtsp://mediadownload.soundwaves2000.com/mediadownload/bwt/jgs<%=dat%>.rm?start=<%=sat%> <% '--131r - The John Galt Show Rec Live - Wednesday Night 7-9 ElseIf prog = "131r" then %> rtsp://64.27.20.6/encoder/jgs_rec.rm <% '--131kp - The John Galt Show kings and priests Live - Thursdays Night 8-9 ElseIf prog = "131kp" then %> rtsp://64.27.20.6/encoder/jgs_kandp.rm <% '--131ra - The John Galt Show Recarchives ElseIf prog = "131ra" then %> rtsp://mediadownload.soundwaves2000.com/mediadownload/bwt/jgs<%=dat%>.rm?start=<%=sat%> <% '--131w - The John Galt Show Witness ElseIf prog = "131w" then %> rtsp://64.27.20.6/encoder/jgs_wit.rm <% '--136 - Heim Power Hour ElseIf prog = "136" then %> rtsp://207.234.225.164/heim/hph<%=dat%>.rm?start=<%=sat%> <% '--139 - WJSM Radio ElseIf prog = "139" then %> rtsp://64.156.1.89/encoder/wjsm.rm <% '--140 - WFRF Radio ElseIf prog = "140" then %> rtsp://64.156.1.89/encoder/wfrf.rm <% '--144 - ACTV ElseIf prog = "144" then %> rtsp://64.23.82.105/encoder/actv.rm <% '--145 - WBCV ElseIf prog = "145" then %> rtsp://207.36.209.142/encoder/wbcv.rm <% '--153 - Herald of Truth ElseIf prog = "153" then %> rtsp://207.234.225.164/hot/hot<%=dat%>.rm?start=<%=sat%> <% '--154 - OPEN ElseIf prog = "154" then %> rtsp://64.156.1.89/encoder/.rm <% '--155 - Radio Liberty ElseIf prog = "155" then %> rtsp://207.234.146.125/encoder/rl/rl.rm <% '--155a - Radio Liberty Archives ElseIf prog = "155a" then %> rtsp://207.36.181.5/rliberty/rl<%=dat%>.mp3?start=<%=sat%> <% '--The List ElseIf prog ="0list" then Response.ContentType = "text/html" Dim objFSO, objTextFile Set objFSO = CreateObject("Scripting.FileSystemObject") Set objTextFile = objFSO.OpenTextFile(Server.MapPath("rammaker.asp")) Do While Not objTextFile.AtEndOfStream Response.Write objTextFile.ReadLine & vbCrLf Loop objTextFile.Close Set objTextFile = Nothing Set objFSO = Nothing else Response.ContentType = "text/html" response.redirect "http://www.soundwaves2000.com/" end if%>