xboxscene.org forums

Author Topic: News Changer script  (Read 309 times)

flattspott

  • Archived User
  • Hero Member
  • *
  • Posts: 1220
News Changer script
« on: February 07, 2004, 03:44:00 PM »

DISCLAIMER
The script was written using the WIP 1166 Build so it may not work for you.

UPDATE Version 3
Changed the main dialog box a bit
Changed the controls
Added check to see if NewsFeeds.xml is missing
Added help screen
Added back 1 feed
Added move forward 5 feeds
Added move back 5 feeds
Fixed a mistake in the NewsFeeds.xml

Save as - NewsChanger.xas
CODE

;###########################################################
;# Name: News Changer
;# Author: flattspott
;# Date: 02-09-2004
;# Version: 3.0
;# FileName: NewsChanger.xas
;#
;# Purpose:
;#  Allows you to change your current newsfeed to any one of
;#  almost 50 predfined ones.
;#
;# Installation:
;#  Upload both, the NewsChanger.xas file and the NewsFeeds.xml files
;#  to your Xbox,(Both files should go into your scripts folder)
;#  then add something like this somewhere in your Menu.xml.
;#  $ActualPath$ is the MXM folder for your info.
;#  
;#  
;#   NewsChanger
;#   Callfile $ActualPath$\Scripts\NewsChanger.xas
;#  

