WEATHERMAN.40
FILE INFORMATION
FILENAME(S): WEATHERMAN.40
FILE TYPE(S): PRG
FILE SIZE: 5.7K
FIRST SEEN: 2025-12-02 23:47:36
APPEARS ON: 1 disk(s)
FILE HASH
a3a206ff9f838865f1aa3c72c65b6b03141d3b09cdf7772f45fcb15f911682b3
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GEOGRAPHY | WEATHERMAN.40 | PRG | swasti, flohmarkt | 25 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0A 04 01 00 89 39 31 30 00 36 04 02 00 99 |.......910.6....|
00000010: 22 78 A9 1D 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x..........X` .|
00000020: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....|
00000030: 8D 15 03 58 60 20 00 61 04 03 00 99 22 78 A9 47 |...X` .a...."x.G|
00000040: 85 90 A9 04 85 91 58 60 20 EA FF A9 FF 85 9B 4C |......X` ......L|
00000050: 58 E4 78 A9 55 85 90 A9 E4 85 91 58 60 20 20 20 |X.x.U......X` |
00000060: 20 00 80 04 04 00 99 22 78 68 68 68 AA 68 A8 68 | ......"xhhh.h.h|
00000070: 68 68 68 68 68 68 98 48 8A 48 58 60 20 20 20 20 |hhhhhh.H.HX` |
00000080: 00 91 04 05 00 99 22 68 68 68 68 68 68 68 60 20 |......"hhhhhhh` |
00000090: 20 00 B8 04 06 00 99 22 A0 FF C8 84 FB A9 D8 85 | ......"........|
000000A0: FC 20 F1 B7 8A A2 04 A0 FF C8 91 FB 88 D0 FB E6 |. ..............|
000000B0: FC CA D0 F6 60 20 20 20 00 D5 04 07 00 99 22 A2 |....` ......".|
000000C0: 04 A0 FF C8 B1 FB 91 FD 88 D0 F9 E6 FC E6 FE CA |................|
000000D0: D0 F2 60 20 20 00 E6 04 23 00 8B 55 57 B2 30 A7 |..` ...#..UW.0.|
000000E0: 9E 55 55 2C 31 35 00 10 05 28 00 97 55 43 2C 30 |.UU,15...(..UC,0|
000000F0: 3A 97 55 4E 2C 30 3A 55 52 24 B2 22 22 3A 55 49 |:.UN,0:UR$."":UI|
00000100: 24 B2 22 22 3A 8B 55 4C B2 30 A7 55 4C B2 33 39 |$."":.UL.0.UL.39|
00000110: 00 24 05 2D 00 A1 55 49 24 3A 8B 55 49 24 B2 22 |.$.-..UI$:.UI$."|
00000120: 22 A7 34 35 00 59 05 32 00 55 41 B2 C6 28 55 49 |".45.Y.2.UA..(UI|
00000130: 24 29 3A 55 52 B2 C3 28 55 52 24 29 3A 8B 55 41 |$):UR..(UR$):.UA|
00000140: B2 31 33 AF 55 52 B1 30 A7 97 55 43 2C 31 3A 99 |.13.UR.0..UC,1:.|
00000150: 22 20 9D 22 3B 3A 89 37 30 00 8E 05 37 00 8B 55 |" .";:.70...7..U|
00000160: 41 B2 32 30 A7 91 AB 28 55 52 B2 30 29 89 34 35 |A.20...(UR.0).45|
00000170: 3A 55 52 24 B2 C8 28 55 52 24 2C 55 52 AB 31 29 |:UR$..(UR$,UR.1)|
00000180: 3A 99 22 9D 20 20 9D 9D 22 3B 3A 89 34 35 00 9C |:.". ..";:.45..|
00000190: 05 3C 00 8B 55 52 B2 55 4C A7 34 35 00 BA 05 41 |.<..UR.UL.45...A|
000001A0: 00 8D 39 35 3A 55 52 24 B2 55 52 24 AA 55 49 24 |..95:UR$.UR$.UI$|
000001B0: 3A 99 55 49 24 3B 3A 89 34 35 00 D3 05 46 00 8B |:.UI$;:.45...F..|
000001C0: 55 52 24 B2 55 58 24 A7 99 22 9D 20 22 3B 3A 89 |UR$.UX$..". ";:.|
000001D0: 31 34 35 00 F6 05 4B 00 81 55 49 B2 55 52 A4 31 |145...K..UI.UR.1|
000001E0: A9 AB 31 3A 8B CA 28 55 52 24 2C 55 49 2C 31 29 |..1:..(UR$,UI,1)|
000001F0: B2 22 20 22 A7 82 00 0C 06 50 00 55 52 24 B2 C8 |." ".....P.UR$..|
00000200: 28 55 52 24 2C 55 49 29 3A 99 3A 8E 00 1E 06 5F |(UR$,UI):.:...._|
00000210: 00 8B C3 28 55 53 24 29 B2 30 A7 31 31 30 00 4A |...(US$).0.110.J|
00000220: 06 64 00 81 55 49 B2 31 A4 C3 28 55 53 24 29 3A |.d..UI.1..(US$):|
00000230: 8B 55 49 24 B3 B1 CA 28 55 53 24 2C 55 49 2C 31 |.UI$...(US$,UI,1|
00000240: 29 A7 82 3A 55 49 24 B2 22 22 00 50 06 69 00 8E |)..:UI$."".P.i..|
00000250: 00 5D 06 6E 00 8B 55 41 B2 34 36 A7 8E 00 70 06 |.].n..UA.46...p.|
00000260: 73 00 8B 55 41 B2 33 32 AF 55 52 B3 B1 30 A7 8E |s..UA.32.UR..0..|
00000270: 00 83 06 78 00 8B 55 41 B1 34 37 AF 55 41 B3 35 |...x..UA.47.UA.5|
00000280: 38 A7 8E 00 96 06 7D 00 8B 55 41 B1 36 34 AF 55 |8.....}..UA.64.U|
00000290: 41 B3 39 31 A7 8E 00 B2 06 82 00 8B 55 41 B3 31 |A.91........UA.1|
000002A0: 39 33 B0 55 41 B1 32 31 38 A7 55 49 24 B2 22 22 |93.UA.218.UI$.""|
000002B0: 3A 8E 00 CF 06 87 00 8B C2 28 55 54 29 B2 55 55 |:........(UT).UU|
000002C0: 25 A7 55 49 24 B2 C7 28 55 41 AB 31 32 38 29 00 |%.UI$..(UA.128).|
000002D0: D5 06 8C 00 8E 00 04 07 91 00 8D 31 37 30 3A 97 |...........170:.|
000002E0: 32 35 31 2C 30 3A 97 32 35 32 2C 55 53 AD 32 35 |251,0:.252,US.25|
000002F0: 36 3A 97 32 35 33 2C 30 3A 97 32 35 34 2C 55 46 |6:.253,0:.254,UF|
00000300: 3A 9E 55 56 00 1C 07 96 00 55 5A B2 31 3A 55 56 |:.UV.....UZ.1:UV|
00000310: 25 B2 C2 28 55 54 29 3A 89 33 30 30 00 62 07 9B |%..(UT):.300.b..|
00000320: 00 55 5A B2 30 3A 55 53 24 B2 55 4A 24 3A 55 47 |.UZ.0:US$.UJ$:UG|
00000330: 24 B2 55 4B 24 3A 55 54 24 B2 55 4C 24 3A 55 50 |$.UK$:UT$.UL$:UP|
00000340: B2 55 4A 3A 55 4C B2 55 4B 3A 99 22 93 22 3B 3A |.UJ:UL.UK:.".";:|
00000350: 8B 55 57 B2 30 A7 97 55 59 2C 36 3A 97 55 58 2C |.UW.0..UY,6:.UX,|
00000360: 31 34 00 A1 07 A0 00 97 55 54 2C 55 56 25 3A 97 |14......UT,UV%:.|
00000370: 32 35 31 2C 30 3A 97 32 35 32 2C 55 46 3A 97 32 |251,0:.252,UF:.2|
00000380: 35 33 2C 30 3A 97 32 35 34 2C 55 53 AD 32 35 36 |53,0:.254,US.256|
00000390: 3A 9E 55 56 3A 8B 55 57 B2 30 A7 9E 55 55 2C 31 |:.UV:.UW.0..UU,1|
000003A0: 35 00 CB 07 A5 00 97 55 31 2C 55 31 25 3A 97 55 |5......U1,U1%:.U|
000003B0: 32 2C 55 32 25 3A 97 55 33 2C 55 33 25 AB 31 3A |2,U2%:.U3,U3%.1:|
000003C0: 97 55 34 2C 55 34 25 3A 89 33 35 00 F7 07 AA 00 |.U4,U4%:.35.....|
000003D0: 55 31 25 B2 C2 28 55 31 29 3A 55 32 25 B2 C2 28 |U1%..(U1):U2%..(|
000003E0: 55 32 29 3A 55 33 25 B2 C2 28 55 33 29 3A 55 34 |U2):U3%..(U3):U4|
000003F0: 25 B2 C2 28 55 34 29 00 21 08 AF 00 55 4A 24 B2 |%..(U4).!...UJ$.|
00000400: 55 53 24 3A 55 4B 24 B2 55 47 24 3A 55 4C 24 B2 |US$:UK$.UG$:UL$.|
00000410: 55 54 24 3A 55 4A B2 55 50 3A 55 4B B2 55 4C 3A |UT$:UJ.UP:UK.UL:|
00000420: 8E 00 46 08 2C 01 99 22 93 11 22 3A 97 55 54 2C |..F.,.."..":.UT,|
00000430: 55 55 25 3A 8B 55 57 B2 30 A7 97 55 59 2C 31 32 |UU%:.UW.0..UY,12|
00000440: 3A 97 55 58 2C 36 00 66 08 31 01 99 22 20 20 20 |:.UX,6.f.1.." |
00000450: 20 20 20 20 20 20 20 20 20 20 20 20 20 4D 20 45 | M E|
00000460: 20 4E 20 55 11 22 00 92 08 36 01 99 22 20 20 20 | N U."...6.." |
00000470: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00000480: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000490: 2D 22 00 B7 08 3B 01 99 22 11 20 20 20 20 20 20 |-"...;..". |
000004A0: 20 31 2E 20 20 20 42 45 47 49 4E 20 57 45 41 54 | 1. BEGIN WEAT|
000004B0: 48 45 52 4D 41 4E 22 00 E1 08 40 01 99 22 11 11 |HERMAN"...@.."..|
000004C0: 20 20 20 20 20 20 20 32 2E 20 20 20 53 54 55 44 | 2. STUD|
000004D0: 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ENT INSTRUCTIONS|
000004E0: 22 00 0B 09 45 01 99 22 11 11 20 20 20 20 20 20 |"...E..".. |
000004F0: 20 33 2E 20 20 20 54 45 41 43 48 45 52 20 49 4E | 3. TEACHER IN|
00000500: 53 54 52 55 43 54 49 4F 4E 53 22 00 26 09 4A 01 |STRUCTIONS".&.J.|
00000510: 99 22 11 11 20 20 20 20 20 20 20 34 2E 20 20 20 |.".. 4. |
00000520: 51 55 49 54 11 22 00 52 09 4F 01 99 22 20 20 20 |QUIT.".R.O.." |
00000530: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00000540: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000550: 2D 22 00 7D 09 54 01 99 22 11 11 20 20 20 20 20 |-".}.T..".. |
00000560: 20 20 50 52 45 53 53 20 41 20 4E 55 4D 42 45 52 | PRESS A NUMBER|
00000570: 20 4B 45 59 20 28 31 2D 34 29 20 22 3B 00 91 09 | KEY (1-4) ";...|
00000580: 59 01 55 4C B2 31 3A 55 53 24 B2 22 31 32 33 34 |Y.UL.1:US$."1234|
00000590: 22 00 A0 09 5B 01 8D 33 35 3A 55 53 24 B2 22 22 |"...[..35:US$.""|
000005A0: 00 BD 09 5E 01 91 C5 28 55 52 24 29 8D 31 30 30 |...^...(UR$).100|
000005B0: 30 2C 34 30 30 2C 35 30 30 2C 33 39 30 00 C6 09 |0,400,500,390...|
000005C0: 63 01 89 33 30 30 00 DA 09 72 01 8B 55 5A B2 31 |c..300...r..UZ.1|
000005D0: A7 9E 55 50 25 3A 89 31 35 35 00 E0 09 77 01 8E |..UP%:.155...w..|
000005E0: 00 08 0A 86 01 9E 55 45 3A 99 22 9A 93 22 3A 8B |......UE:."..":.|
000005F0: 55 57 B2 30 A7 97 55 59 2C 36 3A 97 55 58 2C 31 |UW.0..UY,6:.UX,1|
00000600: 34 3A 9E 55 55 2C 31 34 00 10 0A 8B 01 9C 3A 80 |4:.UU,14......:.|
00000610: 00 35 0A 90 01 99 22 93 22 3A 97 55 54 2C 55 4C |.5....".":.UT,UL|
00000620: 25 3A 8B 55 57 B2 30 A7 97 55 59 2C 31 31 3A 97 |%:.UW.0..UY,11:.|
00000630: 55 58 2C 31 32 00 6D 0A 95 01 55 54 24 B2 22 20 |UX,12.m...UT$." |
00000640: D7 45 41 54 48 45 52 4D 41 4E 22 3A 55 48 B2 31 |.EATHERMAN":UH.1|
00000650: 3A 55 50 B2 30 3A 55 47 24 B2 22 D3 54 55 44 45 |:UP.0:UG$.".TUDE|
00000660: 4E 54 20 C9 4E 53 54 22 3A 8D 38 35 30 00 99 0A |NT .NST":.850...|
00000670: 9A 01 99 22 11 11 20 D4 48 49 53 20 50 52 4F 47 |...".. .HIS PROG|
00000680: 52 41 4D 20 50 45 52 46 4F 52 4D 53 20 46 4F 55 |RAM PERFORMS FOU|
00000690: 52 20 4D 41 4A 4F 52 20 22 00 C4 0A 9C 01 99 22 |R MAJOR "......"|
000006A0: 11 20 46 55 4E 43 54 49 4F 4E 53 2E 20 20 C9 54 |. FUNCTIONS. .T|
000006B0: 20 43 41 4E 20 50 52 4F 56 49 44 45 20 53 49 4D | CAN PROVIDE SIM|
000006C0: 50 4C 45 22 00 EF 0A 9E 01 99 22 11 20 54 45 4D |PLE"......". TEM|
000006D0: 50 45 52 41 54 55 52 45 20 43 4F 4E 56 45 52 53 |PERATURE CONVERS|
000006E0: 49 4F 4E 53 2E 20 D9 4F 55 20 4A 55 53 54 22 00 |IONS. .OU JUST".|
000006F0: 18 0B A0 01 99 22 11 20 45 4E 54 45 52 20 56 41 |.....". ENTER VA|
00000700: 4C 55 45 53 20 49 4E 20 44 45 47 52 45 45 53 20 |LUES IN DEGREES |
00000710: C3 45 4C 53 49 55 53 2C 00 44 0B A2 01 99 22 11 |.ELSIUS,.D....".|
00000720: 20 C6 41 52 45 4E 48 45 49 54 2C 20 CB 45 4C 56 | .ARENHEIT, .ELV|
00000730: 49 4E 2C 20 4F 52 20 D2 41 4E 4B 49 4E 45 2C 20 |IN, OR .ANKINE, |
00000740: 41 4E 44 22 00 74 0B A3 01 99 22 11 20 54 48 45 |AND".t....". THE|
00000750: 20 43 4F 4D 50 55 54 45 52 20 57 49 4C 4C 20 50 | COMPUTER WILL P|
00000760: 52 49 4E 54 20 54 48 45 20 45 51 55 49 56 41 4C |RINT THE EQUIVAL|
00000770: 45 4E 54 22 00 99 0B A4 01 99 22 11 20 56 41 4C |ENT"......". VAL|
00000780: 55 45 53 20 49 4E 20 54 48 45 20 4F 54 48 45 52 |UES IN THE OTHER|
00000790: 20 53 43 41 4C 45 53 2E 22 00 AC 0B A5 01 8D 38 | SCALES."......8|
000007A0: 33 35 3A 55 48 B2 31 3A 8D 38 35 30 00 DC 0B A6 |35:UH.1:.850....|
000007B0: 01 99 22 11 11 20 C9 54 20 43 41 4E 20 41 4C 53 |..".. .T CAN ALS|
000007C0: 4F 20 43 41 4C 43 55 4C 41 54 45 20 54 48 45 20 |O CALCULATE THE |
000007D0: D4 45 4D 50 45 52 41 54 55 52 45 22 00 0B 0C A8 |.EMPERATURE"....|
000007E0: 01 99 22 11 20 C8 55 4D 49 44 49 54 59 20 C9 4E |..". .UMIDITY .N|
000007F0: 44 45 58 2E 20 D9 4F 55 20 57 49 4C 4C 20 42 45 |DEX. .OU WILL BE|
00000800: 20 52 45 51 55 45 53 54 45 44 22 00 36 0C AA 01 | REQUESTED".6...|
00000810: 99 22 11 20 54 4F 20 53 55 50 50 4C 59 20 54 48 |.". TO SUPPLY TH|
00000820: 45 20 54 45 4D 50 45 52 41 54 55 52 45 53 20 4F |E TEMPERATURES O|
00000830: 46 20 54 48 45 22 00 5F 0C AC 01 99 22 11 20 44 |F THE"._....". D|
00000840: 52 59 20 41 4E 44 20 57 45 54 20 42 55 4C 42 53 |RY AND WET BULBS|
00000850: 2E 20 D4 48 45 20 44 52 59 20 42 55 4C 42 22 00 |. .HE DRY BULB".|
00000860: A7 0C AD 01 99 22 11 20 54 45 4D 50 45 52 41 54 |.....". TEMPERAT|
00000870: 55 52 45 20 4D 55 53 54 20 42 45 20 48 49 47 48 |URE MUST BE HIGH|
00000880: 45 52 20 54 48 41 4E 20 54 48 45 22 3A 99 22 11 |ER THAN THE":.".|
00000890: 20 57 45 54 20 42 55 4C 42 20 54 45 4D 50 45 52 | WET BULB TEMPER|
000008A0: 41 54 55 52 45 2E 22 00 BA 0C AE 01 8D 38 33 35 |ATURE."......835|
000008B0: 3A 55 48 B2 31 3A 8D 38 35 30 00 E7 0C AF 01 99 |:UH.1:.850......|
000008C0: 22 11 11 20 C9 54 53 20 54 48 49 52 44 20 46 55 |".. .TS THIRD FU|
000008D0: 4E 43 54 49 4F 4E 20 49 53 20 54 4F 20 43 41 4C |NCTION IS TO CAL|
000008E0: 43 55 4C 41 54 45 22 00 17 0D B0 01 99 22 11 20 |CULATE"......". |
000008F0: 54 48 45 20 57 49 4E 44 20 43 48 49 4C 4C 20 45 |THE WIND CHILL E|
00000900: 51 55 49 56 41 4C 45 4E 54 20 54 45 4D 50 45 52 |QUIVALENT TEMPER|
00000910: 41 54 55 52 45 2E 22 00 44 0D B2 01 99 22 11 20 |ATURE.".D....". |
00000920: D4 48 45 20 41 54 4D 4F 53 50 48 45 52 49 43 20 |.HE ATMOSPHERIC |
00000930: 54 45 4D 50 45 52 41 54 55 52 45 20 41 4E 44 20 |TEMPERATURE AND |
00000940: 54 48 45 22 00 70 0D B4 01 99 22 11 20 57 49 4E |THE".p....". WIN|
00000950: 44 20 56 45 4C 4F 43 49 54 59 20 41 52 45 20 54 |D VELOCITY ARE T|
00000960: 48 45 20 54 57 4F 20 52 45 51 55 49 52 45 44 22 |HE TWO REQUIRED"|
00000970: 00 8E 0D B6 01 99 22 11 20 49 4E 50 55 54 53 20 |......". INPUTS |
00000980: 54 48 49 53 20 53 45 43 54 49 4F 4E 2E 22 00 A1 |THIS SECTION."..|
00000990: 0D B8 01 8D 38 33 35 3A 55 48 B2 31 3A 8D 38 35 |....835:UH.1:.85|
000009A0: 30 00 CC 0D BA 01 99 22 11 11 20 CC 41 53 54 4C |0......".. .ASTL|
000009B0: 59 2C 20 49 54 20 43 41 4E 20 47 49 56 45 20 54 |Y, IT CAN GIVE T|
000009C0: 48 45 20 52 45 4C 41 54 49 56 45 22 00 FC 0D BC |HE RELATIVE"....|
000009D0: 01 99 22 11 20 48 55 4D 49 44 49 54 59 20 41 4E |..". HUMIDITY AN|
000009E0: 44 20 44 45 57 20 50 4F 49 4E 54 20 41 54 20 41 |D DEW POINT AT A|
000009F0: 4E 59 20 54 45 4D 50 45 52 41 2D 22 00 2B 0E BE |NY TEMPERA-".+..|
00000A00: 01 99 22 11 20 54 55 52 45 2E 20 C1 47 41 49 4E |..". TURE. .GAIN|
00000A10: 2C 20 59 4F 55 20 41 52 45 20 50 52 4F 4D 50 54 |, YOU ARE PROMPT|
00000A20: 45 44 20 54 4F 20 47 49 56 45 22 00 58 0E C0 01 |ED TO GIVE".X...|
00000A30: 99 22 11 20 54 48 45 20 54 45 4D 50 45 52 41 54 |.". THE TEMPERAT|
00000A40: 55 52 45 53 20 4F 46 20 54 48 45 20 44 52 59 20 |URES OF THE DRY |
00000A50: 41 4E 44 20 57 45 54 22 00 68 0E C2 01 99 22 11 |AND WET".h....".|
00000A60: 20 42 55 4C 42 53 2E 22 00 71 0E E5 01 8D 38 33 | BULBS.".q....83|
00000A70: 35 00 85 0E EA 01 8B 55 5A B2 31 A7 9E 55 50 25 |5......UZ.1..UP%|
00000A80: 3A 89 31 35 35 00 8B 0E EF 01 8E 00 AF 0E F4 01 |:.155...........|
00000A90: 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B 55 57 |.".":.UT,UL%:.UW|
00000AA0: B2 30 A7 97 55 59 2C 32 3A 97 55 58 2C 31 30 00 |.0..UY,2:.UX,10.|
00000AB0: E7 0E F5 01 55 54 24 B2 22 20 D7 45 41 54 48 45 |....UT$." .EATHE|
00000AC0: 52 4D 41 4E 22 3A 55 48 B2 31 3A 55 50 B2 30 3A |RMAN":UH.1:UP.0:|
00000AD0: 55 47 24 B2 22 D4 45 41 43 48 45 52 20 C9 4E 53 |UG$.".EACHER .NS|
00000AE0: 54 22 3A 8D 38 35 30 00 14 0F F6 01 99 22 11 11 |T":.850......"..|
00000AF0: 20 20 20 20 20 D4 4F 20 54 48 45 20 42 45 53 54 | .O THE BEST|
00000B00: 20 4F 46 20 4F 55 52 20 4B 4E 4F 57 4C 45 44 47 | OF OUR KNOWLEDG|
00000B10: 45 2C 11 22 00 3F 0F F7 01 99 22 20 20 20 20 20 |E,.".?...." |
00000B20: 54 48 49 53 20 50 52 4F 47 52 41 4D 20 49 53 20 |THIS PROGRAM IS |
00000B30: 49 4E 20 54 48 45 20 50 55 42 4C 49 43 11 22 00 |IN THE PUBLIC.".|
00000B40: 6A 0F F8 00 8A FF FF FF FF FF FF FF FF FF FF FF |j...............|
00000B50: FF FF 2F FF FF FF FF FF FF FF FF FF FF FF FF FF |../.............|
00000B60: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00000B70: FF FF 20 20 00 28 FF FF FF FF FF FF FF FF FF FF |.. .(..........|
00000B80: FF FF FF FF FF FF FF FF FF 74 AF FF 22 24 F8 FF |.........t.."$..|
00000B90: FF FF FF FF FF FF 6A 6E 6E 6A 67 FF E9 FF FF FF |......jnnjg.....|
00000BA0: 47 E9 FF FF FF E9 E9 FF FF 6F 69 FF FF FF FF E9 |G........oi.....|
00000BB0: 98 FF 47 F0 AD FF FF 98 FF FF FF FF FF FF FF FF |..G.............|
00000BC0: FF FF FF 99 99 9B 9F FF 4F FF FF 79 FF FF 78 FF |........O..y..x.|
00000BD0: FF FF 7B FF 95 FF 0D FF A6 FF FF 98 FF FF FF FF |..{.............|
00000BE0: FF FF FF FF FF FF FF 6F 47 49 4E 43 4F 55 52 54 |.......oGINCOURT|
00000BF0: 2C 20 CF 4E 54 41 52 49 4F 22 00 1C 10 FD 01 99 |, .NTARIO"......|
00000C00: 22 20 20 20 20 20 20 20 20 20 20 11 C3 41 4E 41 |" ..ANA|
00000C10: 44 41 2C 20 CD 31 D7 20 32 CB 34 22 00 3D 10 FE |DA, .1. 2.4".=..|
00000C20: 01 99 22 20 20 20 20 20 20 20 20 20 20 11 28 34 |.." .(4|
00000C30: 31 36 29 20 34 39 39 2D 34 32 39 32 22 00 50 10 |16) 499-4292".P.|
00000C40: FF 01 55 48 B2 31 3A 8D 38 33 35 3A 8D 38 35 30 |..UH.1:.835:.850|
00000C50: 00 77 10 00 02 99 22 20 20 20 20 20 20 11 11 D0 |.w...." ...|
00000C60: 52 4F 47 52 41 4D 20 CE 41 4D 45 3A 20 D7 45 41 |ROGRAM .AME: .EA|
00000C70: 54 48 45 52 4D 41 4E 00 A1 10 01 02 99 22 20 20 |THERMAN......" |
00000C80: 20 20 20 20 11 D7 52 49 54 54 45 4E 20 42 59 20 | ..RITTEN BY |
00000C90: 20 3A 20 C7 4C 45 4E 4E 20 D0 52 45 53 43 4F 54 | : .LENN .RESCOT|
00000CA0: 54 00 C9 10 02 02 99 22 20 20 20 20 20 20 11 D2 |T......" ..|
00000CB0: 45 56 49 53 45 44 20 42 59 20 20 3A 20 D4 4F 42 |EVISED BY : .OB|
00000CC0: 59 20 D7 41 4C 4B 45 52 22 00 F6 10 03 02 99 22 |Y .ALKER"......"|
00000CD0: 20 20 20 20 20 20 11 11 D4 48 49 53 20 50 52 4F | ...HIS PRO|
00000CE0: 47 52 41 4D 20 57 49 4C 4C 20 52 55 4E 20 4F 4E |GRAM WILL RUN ON|
00000CF0: 20 41 4E 59 11 11 00 1D 11 04 02 99 22 20 20 20 | ANY........" |
00000D00: 20 20 20 20 20 20 C2 C1 D3 C9 C3 A0 32 2E 30 20 | ......2.0 |
00000D10: D0 C5 D4 20 C3 4F 4D 50 55 54 45 52 11 00 44 11 |... .OMPUTER..D.|
00000D20: 05 02 99 22 20 20 20 20 20 20 20 20 20 C2 C1 D3 |..." ...|
00000D30: C9 C3 20 34 2E 30 20 D0 C5 D4 A0 C3 4F 4D 50 55 |.. 4.0 .....OMPU|
00000D40: 54 45 52 11 00 66 11 06 02 99 22 20 20 20 20 20 |TER..f...." |
00000D50: 20 20 20 20 38 30 33 32 20 C3 C2 CD 20 C3 4F 4D | 8032 ... .OM|
00000D60: 50 55 54 45 52 11 00 8B 11 07 02 99 22 20 20 20 |PUTER......." |
00000D70: 20 20 20 20 20 20 C3 4F 4D 4D 4F 44 4F 52 45 20 | .OMMODORE |
00000D80: 36 34 20 C3 4F 4D 50 55 54 45 52 00 9E 11 08 02 |64 .OMPUTER.....|
00000D90: 8D 38 33 35 3A 55 48 B2 31 3A 8D 38 35 30 00 C6 |.835:UH.1:.850..|
00000DA0: 11 0D 02 99 22 11 11 20 CC 49 4D 49 54 53 20 48 |....".. .IMITS H|
00000DB0: 41 56 45 20 42 45 45 4E 20 53 45 54 20 46 4F 52 |AVE BEEN SET FOR|
00000DC0: 20 53 4F 4D 45 22 00 F2 11 0F 02 99 22 11 20 49 | SOME"......". I|
00000DD0: 4E 50 55 54 53 20 54 4F 20 45 4E 53 55 52 45 20 |NPUTS TO ENSURE |
00000DE0: 41 43 43 55 52 41 54 45 20 52 45 53 55 4C 54 53 |ACCURATE RESULTS|
00000DF0: 2E 22 00 1B 12 11 02 99 22 11 20 C9 46 20 59 4F |."......". .F YO|
00000E00: 55 20 57 4F 55 4C 44 20 4C 49 4B 45 20 54 4F 20 |U WOULD LIKE TO |
00000E10: 43 48 41 4E 47 45 20 54 48 45 22 00 49 12 13 02 |CHANGE THE".I...|
00000E20: 99 22 11 20 4D 41 58 49 4D 55 4D 20 4E 55 4D 42 |.". MAXIMUM NUMB|
00000E30: 45 52 20 4F 46 20 43 48 41 52 41 43 54 45 52 53 |ER OF CHARACTERS|
00000E40: 20 41 4C 4C 4F 57 45 44 22 00 74 12 15 02 99 22 | ALLOWED".t...."|
00000E50: 11 20 46 4F 52 20 4D 4F 53 54 20 4F 46 20 54 48 |. FOR MOST OF TH|
00000E60: 45 20 49 4E 50 55 54 53 2C 20 41 4C 54 45 52 20 |E INPUTS, ALTER |
00000E70: 54 48 45 22 00 9D 12 19 02 99 22 11 20 56 41 4C |THE"......". VAL|
00000E80: 55 45 20 4F 46 20 27 55 4C 27 20 49 4E 20 4C 49 |UE OF 'UL' IN LI|
00000E90: 4E 45 20 33 30 30 30 2E 20 D4 48 45 22 00 BC 12 |NE 3000. .HE"...|
00000EA0: 1B 02 99 22 11 20 43 55 52 52 45 4E 54 20 56 41 |...". CURRENT VA|
00000EB0: 4C 55 45 20 49 53 20 53 49 58 2E 22 00 C5 12 49 |LUE IS SIX."...I|
00000EC0: 02 8D 38 33 35 00 D9 12 4E 02 8B 55 5A B2 31 A7 |..835...N..UZ.1.|
00000ED0: 9E 55 50 25 3A 89 31 35 35 00 DF 12 53 02 8E 00 |.UP%:.155...S...|
00000EE0: 13 13 BC 02 99 55 43 24 22 93 11 11 11 42 45 46 |.....UC$"....BEF|
00000EF0: 4F 52 45 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 |ORE RUNNING THIS|
00000F00: 20 50 52 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 38 | PROGRAM ON AN 8|
00000F10: 30 33 32 00 4B 13 C1 02 99 22 20 20 20 20 20 20 |032.K...." |
00000F20: 4C 4F 41 44 20 54 48 45 20 27 43 42 4D 20 34 30 |LOAD THE 'CBM 40|
00000F30: 33 32 27 20 50 52 4F 47 52 41 4D 11 11 11 11 11 |32' PROGRAM.....|
00000F40: 11 11 11 11 11 11 11 11 22 3A 80 00 73 13 20 03 |........":..s. .|
00000F50: 99 22 93 11 1D 1F 22 3B 3A 97 55 54 2C 55 55 25 |."....";:.UT,UU%|
00000F60: 3A 8B 55 57 B2 30 A7 97 55 59 2C 31 3A 97 55 58 |:.UW.0..UY,1:.UX|
00000F70: 2C 31 34 00 89 13 21 03 81 49 B2 31 A4 33 38 3A |,14...!..I.1.38:|
00000F80: 99 22 12 20 92 22 3B 3A 82 00 A1 13 22 03 81 49 |.". .";:...."..I|
00000F90: B2 31 A4 32 32 3A 99 22 11 9D 12 20 92 22 3B 3A |.1.22:."... .";:|
00000FA0: 82 00 B9 13 23 03 81 49 B2 31 A4 33 37 3A 99 22 |....#..I.1.37:."|
00000FB0: 9D 9D 12 20 92 22 3B 3A 82 00 D1 13 24 03 81 49 |... .";:....$..I|
00000FC0: B2 31 A4 32 32 3A 99 22 91 9D 12 20 92 22 3B 3A |.1.22:."... .";:|
00000FD0: 82 00 F1 13 25 03 99 22 13 11 11 11 11 11 11 11 |....%.."........|
00000FE0: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1F 12 A9 20 20 |.............. |
00000FF0: 92 00 0B 14 26 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D |....&.."........|
00001000: 1D 1D 12 20 92 20 20 12 20 92 A9 00 37 14 27 03 |... . . ...7.'.|
00001010: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 |."........... . |
00001020: 20 1C 12 A3 DF 1F 92 20 4F 20 4D 20 4D 20 4F 20 | ...... O M M O |
00001030: 44 20 4F 20 52 20 45 00 4D 14 28 03 99 22 1D 1D |D O R E.M.(.."..|
00001040: 1D 1D 1D 1D 1D 1D 1D 1D DF 12 20 20 92 00 73 14 |.......... ..s.|
00001050: 29 03 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |).."............|
00001060: 1D 1D 1D 1D 1D 1D 1C 45 44 55 43 41 54 49 4F 4E |.......EDUCATION|
00001070: 41 4C 11 00 93 14 2A 03 99 22 1D 1D 1D 1D 1D 1D |AL....*.."......|
00001080: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1F 53 4F 46 54 57 |...........SOFTW|
00001090: 41 52 45 00 B1 14 2B 03 99 22 11 1D 1D 1D 1D 1D |ARE...+.."......|
000010A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1C 31 39 38 33 |............1983|
000010B0: 1F 00 ED 14 2C 03 99 C8 28 55 44 24 2C 32 34 29 |....,...(UD$,24)|
000010C0: 3B 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 |;"..........PRES|
000010D0: 53 20 53 50 41 43 45 20 42 41 52 20 4F 52 20 57 |S SPACE BAR OR W|
000010E0: 41 49 54 92 22 55 43 24 3A 55 49 B2 30 00 14 15 |AIT."UC$:UI.0...|
000010F0: 2D 03 A1 55 49 24 3A 8B 55 49 24 B3 B1 22 20 22 |-..UI$:.UI$.." "|
00001100: A7 55 49 B2 55 49 AA 31 3A 8B 55 49 B3 32 35 30 |.UI.UI.1:.UI.250|
00001110: A7 38 31 33 00 1D 15 2E 03 89 33 30 30 00 58 15 |.813......300.X.|
00001120: 43 03 97 55 4E 2C 30 3A 99 C8 28 55 44 24 2C 32 |C..UN,0:..(UD$,2|
00001130: 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 |4);".......PRESS|
00001140: 20 53 50 41 43 45 20 42 41 52 20 54 4F 20 43 4F | SPACE BAR TO CO|
00001150: 4E 54 49 4E 55 45 92 22 00 6F 15 48 03 A1 55 49 |NTINUE.".o.H..UI|
00001160: 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 38 34 30 00 |$:.UI$.." ".840.|
00001170: 75 15 4D 03 8E 00 A7 15 52 03 55 50 B2 55 50 AA |u.M.....R.UP.UP.|
00001180: 31 3A 99 22 93 22 C8 28 55 54 24 AA 55 50 24 2C |1:.".".(UT$.UP$,|
00001190: 32 31 29 3B C9 28 55 50 24 AA 55 47 24 AA C4 28 |21);.(UP$.UG$..(|
000011A0: 55 50 29 2C 31 38 29 00 D6 15 57 03 99 22 20 2D |UP),18)...W.." -|
000011B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000011C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000011D0: 2D 2D 2D 2D 2D 22 00 10 16 5C 03 8B 55 48 B2 30 |-----"...\..UH.0|
000011E0: A7 99 C8 28 55 44 24 2C 32 34 29 3B C8 28 55 50 |...(UD$,24);.(UP|
000011F0: 24 2C 37 29 3B 22 48 45 4C 50 20 2D 20 50 52 45 |$,7);"HELP - PRE|
00001200: 53 53 20 20 20 48 20 3C 52 45 54 55 52 4E 3E 22 |SS H <RETURN>"|
00001210: 00 21 16 61 03 55 48 B2 30 3A 99 22 13 11 22 3A |.!.a.UH.0:."..":|
00001220: 8E 00 59 16 6B 03 99 C8 28 55 44 24 2C 32 34 29 |..Y.k...(UD$,24)|
00001230: 3B 22 20 20 20 20 20 20 20 20 20 20 20 4F 4E 45 |;" ONE|
00001240: 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 45 2E 2E | MOMENT PLEASE..|
00001250: 2E 20 20 20 20 20 22 3A 8E 00 A9 16 84 03 55 58 |. ":......UX|
00001260: 24 B2 22 48 22 3A 55 53 B2 33 32 37 36 38 3A 55 |$."H":US.32768:U|
00001270: 31 B2 31 39 36 3A 55 32 B2 31 39 37 3A 55 33 B2 |1.196:U2.197:U3.|
00001280: 31 39 38 3A 55 34 B2 32 31 36 3A 55 43 B2 31 36 |198:U4.216:UC.16|
00001290: 37 3A 55 42 B2 31 30 32 34 3A 55 44 B2 31 30 38 |7:UB.1024:UD.108|
000012A0: 34 3A 55 45 B2 31 31 30 35 00 F2 16 85 03 55 54 |4:UE.1105.....UT|
000012B0: B2 35 39 34 36 38 3A 55 55 25 B2 31 32 3A 55 4C |.59468:UU%.12:UL|
000012C0: 25 B2 31 34 3A 55 50 25 B2 31 31 35 38 3A 55 4E |%.14:UP%.1158:UN|
000012D0: B2 31 35 38 3A 97 35 30 30 30 33 2C 30 3A 55 57 |.158:.50003,0:UW|
000012E0: B2 C2 28 35 30 30 30 33 29 3A 55 46 B2 C2 28 35 |..(50003):UF..(5|
000012F0: 33 29 00 40 17 86 03 8B 55 57 B2 30 A7 55 53 B2 |3).@....UW.0.US.|
00001300: 31 30 32 34 3A 55 31 B2 32 30 39 3A 55 32 B2 32 |1024:U1.209:U2.2|
00001310: 31 30 3A 55 33 B2 32 31 31 3A 55 34 B2 32 31 34 |10:U3.211:U4.214|
00001320: 3A 55 43 B2 32 30 34 3A 55 42 B2 32 30 34 38 3A |:UC.204:UB.2048:|
00001330: 55 58 B2 35 33 32 38 30 3A 55 44 B2 32 30 36 34 |UX.53280:UD.2064|
00001340: 00 8A 17 87 03 8B 55 57 B2 30 A7 55 54 B2 35 33 |......UW.0.UT.53|
00001350: 32 37 32 3A 55 55 25 B2 32 31 3A 55 4C 25 B2 32 |272:UU%.21:UL%.2|
00001360: 33 3A 55 50 25 B2 32 31 35 31 3A 55 4E B2 31 39 |3:UP%.2151:UN.19|
00001370: 38 3A 55 59 B2 35 33 32 38 31 3A 55 55 B2 32 31 |8:UY.53281:UU.21|
00001380: 39 39 3A 55 45 B2 32 30 38 37 00 B6 17 88 03 55 |99:UE.2087.....U|
00001390: 43 24 B2 C7 28 31 35 35 29 3A 55 56 B2 31 32 31 |C$..(155):UV.121|
000013A0: 34 3A 8B 55 57 B2 30 A7 55 46 B2 31 39 36 3A 55 |4:.UW.0.UF.196:U|
000013B0: 56 B2 32 32 33 38 00 07 18 89 03 55 44 24 B2 22 |V.2238.....UD$."|
000013C0: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000013D0: 11 11 11 11 11 11 11 11 11 22 3A 55 50 24 B2 22 |.........":UP$."|
000013E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000013F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001400: 20 20 20 20 20 20 22 00 13 18 8A 03 4E 44 B2 31 | ".....ND.1|
00001410: 20 45 32 00 19 18 8D 03 8E 00 3C 18 8E 03 8D 39 | E2.......<....9|
00001420: 30 30 3A 99 22 93 22 3A 99 22 A0 22 3A 8F 20 53 |00:.".":.".":. S|
00001430: 48 49 46 54 45 44 20 53 50 41 43 45 00 52 18 93 |HIFTED SPACE.R..|
00001440: 03 8B C2 28 55 53 AA 34 30 29 B3 B1 39 36 A7 37 |...(US.40)..96.7|
00001450: 30 30 00 78 18 98 03 8B 28 B8 28 30 29 AB 28 B4 |00.x....(.(0).(.|
00001460: 28 B8 28 30 29 29 B3 30 29 AC 36 35 35 33 36 29 |(.(0)).0).65536)|
00001470: B1 35 30 30 A7 39 33 35 00 A8 18 9D 03 99 55 43 |.500.935......UC|
00001480: 24 22 93 11 11 54 48 49 53 20 4D 41 43 48 49 4E |$"...THIS MACHIN|
00001490: 45 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 45 20 |E DOES NOT HAVE |
000014A0: 45 4E 4F 55 47 48 11 22 00 CE 18 A2 03 99 22 4D |ENOUGH."......"M|
000014B0: 45 4D 4F 52 59 20 54 4F 20 52 55 4E 20 54 48 49 |EMORY TO RUN THI|
000014C0: 53 20 50 52 4F 47 52 41 4D 20 21 22 3A 80 00 E4 |S PROGRAM !":...|
000014D0: 18 A7 03 99 22 93 22 55 43 24 3A 8B 55 57 B2 30 |...."."UC$:.UW.0|
000014E0: A7 39 36 35 00 01 19 AC 03 8B 55 46 B2 36 30 B0 |.965......UF.60.|
000014F0: 55 46 B2 31 30 38 B0 55 46 B2 31 32 34 A7 39 35 |UF.108.UF.124.95|
00001500: 30 00 1B 19 B1 03 97 35 32 2C 30 3A 97 35 33 2C |0......52,0:.53,|
00001510: 55 46 AB 34 3A 9C 3A 8D 39 30 30 00 52 19 B6 03 |UF.4:.:.900.R...|
00001520: 8B 55 57 B2 31 36 30 A7 97 31 31 30 33 2C 38 38 |.UW.160..1103,88|
00001530: 3A 97 31 31 30 34 2C 32 32 38 3A 97 31 31 30 37 |:.1104,228:.1107|
00001540: 2C 38 35 3A 97 31 31 31 31 2C 32 32 38 3A 89 39 |,85:.1111,228:.9|
00001550: 36 35 00 8B 19 BB 03 8B 55 57 B3 B1 31 A7 99 22 |65......UW..1.."|
00001560: 93 54 48 49 53 20 50 47 4D 20 57 49 4C 4C 20 4E |.THIS PGM WILL N|
00001570: 4F 54 20 57 4F 52 4B 20 4F 4E 20 54 48 49 53 20 |OT WORK ON THIS |
00001580: 4D 41 43 48 49 4E 45 21 22 3A 80 00 BA 19 C0 03 |MACHINE!":......|
00001590: 97 31 31 30 33 2C 34 39 3A 97 31 31 30 34 2C 32 |.1103,49:.1104,2|
000015A0: 33 30 3A 97 31 31 30 37 2C 34 36 3A 97 31 31 31 |30:.1107,46:.111|
000015B0: 31 2C 32 33 30 3A 89 39 36 35 00 C2 19 C5 03 9E |1,230:.965......|
000015C0: FF 44 00 D0 08 CA 03 FF F8 0F 8A 20 FF FF FF FF |.D......... ....|
000015D0: FF FF FF FF 03 8B 55 5A B2 31 A7 9E 55 50 25 3A |......UZ.1..UP%:|
000015E0: 9E 55 50 25 3A 55 5A B2 30 00 0B 1A E9 03 99 22 |.UP%:UZ.0......"|
000015F0: 93 22 55 43 24 3B 3A 8C 3A 8B 55 57 B2 30 A7 97 |."UC$;:.:.UW.0..|
00001600: 55 59 2C 36 3A 97 55 58 2C 31 34 00 2E 1A FC 03 |UY,6:.UX,14.....|
00001610: 8F 20 57 45 41 54 48 45 52 4D 41 4E 20 20 20 20 |. WEATHERMAN |
00001620: 20 20 20 20 20 20 20 31 2F 31 35 2F 38 31 00 34 | 1/15/81.4|
00001630: 1A 01 04 8F 00 58 1A 06 04 8F 20 50 52 4F 47 52 |.....X.... PROGR|
00001640: 41 4D 20 46 49 4E 44 53 20 48 55 4D 49 44 49 54 |AM FINDS HUMIDIT|
00001650: 59 20 49 4E 44 45 58 2C 00 79 1A 0B 04 8F 20 57 |Y INDEX,.y.... W|
00001660: 49 4E 44 20 43 48 49 4C 4C 20 46 41 43 54 4F 52 |IND CHILL FACTOR|
00001670: 2C 52 45 4C 41 54 49 56 45 00 9F 1A 10 04 8F 20 |,RELATIVE...... |
00001680: 48 55 4D 49 44 49 54 59 2C 41 4E 44 2F 4F 52 20 |HUMIDITY,AND/OR |
00001690: 54 45 4D 50 2E 43 4F 4E 56 45 52 53 49 4F 4E 00 |TEMP.CONVERSION.|
000016A0: B4 1A 24 04 8F 20 47 4C 45 4E 4E 20 50 52 45 53 |..$.. GLENN PRES|
000016B0: 43 4F 54 54 00 DA 1A 29 04 8F 22 B0 C0 C0 C0 C0 |COTT...)..".....|
000016C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000016D0: C0 C0 |.. |
.......910.6...."X..........X` ......L4.
X.1........X` .A...."X.G......X` ......L
X.X.U......X` ......"XHHH.H.HHHHHHH.H
.HX` ......"HHHHHHH` ......" .H...X.
. ..... .H...P...JP.` .U....".. .H....
.P.....JP.` ...#..UW.0..UU,15...(..UC,0
:.UN,0:UR$."":UI$."":.UL.0.UL.39.$.-..UI
$:.UI$."".45.Y.2.UA.F(UI$):UR.C(UR$):.UA
.13.UR.0..UC,1:." .";:.70...7..UA.20...(
UR.0).45:UR$.H(UR$,UR.1):.". ..";:.45..
.<..UR.UL.45...A..95:UR$.UR$.UI$:.UI$;:.
45.S.F..UR$.UX$..". ";:.145...K..UI.UR.1
..1:.J(UR$,UI,1)." ".....P.UR$.H(UR$,UI)
:.:...._..C(US$).0.110.J.D..UI.1.C(US$):
.UI$..J(US$,UI,1)..:UI$."".P.I...].N..UA
.46...P.S..UA.32.UR..0.....X..UA.47.UA.5
8.....}..UA.64.UA.91........UA.193.UA.21
8.UI$."":..O....B(UT).UU%.UI$.G(UA.128).
U..........170:.251,0:.252,US.256:.253,0
:.254,UF:.UV.....UZ.1:UV%.B(UT):.300.B..
.UZ.0:US$.UJ$:UG$.UK$:UT$.UL$:UP.UJ:UL.U
K:.".";:.UW.0..UY,6:.UX,14... ..UT,UV%:.
251,0:.252,UF:.253,0:.254,US.256:.UV:.UW
.0..UU,15.K....U1,U1%:.U2,U2%:.U3,U3%.1:
.U4,U4%:.35.....U1%.B(U1):U2%.B(U2):U3%.
B(U3):U4%.B(U4).!...UJ$.US$:UK$.UG$:UL$.
UT$:UJ.UP:UK.UL:..F.,.."..":.UT,UU%:.UW.
0..UY,12:.UX,6.F.1.." M E
N U."...6.." -----------------------
---------"...;..". 1. BEGIN WEAT
HERMAN"...@..".. 2. STUDENT INST
RUCTIONS"...E..".. 3. TEACHER IN
STRUCTIONS".&.J..".. 4. QUIT.".R
.O.." -------------------------------
-".}.T..".. PRESS A NUMBER KEY (1-
4) ";...Y.UL.1:US$."1234". .[..35:US$.""
...^..E(UR$).1000,400,500,390.F.C..300.Z
.R..UZ.1..UP%:.155...W........UE:."..":.
UW.0..UY,6:.UX,14:.UU,14......:..5....".
":.UT,UL%:.UW.0..UY,11:.UX,12.M...UT$."
WEATHERMAN":UH.1:UP.0:UG$."STUDENT INST"
:.850......".. THIS PROGRAM PERFORMS FOU
R MAJOR ".D....". FUNCTIONS. IT CAN PRO
VIDE SIMPLE"......". TEMPERATURE CONVERS
IONS. YOU JUST"... ..". ENTER VALUES IN
DEGREES CELSIUS,.D....". FARENHEIT, KELV
IN, OR RANKINE, AND".T....". THE COMPUTE
R WILL PRINT THE EQUIVALENT"......". VAL
UES IN THE OTHER SCALES."......835:UH.1:
.850......".. IT CAN ALSO CALCULATE THE
TEMPERATURE"......". HUMIDITY INDEX. YOU
WILL BE REQUESTED".6....". TO SUPPLY TH
E TEMPERATURES OF THE"._....". DRY AND W
ET BULBS. THE DRY BULB"......". TEMPERAT
URE MUST BE HIGHER THAN THE":.". WET BUL
B TEMPERATURE."......835:UH.1:.850......
".. ITS THIRD FUNCTION IS TO CALCULATE".
.....". THE WIND CHILL EQUIVALENT TEMPER
ATURE.".D....". THE ATMOSPHERIC TEMPERAT
URE AND THE".P....". WIND VELOCITY ARE T
HE TWO REQUIRED"......". INPUTS THIS SEC
TION."......835:UH.1:.850.L....".. LASTL
Y, IT CAN GIVE THE RELATIVE"......". HUM
IDITY AND DEW POINT AT ANY TEMPERA-".+..
..". TURE. AGAIN, YOU ARE PROMPTED TO GI
VE".X....". THE TEMPERATURES OF THE DRY
AND WET".H.B..". BULBS.".Q....835......U
Z.1..UP%:.155............".":.UT,UL%:.UW
.0..UY,2:.UX,10.....UT$." WEATHERMAN":UH
.1:UP.0:UG$."TEACHER INST":.850......"..
TO THE BEST OF OUR KNOWLEDGE,.".?..
.." THIS PROGRAM IS IN THE PUBLIC.".
J................./.....................
.......... .(...................T.."$..
......JNNJG.....G........OI.......G.....
................O..Y..X...{.............
.......OGINCOURT, ONTARIO"......"
.CANADA, M1W 2K4".=...." .(4
16) 499-4292".P...UH.1:.835:.850.W...."
..PROGRAM NAME: WEATHERMAN......"
.WRITTEN BY : GLENN PRESCOTT.I...."
.REVISED BY : TOBY WALKER"......"
..THIS PROGRAM WILL RUN ON ANY....
...." BASIC 2.0 PET COMPUTER..D.
..." BASIC 4.0 PET COMPUTER..F..
.." 8032 CBM COMPUTER......."
COMMODORE 64 COMPUTER......835:UH.
1:.850.F....".. LIMITS HAVE BEEN SET FOR
SOME"......". INPUTS TO ENSURE ACCURATE
RESULTS."......". IF YOU WOULD LIKE TO
CHANGE THE".I....". MAXIMUM NUMBER OF CH
ARACTERS ALLOWED".T....". FOR MOST OF TH
E INPUTS, ALTER THE"......". VALUE OF 'U
L' IN LINE 3000. THE"......". CURRENT VA
LUE IS SIX.".E.I..835.Y.N..UZ.1..UP%:.15
5...S........UC$"....BEFORE RUNNING THIS
PROGRAM ON AN 8032.K.A.." LOAD THE
'CBM 4032' PROGRAM.............":..S. .
."....";:.UT,UU%:.UW.0..UY,1:.UX,14...!.
.I.1.38:.". .";:...."..I.1.22:."... .";:
....#..I.1.37:."... .";:..Q.$..I.1.22:."
... .";:....%.."......................
....&.."........... . . ...7.'.."......
..... . ...... O M M O D O R E.M.(.."..
.......... ..S.).."...................E
DUCATIONAL....*..".................SOFTW
ARE...+.."..................1983....,..H
(UD$,24);"..........PRESS SPACE BAR OR W
AIT."UC$:UI.0...-..UI$:.UI$.." ".UI.UI.1
:.UI.250.813......300.X.C..UN,0:.H(UD$,2
4);".......PRESS SPACE BAR TO CONTINUE."
.O.H..UI$:.UI$.." ".840.U.M.....R.UP.UP.
1:."."H(UT$.UP$,21);I(UP$.UG$.D(UP),18).
V.W.." ---------------------------------
-----"...\..UH.0..H(UD$,24);H(UP$,7);"HE
LP - PRESS H <RETURN>".!.A.UH.0:."..":
..Y.K..H(UD$,24);" ONE MOMENT
PLEASE... ":......UX$."H":US.32768:U
1.196:U2.197:U3.198:U4.216:UC.167:UB.102
4:UD.1084:UE.1105.....UT.59468:UU%.12:UL
%.14:UP%.1158:UN.158:.50003,0:UW.B(50003
):UF.B(53).@....UW.0.US.1024:U1.209:U2.2
10:U3.211:U4.214:UC.204:UB.2048:UX.53280
:UD.2064......UW.0.UT.53272:UU%.21:UL%.2
3:UP%.2151:UN.198:UY.53281:UU.2199:UE.20
87.....UC$.G(155):UV.1214:.UW.0.UF.196:U
V.2238.....UD$."........................
.":UP$."
".....ND.1 E2.......<....900:.".":
." ":. SHIFTED SPACE.R....B(US.40)..96.7
00.X....(.(0).(.(.(0)).0).65536).500.935
......UC$"...THIS MACHINE DOES NOT HAVE
ENOUGH.".N...."MEMORY TO RUN THIS PROGRA
M !":......."."UC$:.UW.0.965......UF.60.
UF.108.UF.124.950......52,0:.53,UF.4:.:.
900.R....UW.160..1103,88:.1104,228:.1107
,85:.1111,228:.965......UW..1..".THIS PG
M WILL NOT WORK ON THIS MACHINE!":......
.1103,49:.1104,230:.1107,46:.1111,230:.9
65.B.E...D.P.J..... ..........UZ.1..UP%:
.UP%:UZ.0......"."UC$;:.:.UW.0..UY,6:.UX
,14...... WEATHERMAN 1/15/81.4
.....X.... PROGRAM FINDS HUMIDITY INDEX,
.Y.... WIND CHILL FACTOR,RELATIVE......
HUMIDITY,AND/OR TEMP.CONVERSION...$.. GL
ENN PRESCOTT.Z.)..".....................
..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL