Home » CEEFAX disks » telesoftware12.adl » 17-02-89/T\Astra
17-02-89/T\Astra
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 » telesoftware12.adl |
| Filename: | 17-02-89/T\Astra |
| Read OK: | ✔ |
| File size: | 0FE4 bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- AEW website » bbc_pd » bbc_pd_5_25_discs_d-bbc140_D-BBC140.dsd » T.ASTRA
- CEEFAX disks » telesoftware12.adl » 17-02-89/T\Astra
File contents
Technical info for the Astra satellite
Astra is positioned in a geostationary orbit over longitude 19.2 degrees
East. From London, point your dish 24.2 degrees East, with 28.3 degrees
elevation. (Subtract 6 degrees from azimuth if using a magnetic compass)
Technical details available by phone from Luxembourg: 010-352-717251
Frequencies:
Horizontal Polarisation Vertical Polarisation
Ch.1 11214.25 Mc/s Ch.2 11229.00 Mc/s
Ch.3 11243.75 Mc/s Ch.4 11258.50 Mc/s
Ch.5 11273.25 Mc/s Ch.6 11288.00 Mc/s
Ch.7 11302.75 Mc/s Ch.8 11317.50 Mc/s
Ch.9 11332.25 Mc/s Ch.10 11347.00 Mc/s
Ch.11 11361.75 Mc/s Ch.12 11376.50 Mc/s
Ch.13 11391.25 Mc/s Ch.14 11406.00 Mc/s
Ch.15 11420.25 Mc/s Ch.16 11435.50 Mc/s
Video Deviation ....... 16 Mc/s pk-pk
Pre-emphasis .......... CCIR 405-1
Energy Dispersal ...... 2 Mc/s pk-pk
Channel bandwidth ..... 26 Mc/s
Primary Audio ......... 6.50 Mc/s
Pre-emphasis .......... 50 us
S/C Bandwidth ......... 180 Kc/s
Additional sound channels using the PANDA-1 discrete subcarrier system:
Stereo 1 7.02 Mc/s (L) 7.20 Mc/s (R)
Stereo 2 7.38 Mc/s (L) 7.56 Mc/s (R)
some channels use four separate mono sound signals.
Networks:
Ch.1 ScreenSport T.B.A.
Ch.2 ---
Ch.3 Scansat TV3 On Air Stereo (MAC)
Ch.4 Disney T.B.A.
Ch.5 Lifestyle T.B.A.
Ch.6 ---
Ch.7 Scansat TV4 T.B.A.
* Ch.8 Sky Channel On Air Stereo Teletext/Ind.Data
Ch.9 EuroSport On Air Mono Teletext
Ch.10 ---
Ch.11 Filmnet 24 On Air Mono Teletext (Scrambled)
Ch.12 Sky News On Air Stereo Teletext
Ch.13 Sky Arts T.B.A.
Ch.14 ---
Ch.15 MTV Europe T.B.A.
Ch.16 Sky Movies On Air Stereo Teletext
* Stereo 1 on Sky Channel carries main programme sound,
Stereo 2 has "Sky Radio". (Wegener Comms. 1800 demodulator required)
"T.B.A." := Start date yet to be announced
Data from test captions on Ch.13, Tuesday 7th February 1989
Peter Vince, G8ZZR
This (BBC) BASIC program will determine the direction to point your dish
for any satellite position and receiver latitude.
10 REM > FindSat Find direction of geostationary satellite
20
30 REM (Figures below are for receiving Astra in London)
40 rel_long = -19.3 : REM Longitude of satellite wrt receiver (East = -ve)
50 abs_lat = 51.5 : REM Absolute latitude of receiver (South = -ve)
60 PRINT'"Astra from London:"'
70
80 x = ACS(COS(RAD(abs_lat))*COS(RAD(rel_long)))
90 azim = DEG(ATN(TAN(RAD(rel_long))/SIN(RAD(abs_lat))))
100 elev = DEG(ATN((COS(x)-0.1513)/SIN(x)))
110
120 @% = &2020A : REM Print formatting for two decimal places
130 PRINT TAB(10)"Azimuth = ";ABS(azim);" degrees ";
140 IF SGN(azim) = -1 THEN PRINT"East" ELSE PRINT"West"
150 PRINT TAB(10)"Elevation = ";elev;" degrees"'
160 @% = &A0A : REM Restore print formatting to normal
170
180 PRINT"Don't forget to allow for Magnetic North being about 6 degrees West"
190 PRINT"of true North (in London), so the dish should be pointed 6 degrees"
200 PRINT"west of the indicated figure if using a magnetic compass."'
Typical run:
>RUN
Astra from London:
Azimuth = 24.11 degrees East
Elevation = 28.33 degrees
Don't forget to allow for Magnetic North being about 6 degrees West
of true North (in London), so the dish should be pointed 6 degrees
west of the indicated figure if using a magnetic compass.
>
00000000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000010 20 20 20 20 20 54 65 63 68 6e 69 63 61 6c 20 69 | Technical i| 00000020 6e 66 6f 20 66 6f 72 20 74 68 65 20 41 73 74 72 |nfo for the Astr| 00000030 61 20 73 61 74 65 6c 6c 69 74 65 0d 0a 0d 0a 20 |a satellite.... | 00000040 20 20 41 73 74 72 61 20 69 73 20 70 6f 73 69 74 | Astra is posit| 00000050 69 6f 6e 65 64 20 69 6e 20 61 20 67 65 6f 73 74 |ioned in a geost| 00000060 61 74 69 6f 6e 61 72 79 20 6f 72 62 69 74 20 6f |ationary orbit o| 00000070 76 65 72 20 6c 6f 6e 67 69 74 75 64 65 20 31 39 |ver longitude 19| 00000080 2e 32 20 64 65 67 72 65 65 73 0d 0a 20 20 20 45 |.2 degrees.. E| 00000090 61 73 74 2e 20 20 46 72 6f 6d 20 4c 6f 6e 64 6f |ast. From Londo| 000000a0 6e 2c 20 70 6f 69 6e 74 20 79 6f 75 72 20 64 69 |n, point your di| 000000b0 73 68 20 32 34 2e 32 20 64 65 67 72 65 65 73 20 |sh 24.2 degrees | 000000c0 45 61 73 74 2c 20 77 69 74 68 20 32 38 2e 33 20 |East, with 28.3 | 000000d0 64 65 67 72 65 65 73 0d 0a 20 20 20 65 6c 65 76 |degrees.. elev| 000000e0 61 74 69 6f 6e 2e 20 28 53 75 62 74 72 61 63 74 |ation. (Subtract| 000000f0 20 36 20 64 65 67 72 65 65 73 20 66 72 6f 6d 20 | 6 degrees from | 00000100 61 7a 69 6d 75 74 68 20 69 66 20 75 73 69 6e 67 |azimuth if using| 00000110 20 61 20 6d 61 67 6e 65 74 69 63 20 63 6f 6d 70 | a magnetic comp| 00000120 61 73 73 29 0d 0a 0d 0a 20 20 20 54 65 63 68 6e |ass).... Techn| 00000130 69 63 61 6c 20 64 65 74 61 69 6c 73 20 61 76 61 |ical details ava| 00000140 69 6c 61 62 6c 65 20 62 79 20 70 68 6f 6e 65 20 |ilable by phone | 00000150 66 72 6f 6d 20 4c 75 78 65 6d 62 6f 75 72 67 3a |from Luxembourg:| 00000160 20 30 31 30 2d 33 35 32 2d 37 31 37 32 35 31 0d | 010-352-717251.| 00000170 0a 0d 0a 0d 0a 20 20 20 46 72 65 71 75 65 6e 63 |..... Frequenc| 00000180 69 65 73 3a 0d 0a 0d 0a 20 20 20 20 20 20 20 20 |ies:.... | 00000190 20 20 20 20 20 48 6f 72 69 7a 6f 6e 74 61 6c 20 | Horizontal | 000001a0 50 6f 6c 61 72 69 73 61 74 69 6f 6e 20 20 20 20 |Polarisation | 000001b0 20 20 20 20 20 56 65 72 74 69 63 61 6c 20 50 6f | Vertical Po| 000001c0 6c 61 72 69 73 61 74 69 6f 6e 0d 0a 0d 0a 20 20 |larisation.... | 000001d0 20 20 20 20 20 20 20 20 20 20 20 20 43 68 2e 31 | Ch.1| 000001e0 20 20 20 20 31 31 32 31 34 2e 32 35 20 4d 63 2f | 11214.25 Mc/| 000001f0 73 20 20 20 20 20 20 20 20 20 20 43 68 2e 32 20 |s Ch.2 | 00000200 20 20 20 31 31 32 32 39 2e 30 30 20 4d 63 2f 73 | 11229.00 Mc/s| 00000210 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 00000220 43 68 2e 33 20 20 20 20 31 31 32 34 33 2e 37 35 |Ch.3 11243.75| 00000230 20 4d 63 2f 73 20 20 20 20 20 20 20 20 20 20 43 | Mc/s C| 00000240 68 2e 34 20 20 20 20 31 31 32 35 38 2e 35 30 20 |h.4 11258.50 | 00000250 4d 63 2f 73 0d 0a 20 20 20 20 20 20 20 20 20 20 |Mc/s.. | 00000260 20 20 20 20 43 68 2e 35 20 20 20 20 31 31 32 37 | Ch.5 1127| 00000270 33 2e 32 35 20 4d 63 2f 73 20 20 20 20 20 20 20 |3.25 Mc/s | 00000280 20 20 20 43 68 2e 36 20 20 20 20 31 31 32 38 38 | Ch.6 11288| 00000290 2e 30 30 20 4d 63 2f 73 0d 0a 20 20 20 20 20 20 |.00 Mc/s.. | 000002a0 20 20 20 20 20 20 20 20 43 68 2e 37 20 20 20 20 | Ch.7 | 000002b0 31 31 33 30 32 2e 37 35 20 4d 63 2f 73 20 20 20 |11302.75 Mc/s | 000002c0 20 20 20 20 20 20 20 43 68 2e 38 20 20 20 20 31 | Ch.8 1| 000002d0 31 33 31 37 2e 35 30 20 4d 63 2f 73 0d 0a 20 20 |1317.50 Mc/s.. | 000002e0 20 20 20 20 20 20 20 20 20 20 20 20 43 68 2e 39 | Ch.9| 000002f0 20 20 20 20 31 31 33 33 32 2e 32 35 20 4d 63 2f | 11332.25 Mc/| 00000300 73 20 20 20 20 20 20 20 20 20 20 43 68 2e 31 30 |s Ch.10| 00000310 20 20 20 31 31 33 34 37 2e 30 30 20 4d 63 2f 73 | 11347.00 Mc/s| 00000320 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 00000330 43 68 2e 31 31 20 20 20 31 31 33 36 31 2e 37 35 |Ch.11 11361.75| 00000340 20 4d 63 2f 73 20 20 20 20 20 20 20 20 20 20 43 | Mc/s C| 00000350 68 2e 31 32 20 20 20 31 31 33 37 36 2e 35 30 20 |h.12 11376.50 | 00000360 4d 63 2f 73 0d 0a 20 20 20 20 20 20 20 20 20 20 |Mc/s.. | 00000370 20 20 20 20 43 68 2e 31 33 20 20 20 31 31 33 39 | Ch.13 1139| 00000380 31 2e 32 35 20 4d 63 2f 73 20 20 20 20 20 20 20 |1.25 Mc/s | 00000390 20 20 20 43 68 2e 31 34 20 20 20 31 31 34 30 36 | Ch.14 11406| 000003a0 2e 30 30 20 4d 63 2f 73 0d 0a 20 20 20 20 20 20 |.00 Mc/s.. | 000003b0 20 20 20 20 20 20 20 20 43 68 2e 31 35 20 20 20 | Ch.15 | 000003c0 31 31 34 32 30 2e 32 35 20 4d 63 2f 73 20 20 20 |11420.25 Mc/s | 000003d0 20 20 20 20 20 20 20 43 68 2e 31 36 20 20 20 31 | Ch.16 1| 000003e0 31 34 33 35 2e 35 30 20 4d 63 2f 73 0d 0a 0d 0a |1435.50 Mc/s....| 000003f0 0d 0a 20 20 20 56 69 64 65 6f 20 44 65 76 69 61 |.. Video Devia| 00000400 74 69 6f 6e 20 2e 2e 2e 2e 2e 2e 2e 20 31 36 20 |tion ....... 16 | 00000410 4d 63 2f 73 20 70 6b 2d 70 6b 0d 0a 20 20 20 50 |Mc/s pk-pk.. P| 00000420 72 65 2d 65 6d 70 68 61 73 69 73 20 2e 2e 2e 2e |re-emphasis ....| 00000430 2e 2e 2e 2e 2e 2e 20 43 43 49 52 20 34 30 35 2d |...... CCIR 405-| 00000440 31 0d 0a 20 20 20 45 6e 65 72 67 79 20 44 69 73 |1.. Energy Dis| 00000450 70 65 72 73 61 6c 20 2e 2e 2e 2e 2e 2e 20 32 20 |persal ...... 2 | 00000460 4d 63 2f 73 20 70 6b 2d 70 6b 0d 0a 20 20 20 43 |Mc/s pk-pk.. C| 00000470 68 61 6e 6e 65 6c 20 62 61 6e 64 77 69 64 74 68 |hannel bandwidth| 00000480 20 2e 2e 2e 2e 2e 20 32 36 20 4d 63 2f 73 0d 0a | ..... 26 Mc/s..| 00000490 20 20 20 50 72 69 6d 61 72 79 20 41 75 64 69 6f | Primary Audio| 000004a0 20 2e 2e 2e 2e 2e 2e 2e 2e 2e 20 36 2e 35 30 20 | ......... 6.50 | 000004b0 4d 63 2f 73 0d 0a 20 20 20 50 72 65 2d 65 6d 70 |Mc/s.. Pre-emp| 000004c0 68 61 73 69 73 20 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |hasis ..........| 000004d0 20 35 30 20 75 73 0d 0a 20 20 20 53 2f 43 20 42 | 50 us.. S/C B| 000004e0 61 6e 64 77 69 64 74 68 20 2e 2e 2e 2e 2e 2e 2e |andwidth .......| 000004f0 2e 2e 20 31 38 30 20 4b 63 2f 73 0d 0a 0d 0a 20 |.. 180 Kc/s.... | 00000500 20 20 41 64 64 69 74 69 6f 6e 61 6c 20 73 6f 75 | Additional sou| 00000510 6e 64 20 63 68 61 6e 6e 65 6c 73 20 75 73 69 6e |nd channels usin| 00000520 67 20 74 68 65 20 50 41 4e 44 41 2d 31 20 64 69 |g the PANDA-1 di| 00000530 73 63 72 65 74 65 20 73 75 62 63 61 72 72 69 65 |screte subcarrie| 00000540 72 20 73 79 73 74 65 6d 3a 0d 0a 20 20 20 20 20 |r system:.. | 00000550 20 20 53 74 65 72 65 6f 20 31 20 20 20 37 2e 30 | Stereo 1 7.0| 00000560 32 20 4d 63 2f 73 20 28 4c 29 20 20 20 20 37 2e |2 Mc/s (L) 7.| 00000570 32 30 20 4d 63 2f 73 20 28 52 29 0d 0a 20 20 20 |20 Mc/s (R).. | 00000580 20 20 20 20 53 74 65 72 65 6f 20 32 20 20 20 37 | Stereo 2 7| 00000590 2e 33 38 20 4d 63 2f 73 20 28 4c 29 20 20 20 20 |.38 Mc/s (L) | 000005a0 37 2e 35 36 20 4d 63 2f 73 20 28 52 29 0d 0a 20 |7.56 Mc/s (R).. | 000005b0 20 20 73 6f 6d 65 20 63 68 61 6e 6e 65 6c 73 20 | some channels | 000005c0 75 73 65 20 66 6f 75 72 20 73 65 70 61 72 61 74 |use four separat| 000005d0 65 20 6d 6f 6e 6f 20 73 6f 75 6e 64 20 73 69 67 |e mono sound sig| 000005e0 6e 61 6c 73 2e 0d 0a 0d 0a 0d 0a 20 20 20 4e 65 |nals....... Ne| 000005f0 74 77 6f 72 6b 73 3a 0d 0a 0d 0a 20 20 20 20 20 |tworks:.... | 00000600 20 20 20 20 20 43 68 2e 31 20 20 20 53 63 72 65 | Ch.1 Scre| 00000610 65 6e 53 70 6f 72 74 20 20 20 20 20 20 54 2e 42 |enSport T.B| 00000620 2e 41 2e 0d 0a 20 20 20 20 20 20 20 20 20 20 43 |.A... C| 00000630 68 2e 32 20 20 20 2d 2d 2d 0d 0a 20 20 20 20 20 |h.2 ---.. | 00000640 20 20 20 20 20 43 68 2e 33 20 20 20 53 63 61 6e | Ch.3 Scan| 00000650 73 61 74 20 54 56 33 20 20 20 20 20 20 4f 6e 20 |sat TV3 On | 00000660 41 69 72 20 20 20 20 20 53 74 65 72 65 6f 20 20 |Air Stereo | 00000670 20 20 20 20 20 20 20 20 20 20 20 20 20 28 4d 41 | (MA| 00000680 43 29 0d 0a 20 20 20 20 20 20 20 20 20 20 43 68 |C).. Ch| 00000690 2e 34 20 20 20 44 69 73 6e 65 79 20 20 20 20 20 |.4 Disney | 000006a0 20 20 20 20 20 20 54 2e 42 2e 41 2e 0d 0a 20 20 | T.B.A... | 000006b0 20 20 20 20 20 20 20 20 43 68 2e 35 20 20 20 4c | Ch.5 L| 000006c0 69 66 65 73 74 79 6c 65 20 20 20 20 20 20 20 20 |ifestyle | 000006d0 54 2e 42 2e 41 2e 0d 0a 20 20 20 20 20 20 20 20 |T.B.A... | 000006e0 20 20 43 68 2e 36 20 20 20 2d 2d 2d 0d 0a 20 20 | Ch.6 ---.. | 000006f0 20 20 20 20 20 20 20 20 43 68 2e 37 20 20 20 53 | Ch.7 S| 00000700 63 61 6e 73 61 74 20 54 56 34 20 20 20 20 20 20 |cansat TV4 | 00000710 54 2e 42 2e 41 2e 0d 0a 20 20 20 20 20 20 20 2a |T.B.A... *| 00000720 20 20 43 68 2e 38 20 20 20 53 6b 79 20 43 68 61 | Ch.8 Sky Cha| 00000730 6e 6e 65 6c 20 20 20 20 20 20 4f 6e 20 41 69 72 |nnel On Air| 00000740 20 20 20 20 20 53 74 65 72 65 6f 20 20 20 20 54 | Stereo T| 00000750 65 6c 65 74 65 78 74 2f 49 6e 64 2e 44 61 74 61 |eletext/Ind.Data| 00000760 0d 0a 20 20 20 20 20 20 20 20 20 20 43 68 2e 39 |.. Ch.9| 00000770 20 20 20 45 75 72 6f 53 70 6f 72 74 20 20 20 20 | EuroSport | 00000780 20 20 20 20 4f 6e 20 41 69 72 20 20 20 20 20 4d | On Air M| 00000790 6f 6e 6f 20 20 20 20 20 20 54 65 6c 65 74 65 78 |ono Teletex| 000007a0 74 0d 0a 20 20 20 20 20 20 20 20 20 20 43 68 2e |t.. Ch.| 000007b0 31 30 20 20 2d 2d 2d 0d 0a 20 20 20 20 20 20 20 |10 ---.. | 000007c0 20 20 20 43 68 2e 31 31 20 20 46 69 6c 6d 6e 65 | Ch.11 Filmne| 000007d0 74 20 32 34 20 20 20 20 20 20 20 4f 6e 20 41 69 |t 24 On Ai| 000007e0 72 20 20 20 20 20 4d 6f 6e 6f 20 20 20 20 20 20 |r Mono | 000007f0 54 65 6c 65 74 65 78 74 20 20 20 28 53 63 72 61 |Teletext (Scra| 00000800 6d 62 6c 65 64 29 0d 0a 20 20 20 20 20 20 20 20 |mbled).. | 00000810 20 20 43 68 2e 31 32 20 20 53 6b 79 20 4e 65 77 | Ch.12 Sky New| 00000820 73 20 20 20 20 20 20 20 20 20 4f 6e 20 41 69 72 |s On Air| 00000830 20 20 20 20 20 53 74 65 72 65 6f 20 20 20 20 54 | Stereo T| 00000840 65 6c 65 74 65 78 74 0d 0a 20 20 20 20 20 20 20 |eletext.. | 00000850 20 20 20 43 68 2e 31 33 20 20 53 6b 79 20 41 72 | Ch.13 Sky Ar| 00000860 74 73 20 20 20 20 20 20 20 20 20 54 2e 42 2e 41 |ts T.B.A| 00000870 2e 0d 0a 20 20 20 20 20 20 20 20 20 20 43 68 2e |... Ch.| 00000880 31 34 20 20 2d 2d 2d 0d 0a 20 20 20 20 20 20 20 |14 ---.. | 00000890 20 20 20 43 68 2e 31 35 20 20 4d 54 56 20 45 75 | Ch.15 MTV Eu| 000008a0 72 6f 70 65 20 20 20 20 20 20 20 54 2e 42 2e 41 |rope T.B.A| 000008b0 2e 0d 0a 20 20 20 20 20 20 20 20 20 20 43 68 2e |... Ch.| 000008c0 31 36 20 20 53 6b 79 20 4d 6f 76 69 65 73 20 20 |16 Sky Movies | 000008d0 20 20 20 20 20 4f 6e 20 41 69 72 20 20 20 20 20 | On Air | 000008e0 53 74 65 72 65 6f 20 20 20 20 54 65 6c 65 74 65 |Stereo Telete| 000008f0 78 74 0d 0a 0d 0a 20 20 20 2a 20 53 74 65 72 65 |xt.... * Stere| 00000900 6f 20 31 20 6f 6e 20 53 6b 79 20 43 68 61 6e 6e |o 1 on Sky Chann| 00000910 65 6c 20 63 61 72 72 69 65 73 20 6d 61 69 6e 20 |el carries main | 00000920 70 72 6f 67 72 61 6d 6d 65 20 73 6f 75 6e 64 2c |programme sound,| 00000930 0d 0a 20 20 20 20 20 53 74 65 72 65 6f 20 32 20 |.. Stereo 2 | 00000940 68 61 73 20 22 53 6b 79 20 52 61 64 69 6f 22 2e |has "Sky Radio".| 00000950 20 20 28 57 65 67 65 6e 65 72 20 43 6f 6d 6d 73 | (Wegener Comms| 00000960 2e 20 31 38 30 30 20 64 65 6d 6f 64 75 6c 61 74 |. 1800 demodulat| 00000970 6f 72 20 72 65 71 75 69 72 65 64 29 0d 0a 0d 0a |or required)....| 00000980 20 20 20 20 20 22 54 2e 42 2e 41 2e 22 20 3a 3d | "T.B.A." :=| 00000990 20 53 74 61 72 74 20 64 61 74 65 20 79 65 74 20 | Start date yet | 000009a0 74 6f 20 62 65 20 61 6e 6e 6f 75 6e 63 65 64 0d |to be announced.| 000009b0 0a 0d 0a 0d 0a 20 20 20 44 61 74 61 20 66 72 6f |..... Data fro| 000009c0 6d 20 74 65 73 74 20 63 61 70 74 69 6f 6e 73 20 |m test captions | 000009d0 6f 6e 20 43 68 2e 31 33 2c 20 54 75 65 73 64 61 |on Ch.13, Tuesda| 000009e0 79 20 37 74 68 20 46 65 62 72 75 61 72 79 20 31 |y 7th February 1| 000009f0 39 38 39 0d 0a 20 20 20 50 65 74 65 72 20 56 69 |989.. Peter Vi| 00000a00 6e 63 65 2c 20 47 38 5a 5a 52 0d 0a 0d 0a 0d 0a |nce, G8ZZR......| 00000a10 0d 0a 0d 0a 20 20 20 54 68 69 73 20 28 42 42 43 |.... This (BBC| 00000a20 29 20 42 41 53 49 43 20 70 72 6f 67 72 61 6d 20 |) BASIC program | 00000a30 77 69 6c 6c 20 64 65 74 65 72 6d 69 6e 65 20 74 |will determine t| 00000a40 68 65 20 64 69 72 65 63 74 69 6f 6e 20 74 6f 20 |he direction to | 00000a50 70 6f 69 6e 74 20 79 6f 75 72 20 64 69 73 68 0d |point your dish.| 00000a60 0a 20 20 20 66 6f 72 20 61 6e 79 20 73 61 74 65 |. for any sate| 00000a70 6c 6c 69 74 65 20 70 6f 73 69 74 69 6f 6e 20 61 |llite position a| 00000a80 6e 64 20 72 65 63 65 69 76 65 72 20 6c 61 74 69 |nd receiver lati| 00000a90 74 75 64 65 2e 0d 0a 0d 0a 0d 0a 20 20 31 30 20 |tude....... 10 | 00000aa0 52 45 4d 20 3e 20 46 69 6e 64 53 61 74 20 20 20 |REM > FindSat | 00000ab0 46 69 6e 64 20 64 69 72 65 63 74 69 6f 6e 20 6f |Find direction o| 00000ac0 66 20 67 65 6f 73 74 61 74 69 6f 6e 61 72 79 20 |f geostationary | 00000ad0 73 61 74 65 6c 6c 69 74 65 0d 0a 20 20 32 30 0d |satellite.. 20.| 00000ae0 0a 20 20 33 30 20 52 45 4d 20 28 46 69 67 75 72 |. 30 REM (Figur| 00000af0 65 73 20 62 65 6c 6f 77 20 61 72 65 20 66 6f 72 |es below are for| 00000b00 20 72 65 63 65 69 76 69 6e 67 20 41 73 74 72 61 | receiving Astra| 00000b10 20 69 6e 20 4c 6f 6e 64 6f 6e 29 0d 0a 20 20 34 | in London).. 4| 00000b20 30 20 72 65 6c 5f 6c 6f 6e 67 20 3d 20 2d 31 39 |0 rel_long = -19| 00000b30 2e 33 20 20 3a 20 52 45 4d 20 4c 6f 6e 67 69 74 |.3 : REM Longit| 00000b40 75 64 65 20 6f 66 20 73 61 74 65 6c 6c 69 74 65 |ude of satellite| 00000b50 20 77 72 74 20 72 65 63 65 69 76 65 72 20 28 45 | wrt receiver (E| 00000b60 61 73 74 20 3d 20 2d 76 65 29 0d 0a 20 20 35 30 |ast = -ve).. 50| 00000b70 20 61 62 73 5f 6c 61 74 20 3d 20 35 31 2e 35 20 | abs_lat = 51.5 | 00000b80 20 20 20 3a 20 52 45 4d 20 41 62 73 6f 6c 75 74 | : REM Absolut| 00000b90 65 20 6c 61 74 69 74 75 64 65 20 6f 66 20 72 65 |e latitude of re| 00000ba0 63 65 69 76 65 72 20 28 53 6f 75 74 68 20 3d 20 |ceiver (South = | 00000bb0 2d 76 65 29 0d 0a 20 20 36 30 20 50 52 49 4e 54 |-ve).. 60 PRINT| 00000bc0 27 22 41 73 74 72 61 20 66 72 6f 6d 20 4c 6f 6e |'"Astra from Lon| 00000bd0 64 6f 6e 3a 22 27 0d 0a 20 20 37 30 0d 0a 20 20 |don:"'.. 70.. | 00000be0 38 30 20 78 20 3d 20 41 43 53 28 43 4f 53 28 52 |80 x = ACS(COS(R| 00000bf0 41 44 28 61 62 73 5f 6c 61 74 29 29 2a 43 4f 53 |AD(abs_lat))*COS| 00000c00 28 52 41 44 28 72 65 6c 5f 6c 6f 6e 67 29 29 29 |(RAD(rel_long)))| 00000c10 0d 0a 20 20 39 30 20 61 7a 69 6d 20 3d 20 44 45 |.. 90 azim = DE| 00000c20 47 28 41 54 4e 28 54 41 4e 28 52 41 44 28 72 65 |G(ATN(TAN(RAD(re| 00000c30 6c 5f 6c 6f 6e 67 29 29 2f 53 49 4e 28 52 41 44 |l_long))/SIN(RAD| 00000c40 28 61 62 73 5f 6c 61 74 29 29 29 29 0d 0a 20 31 |(abs_lat)))).. 1| 00000c50 30 30 20 65 6c 65 76 20 3d 20 44 45 47 28 41 54 |00 elev = DEG(AT| 00000c60 4e 28 28 43 4f 53 28 78 29 2d 30 2e 31 35 31 33 |N((COS(x)-0.1513| 00000c70 29 2f 53 49 4e 28 78 29 29 29 0d 0a 20 31 31 30 |)/SIN(x))).. 110| 00000c80 0d 0a 20 31 32 30 20 40 25 20 3d 20 26 32 30 32 |.. 120 @% = &202| 00000c90 30 41 20 3a 20 52 45 4d 20 50 72 69 6e 74 20 66 |0A : REM Print f| 00000ca0 6f 72 6d 61 74 74 69 6e 67 20 66 6f 72 20 74 77 |ormatting for tw| 00000cb0 6f 20 64 65 63 69 6d 61 6c 20 70 6c 61 63 65 73 |o decimal places| 00000cc0 0d 0a 20 31 33 30 20 50 52 49 4e 54 20 54 41 42 |.. 130 PRINT TAB| 00000cd0 28 31 30 29 22 41 7a 69 6d 75 74 68 20 3d 20 22 |(10)"Azimuth = "| 00000ce0 3b 41 42 53 28 61 7a 69 6d 29 3b 22 20 64 65 67 |;ABS(azim);" deg| 00000cf0 72 65 65 73 20 22 3b 0d 0a 20 31 34 30 20 49 46 |rees ";.. 140 IF| 00000d00 20 53 47 4e 28 61 7a 69 6d 29 20 3d 20 2d 31 20 | SGN(azim) = -1 | 00000d10 20 54 48 45 4e 20 50 52 49 4e 54 22 45 61 73 74 | THEN PRINT"East| 00000d20 22 20 45 4c 53 45 20 50 52 49 4e 54 22 57 65 73 |" ELSE PRINT"Wes| 00000d30 74 22 0d 0a 20 31 35 30 20 50 52 49 4e 54 20 54 |t".. 150 PRINT T| 00000d40 41 42 28 31 30 29 22 45 6c 65 76 61 74 69 6f 6e |AB(10)"Elevation| 00000d50 20 3d 20 22 3b 65 6c 65 76 3b 22 20 64 65 67 72 | = ";elev;" degr| 00000d60 65 65 73 22 27 0d 0a 20 31 36 30 20 40 25 20 3d |ees"'.. 160 @% =| 00000d70 20 26 41 30 41 20 20 20 3a 20 52 45 4d 20 52 65 | &A0A : REM Re| 00000d80 73 74 6f 72 65 20 70 72 69 6e 74 20 66 6f 72 6d |store print form| 00000d90 61 74 74 69 6e 67 20 74 6f 20 6e 6f 72 6d 61 6c |atting to normal| 00000da0 0d 0a 20 31 37 30 0d 0a 20 31 38 30 20 50 52 49 |.. 170.. 180 PRI| 00000db0 4e 54 22 44 6f 6e 27 74 20 66 6f 72 67 65 74 20 |NT"Don't forget | 00000dc0 74 6f 20 61 6c 6c 6f 77 20 66 6f 72 20 4d 61 67 |to allow for Mag| 00000dd0 6e 65 74 69 63 20 4e 6f 72 74 68 20 62 65 69 6e |netic North bein| 00000de0 67 20 61 62 6f 75 74 20 36 20 64 65 67 72 65 65 |g about 6 degree| 00000df0 73 20 57 65 73 74 22 0d 0a 20 31 39 30 20 50 52 |s West".. 190 PR| 00000e00 49 4e 54 22 6f 66 20 74 72 75 65 20 4e 6f 72 74 |INT"of true Nort| 00000e10 68 20 28 69 6e 20 4c 6f 6e 64 6f 6e 29 2c 20 73 |h (in London), s| 00000e20 6f 20 74 68 65 20 64 69 73 68 20 73 68 6f 75 6c |o the dish shoul| 00000e30 64 20 62 65 20 70 6f 69 6e 74 65 64 20 36 20 64 |d be pointed 6 d| 00000e40 65 67 72 65 65 73 22 0d 0a 20 32 30 30 20 50 52 |egrees".. 200 PR| 00000e50 49 4e 54 22 77 65 73 74 20 6f 66 20 74 68 65 20 |INT"west of the | 00000e60 69 6e 64 69 63 61 74 65 64 20 66 69 67 75 72 65 |indicated figure| 00000e70 20 69 66 20 75 73 69 6e 67 20 61 20 6d 61 67 6e | if using a magn| 00000e80 65 74 69 63 20 63 6f 6d 70 61 73 73 2e 22 27 0d |etic compass."'.| 00000e90 0a 0d 0a 0d 0a 20 54 79 70 69 63 61 6c 20 72 75 |..... Typical ru| 00000ea0 6e 3a 0d 0a 0d 0a 20 3e 52 55 4e 0d 0a 0d 0a 20 |n:.... >RUN.... | 00000eb0 41 73 74 72 61 20 66 72 6f 6d 20 4c 6f 6e 64 6f |Astra from Londo| 00000ec0 6e 3a 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20 20 |n:.... | 00000ed0 20 41 7a 69 6d 75 74 68 20 3d 20 32 34 2e 31 31 | Azimuth = 24.11| 00000ee0 20 64 65 67 72 65 65 73 20 45 61 73 74 0d 0a 20 | degrees East.. | 00000ef0 20 20 20 20 20 20 20 20 20 20 45 6c 65 76 61 74 | Elevat| 00000f00 69 6f 6e 20 3d 20 32 38 2e 33 33 20 64 65 67 72 |ion = 28.33 degr| 00000f10 65 65 73 0d 0a 0d 0a 20 44 6f 6e 27 74 20 66 6f |ees.... Don't fo| 00000f20 72 67 65 74 20 74 6f 20 61 6c 6c 6f 77 20 66 6f |rget to allow fo| 00000f30 72 20 4d 61 67 6e 65 74 69 63 20 4e 6f 72 74 68 |r Magnetic North| 00000f40 20 62 65 69 6e 67 20 61 62 6f 75 74 20 36 20 64 | being about 6 d| 00000f50 65 67 72 65 65 73 20 57 65 73 74 0d 0a 20 6f 66 |egrees West.. of| 00000f60 20 74 72 75 65 20 4e 6f 72 74 68 20 28 69 6e 20 | true North (in | 00000f70 4c 6f 6e 64 6f 6e 29 2c 20 73 6f 20 74 68 65 20 |London), so the | 00000f80 64 69 73 68 20 73 68 6f 75 6c 64 20 62 65 20 70 |dish should be p| 00000f90 6f 69 6e 74 65 64 20 36 20 64 65 67 72 65 65 73 |ointed 6 degrees| 00000fa0 0d 0a 20 77 65 73 74 20 6f 66 20 74 68 65 20 69 |.. west of the i| 00000fb0 6e 64 69 63 61 74 65 64 20 66 69 67 75 72 65 20 |ndicated figure | 00000fc0 69 66 20 75 73 69 6e 67 20 61 20 6d 61 67 6e 65 |if using a magne| 00000fd0 74 69 63 20 63 6f 6d 70 61 73 73 2e 0d 0a 0d 0a |tic compass.....| 00000fe0 20 3e 0d 0a | >..| 00000fe4
17-02-89/T\Astra.m0
17-02-89/T\Astra.m1
17-02-89/T\Astra.m2
17-02-89/T\Astra.m4
17-02-89/T\Astra.m5
.