;############################################################
;---------------- Check if NewsFeeds.xml Exist Start --------
SETFUNC FeedXML FILEEXISTS $ActualPath$\Scripts\NewsFeeds.xml
IF# %FeedXML% == "0" GOTO ERROR
;---------------- Check if NewsFeeds.xml Exist End ----------
;---------------- XML Loading Start ---------------------
SET index 1
XMLOPEN NewsXML $ActualPath$\Scripts\NewsFeeds.xml
XMLSetNodePtr NewsXML !.NewsList.Feed
XMLGetValue NewsXML FeedName1 !.NewsList.Feed:0.Name
XMLGetValue NewsXML FeedName2 !.NewsList.Feed:1.Name
XMLGetValue NewsXML FeedName3 !.NewsList.Feed:2.Name
XMLGetValue NewsXML FeedName4 !.NewsList.Feed:3.Name
XMLGetValue NewsXML FeedName5 !.NewsList.Feed:4.Name
XMLGetValue NewsXML FeedName6 !.NewsList.Feed:5.Name
XMLGetValue NewsXML FeedName7 !.NewsList.Feed:6.Name
XMLGetValue NewsXML FeedName8 !.NewsList.Feed:7.Name
XMLGetValue NewsXML FeedName9 !.NewsList.Feed:8.Name
XMLGetValue NewsXML FeedName10 !.NewsList.Feed:9.Name
XMLGetValue NewsXML FeedName11 !.NewsList.Feed:10.Name
XMLGetValue NewsXML FeedName12 !.NewsList.Feed:11.Name
XMLGetValue NewsXML FeedName13 !.NewsList.Feed:12.Name
XMLGetValue NewsXML FeedName14 !.NewsList.Feed:13.Name
XMLGetValue NewsXML FeedName15 !.NewsList.Feed:14.Name
XMLGetValue NewsXML FeedName16 !.NewsList.Feed:15.Name
XMLGetValue NewsXML FeedName17 !.NewsList.Feed:16.Name
XMLGetValue NewsXML FeedName18 !.NewsList.Feed:17.Name
XMLGetValue NewsXML FeedName19 !.NewsList.Feed:18.Name
XMLGetValue NewsXML FeedName20 !.NewsList.Feed:19.Name
XMLGetValue NewsXML FeedName21 !.NewsList.Feed:20.Name
XMLGetValue NewsXML FeedName22 !.NewsList.Feed:21.Name
XMLGetValue NewsXML FeedName23 !.NewsList.Feed:22.Name
XMLGetValue NewsXML FeedName24 !.NewsList.Feed:23.Name
XMLGetValue NewsXML FeedName25 !.NewsList.Feed:24.Name
XMLGetValue NewsXML FeedName26 !.NewsList.Feed:25.Name
XMLGetValue NewsXML FeedName27 !.NewsList.Feed:26.Name
XMLGetValue NewsXML FeedName28 !.NewsList.Feed:27.Name
XMLGetValue NewsXML FeedName29 !.NewsList.Feed:28.Name
XMLGetValue NewsXML FeedName30 !.NewsList.Feed:29.Name
XMLGetValue NewsXML FeedName31 !.NewsList.Feed:30.Name
XMLGetValue NewsXML FeedName32 !.NewsList.Feed:31.Name
XMLGetValue NewsXML FeedName33 !.NewsList.Feed:32.Name
XMLGetValue NewsXML FeedName34 !.NewsList.Feed:33.Name
XMLGetValue NewsXML FeedName35 !.NewsList.Feed:34.Name
XMLGetValue NewsXML FeedName36 !.NewsList.Feed:35.Name
XMLGetValue NewsXML FeedName37 !.NewsList.Feed:36.Name
XMLGetValue NewsXML FeedName38 !.NewsList.Feed:37.Name
XMLGetValue NewsXML FeedName39 !.NewsList.Feed:38.Name
XMLGetValue NewsXML FeedName40 !.NewsList.Feed:39.Name
XMLGetValue NewsXML FeedName41 !.NewsList.Feed:40.Name
XMLGetValue NewsXML FeedName42 !.NewsList.Feed:41.Name
XMLGetValue NewsXML FeedName43 !.NewsList.Feed:42.Name
XMLGetValue NewsXML FeedName44 !.NewsList.Feed:43.Name
XMLGetValue NewsXML FeedName45 !.NewsList.Feed:44.Name
XMLGetValue NewsXML FeedName46 !.NewsList.Feed:45.Name
XMLGetValue NewsXML FeedName47 !.NewsList.Feed:46.Name
XMLGetValue NewsXML FeedName48 !.NewsList.Feed:47.Name
XMLGetValue NewsXML FeedName49 !.NewsList.Feed:48.Name
XMLGetValue NewsXML FeedURL1 !.NewsList.Feed:0.URL
XMLGetValue NewsXML FeedURL2 !.NewsList.Feed:1.URL
XMLGetValue NewsXML FeedURL3 !.NewsList.Feed:2.URL
XMLGetValue NewsXML FeedURL4 !.NewsList.Feed:3.URL
XMLGetValue NewsXML FeedURL5 !.NewsList.Feed:4.URL
XMLGetValue NewsXML FeedURL6 !.NewsList.Feed:5.URL
XMLGetValue NewsXML FeedURL7 !.NewsList.Feed:6.URL
XMLGetValue NewsXML FeedURL8 !.NewsList.Feed:7.URL
XMLGetValue NewsXML FeedURL9 !.NewsList.Feed:8.URL
XMLGetValue NewsXML FeedURL10 !.NewsList.Feed:9.URL
XMLGetValue NewsXML FeedURL11 !.NewsList.Feed:10.URL
XMLGetValue NewsXML FeedURL12 !.NewsList.Feed:11.URL
XMLGetValue NewsXML FeedURL13 !.NewsList.Feed:12.URL
XMLGetValue NewsXML FeedURL14 !.NewsList.Feed:13.URL
XMLGetValue NewsXML FeedURL15 !.NewsList.Feed:14.URL
XMLGetValue NewsXML FeedURL16 !.NewsList.Feed:15.URL
XMLGetValue NewsXML FeedURL17 !.NewsList.Feed:16.URL
XMLGetValue NewsXML FeedURL18 !.NewsList.Feed:17.URL
XMLGetValue NewsXML FeedURL19 !.NewsList.Feed:18.URL
XMLGetValue NewsXML FeedURL20 !.NewsList.Feed:19.URL
XMLGetValue NewsXML FeedURL21 !.NewsList.Feed:20.URL
XMLGetValue NewsXML FeedURL22 !.NewsList.Feed:21.URL
XMLGetValue NewsXML FeedURL23 !.NewsList.Feed:22.URL
XMLGetValue NewsXML FeedURL24 !.NewsList.Feed:23.URL
XMLGetValue NewsXML FeedURL25 !.NewsList.Feed:24.URL
XMLGetValue NewsXML FeedURL26 !.NewsList.Feed:25.URL
XMLGetValue NewsXML FeedURL27 !.NewsList.Feed:26.URL
XMLGetValue NewsXML FeedURL28 !.NewsList.Feed:27.URL
XMLGetValue NewsXML FeedURL29 !.NewsList.Feed:28.URL
XMLGetValue NewsXML FeedURL30 !.NewsList.Feed:29.URL
XMLGetValue NewsXML FeedURL31 !.NewsList.Feed:30.URL
XMLGetValue NewsXML FeedURL32 !.NewsList.Feed:31.URL
XMLGetValue NewsXML FeedURL33 !.NewsList.Feed:32.URL
XMLGetValue NewsXML FeedURL34 !.NewsList.Feed:33.URL
XMLGetValue NewsXML FeedURL35 !.NewsList.Feed:34.URL
XMLGetValue NewsXML FeedURL36 !.NewsList.Feed:35.URL
XMLGetValue NewsXML FeedURL37 !.NewsList.Feed:36.URL
XMLGetValue NewsXML FeedURL38 !.NewsList.Feed:37.URL
XMLGetValue NewsXML FeedURL39 !.NewsList.Feed:38.URL
XMLGetValue NewsXML FeedURL40 !.NewsList.Feed:39.URL
XMLGetValue NewsXML FeedURL41 !.NewsList.Feed:40.URL
XMLGetValue NewsXML FeedURL42 !.NewsList.Feed:41.URL
XMLGetValue NewsXML FeedURL43 !.NewsList.Feed:42.URL
XMLGetValue NewsXML FeedURL44 !.NewsList.Feed:43.URL
XMLGetValue NewsXML FeedURL45 !.NewsList.Feed:44.URL
XMLGetValue NewsXML FeedURL46 !.NewsList.Feed:45.URL
XMLGetValue NewsXML FeedURL47 !.NewsList.Feed:46.URL
XMLGetValue NewsXML FeedURL48 !.NewsList.Feed:47.URL
XMLGetValue NewsXML FeedURL49 !.NewsList.Feed:48.URL
XMLClose NewsXML
GOTO DISPLAY
;---------------- XML Loading End -----------------------
;---------------- Message Output Start ------------------
:ERROR
CallScript _DisplayMessageBox "NewsFeeds.xml not found, unable to proceed"
GOTO DONE
:DISPLAY
BeginDraw UseCurrent
MessageBox "Name: %FeedName{index}%$eol$NewsFeed # %index%$eol$   (A) to Save     (B) to Exit     (White) for Help   "
GOTO GETINPUT
:RESULTS
CallScript _RenderMessageBox "Newsfeed Changed to: $eol$ %FeedName{index}% $eol$ Changes will occur after rebooting"
EndDraw
DELAYMS 1500
GOTO DONE
:HELP
MsgBox "::DEFAULT GAMEPAD CONTROLS::$eol$Up or Right - moves forward 1 feed$eol$Down or Left - moves back 1 feed$eol$RTrig + Up or Right - moves forward 5 feeds$eol$RTrig + Down or Left - moves back 5 feeds$eol$A - saves the current feed$eol$B - exits out of NewsChanger$eol$White - displays this help screen"
RETURN
;---------------- Message Output End --------------------
;---------------- Gamepad Input Start -------------------
:GETINPUT
IQWaitMsg UI_LF UI_UP UI_DN UI_RT UI_SELECT UI_BACK SYS_HELP SYS_GAMEHELP KEY_LF KEY_RT KEY_UP KEY_DN
If %MSG_ID% == "UI_LF" GOTO BACKFEED
If %MSG_ID% == "UI_UP" GOTO BACKFEED
If %MSG_ID% == "UI_DN" GOTO NEXTFEED
If %MSG_ID% == "UI_RT" GOTO NEXTFEED
If %MSG_ID% == "KEY_LF" GOTO BACK5
If %MSG_ID% == "KEY_RT" GOTO NEXT5
IF %MSG_ID% == "KEY_UP" GOTO BACK5
IF %MSG_ID% == "KEY_DN" GOTO NEXT5
If %MSG_ID% == "UI_SELECT" GOTO CHANGEFEED
If %MSG_ID% == "UI_BACK" GOTO DONE
If %MSG_ID% == "SYS_HELP" GOTO HELP
GOTO GETINPUT
;---------------- Gamepad Input End ---------------------
;---------------- Next Feed Start -----------------------
:NEXTFEED
IF# %index% == "49" THEN
SET index 1
ELSE
ADD index 1
ENDIF
GOTO DISPLAY
;---------------- Next Feed End -------------------------
;---------------- Back Feed Start -----------------------
:BACKFEED
IF# %index% == "1" THEN
SET index 49
ELSE
SUB index 1
ENDIF
GOTO DISPLAY
;---------------- Back Feed End -------------------------
;---------------- Next 5 Feeds Start -----------------------
:NEXT5
IF# %index% >= "45" THEN
SET index 4
ELSE
ADD index 5
ENDIF
GOTO DISPLAY
;---------------- Next 5 Feeds End -------------------------
;---------------- Back 5 Feeds Start -----------------------
:BACK5
IF# %index% <= "4" THEN
SET index 48
ELSE
SUB index 5
ENDIF
GOTO DISPLAY
;---------------- Back 5 Feeds End -------------------------
;---------------- Save Start ----------------------------
:CHANGEFEED
XMLOPEN mxmXML ::MXM
XMLSetNodePtr mxmXML !.Newsfeed.URL
XMLSetValue mxmXML !.Newsfeed.URL %FeedURL{index}%
XMLSave mxmXML ::MXM
XMLClose mxmXML
GOTO RESULTS
;---------------- Save End ------------------------------
:DONE
QUIT


