Post by: flattspott on February 07, 2004, 03:44:00 PM
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. ;# ;# ;# ;# ;# ;############################################################ ;---------------- 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 |
This post has been edited by flattspott: Feb 9 2004, 05:37 PM <
Post by: Yuyu on February 07, 2004, 04:03:00 PM
Post by: flattspott on February 07, 2004, 04:07:00 PM
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 <
Post by: geniusalz on February 07, 2004, 03:01:00 PM
More stuff for the content downloader
Post by: flattspott on February 07, 2004, 03:08:00 PM
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.
Post by: flattspott on February 07, 2004, 05:05:00 PM
Total count now is 30 working feeds. Yes I said 30, more then likely it'll be more.
Update will be soon <
Post by: flattspott on February 07, 2004, 06:27:00 PM
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 <
Post by: Kthulu on February 07, 2004, 05:45:00 PM
Post by: flattspott 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?
Post by: Yuyu on February 07, 2004, 07:30:00 PM
Post by: flattspott on February 09, 2004, 09:41:00 AM