/ ARM Club 1 / ARM_CLUB_CD.iso / contents / apps / maths / progs / maths1 / Brian / J_Greening / Cubicsplin

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 3e 43 75 | 62 69 63 73 70 6c 69 6e |.....>Cu|bicsplin|
|00000010| 0d 00 14 05 3a 0d 00 1e | 21 f4 2a 2a 2a 2a 2a 2a |....:...|!.******|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000030| 2a 2a 2a 2a 2a 2a 0d 00 | 28 21 f4 2a 20 20 20 20 |******..|(!.*    |
|00000040| 20 20 20 43 55 42 49 43 | 20 53 50 4c 49 4e 45 20 |   CUBIC| SPLINE |
|00000050| 20 20 20 20 20 20 2a 0d | 00 32 21 f4 2a 20 20 20 |      *.|.2!.*   |
|00000060| 20 20 20 20 4a 6f 68 6e | 20 47 72 65 65 6e 69 6e |    John| Greenin|
|00000070| 67 20 20 20 20 20 20 2a | 0d 00 3c 21 f4 2a 20 20 |g      *|..<!.*  |
|00000080| 20 20 20 20 20 20 20 45 | 64 69 6e 62 75 72 67 68 |       E|dinburgh|
|00000090| 20 20 20 20 20 20 20 20 | 2a 0d 00 46 21 f4 2a 2a |        |*..F!.**|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0d 00 50 05 3a 0d |********|**..P.:.|
|000000c0| 00 5a 06 eb 31 0d 00 64 | 5d f4 20 54 68 65 20 66 |.Z..1..d|]. The f|
|000000d0| 6f 6c 6c 6f 77 69 6e 67 | 20 44 49 4d 27 73 20 61 |ollowing| DIM's a|
|000000e0| 72 65 20 73 75 66 66 69 | 63 69 65 6e 74 20 66 6f |re suffi|cient fo|
|000000f0| 72 20 33 30 20 70 61 69 | 72 73 20 6f 66 20 64 61 |r 30 pai|rs of da|
|00000100| 74 61 20 70 6f 69 6e 74 | 73 2e 20 41 6d 65 6e 64 |ta point|s. Amend|
|00000110| 20 69 66 20 79 6f 75 20 | 6e 65 65 64 20 6d 6f 72 | if you |need mor|
|00000120| 65 2e 0d 00 6e 44 de 20 | 50 28 31 2c 33 30 29 2c |e...nD. |P(1,30),|
|00000130| 41 28 33 30 29 2c 58 28 | 33 32 29 2c 59 28 33 32 |A(30),X(|32),Y(32|
|00000140| 29 2c 41 31 28 33 30 29 | 2c 42 28 33 30 29 2c 43 |),A1(30)|,B(30),C|
|00000150| 28 33 30 29 2c 44 28 33 | 31 29 2c 56 28 33 30 29 |(30),D(3|1),V(30)|
|00000160| 2c 57 28 33 30 29 0d 00 | 78 11 ef 31 39 2c 30 2c |,W(30)..|x..19,0,|
|00000170| 34 2c 30 2c 30 2c 30 0d | 00 82 0a f2 74 69 74 6c |4,0,0,0.|....titl|
|00000180| 65 0d 00 8c 09 f2 6d 65 | 6e 75 0d 00 96 0a f2 63 |e.....me|nu.....c|
|00000190| 68 65 63 6b 0d 00 a0 0e | f2 73 63 61 6c 65 61 78 |heck....|.scaleax|
|000001a0| 65 73 0d 00 aa 0d f2 67 | 65 74 6e 61 6d 65 73 0d |es.....g|etnames.|
|000001b0| 00 b4 0b f2 70 6f 69 6e | 74 73 0d 00 be 0d f2 64 |....poin|ts.....d|
|000001c0| 72 61 77 61 78 65 73 0d | 00 c8 0a f2 63 75 62 69 |rawaxes.|....cubi|
|000001d0| 63 0d 00 d2 0a f2 63 75 | 72 76 65 0d 00 dc 0d f2 |c.....cu|rve.....|
|000001e0| 6e 61 6d 65 61 78 65 73 | 0d 00 e6 05 e0 0d 00 f0 |nameaxes|........|
|000001f0| 05 3a 0d 00 fa 0b dd f2 | 74 69 74 6c 65 0d 01 04 |.:......|title...|
|00000200| 1c f1 8a 31 32 2c 37 29 | 3b 22 41 20 43 55 42 49 |...12,7)|;"A CUBI|
|00000210| 43 20 53 50 4c 49 4e 45 | 22 0d 01 0e 07 f1 27 27 |C SPLINE|".....''|
|00000220| 0d 01 18 69 c8 99 20 22 | 4f 53 5f 50 72 65 74 74 |...i.. "|OS_Prett|
|00000230| 79 50 72 69 6e 74 22 2c | 22 54 68 69 73 20 70 72 |yPrint",|"This pr|
|00000240| 6f 67 72 61 6d 20 75 73 | 65 73 20 63 75 62 69 63 |ogram us|es cubic|
|00000250| 73 20 74 6f 20 66 69 74 | 20 61 20 73 6d 6f 6f 74 |s to fit| a smoot|
|00000260| 68 20 63 75 72 76 65 20 | 74 6f 20 68 61 6e 64 2d |h curve |to hand-|
|00000270| 65 6e 74 65 72 65 64 20 | 6f 72 20 72 65 61 64 2d |entered |or read-|
|00000280| 69 6e 20 64 61 74 61 2e | 22 0d 01 22 06 f1 27 0d |in data.|".."..'.|
|00000290| 01 2c 36 c8 99 20 22 4f | 53 5f 50 72 65 74 74 79 |.,6.. "O|S_Pretty|
|000002a0| 50 72 69 6e 74 22 2c 22 | 49 74 20 64 6f 65 73 20 |Print","|It does |
|000002b0| 4e 4f 54 20 73 6d 6f 6f | 74 68 20 74 68 65 20 64 |NOT smoo|th the d|
|000002c0| 61 74 61 2e 22 0d 01 36 | 06 f1 27 0d 01 40 4c c8 |ata."..6|..'..@L.|
|000002d0| 99 20 22 4f 53 5f 50 72 | 65 74 74 79 50 72 69 6e |. "OS_Pr|ettyPrin|
|000002e0| 74 22 2c 22 41 62 73 63 | 69 73 73 61 20 76 61 6c |t","Absc|issa val|
|000002f0| 75 65 73 20 4d 55 53 54 | 20 69 6e 63 72 65 61 73 |ues MUST| increas|
|00000300| 65 20 66 72 6f 6d 20 70 | 6f 69 6e 74 20 74 6f 20 |e from p|oint to |
|00000310| 70 6f 69 6e 74 2e 22 0d | 01 4a 06 f1 27 0d 01 54 |point.".|.J..'..T|
|00000320| 66 c8 99 20 22 4f 53 5f | 50 72 65 74 74 79 50 72 |f.. "OS_|PrettyPr|
|00000330| 69 6e 74 22 2c 22 49 66 | 20 79 6f 75 20 6e 65 65 |int","If| you nee|
|00000340| 64 20 6d 6f 72 65 20 74 | 68 61 6e 20 33 30 20 70 |d more t|han 30 p|
|00000350| 61 69 72 73 20 6f 66 20 | 64 61 74 61 20 70 6f 69 |airs of |data poi|
|00000360| 6e 74 73 20 69 6e 63 72 | 65 61 73 65 20 74 68 65 |nts incr|ease the|
|00000370| 20 44 49 4d 27 73 20 69 | 6e 20 6c 69 6e 65 20 31 | DIM's i|n line 1|
|00000380| 31 30 22 0d 01 5e 2d f1 | 8a 34 2c 32 39 29 3b 22 |10"..^-.|.4,29);"|
|00000390| 50 72 65 73 73 20 74 68 | 65 20 53 50 41 43 45 20 |Press th|e SPACE |
|000003a0| 42 41 52 20 74 6f 20 63 | 6f 6e 74 69 6e 75 65 22 |BAR to c|ontinue"|
|000003b0| 0d 01 68 23 df 31 32 37 | 39 2c 30 3a df 31 32 37 |..h#.127|9,0:.127|
|000003c0| 39 2c 31 30 32 33 3a df | 30 2c 31 30 32 33 3a df |9,1023:.|0,1023:.|
|000003d0| 30 2c 30 0d 01 72 0a 41 | 24 3d be 3a db 0d 01 7c |0,0..r.A|$=.:...||
|000003e0| 05 e1 0d 01 86 05 3a 0d | 01 90 0f dd f2 64 61 74 |......:.|.....dat|
|000003f0| 61 65 6e 74 72 79 0d 01 | 9a 51 db 3a f1 8a 35 2c |aentry..|.Q.:..5,|
|00000400| 34 29 22 59 6f 75 20 6e | 6f 77 20 68 61 76 65 20 |4)"You n|ow have |
|00000410| 74 6f 20 65 6e 74 65 72 | 20 79 6f 75 72 20 64 61 |to enter| your da|
|00000420| 74 61 22 3a f1 8a 35 29 | 3b 22 59 6f 75 20 66 69 |ta":..5)|;"You fi|
|00000430| 72 73 74 20 65 6e 74 65 | 72 20 74 68 65 20 58 2d |rst ente|r the X-|
|00000440| 76 61 6c 75 65 73 22 0d | 01 a4 22 f1 8a 39 29 3b |values".|.."..9);|
|00000450| 22 61 6e 64 20 74 68 65 | 6e 20 74 68 65 20 59 3d |"and the|n the Y=|
|00000460| 76 61 6c 75 65 73 22 27 | 27 0d 01 ae 2f f1 8a 33 |values"'|'.../..3|
|00000470| 29 3b 22 45 6e 74 65 72 | 20 64 61 74 61 20 69 6e |);"Enter| data in|
|00000480| 20 61 73 63 65 6e 64 69 | 6e 67 20 6f 72 64 65 72 | ascendi|ng order|
|00000490| 20 6f 66 20 58 22 27 27 | 0d 01 b8 2a f1 8a 35 29 | of X"''|...*..5)|
|000004a0| 3b 22 54 68 65 20 70 72 | 6f 67 72 61 6d 20 77 69 |;"The pr|ogram wi|
|000004b0| 6c 6c 20 61 63 63 65 70 | 74 20 6e 75 6d 62 65 72 |ll accep|t number|
|000004c0| 73 22 0d 01 c2 29 f1 8a | 35 29 3b 22 77 69 74 68 |s"...)..|5);"with|
|000004d0| 20 75 70 20 74 6f 20 66 | 69 76 65 20 66 69 67 75 | up to f|ive figu|
|000004e0| 72 65 73 20 74 6f 20 74 | 68 65 22 0d 01 cc 28 f1 |res to t|he"...(.|
|000004f0| 8a 35 29 3b 22 6c 65 66 | 74 20 6f 66 20 61 6e 79 |.5);"lef|t of any|
|00000500| 20 64 65 63 69 6d 61 6c | 20 70 6f 69 6e 74 20 61 | decimal| point a|
|00000510| 6e 64 22 0d 01 d6 2b f1 | 8a 35 29 3b 22 75 70 20 |nd"...+.|.5);"up |
|00000520| 74 6f 20 74 68 72 65 65 | 20 74 6f 20 74 68 65 20 |to three| to the |
|00000530| 72 69 67 68 74 20 6f 66 | 20 69 74 22 27 27 0d 01 |right of| it"''..|
|00000540| e0 32 f1 8a 31 29 3b 22 | 55 70 20 74 6f 20 33 30 |.2..1);"|Up to 30|
|00000550| 20 70 61 69 72 73 20 6f | 66 20 64 61 74 61 20 6d | pairs o|f data m|
|00000560| 61 79 20 62 65 20 65 6e | 74 65 72 65 64 22 27 27 |ay be en|tered"''|
|00000570| 0d 01 ea 26 f1 8a 36 29 | 3b 22 54 6f 20 66 69 6e |...&..6)|;"To fin|
|00000580| 69 73 68 20 64 61 74 61 | 20 65 6e 74 72 79 20 74 |ish data| entry t|
|00000590| 79 70 65 20 2f 22 0d 01 | f4 20 f1 8a 31 31 29 3b |ype /"..|. ..11);|
|000005a0| 22 61 6e 64 20 70 72 65 | 73 73 20 52 45 54 55 52 |"and pre|ss RETUR|
|000005b0| 4e 22 3a 4e 3d 30 0d 01 | fe 23 df 31 32 37 39 2c |N":N=0..|.#.1279,|
|000005c0| 30 3a df 31 32 37 39 2c | 31 30 32 33 3a df 30 2c |0:.1279,|1023:.0,|
|000005d0| 31 30 32 33 3a df 30 2c | 30 0d 02 08 0d f2 63 6f |1023:.0,|0.....co|
|000005e0| 6e 74 69 6e 75 65 0d 02 | 12 05 f5 0d 02 1c 05 f5 |ntinue..|........|
|000005f0| 0d 02 26 25 db 3a df 31 | 32 37 39 2c 30 3a df 31 |..&%.:.1|279,0:.1|
|00000600| 32 37 39 2c 31 30 32 33 | 3a df 30 2c 31 30 32 33 |279,1023|:.0,1023|
|00000610| 3a df 30 2c 30 0d 02 30 | 2e f1 8a 31 2c 35 29 3b |:.0,0..0|...1,5);|
|00000620| 22 57 68 61 74 20 69 73 | 20 74 68 65 20 78 2d 76 |"What is| the x-v|
|00000630| 61 6c 75 65 20 6f 66 20 | 70 6f 69 6e 74 20 22 3b |alue of |point ";|
|00000640| 4e 2b 31 0d 02 3a 35 f1 | 8a 31 2c 36 29 3b 22 50 |N+1..:5.|.1,6);"P|
|00000650| 72 65 73 73 20 3c 52 45 | 54 55 52 4e 3e 20 61 66 |ress <RE|TURN> af|
|00000660| 74 65 72 20 74 79 70 69 | 6e 67 20 6e 75 6d 62 65 |ter typi|ng numbe|
|00000670| 72 73 22 3a e8 20 4e 24 | 0d 02 44 19 fd 20 97 28 |rs":. N$|..D.. .(|
|00000680| 4e 24 29 3e 34 34 20 80 | 20 97 28 4e 24 29 3c 35 |N$)>44 .| .(N$)<5|
|00000690| 38 0d 02 4e 15 e7 20 97 | 28 4e 24 29 3d 34 37 20 |8..N.. .|(N$)=47 |
|000006a0| 8c 20 8d 64 50 42 0d 02 | 58 10 50 28 30 2c 4e 29 |. .dPB..|X.P(0,N)|
|000006b0| 3d bb 28 4e 24 29 0d 02 | 62 05 f5 0d 02 6c 1d f1 |=.(N$)..|b....l..|
|000006c0| 27 22 57 68 61 74 20 69 | 73 20 79 2d 76 61 6c 75 |'"What i|s y-valu|
|000006d0| 65 20 22 3a e8 20 4e 24 | 0d 02 76 24 fd 20 97 28 |e ":. N$|..v$. .(|
|000006e0| 4e 24 29 3e 34 34 20 80 | 20 97 28 4e 24 29 3c 35 |N$)>44 .| .(N$)<5|
|000006f0| 38 20 80 97 28 4e 24 29 | 3c 3e 34 37 0d 02 80 15 |8 ..(N$)|<>47....|
|00000700| 50 28 31 2c 4e 29 3d bb | 28 4e 24 29 3a 4e 2b 3d |P(1,N)=.|(N$):N+=|
|00000710| 31 0d 02 8a 0c e7 20 4e | 3d 33 30 20 8c 0d 02 94 |1..... N|=30 ....|
|00000720| 06 ef 37 0d 02 9e 2e f1 | 8a 33 2c 32 39 29 3b 22 |..7.....|.3,29);"|
|00000730| 4d 61 78 69 6d 75 6d 20 | 6e 75 6d 62 65 72 20 6f |Maximum |number o|
|00000740| 66 20 70 6f 69 6e 74 73 | 20 65 6e 74 65 72 65 64 |f points| entered|
|00000750| 22 0d 02 a8 33 f1 8a 31 | 2c 33 30 29 3b 22 50 72 |"...3..1|,30);"Pr|
|00000760| 65 73 73 20 53 50 41 43 | 45 20 74 6f 20 63 6f 6e |ess SPAC|E to con|
|00000770| 74 69 6e 75 65 20 74 68 | 65 6e 20 2f 20 74 6f 20 |tinue th|en / to |
|00000780| 65 6e 64 22 0d 02 b2 0c | f5 20 fd 20 a5 3d 33 32 |end"....|. . .=32|
|00000790| 0d 02 bc 05 cc 0d 02 c6 | 05 cd 0d 02 d0 0e fd 20 |........|....... |
|000007a0| 97 28 4e 24 29 3d 34 37 | 0d 02 da 05 f5 0d 02 e4 |.(N$)=47|........|
|000007b0| 38 db 3a f1 8a 37 2c 30 | 29 3b 22 52 45 41 44 49 |8.:..7,0|);"READI|
|000007c0| 4e 47 20 20 20 58 2d 56 | 41 4c 55 45 20 20 20 59 |NG   X-V|ALUE   Y|
|000007d0| 2d 56 41 4c 55 45 22 27 | 3a 40 25 3d 26 30 30 30 |-VALUE"'|:@%=&000|
|000007e0| 32 30 33 30 41 0d 02 ee | 0d e3 20 49 3d 31 20 b8 |2030A...|.. I=1 .|
|000007f0| 20 4e 0d 02 f8 27 f1 8a | 34 29 49 3b 3a f1 8a 31 | N...'..|4)I;:..1|
|00000800| 34 29 50 28 30 2c 49 2d | 31 29 3b 3a f1 8a 32 34 |4)P(0,I-|1);:..24|
|00000810| 29 50 28 31 2c 49 2d 31 | 29 0d 03 02 05 ed 0d 03 |)P(1,I-1|).......|
|00000820| 0c 05 f5 0d 03 16 19 f1 | 27 22 41 72 65 20 64 61 |........|'"Are da|
|00000830| 74 61 20 4f 4b 3f 22 3a | 54 24 3d be 0d 03 20 31 |ta OK?":|T$=... 1|
|00000840| fd 20 97 28 54 24 29 3d | 38 39 20 84 20 97 28 54 |. .(T$)=|89 . .(T|
|00000850| 24 29 3d 31 32 31 20 84 | 20 97 28 54 24 29 3d 37 |$)=121 .| .(T$)=7|
|00000860| 38 20 84 20 97 28 54 24 | 29 3d 31 31 30 0d 03 2a |8 . .(T$|)=110..*|
|00000870| 21 e7 20 97 28 54 24 29 | 3d 38 39 20 84 20 97 28 |!. .(T$)|=89 . .(|
|00000880| 54 24 29 3d 31 32 31 20 | 8c 20 8d 44 5c 43 0d 03 |T$)=121 |. .D\C..|
|00000890| 34 4d f1 22 45 6e 74 65 | 72 20 6e 75 6d 62 65 72 |4M."Ente|r number|
|000008a0| 20 6f 66 20 77 72 6f 6e | 67 20 73 65 74 22 3a e8 | of wron|g set":.|
|000008b0| 20 58 3a db 3a f1 27 22 | 45 6e 74 65 72 20 78 2d | X:.:.'"|Enter x-|
|000008c0| 76 61 6c 75 65 20 6f 66 | 20 70 6f 69 6e 74 22 58 |value of| point"X|
|000008d0| 3a e8 20 50 28 30 2c 58 | 2d 31 29 0d 03 3e 25 20 |:. P(0,X|-1)..>% |
|000008e0| 20 f1 22 26 20 6e 6f 77 | 20 74 68 65 20 79 2d 76 | ."& now| the y-v|
|000008f0| 61 6c 75 65 22 3a e8 20 | 50 28 31 2c 58 2d 31 29 |alue":. |P(1,X-1)|
|00000900| 0d 03 48 07 fd 20 a3 0d | 03 52 05 ed 0d 03 5c 0a |..H.. ..|.R....\.|
|00000910| db 3a 4e 2d 3d 31 0d 03 | 66 09 40 25 3d 31 30 0d |.:N-=1..|f.@%=10.|
|00000920| 03 70 05 e1 0d 03 7a 05 | 3a 0d 03 84 0f dd f2 73 |.p....z.|:......s|
|00000930| 63 61 6c 65 61 78 65 73 | 0d 03 8e 6e e3 20 49 3d |caleaxes|...n. I=|
|00000940| 30 20 b8 20 4e 3a 41 28 | 49 29 3d 50 28 30 2c 49 |0 . N:A(|I)=P(0,I|
|00000950| 29 3a ed 3a f2 6d 69 6e | 6d 61 78 3a 53 58 3d 31 |):.:.min|max:SX=1|
|00000960| 30 35 30 2f 28 6d 61 78 | 2d 6d 69 6e 29 3a 4f 58 |050/(max|-min):OX|
|00000970| 3d 31 30 35 30 2d 6d 61 | 78 2a 53 58 3a 6d 61 78 |=1050-ma|x*SX:max|
|00000980| 58 3d 53 58 2a 6d 61 78 | 3a 6d 69 6e 58 3d 53 58 |X=SX*max|:minX=SX|
|00000990| 2a 6d 69 6e 3a 58 6d 61 | 78 3d 6d 61 78 3a 58 6d |*min:Xma|x=max:Xm|
|000009a0| 69 6e 3d 6d 69 6e 0d 03 | 98 6c e3 20 49 3d 30 20 |in=min..|.l. I=0 |
|000009b0| b8 20 4e 3a 41 28 49 29 | 3d 50 28 31 2c 49 29 3a |. N:A(I)|=P(1,I):|
|000009c0| ed 3a f2 6d 69 6e 6d 61 | 78 3a 53 59 3d 38 35 30 |.:.minma|x:SY=850|
|000009d0| 2f 28 6d 61 78 2d 6d 69 | 6e 29 3a 4f 59 3d 38 35 |/(max-mi|n):OY=85|
|000009e0| 30 2d 6d 61 78 2a 53 59 | 3a 6d 61 78 59 3d 53 59 |0-max*SY|:maxY=SY|
|000009f0| 2a 6d 61 78 3a 6d 69 6e | 59 3d 53 59 2a 6d 69 6e |*max:min|Y=SY*min|
|00000a00| 3a 59 6d 61 78 3d 6d 61 | 78 3a 59 6d 69 6e 3d 6d |:Ymax=ma|x:Ymin=m|
|00000a10| 69 6e 0d 03 a2 16 ef 32 | 39 2c 4f 58 2b 31 30 30 |in.....2|9,OX+100|
|00000a20| 3b 4f 59 2b 31 30 30 3b | 0d 03 ac 05 e1 0d 03 b6 |;OY+100;|........|
|00000a30| 05 3a 0d 03 c0 0c dd f2 | 70 6f 69 6e 74 73 0d 03 |.:......|points..|
|00000a40| ca 25 db 3a e3 20 49 3d | 30 20 b8 20 4e 3a 58 28 |.%.:. I=|0 . N:X(|
|00000a50| 49 29 3d a8 28 53 58 2a | 28 50 28 30 2c 49 29 29 |I)=.(SX*|(P(0,I))|
|00000a60| 29 3a ed 0d 03 d4 23 e3 | 20 49 3d 30 20 b8 20 4e |):....#.| I=0 . N|
|00000a70| 3a 59 28 49 29 3d a8 28 | 53 59 2a 28 50 28 31 2c |:Y(I)=.(|SY*(P(1,|
|00000a80| 49 29 29 29 3a ed 0d 03 | de 29 e3 20 49 3d 30 20 |I))):...|.). I=0 |
|00000a90| b8 20 4e 3a ec 20 58 28 | 49 29 2d 38 2c 59 28 49 |. N:. X(|I)-8,Y(I|
|00000aa0| 29 3a df 20 58 28 49 29 | 2b 38 2c 59 28 49 29 0d |):. X(I)|+8,Y(I).|
|00000ab0| 03 e8 21 ec 20 58 28 49 | 29 2c 59 28 49 29 2d 38 |..!. X(I|),Y(I)-8|
|00000ac0| 3a df 20 58 28 49 29 2c | 59 28 49 29 2b 38 3a ed |:. X(I),|Y(I)+8:.|
|00000ad0| 0d 03 f2 05 e1 0d 03 fc | 05 3a 0d 04 06 0e dd f2 |........|.:......|
|00000ae0| 64 72 61 77 61 78 65 73 | 0d 04 10 24 ec 20 30 2c |drawaxes|...$. 0,|
|00000af0| 6d 69 6e 59 2b 35 30 2a | 28 6d 69 6e 59 3c 30 29 |minY+50*|(minY<0)|
|00000b00| 3a df 20 30 2c 6d 61 78 | 59 2b 35 30 0d 04 1a 24 |:. 0,max|Y+50...$|
|00000b10| ec 20 6d 69 6e 58 2b 35 | 30 2a 28 6d 69 6e 58 3c |. minX+5|0*(minX<|
|00000b20| 30 29 2c 30 3a df 20 6d | 61 78 58 2b 35 30 2c 30 |0),0:. m|axX+50,0|
|00000b30| 0d 04 24 16 ec 20 6d 61 | 78 58 2c 30 3a df 20 6d |..$.. ma|xX,0:. m|
|00000b40| 61 78 58 2c 32 30 0d 04 | 2e 1b ef 35 3a ec 20 6d |axX,20..|...5:. m|
|00000b50| 61 78 58 2d 34 30 2c 2d | 31 36 3a f1 3b 58 6d 61 |axX-40,-|16:.;Xma|
|00000b60| 78 0d 04 38 16 ec 20 30 | 2c 6d 61 78 59 3a df 20 |x..8.. 0|,maxY:. |
|00000b70| 32 30 2c 6d 61 78 59 0d | 04 42 19 ec 20 2d 31 30 |20,maxY.|.B.. -10|
|00000b80| 30 2c 6d 61 78 59 2b 31 | 36 3a f1 3b 59 6d 61 78 |0,maxY+1|6:.;Ymax|
|00000b90| 0d 04 4c 22 ec 20 2d 31 | 36 2c 2d 31 36 3a f1 3b |..L". -1|6,-16:.;|
|00000ba0| 22 30 22 3a ec 20 2d 33 | 32 2c 31 36 3a f1 3b 22 |"0":. -3|2,16:.;"|
|00000bb0| 30 22 0d 04 56 34 e7 20 | 6d 69 6e 58 3c 30 20 ec |0"..V4. |minX<0 .|
|00000bc0| 20 6d 69 6e 58 2d 37 32 | 2c 2d 31 36 3a f1 3b 58 | minX-72|,-16:.;X|
|00000bd0| 6d 69 6e 3a ec 20 6d 69 | 6e 58 2c 30 3a df 20 6d |min:. mi|nX,0:. m|
|00000be0| 69 6e 58 2c 32 30 0d 04 | 60 39 e7 20 6d 69 6e 59 |inX,20..|`9. minY|
|00000bf0| 3c 30 20 ec 20 2d 31 33 | 32 2c 6d 69 6e 59 2b 31 |<0 . -13|2,minY+1|
|00000c00| 36 3a f1 3b 59 6d 69 6e | 3a ec 20 30 2c 6d 69 6e |6:.;Ymin|:. 0,min|
|00000c10| 59 3a df 20 32 30 2c 6d | 69 6e 59 3a ef 20 34 0d |Y:. 20,m|inY:. 4.|
|00000c20| 04 6a 05 e1 0d 04 74 05 | 3a 0d 04 7e 0b dd f2 63 |.j....t.|:..~...c|
|00000c30| 75 62 69 63 0d 04 88 1c | e3 20 49 3d 30 20 b8 20 |ubic....|. I=0 . |
|00000c40| 4e 3a 41 31 28 49 29 3d | 50 28 31 2c 49 29 3a ed |N:A1(I)=|P(1,I):.|
|00000c50| 0d 04 92 24 e3 20 49 3d | 30 20 b8 20 4e 2d 31 3a |...$. I=|0 . N-1:|
|00000c60| 44 28 49 29 3d 50 28 30 | 2c 49 2b 31 29 2d 50 28 |D(I)=P(0|,I+1)-P(|
|00000c70| 30 2c 49 29 0d 04 9c 05 | ed 0d 04 a6 1b 44 28 4e |0,I)....|.....D(N|
|00000c80| 29 3d 44 28 4e 2d 31 29 | 3a 44 28 4e 2b 31 29 3d |)=D(N-1)|:D(N+1)=|
|00000c90| 44 28 30 29 0d 04 b0 40 | 42 28 30 29 3d 32 2a 44 |D(0)...@|B(0)=2*D|
|00000ca0| 28 30 29 3a e3 20 49 3d | 31 20 b8 20 4e 2d 31 3a |(0):. I=|1 . N-1:|
|00000cb0| 42 28 49 29 3d 32 2a 28 | 44 28 49 29 2b 44 28 49 |B(I)=2*(|D(I)+D(I|
|00000cc0| 2d 31 29 29 3a ed 3a 42 | 28 4e 29 3d 32 2a 44 28 |-1)):.:B|(N)=2*D(|
|00000cd0| 4e 2d 31 29 0d 04 ba 47 | 43 28 30 29 3d 33 2a 28 |N-1)...G|C(0)=3*(|
|00000ce0| 41 31 28 31 29 2d 41 31 | 28 30 29 29 3a e3 20 49 |A1(1)-A1|(0)):. I|
|00000cf0| 3d 31 20 b8 20 4e 2d 31 | 3a 43 28 49 29 3d 28 44 |=1 . N-1|:C(I)=(D|
|00000d00| 28 49 2d 31 29 2a 28 41 | 31 28 49 2b 31 29 2d 41 |(I-1)*(A|1(I+1)-A|
|00000d10| 31 28 49 29 29 29 2f 44 | 28 49 29 0d 04 c4 2d 43 |1(I)))/D|(I)...-C|
|00000d20| 28 49 29 3d 43 28 49 29 | 2b 28 28 44 28 49 29 2f |(I)=C(I)|+((D(I)/|
|00000d30| 44 28 49 2d 31 29 29 2a | 28 41 31 28 49 29 2d 41 |D(I-1))*|(A1(I)-A|
|00000d40| 31 28 49 2d 31 29 29 29 | 0d 04 ce 28 43 28 49 29 |1(I-1)))|...(C(I)|
|00000d50| 3d 33 2a 43 28 49 29 3a | ed 3a 43 28 4e 29 3d 33 |=3*C(I):|.:C(N)=3|
|00000d60| 2a 28 41 31 28 4e 29 2d | 41 31 28 4e 2d 31 29 29 |*(A1(N)-|A1(N-1))|
|00000d70| 0d 04 d8 0d 56 28 30 29 | 3d 42 28 30 29 0d 04 e2 |....V(0)|=B(0)...|
|00000d80| 20 56 28 31 29 3d 42 28 | 31 29 2d 28 44 28 31 29 | V(1)=B(|1)-(D(1)|
|00000d90| 2a 44 28 4e 2b 31 29 2f | 56 28 30 29 29 0d 04 ec |*D(N+1)/|V(0))...|
|00000da0| 2e e3 20 49 3d 32 20 b8 | 20 4e 3a 56 28 49 29 3d |.. I=2 .| N:V(I)=|
|00000db0| 42 28 49 29 2d 28 28 44 | 28 49 29 2a 44 28 49 2d |B(I)-((D|(I)*D(I-|
|00000dc0| 32 29 29 2f 56 28 49 2d | 31 29 29 0d 04 f6 05 ed |2))/V(I-|1)).....|
|00000dd0| 0d 05 00 38 57 28 30 29 | 3d 43 28 30 29 3a e3 20 |...8W(0)|=C(0):. |
|00000de0| 49 3d 31 20 b8 20 4e 3a | 57 28 49 29 3d 43 28 49 |I=1 . N:|W(I)=C(I|
|00000df0| 29 2d 28 44 28 49 29 2a | 57 28 49 2d 31 29 2f 56 |)-(D(I)*|W(I-1)/V|
|00000e00| 28 49 2d 31 29 29 3a ed | 0d 05 0a 45 42 28 4e 29 |(I-1)):.|...EB(N)|
|00000e10| 3d 57 28 4e 29 2f 56 28 | 4e 29 3a e3 20 49 3d 4e |=W(N)/V(|N):. I=N|
|00000e20| 2d 31 20 b8 20 31 20 88 | 2d 31 3a 42 28 49 29 3d |-1 . 1 .|-1:B(I)=|
|00000e30| 28 57 28 49 29 2d 28 44 | 28 49 2d 31 29 2a 42 28 |(W(I)-(D|(I-1)*B(|
|00000e40| 49 2b 31 29 29 29 2f 56 | 28 49 29 3a ed 0d 05 14 |I+1)))/V|(I):....|
|00000e50| 22 42 28 30 29 3d 28 57 | 28 30 29 2d 28 44 28 4e |"B(0)=(W|(0)-(D(N|
|00000e60| 2b 31 29 2a 42 28 31 29 | 29 29 2f 56 28 30 29 0d |+1)*B(1)|))/V(0).|
|00000e70| 05 1e 6c 43 28 30 29 3d | 30 3a 43 28 4e 29 3d 30 |..lC(0)=|0:C(N)=0|
|00000e80| 3a e3 20 49 3d 31 20 b8 | 20 4e 2d 31 3a 43 28 49 |:. I=1 .| N-1:C(I|
|00000e90| 29 3d 28 41 31 28 49 2b | 31 29 2d 41 31 28 49 29 |)=(A1(I+|1)-A1(I)|
|00000ea0| 29 2f 28 44 28 49 29 5e | 32 29 3a 43 28 49 29 3d |)/(D(I)^|2):C(I)=|
|00000eb0| 33 2a 43 28 49 29 3a 43 | 28 49 29 3d 43 28 49 29 |3*C(I):C|(I)=C(I)|
|00000ec0| 2d 28 28 28 32 2a 42 28 | 49 29 29 2b 42 28 49 2b |-(((2*B(|I))+B(I+|
|00000ed0| 31 29 29 2f 44 28 49 29 | 29 3a ed 0d 05 28 2d e3 |1))/D(I)|):...(-.|
|00000ee0| 20 49 3d 30 20 b8 20 4e | 2d 31 3a 44 28 49 29 3d | I=0 . N|-1:D(I)=|
|00000ef0| 28 43 28 49 2b 31 29 2d | 43 28 49 29 29 2f 28 33 |(C(I+1)-|C(I))/(3|
|00000f00| 2a 44 28 49 29 29 3a ed | 0d 05 32 05 e1 0d 05 3c |*D(I)):.|..2....<|
|00000f10| 05 3a 0d 05 46 0b dd f2 | 63 75 72 76 65 0d 05 50 |.:..F...|curve..P|
|00000f20| 4b f0 36 39 2c 53 58 2a | 50 28 30 2c 30 29 2c 53 |K.69,SX*|P(0,0),S|
|00000f30| 59 2a 50 28 31 2c 30 29 | 3a e3 20 49 3d 30 20 b8 |Y*P(1,0)|:. I=0 .|
|00000f40| 20 4e 2d 31 3a e3 20 4a | 3d 58 28 49 29 20 b8 20 | N-1:. J|=X(I) . |
|00000f50| 58 28 49 2b 31 29 20 88 | 20 34 3a 54 45 4d 50 3d |X(I+1) .| 4:TEMP=|
|00000f60| 28 4a 2d 34 29 2f 53 58 | 0d 05 5a 14 54 45 4d 50 |(J-4)/SX|..Z.TEMP|
|00000f70| 3d 54 45 4d 50 2d 50 28 | 30 2c 49 29 0d 05 64 30 |=TEMP-P(|0,I)..d0|
|00000f80| 54 45 4d 50 3d 41 31 28 | 49 29 2b 42 28 49 29 2a |TEMP=A1(|I)+B(I)*|
|00000f90| 54 45 4d 50 2b 43 28 49 | 29 2a 54 45 4d 50 5e 32 |TEMP+C(I|)*TEMP^2|
|00000fa0| 2b 44 28 49 29 2a 54 45 | 4d 50 5e 33 0d 05 6e 19 |+D(I)*TE|MP^3..n.|
|00000fb0| 54 45 4d 50 3d 53 59 2a | 28 54 45 4d 50 2d 50 28 |TEMP=SY*|(TEMP-P(|
|00000fc0| 31 2c 30 29 29 0d 05 78 | 18 df 20 4a 2d 34 2c 54 |1,0))..x|.. J-4,T|
|00000fd0| 45 4d 50 2b 53 59 2a 50 | 28 31 2c 30 29 0d 05 82 |EMP+SY*P|(1,0)...|
|00000fe0| 07 ed 3a ed 0d 05 8c 05 | e1 0d 05 96 05 3a 0d 05 |..:.....|.....:..|
|00000ff0| a0 0e dd f2 63 6f 6e 74 | 69 6e 75 65 0d 05 aa 05 |....cont|inue....|
|00001000| f5 0d 05 b4 2c f1 8a 34 | 2c 32 36 29 22 50 72 65 |....,..4|,26)"Pre|
|00001010| 73 73 20 74 68 65 20 53 | 50 41 43 45 20 42 41 52 |ss the S|PACE BAR|
|00001020| 20 74 6f 20 63 6f 6e 74 | 69 6e 75 65 22 0d 05 be | to cont|inue"...|
|00001030| 0a fd 20 a5 3d 33 32 0d | 05 c8 13 ef 32 33 3b 38 |.. .=32.|....23;8|
|00001040| 32 30 32 3b 30 3b 30 3b | 30 3b 0d 05 d2 05 e1 0d |202;0;0;|0;......|
|00001050| 05 dc 05 3a 0d 05 e6 0e | dd f2 67 65 74 6e 61 6d |...:....|..getnam|
|00001060| 65 73 0d 05 f0 23 e8 8a | 32 2c 33 29 22 45 6e 74 |es...#..|2,3)"Ent|
|00001070| 65 72 20 6e 61 6d 65 20 | 6f 66 20 58 2d 61 78 69 |er name |of X-axi|
|00001080| 73 20 22 58 24 0d 05 fa | 23 e8 8a 32 2c 35 29 22 |s "X$...|#..2,5)"|
|00001090| 45 6e 74 65 72 20 6e 61 | 6d 65 20 6f 66 20 59 2d |Enter na|me of Y-|
|000010a0| 61 78 69 73 20 22 59 24 | 0d 06 04 05 e1 0d 06 0e |axis "Y$|........|
|000010b0| 05 3a 0d 06 18 0c dd f2 | 6d 69 6e 6d 61 78 0d 06 |.:......|minmax..|
|000010c0| 22 0f 6d 69 6e 3d 30 3a | 6d 61 78 3d 30 0d 06 2c |".min=0:|max=0..,|
|000010d0| 0d e3 20 4a 3d 30 20 b8 | 20 4e 0d 06 36 17 e7 20 |.. J=0 .| N..6.. |
|000010e0| 41 28 4a 29 3c 6d 69 6e | 20 6d 69 6e 3d 41 28 4a |A(J)<min| min=A(J|
|000010f0| 29 0d 06 40 17 e7 20 41 | 28 4a 29 3e 6d 61 78 20 |)..@.. A|(J)>max |
|00001100| 6d 61 78 3d 41 28 4a 29 | 0d 06 4a 05 ed 0d 06 54 |max=A(J)|..J....T|
|00001110| 05 e1 0d 06 5e 05 3a 0d | 06 68 0e dd f2 6e 61 6d |....^.:.|.h...nam|
|00001120| 65 61 78 65 73 0d 06 72 | 1a ef 35 3a ec 20 6d 61 |eaxes..r|..5:. ma|
|00001130| 78 58 2d 31 30 30 2c 2d | 35 30 3a f1 20 58 24 0d |xX-100,-|50:. X$.|
|00001140| 06 7c 17 ec 20 2d 31 30 | 30 2c 6d 61 78 59 2d 33 |.|.. -10|0,maxY-3|
|00001150| 32 3a f1 20 59 24 0d 06 | 86 05 e1 0d 06 90 05 3a |2:. Y$..|.......:|
|00001160| 0d 06 9a 0e dd f2 72 65 | 61 64 64 61 74 61 0d 06 |......re|addata..|
|00001170| a4 08 4e 3d 2d 31 0d 06 | ae 05 f5 0d 06 b8 08 4e |..N=-1..|.......N|
|00001180| 2b 3d 31 0d 06 c2 13 f3 | 20 50 28 30 2c 4e 29 2c |+=1.....| P(0,N),|
|00001190| 50 28 31 2c 4e 29 0d 06 | cc 37 fd 20 50 28 30 2c |P(1,N)..|.7. P(0,|
|000011a0| 4e 29 3d 31 30 30 3a f4 | 20 4f 72 20 77 68 61 74 |N)=100:.| Or what|
|000011b0| 65 76 65 72 20 79 6f 75 | 72 20 6d 61 78 69 6d 75 |ever you|r maximu|
|000011c0| 6d 20 78 20 76 61 6c 75 | 65 20 69 73 2e 0d 06 d6 |m x valu|e is....|
|000011d0| 05 e1 0d 06 e0 05 3a 0d | 06 ea 32 f4 20 50 75 74 |......:.|..2. Put|
|000011e0| 20 79 6f 75 72 20 64 61 | 74 61 20 68 65 72 65 2e | your da|ta here.|
|000011f0| 20 54 68 65 73 65 20 61 | 72 65 20 6a 75 73 74 20 | These a|re just |
|00001200| 65 78 61 6d 70 6c 65 73 | 2e 0d 06 f4 40 dc 20 2d |examples|....@. -|
|00001210| 31 30 30 2c 31 30 30 2c | 2d 37 35 2c 39 30 2c 2d |100,100,|-75,90,-|
|00001220| 35 30 2c 37 35 2c 2d 32 | 35 2c 34 30 2c 30 2c 30 |50,75,-2|5,40,0,0|
|00001230| 2c 32 35 2c 34 30 2c 35 | 30 2c 37 35 2c 37 35 2c |,25,40,5|0,75,75,|
|00001240| 39 30 2c 31 30 30 2c 38 | 30 0d 06 fe 05 3a 0d 07 |90,100,8|0....:..|
|00001250| 08 0b dd f2 63 68 65 63 | 6b 0d 07 12 10 e3 20 49 |....chec|k..... I|
|00001260| 25 3d 30 20 b8 20 4e 2d | 31 0d 07 1c 1c e7 20 50 |%=0 . N-|1..... P|
|00001270| 28 30 2c 49 25 2b 31 29 | 2d 50 28 30 2c 49 25 29 |(0,I%+1)|-P(0,I%)|
|00001280| 3c 3d 30 20 8c 0d 07 26 | 08 f1 27 27 27 0d 07 30 |<=0 ...&|..'''..0|
|00001290| 76 c8 99 20 22 4f 53 5f | 50 72 65 74 74 79 50 72 |v.. "OS_|PrettyPr|
|000012a0| 69 6e 74 22 2c 22 56 61 | 6c 75 65 73 20 6f 66 20 |int","Va|lues of |
|000012b0| 61 62 73 63 69 73 73 61 | 20 64 6f 20 6e 6f 74 20 |abscissa| do not |
|000012c0| 69 6e 63 72 65 61 73 65 | 20 63 6f 6e 74 69 6e 75 |increase| continu|
|000012d0| 6f 75 73 6c 79 2e 20 54 | 68 65 20 70 72 6f 67 72 |ously. T|he progr|
|000012e0| 61 6d 20 63 61 6e 6e 6f | 74 20 64 65 61 6c 20 77 |am canno|t deal w|
|000012f0| 69 74 68 20 73 75 63 68 | 20 64 61 74 61 2e 22 3a |ith such| data.":|
|00001300| f1 3a e0 0d 07 3a 05 cc | 0d 07 44 05 cd 0d 07 4e |.:...:..|..D....N|
|00001310| 05 ed 0d 07 58 05 e1 0d | 07 62 05 3a 0d 07 6c 0a |....X...|.b.:..l.|
|00001320| dd f2 6d 65 6e 75 0d 07 | 76 23 df 31 32 37 39 2c |..menu..|v#.1279,|
|00001330| 30 3a df 31 32 37 39 2c | 31 30 32 33 3a df 30 2c |0:.1279,|1023:.0,|
|00001340| 31 30 32 33 3a df 30 2c | 30 0d 07 80 27 f1 8a 38 |1023:.0,|0...'..8|
|00001350| 2c 36 29 3b 22 44 6f 20 | 79 6f 75 20 77 61 6e 74 |,6);"Do |you want|
|00001360| 20 74 6f 20 65 6e 74 65 | 72 20 64 61 74 61 3a 22 | to ente|r data:"|
|00001370| 0d 07 8a 17 f1 8a 38 2c | 38 29 3b 22 31 2e 20 42 |......8,|8);"1. B|
|00001380| 79 20 68 61 6e 64 22 0d | 07 94 23 f1 8a 38 2c 31 |y hand".|..#..8,1|
|00001390| 30 29 3b 22 32 2e 20 42 | 79 20 44 41 54 41 20 73 |0);"2. B|y DATA s|
|000013a0| 74 61 74 65 6d 65 6e 74 | 73 22 0d 07 9e 1a f1 8a |tatement|s"......|
|000013b0| 38 2c 31 32 29 3b 22 33 | 2e 20 46 72 6f 6d 20 64 |8,12);"3|. From d|
|000013c0| 69 73 63 22 0d 07 a8 26 | f1 8a 38 2c 31 37 29 3b |isc"...&|..8,17);|
|000013d0| 22 50 72 65 73 73 20 61 | 70 70 72 6f 70 72 69 61 |"Press a|ppropria|
|000013e0| 74 65 20 6e 75 6d 62 65 | 72 22 0d 07 b2 0a c8 8e |te numbe|r"......|
|000013f0| 20 be 20 ca 0d 07 bc 14 | c9 20 22 31 22 3a f2 64 | . .....|. "1":.d|
|00001400| 61 74 61 65 6e 74 72 79 | 0d 07 c6 1d c9 20 22 32 |ataentry|..... "2|
|00001410| 22 3a f2 6d 65 73 73 61 | 67 65 31 3a f2 72 65 61 |":.messa|ge1:.rea|
|00001420| 64 64 61 74 61 0d 07 d0 | 1d c9 20 22 33 22 3a f2 |ddata...|.. "3":.|
|00001430| 6d 65 73 73 61 67 65 32 | 3a f2 72 65 61 64 64 69 |message2|:.readdi|
|00001440| 73 63 0d 07 da 05 cb 0d | 07 e4 05 db 0d 07 ee 05 |sc......|........|
|00001450| e1 0d 07 f8 05 3a 0d 08 | 02 0e dd f2 72 65 61 64 |.....:..|....read|
|00001460| 64 69 73 63 0d 08 0c 2a | e8 8a 32 2c 35 29 3b 22 |disc...*|..2,5);"|
|00001470| 45 6e 74 65 72 20 6e 61 | 6d 65 20 6f 66 20 64 61 |Enter na|me of da|
|00001480| 74 61 20 66 69 6c 65 20 | 22 6e 61 6d 65 24 0d 08 |ta file |"name$..|
|00001490| 16 0f 63 25 3d 8e 28 6e | 61 6d 65 24 29 0d 08 20 |..c%=.(n|ame$).. |
|000014a0| 08 4e 3d 2d 31 0d 08 2a | 05 f5 0d 08 34 08 4e 2b |.N=-1..*|....4.N+|
|000014b0| 3d 31 0d 08 3e 16 e8 23 | 63 25 2c 50 28 30 2c 4e |=1..>..#|c%,P(0,N|
|000014c0| 29 2c 50 28 31 2c 4e 29 | 0d 08 48 0a fd 20 c5 23 |),P(1,N)|..H.. .#|
|000014d0| 63 25 0d 08 52 05 e1 0d | 08 5c 05 3a 0d 08 66 0e |c%..R...|.\.:..f.|
|000014e0| dd f2 6d 65 73 73 61 67 | 65 31 0d 08 70 30 f1 8a |..messag|e1..p0..|
|000014f0| 32 2c 32 35 29 3b 22 49 | 66 20 79 6f 75 20 68 61 |2,25);"I|f you ha|
|00001500| 76 65 20 6e 6f 74 20 79 | 65 74 20 64 6f 6e 65 20 |ve not y|et done |
|00001510| 73 6f 2c 20 65 6e 74 65 | 72 22 0d 08 7a 32 f1 8a |so, ente|r"..z2..|
|00001520| 32 2c 32 36 29 3b 22 79 | 6f 75 72 20 64 61 74 61 |2,26);"y|our data|
|00001530| 20 61 74 20 65 6e 64 20 | 6f 66 20 44 45 46 50 52 | at end |of DEFPR|
|00001540| 4f 43 72 65 61 64 64 61 | 74 61 2c 22 0d 08 84 24 |OCreadda|ta,"...$|
|00001550| f1 8a 32 2c 32 37 29 3b | 22 6f 74 68 65 72 77 69 |..2,27);|"otherwi|
|00001560| 73 65 20 70 72 65 73 73 | 20 52 45 54 55 52 4e 22 |se press| RETURN"|
|00001570| 0d 08 8e 0c f5 20 fd 20 | a5 3d 31 33 0d 08 98 05 |..... . |.=13....|
|00001580| e1 0d 08 a2 05 3a 0d 08 | ac 0e dd f2 6d 65 73 73 |.....:..|....mess|
|00001590| 61 67 65 32 0d 08 b6 30 | f1 8a 31 2c 32 35 29 3b |age2...0|..1,25);|
|000015a0| 22 49 66 20 79 6f 75 20 | 68 61 76 65 20 6e 6f 74 |"If you |have not|
|000015b0| 20 79 65 74 20 64 6f 6e | 65 20 73 6f 2c 20 63 68 | yet don|e so, ch|
|000015c0| 65 63 6b 22 0d 08 c0 31 | f1 8a 31 2c 32 36 29 3b |eck"...1|..1,26);|
|000015d0| 22 74 68 61 74 20 44 45 | 46 50 52 4f 43 72 65 61 |"that DE|FPROCrea|
|000015e0| 64 64 69 73 63 20 69 73 | 20 61 70 70 72 6f 70 72 |ddisc is| appropr|
|000015f0| 69 61 74 65 22 0d 08 ca | 34 f1 8a 31 2c 32 37 29 |iate"...|4..1,27)|
|00001600| 3b 22 66 6f 72 20 79 6f | 75 72 20 6e 65 65 64 73 |;"for yo|ur needs|
|00001610| 2c 20 6f 74 68 65 72 77 | 69 73 65 20 70 72 65 73 |, otherw|ise pres|
|00001620| 73 20 52 45 54 55 52 4e | 22 0d 08 d4 0e f5 20 fd |s RETURN|"..... .|
|00001630| 20 a5 3d 31 33 3a db 0d | 08 de 05 e1 0d ff       | .=13:..|......  |
+--------+-------------------------+-------------------------+--------+--------+