Save as - NewsFeeds.xml
CODE




Xbox-Scene
http://www.xbox-scene.com/xbox1data/xbox-scene.xml


Xbins
http://xbins.org/xbins.xml


All Xbox Skins - MXM
http://www.allxboxskins.com/rssmxm.xml


All Xbox Skins - 10 Most Recent
http://www.allxboxskins.com/rssskins.xml


Max Console
http://www.maxconsole.com/rss/xboxfeed.rss


ArsTechnica
http://arstechnica.com/etc/rdf/ars.rdf


Another Useless Website
http://anotheruselesswebsite.com/backend.php


Slashdot
http://www.slashdot.org/slashdot.rdf


AllHeadlineNews - Top
http://www.allheadlinenews.com/cgi-bin/news/xml/newsxml.cgi?cat=top


AllHeadlineNews - Business
http://www.allheadlinenews.com/cgi-bin/news/xml/newsxml.cgi?cat=business


AllHeadlineNews - Entertainment
http://www.allheadlinenews.com/cgi-bin/news/xml/newsxml.cgi?cat=entertainment


AllHeadlineNews - Health
http://www.allheadlinenews.com/cgi-bin/news/xml/newsxml.cgi?cat=health


AllHeadlineNews - Offbeat
http://www.allheadlinenews.com/cgi-bin/news/xml/newsxml.cgi?cat=offbeat


