Home » CEEFAX disks » telesoftware7.adl » 27-05-88/SHARINF
27-05-88/SHARINF
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
| Tape/disk: | Home » CEEFAX disks » telesoftware7.adl |
| Filename: | 27-05-88/SHARINF |
| Read OK: | ✔ |
| File size: | 50FA bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- CEEFAX disks » telesoftware10.adl » 18-11-88/SHARINF
- CEEFAX disks » telesoftware7.adl » 27-05-88/SHARINF
File contents
SHARE
(c) J.R.Leighton Aug 1987
SHARES is a suite of programs which allows up to 3 portfolios
containing up to 20 companies each and 1 Index file, to be updated
either manually or automatically from 'live' CEEFAX broadcasts. The
data in the files may be displayed in the form of plots such that
trends can be seen and perhaps forecast. Books on the subject,
'chartism', can be found in libraries and bookshops.
It must be emphasised that the author cannot be responsible for any
gain or loss incurred from the use of this suite of programs!
...oooOOOooo...
1. DOWNLOADING FROM TELESOFTWARE
Download from telesoftware, files MAIN, ENTRY, ANALYSE, PLOT,
OVERALL, AUTO, PRINT16, YEAR, 19870, 19871, 19872, 19880, 19881 and
19882 to a blank formatted disc. A description of the data files
19870, 19871 etc., may be found in Appendix I.
1.1 INITIALISATION
CHAIN MAIN by typing CH."MAIN" and, because it is being run for the
first time, you will be asked whether you would like a !BOOT file
produced. If so, from now on, the disc may be auto-BOOTed in the
usual way by pressing shift-BREAK.
It is recommended that you now make a back-up copy of the disc since
it is written to whilst updating records. In fact, regular back-ups
should be made, since, should a disc become corrupted or damaged, you
could lose several years worth of data.
2. CONTROLS AND USE OF SHARE SOFTWARE
There now follows a description of the controls required to save and
analyse share prices. It is assumed that the broadcast software and
data files are on the same disc in DRIVE 0.
Later on, you may wish to select your own shares from those broadcast
on the financial pages of CEEFAX. In this case see APPENDIX II.
The disc holding the SHARE software should always be placed in DRIVE
0 since programs are loaded automatically from this DRIVE. See
APPENDIX I on how to use different DRIVES for the data files.
Auto-BOOT the disc and the main menu will be presented.
The UP/DOWN cursor keys should be used in any menu/panel to select
and the RETURN key used to make the selection. Wrap around of the
cursor is utilised.
3. SELECT PORTFOLIO
The first option selects a portfolio. This is only required if you
wish to create/enter/alter/browse a portfolio manually. Selecting
this will present another panel which lists all the available
portfolios (3) and an index file.
If any particular portfolio has not yet been created you will be
asked whether you would like one created. This entails entering the
date and the day of the week from which it will run. Enough space for
the current year is then allocated to the file selected, provided
there is enough room on the disc.
4. DATA ENTRY
The next option on the main menu allows the currently selected
portfolio (displayed at the head of the menu) to be
updated/altered/browsed. Either the name of the companies may be
inserted/altered (usually on creation of the Portfolio) or the share
price for any company on any day may be entered/altered. When
inserting the company names, care should be taken to ensure that the
entered characters are exactly as transmitted on CEEFAX page 130. If
there is ANY difference, it will not be updated. It is not necessary
to insert the FT-100 name to the index file since this is done
automatically on file creation and it is not searched for during data
downloading.
4.1 Whilst in the edit prices panel, use the LEFT/RIGHT cursor keys
to decrement/increment the date and the UP/DOWN cursor keys to select
a particular company.
Note that if you DECREMENT the date, using the LEFT cursor key,
beyond the beginning of the file then the current file will be CLOSEd
and a file for the previous year will be searched for. If it does not
exist you will be asked whether you would like to create one.
Similarly, if you ADVANCE the date, using the RIGHT cursor key,
beyond the last day of the current file, then this file will be
CLOSEd and a file for the next year will be searched for. Again, if
it does not exist you will be asked whether you wish to create one.
On answering a few questions the new file will be created if there is
enough room on the current disc surface.
N.B. WHEN LEAVING THE EDIT PRICES PANEL, IT SHOULD BE SET ON THE
CURRENT DAY SINCE THE PLOTTING PROGRAMMES PLOT UP TO THIS DAY.
4.2 Having left the editing facility and records have been changed it
is advisable to use the SCALE option. The data in the current file is
scanned such that scaling parameters can be calculated and placed on
the disc which increases the plotting speed in the plot option. If a
large amount of data has been collected this will take a little
while. Since the updating is designed to be done automatically from
CEEFAX this should not be a problem as the scaling is also done
automatically and all the data does not normally need to be scanned.
This facility can also be utilised if the scaling parameters are
found not to be correct while plotting.
5. AUTO ENTRY
The third option will automatically update from CEEFAX, any Portfolio
files found on the disc. Presently, there are two files of share
prices and a file holding the FT100 index.
The data is only downloaded at the 'close of business' for the
current day. It does not matter what day the file was left at on its
last use since the program searches for the correct day.
Any days for which data is not entered will result in gaps on the
disc. These gaps are catered for in the analysis programmes. Weekends
are not allocated space on the disc since the City is closed at these
times, thus reducing wasted space.
If an attempt is made to download data during the weekend, it will be
saved in the space allocated to the previous Friday. Similarly, if an
attempt is made to download data after midnight and before 9 am and
the CEEFAX pages still hold data for the previous day, it will be
saved in the space allocated to the previous day.
Bank holidays are allocated space since it would be difficult to
calculate these days and the amount of work involved would not
warrant the small amount of space saved.
It is advisable to plot all the data after downloading them, since
any errors in capturing the data can usually be identified and
corrected. See APPENDIX III for errors in auto-downloading data.
6. ANALYSE
The fourth option on the main menu is to analyse the data. On
selection, another panel will be displayed which allows the data to
be plotted.
6.1 The first two options allow a particular company/index to be
plotted with that of another company/index. If only one is selected
then a graph covering the whole screen will be plotted for the
selected company/index.
6.2 The third option plots the one or two selected companies/index
previously selected. The price/indicator axis (vertical) is
logarithmic since share prices move in this manner.
6.3 The fourth option allows the index and share prices to be plotted
two-at-a-time with a key press required between each plot. The ESCAPE
key may be used to exit this sequence. Pressing <P> will cause the
supplied screen dump software to be loaded and dump the current
screen to an Epson compatible printer. See APPENDIX IV for use of
other screen dump programs.
6.4 The next option plots the percentage gains/losses over all the
companies in all the Portfolio files on the disc.
The data for shares going ex-scrip are not adjusted but these are
easily detected by large downward jumps in the plotted prices by
factors of 1/2, 1/3, 1/4 etc. (these are marked xc on the CEEFAX
pages). However, large slumps in the market will also appear in a
similar fashion and usually affect all prices and indices as during
October 1987.
6.5 The sixth and seventh options allow the setting of running
averages.
Both running average periods may be increased or decreased in days by
pressing the LEFT or RIGHT cursor keys whilst the bar cursor is over
the required option. Also each averaging period may be toggled ON or
OFF by pressing the RETURN key whilst the cursor bar is over the
required option.
The settings will be stored on disc in file 'YEAR' so that the next
time the program is used the same averaging periods and state will be
used.
The averages plotted may, arguably, be used to assist in determining
the trend of a share price. Trial-and-error and experience should be
used to find good values for the averaging periods.
6.6 The final option returns the user to the main menu.
7. DATA DRIVE
This option allows the current drive to be changed from within the
program should you have more than one drive available.
8. END
This option ENDs the program cleanly and enters BASIC.
APPENDIX I
A) FILENAMES
Data filenames are made up of the YEAR, eg. 1987, followed by 0, 1,
2 or 3. Files ending in 0 are the Index files holding the FT-100
Index. Those ending in 1, 2 or 3 hold prices for up to 20 companies
each.
The file 'YEAR' holds the current year for each of the previously
described files. This file may be deleted using the Disc Filing
System (DFS) command
*DELETE YEAR
and then recreated on AUTO-BOOTing the MAIN menu. This is to allow
data from a previous year to be plotted on its own.
Should the current disc become full whilst creating new files, you
have to remove old files from the disc. You may like to copy these
old files to another disc first before they are deleted from the
current disc. If so, exit the SHARE programs and use the DFS command,
*COPY 0 0 1987*
which will copy all the files for 1987 to another disc in DRIVE 0. In
this case, you will of course, be prompted to insert source and
destination discs.
Once they have been safely copied they should be deleted from the
current disc using the DFS command
*WIPE 1987*
It is suggested that the disc is now compacted.
If you have a double sided or dual disc drives you may maximise the
amount of disc space available for data files by transferring all the
data files to a disc surface in other than DRIVE 0 which must hold
the SYSTEM software. So, if for instance, you have a double-sided
drive you could transfer all the data files to DRIVE 2, the obverse
side to DRIVE 0, by issuing the DFS command,
*COPY 0 2 1987*
which will copy all 1987 files from DRIVE 0 to DRIVE 2. Then,
*COPY 0 2 1988*
which will copy all 1988 files and so on.
Once this has been done you could delete these files from DRIVE 0 as
described earlier.
To use these files on DRIVE 2, auto-BOOT the system disc containing
the SHARE software and change drives using the relevant option from
the MAIN PANEL.
B) FILE STRUCTURE
For those who may wish to write their own software to analyse the
data there now follows a detailed description of the file structure.
The file 'YEAR' may be read using the following BASIC:-
10 DIM year%(3)
20 X%=OPENIN("YEAR")
30 FOR I%=0 TO 3
40 INPUT#X%,year%(I%)
50 NEXT
60 IF EXT#X%>&14 INPUT#X%,L%,H%
70 CLOSE#X%
80 END
so that the current year for the INDEX file, YYYY0 is held
in the array element year%(0) and that for PORTFOLIO 1, ie. YYYY1, is
held in the array element year%(1) where YYYY is the integer held in
the array element concerned.
The variables L% and H%, if present, hold the current averaging
periods and state. If the value held is greater than 200 then the
averaging period will be switched ON, otherwise it will be switched
OFF. If an averaging period is ON, subtract 256 and it will be
switched OFF. Conversely, if an averaging period is OFF, add 256 and
it will be switched ON.
The INDEX and PORTFOLIO files have a relatively complex file
structure. There are 4 main sections to these files.
SECTION 1 - INDEX or Company names. SECTION 2 - dates and disc
pointers. SECTION 3 - maximum and minimum prices. SECTION 4 - the
prices.
SECTION 1 INDEX or Company names.
When updating the files from 'CEEFAX' the Index data is found by
transferring BBC 1/Page 125 to memory. Pages are transferred to
memory until sub-page 2 is found, when the FT-100 index is extracted
and saved to disc.
On the other hand, for the PORTFOLIO files, BBC 1/Page 130 is
transferred into memory. The share price for any particular company
may be found on any of 6 sub pages so each company name held on file
is compared with each company name on the transferred CEEFAX page. If
there is a match, the appropriate price is extracted and saved.
The company names on CEEFAX are held in up to 7-characters. Likewise,
the company names held in the PORTFOLIO files are held in
7-characters. For this reason, there are no terminators to the
company names on file as they are always 7-characters long. The
company names are written one character at a time in correct order,
ie. as they normally appear.
SECTION 2 DATES AND DISC POINTERS
This section holds some spare bytes for possible future expansion and
all the dates and pointers for data access.
SECTION 3 - MAXIMUM AND MINIMUM PRICES.
Because the Index/prices may be any value from 0 to 9999 they need to
be scaled whilst plotting. To speed up the plotting process the
maximum and minimum values are stored on disc. During automatic
downloading, these values are updated simply by comparing the most
recently downloaded prices against the maximum and minimum values
stored on disc. If necessary, the max/min values are updated.
SECTION 4 - THE PRICES.
The main section of each file holds the prices for each company.
There now follows the layout of the data files:-
SECTION 1 SHARE NAMES
bytes description
0-6 first share name
7-13 second share name
etc. for up to 20 names SECTION 2 POINTERS
bytes description
140-157 spare bytes
158-159 pointer to first data point for first share
(pointer DIV 256, pointer MOD 256)
160-163 current date (D/M/Y) in the form D, M, Y DIV
256, Y MOD 256
164 current day (Monday=1, Tuesday=2 etc.)
165-166 pointer to first share price on current day
(pointer DIV 256, pointer MOD 256)
167-170 date of first data point in the same form as
bytes 160-163
SECTION 3 MAXIMUM, MINIMUM VALUES
bytes description
171-172} first share minimum value (min DIV 256, min
MOD 256)
173-174} first share maximum value (max DIV 256, max
MOD 256)
175-176} second share minimum value (min DIV 256, min
MOD 256)
} and so on for up to 20 shares
SECTION 4 SHARE DATA
bytes description
251-252 first share price for first company (price
DIV 100, price MOD 100)
253-254 first share price for second company (price
DIV 100, price MOD 100)
and so on for 20 companies. This sequence is then
repeated for each day so that for a normal data file
each day occupies 40 bytes. Note that in the case of
the INDEX files each day occupies 2 bytes only but in
every other respect the files are identical.
APPENDIX II
STARTING A NEW SET OF PORTFOLIOS
If you wish to start with a completely new set of portfolios, proceed
as follows:-
1) DELETE ALL DATA FILES.
Assuming the data files are in the current drive, issue the
following DFS commands from BASIC or whatever,
*WIPE 1987*
*WIPE 1988*
*DELETE YEAR
and reply to any prompts.
2) AUTO-BOOT THE SYSTEM DISC IN DRIVE 0.
You will be asked what year the INDEX and PORTFOLIO files
are to start. If you do not want a particular file to be
created reply by entering 0 (zero), otherwise, enter the
year, eg. 1988. This creates the file 'YEAR' on DRIVE 0.
FILE 'YEAR' IS ALWAYS ON DRIVE 0.
3) CREATE THE DATA FILES.
The data files will only be created when you try to access a
file which does not exist.
The best method is to select each file from the MAIN panel
and then select 'Data entry'. Select 'Data entry/browse'
from the next panel and answer the questions presented.
If all is well a blank file will be created starting at the
specified starting date and ending on the last day of the
year which is not a Saturday or Sunday.
Return to the main panel to create the next file.
4) ENTER SHARE NAMES.
Next the blank files must have sharenames inserted.
The INDEX file has its name inserted automatically.
From the MAIN panel, select one of the PORTFOLIOS previously
created. Then select 'Data entry'.
From the next panel select 'Share name entry/edit'.
Enter the sharenames. The keyed input is printed in the
panel at the bottom. When all the required characters for
each share name have been entered, press <RETURN>. There is
no need to press <RETURN> if the entered name is 7
characters long. The PANEL cursor will automatically move
down 1 row, ready for the next share name.
When all the share names have been entered, it is important
to exit the routine by placing the cursor over the 'End
entry' and pressing <RETURN>. This will cause the share
names to be written to disc and the file closed. The
previous PANEL will then appear.
Return to the MAIN panel to repeat the process for the next
PORTFOLIO.
APPENDIX III
ERRORS IN DOWNLOADING DATA FROM CEEFAX
A) SHARE NAMES SPELT INCORRECTLY
The share prices are downloaded by scanning the relevant pages of
CEEFAX for the required companies.
As mentioned earlier, if the sharename is spelt differently to that
on the CEEFAX pages it will not be found. Check the spelling on the
disc file by using the EDIT option.
It has been noticed, very occassionally (twice in about 8 months),
that a company name transferred from CEEFAX is spelt differently from
that stored on disc.
This is usually temporary but does mean that the share price in
question is not downloaded to disc.
This may be detected whilst plotting the data by the fact that the
scaling for the share is wrong ie. most of the data will probably be
compressed to the top of the graph.
If this happens, the easiest method of correction is to:-
1) exit the SHARE programs
2) enter TELETEXT
3) select BBC 1/page 130 and look for the share concerned
4) note down the price
5) exit TELETEXT
6) enter the SHARE software
7) insert the price manually using the EDIT option
8) use the SCALE option on exiting the EDIT option to
reset the scaling parameters.
B) SHARE PRICE INCORRECT
Sometimes, the price may be incorrect. This can be detected whilst
plotting by large jumps in the price.
If the share has gone ex-scrip, which means that it has been
de-valued by factors of 1/2, 1/3, 1/4, etc. it will be annotated thus
on the CEEFAX page and nothing should be done about it.
If the share has not gone ex-scrip and the price still looks wrong,
check the CHANGE which is given after the price. The correct price
can be calculated by ADDING this change to the previous days
'close-of-business' price. On the odd occasion that this happens
there is usually just one character wrong.
Once the correct price has been found, use the method previously
described to correct it on the disc file.
C) SHARE MISSING FROM CEEFAX BROADCAST
The list of shares broadcast by CEEFAX usually stays constant, but
there is no guarantee that the shares chosen will remain unchanged.
If a share is taken off the CEEFAX broadcast there is not a lot you
can do apart from entering the prices manually from another source,
ie. the financial press.
Alternatively, you could change the company name such that prices for
a different company will be downloaded. In this case the data
downloaded previous to the name change should be blanked using the
EDIT option, which is rather tedious.
APPENDIX IV
ALTERNATIVE SCREEN DUMP IN PLOT OPTION
If you wish to use a different screen dump to that offered, LOAD the
program "PLOT" and enter the relevant command in PROCedure (PROCdump)
in place of that already there.
N.B. Do not move this procedure in program PLOT since the last dozen
lines or so are deleted from memory during execution of the program
to save on space.
SAVE PLOT and repeat the process with the BASIC file OVERALL.
00000000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000010 20 20 20 20 20 20 20 20 20 20 20 53 48 41 52 45 | SHARE|
00000020 0d 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00000030 20 20 28 63 29 20 4a 2e 52 2e 4c 65 69 67 68 74 | (c) J.R.Leight|
00000040 6f 6e 20 41 75 67 20 31 39 38 37 0d 0d 53 48 41 |on Aug 1987..SHA|
00000050 52 45 53 20 69 73 20 61 20 73 75 69 74 65 20 6f |RES is a suite o|
00000060 66 20 70 72 6f 67 72 61 6d 73 20 77 68 69 63 68 |f programs which|
00000070 20 61 6c 6c 6f 77 73 20 75 70 20 74 6f 20 33 20 | allows up to 3 |
00000080 70 6f 72 74 66 6f 6c 69 6f 73 0d 63 6f 6e 74 61 |portfolios.conta|
00000090 69 6e 69 6e 67 20 75 70 20 74 6f 20 32 30 20 63 |ining up to 20 c|
000000a0 6f 6d 70 61 6e 69 65 73 20 65 61 63 68 20 61 6e |ompanies each an|
000000b0 64 20 31 20 49 6e 64 65 78 20 66 69 6c 65 2c 20 |d 1 Index file, |
000000c0 74 6f 20 62 65 20 75 70 64 61 74 65 64 0d 65 69 |to be updated.ei|
000000d0 74 68 65 72 20 6d 61 6e 75 61 6c 6c 79 20 6f 72 |ther manually or|
000000e0 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 66 | automatically f|
000000f0 72 6f 6d 20 27 6c 69 76 65 27 20 43 45 45 46 41 |rom 'live' CEEFA|
00000100 58 20 62 72 6f 61 64 63 61 73 74 73 2e 20 54 68 |X broadcasts. Th|
00000110 65 0d 64 61 74 61 20 69 6e 20 74 68 65 20 66 69 |e.data in the fi|
00000120 6c 65 73 20 6d 61 79 20 62 65 20 64 69 73 70 6c |les may be displ|
00000130 61 79 65 64 20 69 6e 20 74 68 65 20 66 6f 72 6d |ayed in the form|
00000140 20 6f 66 20 70 6c 6f 74 73 20 73 75 63 68 20 74 | of plots such t|
00000150 68 61 74 0d 74 72 65 6e 64 73 20 63 61 6e 20 62 |hat.trends can b|
00000160 65 20 73 65 65 6e 20 61 6e 64 20 70 65 72 68 61 |e seen and perha|
00000170 70 73 20 66 6f 72 65 63 61 73 74 2e 20 42 6f 6f |ps forecast. Boo|
00000180 6b 73 20 6f 6e 20 74 68 65 20 73 75 62 6a 65 63 |ks on the subjec|
00000190 74 2c 0d 27 63 68 61 72 74 69 73 6d 27 2c 20 63 |t,.'chartism', c|
000001a0 61 6e 20 62 65 20 66 6f 75 6e 64 20 69 6e 20 6c |an be found in l|
000001b0 69 62 72 61 72 69 65 73 20 61 6e 64 20 62 6f 6f |ibraries and boo|
000001c0 6b 73 68 6f 70 73 2e 0d 0d 49 74 20 6d 75 73 74 |kshops...It must|
000001d0 20 62 65 20 65 6d 70 68 61 73 69 73 65 64 20 74 | be emphasised t|
000001e0 68 61 74 20 74 68 65 20 61 75 74 68 6f 72 20 63 |hat the author c|
000001f0 61 6e 6e 6f 74 20 62 65 20 72 65 73 70 6f 6e 73 |annot be respons|
00000200 69 62 6c 65 20 66 6f 72 20 61 6e 79 0d 67 61 69 |ible for any.gai|
00000210 6e 20 6f 72 20 6c 6f 73 73 20 69 6e 63 75 72 72 |n or loss incurr|
00000220 65 64 20 66 72 6f 6d 20 74 68 65 20 75 73 65 20 |ed from the use |
00000230 6f 66 20 74 68 69 73 20 73 75 69 74 65 20 6f 66 |of this suite of|
00000240 20 70 72 6f 67 72 61 6d 73 21 0d 0d 20 20 20 20 | programs!.. |
00000250 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000260 20 20 20 2e 2e 2e 6f 6f 6f 4f 4f 4f 6f 6f 6f 2e | ...oooOOOooo.|
00000270 2e 2e 0d 0d 31 2e 20 20 44 4f 57 4e 4c 4f 41 44 |....1. DOWNLOAD|
00000280 49 4e 47 20 46 52 4f 4d 20 54 45 4c 45 53 4f 46 |ING FROM TELESOF|
00000290 54 57 41 52 45 0d 0d 44 6f 77 6e 6c 6f 61 64 20 |TWARE..Download |
000002a0 66 72 6f 6d 20 74 65 6c 65 73 6f 66 74 77 61 72 |from telesoftwar|
000002b0 65 2c 20 66 69 6c 65 73 20 4d 41 49 4e 2c 20 45 |e, files MAIN, E|
000002c0 4e 54 52 59 2c 20 41 4e 41 4c 59 53 45 2c 20 50 |NTRY, ANALYSE, P|
000002d0 4c 4f 54 2c 0d 4f 56 45 52 41 4c 4c 2c 20 41 55 |LOT,.OVERALL, AU|
000002e0 54 4f 2c 20 50 52 49 4e 54 31 36 2c 20 59 45 41 |TO, PRINT16, YEA|
000002f0 52 2c 20 31 39 38 37 30 2c 20 31 39 38 37 31 2c |R, 19870, 19871,|
00000300 20 31 39 38 37 32 2c 20 31 39 38 38 30 2c 20 31 | 19872, 19880, 1|
00000310 39 38 38 31 20 61 6e 64 0d 31 39 38 38 32 20 74 |9881 and.19882 t|
00000320 6f 20 61 20 62 6c 61 6e 6b 20 66 6f 72 6d 61 74 |o a blank format|
00000330 74 65 64 20 64 69 73 63 2e 20 41 20 64 65 73 63 |ted disc. A desc|
00000340 72 69 70 74 69 6f 6e 20 6f 66 20 74 68 65 20 64 |ription of the d|
00000350 61 74 61 20 66 69 6c 65 73 0d 31 39 38 37 30 2c |ata files.19870,|
00000360 20 31 39 38 37 31 20 65 74 63 2e 2c 20 6d 61 79 | 19871 etc., may|
00000370 20 62 65 20 66 6f 75 6e 64 20 69 6e 20 41 70 70 | be found in App|
00000380 65 6e 64 69 78 20 49 2e 0d 0d 31 2e 31 20 49 4e |endix I...1.1 IN|
00000390 49 54 49 41 4c 49 53 41 54 49 4f 4e 0d 0d 43 48 |ITIALISATION..CH|
000003a0 41 49 4e 20 4d 41 49 4e 20 62 79 20 74 79 70 69 |AIN MAIN by typi|
000003b0 6e 67 20 43 48 2e 22 4d 41 49 4e 22 20 61 6e 64 |ng CH."MAIN" and|
000003c0 2c 20 62 65 63 61 75 73 65 20 69 74 20 69 73 20 |, because it is |
000003d0 62 65 69 6e 67 20 72 75 6e 20 66 6f 72 20 74 68 |being run for th|
000003e0 65 0d 66 69 72 73 74 20 74 69 6d 65 2c 20 79 6f |e.first time, yo|
000003f0 75 20 77 69 6c 6c 20 62 65 20 61 73 6b 65 64 20 |u will be asked |
00000400 77 68 65 74 68 65 72 20 79 6f 75 20 77 6f 75 6c |whether you woul|
00000410 64 20 6c 69 6b 65 20 61 20 21 42 4f 4f 54 20 66 |d like a !BOOT f|
00000420 69 6c 65 0d 70 72 6f 64 75 63 65 64 2e 20 49 66 |ile.produced. If|
00000430 20 73 6f 2c 20 66 72 6f 6d 20 6e 6f 77 20 6f 6e | so, from now on|
00000440 2c 20 74 68 65 20 64 69 73 63 20 6d 61 79 20 62 |, the disc may b|
00000450 65 20 61 75 74 6f 2d 42 4f 4f 54 65 64 20 69 6e |e auto-BOOTed in|
00000460 20 74 68 65 0d 75 73 75 61 6c 20 77 61 79 20 62 | the.usual way b|
00000470 79 20 70 72 65 73 73 69 6e 67 20 73 68 69 66 74 |y pressing shift|
00000480 2d 42 52 45 41 4b 2e 0d 0d 49 74 20 69 73 20 72 |-BREAK...It is r|
00000490 65 63 6f 6d 6d 65 6e 64 65 64 20 74 68 61 74 20 |ecommended that |
000004a0 79 6f 75 20 6e 6f 77 20 6d 61 6b 65 20 61 20 62 |you now make a b|
000004b0 61 63 6b 2d 75 70 20 63 6f 70 79 20 6f 66 20 74 |ack-up copy of t|
000004c0 68 65 20 64 69 73 63 20 73 69 6e 63 65 0d 69 74 |he disc since.it|
000004d0 20 69 73 20 77 72 69 74 74 65 6e 20 74 6f 20 77 | is written to w|
000004e0 68 69 6c 73 74 20 75 70 64 61 74 69 6e 67 20 72 |hilst updating r|
000004f0 65 63 6f 72 64 73 2e 20 49 6e 20 66 61 63 74 2c |ecords. In fact,|
00000500 20 72 65 67 75 6c 61 72 20 62 61 63 6b 2d 75 70 | regular back-up|
00000510 73 0d 73 68 6f 75 6c 64 20 62 65 20 6d 61 64 65 |s.should be made|
00000520 2c 20 73 69 6e 63 65 2c 20 73 68 6f 75 6c 64 20 |, since, should |
00000530 61 20 64 69 73 63 20 62 65 63 6f 6d 65 20 63 6f |a disc become co|
00000540 72 72 75 70 74 65 64 20 6f 72 20 64 61 6d 61 67 |rrupted or damag|
00000550 65 64 2c 20 79 6f 75 0d 63 6f 75 6c 64 20 6c 6f |ed, you.could lo|
00000560 73 65 20 73 65 76 65 72 61 6c 20 79 65 61 72 73 |se several years|
00000570 20 77 6f 72 74 68 20 6f 66 20 64 61 74 61 2e 20 | worth of data. |
00000580 0d 0d 32 2e 20 20 43 4f 4e 54 52 4f 4c 53 20 41 |..2. CONTROLS A|
00000590 4e 44 20 55 53 45 20 4f 46 20 53 48 41 52 45 20 |ND USE OF SHARE |
000005a0 53 4f 46 54 57 41 52 45 0d 0d 54 68 65 72 65 20 |SOFTWARE..There |
000005b0 6e 6f 77 20 66 6f 6c 6c 6f 77 73 20 61 20 64 65 |now follows a de|
000005c0 73 63 72 69 70 74 69 6f 6e 20 6f 66 20 74 68 65 |scription of the|
000005d0 20 63 6f 6e 74 72 6f 6c 73 20 72 65 71 75 69 72 | controls requir|
000005e0 65 64 20 74 6f 20 73 61 76 65 20 61 6e 64 0d 61 |ed to save and.a|
000005f0 6e 61 6c 79 73 65 20 73 68 61 72 65 20 70 72 69 |nalyse share pri|
00000600 63 65 73 2e 20 49 74 20 69 73 20 61 73 73 75 6d |ces. It is assum|
00000610 65 64 20 74 68 61 74 20 74 68 65 20 62 72 6f 61 |ed that the broa|
00000620 64 63 61 73 74 20 73 6f 66 74 77 61 72 65 20 61 |dcast software a|
00000630 6e 64 0d 64 61 74 61 20 66 69 6c 65 73 20 61 72 |nd.data files ar|
00000640 65 20 6f 6e 20 74 68 65 20 73 61 6d 65 20 64 69 |e on the same di|
00000650 73 63 20 69 6e 20 44 52 49 56 45 20 30 2e 0d 0d |sc in DRIVE 0...|
00000660 4c 61 74 65 72 20 6f 6e 2c 20 79 6f 75 20 6d 61 |Later on, you ma|
00000670 79 20 77 69 73 68 20 74 6f 20 73 65 6c 65 63 74 |y wish to select|
00000680 20 79 6f 75 72 20 6f 77 6e 20 73 68 61 72 65 73 | your own shares|
00000690 20 66 72 6f 6d 20 74 68 6f 73 65 20 62 72 6f 61 | from those broa|
000006a0 64 63 61 73 74 0d 6f 6e 20 74 68 65 20 66 69 6e |dcast.on the fin|
000006b0 61 6e 63 69 61 6c 20 70 61 67 65 73 20 6f 66 20 |ancial pages of |
000006c0 43 45 45 46 41 58 2e 20 49 6e 20 74 68 69 73 20 |CEEFAX. In this |
000006d0 63 61 73 65 20 73 65 65 20 41 50 50 45 4e 44 49 |case see APPENDI|
000006e0 58 20 49 49 2e 0d 0d 54 68 65 20 64 69 73 63 20 |X II...The disc |
000006f0 68 6f 6c 64 69 6e 67 20 74 68 65 20 53 48 41 52 |holding the SHAR|
00000700 45 20 73 6f 66 74 77 61 72 65 20 73 68 6f 75 6c |E software shoul|
00000710 64 20 61 6c 77 61 79 73 20 62 65 20 70 6c 61 63 |d always be plac|
00000720 65 64 20 69 6e 20 44 52 49 56 45 0d 30 20 73 69 |ed in DRIVE.0 si|
00000730 6e 63 65 20 70 72 6f 67 72 61 6d 73 20 61 72 65 |nce programs are|
00000740 20 6c 6f 61 64 65 64 20 61 75 74 6f 6d 61 74 69 | loaded automati|
00000750 63 61 6c 6c 79 20 66 72 6f 6d 20 74 68 69 73 20 |cally from this |
00000760 44 52 49 56 45 2e 20 53 65 65 0d 41 50 50 45 4e |DRIVE. See.APPEN|
00000770 44 49 58 20 49 20 6f 6e 20 68 6f 77 20 74 6f 20 |DIX I on how to |
00000780 75 73 65 20 64 69 66 66 65 72 65 6e 74 20 44 52 |use different DR|
00000790 49 56 45 53 20 66 6f 72 20 74 68 65 20 64 61 74 |IVES for the dat|
000007a0 61 20 66 69 6c 65 73 2e 0d 0d 41 75 74 6f 2d 42 |a files...Auto-B|
000007b0 4f 4f 54 20 74 68 65 20 64 69 73 63 20 61 6e 64 |OOT the disc and|
000007c0 20 74 68 65 20 6d 61 69 6e 20 6d 65 6e 75 20 77 | the main menu w|
000007d0 69 6c 6c 20 62 65 20 70 72 65 73 65 6e 74 65 64 |ill be presented|
000007e0 2e 0d 0d 54 68 65 20 55 50 2f 44 4f 57 4e 20 63 |...The UP/DOWN c|
000007f0 75 72 73 6f 72 20 6b 65 79 73 20 73 68 6f 75 6c |ursor keys shoul|
00000800 64 20 62 65 20 75 73 65 64 20 69 6e 20 61 6e 79 |d be used in any|
00000810 20 6d 65 6e 75 2f 70 61 6e 65 6c 20 74 6f 20 73 | menu/panel to s|
00000820 65 6c 65 63 74 0d 61 6e 64 20 74 68 65 20 52 45 |elect.and the RE|
00000830 54 55 52 4e 20 6b 65 79 20 75 73 65 64 20 74 6f |TURN key used to|
00000840 20 6d 61 6b 65 20 74 68 65 20 73 65 6c 65 63 74 | make the select|
00000850 69 6f 6e 2e 20 57 72 61 70 20 61 72 6f 75 6e 64 |ion. Wrap around|
00000860 20 6f 66 20 74 68 65 0d 63 75 72 73 6f 72 20 69 | of the.cursor i|
00000870 73 20 75 74 69 6c 69 73 65 64 2e 0d 0d 33 2e 20 |s utilised...3. |
00000880 20 53 45 4c 45 43 54 20 50 4f 52 54 46 4f 4c 49 | SELECT PORTFOLI|
00000890 4f 0d 0d 54 68 65 20 66 69 72 73 74 20 6f 70 74 |O..The first opt|
000008a0 69 6f 6e 20 73 65 6c 65 63 74 73 20 61 20 70 6f |ion selects a po|
000008b0 72 74 66 6f 6c 69 6f 2e 20 54 68 69 73 20 69 73 |rtfolio. This is|
000008c0 20 6f 6e 6c 79 20 72 65 71 75 69 72 65 64 20 69 | only required i|
000008d0 66 20 79 6f 75 0d 77 69 73 68 20 74 6f 20 63 72 |f you.wish to cr|
000008e0 65 61 74 65 2f 65 6e 74 65 72 2f 61 6c 74 65 72 |eate/enter/alter|
000008f0 2f 62 72 6f 77 73 65 20 61 20 70 6f 72 74 66 6f |/browse a portfo|
00000900 6c 69 6f 20 6d 61 6e 75 61 6c 6c 79 2e 20 53 65 |lio manually. Se|
00000910 6c 65 63 74 69 6e 67 0d 74 68 69 73 20 77 69 6c |lecting.this wil|
00000920 6c 20 70 72 65 73 65 6e 74 20 61 6e 6f 74 68 65 |l present anothe|
00000930 72 20 70 61 6e 65 6c 20 77 68 69 63 68 20 6c 69 |r panel which li|
00000940 73 74 73 20 61 6c 6c 20 74 68 65 20 61 76 61 69 |sts all the avai|
00000950 6c 61 62 6c 65 0d 70 6f 72 74 66 6f 6c 69 6f 73 |lable.portfolios|
00000960 20 28 33 29 20 61 6e 64 20 61 6e 20 69 6e 64 65 | (3) and an inde|
00000970 78 20 66 69 6c 65 2e 0d 0d 49 66 20 61 6e 79 20 |x file...If any |
00000980 70 61 72 74 69 63 75 6c 61 72 20 70 6f 72 74 66 |particular portf|
00000990 6f 6c 69 6f 20 68 61 73 20 6e 6f 74 20 79 65 74 |olio has not yet|
000009a0 20 62 65 65 6e 20 63 72 65 61 74 65 64 20 79 6f | been created yo|
000009b0 75 20 77 69 6c 6c 20 62 65 0d 61 73 6b 65 64 20 |u will be.asked |
000009c0 77 68 65 74 68 65 72 20 79 6f 75 20 77 6f 75 6c |whether you woul|
000009d0 64 20 6c 69 6b 65 20 6f 6e 65 20 63 72 65 61 74 |d like one creat|
000009e0 65 64 2e 20 54 68 69 73 20 65 6e 74 61 69 6c 73 |ed. This entails|
000009f0 20 65 6e 74 65 72 69 6e 67 20 74 68 65 0d 64 61 | entering the.da|
00000a00 74 65 20 61 6e 64 20 74 68 65 20 64 61 79 20 6f |te and the day o|
00000a10 66 20 74 68 65 20 77 65 65 6b 20 66 72 6f 6d 20 |f the week from |
00000a20 77 68 69 63 68 20 69 74 20 77 69 6c 6c 20 72 75 |which it will ru|
00000a30 6e 2e 20 45 6e 6f 75 67 68 20 73 70 61 63 65 20 |n. Enough space |
00000a40 66 6f 72 0d 74 68 65 20 63 75 72 72 65 6e 74 20 |for.the current |
00000a50 79 65 61 72 20 69 73 20 74 68 65 6e 20 61 6c 6c |year is then all|
00000a60 6f 63 61 74 65 64 20 74 6f 20 74 68 65 20 66 69 |ocated to the fi|
00000a70 6c 65 20 73 65 6c 65 63 74 65 64 2c 20 70 72 6f |le selected, pro|
00000a80 76 69 64 65 64 0d 74 68 65 72 65 20 69 73 20 65 |vided.there is e|
00000a90 6e 6f 75 67 68 20 72 6f 6f 6d 20 6f 6e 20 74 68 |nough room on th|
00000aa0 65 20 64 69 73 63 2e 0d 0d 34 2e 20 20 44 41 54 |e disc...4. DAT|
00000ab0 41 20 45 4e 54 52 59 0d 0d 54 68 65 20 6e 65 78 |A ENTRY..The nex|
00000ac0 74 20 6f 70 74 69 6f 6e 20 6f 6e 20 74 68 65 20 |t option on the |
00000ad0 6d 61 69 6e 20 6d 65 6e 75 20 61 6c 6c 6f 77 73 |main menu allows|
00000ae0 20 74 68 65 20 63 75 72 72 65 6e 74 6c 79 20 73 | the currently s|
00000af0 65 6c 65 63 74 65 64 0d 70 6f 72 74 66 6f 6c 69 |elected.portfoli|
00000b00 6f 20 28 64 69 73 70 6c 61 79 65 64 20 61 74 20 |o (displayed at |
00000b10 74 68 65 20 68 65 61 64 20 6f 66 20 74 68 65 20 |the head of the |
00000b20 6d 65 6e 75 29 20 74 6f 20 62 65 0d 75 70 64 61 |menu) to be.upda|
00000b30 74 65 64 2f 61 6c 74 65 72 65 64 2f 62 72 6f 77 |ted/altered/brow|
00000b40 73 65 64 2e 20 45 69 74 68 65 72 20 74 68 65 20 |sed. Either the |
00000b50 6e 61 6d 65 20 6f 66 20 74 68 65 20 63 6f 6d 70 |name of the comp|
00000b60 61 6e 69 65 73 20 6d 61 79 20 62 65 0d 69 6e 73 |anies may be.ins|
00000b70 65 72 74 65 64 2f 61 6c 74 65 72 65 64 20 28 75 |erted/altered (u|
00000b80 73 75 61 6c 6c 79 20 6f 6e 20 63 72 65 61 74 69 |sually on creati|
00000b90 6f 6e 20 6f 66 20 74 68 65 20 50 6f 72 74 66 6f |on of the Portfo|
00000ba0 6c 69 6f 29 20 6f 72 20 74 68 65 20 73 68 61 72 |lio) or the shar|
00000bb0 65 0d 70 72 69 63 65 20 66 6f 72 20 61 6e 79 20 |e.price for any |
00000bc0 63 6f 6d 70 61 6e 79 20 6f 6e 20 61 6e 79 20 64 |company on any d|
00000bd0 61 79 20 6d 61 79 20 62 65 20 65 6e 74 65 72 65 |ay may be entere|
00000be0 64 2f 61 6c 74 65 72 65 64 2e 20 57 68 65 6e 0d |d/altered. When.|
00000bf0 69 6e 73 65 72 74 69 6e 67 20 74 68 65 20 63 6f |inserting the co|
00000c00 6d 70 61 6e 79 20 6e 61 6d 65 73 2c 20 63 61 72 |mpany names, car|
00000c10 65 20 73 68 6f 75 6c 64 20 62 65 20 74 61 6b 65 |e should be take|
00000c20 6e 20 74 6f 20 65 6e 73 75 72 65 20 74 68 61 74 |n to ensure that|
00000c30 20 74 68 65 0d 65 6e 74 65 72 65 64 20 63 68 61 | the.entered cha|
00000c40 72 61 63 74 65 72 73 20 61 72 65 20 65 78 61 63 |racters are exac|
00000c50 74 6c 79 20 61 73 20 74 72 61 6e 73 6d 69 74 74 |tly as transmitt|
00000c60 65 64 20 6f 6e 20 43 45 45 46 41 58 20 70 61 67 |ed on CEEFAX pag|
00000c70 65 20 31 33 30 2e 20 49 66 0d 74 68 65 72 65 20 |e 130. If.there |
00000c80 69 73 20 41 4e 59 20 64 69 66 66 65 72 65 6e 63 |is ANY differenc|
00000c90 65 2c 20 69 74 20 77 69 6c 6c 20 6e 6f 74 20 62 |e, it will not b|
00000ca0 65 20 75 70 64 61 74 65 64 2e 20 49 74 20 69 73 |e updated. It is|
00000cb0 20 6e 6f 74 20 6e 65 63 65 73 73 61 72 79 0d 74 | not necessary.t|
00000cc0 6f 20 69 6e 73 65 72 74 20 74 68 65 20 46 54 2d |o insert the FT-|
00000cd0 31 30 30 20 6e 61 6d 65 20 74 6f 20 74 68 65 20 |100 name to the |
00000ce0 69 6e 64 65 78 20 66 69 6c 65 20 73 69 6e 63 65 |index file since|
00000cf0 20 74 68 69 73 20 69 73 20 64 6f 6e 65 0d 61 75 | this is done.au|
00000d00 74 6f 6d 61 74 69 63 61 6c 6c 79 20 6f 6e 20 66 |tomatically on f|
00000d10 69 6c 65 20 63 72 65 61 74 69 6f 6e 20 61 6e 64 |ile creation and|
00000d20 20 69 74 20 69 73 20 6e 6f 74 20 73 65 61 72 63 | it is not searc|
00000d30 68 65 64 20 66 6f 72 20 64 75 72 69 6e 67 20 64 |hed for during d|
00000d40 61 74 61 0d 64 6f 77 6e 6c 6f 61 64 69 6e 67 2e |ata.downloading.|
00000d50 0d 0d 34 2e 31 20 57 68 69 6c 73 74 20 69 6e 20 |..4.1 Whilst in |
00000d60 74 68 65 20 65 64 69 74 20 70 72 69 63 65 73 20 |the edit prices |
00000d70 70 61 6e 65 6c 2c 20 75 73 65 20 74 68 65 20 4c |panel, use the L|
00000d80 45 46 54 2f 52 49 47 48 54 20 63 75 72 73 6f 72 |EFT/RIGHT cursor|
00000d90 20 6b 65 79 73 0d 74 6f 20 64 65 63 72 65 6d 65 | keys.to decreme|
00000da0 6e 74 2f 69 6e 63 72 65 6d 65 6e 74 20 74 68 65 |nt/increment the|
00000db0 20 64 61 74 65 20 61 6e 64 20 74 68 65 20 55 50 | date and the UP|
00000dc0 2f 44 4f 57 4e 20 63 75 72 73 6f 72 20 6b 65 79 |/DOWN cursor key|
00000dd0 73 20 74 6f 20 73 65 6c 65 63 74 0d 61 20 70 61 |s to select.a pa|
00000de0 72 74 69 63 75 6c 61 72 20 63 6f 6d 70 61 6e 79 |rticular company|
00000df0 2e 0d 0d 4e 6f 74 65 20 74 68 61 74 20 69 66 20 |...Note that if |
00000e00 79 6f 75 20 44 45 43 52 45 4d 45 4e 54 20 74 68 |you DECREMENT th|
00000e10 65 20 64 61 74 65 2c 20 75 73 69 6e 67 20 74 68 |e date, using th|
00000e20 65 20 4c 45 46 54 20 63 75 72 73 6f 72 20 6b 65 |e LEFT cursor ke|
00000e30 79 2c 0d 62 65 79 6f 6e 64 20 74 68 65 20 62 65 |y,.beyond the be|
00000e40 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 20 66 |ginning of the f|
00000e50 69 6c 65 20 74 68 65 6e 20 74 68 65 20 63 75 72 |ile then the cur|
00000e60 72 65 6e 74 20 66 69 6c 65 20 77 69 6c 6c 20 62 |rent file will b|
00000e70 65 20 43 4c 4f 53 45 64 0d 61 6e 64 20 61 20 66 |e CLOSEd.and a f|
00000e80 69 6c 65 20 66 6f 72 20 74 68 65 20 70 72 65 76 |ile for the prev|
00000e90 69 6f 75 73 20 79 65 61 72 20 77 69 6c 6c 20 62 |ious year will b|
00000ea0 65 20 73 65 61 72 63 68 65 64 20 66 6f 72 2e 20 |e searched for. |
00000eb0 49 66 20 69 74 20 64 6f 65 73 20 6e 6f 74 0d 65 |If it does not.e|
00000ec0 78 69 73 74 20 79 6f 75 20 77 69 6c 6c 20 62 65 |xist you will be|
00000ed0 20 61 73 6b 65 64 20 77 68 65 74 68 65 72 20 79 | asked whether y|
00000ee0 6f 75 20 77 6f 75 6c 64 20 6c 69 6b 65 20 74 6f |ou would like to|
00000ef0 20 63 72 65 61 74 65 20 6f 6e 65 2e 0d 0d 53 69 | create one...Si|
00000f00 6d 69 6c 61 72 6c 79 2c 20 69 66 20 79 6f 75 20 |milarly, if you |
00000f10 41 44 56 41 4e 43 45 20 74 68 65 20 64 61 74 65 |ADVANCE the date|
00000f20 2c 20 75 73 69 6e 67 20 74 68 65 20 52 49 47 48 |, using the RIGH|
00000f30 54 20 63 75 72 73 6f 72 20 6b 65 79 2c 0d 62 65 |T cursor key,.be|
00000f40 79 6f 6e 64 20 74 68 65 20 6c 61 73 74 20 64 61 |yond the last da|
00000f50 79 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 |y of the current|
00000f60 20 66 69 6c 65 2c 20 74 68 65 6e 20 74 68 69 73 | file, then this|
00000f70 20 66 69 6c 65 20 77 69 6c 6c 20 62 65 0d 43 4c | file will be.CL|
00000f80 4f 53 45 64 20 61 6e 64 20 61 20 66 69 6c 65 20 |OSEd and a file |
00000f90 66 6f 72 20 74 68 65 20 6e 65 78 74 20 79 65 61 |for the next yea|
00000fa0 72 20 77 69 6c 6c 20 62 65 20 73 65 61 72 63 68 |r will be search|
00000fb0 65 64 20 66 6f 72 2e 20 41 67 61 69 6e 2c 20 69 |ed for. Again, i|
00000fc0 66 0d 69 74 20 64 6f 65 73 20 6e 6f 74 20 65 78 |f.it does not ex|
00000fd0 69 73 74 20 79 6f 75 20 77 69 6c 6c 20 62 65 20 |ist you will be |
00000fe0 61 73 6b 65 64 20 77 68 65 74 68 65 72 20 79 6f |asked whether yo|
00000ff0 75 20 77 69 73 68 20 74 6f 20 63 72 65 61 74 65 |u wish to create|
00001000 20 6f 6e 65 2e 0d 0d 4f 6e 20 61 6e 73 77 65 72 | one...On answer|
00001010 69 6e 67 20 61 20 66 65 77 20 71 75 65 73 74 69 |ing a few questi|
00001020 6f 6e 73 20 74 68 65 20 6e 65 77 20 66 69 6c 65 |ons the new file|
00001030 20 77 69 6c 6c 20 62 65 20 63 72 65 61 74 65 64 | will be created|
00001040 20 69 66 20 74 68 65 72 65 20 69 73 0d 65 6e 6f | if there is.eno|
00001050 75 67 68 20 72 6f 6f 6d 20 6f 6e 20 74 68 65 20 |ugh room on the |
00001060 63 75 72 72 65 6e 74 20 64 69 73 63 20 73 75 72 |current disc sur|
00001070 66 61 63 65 2e 0d 0d 4e 2e 42 2e 20 57 48 45 4e |face...N.B. WHEN|
00001080 20 4c 45 41 56 49 4e 47 20 54 48 45 20 45 44 49 | LEAVING THE EDI|
00001090 54 20 50 52 49 43 45 53 20 50 41 4e 45 4c 2c 20 |T PRICES PANEL, |
000010a0 49 54 20 53 48 4f 55 4c 44 20 42 45 20 53 45 54 |IT SHOULD BE SET|
000010b0 20 4f 4e 20 54 48 45 0d 43 55 52 52 45 4e 54 20 | ON THE.CURRENT |
000010c0 44 41 59 20 53 49 4e 43 45 20 54 48 45 20 50 4c |DAY SINCE THE PL|
000010d0 4f 54 54 49 4e 47 20 50 52 4f 47 52 41 4d 4d 45 |OTTING PROGRAMME|
000010e0 53 20 50 4c 4f 54 20 55 50 20 54 4f 20 54 48 49 |S PLOT UP TO THI|
000010f0 53 20 44 41 59 2e 0d 0d 34 2e 32 20 48 61 76 69 |S DAY...4.2 Havi|
00001100 6e 67 20 6c 65 66 74 20 74 68 65 20 65 64 69 74 |ng left the edit|
00001110 69 6e 67 20 66 61 63 69 6c 69 74 79 20 61 6e 64 |ing facility and|
00001120 20 72 65 63 6f 72 64 73 20 68 61 76 65 20 62 65 | records have be|
00001130 65 6e 20 63 68 61 6e 67 65 64 20 69 74 0d 69 73 |en changed it.is|
00001140 20 61 64 76 69 73 61 62 6c 65 20 74 6f 20 75 73 | advisable to us|
00001150 65 20 74 68 65 20 53 43 41 4c 45 20 6f 70 74 69 |e the SCALE opti|
00001160 6f 6e 2e 20 54 68 65 20 64 61 74 61 20 69 6e 20 |on. The data in |
00001170 74 68 65 20 63 75 72 72 65 6e 74 20 66 69 6c 65 |the current file|
00001180 20 69 73 0d 73 63 61 6e 6e 65 64 20 73 75 63 68 | is.scanned such|
00001190 20 74 68 61 74 20 73 63 61 6c 69 6e 67 20 70 61 | that scaling pa|
000011a0 72 61 6d 65 74 65 72 73 20 63 61 6e 20 62 65 20 |rameters can be |
000011b0 63 61 6c 63 75 6c 61 74 65 64 20 61 6e 64 20 70 |calculated and p|
000011c0 6c 61 63 65 64 20 6f 6e 0d 74 68 65 20 64 69 73 |laced on.the dis|
000011d0 63 20 77 68 69 63 68 20 69 6e 63 72 65 61 73 65 |c which increase|
000011e0 73 20 74 68 65 20 70 6c 6f 74 74 69 6e 67 20 73 |s the plotting s|
000011f0 70 65 65 64 20 69 6e 20 74 68 65 20 70 6c 6f 74 |peed in the plot|
00001200 20 6f 70 74 69 6f 6e 2e 20 49 66 20 61 0d 6c 61 | option. If a.la|
00001210 72 67 65 20 61 6d 6f 75 6e 74 20 6f 66 20 64 61 |rge amount of da|
00001220 74 61 20 68 61 73 20 62 65 65 6e 20 63 6f 6c 6c |ta has been coll|
00001230 65 63 74 65 64 20 74 68 69 73 20 77 69 6c 6c 20 |ected this will |
00001240 74 61 6b 65 20 61 20 6c 69 74 74 6c 65 0d 77 68 |take a little.wh|
00001250 69 6c 65 2e 20 53 69 6e 63 65 20 74 68 65 20 75 |ile. Since the u|
00001260 70 64 61 74 69 6e 67 20 69 73 20 64 65 73 69 67 |pdating is desig|
00001270 6e 65 64 20 74 6f 20 62 65 20 64 6f 6e 65 20 61 |ned to be done a|
00001280 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 66 72 6f |utomatically fro|
00001290 6d 0d 43 45 45 46 41 58 20 74 68 69 73 20 73 68 |m.CEEFAX this sh|
000012a0 6f 75 6c 64 20 6e 6f 74 20 62 65 20 61 20 70 72 |ould not be a pr|
000012b0 6f 62 6c 65 6d 20 61 73 20 74 68 65 20 73 63 61 |oblem as the sca|
000012c0 6c 69 6e 67 20 69 73 20 61 6c 73 6f 20 64 6f 6e |ling is also don|
000012d0 65 0d 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 |e.automatically |
000012e0 61 6e 64 20 61 6c 6c 20 74 68 65 20 64 61 74 61 |and all the data|
000012f0 20 64 6f 65 73 20 6e 6f 74 20 6e 6f 72 6d 61 6c | does not normal|
00001300 6c 79 20 6e 65 65 64 20 74 6f 20 62 65 20 73 63 |ly need to be sc|
00001310 61 6e 6e 65 64 2e 0d 54 68 69 73 20 66 61 63 69 |anned..This faci|
00001320 6c 69 74 79 20 63 61 6e 20 61 6c 73 6f 20 62 65 |lity can also be|
00001330 20 75 74 69 6c 69 73 65 64 20 69 66 20 74 68 65 | utilised if the|
00001340 20 73 63 61 6c 69 6e 67 20 70 61 72 61 6d 65 74 | scaling paramet|
00001350 65 72 73 20 61 72 65 0d 66 6f 75 6e 64 20 6e 6f |ers are.found no|
00001360 74 20 74 6f 20 62 65 20 63 6f 72 72 65 63 74 20 |t to be correct |
00001370 77 68 69 6c 65 20 70 6c 6f 74 74 69 6e 67 2e 0d |while plotting..|
00001380 0d 35 2e 20 20 41 55 54 4f 20 45 4e 54 52 59 0d |.5. AUTO ENTRY.|
00001390 0d 54 68 65 20 74 68 69 72 64 20 6f 70 74 69 6f |.The third optio|
000013a0 6e 20 77 69 6c 6c 20 61 75 74 6f 6d 61 74 69 63 |n will automatic|
000013b0 61 6c 6c 79 20 75 70 64 61 74 65 20 66 72 6f 6d |ally update from|
000013c0 20 43 45 45 46 41 58 2c 20 61 6e 79 20 50 6f 72 | CEEFAX, any Por|
000013d0 74 66 6f 6c 69 6f 0d 66 69 6c 65 73 20 66 6f 75 |tfolio.files fou|
000013e0 6e 64 20 6f 6e 20 74 68 65 20 64 69 73 63 2e 20 |nd on the disc. |
000013f0 50 72 65 73 65 6e 74 6c 79 2c 20 74 68 65 72 65 |Presently, there|
00001400 20 61 72 65 20 74 77 6f 20 66 69 6c 65 73 20 6f | are two files o|
00001410 66 20 73 68 61 72 65 0d 70 72 69 63 65 73 20 61 |f share.prices a|
00001420 6e 64 20 61 20 66 69 6c 65 20 68 6f 6c 64 69 6e |nd a file holdin|
00001430 67 20 74 68 65 20 46 54 31 30 30 20 69 6e 64 65 |g the FT100 inde|
00001440 78 2e 0d 0d 54 68 65 20 64 61 74 61 20 69 73 20 |x...The data is |
00001450 6f 6e 6c 79 20 64 6f 77 6e 6c 6f 61 64 65 64 20 |only downloaded |
00001460 61 74 20 74 68 65 20 27 63 6c 6f 73 65 20 6f 66 |at the 'close of|
00001470 20 62 75 73 69 6e 65 73 73 27 20 66 6f 72 20 74 | business' for t|
00001480 68 65 0d 63 75 72 72 65 6e 74 20 64 61 79 2e 20 |he.current day. |
00001490 49 74 20 64 6f 65 73 20 6e 6f 74 20 6d 61 74 74 |It does not matt|
000014a0 65 72 20 77 68 61 74 20 64 61 79 20 74 68 65 20 |er what day the |
000014b0 66 69 6c 65 20 77 61 73 20 6c 65 66 74 20 61 74 |file was left at|
000014c0 20 6f 6e 20 69 74 73 0d 6c 61 73 74 20 75 73 65 | on its.last use|
000014d0 20 73 69 6e 63 65 20 74 68 65 20 70 72 6f 67 72 | since the progr|
000014e0 61 6d 20 73 65 61 72 63 68 65 73 20 66 6f 72 20 |am searches for |
000014f0 74 68 65 20 63 6f 72 72 65 63 74 20 64 61 79 2e |the correct day.|
00001500 20 0d 0d 41 6e 79 20 64 61 79 73 20 66 6f 72 20 | ..Any days for |
00001510 77 68 69 63 68 20 64 61 74 61 20 69 73 20 6e 6f |which data is no|
00001520 74 20 65 6e 74 65 72 65 64 20 77 69 6c 6c 20 72 |t entered will r|
00001530 65 73 75 6c 74 20 69 6e 20 67 61 70 73 20 6f 6e |esult in gaps on|
00001540 20 74 68 65 0d 64 69 73 63 2e 20 54 68 65 73 65 | the.disc. These|
00001550 20 67 61 70 73 20 61 72 65 20 63 61 74 65 72 65 | gaps are catere|
00001560 64 20 66 6f 72 20 69 6e 20 74 68 65 20 61 6e 61 |d for in the ana|
00001570 6c 79 73 69 73 20 70 72 6f 67 72 61 6d 6d 65 73 |lysis programmes|
00001580 2e 20 57 65 65 6b 65 6e 64 73 0d 61 72 65 20 6e |. Weekends.are n|
00001590 6f 74 20 61 6c 6c 6f 63 61 74 65 64 20 73 70 61 |ot allocated spa|
000015a0 63 65 20 6f 6e 20 74 68 65 20 64 69 73 63 20 73 |ce on the disc s|
000015b0 69 6e 63 65 20 74 68 65 20 43 69 74 79 20 69 73 |ince the City is|
000015c0 20 63 6c 6f 73 65 64 20 61 74 20 74 68 65 73 65 | closed at these|
000015d0 0d 74 69 6d 65 73 2c 20 74 68 75 73 20 72 65 64 |.times, thus red|
000015e0 75 63 69 6e 67 20 77 61 73 74 65 64 20 73 70 61 |ucing wasted spa|
000015f0 63 65 2e 0d 0d 49 66 20 61 6e 20 61 74 74 65 6d |ce...If an attem|
00001600 70 74 20 69 73 20 6d 61 64 65 20 74 6f 20 64 6f |pt is made to do|
00001610 77 6e 6c 6f 61 64 20 64 61 74 61 20 64 75 72 69 |wnload data duri|
00001620 6e 67 20 74 68 65 20 77 65 65 6b 65 6e 64 2c 20 |ng the weekend, |
00001630 69 74 20 77 69 6c 6c 20 62 65 0d 73 61 76 65 64 |it will be.saved|
00001640 20 69 6e 20 74 68 65 20 73 70 61 63 65 20 61 6c | in the space al|
00001650 6c 6f 63 61 74 65 64 20 74 6f 20 74 68 65 20 70 |located to the p|
00001660 72 65 76 69 6f 75 73 20 46 72 69 64 61 79 2e 20 |revious Friday. |
00001670 53 69 6d 69 6c 61 72 6c 79 2c 20 69 66 20 61 6e |Similarly, if an|
00001680 0d 61 74 74 65 6d 70 74 20 69 73 20 6d 61 64 65 |.attempt is made|
00001690 20 74 6f 20 64 6f 77 6e 6c 6f 61 64 20 64 61 74 | to download dat|
000016a0 61 20 61 66 74 65 72 20 6d 69 64 6e 69 67 68 74 |a after midnight|
000016b0 20 61 6e 64 20 62 65 66 6f 72 65 20 39 20 61 6d | and before 9 am|
000016c0 20 61 6e 64 0d 74 68 65 20 43 45 45 46 41 58 20 | and.the CEEFAX |
000016d0 70 61 67 65 73 20 73 74 69 6c 6c 20 68 6f 6c 64 |pages still hold|
000016e0 20 64 61 74 61 20 66 6f 72 20 74 68 65 20 70 72 | data for the pr|
000016f0 65 76 69 6f 75 73 20 64 61 79 2c 20 69 74 20 77 |evious day, it w|
00001700 69 6c 6c 20 62 65 0d 73 61 76 65 64 20 69 6e 20 |ill be.saved in |
00001710 74 68 65 20 73 70 61 63 65 20 61 6c 6c 6f 63 61 |the space alloca|
00001720 74 65 64 20 74 6f 20 74 68 65 20 70 72 65 76 69 |ted to the previ|
00001730 6f 75 73 20 64 61 79 2e 0d 0d 42 61 6e 6b 20 68 |ous day...Bank h|
00001740 6f 6c 69 64 61 79 73 20 61 72 65 20 61 6c 6c 6f |olidays are allo|
00001750 63 61 74 65 64 20 73 70 61 63 65 20 73 69 6e 63 |cated space sinc|
00001760 65 20 69 74 20 77 6f 75 6c 64 20 62 65 20 64 69 |e it would be di|
00001770 66 66 69 63 75 6c 74 20 74 6f 0d 63 61 6c 63 75 |fficult to.calcu|
00001780 6c 61 74 65 20 74 68 65 73 65 20 64 61 79 73 20 |late these days |
00001790 61 6e 64 20 74 68 65 20 61 6d 6f 75 6e 74 20 6f |and the amount o|
000017a0 66 20 77 6f 72 6b 20 69 6e 76 6f 6c 76 65 64 20 |f work involved |
000017b0 77 6f 75 6c 64 20 6e 6f 74 0d 77 61 72 72 61 6e |would not.warran|
000017c0 74 20 74 68 65 20 73 6d 61 6c 6c 20 61 6d 6f 75 |t the small amou|
000017d0 6e 74 20 6f 66 20 73 70 61 63 65 20 73 61 76 65 |nt of space save|
000017e0 64 2e 0d 0d 49 74 20 69 73 20 61 64 76 69 73 61 |d...It is advisa|
000017f0 62 6c 65 20 74 6f 20 70 6c 6f 74 20 61 6c 6c 20 |ble to plot all |
00001800 74 68 65 20 64 61 74 61 20 61 66 74 65 72 20 64 |the data after d|
00001810 6f 77 6e 6c 6f 61 64 69 6e 67 20 74 68 65 6d 2c |ownloading them,|
00001820 20 73 69 6e 63 65 0d 61 6e 79 20 65 72 72 6f 72 | since.any error|
00001830 73 20 69 6e 20 63 61 70 74 75 72 69 6e 67 20 74 |s in capturing t|
00001840 68 65 20 64 61 74 61 20 63 61 6e 20 75 73 75 61 |he data can usua|
00001850 6c 6c 79 20 62 65 20 69 64 65 6e 74 69 66 69 65 |lly be identifie|
00001860 64 20 61 6e 64 0d 63 6f 72 72 65 63 74 65 64 2e |d and.corrected.|
00001870 20 53 65 65 20 41 50 50 45 4e 44 49 58 20 49 49 | See APPENDIX II|
00001880 49 20 66 6f 72 20 65 72 72 6f 72 73 20 69 6e 20 |I for errors in |
00001890 61 75 74 6f 2d 64 6f 77 6e 6c 6f 61 64 69 6e 67 |auto-downloading|
000018a0 20 64 61 74 61 2e 0d 0d 36 2e 20 20 41 4e 41 4c | data...6. ANAL|
000018b0 59 53 45 0d 0d 54 68 65 20 66 6f 75 72 74 68 20 |YSE..The fourth |
000018c0 6f 70 74 69 6f 6e 20 6f 6e 20 74 68 65 20 6d 61 |option on the ma|
000018d0 69 6e 20 6d 65 6e 75 20 69 73 20 74 6f 20 61 6e |in menu is to an|
000018e0 61 6c 79 73 65 20 74 68 65 20 64 61 74 61 2e 20 |alyse the data. |
000018f0 4f 6e 0d 73 65 6c 65 63 74 69 6f 6e 2c 20 61 6e |On.selection, an|
00001900 6f 74 68 65 72 20 70 61 6e 65 6c 20 77 69 6c 6c |other panel will|
00001910 20 62 65 20 64 69 73 70 6c 61 79 65 64 20 77 68 | be displayed wh|
00001920 69 63 68 20 61 6c 6c 6f 77 73 20 74 68 65 20 64 |ich allows the d|
00001930 61 74 61 20 74 6f 0d 62 65 20 70 6c 6f 74 74 65 |ata to.be plotte|
00001940 64 2e 0d 0d 36 2e 31 20 54 68 65 20 66 69 72 73 |d...6.1 The firs|
00001950 74 20 74 77 6f 20 6f 70 74 69 6f 6e 73 20 61 6c |t two options al|
00001960 6c 6f 77 20 61 20 70 61 72 74 69 63 75 6c 61 72 |low a particular|
00001970 20 63 6f 6d 70 61 6e 79 2f 69 6e 64 65 78 20 74 | company/index t|
00001980 6f 20 62 65 0d 70 6c 6f 74 74 65 64 20 77 69 74 |o be.plotted wit|
00001990 68 20 74 68 61 74 20 6f 66 20 61 6e 6f 74 68 65 |h that of anothe|
000019a0 72 20 63 6f 6d 70 61 6e 79 2f 69 6e 64 65 78 2e |r company/index.|
000019b0 20 49 66 20 6f 6e 6c 79 20 6f 6e 65 20 69 73 20 | If only one is |
000019c0 73 65 6c 65 63 74 65 64 0d 74 68 65 6e 20 61 20 |selected.then a |
000019d0 67 72 61 70 68 20 63 6f 76 65 72 69 6e 67 20 74 |graph covering t|
000019e0 68 65 20 77 68 6f 6c 65 20 73 63 72 65 65 6e 20 |he whole screen |
000019f0 77 69 6c 6c 20 62 65 20 70 6c 6f 74 74 65 64 20 |will be plotted |
00001a00 66 6f 72 20 74 68 65 0d 73 65 6c 65 63 74 65 64 |for the.selected|
00001a10 20 63 6f 6d 70 61 6e 79 2f 69 6e 64 65 78 2e 0d | company/index..|
00001a20 0d 36 2e 32 20 54 68 65 20 74 68 69 72 64 20 6f |.6.2 The third o|
00001a30 70 74 69 6f 6e 20 70 6c 6f 74 73 20 74 68 65 20 |ption plots the |
00001a40 6f 6e 65 20 6f 72 20 74 77 6f 20 73 65 6c 65 63 |one or two selec|
00001a50 74 65 64 20 63 6f 6d 70 61 6e 69 65 73 2f 69 6e |ted companies/in|
00001a60 64 65 78 0d 70 72 65 76 69 6f 75 73 6c 79 20 73 |dex.previously s|
00001a70 65 6c 65 63 74 65 64 2e 20 54 68 65 20 70 72 69 |elected. The pri|
00001a80 63 65 2f 69 6e 64 69 63 61 74 6f 72 20 61 78 69 |ce/indicator axi|
00001a90 73 20 28 76 65 72 74 69 63 61 6c 29 20 69 73 0d |s (vertical) is.|
00001aa0 6c 6f 67 61 72 69 74 68 6d 69 63 20 73 69 6e 63 |logarithmic sinc|
00001ab0 65 20 73 68 61 72 65 20 70 72 69 63 65 73 20 6d |e share prices m|
00001ac0 6f 76 65 20 69 6e 20 74 68 69 73 20 6d 61 6e 6e |ove in this mann|
00001ad0 65 72 2e 0d 0d 36 2e 33 20 54 68 65 20 66 6f 75 |er...6.3 The fou|
00001ae0 72 74 68 20 6f 70 74 69 6f 6e 20 61 6c 6c 6f 77 |rth option allow|
00001af0 73 20 74 68 65 20 69 6e 64 65 78 20 61 6e 64 20 |s the index and |
00001b00 73 68 61 72 65 20 70 72 69 63 65 73 20 74 6f 20 |share prices to |
00001b10 62 65 20 70 6c 6f 74 74 65 64 0d 74 77 6f 2d 61 |be plotted.two-a|
00001b20 74 2d 61 2d 74 69 6d 65 20 77 69 74 68 20 61 20 |t-a-time with a |
00001b30 6b 65 79 20 70 72 65 73 73 20 72 65 71 75 69 72 |key press requir|
00001b40 65 64 20 62 65 74 77 65 65 6e 20 65 61 63 68 20 |ed between each |
00001b50 70 6c 6f 74 2e 20 54 68 65 20 45 53 43 41 50 45 |plot. The ESCAPE|
00001b60 0d 6b 65 79 20 6d 61 79 20 62 65 20 75 73 65 64 |.key may be used|
00001b70 20 74 6f 20 65 78 69 74 20 74 68 69 73 20 73 65 | to exit this se|
00001b80 71 75 65 6e 63 65 2e 20 50 72 65 73 73 69 6e 67 |quence. Pressing|
00001b90 20 3c 50 3e 20 77 69 6c 6c 20 63 61 75 73 65 20 | <P> will cause |
00001ba0 74 68 65 0d 73 75 70 70 6c 69 65 64 20 73 63 72 |the.supplied scr|
00001bb0 65 65 6e 20 64 75 6d 70 20 73 6f 66 74 77 61 72 |een dump softwar|
00001bc0 65 20 74 6f 20 62 65 20 6c 6f 61 64 65 64 20 61 |e to be loaded a|
00001bd0 6e 64 20 64 75 6d 70 20 74 68 65 20 63 75 72 72 |nd dump the curr|
00001be0 65 6e 74 0d 73 63 72 65 65 6e 20 74 6f 20 61 6e |ent.screen to an|
00001bf0 20 45 70 73 6f 6e 20 63 6f 6d 70 61 74 69 62 6c | Epson compatibl|
00001c00 65 20 70 72 69 6e 74 65 72 2e 20 53 65 65 20 41 |e printer. See A|
00001c10 50 50 45 4e 44 49 58 20 49 56 20 66 6f 72 20 75 |PPENDIX IV for u|
00001c20 73 65 20 6f 66 0d 6f 74 68 65 72 20 73 63 72 65 |se of.other scre|
00001c30 65 6e 20 64 75 6d 70 20 70 72 6f 67 72 61 6d 73 |en dump programs|
00001c40 2e 0d 0d 36 2e 34 20 54 68 65 20 6e 65 78 74 20 |...6.4 The next |
00001c50 6f 70 74 69 6f 6e 20 70 6c 6f 74 73 20 74 68 65 |option plots the|
00001c60 20 70 65 72 63 65 6e 74 61 67 65 20 67 61 69 6e | percentage gain|
00001c70 73 2f 6c 6f 73 73 65 73 20 6f 76 65 72 20 61 6c |s/losses over al|
00001c80 6c 20 74 68 65 0d 63 6f 6d 70 61 6e 69 65 73 20 |l the.companies |
00001c90 69 6e 20 61 6c 6c 20 74 68 65 20 50 6f 72 74 66 |in all the Portf|
00001ca0 6f 6c 69 6f 20 66 69 6c 65 73 20 6f 6e 20 74 68 |olio files on th|
00001cb0 65 20 64 69 73 63 2e 0d 0d 54 68 65 20 64 61 74 |e disc...The dat|
00001cc0 61 20 66 6f 72 20 73 68 61 72 65 73 20 67 6f 69 |a for shares goi|
00001cd0 6e 67 20 65 78 2d 73 63 72 69 70 20 61 72 65 20 |ng ex-scrip are |
00001ce0 6e 6f 74 20 61 64 6a 75 73 74 65 64 20 62 75 74 |not adjusted but|
00001cf0 20 74 68 65 73 65 20 61 72 65 0d 65 61 73 69 6c | these are.easil|
00001d00 79 20 64 65 74 65 63 74 65 64 20 62 79 20 6c 61 |y detected by la|
00001d10 72 67 65 20 64 6f 77 6e 77 61 72 64 20 6a 75 6d |rge downward jum|
00001d20 70 73 20 69 6e 20 74 68 65 20 70 6c 6f 74 74 65 |ps in the plotte|
00001d30 64 20 70 72 69 63 65 73 20 62 79 0d 66 61 63 74 |d prices by.fact|
00001d40 6f 72 73 20 6f 66 20 31 2f 32 2c 20 31 2f 33 2c |ors of 1/2, 1/3,|
00001d50 20 31 2f 34 20 65 74 63 2e 20 28 74 68 65 73 65 | 1/4 etc. (these|
00001d60 20 61 72 65 20 6d 61 72 6b 65 64 20 78 63 20 6f | are marked xc o|
00001d70 6e 20 74 68 65 20 43 45 45 46 41 58 0d 70 61 67 |n the CEEFAX.pag|
00001d80 65 73 29 2e 20 48 6f 77 65 76 65 72 2c 20 6c 61 |es). However, la|
00001d90 72 67 65 20 73 6c 75 6d 70 73 20 69 6e 20 74 68 |rge slumps in th|
00001da0 65 20 6d 61 72 6b 65 74 20 77 69 6c 6c 20 61 6c |e market will al|
00001db0 73 6f 20 61 70 70 65 61 72 20 69 6e 20 61 0d 73 |so appear in a.s|
00001dc0 69 6d 69 6c 61 72 20 66 61 73 68 69 6f 6e 20 61 |imilar fashion a|
00001dd0 6e 64 20 75 73 75 61 6c 6c 79 20 61 66 66 65 63 |nd usually affec|
00001de0 74 20 61 6c 6c 20 70 72 69 63 65 73 20 61 6e 64 |t all prices and|
00001df0 20 69 6e 64 69 63 65 73 20 61 73 20 64 75 72 69 | indices as duri|
00001e00 6e 67 0d 4f 63 74 6f 62 65 72 20 31 39 38 37 2e |ng.October 1987.|
00001e10 20 0d 0d 36 2e 35 20 54 68 65 20 73 69 78 74 68 | ..6.5 The sixth|
00001e20 20 61 6e 64 20 73 65 76 65 6e 74 68 20 6f 70 74 | and seventh opt|
00001e30 69 6f 6e 73 20 61 6c 6c 6f 77 20 74 68 65 20 73 |ions allow the s|
00001e40 65 74 74 69 6e 67 20 6f 66 20 72 75 6e 6e 69 6e |etting of runnin|
00001e50 67 0d 61 76 65 72 61 67 65 73 2e 0d 0d 42 6f 74 |g.averages...Bot|
00001e60 68 20 72 75 6e 6e 69 6e 67 20 61 76 65 72 61 67 |h running averag|
00001e70 65 20 70 65 72 69 6f 64 73 20 6d 61 79 20 62 65 |e periods may be|
00001e80 20 69 6e 63 72 65 61 73 65 64 20 6f 72 20 64 65 | increased or de|
00001e90 63 72 65 61 73 65 64 20 69 6e 20 64 61 79 73 20 |creased in days |
00001ea0 62 79 0d 70 72 65 73 73 69 6e 67 20 74 68 65 20 |by.pressing the |
00001eb0 4c 45 46 54 20 6f 72 20 52 49 47 48 54 20 63 75 |LEFT or RIGHT cu|
00001ec0 72 73 6f 72 20 6b 65 79 73 20 77 68 69 6c 73 74 |rsor keys whilst|
00001ed0 20 74 68 65 20 62 61 72 20 63 75 72 73 6f 72 20 | the bar cursor |
00001ee0 69 73 20 6f 76 65 72 0d 74 68 65 20 72 65 71 75 |is over.the requ|
00001ef0 69 72 65 64 20 6f 70 74 69 6f 6e 2e 20 41 6c 73 |ired option. Als|
00001f00 6f 20 65 61 63 68 20 61 76 65 72 61 67 69 6e 67 |o each averaging|
00001f10 20 70 65 72 69 6f 64 20 6d 61 79 20 62 65 20 74 | period may be t|
00001f20 6f 67 67 6c 65 64 20 4f 4e 20 6f 72 0d 4f 46 46 |oggled ON or.OFF|
00001f30 20 62 79 20 70 72 65 73 73 69 6e 67 20 74 68 65 | by pressing the|
00001f40 20 52 45 54 55 52 4e 20 6b 65 79 20 77 68 69 6c | RETURN key whil|
00001f50 73 74 20 74 68 65 20 63 75 72 73 6f 72 20 62 61 |st the cursor ba|
00001f60 72 20 69 73 20 6f 76 65 72 20 74 68 65 0d 72 65 |r is over the.re|
00001f70 71 75 69 72 65 64 20 6f 70 74 69 6f 6e 2e 0d 0d |quired option...|
00001f80 54 68 65 20 73 65 74 74 69 6e 67 73 20 77 69 6c |The settings wil|
00001f90 6c 20 62 65 20 73 74 6f 72 65 64 20 6f 6e 20 64 |l be stored on d|
00001fa0 69 73 63 20 69 6e 20 66 69 6c 65 20 27 59 45 41 |isc in file 'YEA|
00001fb0 52 27 20 73 6f 20 74 68 61 74 20 74 68 65 20 6e |R' so that the n|
00001fc0 65 78 74 0d 74 69 6d 65 20 74 68 65 20 70 72 6f |ext.time the pro|
00001fd0 67 72 61 6d 20 69 73 20 75 73 65 64 20 74 68 65 |gram is used the|
00001fe0 20 73 61 6d 65 20 61 76 65 72 61 67 69 6e 67 20 | same averaging |
00001ff0 70 65 72 69 6f 64 73 20 61 6e 64 20 73 74 61 74 |periods and stat|
00002000 65 20 77 69 6c 6c 20 62 65 0d 75 73 65 64 2e 0d |e will be.used..|
00002010 0d 54 68 65 20 61 76 65 72 61 67 65 73 20 70 6c |.The averages pl|
00002020 6f 74 74 65 64 20 6d 61 79 2c 20 61 72 67 75 61 |otted may, argua|
00002030 62 6c 79 2c 20 62 65 20 75 73 65 64 20 74 6f 20 |bly, be used to |
00002040 61 73 73 69 73 74 20 69 6e 20 64 65 74 65 72 6d |assist in determ|
00002050 69 6e 69 6e 67 0d 74 68 65 20 74 72 65 6e 64 20 |ining.the trend |
00002060 6f 66 20 61 20 73 68 61 72 65 20 70 72 69 63 65 |of a share price|
00002070 2e 20 54 72 69 61 6c 2d 61 6e 64 2d 65 72 72 6f |. Trial-and-erro|
00002080 72 20 61 6e 64 20 65 78 70 65 72 69 65 6e 63 65 |r and experience|
00002090 20 73 68 6f 75 6c 64 20 62 65 0d 75 73 65 64 20 | should be.used |
000020a0 74 6f 20 66 69 6e 64 20 67 6f 6f 64 20 76 61 6c |to find good val|
000020b0 75 65 73 20 66 6f 72 20 74 68 65 20 61 76 65 72 |ues for the aver|
000020c0 61 67 69 6e 67 20 70 65 72 69 6f 64 73 2e 20 0d |aging periods. .|
000020d0 0d 36 2e 36 20 54 68 65 20 66 69 6e 61 6c 20 6f |.6.6 The final o|
000020e0 70 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 74 68 |ption returns th|
000020f0 65 20 75 73 65 72 20 74 6f 20 74 68 65 20 6d 61 |e user to the ma|
00002100 69 6e 20 6d 65 6e 75 2e 0d 0d 37 2e 20 20 44 41 |in menu...7. DA|
00002110 54 41 20 44 52 49 56 45 0d 0d 54 68 69 73 20 6f |TA DRIVE..This o|
00002120 70 74 69 6f 6e 20 61 6c 6c 6f 77 73 20 74 68 65 |ption allows the|
00002130 20 63 75 72 72 65 6e 74 20 64 72 69 76 65 20 74 | current drive t|
00002140 6f 20 62 65 20 63 68 61 6e 67 65 64 20 66 72 6f |o be changed fro|
00002150 6d 20 77 69 74 68 69 6e 20 74 68 65 0d 70 72 6f |m within the.pro|
00002160 67 72 61 6d 20 73 68 6f 75 6c 64 20 79 6f 75 20 |gram should you |
00002170 68 61 76 65 20 6d 6f 72 65 20 74 68 61 6e 20 6f |have more than o|
00002180 6e 65 20 64 72 69 76 65 20 61 76 61 69 6c 61 62 |ne drive availab|
00002190 6c 65 2e 0d 0d 38 2e 20 20 45 4e 44 0d 0d 54 68 |le...8. END..Th|
000021a0 69 73 20 6f 70 74 69 6f 6e 20 45 4e 44 73 20 74 |is option ENDs t|
000021b0 68 65 20 70 72 6f 67 72 61 6d 20 63 6c 65 61 6e |he program clean|
000021c0 6c 79 20 61 6e 64 20 65 6e 74 65 72 73 20 42 41 |ly and enters BA|
000021d0 53 49 43 2e 0d 0d 0d 41 50 50 45 4e 44 49 58 20 |SIC....APPENDIX |
000021e0 49 0d 0d 41 29 20 20 46 49 4c 45 4e 41 4d 45 53 |I..A) FILENAMES|
000021f0 0d 0d 44 61 74 61 20 66 69 6c 65 6e 61 6d 65 73 |..Data filenames|
00002200 20 61 72 65 20 6d 61 64 65 20 75 70 20 6f 66 20 | are made up of |
00002210 74 68 65 20 59 45 41 52 2c 20 65 67 2e 20 31 39 |the YEAR, eg. 19|
00002220 38 37 2c 20 66 6f 6c 6c 6f 77 65 64 20 62 79 20 |87, followed by |
00002230 20 30 2c 20 31 2c 0d 32 20 6f 72 20 33 2e 20 46 | 0, 1,.2 or 3. F|
00002240 69 6c 65 73 20 65 6e 64 69 6e 67 20 69 6e 20 30 |iles ending in 0|
00002250 20 61 72 65 20 74 68 65 20 49 6e 64 65 78 20 66 | are the Index f|
00002260 69 6c 65 73 20 68 6f 6c 64 69 6e 67 20 74 68 65 |iles holding the|
00002270 20 46 54 2d 31 30 30 0d 49 6e 64 65 78 2e 20 54 | FT-100.Index. T|
00002280 68 6f 73 65 20 65 6e 64 69 6e 67 20 69 6e 20 31 |hose ending in 1|
00002290 2c 20 32 20 6f 72 20 33 20 68 6f 6c 64 20 70 72 |, 2 or 3 hold pr|
000022a0 69 63 65 73 20 66 6f 72 20 75 70 20 74 6f 20 32 |ices for up to 2|
000022b0 30 20 63 6f 6d 70 61 6e 69 65 73 0d 65 61 63 68 |0 companies.each|
000022c0 2e 0d 0d 54 68 65 20 66 69 6c 65 20 27 59 45 41 |...The file 'YEA|
000022d0 52 27 20 68 6f 6c 64 73 20 74 68 65 20 63 75 72 |R' holds the cur|
000022e0 72 65 6e 74 20 79 65 61 72 20 66 6f 72 20 65 61 |rent year for ea|
000022f0 63 68 20 6f 66 20 74 68 65 20 70 72 65 76 69 6f |ch of the previo|
00002300 75 73 6c 79 0d 64 65 73 63 72 69 62 65 64 20 66 |usly.described f|
00002310 69 6c 65 73 2e 20 54 68 69 73 20 66 69 6c 65 20 |iles. This file |
00002320 6d 61 79 20 62 65 20 64 65 6c 65 74 65 64 20 75 |may be deleted u|
00002330 73 69 6e 67 20 74 68 65 20 44 69 73 63 20 46 69 |sing the Disc Fi|
00002340 6c 69 6e 67 0d 53 79 73 74 65 6d 20 28 44 46 53 |ling.System (DFS|
00002350 29 20 63 6f 6d 6d 61 6e 64 20 0d 0d 20 20 20 20 |) command .. |
00002360 20 20 20 20 20 20 20 20 20 20 2a 44 45 4c 45 54 | *DELET|
00002370 45 20 59 45 41 52 0d 0d 61 6e 64 20 74 68 65 6e |E YEAR..and then|
00002380 20 72 65 63 72 65 61 74 65 64 20 6f 6e 20 41 55 | recreated on AU|
00002390 54 4f 2d 42 4f 4f 54 69 6e 67 20 74 68 65 20 4d |TO-BOOTing the M|
000023a0 41 49 4e 20 6d 65 6e 75 2e 20 54 68 69 73 20 69 |AIN menu. This i|
000023b0 73 20 74 6f 20 61 6c 6c 6f 77 0d 64 61 74 61 20 |s to allow.data |
000023c0 66 72 6f 6d 20 61 20 70 72 65 76 69 6f 75 73 20 |from a previous |
000023d0 79 65 61 72 20 74 6f 20 62 65 20 70 6c 6f 74 74 |year to be plott|
000023e0 65 64 20 6f 6e 20 69 74 73 20 6f 77 6e 2e 0d 0d |ed on its own...|
000023f0 53 68 6f 75 6c 64 20 74 68 65 20 63 75 72 72 65 |Should the curre|
00002400 6e 74 20 64 69 73 63 20 62 65 63 6f 6d 65 20 66 |nt disc become f|
00002410 75 6c 6c 20 77 68 69 6c 73 74 20 63 72 65 61 74 |ull whilst creat|
00002420 69 6e 67 20 6e 65 77 20 66 69 6c 65 73 2c 20 79 |ing new files, y|
00002430 6f 75 0d 68 61 76 65 20 74 6f 20 72 65 6d 6f 76 |ou.have to remov|
00002440 65 20 6f 6c 64 20 66 69 6c 65 73 20 66 72 6f 6d |e old files from|
00002450 20 74 68 65 20 64 69 73 63 2e 20 59 6f 75 20 6d | the disc. You m|
00002460 61 79 20 6c 69 6b 65 20 74 6f 20 63 6f 70 79 20 |ay like to copy |
00002470 74 68 65 73 65 0d 6f 6c 64 20 66 69 6c 65 73 20 |these.old files |
00002480 74 6f 20 61 6e 6f 74 68 65 72 20 64 69 73 63 20 |to another disc |
00002490 66 69 72 73 74 20 62 65 66 6f 72 65 20 74 68 65 |first before the|
000024a0 79 20 61 72 65 20 64 65 6c 65 74 65 64 20 66 72 |y are deleted fr|
000024b0 6f 6d 20 74 68 65 0d 63 75 72 72 65 6e 74 20 64 |om the.current d|
000024c0 69 73 63 2e 20 49 66 20 73 6f 2c 20 65 78 69 74 |isc. If so, exit|
000024d0 20 74 68 65 20 53 48 41 52 45 20 70 72 6f 67 72 | the SHARE progr|
000024e0 61 6d 73 20 61 6e 64 20 75 73 65 20 74 68 65 20 |ams and use the |
000024f0 44 46 53 20 63 6f 6d 6d 61 6e 64 2c 0d 0d 20 20 |DFS command,.. |
00002500 20 20 20 20 20 20 20 20 20 20 20 20 2a 43 4f 50 | *COP|
00002510 59 20 30 20 30 20 31 39 38 37 2a 0d 0d 77 68 69 |Y 0 0 1987*..whi|
00002520 63 68 20 77 69 6c 6c 20 63 6f 70 79 20 61 6c 6c |ch will copy all|
00002530 20 74 68 65 20 66 69 6c 65 73 20 66 6f 72 20 31 | the files for 1|
00002540 39 38 37 20 74 6f 20 61 6e 6f 74 68 65 72 20 64 |987 to another d|
00002550 69 73 63 20 69 6e 20 44 52 49 56 45 20 30 2e 20 |isc in DRIVE 0. |
00002560 49 6e 0d 74 68 69 73 20 63 61 73 65 2c 20 79 6f |In.this case, yo|
00002570 75 20 77 69 6c 6c 20 6f 66 20 63 6f 75 72 73 65 |u will of course|
00002580 2c 20 62 65 20 70 72 6f 6d 70 74 65 64 20 74 6f |, be prompted to|
00002590 20 69 6e 73 65 72 74 20 73 6f 75 72 63 65 20 61 | insert source a|
000025a0 6e 64 0d 64 65 73 74 69 6e 61 74 69 6f 6e 20 64 |nd.destination d|
000025b0 69 73 63 73 2e 0d 0d 4f 6e 63 65 20 74 68 65 79 |iscs...Once they|
000025c0 20 68 61 76 65 20 62 65 65 6e 20 73 61 66 65 6c | have been safel|
000025d0 79 20 63 6f 70 69 65 64 20 74 68 65 79 20 73 68 |y copied they sh|
000025e0 6f 75 6c 64 20 62 65 20 64 65 6c 65 74 65 64 20 |ould be deleted |
000025f0 66 72 6f 6d 20 74 68 65 0d 63 75 72 72 65 6e 74 |from the.current|
00002600 20 64 69 73 63 20 75 73 69 6e 67 20 74 68 65 20 | disc using the |
00002610 44 46 53 20 63 6f 6d 6d 61 6e 64 0d 0d 20 20 20 |DFS command.. |
00002620 20 20 20 20 20 20 20 20 20 20 20 2a 57 49 50 45 | *WIPE|
00002630 20 31 39 38 37 2a 0d 0d 49 74 20 69 73 20 73 75 | 1987*..It is su|
00002640 67 67 65 73 74 65 64 20 74 68 61 74 20 74 68 65 |ggested that the|
00002650 20 64 69 73 63 20 69 73 20 6e 6f 77 20 63 6f 6d | disc is now com|
00002660 70 61 63 74 65 64 2e 0d 0d 49 66 20 79 6f 75 20 |pacted...If you |
00002670 68 61 76 65 20 61 20 64 6f 75 62 6c 65 20 73 69 |have a double si|
00002680 64 65 64 20 6f 72 20 64 75 61 6c 20 64 69 73 63 |ded or dual disc|
00002690 20 64 72 69 76 65 73 20 79 6f 75 20 6d 61 79 20 | drives you may |
000026a0 6d 61 78 69 6d 69 73 65 20 74 68 65 0d 61 6d 6f |maximise the.amo|
000026b0 75 6e 74 20 6f 66 20 64 69 73 63 20 73 70 61 63 |unt of disc spac|
000026c0 65 20 61 76 61 69 6c 61 62 6c 65 20 66 6f 72 20 |e available for |
000026d0 64 61 74 61 20 66 69 6c 65 73 20 62 79 20 74 72 |data files by tr|
000026e0 61 6e 73 66 65 72 72 69 6e 67 20 61 6c 6c 20 74 |ansferring all t|
000026f0 68 65 0d 64 61 74 61 20 66 69 6c 65 73 20 74 6f |he.data files to|
00002700 20 61 20 64 69 73 63 20 73 75 72 66 61 63 65 20 | a disc surface |
00002710 69 6e 20 6f 74 68 65 72 20 74 68 61 6e 20 44 52 |in other than DR|
00002720 49 56 45 20 30 20 77 68 69 63 68 20 6d 75 73 74 |IVE 0 which must|
00002730 20 68 6f 6c 64 0d 74 68 65 20 53 59 53 54 45 4d | hold.the SYSTEM|
00002740 20 73 6f 66 74 77 61 72 65 2e 20 53 6f 2c 20 69 | software. So, i|
00002750 66 20 66 6f 72 20 69 6e 73 74 61 6e 63 65 2c 20 |f for instance, |
00002760 79 6f 75 20 68 61 76 65 20 61 20 64 6f 75 62 6c |you have a doubl|
00002770 65 2d 73 69 64 65 64 0d 64 72 69 76 65 20 79 6f |e-sided.drive yo|
00002780 75 20 63 6f 75 6c 64 20 74 72 61 6e 73 66 65 72 |u could transfer|
00002790 20 61 6c 6c 20 74 68 65 20 64 61 74 61 20 66 69 | all the data fi|
000027a0 6c 65 73 20 74 6f 20 44 52 49 56 45 20 32 2c 20 |les to DRIVE 2, |
000027b0 74 68 65 20 6f 62 76 65 72 73 65 0d 73 69 64 65 |the obverse.side|
000027c0 20 74 6f 20 44 52 49 56 45 20 30 2c 20 62 79 20 | to DRIVE 0, by |
000027d0 69 73 73 75 69 6e 67 20 74 68 65 20 44 46 53 20 |issuing the DFS |
000027e0 63 6f 6d 6d 61 6e 64 2c 0d 0d 20 20 20 20 20 20 |command,.. |
000027f0 20 20 20 20 20 20 20 20 2a 43 4f 50 59 20 30 20 | *COPY 0 |
00002800 32 20 31 39 38 37 2a 0d 0d 77 68 69 63 68 20 77 |2 1987*..which w|
00002810 69 6c 6c 20 63 6f 70 79 20 61 6c 6c 20 31 39 38 |ill copy all 198|
00002820 37 20 66 69 6c 65 73 20 66 72 6f 6d 20 44 52 49 |7 files from DRI|
00002830 56 45 20 30 20 74 6f 20 44 52 49 56 45 20 32 2e |VE 0 to DRIVE 2.|
00002840 20 54 68 65 6e 2c 0d 0d 20 20 20 20 20 20 20 20 | Then,.. |
00002850 20 20 20 20 20 20 2a 43 4f 50 59 20 30 20 32 20 | *COPY 0 2 |
00002860 31 39 38 38 2a 0d 0d 77 68 69 63 68 20 77 69 6c |1988*..which wil|
00002870 6c 20 63 6f 70 79 20 61 6c 6c 20 31 39 38 38 20 |l copy all 1988 |
00002880 66 69 6c 65 73 20 61 6e 64 20 73 6f 20 6f 6e 2e |files and so on.|
00002890 0d 0d 4f 6e 63 65 20 74 68 69 73 20 68 61 73 20 |..Once this has |
000028a0 62 65 65 6e 20 64 6f 6e 65 20 79 6f 75 20 63 6f |been done you co|
000028b0 75 6c 64 20 64 65 6c 65 74 65 20 74 68 65 73 65 |uld delete these|
000028c0 20 66 69 6c 65 73 20 66 72 6f 6d 20 44 52 49 56 | files from DRIV|
000028d0 45 20 30 20 61 73 0d 64 65 73 63 72 69 62 65 64 |E 0 as.described|
000028e0 20 65 61 72 6c 69 65 72 2e 0d 0d 54 6f 20 75 73 | earlier...To us|
000028f0 65 20 74 68 65 73 65 20 66 69 6c 65 73 20 6f 6e |e these files on|
00002900 20 44 52 49 56 45 20 32 2c 20 61 75 74 6f 2d 42 | DRIVE 2, auto-B|
00002910 4f 4f 54 20 74 68 65 20 73 79 73 74 65 6d 20 64 |OOT the system d|
00002920 69 73 63 20 63 6f 6e 74 61 69 6e 69 6e 67 0d 74 |isc containing.t|
00002930 68 65 20 53 48 41 52 45 20 73 6f 66 74 77 61 72 |he SHARE softwar|
00002940 65 20 61 6e 64 20 63 68 61 6e 67 65 20 64 72 69 |e and change dri|
00002950 76 65 73 20 75 73 69 6e 67 20 74 68 65 20 72 65 |ves using the re|
00002960 6c 65 76 61 6e 74 20 6f 70 74 69 6f 6e 20 66 72 |levant option fr|
00002970 6f 6d 0d 74 68 65 20 4d 41 49 4e 20 50 41 4e 45 |om.the MAIN PANE|
00002980 4c 2e 20 20 0d 0d 42 29 20 20 46 49 4c 45 20 53 |L. ..B) FILE S|
00002990 54 52 55 43 54 55 52 45 0d 0d 46 6f 72 20 74 68 |TRUCTURE..For th|
000029a0 6f 73 65 20 77 68 6f 20 6d 61 79 20 77 69 73 68 |ose who may wish|
000029b0 20 74 6f 20 77 72 69 74 65 20 74 68 65 69 72 20 | to write their |
000029c0 6f 77 6e 20 73 6f 66 74 77 61 72 65 20 74 6f 20 |own software to |
000029d0 61 6e 61 6c 79 73 65 20 74 68 65 0d 64 61 74 61 |analyse the.data|
000029e0 20 74 68 65 72 65 20 6e 6f 77 20 66 6f 6c 6c 6f | there now follo|
000029f0 77 73 20 61 20 64 65 74 61 69 6c 65 64 20 64 65 |ws a detailed de|
00002a00 73 63 72 69 70 74 69 6f 6e 20 6f 66 20 74 68 65 |scription of the|
00002a10 20 66 69 6c 65 20 73 74 72 75 63 74 75 72 65 2e | file structure.|
00002a20 0d 0d 54 68 65 20 66 69 6c 65 20 27 59 45 41 52 |..The file 'YEAR|
00002a30 27 20 6d 61 79 20 62 65 20 72 65 61 64 20 75 73 |' may be read us|
00002a40 69 6e 67 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e |ing the followin|
00002a50 67 20 42 41 53 49 43 3a 2d 0d 0d 20 20 20 20 20 |g BASIC:-.. |
00002a60 20 20 20 20 31 30 20 44 49 4d 20 79 65 61 72 25 | 10 DIM year%|
00002a70 28 33 29 0d 20 20 20 20 20 20 20 20 20 32 30 20 |(3). 20 |
00002a80 58 25 3d 4f 50 45 4e 49 4e 28 22 59 45 41 52 22 |X%=OPENIN("YEAR"|
00002a90 29 0d 20 20 20 20 20 20 20 20 20 33 30 20 46 4f |). 30 FO|
00002aa0 52 20 49 25 3d 30 20 54 4f 20 33 0d 20 20 20 20 |R I%=0 TO 3. |
00002ab0 20 20 20 20 20 34 30 20 49 4e 50 55 54 23 58 25 | 40 INPUT#X%|
00002ac0 2c 79 65 61 72 25 28 49 25 29 0d 20 20 20 20 20 |,year%(I%). |
00002ad0 20 20 20 20 35 30 20 4e 45 58 54 0d 20 20 20 20 | 50 NEXT. |
00002ae0 20 20 20 20 20 36 30 20 49 46 20 45 58 54 23 58 | 60 IF EXT#X|
00002af0 25 3e 26 31 34 20 49 4e 50 55 54 23 58 25 2c 4c |%>&14 INPUT#X%,L|
00002b00 25 2c 48 25 0d 20 20 20 20 20 20 20 20 20 37 30 |%,H%. 70|
00002b10 20 43 4c 4f 53 45 23 58 25 0d 20 20 20 20 20 20 | CLOSE#X%. |
00002b20 20 20 20 38 30 20 45 4e 44 0d 20 20 20 20 20 20 | 80 END. |
00002b30 20 20 20 20 73 6f 20 74 68 61 74 20 74 68 65 20 | so that the |
00002b40 63 75 72 72 65 6e 74 20 79 65 61 72 20 66 6f 72 |current year for|
00002b50 20 74 68 65 20 49 4e 44 45 58 20 66 69 6c 65 2c | the INDEX file,|
00002b60 20 59 59 59 59 30 20 69 73 20 68 65 6c 64 0d 69 | YYYY0 is held.i|
00002b70 6e 20 74 68 65 20 61 72 72 61 79 20 65 6c 65 6d |n the array elem|
00002b80 65 6e 74 20 79 65 61 72 25 28 30 29 20 61 6e 64 |ent year%(0) and|
00002b90 20 74 68 61 74 20 66 6f 72 20 50 4f 52 54 46 4f | that for PORTFO|
00002ba0 4c 49 4f 20 31 2c 20 69 65 2e 20 59 59 59 59 31 |LIO 1, ie. YYYY1|
00002bb0 2c 20 69 73 0d 68 65 6c 64 20 69 6e 20 74 68 65 |, is.held in the|
00002bc0 20 61 72 72 61 79 20 65 6c 65 6d 65 6e 74 20 79 | array element y|
00002bd0 65 61 72 25 28 31 29 20 77 68 65 72 65 20 59 59 |ear%(1) where YY|
00002be0 59 59 20 69 73 20 74 68 65 20 69 6e 74 65 67 65 |YY is the intege|
00002bf0 72 20 68 65 6c 64 20 69 6e 0d 74 68 65 20 61 72 |r held in.the ar|
00002c00 72 61 79 20 65 6c 65 6d 65 6e 74 20 63 6f 6e 63 |ray element conc|
00002c10 65 72 6e 65 64 2e 0d 0d 54 68 65 20 76 61 72 69 |erned...The vari|
00002c20 61 62 6c 65 73 20 4c 25 20 61 6e 64 20 48 25 2c |ables L% and H%,|
00002c30 20 69 66 20 70 72 65 73 65 6e 74 2c 20 68 6f 6c | if present, hol|
00002c40 64 20 74 68 65 20 63 75 72 72 65 6e 74 20 61 76 |d the current av|
00002c50 65 72 61 67 69 6e 67 0d 70 65 72 69 6f 64 73 20 |eraging.periods |
00002c60 61 6e 64 20 73 74 61 74 65 2e 20 49 66 20 74 68 |and state. If th|
00002c70 65 20 76 61 6c 75 65 20 68 65 6c 64 20 69 73 20 |e value held is |
00002c80 67 72 65 61 74 65 72 20 74 68 61 6e 20 32 30 30 |greater than 200|
00002c90 20 74 68 65 6e 20 74 68 65 0d 61 76 65 72 61 67 | then the.averag|
00002ca0 69 6e 67 20 70 65 72 69 6f 64 20 77 69 6c 6c 20 |ing period will |
00002cb0 62 65 20 73 77 69 74 63 68 65 64 20 4f 4e 2c 20 |be switched ON, |
00002cc0 6f 74 68 65 72 77 69 73 65 20 69 74 20 77 69 6c |otherwise it wil|
00002cd0 6c 20 62 65 20 73 77 69 74 63 68 65 64 0d 4f 46 |l be switched.OF|
00002ce0 46 2e 20 49 66 20 61 6e 20 61 76 65 72 61 67 69 |F. If an averagi|
00002cf0 6e 67 20 70 65 72 69 6f 64 20 69 73 20 4f 4e 2c |ng period is ON,|
00002d00 20 73 75 62 74 72 61 63 74 20 32 35 36 20 61 6e | subtract 256 an|
00002d10 64 20 69 74 20 77 69 6c 6c 20 62 65 0d 73 77 69 |d it will be.swi|
00002d20 74 63 68 65 64 20 4f 46 46 2e 20 43 6f 6e 76 65 |tched OFF. Conve|
00002d30 72 73 65 6c 79 2c 20 69 66 20 61 6e 20 61 76 65 |rsely, if an ave|
00002d40 72 61 67 69 6e 67 20 70 65 72 69 6f 64 20 69 73 |raging period is|
00002d50 20 4f 46 46 2c 20 61 64 64 20 32 35 36 20 61 6e | OFF, add 256 an|
00002d60 64 0d 69 74 20 77 69 6c 6c 20 62 65 20 73 77 69 |d.it will be swi|
00002d70 74 63 68 65 64 20 4f 4e 2e 0d 0d 54 68 65 20 49 |tched ON...The I|
00002d80 4e 44 45 58 20 61 6e 64 20 50 4f 52 54 46 4f 4c |NDEX and PORTFOL|
00002d90 49 4f 20 66 69 6c 65 73 20 68 61 76 65 20 61 20 |IO files have a |
00002da0 72 65 6c 61 74 69 76 65 6c 79 20 63 6f 6d 70 6c |relatively compl|
00002db0 65 78 20 66 69 6c 65 0d 73 74 72 75 63 74 75 72 |ex file.structur|
00002dc0 65 2e 20 54 68 65 72 65 20 61 72 65 20 34 20 6d |e. There are 4 m|
00002dd0 61 69 6e 20 73 65 63 74 69 6f 6e 73 20 74 6f 20 |ain sections to |
00002de0 74 68 65 73 65 20 66 69 6c 65 73 2e 0d 0d 53 45 |these files...SE|
00002df0 43 54 49 4f 4e 20 31 20 2d 20 49 4e 44 45 58 20 |CTION 1 - INDEX |
00002e00 6f 72 20 43 6f 6d 70 61 6e 79 20 6e 61 6d 65 73 |or Company names|
00002e10 2e 20 53 45 43 54 49 4f 4e 20 32 20 2d 20 64 61 |. SECTION 2 - da|
00002e20 74 65 73 20 61 6e 64 20 64 69 73 63 0d 70 6f 69 |tes and disc.poi|
00002e30 6e 74 65 72 73 2e 20 53 45 43 54 49 4f 4e 20 33 |nters. SECTION 3|
00002e40 20 2d 20 6d 61 78 69 6d 75 6d 20 61 6e 64 20 6d | - maximum and m|
00002e50 69 6e 69 6d 75 6d 20 70 72 69 63 65 73 2e 20 53 |inimum prices. S|
00002e60 45 43 54 49 4f 4e 20 34 20 2d 20 74 68 65 0d 70 |ECTION 4 - the.p|
00002e70 72 69 63 65 73 2e 0d 0d 53 45 43 54 49 4f 4e 20 |rices...SECTION |
00002e80 31 20 20 49 4e 44 45 58 20 6f 72 20 43 6f 6d 70 |1 INDEX or Comp|
00002e90 61 6e 79 20 6e 61 6d 65 73 2e 0d 0d 57 68 65 6e |any names...When|
00002ea0 20 75 70 64 61 74 69 6e 67 20 74 68 65 20 66 69 | updating the fi|
00002eb0 6c 65 73 20 66 72 6f 6d 20 27 43 45 45 46 41 58 |les from 'CEEFAX|
00002ec0 27 20 74 68 65 20 49 6e 64 65 78 20 64 61 74 61 |' the Index data|
00002ed0 20 69 73 20 66 6f 75 6e 64 20 62 79 0d 74 72 61 | is found by.tra|
00002ee0 6e 73 66 65 72 72 69 6e 67 20 42 42 43 20 31 2f |nsferring BBC 1/|
00002ef0 50 61 67 65 20 31 32 35 20 74 6f 20 6d 65 6d 6f |Page 125 to memo|
00002f00 72 79 2e 20 50 61 67 65 73 20 61 72 65 20 74 72 |ry. Pages are tr|
00002f10 61 6e 73 66 65 72 72 65 64 20 74 6f 0d 6d 65 6d |ansferred to.mem|
00002f20 6f 72 79 20 75 6e 74 69 6c 20 73 75 62 2d 70 61 |ory until sub-pa|
00002f30 67 65 20 32 20 69 73 20 66 6f 75 6e 64 2c 20 77 |ge 2 is found, w|
00002f40 68 65 6e 20 74 68 65 20 46 54 2d 31 30 30 20 69 |hen the FT-100 i|
00002f50 6e 64 65 78 20 69 73 20 65 78 74 72 61 63 74 65 |ndex is extracte|
00002f60 64 0d 61 6e 64 20 73 61 76 65 64 20 74 6f 20 64 |d.and saved to d|
00002f70 69 73 63 2e 0d 0d 4f 6e 20 74 68 65 20 6f 74 68 |isc...On the oth|
00002f80 65 72 20 68 61 6e 64 2c 20 66 6f 72 20 74 68 65 |er hand, for the|
00002f90 20 50 4f 52 54 46 4f 4c 49 4f 20 66 69 6c 65 73 | PORTFOLIO files|
00002fa0 2c 20 42 42 43 20 31 2f 50 61 67 65 20 31 33 30 |, BBC 1/Page 130|
00002fb0 20 69 73 0d 74 72 61 6e 73 66 65 72 72 65 64 20 | is.transferred |
00002fc0 69 6e 74 6f 20 6d 65 6d 6f 72 79 2e 20 54 68 65 |into memory. The|
00002fd0 20 73 68 61 72 65 20 70 72 69 63 65 20 66 6f 72 | share price for|
00002fe0 20 61 6e 79 20 70 61 72 74 69 63 75 6c 61 72 20 | any particular |
00002ff0 63 6f 6d 70 61 6e 79 0d 6d 61 79 20 62 65 20 66 |company.may be f|
00003000 6f 75 6e 64 20 6f 6e 20 61 6e 79 20 6f 66 20 36 |ound on any of 6|
00003010 20 73 75 62 20 70 61 67 65 73 20 73 6f 20 65 61 | sub pages so ea|
00003020 63 68 20 63 6f 6d 70 61 6e 79 20 6e 61 6d 65 20 |ch company name |
00003030 68 65 6c 64 20 6f 6e 20 66 69 6c 65 0d 69 73 20 |held on file.is |
00003040 63 6f 6d 70 61 72 65 64 20 77 69 74 68 20 65 61 |compared with ea|
00003050 63 68 20 63 6f 6d 70 61 6e 79 20 6e 61 6d 65 20 |ch company name |
00003060 6f 6e 20 74 68 65 20 74 72 61 6e 73 66 65 72 72 |on the transferr|
00003070 65 64 20 43 45 45 46 41 58 20 70 61 67 65 2e 20 |ed CEEFAX page. |
00003080 49 66 0d 74 68 65 72 65 20 69 73 20 61 20 6d 61 |If.there is a ma|
00003090 74 63 68 2c 20 74 68 65 20 61 70 70 72 6f 70 72 |tch, the appropr|
000030a0 69 61 74 65 20 70 72 69 63 65 20 69 73 20 65 78 |iate price is ex|
000030b0 74 72 61 63 74 65 64 20 61 6e 64 20 73 61 76 65 |tracted and save|
000030c0 64 2e 0d 0d 54 68 65 20 63 6f 6d 70 61 6e 79 20 |d...The company |
000030d0 6e 61 6d 65 73 20 6f 6e 20 43 45 45 46 41 58 20 |names on CEEFAX |
000030e0 61 72 65 20 68 65 6c 64 20 69 6e 20 75 70 20 74 |are held in up t|
000030f0 6f 20 37 2d 63 68 61 72 61 63 74 65 72 73 2e 20 |o 7-characters. |
00003100 4c 69 6b 65 77 69 73 65 2c 0d 74 68 65 20 63 6f |Likewise,.the co|
00003110 6d 70 61 6e 79 20 6e 61 6d 65 73 20 68 65 6c 64 |mpany names held|
00003120 20 69 6e 20 74 68 65 20 50 4f 52 54 46 4f 4c 49 | in the PORTFOLI|
00003130 4f 20 66 69 6c 65 73 20 61 72 65 20 68 65 6c 64 |O files are held|
00003140 20 69 6e 0d 37 2d 63 68 61 72 61 63 74 65 72 73 | in.7-characters|
00003150 2e 20 46 6f 72 20 74 68 69 73 20 72 65 61 73 6f |. For this reaso|
00003160 6e 2c 20 74 68 65 72 65 20 61 72 65 20 6e 6f 20 |n, there are no |
00003170 74 65 72 6d 69 6e 61 74 6f 72 73 20 74 6f 20 74 |terminators to t|
00003180 68 65 0d 63 6f 6d 70 61 6e 79 20 6e 61 6d 65 73 |he.company names|
00003190 20 6f 6e 20 66 69 6c 65 20 61 73 20 74 68 65 79 | on file as they|
000031a0 20 61 72 65 20 61 6c 77 61 79 73 20 37 2d 63 68 | are always 7-ch|
000031b0 61 72 61 63 74 65 72 73 20 6c 6f 6e 67 2e 20 54 |aracters long. T|
000031c0 68 65 0d 63 6f 6d 70 61 6e 79 20 6e 61 6d 65 73 |he.company names|
000031d0 20 61 72 65 20 77 72 69 74 74 65 6e 20 6f 6e 65 | are written one|
000031e0 20 63 68 61 72 61 63 74 65 72 20 61 74 20 61 20 | character at a |
000031f0 74 69 6d 65 20 69 6e 20 63 6f 72 72 65 63 74 20 |time in correct |
00003200 6f 72 64 65 72 2c 0d 69 65 2e 20 61 73 20 74 68 |order,.ie. as th|
00003210 65 79 20 6e 6f 72 6d 61 6c 6c 79 20 61 70 70 65 |ey normally appe|
00003220 61 72 2e 0d 0d 53 45 43 54 49 4f 4e 20 32 20 20 |ar...SECTION 2 |
00003230 44 41 54 45 53 20 41 4e 44 20 44 49 53 43 20 50 |DATES AND DISC P|
00003240 4f 49 4e 54 45 52 53 0d 0d 54 68 69 73 20 73 65 |OINTERS..This se|
00003250 63 74 69 6f 6e 20 68 6f 6c 64 73 20 73 6f 6d 65 |ction holds some|
00003260 20 73 70 61 72 65 20 62 79 74 65 73 20 66 6f 72 | spare bytes for|
00003270 20 70 6f 73 73 69 62 6c 65 20 66 75 74 75 72 65 | possible future|
00003280 20 65 78 70 61 6e 73 69 6f 6e 20 61 6e 64 0d 61 | expansion and.a|
00003290 6c 6c 20 74 68 65 20 64 61 74 65 73 20 61 6e 64 |ll the dates and|
000032a0 20 70 6f 69 6e 74 65 72 73 20 66 6f 72 20 64 61 | pointers for da|
000032b0 74 61 20 61 63 63 65 73 73 2e 0d 0d 53 45 43 54 |ta access...SECT|
000032c0 49 4f 4e 20 33 20 2d 20 4d 41 58 49 4d 55 4d 20 |ION 3 - MAXIMUM |
000032d0 41 4e 44 20 4d 49 4e 49 4d 55 4d 20 50 52 49 43 |AND MINIMUM PRIC|
000032e0 45 53 2e 0d 0d 42 65 63 61 75 73 65 20 74 68 65 |ES...Because the|
000032f0 20 49 6e 64 65 78 2f 70 72 69 63 65 73 20 6d 61 | Index/prices ma|
00003300 79 20 62 65 20 61 6e 79 20 76 61 6c 75 65 20 66 |y be any value f|
00003310 72 6f 6d 20 30 20 74 6f 20 39 39 39 39 20 74 68 |rom 0 to 9999 th|
00003320 65 79 20 6e 65 65 64 20 74 6f 0d 62 65 20 73 63 |ey need to.be sc|
00003330 61 6c 65 64 20 77 68 69 6c 73 74 20 70 6c 6f 74 |aled whilst plot|
00003340 74 69 6e 67 2e 20 54 6f 20 73 70 65 65 64 20 75 |ting. To speed u|
00003350 70 20 74 68 65 20 70 6c 6f 74 74 69 6e 67 20 70 |p the plotting p|
00003360 72 6f 63 65 73 73 20 74 68 65 0d 6d 61 78 69 6d |rocess the.maxim|
00003370 75 6d 20 61 6e 64 20 6d 69 6e 69 6d 75 6d 20 76 |um and minimum v|
00003380 61 6c 75 65 73 20 61 72 65 20 73 74 6f 72 65 64 |alues are stored|
00003390 20 6f 6e 20 64 69 73 63 2e 20 44 75 72 69 6e 67 | on disc. During|
000033a0 20 61 75 74 6f 6d 61 74 69 63 0d 64 6f 77 6e 6c | automatic.downl|
000033b0 6f 61 64 69 6e 67 2c 20 74 68 65 73 65 20 76 61 |oading, these va|
000033c0 6c 75 65 73 20 61 72 65 20 75 70 64 61 74 65 64 |lues are updated|
000033d0 20 73 69 6d 70 6c 79 20 62 79 20 63 6f 6d 70 61 | simply by compa|
000033e0 72 69 6e 67 20 74 68 65 20 6d 6f 73 74 0d 72 65 |ring the most.re|
000033f0 63 65 6e 74 6c 79 20 64 6f 77 6e 6c 6f 61 64 65 |cently downloade|
00003400 64 20 70 72 69 63 65 73 20 61 67 61 69 6e 73 74 |d prices against|
00003410 20 74 68 65 20 6d 61 78 69 6d 75 6d 20 61 6e 64 | the maximum and|
00003420 20 6d 69 6e 69 6d 75 6d 20 76 61 6c 75 65 73 0d | minimum values.|
00003430 73 74 6f 72 65 64 20 6f 6e 20 64 69 73 63 2e 20 |stored on disc. |
00003440 49 66 20 6e 65 63 65 73 73 61 72 79 2c 20 74 68 |If necessary, th|
00003450 65 20 6d 61 78 2f 6d 69 6e 20 76 61 6c 75 65 73 |e max/min values|
00003460 20 61 72 65 20 75 70 64 61 74 65 64 2e 0d 0d 53 | are updated...S|
00003470 45 43 54 49 4f 4e 20 34 20 2d 20 54 48 45 20 50 |ECTION 4 - THE P|
00003480 52 49 43 45 53 2e 0d 0d 54 68 65 20 6d 61 69 6e |RICES...The main|
00003490 20 73 65 63 74 69 6f 6e 20 6f 66 20 65 61 63 68 | section of each|
000034a0 20 66 69 6c 65 20 68 6f 6c 64 73 20 74 68 65 20 | file holds the |
000034b0 70 72 69 63 65 73 20 66 6f 72 20 65 61 63 68 20 |prices for each |
000034c0 63 6f 6d 70 61 6e 79 2e 0d 0d 54 68 65 72 65 20 |company...There |
000034d0 6e 6f 77 20 66 6f 6c 6c 6f 77 73 20 74 68 65 20 |now follows the |
000034e0 6c 61 79 6f 75 74 20 6f 66 20 74 68 65 20 64 61 |layout of the da|
000034f0 74 61 20 66 69 6c 65 73 3a 2d 0d 0d 53 45 43 54 |ta files:-..SECT|
00003500 49 4f 4e 20 31 20 20 53 48 41 52 45 20 4e 41 4d |ION 1 SHARE NAM|
00003510 45 53 0d 0d 20 20 20 20 20 20 20 20 20 62 79 74 |ES.. byt|
00003520 65 73 20 20 20 20 20 64 65 73 63 72 69 70 74 69 |es descripti|
00003530 6f 6e 0d 0d 20 20 20 20 20 20 20 20 20 30 2d 36 |on.. 0-6|
00003540 20 20 20 20 20 20 20 66 69 72 73 74 20 73 68 61 | first sha|
00003550 72 65 20 6e 61 6d 65 0d 20 20 20 20 20 20 20 20 |re name. |
00003560 20 37 2d 31 33 20 20 20 20 20 20 73 65 63 6f 6e | 7-13 secon|
00003570 64 20 73 68 61 72 65 20 6e 61 6d 65 0d 20 20 20 |d share name. |
00003580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003590 65 74 63 2e 20 66 6f 72 20 75 70 20 74 6f 20 32 |etc. for up to 2|
000035a0 30 20 6e 61 6d 65 73 20 53 45 43 54 49 4f 4e 20 |0 names SECTION |
000035b0 32 20 20 50 4f 49 4e 54 45 52 53 0d 0d 20 20 20 |2 POINTERS.. |
000035c0 20 20 20 20 20 20 62 79 74 65 73 20 20 20 20 20 | bytes |
000035d0 64 65 73 63 72 69 70 74 69 6f 6e 0d 0d 20 20 20 |description.. |
000035e0 20 20 20 20 20 20 31 34 30 2d 31 35 37 20 20 20 | 140-157 |
000035f0 73 70 61 72 65 20 62 79 74 65 73 0d 20 20 20 20 |spare bytes. |
00003600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d | .|
00003610 20 20 20 20 20 20 20 20 20 31 35 38 2d 31 35 39 | 158-159|
00003620 20 20 20 70 6f 69 6e 74 65 72 20 74 6f 20 66 69 | pointer to fi|
00003630 72 73 74 20 64 61 74 61 20 70 6f 69 6e 74 20 66 |rst data point f|
00003640 6f 72 20 66 69 72 73 74 20 73 68 61 72 65 0d 20 |or first share. |
00003650 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003660 20 20 28 70 6f 69 6e 74 65 72 20 44 49 56 20 32 | (pointer DIV 2|
00003670 35 36 2c 20 70 6f 69 6e 74 65 72 20 4d 4f 44 20 |56, pointer MOD |
00003680 32 35 36 29 0d 20 20 20 20 20 20 20 20 20 20 20 |256). |
00003690 20 20 20 20 20 20 20 20 0d 20 20 20 20 20 20 20 | . |
000036a0 20 20 31 36 30 2d 31 36 33 20 20 20 63 75 72 72 | 160-163 curr|
000036b0 65 6e 74 20 64 61 74 65 20 28 44 2f 4d 2f 59 29 |ent date (D/M/Y)|
000036c0 20 69 6e 20 74 68 65 20 66 6f 72 6d 20 44 2c 20 | in the form D, |
000036d0 4d 2c 20 59 20 44 49 56 0d 20 20 20 20 20 20 20 |M, Y DIV. |
000036e0 20 20 20 20 20 20 20 20 20 20 20 20 32 35 36 2c | 256,|
000036f0 20 59 20 4d 4f 44 20 32 35 36 0d 20 20 20 20 20 | Y MOD 256. |
00003700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 20 | . |
00003710 20 20 20 20 20 20 20 20 31 36 34 20 20 20 20 20 | 164 |
00003720 20 20 63 75 72 72 65 6e 74 20 64 61 79 20 28 4d | current day (M|
00003730 6f 6e 64 61 79 3d 31 2c 20 54 75 65 73 64 61 79 |onday=1, Tuesday|
00003740 3d 32 20 65 74 63 2e 29 0d 20 20 20 20 20 20 20 |=2 etc.). |
00003750 20 20 20 20 20 20 20 20 20 20 20 20 0d 20 20 20 | . |
00003760 20 20 20 20 20 20 31 36 35 2d 31 36 36 20 20 20 | 165-166 |
00003770 70 6f 69 6e 74 65 72 20 74 6f 20 66 69 72 73 74 |pointer to first|
00003780 20 73 68 61 72 65 20 70 72 69 63 65 20 6f 6e 20 | share price on |
00003790 63 75 72 72 65 6e 74 20 64 61 79 0d 20 20 20 20 |current day. |
000037a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | (|
000037b0 70 6f 69 6e 74 65 72 20 44 49 56 20 32 35 36 2c |pointer DIV 256,|
000037c0 20 70 6f 69 6e 74 65 72 20 4d 4f 44 20 32 35 36 | pointer MOD 256|
000037d0 29 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |). |
000037e0 20 20 20 20 20 0d 20 20 20 20 20 20 20 20 20 31 | . 1|
000037f0 36 37 2d 31 37 30 20 20 20 64 61 74 65 20 6f 66 |67-170 date of|
00003800 20 66 69 72 73 74 20 64 61 74 61 20 70 6f 69 6e | first data poin|
00003810 74 20 69 6e 20 74 68 65 20 73 61 6d 65 20 66 6f |t in the same fo|
00003820 72 6d 20 61 73 0d 20 20 20 20 20 20 20 20 20 20 |rm as. |
00003830 20 20 20 20 20 20 20 20 20 62 79 74 65 73 20 31 | bytes 1|
00003840 36 30 2d 31 36 33 0d 0d 53 45 43 54 49 4f 4e 20 |60-163..SECTION |
00003850 33 20 20 4d 41 58 49 4d 55 4d 2c 20 4d 49 4e 49 |3 MAXIMUM, MINI|
00003860 4d 55 4d 20 56 41 4c 55 45 53 0d 0d 20 20 20 20 |MUM VALUES.. |
00003870 20 20 20 20 20 62 79 74 65 73 20 20 20 20 20 64 | bytes d|
00003880 65 73 63 72 69 70 74 69 6f 6e 0d 0d 20 20 20 20 |escription.. |
00003890 20 20 20 20 20 31 37 31 2d 31 37 32 7d 20 20 66 | 171-172} f|
000038a0 69 72 73 74 20 73 68 61 72 65 20 6d 69 6e 69 6d |irst share minim|
000038b0 75 6d 20 76 61 6c 75 65 20 28 6d 69 6e 20 44 49 |um value (min DI|
000038c0 56 20 32 35 36 2c 20 6d 69 6e 0d 20 20 20 20 20 |V 256, min. |
000038d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 4f | MO|
000038e0 44 20 32 35 36 29 0d 20 20 20 20 20 20 20 20 20 |D 256). |
000038f0 31 37 33 2d 31 37 34 7d 20 20 66 69 72 73 74 20 |173-174} first |
00003900 73 68 61 72 65 20 6d 61 78 69 6d 75 6d 20 76 61 |share maximum va|
00003910 6c 75 65 20 28 6d 61 78 20 44 49 56 20 32 35 36 |lue (max DIV 256|
00003920 2c 20 6d 61 78 0d 20 20 20 20 20 20 20 20 20 20 |, max. |
00003930 20 20 20 20 20 20 20 20 20 4d 4f 44 20 32 35 36 | MOD 256|
00003940 29 0d 20 20 20 20 20 20 20 20 20 31 37 35 2d 31 |). 175-1|
00003950 37 36 7d 20 20 73 65 63 6f 6e 64 20 73 68 61 72 |76} second shar|
00003960 65 20 6d 69 6e 69 6d 75 6d 20 76 61 6c 75 65 20 |e minimum value |
00003970 28 6d 69 6e 20 44 49 56 20 32 35 36 2c 20 6d 69 |(min DIV 256, mi|
00003980 6e 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |n. |
00003990 20 20 20 20 20 4d 4f 44 20 32 35 36 29 0d 20 20 | MOD 256). |
000039a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 20 | } |
000039b0 20 61 6e 64 20 73 6f 20 6f 6e 20 66 6f 72 20 75 | and so on for u|
000039c0 70 20 74 6f 20 32 30 20 73 68 61 72 65 73 0d 0d |p to 20 shares..|
000039d0 53 45 43 54 49 4f 4e 20 34 20 20 53 48 41 52 45 |SECTION 4 SHARE|
000039e0 20 44 41 54 41 0d 0d 20 20 20 20 20 20 20 20 20 | DATA.. |
000039f0 62 79 74 65 73 20 20 20 20 20 64 65 73 63 72 69 |bytes descri|
00003a00 70 74 69 6f 6e 0d 0d 20 20 20 20 20 20 20 20 20 |ption.. |
00003a10 32 35 31 2d 32 35 32 20 20 20 66 69 72 73 74 20 |251-252 first |
00003a20 73 68 61 72 65 20 70 72 69 63 65 20 66 6f 72 20 |share price for |
00003a30 66 69 72 73 74 20 63 6f 6d 70 61 6e 79 20 28 70 |first company (p|
00003a40 72 69 63 65 0d 20 20 20 20 20 20 20 20 20 20 20 |rice. |
00003a50 20 20 20 20 20 20 20 20 44 49 56 20 31 30 30 2c | DIV 100,|
00003a60 20 70 72 69 63 65 20 4d 4f 44 20 31 30 30 29 0d | price MOD 100).|
00003a70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003a80 20 20 20 0d 20 20 20 20 20 20 20 20 20 32 35 33 | . 253|
00003a90 2d 32 35 34 20 20 20 66 69 72 73 74 20 73 68 61 |-254 first sha|
00003aa0 72 65 20 70 72 69 63 65 20 66 6f 72 20 73 65 63 |re price for sec|
00003ab0 6f 6e 64 20 63 6f 6d 70 61 6e 79 20 28 70 72 69 |ond company (pri|
00003ac0 63 65 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 |ce. |
00003ad0 20 20 20 20 20 20 44 49 56 20 31 30 30 2c 20 70 | DIV 100, p|
00003ae0 72 69 63 65 20 4d 4f 44 20 31 30 30 29 0d 20 20 |rice MOD 100). |
00003af0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003b00 20 0d 20 20 20 20 20 20 20 20 20 61 6e 64 20 73 | . and s|
00003b10 6f 20 6f 6e 20 66 6f 72 20 32 30 20 63 6f 6d 70 |o on for 20 comp|
00003b20 61 6e 69 65 73 2e 20 54 68 69 73 20 73 65 71 75 |anies. This sequ|
00003b30 65 6e 63 65 20 69 73 20 74 68 65 6e 0d 20 20 20 |ence is then. |
00003b40 20 20 20 20 20 20 72 65 70 65 61 74 65 64 20 66 | repeated f|
00003b50 6f 72 20 65 61 63 68 20 64 61 79 20 73 6f 20 74 |or each day so t|
00003b60 68 61 74 20 66 6f 72 20 61 20 6e 6f 72 6d 61 6c |hat for a normal|
00003b70 20 64 61 74 61 20 66 69 6c 65 0d 20 20 20 20 20 | data file. |
00003b80 20 20 20 20 65 61 63 68 20 64 61 79 20 6f 63 63 | each day occ|
00003b90 75 70 69 65 73 20 34 30 20 62 79 74 65 73 2e 20 |upies 40 bytes. |
00003ba0 4e 6f 74 65 20 74 68 61 74 20 69 6e 20 74 68 65 |Note that in the|
00003bb0 20 63 61 73 65 20 6f 66 0d 20 20 20 20 20 20 20 | case of. |
00003bc0 20 20 74 68 65 20 49 4e 44 45 58 20 66 69 6c 65 | the INDEX file|
00003bd0 73 20 65 61 63 68 20 64 61 79 20 6f 63 63 75 70 |s each day occup|
00003be0 69 65 73 20 32 20 62 79 74 65 73 20 6f 6e 6c 79 |ies 2 bytes only|
00003bf0 20 62 75 74 20 69 6e 0d 20 20 20 20 20 20 20 20 | but in. |
00003c00 20 65 76 65 72 79 20 6f 74 68 65 72 20 72 65 73 | every other res|
00003c10 70 65 63 74 20 74 68 65 20 66 69 6c 65 73 20 61 |pect the files a|
00003c20 72 65 20 69 64 65 6e 74 69 63 61 6c 2e 20 0d 0d |re identical. ..|
00003c30 41 50 50 45 4e 44 49 58 20 49 49 0d 0d 53 54 41 |APPENDIX II..STA|
00003c40 52 54 49 4e 47 20 41 20 4e 45 57 20 53 45 54 20 |RTING A NEW SET |
00003c50 4f 46 20 50 4f 52 54 46 4f 4c 49 4f 53 0d 0d 49 |OF PORTFOLIOS..I|
00003c60 66 20 79 6f 75 20 77 69 73 68 20 74 6f 20 73 74 |f you wish to st|
00003c70 61 72 74 20 77 69 74 68 20 61 20 63 6f 6d 70 6c |art with a compl|
00003c80 65 74 65 6c 79 20 6e 65 77 20 73 65 74 20 6f 66 |etely new set of|
00003c90 20 70 6f 72 74 66 6f 6c 69 6f 73 2c 20 70 72 6f | portfolios, pro|
00003ca0 63 65 65 64 0d 61 73 20 66 6f 6c 6c 6f 77 73 3a |ceed.as follows:|
00003cb0 2d 0d 0d 20 31 29 20 44 45 4c 45 54 45 20 41 4c |-.. 1) DELETE AL|
00003cc0 4c 20 44 41 54 41 20 46 49 4c 45 53 2e 0d 20 20 |L DATA FILES.. |
00003cd0 20 20 0d 20 20 20 20 41 73 73 75 6d 69 6e 67 20 | . Assuming |
00003ce0 74 68 65 20 64 61 74 61 20 66 69 6c 65 73 20 61 |the data files a|
00003cf0 72 65 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e |re in the curren|
00003d00 74 20 64 72 69 76 65 2c 20 69 73 73 75 65 20 74 |t drive, issue t|
00003d10 68 65 0d 20 20 20 20 66 6f 6c 6c 6f 77 69 6e 67 |he. following|
00003d20 20 44 46 53 20 63 6f 6d 6d 61 6e 64 73 20 66 72 | DFS commands fr|
00003d30 6f 6d 20 42 41 53 49 43 20 6f 72 20 77 68 61 74 |om BASIC or what|
00003d40 65 76 65 72 2c 0d 20 20 20 20 0d 20 20 20 20 20 |ever,. . |
00003d50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003d60 20 20 20 2a 57 49 50 45 20 31 39 38 37 2a 0d 20 | *WIPE 1987*. |
00003d70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003d80 20 20 20 20 20 20 20 2a 57 49 50 45 20 31 39 38 | *WIPE 198|
00003d90 38 2a 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 |8*. |
00003da0 20 20 20 20 20 20 20 20 20 20 20 2a 44 45 4c 45 | *DELE|
00003db0 54 45 20 59 45 41 52 0d 20 20 20 20 0d 20 20 20 |TE YEAR. . |
00003dc0 20 61 6e 64 20 72 65 70 6c 79 20 74 6f 20 61 6e | and reply to an|
00003dd0 79 20 70 72 6f 6d 70 74 73 2e 0d 0d 20 32 29 20 |y prompts... 2) |
00003de0 41 55 54 4f 2d 42 4f 4f 54 20 54 48 45 20 53 59 |AUTO-BOOT THE SY|
00003df0 53 54 45 4d 20 44 49 53 43 20 49 4e 20 44 52 49 |STEM DISC IN DRI|
00003e00 56 45 20 30 2e 0d 20 20 20 20 0d 20 20 20 20 59 |VE 0.. . Y|
00003e10 6f 75 20 77 69 6c 6c 20 62 65 20 61 73 6b 65 64 |ou will be asked|
00003e20 20 77 68 61 74 20 79 65 61 72 20 74 68 65 20 49 | what year the I|
00003e30 4e 44 45 58 20 61 6e 64 20 50 4f 52 54 46 4f 4c |NDEX and PORTFOL|
00003e40 49 4f 20 66 69 6c 65 73 0d 20 20 20 20 61 72 65 |IO files. are|
00003e50 20 74 6f 20 73 74 61 72 74 2e 20 49 66 20 79 6f | to start. If yo|
00003e60 75 20 64 6f 20 6e 6f 74 20 77 61 6e 74 20 61 20 |u do not want a |
00003e70 70 61 72 74 69 63 75 6c 61 72 20 66 69 6c 65 20 |particular file |
00003e80 74 6f 20 62 65 0d 20 20 20 20 63 72 65 61 74 65 |to be. create|
00003e90 64 20 72 65 70 6c 79 20 62 79 20 65 6e 74 65 72 |d reply by enter|
00003ea0 69 6e 67 20 30 20 28 7a 65 72 6f 29 2c 20 6f 74 |ing 0 (zero), ot|
00003eb0 68 65 72 77 69 73 65 2c 20 65 6e 74 65 72 20 74 |herwise, enter t|
00003ec0 68 65 0d 20 20 20 20 79 65 61 72 2c 20 65 67 2e |he. year, eg.|
00003ed0 20 31 39 38 38 2e 20 54 68 69 73 20 63 72 65 61 | 1988. This crea|
00003ee0 74 65 73 20 74 68 65 20 66 69 6c 65 20 27 59 45 |tes the file 'YE|
00003ef0 41 52 27 20 6f 6e 20 44 52 49 56 45 20 30 2e 0d |AR' on DRIVE 0..|
00003f00 20 20 20 20 0d 20 20 20 20 46 49 4c 45 20 27 59 | . FILE 'Y|
00003f10 45 41 52 27 20 49 53 20 41 4c 57 41 59 53 20 4f |EAR' IS ALWAYS O|
00003f20 4e 20 44 52 49 56 45 20 30 2e 0d 0d 20 33 29 20 |N DRIVE 0... 3) |
00003f30 43 52 45 41 54 45 20 54 48 45 20 44 41 54 41 20 |CREATE THE DATA |
00003f40 46 49 4c 45 53 2e 0d 20 20 20 20 0d 20 20 20 20 |FILES.. . |
00003f50 54 68 65 20 64 61 74 61 20 66 69 6c 65 73 20 77 |The data files w|
00003f60 69 6c 6c 20 6f 6e 6c 79 20 62 65 20 63 72 65 61 |ill only be crea|
00003f70 74 65 64 20 77 68 65 6e 20 79 6f 75 20 74 72 79 |ted when you try|
00003f80 20 74 6f 20 61 63 63 65 73 73 20 61 0d 20 20 20 | to access a. |
00003f90 20 66 69 6c 65 20 77 68 69 63 68 20 64 6f 65 73 | file which does|
00003fa0 20 6e 6f 74 20 65 78 69 73 74 2e 0d 20 20 20 20 | not exist.. |
00003fb0 0d 20 20 20 20 54 68 65 20 62 65 73 74 20 6d 65 |. The best me|
00003fc0 74 68 6f 64 20 69 73 20 74 6f 20 73 65 6c 65 63 |thod is to selec|
00003fd0 74 20 65 61 63 68 20 66 69 6c 65 20 66 72 6f 6d |t each file from|
00003fe0 20 74 68 65 20 4d 41 49 4e 20 70 61 6e 65 6c 0d | the MAIN panel.|
00003ff0 20 20 20 20 61 6e 64 20 74 68 65 6e 20 73 65 6c | and then sel|
00004000 65 63 74 20 27 44 61 74 61 20 65 6e 74 72 79 27 |ect 'Data entry'|
00004010 2e 20 53 65 6c 65 63 74 20 27 44 61 74 61 20 65 |. Select 'Data e|
00004020 6e 74 72 79 2f 62 72 6f 77 73 65 27 0d 20 20 20 |ntry/browse'. |
00004030 20 66 72 6f 6d 20 74 68 65 20 6e 65 78 74 20 70 | from the next p|
00004040 61 6e 65 6c 20 61 6e 64 20 61 6e 73 77 65 72 20 |anel and answer |
00004050 74 68 65 20 71 75 65 73 74 69 6f 6e 73 20 70 72 |the questions pr|
00004060 65 73 65 6e 74 65 64 2e 0d 20 20 20 20 0d 20 20 |esented.. . |
00004070 20 20 49 66 20 61 6c 6c 20 69 73 20 77 65 6c 6c | If all is well|
00004080 20 61 20 62 6c 61 6e 6b 20 66 69 6c 65 20 77 69 | a blank file wi|
00004090 6c 6c 20 62 65 20 63 72 65 61 74 65 64 20 73 74 |ll be created st|
000040a0 61 72 74 69 6e 67 20 61 74 20 74 68 65 0d 20 20 |arting at the. |
000040b0 20 20 73 70 65 63 69 66 69 65 64 20 73 74 61 72 | specified star|
000040c0 74 69 6e 67 20 64 61 74 65 20 61 6e 64 20 65 6e |ting date and en|
000040d0 64 69 6e 67 20 6f 6e 20 74 68 65 20 6c 61 73 74 |ding on the last|
000040e0 20 64 61 79 20 6f 66 20 74 68 65 0d 20 20 20 20 | day of the. |
000040f0 79 65 61 72 20 77 68 69 63 68 20 69 73 20 6e 6f |year which is no|
00004100 74 20 61 20 53 61 74 75 72 64 61 79 20 6f 72 20 |t a Saturday or |
00004110 53 75 6e 64 61 79 2e 0d 20 20 20 20 0d 20 20 20 |Sunday.. . |
00004120 20 52 65 74 75 72 6e 20 74 6f 20 74 68 65 20 6d | Return to the m|
00004130 61 69 6e 20 70 61 6e 65 6c 20 74 6f 20 63 72 65 |ain panel to cre|
00004140 61 74 65 20 74 68 65 20 6e 65 78 74 20 66 69 6c |ate the next fil|
00004150 65 2e 0d 0d 20 34 29 20 45 4e 54 45 52 20 53 48 |e... 4) ENTER SH|
00004160 41 52 45 20 4e 41 4d 45 53 2e 0d 20 20 20 20 0d |ARE NAMES.. .|
00004170 20 20 20 20 4e 65 78 74 20 74 68 65 20 62 6c 61 | Next the bla|
00004180 6e 6b 20 66 69 6c 65 73 20 6d 75 73 74 20 68 61 |nk files must ha|
00004190 76 65 20 73 68 61 72 65 6e 61 6d 65 73 20 69 6e |ve sharenames in|
000041a0 73 65 72 74 65 64 2e 0d 20 20 20 20 0d 20 20 20 |serted.. . |
000041b0 20 54 68 65 20 49 4e 44 45 58 20 66 69 6c 65 20 | The INDEX file |
000041c0 68 61 73 20 69 74 73 20 6e 61 6d 65 20 69 6e 73 |has its name ins|
000041d0 65 72 74 65 64 20 61 75 74 6f 6d 61 74 69 63 61 |erted automatica|
000041e0 6c 6c 79 2e 0d 20 20 20 20 0d 20 20 20 20 46 72 |lly.. . Fr|
000041f0 6f 6d 20 74 68 65 20 4d 41 49 4e 20 70 61 6e 65 |om the MAIN pane|
00004200 6c 2c 20 73 65 6c 65 63 74 20 6f 6e 65 20 6f 66 |l, select one of|
00004210 20 74 68 65 20 50 4f 52 54 46 4f 4c 49 4f 53 20 | the PORTFOLIOS |
00004220 70 72 65 76 69 6f 75 73 6c 79 0d 20 20 20 20 63 |previously. c|
00004230 72 65 61 74 65 64 2e 20 54 68 65 6e 20 73 65 6c |reated. Then sel|
00004240 65 63 74 20 27 44 61 74 61 20 65 6e 74 72 79 27 |ect 'Data entry'|
00004250 2e 0d 20 20 20 20 0d 20 20 20 20 46 72 6f 6d 20 |.. . From |
00004260 74 68 65 20 6e 65 78 74 20 70 61 6e 65 6c 20 73 |the next panel s|
00004270 65 6c 65 63 74 20 27 53 68 61 72 65 20 6e 61 6d |elect 'Share nam|
00004280 65 20 65 6e 74 72 79 2f 65 64 69 74 27 2e 0d 20 |e entry/edit'.. |
00004290 20 20 20 0d 20 20 20 20 45 6e 74 65 72 20 74 68 | . Enter th|
000042a0 65 20 73 68 61 72 65 6e 61 6d 65 73 2e 20 54 68 |e sharenames. Th|
000042b0 65 20 6b 65 79 65 64 20 69 6e 70 75 74 20 69 73 |e keyed input is|
000042c0 20 70 72 69 6e 74 65 64 20 69 6e 20 74 68 65 0d | printed in the.|
000042d0 20 20 20 20 70 61 6e 65 6c 20 61 74 20 74 68 65 | panel at the|
000042e0 20 62 6f 74 74 6f 6d 2e 20 57 68 65 6e 20 61 6c | bottom. When al|
000042f0 6c 20 74 68 65 20 72 65 71 75 69 72 65 64 20 63 |l the required c|
00004300 68 61 72 61 63 74 65 72 73 20 66 6f 72 0d 20 20 |haracters for. |
00004310 20 20 65 61 63 68 20 73 68 61 72 65 20 6e 61 6d | each share nam|
00004320 65 20 68 61 76 65 20 62 65 65 6e 20 65 6e 74 65 |e have been ente|
00004330 72 65 64 2c 20 70 72 65 73 73 20 3c 52 45 54 55 |red, press <RETU|
00004340 52 4e 3e 2e 20 54 68 65 72 65 20 69 73 0d 20 20 |RN>. There is. |
00004350 20 20 6e 6f 20 6e 65 65 64 20 74 6f 20 70 72 65 | no need to pre|
00004360 73 73 20 3c 52 45 54 55 52 4e 3e 20 69 66 20 74 |ss <RETURN> if t|
00004370 68 65 20 65 6e 74 65 72 65 64 20 6e 61 6d 65 20 |he entered name |
00004380 69 73 20 37 0d 20 20 20 20 63 68 61 72 61 63 74 |is 7. charact|
00004390 65 72 73 20 6c 6f 6e 67 2e 20 54 68 65 20 50 41 |ers long. The PA|
000043a0 4e 45 4c 20 63 75 72 73 6f 72 20 77 69 6c 6c 20 |NEL cursor will |
000043b0 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 6d 6f |automatically mo|
000043c0 76 65 0d 20 20 20 20 64 6f 77 6e 20 31 20 72 6f |ve. down 1 ro|
000043d0 77 2c 20 72 65 61 64 79 20 66 6f 72 20 74 68 65 |w, ready for the|
000043e0 20 6e 65 78 74 20 73 68 61 72 65 20 6e 61 6d 65 | next share name|
000043f0 2e 0d 0d 20 20 20 20 57 68 65 6e 20 61 6c 6c 20 |... When all |
00004400 74 68 65 20 73 68 61 72 65 20 6e 61 6d 65 73 20 |the share names |
00004410 68 61 76 65 20 62 65 65 6e 20 65 6e 74 65 72 65 |have been entere|
00004420 64 2c 20 69 74 20 69 73 20 69 6d 70 6f 72 74 61 |d, it is importa|
00004430 6e 74 0d 20 20 20 20 74 6f 20 65 78 69 74 20 74 |nt. to exit t|
00004440 68 65 20 72 6f 75 74 69 6e 65 20 62 79 20 70 6c |he routine by pl|
00004450 61 63 69 6e 67 20 74 68 65 20 63 75 72 73 6f 72 |acing the cursor|
00004460 20 6f 76 65 72 20 74 68 65 20 27 45 6e 64 0d 20 | over the 'End. |
00004470 20 20 20 65 6e 74 72 79 27 20 61 6e 64 20 70 72 | entry' and pr|
00004480 65 73 73 69 6e 67 20 3c 52 45 54 55 52 4e 3e 2e |essing <RETURN>.|
00004490 20 54 68 69 73 20 77 69 6c 6c 20 63 61 75 73 65 | This will cause|
000044a0 20 74 68 65 20 73 68 61 72 65 0d 20 20 20 20 6e | the share. n|
000044b0 61 6d 65 73 20 74 6f 20 62 65 20 77 72 69 74 74 |ames to be writt|
000044c0 65 6e 20 74 6f 20 64 69 73 63 20 61 6e 64 20 74 |en to disc and t|
000044d0 68 65 20 66 69 6c 65 20 63 6c 6f 73 65 64 2e 20 |he file closed. |
000044e0 54 68 65 0d 20 20 20 20 70 72 65 76 69 6f 75 73 |The. previous|
000044f0 20 50 41 4e 45 4c 20 77 69 6c 6c 20 74 68 65 6e | PANEL will then|
00004500 20 61 70 70 65 61 72 2e 0d 20 20 20 20 0d 20 20 | appear.. . |
00004510 20 20 52 65 74 75 72 6e 20 74 6f 20 74 68 65 20 | Return to the |
00004520 4d 41 49 4e 20 70 61 6e 65 6c 20 74 6f 20 72 65 |MAIN panel to re|
00004530 70 65 61 74 20 74 68 65 20 70 72 6f 63 65 73 73 |peat the process|
00004540 20 66 6f 72 20 74 68 65 20 6e 65 78 74 0d 20 20 | for the next. |
00004550 20 20 50 4f 52 54 46 4f 4c 49 4f 2e 0d 0d 41 50 | PORTFOLIO...AP|
00004560 50 45 4e 44 49 58 20 49 49 49 0d 0d 45 52 52 4f |PENDIX III..ERRO|
00004570 52 53 20 49 4e 20 44 4f 57 4e 4c 4f 41 44 49 4e |RS IN DOWNLOADIN|
00004580 47 20 44 41 54 41 20 46 52 4f 4d 20 43 45 45 46 |G DATA FROM CEEF|
00004590 41 58 0d 0d 41 29 20 53 48 41 52 45 20 4e 41 4d |AX..A) SHARE NAM|
000045a0 45 53 20 53 50 45 4c 54 20 49 4e 43 4f 52 52 45 |ES SPELT INCORRE|
000045b0 43 54 4c 59 0d 0d 54 68 65 20 73 68 61 72 65 20 |CTLY..The share |
000045c0 70 72 69 63 65 73 20 61 72 65 20 64 6f 77 6e 6c |prices are downl|
000045d0 6f 61 64 65 64 20 62 79 20 73 63 61 6e 6e 69 6e |oaded by scannin|
000045e0 67 20 74 68 65 20 72 65 6c 65 76 61 6e 74 20 70 |g the relevant p|
000045f0 61 67 65 73 20 6f 66 0d 43 45 45 46 41 58 20 66 |ages of.CEEFAX f|
00004600 6f 72 20 74 68 65 20 72 65 71 75 69 72 65 64 20 |or the required |
00004610 63 6f 6d 70 61 6e 69 65 73 2e 0d 0d 41 73 20 6d |companies...As m|
00004620 65 6e 74 69 6f 6e 65 64 20 65 61 72 6c 69 65 72 |entioned earlier|
00004630 2c 20 69 66 20 74 68 65 20 73 68 61 72 65 6e 61 |, if the sharena|
00004640 6d 65 20 69 73 20 73 70 65 6c 74 20 64 69 66 66 |me is spelt diff|
00004650 65 72 65 6e 74 6c 79 20 74 6f 20 74 68 61 74 0d |erently to that.|
00004660 6f 6e 20 74 68 65 20 43 45 45 46 41 58 20 70 61 |on the CEEFAX pa|
00004670 67 65 73 20 69 74 20 77 69 6c 6c 20 6e 6f 74 20 |ges it will not |
00004680 62 65 20 66 6f 75 6e 64 2e 20 43 68 65 63 6b 20 |be found. Check |
00004690 74 68 65 20 73 70 65 6c 6c 69 6e 67 20 6f 6e 20 |the spelling on |
000046a0 74 68 65 0d 64 69 73 63 20 66 69 6c 65 20 62 79 |the.disc file by|
000046b0 20 75 73 69 6e 67 20 74 68 65 20 45 44 49 54 20 | using the EDIT |
000046c0 6f 70 74 69 6f 6e 2e 0d 0d 49 74 20 68 61 73 20 |option...It has |
000046d0 62 65 65 6e 20 6e 6f 74 69 63 65 64 2c 20 76 65 |been noticed, ve|
000046e0 72 79 20 6f 63 63 61 73 73 69 6f 6e 61 6c 6c 79 |ry occassionally|
000046f0 20 28 74 77 69 63 65 20 69 6e 20 61 62 6f 75 74 | (twice in about|
00004700 20 38 20 6d 6f 6e 74 68 73 29 2c 0d 74 68 61 74 | 8 months),.that|
00004710 20 61 20 63 6f 6d 70 61 6e 79 20 6e 61 6d 65 20 | a company name |
00004720 74 72 61 6e 73 66 65 72 72 65 64 20 66 72 6f 6d |transferred from|
00004730 20 43 45 45 46 41 58 20 69 73 20 73 70 65 6c 74 | CEEFAX is spelt|
00004740 20 64 69 66 66 65 72 65 6e 74 6c 79 20 66 72 6f | differently fro|
00004750 6d 0d 74 68 61 74 20 73 74 6f 72 65 64 20 6f 6e |m.that stored on|
00004760 20 64 69 73 63 2e 0d 0d 54 68 69 73 20 69 73 20 | disc...This is |
00004770 75 73 75 61 6c 6c 79 20 74 65 6d 70 6f 72 61 72 |usually temporar|
00004780 79 20 62 75 74 20 64 6f 65 73 20 6d 65 61 6e 20 |y but does mean |
00004790 74 68 61 74 20 74 68 65 20 73 68 61 72 65 20 70 |that the share p|
000047a0 72 69 63 65 20 69 6e 0d 71 75 65 73 74 69 6f 6e |rice in.question|
000047b0 20 69 73 20 6e 6f 74 20 64 6f 77 6e 6c 6f 61 64 | is not download|
000047c0 65 64 20 74 6f 20 64 69 73 63 2e 0d 0d 54 68 69 |ed to disc...Thi|
000047d0 73 20 6d 61 79 20 62 65 20 64 65 74 65 63 74 65 |s may be detecte|
000047e0 64 20 77 68 69 6c 73 74 20 70 6c 6f 74 74 69 6e |d whilst plottin|
000047f0 67 20 74 68 65 20 64 61 74 61 20 62 79 20 74 68 |g the data by th|
00004800 65 20 66 61 63 74 20 74 68 61 74 20 74 68 65 0d |e fact that the.|
00004810 73 63 61 6c 69 6e 67 20 66 6f 72 20 74 68 65 20 |scaling for the |
00004820 73 68 61 72 65 20 69 73 20 77 72 6f 6e 67 20 69 |share is wrong i|
00004830 65 2e 20 6d 6f 73 74 20 6f 66 20 74 68 65 20 64 |e. most of the d|
00004840 61 74 61 20 77 69 6c 6c 20 70 72 6f 62 61 62 6c |ata will probabl|
00004850 79 20 62 65 0d 63 6f 6d 70 72 65 73 73 65 64 20 |y be.compressed |
00004860 74 6f 20 74 68 65 20 74 6f 70 20 6f 66 20 74 68 |to the top of th|
00004870 65 20 67 72 61 70 68 2e 0d 0d 49 66 20 74 68 69 |e graph...If thi|
00004880 73 20 68 61 70 70 65 6e 73 2c 20 74 68 65 20 65 |s happens, the e|
00004890 61 73 69 65 73 74 20 6d 65 74 68 6f 64 20 6f 66 |asiest method of|
000048a0 20 63 6f 72 72 65 63 74 69 6f 6e 20 69 73 20 74 | correction is t|
000048b0 6f 3a 2d 0d 0d 20 20 20 20 20 20 31 29 20 65 78 |o:-.. 1) ex|
000048c0 69 74 20 74 68 65 20 53 48 41 52 45 20 70 72 6f |it the SHARE pro|
000048d0 67 72 61 6d 73 0d 20 20 20 20 20 20 32 29 20 65 |grams. 2) e|
000048e0 6e 74 65 72 20 54 45 4c 45 54 45 58 54 0d 20 20 |nter TELETEXT. |
000048f0 20 20 20 20 33 29 20 73 65 6c 65 63 74 20 42 42 | 3) select BB|
00004900 43 20 31 2f 70 61 67 65 20 31 33 30 20 61 6e 64 |C 1/page 130 and|
00004910 20 6c 6f 6f 6b 20 66 6f 72 20 74 68 65 20 73 68 | look for the sh|
00004920 61 72 65 20 63 6f 6e 63 65 72 6e 65 64 20 0d 20 |are concerned . |
00004930 20 20 20 20 20 34 29 20 6e 6f 74 65 20 64 6f 77 | 4) note dow|
00004940 6e 20 74 68 65 20 70 72 69 63 65 0d 20 20 20 20 |n the price. |
00004950 20 20 35 29 20 65 78 69 74 20 54 45 4c 45 54 45 | 5) exit TELETE|
00004960 58 54 0d 20 20 20 20 20 20 36 29 20 65 6e 74 65 |XT. 6) ente|
00004970 72 20 74 68 65 20 53 48 41 52 45 20 73 6f 66 74 |r the SHARE soft|
00004980 77 61 72 65 0d 20 20 20 20 20 20 37 29 20 69 6e |ware. 7) in|
00004990 73 65 72 74 20 74 68 65 20 70 72 69 63 65 20 6d |sert the price m|
000049a0 61 6e 75 61 6c 6c 79 20 75 73 69 6e 67 20 74 68 |anually using th|
000049b0 65 20 45 44 49 54 20 6f 70 74 69 6f 6e 0d 20 20 |e EDIT option. |
000049c0 20 20 20 20 38 29 20 75 73 65 20 74 68 65 20 53 | 8) use the S|
000049d0 43 41 4c 45 20 6f 70 74 69 6f 6e 20 6f 6e 20 65 |CALE option on e|
000049e0 78 69 74 69 6e 67 20 74 68 65 20 45 44 49 54 20 |xiting the EDIT |
000049f0 6f 70 74 69 6f 6e 20 74 6f 0d 20 20 20 20 20 20 |option to. |
00004a00 20 20 20 72 65 73 65 74 20 74 68 65 20 73 63 61 | reset the sca|
00004a10 6c 69 6e 67 20 70 61 72 61 6d 65 74 65 72 73 2e |ling parameters.|
00004a20 0d 0d 42 29 20 53 48 41 52 45 20 50 52 49 43 45 |..B) SHARE PRICE|
00004a30 20 49 4e 43 4f 52 52 45 43 54 0d 0d 53 6f 6d 65 | INCORRECT..Some|
00004a40 74 69 6d 65 73 2c 20 74 68 65 20 70 72 69 63 65 |times, the price|
00004a50 20 6d 61 79 20 62 65 20 69 6e 63 6f 72 72 65 63 | may be incorrec|
00004a60 74 2e 20 54 68 69 73 20 63 61 6e 20 62 65 20 64 |t. This can be d|
00004a70 65 74 65 63 74 65 64 20 77 68 69 6c 73 74 0d 70 |etected whilst.p|
00004a80 6c 6f 74 74 69 6e 67 20 62 79 20 6c 61 72 67 65 |lotting by large|
00004a90 20 6a 75 6d 70 73 20 69 6e 20 74 68 65 20 70 72 | jumps in the pr|
00004aa0 69 63 65 2e 0d 0d 49 66 20 74 68 65 20 73 68 61 |ice...If the sha|
00004ab0 72 65 20 68 61 73 20 67 6f 6e 65 20 65 78 2d 73 |re has gone ex-s|
00004ac0 63 72 69 70 2c 20 77 68 69 63 68 20 6d 65 61 6e |crip, which mean|
00004ad0 73 20 74 68 61 74 20 69 74 20 68 61 73 20 62 65 |s that it has be|
00004ae0 65 6e 0d 64 65 2d 76 61 6c 75 65 64 20 62 79 20 |en.de-valued by |
00004af0 66 61 63 74 6f 72 73 20 6f 66 20 31 2f 32 2c 20 |factors of 1/2, |
00004b00 31 2f 33 2c 20 31 2f 34 2c 20 65 74 63 2e 20 69 |1/3, 1/4, etc. i|
00004b10 74 20 77 69 6c 6c 20 62 65 20 61 6e 6e 6f 74 61 |t will be annota|
00004b20 74 65 64 20 74 68 75 73 0d 6f 6e 20 74 68 65 20 |ted thus.on the |
00004b30 43 45 45 46 41 58 20 70 61 67 65 20 61 6e 64 20 |CEEFAX page and |
00004b40 6e 6f 74 68 69 6e 67 20 73 68 6f 75 6c 64 20 62 |nothing should b|
00004b50 65 20 64 6f 6e 65 20 61 62 6f 75 74 20 69 74 2e |e done about it.|
00004b60 0d 0d 49 66 20 74 68 65 20 73 68 61 72 65 20 68 |..If the share h|
00004b70 61 73 20 6e 6f 74 20 67 6f 6e 65 20 65 78 2d 73 |as not gone ex-s|
00004b80 63 72 69 70 20 61 6e 64 20 74 68 65 20 70 72 69 |crip and the pri|
00004b90 63 65 20 73 74 69 6c 6c 20 6c 6f 6f 6b 73 20 77 |ce still looks w|
00004ba0 72 6f 6e 67 2c 0d 63 68 65 63 6b 20 74 68 65 20 |rong,.check the |
00004bb0 43 48 41 4e 47 45 20 77 68 69 63 68 20 69 73 20 |CHANGE which is |
00004bc0 67 69 76 65 6e 20 61 66 74 65 72 20 74 68 65 20 |given after the |
00004bd0 70 72 69 63 65 2e 20 54 68 65 20 63 6f 72 72 65 |price. The corre|
00004be0 63 74 20 70 72 69 63 65 0d 63 61 6e 20 62 65 20 |ct price.can be |
00004bf0 63 61 6c 63 75 6c 61 74 65 64 20 62 79 20 41 44 |calculated by AD|
00004c00 44 49 4e 47 20 74 68 69 73 20 63 68 61 6e 67 65 |DING this change|
00004c10 20 74 6f 20 74 68 65 20 70 72 65 76 69 6f 75 73 | to the previous|
00004c20 20 64 61 79 73 0d 27 63 6c 6f 73 65 2d 6f 66 2d | days.'close-of-|
00004c30 62 75 73 69 6e 65 73 73 27 20 70 72 69 63 65 2e |business' price.|
00004c40 20 4f 6e 20 74 68 65 20 6f 64 64 20 6f 63 63 61 | On the odd occa|
00004c50 73 69 6f 6e 20 74 68 61 74 20 74 68 69 73 20 68 |sion that this h|
00004c60 61 70 70 65 6e 73 0d 74 68 65 72 65 20 69 73 20 |appens.there is |
00004c70 75 73 75 61 6c 6c 79 20 6a 75 73 74 20 6f 6e 65 |usually just one|
00004c80 20 63 68 61 72 61 63 74 65 72 20 77 72 6f 6e 67 | character wrong|
00004c90 2e 0d 0d 4f 6e 63 65 20 74 68 65 20 63 6f 72 72 |...Once the corr|
00004ca0 65 63 74 20 70 72 69 63 65 20 68 61 73 20 62 65 |ect price has be|
00004cb0 65 6e 20 66 6f 75 6e 64 2c 20 75 73 65 20 74 68 |en found, use th|
00004cc0 65 20 6d 65 74 68 6f 64 20 70 72 65 76 69 6f 75 |e method previou|
00004cd0 73 6c 79 0d 64 65 73 63 72 69 62 65 64 20 74 6f |sly.described to|
00004ce0 20 63 6f 72 72 65 63 74 20 69 74 20 6f 6e 20 74 | correct it on t|
00004cf0 68 65 20 64 69 73 63 20 66 69 6c 65 2e 0d 0d 43 |he disc file...C|
00004d00 29 20 53 48 41 52 45 20 4d 49 53 53 49 4e 47 20 |) SHARE MISSING |
00004d10 46 52 4f 4d 20 43 45 45 46 41 58 20 42 52 4f 41 |FROM CEEFAX BROA|
00004d20 44 43 41 53 54 0d 0d 54 68 65 20 6c 69 73 74 20 |DCAST..The list |
00004d30 6f 66 20 73 68 61 72 65 73 20 62 72 6f 61 64 63 |of shares broadc|
00004d40 61 73 74 20 62 79 20 43 45 45 46 41 58 20 75 73 |ast by CEEFAX us|
00004d50 75 61 6c 6c 79 20 73 74 61 79 73 20 63 6f 6e 73 |ually stays cons|
00004d60 74 61 6e 74 2c 20 62 75 74 0d 74 68 65 72 65 20 |tant, but.there |
00004d70 69 73 20 6e 6f 20 67 75 61 72 61 6e 74 65 65 20 |is no guarantee |
00004d80 74 68 61 74 20 74 68 65 20 73 68 61 72 65 73 20 |that the shares |
00004d90 63 68 6f 73 65 6e 20 77 69 6c 6c 20 72 65 6d 61 |chosen will rema|
00004da0 69 6e 20 75 6e 63 68 61 6e 67 65 64 2e 0d 0d 49 |in unchanged...I|
00004db0 66 20 61 20 73 68 61 72 65 20 69 73 20 74 61 6b |f a share is tak|
00004dc0 65 6e 20 6f 66 66 20 74 68 65 20 43 45 45 46 41 |en off the CEEFA|
00004dd0 58 20 62 72 6f 61 64 63 61 73 74 20 74 68 65 72 |X broadcast ther|
00004de0 65 20 69 73 20 6e 6f 74 20 61 20 6c 6f 74 20 79 |e is not a lot y|
00004df0 6f 75 0d 63 61 6e 20 64 6f 20 61 70 61 72 74 20 |ou.can do apart |
00004e00 66 72 6f 6d 20 65 6e 74 65 72 69 6e 67 20 74 68 |from entering th|
00004e10 65 20 70 72 69 63 65 73 20 6d 61 6e 75 61 6c 6c |e prices manuall|
00004e20 79 20 66 72 6f 6d 20 61 6e 6f 74 68 65 72 20 73 |y from another s|
00004e30 6f 75 72 63 65 2c 0d 69 65 2e 20 74 68 65 20 66 |ource,.ie. the f|
00004e40 69 6e 61 6e 63 69 61 6c 20 70 72 65 73 73 2e 0d |inancial press..|
00004e50 0d 41 6c 74 65 72 6e 61 74 69 76 65 6c 79 2c 20 |.Alternatively, |
00004e60 79 6f 75 20 63 6f 75 6c 64 20 63 68 61 6e 67 65 |you could change|
00004e70 20 74 68 65 20 63 6f 6d 70 61 6e 79 20 6e 61 6d | the company nam|
00004e80 65 20 73 75 63 68 20 74 68 61 74 20 70 72 69 63 |e such that pric|
00004e90 65 73 20 66 6f 72 0d 61 20 64 69 66 66 65 72 65 |es for.a differe|
00004ea0 6e 74 20 63 6f 6d 70 61 6e 79 20 77 69 6c 6c 20 |nt company will |
00004eb0 62 65 20 64 6f 77 6e 6c 6f 61 64 65 64 2e 20 49 |be downloaded. I|
00004ec0 6e 20 74 68 69 73 20 63 61 73 65 20 74 68 65 20 |n this case the |
00004ed0 64 61 74 61 0d 64 6f 77 6e 6c 6f 61 64 65 64 20 |data.downloaded |
00004ee0 70 72 65 76 69 6f 75 73 20 74 6f 20 74 68 65 20 |previous to the |
00004ef0 6e 61 6d 65 20 63 68 61 6e 67 65 20 73 68 6f 75 |name change shou|
00004f00 6c 64 20 62 65 20 62 6c 61 6e 6b 65 64 20 75 73 |ld be blanked us|
00004f10 69 6e 67 20 74 68 65 0d 45 44 49 54 20 6f 70 74 |ing the.EDIT opt|
00004f20 69 6f 6e 2c 20 77 68 69 63 68 20 69 73 20 72 61 |ion, which is ra|
00004f30 74 68 65 72 20 74 65 64 69 6f 75 73 2e 0d 0d 41 |ther tedious...A|
00004f40 50 50 45 4e 44 49 58 20 49 56 0d 0d 41 4c 54 45 |PPENDIX IV..ALTE|
00004f50 52 4e 41 54 49 56 45 20 53 43 52 45 45 4e 20 44 |RNATIVE SCREEN D|
00004f60 55 4d 50 20 49 4e 20 50 4c 4f 54 20 4f 50 54 49 |UMP IN PLOT OPTI|
00004f70 4f 4e 0d 0d 49 66 20 79 6f 75 20 77 69 73 68 20 |ON..If you wish |
00004f80 74 6f 20 75 73 65 20 61 20 64 69 66 66 65 72 65 |to use a differe|
00004f90 6e 74 20 73 63 72 65 65 6e 20 64 75 6d 70 20 74 |nt screen dump t|
00004fa0 6f 20 74 68 61 74 20 6f 66 66 65 72 65 64 2c 20 |o that offered, |
00004fb0 4c 4f 41 44 20 74 68 65 0d 70 72 6f 67 72 61 6d |LOAD the.program|
00004fc0 20 22 50 4c 4f 54 22 20 61 6e 64 20 65 6e 74 65 | "PLOT" and ente|
00004fd0 72 20 74 68 65 20 72 65 6c 65 76 61 6e 74 20 63 |r the relevant c|
00004fe0 6f 6d 6d 61 6e 64 20 69 6e 20 50 52 4f 43 65 64 |ommand in PROCed|
00004ff0 75 72 65 20 28 50 52 4f 43 64 75 6d 70 29 0d 69 |ure (PROCdump).i|
00005000 6e 20 70 6c 61 63 65 20 6f 66 20 74 68 61 74 20 |n place of that |
00005010 61 6c 72 65 61 64 79 20 74 68 65 72 65 2e 0d 0d |already there...|
00005020 4e 2e 42 2e 20 44 6f 20 6e 6f 74 20 6d 6f 76 65 |N.B. Do not move|
00005030 20 74 68 69 73 20 70 72 6f 63 65 64 75 72 65 20 | this procedure |
00005040 69 6e 20 70 72 6f 67 72 61 6d 20 50 4c 4f 54 20 |in program PLOT |
00005050 73 69 6e 63 65 20 74 68 65 20 6c 61 73 74 20 64 |since the last d|
00005060 6f 7a 65 6e 0d 6c 69 6e 65 73 20 6f 72 20 73 6f |ozen.lines or so|
00005070 20 61 72 65 20 64 65 6c 65 74 65 64 20 66 72 6f | are deleted fro|
00005080 6d 20 6d 65 6d 6f 72 79 20 64 75 72 69 6e 67 20 |m memory during |
00005090 65 78 65 63 75 74 69 6f 6e 20 6f 66 20 74 68 65 |execution of the|
000050a0 20 70 72 6f 67 72 61 6d 0d 74 6f 20 73 61 76 65 | program.to save|
000050b0 20 6f 6e 20 73 70 61 63 65 2e 0d 0d 53 41 56 45 | on space...SAVE|
000050c0 20 50 4c 4f 54 20 61 6e 64 20 72 65 70 65 61 74 | PLOT and repeat|
000050d0 20 74 68 65 20 70 72 6f 63 65 73 73 20 77 69 74 | the process wit|
000050e0 68 20 74 68 65 20 42 41 53 49 43 20 66 69 6c 65 |h the BASIC file|
000050f0 20 4f 56 45 52 41 4c 4c 2e 0d | OVERALL..|
000050fa 
27-05-88/SHARINF.m0
27-05-88/SHARINF.m1
27-05-88/SHARINF.m2
27-05-88/SHARINF.m4
27-05-88/SHARINF.m5
.