Tuesday, August 18, 2009 at 7:52 PM.

godsTweetSuite.init

on init (accountname) {
	<<Changes
		<<5/15/09; 11:28:51 AM by DW
			<<Take a parameter that indicates which group is being initialized. Transitioning so that one installation can monitor multiple accounts.
		<<5/9/09; 3:57:01 PM by DW
			<<Add enabled flag.
		<<5/4/09; 12:15:43 PM by DW
			<<Created. 
	local (adrdata = @config.godTweets);
	if not defined (adrdata^) {
		new (tabletype, adrdata)};
	bundle { //global stuff
		if not defined (user.scheduler2.everyminute.godTweets) {
			user.scheduler2.everyminute.godTweets = @godsTweetSuite.everyMinute}};
	if accountname != "" { //5/15/09 by DW
		adrdata = @adrdata^.[accountname];
		if not defined (adrdata^) {
			new (tabletype, adrdata)}};
	if not defined (adrdata^.userProfiles) {
		new (tabletype, @adrdata^.userProfiles)};
	bundle { //prefs
		if not defined (adrdata^.prefs) {
			new (tabletype, @adrdata^.prefs)};
		if not defined (adrdata^.prefs.enabled) {
			adrdata^.prefs.enabled = true};
		if not defined (adrdata^.prefs.username) {
			adrdata^.prefs.username = ""};
		if not defined (adrdata^.prefs.password) {
			adrdata^.prefs.password = ""};
		if not defined (adrdata^.prefs.tweetSerialNum) {
			adrdata^.prefs.tweetSerialNum = 1};
		if not defined (adrdata^.prefs.ctTweetsInReport) {
			adrdata^.prefs.ctTweetsInReport = 100};
		if not defined (adrdata^.prefs.s3path) {
			adrdata^.prefs.s3path = ""};
		if not defined (adrdata^.prefs.s3url) {
			adrdata^.prefs.s3url = ""};
		if not defined (adrdata^.prefs.ftpPath) {
			adrdata^.prefs.ftpPath = ""};
		if not defined (adrdata^.prefs.flCommentsEnabled) { //5/15/09 by DW
			adrdata^.prefs.flCommentsEnabled = false};
		if not defined (adrdata^.prefs.tagline) { //5/15/09 by DW
			adrdata^.prefs.tagline = "What if you were subscribed to the 100 most popular people on Twitter?"};
		if not defined (adrdata^.prefs.image) { //5/15/09 by DW
			adrdata^.prefs.image = "<img src=\"http://images.scripting.com/archiveScriptingCom/2009/05/05/100twt.gif\" width=\"659\" height=\"135\" border=\"0\" alt=\"100TWT.gif\">"};
		if not defined (adrdata^.prefs.bgColor) { //5/15/09 by DW
			adrdata^.prefs.bgColor = "#E6EAE9"};
		if not defined (adrdata^.prefs.counterGroup) { //5/15/09 by DW
			adrdata^.prefs.counterGroup = accountname};
		if not defined (adrdata^.prefs.shortTitle) { //5/18/09 by DW
			adrdata^.prefs.shortTitle = accountname};
		if not defined (adrdata^.prefs.urlHomePage) { //5/18/09 by DW
			adrdata^.prefs.urlHomePage = "http://" + accountname + ".100twt.com/"}};
	bundle { //callbacks
		if not defined (adrdata^.callbacks) {
			new (tabletype, @adrdata^.callbacks)};
		if not defined (adrdata^.callbacks.beforeEveryHour) {
			new (tabletype, @adrdata^.callbacks.beforeEveryHour)}};
	bundle { //stats
		if not defined (adrdata^.stats) {
			new (tabletype, @adrdata^.stats)};
		if not defined (adrdata^.stats.ctListUpdates) {
			adrdata^.stats.ctListUpdates = 0};
		if not defined (adrdata^.stats.whenLastListUpdate) {
			adrdata^.stats.whenLastListUpdate = date (0)};
		
		if not defined (adrdata^.stats.ctFollows) {
			adrdata^.stats.ctFollows = 0};
		if not defined (adrdata^.stats.whenLastFollow) {
			adrdata^.stats.whenLastFollow = date (0)};
		
		if not defined (adrdata^.stats.ctUnfollows) {
			adrdata^.stats.ctUnfollows = 0};
		if not defined (adrdata^.stats.whenLastUnfollow) {
			adrdata^.stats.whenLastUnfollow = date (0)};
		
		if not defined (adrdata^.stats.ctPolls) {
			adrdata^.stats.ctPolls = 0};
		if not defined (adrdata^.stats.whenLastPoll) {
			adrdata^.stats.whenLastPoll = date (0)};
		
		if not defined (adrdata^.stats.ctLandingPageBuilds) {
			adrdata^.stats.ctLandingPageBuilds = 0};
		if not defined (adrdata^.stats.whenLastLandingPageBuild) {
			adrdata^.stats.whenLastLandingPageBuild = date (0)};
		
		if not defined (adrdata^.stats.ctReportBuilds) {
			adrdata^.stats.ctReportBuilds = 0}};
	bundle { //log
		if not defined (adrdata^.log) {
			new (outlinetype, @adrdata^.log)}};
	bundle { //calendar
		if not defined (adrdata^.calendar) {
			new (tabletype, @adrdata^.calendar)}};
	bundle { //idsSeen
		if not defined (adrdata^.idsSeen) {
			new (tabletype, @adrdata^.idsSeen)}};
	bundle { //images
		if not defined (adrdata^.images) {
			new (tabletype, @adrdata^.images)}};
	return (adrdata)};
bundle { //test code
	init ("nyTimes")}



This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.