AllHeadlineNews - Politics
http://www.allheadlinenews.com/cgi-bin/news/xml/newsxml.cgi?cat=politics


AllHeadlineNews - Sports
http://www.allheadlinenews.com/cgi-bin/news/xml/newsxml.cgi?cat=sports


AllHeadlineNews - Technology
http://www.allheadlinenews.com/cgi-bin/news/xml/newsxml.cgi?cat=technology


AllHeadlineNews - World
http://www.allheadlinenews.com/cgi-bin/news/xml/newsxml.cgi?cat=world


News4Sites - Television
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=146


News4Sites - Wrestling
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=835


News4Sites - Weather
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=2095


News4Sites - TV Shows
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=774


News4Sites - Religion
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=2299


News4Sites - Police
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=2298


News4Sites - Rugby
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=713


News4Sites - Radio
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=148


News4Sites - Opera
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=2024


News4Sites - Technology
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=14


News4Sites - World at a Glance
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=546


News4Sites - Students
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=727


News4Sites - National Parks
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=2297


News4Sites - Musicals
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=1898


News4Sites - Music
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=149


News4Sites - Motorsports
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=296


News4Sites - Martial Arts
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=300


News4Sites - FBI
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=1471


News4Sites - FARC
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=1067


News4Sites - Extraterrestrial
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=2004


News4Sites - Earthquakes
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=2523


News4Sites - Disease Outbreaks
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=2398


News4Sites - Cub Scouts
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=2559


News4Sites - College Sports
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=850


News4Sites - College Football
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=848


News4Sites - College Baseball
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=849


News4Sites - CIA
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=1473


