4 4 X - UArial
MS Sans Serif "Times New Roman )
dPArial
U_Arial
MS Sans Serif `
4
prefs J ` V " ; G K W [ ` j v ~author Mikel MaronauthorEmail mikel_maron@yahoo.comdescription homePageUrl name QuotesreleaseDateversion 0.1 W J * Arial
->8w B #)zLAND win on getQuote ()
local (htmltext = "")
local (params = {"Symbol":"YHOO,VOD.L"})
htmltext = soap.rpc.client("/soap","getQuote",@params,"66.28.98.121","9090",soapAction:"urn:xmethods-delayed-quotes")
params = {"zipcode":"10001"}
htmltext = htmltext + " " + soap.rpc.client("/soap/servlet/rpcrouter","getTemp",@params,"services.xmethods.net","80",methodNamespace:"m",methodNamespaceUri:" P H v 4
k 3 v n X W J Arial
JLAND win This script runs every hour.
Arial 1 ` 1 *2 0 W v 4
k 3 v n X Arial
FLAND win This script runs every night.
{ w .
" .
9 everyHour `everyMinute 6
everyNight { R N $
fileMenu user R Arial
NLAND win dialog.notify ("Hello, World!")
Arial
NLAND win Quotes
Hello World
p
? Arial
B p } Arial
BLAND win This script returns a string which appears in the Status Center on the Radio UserLand home page.
return ("I'm a cool Tool!")
* t Arial
- F M I 7䧹7Z title !Quotes - updated every 15 minutes 6 2 7䙹7
modules 6 $ Z _linetext M["C:\\Program Files\\Radio UserLand\\Tools\\Quotes.root"].QuotesWebsite.indexpath index.wsf 3 v $ ɹ Z _linete 3 5 1 7䞹7
quotes 5 7䧹7 t Arial
FF 2LAND win on finalFilter (pta)
pta^.renderedText = string.replace (pta^.renderedText, "[[title]]", "
")
return (true)
-
MS Sans Serif Eu`Q 2LAND win on firstFilter (adrPageTable)
return (true)
* [
MS Sans Serif Eu7a m L 3*lLAND win on pageFilter (pta)
if typeOf (pta^.template) == outlineType or typeOf (pta^.template) == wpTextType
table.assign (@pta^.template, string (pta^.template))
if typeOf (pta^.template) == stringType and not pta^.indirectTemplate
pta^.template = string.replace (pta^.template, "", "[[title]]")
html.addPageToGlossary (pta)
return (true)
y . EF
$ 0
;finalFilter firstFilter
pagefilter r V
MS Sans Serif P E $ B > 7 url http://127.0.0.1/Quotes/ B n X 8H VArial " @ "
v ) W X n W space /GIFfGIF89a ! , D ; VArial V " + 0 : C L Q [ aalink 008000bgcolor FFFFFFflRenderlink 0000FFspaceGif spacetext 000000vlink 800080 VArial k 3 v n ' 8
' 3 v n X k P 1 7䞹F^7
quotes 3" quotes P ) 4 G 4 W J `
k 3 v n X - updated every 15 minutes
n VArial n c Arial
=ŹO, 5 pLAND win on html (page)
if ! defined (QuotesData.cache)
QuotesSuite.getQuotes()
return QuotesData.cache
$ x
NM["C:\\Program Files\\Radio UserLand\\Tools\\Quotes.root"].QuotesWebsite.index
c VArial 2 2 2 ) Z ^ Arial 5959 LAND win ["C:\\Program Files\\Radio UserLand\\Tools\\Quotes.root"].QuotesWebsite.index
linetext
path
HX0p HX0X HX0X B 4
! -
6 B
G A p I h I 0 W v 4
k 3 v n X Arial
:LAND win return (QuotesSuite.getQuote())
` V 7q
*
4 @
H T
[ g
n z
#filters {#ftpSite Z #glossary #images "#prefs #tools zindex VVerdana ??8 8 ` 4 l Arial
>WT>m LAND win on edit (pta, args, page)
local(htmltext = "", indentlevel = 0)
on add(s)
htmltext = htmltext + (string.filledstring("\t",indentlevel) + s + "\r\n")
if defined (args.edit)
if defined (args.symbols)
QuotesData.symbols = args.symbols
else
QuotesData.symbols = ""
delete(@QuotesData.cache)
return false
local (symbols = "")
if defined (QuotesData.symbols)
symbols = QuotesData.symbols
add ("")
return htmltext
4QuotesSuite ׀ F ` 7
+ 7
E Q
c o
#enabled
QuotesData 5
QuotesInfo
QuotesMyRadio
!QuotesRpcHandlers QuotesSoapHandlers 4QuotesSuite 3
QuotesWebsite V \ P '_ Arial
?@m NLAND win #enabled
QuotesData
cache
prefs
symbols
QuotesInfo
QuotesMyRadio
modules
quotes
edit
html
title
QuotesRpcHandlers
QuotesSoapHandlers
QuotesSuite
background
everyHour
everyMinute
everyNight
callbacks
getQuotes
menu
statusCenterMessage
QuotesWebsite
@S0U0 @S0U0 @S0x 4 r
Arial
>WTOl $ LAND win on edit (pta, args, page)
local(htmltext = "", indentlevel = 0)
on add(s)
htmltext = htmltext + (string.filledstring("\t",indentlevel) + s + "\r\n")
if defined (args.edit)
if defined (args.symbols)
QuotesData.symbols = args.symbols
else
QuotesData.symbols = ""
delete(@QuotesData.cache)
return false
add("Enter Stock Tickers")
local (symbols = "")
if defined (QuotesData.symbols)
symbols = QuotesData.symbols
add ("")
return htmltext
b Pu cache :Click Edit above to configure Quotesht>12.81symbols YHOO>
93.0
WAG
37.46
MSFTY
-1.0
YHOO
12.89
^IXIC
-1.0
FDX
52.72
prefs Jsymbols !T VOD.L WAG MSFTY
YHOO ^IXIC FDXXDX
$ ` 7
+ 7
E Q
c o
#enabled
QuotesData )%
QuotesInfo
QuotesMyRadio
!QuotesRpcHandlers QuotesSoapHandlers 4QuotesSuite 3
QuotesWebsite V 2 6+ Arial
Oj NLAND win #enabled
QuotesData
QuotesInfo
QuotesMyRadio
modules
quotes
QuotesRpcHandlers
QuotesSoapHandlers
QuotesSuite
background
everyHour
everyMinute
everyNight
callbacks
getQuotes
menu
statusCenterMessage
QuotesWebsite
00
00
00
00
00
0(0
00
00
00
000
00
00
00
000
000
000
000
00 P// P// P// P// 8P0H0 8P0H0 8P0H0 8P0@K0 8P0@K0 } 8 7䧹H
" ' 1 7edit %0html side narrowtitle Quotes - updated every 15 minutes B >l
! -
7 C
H T
h
background X callbacks 7 getQuotes 8menu
statusCenterMessage i G W v 4
k 6 g $ HǷ
prefs Jsymbols !T VOD.L WAG MSFTY
YHOO ^IXIC FDXight>-1.0
FDX
52.87
prefs Jsymbols 0T VOD.L WAG MSFT
YHOO ^IXIC FDXXX G F Arial
>q xLAND win This script runs every minute.
local (day, month, year, hour, minute, second)
date.get (clock.now (), @day, @month, @year, @hour, @minute, @second)
if (minute % 15 == 0)
QuotesSuite.getQuotes()
tesData.cache = "it worked"
` ` Arial
-OkP : O