home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
c't freeware shareware 1999 February
/
CT_SW9902.ISO
/
pc
/
software
/
finanzen
/
boerse
/
stock100.exe
/
setup.fil
/
sources
/
swissinvest-shr.src
< prev
next >
Wrap
Text File
|
1999-03-10
|
2KB
|
118 lines
[Symbol]=swissinvest
[Country]=41
[Name.German]=Schweizer Kurse von Swissinvest.com
[Name.English]=Swiss Quotes provided by swissinvest.com
[InfoShort.German]=Schweizer Kurse in CHF. Suche nach Ticker-Symbol oder Valorennummer. Keine Fonds-Kurse.
[InfoShort.English]=Swiss Quotes in CHF. Search based on Ticker Symbol or securitycode. No Funds.
[InfoLong]=Script provided by thaller@writeme.com
[SearchFor]=Ticker Symbol
[SearchTransform]=uppercase
[BasedOn]=http://www.swissinvest.com/
[Host]=www.swissinvest.com
[Doc]=Quotes/Detail.cfm?Valor=$(SYMBOL)
[ParserScript]=...
set "decimal", "."
set "thousand", ","
set "currency", "CHF"
onerror "<$(SYMBOL) not found>"
findline "$(SYMBOL)"
onerror "<N/A>"
OutputTo "date"
FindLine ">date:<"
MoveLine 1
KillTag "*"
SayUntil "~"
Say "|D/M/Y"
OutputTo "bid"
FindLine ">bid:<"
MoveLine 1
KillTag "*"
SayNextNumber
OutputTo "ask"
FindLine ">ask:<"
MoveLine 1
KillTag "*"
SayNextNumber
OutputTo "last"
FindLine ">close:<"
MoveLine 1
KillTag "*"
SayNextNumber
OutputTo "time"
FindLine ">time bid/ask:<"
MoveLine 1
KillTag "*"
UnSpace
SayUntil "~"
Say "|h:m:s"
OutputTo "abschange"
FindLine ">change:<"
MoveLine 2
KillTag "*"
UnSpace
SayNextNumber
OutputTo "yesterday"
FindLine "prev. day:<"
MoveLine 1
KillTag "*"
SayNextNumber
OutputTo "volume"
FindLine ">daily volume:<"
MoveLine 1
KillTag "*"
SayNextNumber
OutputTo "high"
FindLine ">daily high:<"
MoveLine 1
KillTag "*"
SayNextNumber
OutputTo "low"
FindLine ">daily low:<"
MoveLine 1
KillTag "*"
SayNextNumber
OutputTo "high52weeks"
FindLine ">year high:<"
MoveLine 1
KillTag "*"
SayNextNumber
OutputTo "low52weeks"
FindLine ">year low:<"
MoveLine 1
KillTag "*"
SayNextNumber