News4Sites - Astrology
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=1072


News4Sites - Artificial Intelligence
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=60


News4Sites - Amusement Parks
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=143


News4Sites - Airlines Commercial News
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=2365


News4Sites - Aerospace
http://www.news4sites.com/service/newsfeed.php?tech=rss&id=692





This post has been edited by flattspott: Feb 9 2004, 05:37 PM <
Logged

Yuyu

  • Archived User
  • Hero Member
  • *
  • Posts: 908
News Changer script
« Reply #1 on: February 07, 2004, 04:03:00 PM »

Maybe you could make this even better by including all the known to work newsfeeds from the pinned topic, Important Threads...  <
Logged

flattspott

  • Archived User
  • Hero Member
  • *
  • Posts: 1220
News Changer script
« Reply #2 on: February 07, 2004, 04:07:00 PM »

I'll probable do just that.

However some of the supposedly working ones,  don't work for me, like slashdot and xbins.

But I'll update it just the same

Also I think I'll switch all my scripts to use an Extra.xml file instead of bundling everything into the MXM.xml  <
Logged

geniusalz

  • Archived User
  • Hero Member
  • *
  • Posts: 1635
News Changer script
« Reply #3 on: February 07, 2004, 03:01:00 PM »

*Excellent*

More stuff for the content downloader smile.gif
Logged

flattspott

  • Archived User
  • Hero Member
  • *
  • Posts: 1220
News Changer script
« Reply #4 on: February 07, 2004, 03:08:00 PM »

Here a list from the pinned topic

http://www.php.net/news.rss
http://www.allxboxskins.com/rssmxm.xml
http://xbins.org/xbins.xml
http://www.slashdot.org/slashdot.rdf
http://www.xbox-scen.../xbox-scene.xml
http://arstechnica.com/etc/rdf/ars.rdf
http://anotheruseles...com/backend.php
http://backend.userl...2003/06/24#a302

any others?

I'll probably stay up late and do searching for compatible newfeeds (I will actually test them)

What feeds do you want me to find, sports movies, etc? The net is a big place and I'm sure there out there somewhere.
Logged

flattspott

  • Archived User
  • Hero Member
  • *
  • Posts: 1220
News Changer script
« Reply #5 on: February 07, 2004, 05:05:00 PM »

I'll definity have to start using an Extra.xml file now

Total count now is 30 working feeds. Yes I said 30, more then likely it'll be more.

Update will be soon  <
Logged

flattspott

  • Archived User
  • Hero Member
  • *
  • Posts: 1220
News Changer script
« Reply #6 on: February 07, 2004, 06:27:00 PM »

Actually it's more like, almost 50 newsfeeds

CIA, FBI, Cub Scouts, MotorSports, Extraterrestial, etc, etc

If you want them go here http://forums.xbox-scene.com/index.php?act...=0#entry1133535

I posted a seperate thread for this cause it didn't seem like that many people were interested in the NewsChanger script by itself. Hopefully this will peek you're interest.

Also perhaps if one the mods could change the subtitle for that post to almost 50 newsfeed included, then you could throw this one away

MOD EDIT: Changed title and merged threads

This post has been edited by geniusalz: Feb 8 2004, 05:22 AM <
Logged

Kthulu

  • Archived User
  • Hero Member
  • *
  • Posts: 787
News Changer script
« Reply #7 on: February 07, 2004, 05:45:00 PM »

beerchug.gif
Logged

flattspott

  • Archived User
  • Hero Member
  • *
  • Posts: 1220
News Changer script
« Reply #8 on: February 07, 2004, 06:02:00 PM »

QUOTE
Maybe you could make this even better by including all the known to work newsfeeds from the pinned topic, Important Threads...


Is that good enough for you YuYu? rolleyes.gif
Logged

Yuyu

  • Archived User
  • Hero Member
  • *
  • Posts: 908
News Changer script
« Reply #9 on: February 07, 2004, 07:30:00 PM »

Hehe, awsome work man.... Keep it up.... Oh and your context menu script is superb also....  <
Logged

flattspott

  • Archived User
  • Hero Member
  • *
  • Posts: 1220
News Changer script
« Reply #10 on: February 09, 2004, 09:41:00 AM »

Updated once again guys. I think it looks much nicer now  <
Logged