/ Compute! Gazette 1987 November / 1987-11.d64 / sub2

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 c0 4d c0 0a 00 99 22 | 93 11 11 d7 45 20 41 52 |..M...."|....E AR|
|00000010| 45 20 4e 4f 57 20 49 4e | 20 54 48 45 20 53 45 43 |E NOW IN| THE SEC|
|00000020| 4f 4e 44 20 52 4f 55 54 | 49 4e 45 2e 20 c8 45 52 |OND ROUT|INE. .ER|
|00000030| 45 20 20 57 45 20 57 49 | 4c 4c 20 41 56 45 52 41 |E  WE WI|LL AVERA|
|00000040| 47 45 20 4f 55 54 20 54 | 48 45 20 22 3b 00 8b c0 |GE OUT T|HE ";...|
|00000050| 14 00 99 22 4e 55 4d 42 | 45 52 53 20 54 48 41 54 |..."NUMB|ERS THAT|
|00000060| 20 20 20 20 57 45 52 45 | 20 49 4e 50 55 54 2c 20 |    WERE| INPUT, |
|00000070| 49 4e 43 4c 55 44 49 4e | 47 20 54 48 45 20 46 49 |INCLUDIN|G THE FI|
|00000080| 52 53 54 20 4e 55 4d 42 | 45 52 22 00 c5 c0 1e 00 |RST NUMB|ER".....|
|00000090| 99 22 57 45 20 4d 55 4c | 54 49 50 4c 49 45 44 2e |."WE MUL|TIPLIED.|
|000000a0| 22 3a 99 22 11 c1 47 41 | 49 4e 2c 20 4c 45 54 27 |":."..GA|IN, LET'|
|000000b0| 53 20 43 4c 45 41 52 20 | 56 41 52 49 41 42 4c 45 |S CLEAR |VARIABLE|
|000000c0| 53 2e 22 3a 9c 00 e6 c0 | 28 00 99 22 11 ce 4f 57 |S.":....|(.."..OW|
|000000d0| 20 54 4f 20 47 45 54 20 | 54 48 45 20 56 41 4c 55 | TO GET |THE VALU|
|000000e0| 45 53 2e 2e 2e 22 00 08 | c1 32 00 88 2e 41 b2 41 |ES..."..|.2...A.A|
|000000f0| 3a 88 2e 42 b2 42 3a 88 | 2e 43 b2 43 3a 88 2e 44 |:..B.B:.|.C.C:..D|
|00000100| b2 44 3a 88 2e 45 b2 45 | 00 51 c1 3c 00 41 4e b2 |.D:..E.E|.Q.<.AN.|
|00000110| 28 41 aa 42 aa 43 aa 44 | aa 45 29 ad 35 3a 8f 20 |(A.B.C.D|.E).5:. |
|00000120| 53 49 4e 43 45 20 54 48 | 49 53 20 49 53 20 41 20 |SINCE TH|IS IS A |
|00000130| 4c 4f 43 41 4c 20 46 55 | 4e 43 54 49 4f 4e 2c 20 |LOCAL FU|NCTION, |
|00000140| 27 4c 45 54 27 20 49 53 | 20 4e 4f 54 20 55 53 45 |'LET' IS| NOT USE|
|00000150| 44 00 83 c1 46 00 88 41 | b2 2e 41 4e 3a 20 8f 20 |D...F..A|..AN: . |
|00000160| 53 45 4e 44 20 56 41 4c | 55 45 20 42 41 43 4b 20 |SEND VAL|UE BACK |
|00000170| 54 4f 20 54 48 45 20 4d | 41 49 4e 20 50 52 4f 47 |TO THE M|AIN PROG|
|00000180| 52 41 4d 00 a3 c1 50 00 | 99 22 11 c8 49 54 20 41 |RAM...P.|."..IT A|
|00000190| 4e 59 20 4b 45 59 20 54 | 4f 20 47 4f 20 42 41 43 |NY KEY T|O GO BAC|
|000001a0| 4b 2e 22 00 b5 c1 5a 00 | a1 5a 24 3a 8b 5a 24 b2 |K."...Z.|.Z$:.Z$.|
|000001b0| 22 22 a7 39 30 00 bb c1 | 64 00 80 00 00 00       |"".90...|d.....  |
+--------+-------------------------+-------------------------+--------+--------+