/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / utilities / _mathsv10

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 1c 02 00 00 7c 02 00 00 |Archive.|....|...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 4d 61 74 68 73 56 | 31 30 00 00 ff ff ff ff |.!MathsV|10......|
|00000070| 45 fd ff ff b1 b5 e3 99 | 30 00 00 00 ff ff ff ff |E.......|0.......|
|00000080| f8 01 00 80 82 21 48 65 | 6c 70 00 00 b0 01 00 00 |.....!He|lp......|
|00000090| 47 00 00 00 44 eb ff ff | b6 ac 15 3d 03 00 1e a3 |G...D...|...=....|
|000000a0| 47 00 00 00 24 00 00 00 | 82 21 52 75 6e 00 04 00 |G...$...|.!Run...|
|000000b0| b0 01 00 00 5a 00 00 00 | 42 eb ff ff 23 40 61 97 |....Z...|B...#@a.|
|000000c0| 03 00 a7 90 5a 00 00 00 | 8f 00 00 00 82 21 52 75 |....Z...|.....!Ru|
|000000d0| 6e 49 6d 61 67 65 00 00 | 28 73 00 00 44 fb ff ff |nImage..|(s..D...|
|000000e0| e5 ca 46 54 03 00 58 45 | 28 73 00 00 0d 01 00 00 |..FT..XE|(s......|
|000000f0| 82 21 53 70 72 69 74 65 | 73 00 00 00 e4 03 00 00 |.!Sprite|s.......|
|00000100| 43 f9 ff ff fa 2e 7e 06 | 03 00 33 e8 e4 03 00 00 |C.....~.|..3.....|
|00000110| 59 74 00 00 82 43 4f 4e | 46 49 47 00 b0 01 00 00 |Yt...CON|FIG.....|
|00000120| 4b 00 00 00 44 fd ff ff | 03 67 37 93 03 00 03 e3 |K...D...|.g7.....|
|00000130| 4b 00 00 00 61 78 00 00 | 82 44 61 74 61 62 61 73 |K...ax..|.Databas|
|00000140| 65 00 00 00 ad 00 00 00 | 42 fd ff ff 95 56 df 97 |e.......|B....V..|
|00000150| 03 00 0b 91 ad 00 00 00 | d0 78 00 00 82 48 65 6c |........|.x...Hel|
|00000160| 70 00 04 00 b0 01 00 00 | d9 43 00 00 44 dc f7 ff |p.......|.C..D...|
|00000170| ad ac 15 3d 03 00 61 5e | d9 43 00 00 a1 79 00 00 |...=..a^|.C...y..|
|00000180| 82 48 65 6c 70 52 65 61 | 64 65 72 00 40 0a 00 00 |.HelpRea|der.@...|
|00000190| 44 f8 ff ff b3 ac 15 3d | 03 00 82 f1 40 0a 00 00 |D......=|....@...|
|000001a0| 9e bd 00 00 82 4f 64 64 | 73 4e 45 6e 64 73 00 00 |.....Odd|sNEnds..|
|000001b0| ff ff ff ff 45 fd ff ff | 96 b6 e3 99 30 00 00 00 |....E...|....0...|
|000001c0| ff ff ff ff d4 01 00 80 | 82 44 69 66 66 65 72 65 |........|.Differe|
|000001d0| 6e 74 00 00 70 03 00 00 | 42 fb ff ff 13 6f ea 98 |nt..p...|B....o..|
|000001e0| 03 00 8c 7d 70 03 00 00 | 02 c8 00 00 82 49 6e 74 |...}p...|.....Int|
|000001f0| 65 67 72 61 6c 00 00 00 | 36 03 00 00 42 fb ff ff |egral...|6...B...|
|00000200| 7e 20 ef 98 03 00 86 a4 | 36 03 00 00 96 cb 00 00 |~ ......|6.......|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| d8 00 00 00 00 00 00 00 | c3 00 04 00 b0 01 00 00 |........|........|
|00000240| 20 00 00 00 45 eb ff ff | 1d 71 09 5a 03 00 80 1b | ...E...|.q.Z....|
|00000250| 20 00 00 00 94 ff ff ff | 00 00 00 00 00 00 00 00 | .......|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | d8 00 00 00 46 69 6c 65 |........|....File|
|00000280| 44 61 74 61 82 21 48 65 | 6c 70 00 00 b0 01 00 00 |Data.!He|lp......|
|00000290| 47 00 00 00 44 eb ff ff | b6 ac 15 3d 03 00 1e a3 |G...D...|...=....|
|000002a0| 7c 48 65 6c 70 52 65 61 | 64 65 72 0a 57 69 6d 70 ||HelpRea|der.Wimp|
|000002b0| 53 6c 6f 74 20 34 38 6b | 20 34 38 6b 0a 52 75 6e |Slot 48k| 48k.Run|
|000002c0| 20 3c 4f 62 65 79 24 44 | 69 72 3e 2e 48 65 6c 70 | <Obey$D|ir>.Help|
|000002d0| 52 65 61 64 65 72 20 3c | 4f 62 65 79 24 44 69 72 |Reader <|Obey$Dir|
|000002e0| 3e 2e 48 65 6c 70 0a 46 | 69 6c 65 44 61 74 61 82 |>.Help.F|ileData.|
|000002f0| 21 52 75 6e 00 04 00 b0 | 01 00 00 5a 00 00 00 42 |!Run....|...Z...B|
|00000300| eb ff ff 23 40 61 97 03 | 00 a7 90 7c 20 3e 20 24 |...#@a..|...| > $|
|00000310| 2e 21 4d 61 74 68 73 56 | 35 2e 21 52 75 6e 0a 7c |.!MathsV|5.!Run.||
|00000320| 0a 7c 20 77 72 69 74 74 | 65 6e 20 62 79 20 52 2e |.| writt|en by R.|
|00000330| 54 68 6f 72 6e 62 75 72 | 72 6f 77 20 31 32 74 68 |Thornbur|row 12th|
|00000340| 20 4d 61 79 20 31 39 39 | 30 0a 7c 0a 52 75 6e 20 | May 199|0.|.Run |
|00000350| 3c 4f 62 65 79 24 44 69 | 72 3e 2e 21 52 75 6e 49 |<Obey$Di|r>.!RunI|
|00000360| 6d 61 67 65 0a 46 69 6c | 65 44 61 74 61 82 21 52 |mage.Fil|eData.!R|
|00000370| 75 6e 49 6d 61 67 65 00 | 00 28 73 00 00 44 fb ff |unImage.|.(s..D..|
|00000380| ff e5 ca 46 54 03 00 58 | 45 0d 00 0a 11 f4 20 3e |...FT..X|E..... >|
|00000390| 20 21 52 75 6e 49 6d 61 | 67 65 0d 00 14 17 f4 20 | !RunIma|ge..... |
|000003a0| 62 79 20 52 2e 20 54 68 | 6f 72 6e 62 75 72 72 6f |by R. Th|ornburro|
|000003b0| 77 0d 00 1e 46 f4 20 54 | 68 69 73 20 70 72 6f 67 |w...F. T|his prog|
|000003c0| 72 61 6d 20 69 73 20 50 | 55 42 4c 49 43 20 44 4f |ram is P|UBLIC DO|
|000003d0| 4d 41 49 4e 2e 20 20 41 | 4c 4c 20 69 74 73 20 61 |MAIN.  A|LL its a|
|000003e0| 73 73 6f 63 69 61 74 65 | 64 20 66 69 6c 65 73 20 |ssociate|d files |
|000003f0| 4d 55 53 54 20 62 65 0d | 00 28 35 f4 20 69 63 6e |MUST be.|.(5. icn|
|00000400| 63 6c 75 64 65 64 20 77 | 69 74 68 20 69 74 2e 20 |cluded w|ith it. |
|00000410| 20 52 65 6c 65 61 73 65 | 20 64 61 74 65 20 32 35 | Release| date 25|
|00000420| 74 68 20 4a 75 6c 79 20 | 31 39 39 31 0d 00 32 0c |th July |1991..2.|
|00000430| 64 65 62 75 67 25 3d b9 | 0d 00 3c 06 eb 30 0d 00 |debug%=.|..<..0..|
|00000440| 46 12 ee 20 85 20 f2 73 | 79 73 5f 65 72 72 6f 72 |F.. . .s|ys_error|
|00000450| 0d 00 50 0e ef 31 39 2c | 30 2c 34 3b 30 3b 0d 00 |..P..19,|0,4;0;..|
|00000460| 5a 09 f2 69 6e 69 74 0d | 00 64 12 ee 20 85 20 f2 |Z..init.|.d.. . .|
|00000470| 73 79 73 5f 65 72 72 6f | 72 0d 00 6e 05 f5 0d 00 |sys_erro|r..n....|
|00000480| 78 0d f2 6d 61 69 6e 6d | 65 6e 75 0d 00 82 0b fd |x..mainm|enu.....|
|00000490| 20 71 75 69 74 25 0d 00 | 8c 06 eb 30 0d 00 96 08 | quit%..|...0....|
|000004a0| 2a 46 58 34 0d 00 a0 05 | e0 0d 00 aa 05 3a 0d 00 |*FX4....|.....:..|
|000004b0| b4 0a dd f2 69 6e 69 74 | 0d 00 be 12 f2 67 65 74 |....init|.....get|
|000004c0| 5f 63 6f 6e 66 69 67 75 | 72 65 0d 00 c8 2b de 20 |_configu|re...+. |
|000004d0| 73 74 6f 72 65 64 5f 66 | 75 6e 63 24 28 6d 61 78 |stored_f|unc$(max|
|000004e0| 29 2c 73 74 6f 72 65 64 | 5f 62 61 73 69 63 76 24 |),stored|_basicv$|
|000004f0| 28 6d 61 78 29 0d 00 d2 | 27 de 20 73 74 6f 72 65 |(max)...|'. store|
|00000500| 64 5f 78 6d 69 6e 28 6d | 61 78 29 2c 73 74 6f 72 |d_xmin(m|ax),stor|
|00000510| 65 64 5f 78 6d 61 78 28 | 6d 61 78 29 0d 00 dc 27 |ed_xmax(|max)...'|
|00000520| de 20 73 74 6f 72 65 64 | 5f 79 6d 69 6e 28 6d 61 |. stored|_ymin(ma|
|00000530| 78 29 2c 73 74 6f 72 65 | 64 5f 79 6d 61 78 28 6d |x),store|d_ymax(m|
|00000540| 61 78 29 0d 00 e6 15 de | 20 66 72 65 65 5f 73 70 |ax).....| free_sp|
|00000550| 61 63 65 28 6d 61 78 29 | 0d 00 f0 2d de 20 66 75 |ace(max)|...-. fu|
|00000560| 6e 63 24 28 31 30 29 2c | 62 61 73 69 63 76 24 28 |nc$(10),|basicv$(|
|00000570| 31 30 29 2c 78 6d 69 6e | 28 31 30 29 2c 78 6d 61 |10),xmin|(10),xma|
|00000580| 78 28 31 30 29 0d 00 fa | 17 de 20 79 6d 69 6e 28 |x(10)...|.. ymin(|
|00000590| 31 30 29 2c 79 6d 61 78 | 28 31 30 29 0d 01 04 29 |10),ymax|(10)...)|
|000005a0| 71 75 69 74 25 3d a3 3a | 66 75 6e 63 74 69 6f 6e |quit%=.:|function|
|000005b0| 25 3d 30 3a 73 74 6f 72 | 65 64 25 3d 30 3a 40 25 |%=0:stor|ed%=0:@%|
|000005c0| 3d 26 34 30 41 0d 01 0e | 72 72 61 64 25 3d a3 3a |=&40A...|rrad%=.:|
|000005d0| 41 3d 31 3a 42 3d 31 3a | 43 3d 31 3a 44 3d 31 3a |A=1:B=1:|C=1:D=1:|
|000005e0| 45 3d 31 3a 46 3d 31 3a | 47 3d 31 3a 48 3d 31 3a |E=1:F=1:|G=1:H=1:|
|000005f0| 49 3d 31 3a 4a 3d 31 3a | 4b 3d 31 3a 4c 3d 31 3a |I=1:J=1:|K=1:L=1:|
|00000600| 4d 3d 31 3a 4e 3d 31 3a | 4f 3d 31 3a 50 3d 31 3a |M=1:N=1:|O=1:P=1:|
|00000610| 51 3d 31 3a 52 3d 31 3a | 53 3d 31 3a 54 3d 31 3a |Q=1:R=1:|S=1:T=1:|
|00000620| 55 3d 31 3a 56 3d 31 3a | 57 3d 31 3a 58 3d 30 3a |U=1:V=1:|W=1:X=0:|
|00000630| 59 3d 30 3a 5a 3d 31 0d | 01 18 1c f2 6c 6f 61 64 |Y=0:Z=1.|....load|
|00000640| 28 64 65 66 61 75 6c 74 | 5f 64 61 74 61 62 61 73 |(default|_databas|
|00000650| 65 24 29 0d 01 22 0f f2 | 63 68 61 72 61 63 74 65 |e$).."..|characte|
|00000660| 72 73 0d 01 2c 2e e7 20 | 73 63 72 65 65 6e 5f 70 |rs..,.. |screen_p|
|00000670| 72 6f 67 24 3c 3e 22 3c | 4e 4f 4e 45 3e 22 20 8c |rog$<>"<|NONE>" .|
|00000680| 20 ff 28 73 63 72 65 65 | 6e 5f 70 72 6f 67 24 29 | .(scree|n_prog$)|
|00000690| 0d 01 36 0a 2a 46 58 34 | 2c 31 0d 01 40 05 e1 0d |..6.*FX4|,1..@...|
|000006a0| 01 4a 05 3a 0d 01 54 13 | dd f2 67 65 74 5f 63 6f |.J.:..T.|..get_co|
|000006b0| 6e 66 69 67 75 72 65 0d | 01 5e 08 ea 20 46 25 0d |nfigure.|.^.. F%.|
|000006c0| 01 68 29 f2 62 75 69 6c | 64 5f 63 6f 6e 66 69 67 |.h).buil|d_config|
|000006d0| 75 72 65 3a 46 25 3d a4 | 6f 70 65 6e 69 6e 28 22 |ure:F%=.|openin("|
|000006e0| 43 4f 4e 46 49 47 22 29 | 0d 01 72 2f e7 20 46 25 |CONFIG")|..r/. F%|
|000006f0| 3d 30 20 f2 73 61 76 65 | 5f 63 6f 6e 66 69 67 75 |=0 .save|_configu|
|00000700| 72 65 3a 46 25 3d a4 6f | 70 65 6e 69 6e 28 22 43 |re:F%=.o|penin("C|
|00000710| 4f 4e 46 49 47 22 29 0d | 01 7c 16 e7 20 46 25 3d |ONFIG").|.|.. F%=|
|00000720| 30 20 f2 65 72 72 6f 72 | 28 32 29 3a e1 0d 01 86 |0 .error|(2):....|
|00000730| 1a e8 23 46 25 2c 64 65 | 66 61 75 6c 74 5f 64 61 |..#F%,de|fault_da|
|00000740| 74 61 62 61 73 65 24 0d | 01 90 15 e8 23 46 25 2c |tabase$.|....#F%,|
|00000750| 73 63 72 65 65 6e 5f 64 | 75 6d 70 24 0d 01 9a 15 |screen_d|ump$....|
|00000760| e8 23 46 25 2c 73 63 72 | 65 65 6e 5f 70 72 6f 67 |.#F%,scr|een_prog|
|00000770| 24 0d 01 a4 18 e8 23 46 | 25 2c 72 6f 6f 74 5f 64 |$.....#F|%,root_d|
|00000780| 69 72 65 63 74 6f 72 79 | 24 0d 01 ae 10 e8 23 46 |irectory|$.....#F|
|00000790| 25 2c 70 6f 69 6e 74 73 | 25 0d 01 b8 16 e8 23 46 |%,points|%.....#F|
|000007a0| 25 2c 63 6f 6e 66 69 67 | 75 72 65 5f 6f 6b 25 0d |%,config|ure_ok%.|
|000007b0| 01 c2 0c e8 23 46 25 2c | 6d 61 78 0d 01 cc 11 e8 |....#F%,|max.....|
|000007c0| 23 46 25 2c 70 72 69 6e | 74 65 72 25 0d 01 d6 0f |#F%,prin|ter%....|
|000007d0| e8 23 46 25 2c 6f 73 5f | 6f 6b 25 0d 01 e0 15 e8 |.#F%,os_|ok%.....|
|000007e0| 23 46 25 2c 63 6f 6e 66 | 69 67 5f 70 61 73 73 24 |#F%,conf|ig_pass$|
|000007f0| 0d 01 ea 08 d9 23 46 25 | 0d 01 f4 05 e1 0d 01 fe |.....#F%|........|
|00000800| 05 3a 0d 02 08 13 dd a4 | 6f 70 65 6e 69 6e 28 66 |.:......|openin(f|
|00000810| 69 6c 65 24 29 0d 02 12 | 38 e7 20 63 6f 6d 70 75 |ile$)...|8. compu|
|00000820| 74 65 72 24 3d 22 4e 49 | 4d 42 55 53 22 20 8c 20 |ter$="NI|MBUS" . |
|00000830| 3d 8e 28 72 6f 6f 74 5f | 64 69 72 65 63 74 6f 72 |=.(root_|director|
|00000840| 79 24 2b 22 5c 22 2b 66 | 69 6c 65 24 29 0d 02 1c |y$+"\"+f|ile$)...|
|00000850| 21 3d 8e 28 72 6f 6f 74 | 5f 64 69 72 65 63 74 6f |!=.(root|_directo|
|00000860| 72 79 24 2b 22 2e 22 2b | 66 69 6c 65 24 29 0d 02 |ry$+"."+|file$)..|
|00000870| 26 05 3a 0d 02 30 14 dd | a4 6f 70 65 6e 6f 75 74 |&.:..0..|.openout|
|00000880| 28 66 69 6c 65 24 29 0d | 02 3a 38 e7 20 63 6f 6d |(file$).|.:8. com|
|00000890| 70 75 74 65 72 24 3d 22 | 4e 49 4d 42 55 53 22 20 |puter$="|NIMBUS" |
|000008a0| 8c 20 3d ae 28 72 6f 6f | 74 5f 64 69 72 65 63 74 |. =.(roo|t_direct|
|000008b0| 6f 72 79 24 2b 22 5c 22 | 2b 66 69 6c 65 24 29 0d |ory$+"\"|+file$).|
|000008c0| 02 44 21 3d ae 28 72 6f | 6f 74 5f 64 69 72 65 63 |.D!=.(ro|ot_direc|
|000008d0| 74 6f 72 79 24 2b 22 2e | 22 2b 66 69 6c 65 24 29 |tory$+".|"+file$)|
|000008e0| 0d 02 4e 05 3a 0d 02 58 | 0e dd a4 63 6f 6d 70 75 |..N.:..X|...compu|
|000008f0| 74 65 72 0d 02 62 10 63 | 6f 6d 70 3d a6 28 2d 32 |ter..b.c|omp=.(-2|
|00000900| 35 36 29 0d 02 6c 34 f4 | 20 20 52 49 53 43 4f 53 |56)..l4.|  RISCOS|
|00000910| 20 32 2e 30 30 2c 20 32 | 2e 31 30 2c 20 33 2e 30 | 2.00, 2|.10, 3.0|
|00000920| 30 20 41 4e 44 20 33 2e | 31 30 20 72 65 73 70 65 |0 AND 3.|10 respe|
|00000930| 63 74 69 76 65 6c 79 0d | 02 76 38 e7 20 63 6f 6d |ctively.|.v8. com|
|00000940| 70 3d 31 36 31 20 84 20 | 63 6f 6d 70 3d 31 36 32 |p=161 . |comp=162|
|00000950| 20 84 20 63 6f 6d 70 3d | 31 36 33 20 84 20 63 6f | . comp=|163 . co|
|00000960| 6d 70 3d 31 36 34 20 8c | 20 3d 22 41 52 43 22 0d |mp=164 .| ="ARC".|
|00000970| 02 80 18 e7 20 63 6f 6d | 70 3d 30 20 8c 20 3d 22 |.... com|p=0 . ="|
|00000980| 4e 49 4d 42 55 53 22 0d | 02 8a 05 db 0d 02 94 24 |NIMBUS".|.......$|
|00000990| f1 8a 30 2c 31 30 29 20 | 22 57 68 69 63 68 20 69 |..0,10) |"Which i|
|000009a0| 73 20 79 6f 75 72 20 6d | 61 63 68 69 6e 65 3a 22 |s your m|achine:"|
|000009b0| 0d 02 9e 1c f1 8a 35 2c | 31 32 29 20 22 31 2e 2e |......5,|12) "1..|
|000009c0| 2e 41 72 63 68 69 6d 65 | 64 65 73 22 0d 02 a8 17 |.Archime|des"....|
|000009d0| f1 8a 35 2c 31 33 29 20 | 22 32 2e 2e 2e 4f 74 68 |..5,13) |"2...Oth|
|000009e0| 65 72 22 0d 02 b2 05 f5 | 0d 02 bc 0f f1 8a 30 2c |er".....|......0,|
|000009f0| 31 35 29 20 89 32 30 0d | 02 c6 23 e8 8a 30 2c 31 |15) .20.|..#..0,1|
|00000a00| 35 29 20 22 45 6e 74 65 | 72 20 28 31 2f 32 29 3a |5) "Ente|r (1/2):|
|00000a10| 20 22 6d 61 63 68 69 6e | 65 24 0d 02 d0 24 fd 20 | "machin|e$...$. |
|00000a20| a7 22 31 32 22 2c 6d 61 | 63 68 69 6e 65 24 29 20 |."12",ma|chine$) |
|00000a30| 80 20 6d 61 63 68 69 6e | 65 24 3c 3e 22 22 0d 02 |. machin|e$<>""..|
|00000a40| da 38 e7 20 6d 61 63 68 | 69 6e 65 24 3d 22 31 22 |.8. mach|ine$="1"|
|00000a50| 20 8c 20 3d 22 41 52 43 | 22 3a f4 20 61 73 73 75 | . ="ARC|":. assu|
|00000a60| 6d 65 20 73 61 6d 65 20 | 61 73 20 41 33 31 30 2c |me same |as A310,|
|00000a70| 20 41 35 30 30 30 0d 02 | e4 0a 3d 22 42 42 43 22 | A5000..|..="BBC"|
|00000a80| 0d 02 ee 05 3a 0d 02 f8 | 15 dd f2 62 75 69 6c 64 |....:...|...build|
|00000a90| 5f 63 6f 6e 66 69 67 75 | 72 65 0d 03 02 1f f4 20 |_configu|re..... |
|00000aa0| 79 6f 75 20 63 61 6e 20 | 61 6c 74 65 72 20 74 68 |you can |alter th|
|00000ab0| 65 73 65 20 6c 69 6e 65 | 73 0d 03 0c 1c 63 6f 6e |ese line|s....con|
|00000ac0| 66 69 67 5f 70 61 73 73 | 24 3d 22 43 4f 4e 46 49 |fig_pass|$="CONFI|
|00000ad0| 47 55 52 45 22 0d 03 16 | 17 63 6f 6d 70 75 74 65 |GURE"...|.compute|
|00000ae0| 72 24 3d a4 63 6f 6d 70 | 75 74 65 72 0d 03 20 49 |r$=.comp|uter.. I|
|00000af0| f4 20 4d 53 2d 44 4f 53 | 20 75 73 65 72 73 20 61 |. MS-DOS| users a|
|00000b00| 6c 74 65 72 20 6e 65 78 | 74 20 6c 69 6e 65 20 74 |lter nex|t line t|
|00000b10| 6f 20 64 61 74 61 20 64 | 72 69 76 65 20 28 6d 75 |o data d|rive (mu|
|00000b20| 73 74 20 68 61 76 65 20 | 77 72 69 74 65 20 61 63 |st have |write ac|
|00000b30| 63 65 73 73 29 0d 03 2a | 2f e7 20 63 6f 6d 70 75 |cess)..*|/. compu|
|00000b40| 74 65 72 24 3d 22 4e 49 | 4d 42 55 53 22 20 8c 20 |ter$="NI|MBUS" . |
|00000b50| 72 6f 6f 74 5f 64 69 72 | 65 63 74 6f 72 79 24 3d |root_dir|ectory$=|
|00000b60| 22 4e 3a 22 0d 03 34 3e | e7 20 63 6f 6d 70 75 74 |"N:"..4>|. comput|
|00000b70| 65 72 24 3d 22 41 52 43 | 22 20 8c 20 72 6f 6f 74 |er$="ARC|" . root|
|00000b80| 5f 64 69 72 65 63 74 6f | 72 79 24 3d 22 3c 4f 62 |_directo|ry$="<Ob|
|00000b90| 65 79 24 44 69 72 3e 22 | 3a ff 22 4b 65 79 30 20 |ey$Dir>"|:."Key0 |
|00000ba0| 2a 22 0d 03 3e 2b e7 20 | 63 6f 6d 70 75 74 65 72 |*"..>+. |computer|
|00000bb0| 24 3d 22 42 42 43 22 20 | 8c 20 72 6f 6f 74 5f 64 |$="BBC" |. root_d|
|00000bc0| 69 72 65 63 74 6f 72 79 | 24 3d 22 24 22 0d 03 48 |irectory|$="$"..H|
|00000bd0| 4b f4 20 54 68 65 73 65 | 20 76 61 6c 75 65 73 20 |K. These| values |
|00000be0| 61 72 65 20 64 65 66 61 | 75 6c 74 2c 20 74 68 65 |are defa|ult, the|
|00000bf0| 79 20 63 61 6e 20 62 65 | 20 61 6c 74 65 72 65 64 |y can be| altered|
|00000c00| 20 66 72 6f 6d 20 63 6f | 6e 66 69 67 75 72 61 74 | from co|nfigurat|
|00000c10| 69 6f 6e 20 6d 65 6e 75 | 0d 03 52 1e 64 65 66 61 |ion menu|..R.defa|
|00000c20| 75 6c 74 5f 64 61 74 61 | 62 61 73 65 24 3d 22 3c |ult_data|base$="<|
|00000c30| 4e 4f 4e 45 3e 22 0d 03 | 5c 2f 73 63 72 65 65 6e |NONE>"..|\/screen|
|00000c40| 5f 64 75 6d 70 24 3d 22 | 3c 4e 4f 4e 45 3e 22 3a |_dump$="|<NONE>":|
|00000c50| 73 63 72 65 65 6e 5f 70 | 72 6f 67 24 3d 22 3c 4e |screen_p|rog$="<N|
|00000c60| 4f 4e 45 3e 22 0d 03 66 | 13 63 6f 6e 66 69 67 75 |ONE>"..f|.configu|
|00000c70| 72 65 5f 6f 6b 25 3d a3 | 0d 03 70 18 6d 61 78 3d |re_ok%=.|..p.max=|
|00000c80| 31 30 30 3a 70 6f 69 6e | 74 73 25 3d 31 30 30 30 |100:poin|ts%=1000|
|00000c90| 0d 03 7a 0e 70 72 69 6e | 74 65 72 25 3d b9 0d 03 |..z.prin|ter%=...|
|00000ca0| 84 0c 6f 73 5f 6f 6b 25 | 3d a3 0d 03 8e 05 e1 0d |..os_ok%|=.......|
|00000cb0| 03 98 05 3a 0d 03 a2 14 | dd f2 73 61 76 65 5f 63 |...:....|..save_c|
|00000cc0| 6f 6e 66 69 67 75 72 65 | 0d 03 ac 08 ea 20 46 25 |onfigure|..... F%|
|00000cd0| 0d 03 b6 19 46 25 3d a4 | 6f 70 65 6e 6f 75 74 28 |....F%=.|openout(|
|00000ce0| 22 43 4f 4e 46 49 47 22 | 29 0d 03 c0 16 e7 20 46 |"CONFIG"|)..... F|
|00000cf0| 25 3d 30 20 f2 65 72 72 | 6f 72 28 31 29 3a e1 0d |%=0 .err|or(1):..|
|00000d00| 03 ca 1a f1 23 46 25 2c | 64 65 66 61 75 6c 74 5f |....#F%,|default_|
|00000d10| 64 61 74 61 62 61 73 65 | 24 0d 03 d4 15 f1 23 46 |database|$.....#F|
|00000d20| 25 2c 73 63 72 65 65 6e | 5f 64 75 6d 70 24 0d 03 |%,screen|_dump$..|
|00000d30| de 15 f1 23 46 25 2c 73 | 63 72 65 65 6e 5f 70 72 |...#F%,s|creen_pr|
|00000d40| 6f 67 24 0d 03 e8 18 f1 | 23 46 25 2c 72 6f 6f 74 |og$.....|#F%,root|
|00000d50| 5f 64 69 72 65 63 74 6f | 72 79 24 0d 03 f2 10 f1 |_directo|ry$.....|
|00000d60| 23 46 25 2c 70 6f 69 6e | 74 73 25 0d 03 fc 16 f1 |#F%,poin|ts%.....|
|00000d70| 23 46 25 2c 63 6f 6e 66 | 69 67 75 72 65 5f 6f 6b |#F%,conf|igure_ok|
|00000d80| 25 0d 04 06 0c f1 23 46 | 25 2c 6d 61 78 0d 04 10 |%.....#F|%,max...|
|00000d90| 11 f1 23 46 25 2c 70 72 | 69 6e 74 65 72 25 0d 04 |..#F%,pr|inter%..|
|00000da0| 1a 0f f1 23 46 25 2c 6f | 73 5f 6f 6b 25 0d 04 24 |...#F%,o|s_ok%..$|
|00000db0| 15 f1 23 46 25 2c 63 6f | 6e 66 69 67 5f 70 61 73 |..#F%,co|nfig_pas|
|00000dc0| 73 24 0d 04 2e 08 d9 23 | 46 25 0d 04 38 05 e1 0d |s$.....#|F%..8...|
|00000dd0| 04 42 05 3a 0d 04 4c 11 | dd f2 6c 6f 61 64 28 66 |.B.:..L.|..load(f|
|00000de0| 69 6c 65 24 29 0d 04 56 | 0a ea 20 46 25 2c 6e 0d |ile$)..V|.. F%,n.|
|00000df0| 04 60 21 e7 20 66 69 6c | 65 24 3d 22 22 20 84 20 |.`!. fil|e$="" . |
|00000e00| 66 69 6c 65 24 3d 22 3c | 4e 4f 4e 45 3e 22 20 e1 |file$="<|NONE>" .|
|00000e10| 0d 04 6a 13 f4 20 6c 6f | 61 64 20 64 61 74 61 62 |..j.. lo|ad datab|
|00000e20| 61 73 65 0d 04 74 15 46 | 25 3d a4 6f 70 65 6e 69 |ase..t.F|%=.openi|
|00000e30| 6e 28 66 69 6c 65 24 29 | 0d 04 7e 16 e7 20 46 25 |n(file$)|..~.. F%|
|00000e40| 3d 30 20 f2 65 72 72 6f | 72 28 34 29 3a e1 0d 04 |=0 .erro|r(4):...|
|00000e50| 88 10 e8 23 46 25 2c 73 | 74 6f 72 65 64 25 0d 04 |...#F%,s|tored%..|
|00000e60| 92 13 e3 20 6e 3d 31 20 | b8 20 73 74 6f 72 65 64 |... n=1 |. stored|
|00000e70| 25 0d 04 9c 2a e8 23 46 | 25 2c 73 74 6f 72 65 64 |%...*.#F|%,stored|
|00000e80| 5f 66 75 6e 63 24 28 6e | 29 2c 73 74 6f 72 65 64 |_func$(n|),stored|
|00000e90| 5f 62 61 73 69 63 76 24 | 28 6e 29 0d 04 a6 26 e8 |_basicv$|(n)...&.|
|00000ea0| 23 46 25 2c 73 74 6f 72 | 65 64 5f 78 6d 69 6e 28 |#F%,stor|ed_xmin(|
|00000eb0| 6e 29 2c 73 74 6f 72 65 | 64 5f 78 6d 61 78 28 6e |n),store|d_xmax(n|
|00000ec0| 29 0d 04 b0 26 e8 23 46 | 25 2c 73 74 6f 72 65 64 |)...&.#F|%,stored|
|00000ed0| 5f 79 6d 69 6e 28 6e 29 | 2c 73 74 6f 72 65 64 5f |_ymin(n)|,stored_|
|00000ee0| 79 6d 61 78 28 6e 29 0d | 04 ba 16 e8 23 46 25 2c |ymax(n).|....#F%,|
|00000ef0| 66 72 65 65 5f 73 70 61 | 63 65 28 6e 29 0d 04 c4 |free_spa|ce(n)...|
|00000f00| 05 ed 0d 04 ce 08 d9 23 | 46 25 0d 04 d8 05 e1 0d |.......#|F%......|
|00000f10| 04 e2 05 3a 0d 04 ec 11 | dd f2 73 61 76 65 28 66 |...:....|..save(f|
|00000f20| 69 6c 65 24 29 0d 04 f6 | 0a ea 20 6e 2c 66 25 0d |ile$)...|.. n,f%.|
|00000f30| 05 00 2f e7 20 66 69 6c | 65 24 3d 22 22 20 84 20 |../. fil|e$="" . |
|00000f40| 66 69 6c 65 24 3d 22 3c | 4e 4f 4e 45 3e 22 20 84 |file$="<|NONE>" .|
|00000f50| 20 73 74 6f 72 65 64 25 | 3d 30 20 8c 20 e1 0d 05 | stored%|=0 . ...|
|00000f60| 0a 13 f4 20 73 61 76 65 | 20 64 61 74 61 62 61 73 |... save| databas|
|00000f70| 65 0d 05 14 16 46 25 3d | a4 6f 70 65 6e 6f 75 74 |e....F%=|.openout|
|00000f80| 28 66 69 6c 65 24 29 0d | 05 1e 16 e7 20 46 25 3d |(file$).|.... F%=|
|00000f90| 30 20 f2 65 72 72 6f 72 | 28 35 29 3a e1 0d 05 28 |0 .error|(5):...(|
|00000fa0| 10 f1 23 46 25 2c 73 74 | 6f 72 65 64 25 0d 05 32 |..#F%,st|ored%..2|
|00000fb0| 13 e3 20 6e 3d 31 20 b8 | 20 73 74 6f 72 65 64 25 |.. n=1 .| stored%|
|00000fc0| 0d 05 3c 2a f1 23 46 25 | 2c 73 74 6f 72 65 64 5f |..<*.#F%|,stored_|
|00000fd0| 66 75 6e 63 24 28 6e 29 | 2c 73 74 6f 72 65 64 5f |func$(n)|,stored_|
|00000fe0| 62 61 73 69 63 76 24 28 | 6e 29 0d 05 46 26 f1 23 |basicv$(|n)..F&.#|
|00000ff0| 46 25 2c 73 74 6f 72 65 | 64 5f 78 6d 69 6e 28 6e |F%,store|d_xmin(n|
|00001000| 29 2c 73 74 6f 72 65 64 | 5f 78 6d 61 78 28 6e 29 |),stored|_xmax(n)|
|00001010| 0d 05 50 26 f1 23 46 25 | 2c 73 74 6f 72 65 64 5f |..P&.#F%|,stored_|
|00001020| 79 6d 69 6e 28 6e 29 2c | 73 74 6f 72 65 64 5f 79 |ymin(n),|stored_y|
|00001030| 6d 61 78 28 6e 29 0d 05 | 5a 16 f1 23 46 25 2c 66 |max(n)..|Z..#F%,f|
|00001040| 72 65 65 5f 73 70 61 63 | 65 28 6e 29 0d 05 64 05 |ree_spac|e(n)..d.|
|00001050| ed 0d 05 6e 08 d9 23 46 | 25 0d 05 78 05 e1 0d 05 |...n..#F|%..x....|
|00001060| 82 05 3a 0d 05 8c 10 dd | a4 63 65 6e 74 72 65 28 |..:.....|.centre(|
|00001070| 61 24 29 0d 05 96 18 3d | c4 28 37 39 2d a9 61 24 |a$)....=|.(79-.a$|
|00001080| 29 81 32 2c 22 20 22 29 | 2b 61 24 0d 05 a0 05 3a |).2," ")|+a$....:|
|00001090| 0d 05 aa 0e dd a4 63 68 | 6f 70 28 61 24 29 0d 05 |......ch|op(a$)..|
|000010a0| b4 1e e7 20 a9 61 24 3e | 32 35 20 8c 20 3d c0 61 |... .a$>|25 . =.a|
|000010b0| 24 2c 32 32 29 2b 22 20 | 2e 2e 2e 22 0d 05 be 07 |$,22)+" |..."....|
|000010c0| 3d 61 24 0d 05 c8 05 3a | 0d 05 d2 11 dd a4 65 6e |=a$....:|......en|
|000010d0| 61 62 6c 65 64 28 61 25 | 29 0d 05 dc 25 e7 20 61 |abled(a%|)...%. a|
|000010e0| 25 3d b9 20 8c 20 3d 22 | 45 6e 61 62 6c 65 64 22 |%=. . ="|Enabled"|
|000010f0| 20 8b 20 3d 22 44 69 73 | 61 62 6c 65 64 22 0d 05 | . ="Dis|abled"..|
|00001100| e6 05 3a 0d 05 f0 16 dd | f2 73 68 6f 77 5f 66 6f |..:.....|.show_fo|
|00001110| 72 6d 75 6c 61 73 28 79 | 29 0d 05 fa 07 ea 20 78 |rmulas(y|)..... x|
|00001120| 0d 06 04 12 f1 8a 31 2c | 79 29 c4 37 38 2c 22 5f |......1,|y).78,"_|
|00001130| 22 29 0d 06 0e 48 f1 8a | 31 2c 79 2b 32 29 22 6e |")...H..|1,y+2)"n|
|00001140| 22 8a 34 29 22 46 75 6e | 63 74 69 6f 6e 22 8a 33 |".4)"Fun|ction".3|
|00001150| 39 29 22 6d 69 6e 20 78 | 22 8a 34 39 29 22 6d 61 |9)"min x|".49)"ma|
|00001160| 78 20 78 22 8a 35 39 29 | 22 6d 69 6e 20 79 22 8a |x x".59)|"min y".|
|00001170| 36 39 29 22 6d 61 78 20 | 79 22 0d 06 18 0e e3 20 |69)"max |y"..... |
|00001180| 78 3d 31 20 b8 20 31 30 | 0d 06 22 12 f1 8a 31 2c |x=1 . 10|.."...1,|
|00001190| 79 2b 78 2b 32 29 22 22 | 3b 78 0d 06 2c 41 e7 20 |y+x+2)""|;x..,A. |
|000011a0| 66 75 6e 63 24 28 78 29 | 3c 3e 22 22 20 f1 8a 35 |func$(x)|<>"" ..5|
|000011b0| 2c 79 2b 78 2b 32 29 22 | 79 3d 22 3b 66 75 6e 63 |,y+x+2)"|y=";func|
|000011c0| 24 28 78 29 20 8b 20 f1 | 8a 32 30 2c 79 2b 78 2b |$(x) . .|.20,y+x+|
|000011d0| 32 29 22 3c 42 6c 61 6e | 6b 3e 22 0d 06 36 50 f1 |2)"<Blan|k>"..6P.|
|000011e0| 8a 34 30 2c 79 2b 78 2b | 32 29 3b 78 6d 69 6e 28 |.40,y+x+|2);xmin(|
|000011f0| 78 29 3b 8a 35 30 2c 79 | 2b 78 2b 32 29 3b 78 6d |x);.50,y|+x+2);xm|
|00001200| 61 78 28 78 29 3b 8a 36 | 30 2c 79 2b 78 2b 32 29 |ax(x);.6|0,y+x+2)|
|00001210| 3b 79 6d 69 6e 28 78 29 | 3b 8a 37 30 2c 79 2b 78 |;ymin(x)|;.70,y+x|
|00001220| 2b 32 29 3b 79 6d 61 78 | 28 78 29 0d 06 40 05 ed |+2);ymax|(x)..@..|
|00001230| 0d 06 4a 05 e1 0d 06 54 | 05 3a 0d 06 5e 1b dd f2 |..J....T|.:..^...|
|00001240| 68 69 67 68 5f 66 6f 72 | 6d 75 6c 61 28 79 2c 68 |high_for|mula(y,h|
|00001250| 69 67 68 25 29 0d 06 68 | 0b fb 30 3a fb 31 32 39 |igh%)..h|..0:.129|
|00001260| 0d 06 72 1a f1 8a 31 2c | 79 2b 68 69 67 68 25 2b |..r...1,|y+high%+|
|00001270| 32 29 22 22 3b 68 69 67 | 68 25 0d 06 7c 51 e7 20 |2)"";hig|h%..|Q. |
|00001280| 66 75 6e 63 24 28 68 69 | 67 68 25 29 3c 3e 22 22 |func$(hi|gh%)<>""|
|00001290| 20 f1 8a 35 2c 79 2b 68 | 69 67 68 25 2b 32 29 22 | ..5,y+h|igh%+2)"|
|000012a0| 79 3d 22 3b 66 75 6e 63 | 24 28 68 69 67 68 25 29 |y=";func|$(high%)|
|000012b0| 20 8b 20 f1 8a 32 30 2c | 79 2b 68 69 67 68 25 2b | . ..20,|y+high%+|
|000012c0| 32 29 22 3c 42 6c 61 6e | 6b 3e 22 0d 06 86 70 f1 |2)"<Blan|k>"...p.|
|000012d0| 8a 34 30 2c 79 2b 68 69 | 67 68 25 2b 32 29 3b 78 |.40,y+hi|gh%+2);x|
|000012e0| 6d 69 6e 28 68 69 67 68 | 25 29 3b 8a 35 30 2c 79 |min(high|%);.50,y|
|000012f0| 2b 68 69 67 68 25 2b 32 | 29 3b 78 6d 61 78 28 68 |+high%+2|);xmax(h|
|00001300| 69 67 68 25 29 3b 8a 36 | 30 2c 79 2b 68 69 67 68 |igh%);.6|0,y+high|
|00001310| 25 2b 32 29 3b 79 6d 69 | 6e 28 68 69 67 68 25 29 |%+2);ymi|n(high%)|
|00001320| 3b 8a 37 30 2c 79 2b 68 | 69 67 68 25 2b 32 29 3b |;.70,y+h|igh%+2);|
|00001330| 79 6d 61 78 28 68 69 67 | 68 25 29 0d 06 90 0b fb |ymax(hig|h%).....|
|00001340| 31 3a fb 31 32 38 0d 06 | 9a 05 e1 0d 06 a4 05 3a |1:.128..|.......:|
|00001350| 0d 06 ae 12 dd f2 73 68 | 6f 77 5f 74 69 6d 65 28 |......sh|ow_time(|
|00001360| 79 29 0d 06 b8 17 e7 20 | 63 6f 6d 70 75 74 65 72 |y)..... |computer|
|00001370| 24 3d 22 42 42 43 22 20 | e1 0d 06 c2 1e f1 8a 35 |$="BBC" |.......5|
|00001380| 30 2c 79 29 22 54 69 6d | 65 3a 20 22 3b c0 91 24 |0,y)"Tim|e: ";..$|
|00001390| 2c a9 91 24 2d 33 29 0d | 06 cc 05 e1 0d 06 d6 05 |,..$-3).|........|
|000013a0| 3a 0d 06 e0 0b dd f2 74 | 69 74 6c 65 0d 06 ea 4e |:......t|itle...N|
|000013b0| e7 20 63 6f 6d 70 75 74 | 65 72 24 3d 22 4e 49 4d |. comput|er$="NIM|
|000013c0| 42 55 53 22 20 f2 72 65 | 63 74 61 6e 67 6c 65 28 |BUS" .re|ctangle(|
|000013d0| 35 2c 35 2c 31 32 36 38 | 2c 39 38 31 29 3a f2 72 |5,5,1268|,981):.r|
|000013e0| 65 63 74 61 6e 67 6c 65 | 28 31 30 2c 31 30 2c 31 |ectangle|(10,10,1|
|000013f0| 32 35 38 2c 39 37 31 29 | 3a e1 0d 06 f4 39 f2 72 |258,971)|:....9.r|
|00001400| 65 63 74 61 6e 67 6c 65 | 28 35 2c 35 2c 31 32 36 |ectangle|(5,5,126|
|00001410| 38 2c 31 30 31 34 29 3a | f2 72 65 63 74 61 6e 67 |8,1014):|.rectang|
|00001420| 6c 65 28 31 30 2c 31 30 | 2c 31 32 35 38 2c 31 30 |le(10,10|,1258,10|
|00001430| 30 34 29 0d 06 fe 05 e1 | 0d 07 08 05 3a 0d 07 12 |04).....|....:...|
|00001440| 18 dd f2 72 65 63 74 61 | 6e 67 6c 65 28 78 2c 79 |...recta|ngle(x,y|
|00001450| 2c 77 2c 68 29 0d 07 1c | 28 ec 78 2c 79 3a df 20 |,w,h)...|(.x,y:. |
|00001460| 78 2b 77 2c 79 3a df 20 | 78 2b 77 2c 79 2b 68 3a |x+w,y:. |x+w,y+h:|
|00001470| df 20 78 2c 79 2b 68 3a | df 20 78 2c 79 0d 07 26 |. x,y+h:|. x,y..&|
|00001480| 05 e1 0d 07 30 05 3a 0d | 07 3a 0e dd f2 6d 61 69 |....0.:.|.:...mai|
|00001490| 6e 6d 65 6e 75 0d 07 44 | 0c ea 20 4b 45 59 24 2c |nmenu..D|.. KEY$,|
|000014a0| 78 0d 07 4e 10 db 3a ef | 31 39 2c 30 2c 34 3b 30 |x..N..:.|19,0,4;0|
|000014b0| 3b 0d 07 58 29 f1 8a 30 | 2c 34 29 a4 63 65 6e 74 |;..X)..0|,4).cent|
|000014c0| 72 65 28 22 4d 20 41 20 | 49 20 4e 20 20 20 20 20 |re("M A |I N     |
|000014d0| 20 4d 20 45 20 4e 20 55 | 22 29 0d 07 62 31 f1 8a | M E N U|")..b1..|
|000014e0| 32 2c 36 29 22 50 6c 65 | 61 73 65 20 73 65 6c 65 |2,6)"Ple|ase sele|
|000014f0| 63 74 20 6f 70 74 69 6f | 6e 20 77 69 74 68 20 6e |ct optio|n with n|
|00001500| 75 6d 62 65 72 20 6b 65 | 79 3a 22 0d 07 6c 64 e7 |umber ke|y:"..ld.|
|00001510| 20 66 75 6e 63 74 69 6f | 6e 25 3d 30 20 f1 8a 38 | functio|n%=0 ..8|
|00001520| 2c 31 30 29 22 2a 20 31 | 2e 2e 2e 2e 44 72 61 77 |,10)"* 1|....Draw|
|00001530| 69 6e 67 2f 70 6c 6f 74 | 74 69 6e 67 20 6f 70 74 |ing/plot|ting opt|
|00001540| 69 6f 6e 73 22 20 8b 20 | f1 8a 31 30 2c 31 30 29 |ions" . |..10,10)|
|00001550| 22 31 2e 2e 2e 2e 44 72 | 61 77 69 6e 67 2f 70 6c |"1....Dr|awing/pl|
|00001560| 6f 74 74 69 6e 67 20 6f | 70 74 69 6f 6e 73 22 0d |otting o|ptions".|
|00001570| 07 76 24 f1 8a 31 30 2c | 31 32 29 22 32 2e 2e 2e |.v$..10,|12)"2...|
|00001580| 2e 45 64 69 74 20 6c 69 | 6e 65 20 64 65 74 61 69 |.Edit li|ne detai|
|00001590| 6c 73 22 0d 07 80 30 f1 | 8a 31 30 2c 31 34 29 22 |ls"...0.|.10,14)"|
|000015a0| 33 2e 2e 2e 2e 53 74 6f | 72 65 64 20 6c 69 6e 65 |3....Sto|red line|
|000015b0| 73 20 64 61 74 61 62 61 | 73 65 20 6f 70 74 69 6f |s databa|se optio|
|000015c0| 6e 73 22 0d 07 8a 1d f1 | 8a 31 30 2c 31 36 29 22 |ns".....|.10,16)"|
|000015d0| 34 2e 2e 2e 2e 43 61 6c | 63 75 6c 61 74 6f 72 22 |4....Cal|culator"|
|000015e0| 0d 07 94 2a f1 8a 31 30 | 2c 31 38 29 22 35 2e 2e |...*..10|,18)"5..|
|000015f0| 2e 2e 4d 61 74 68 65 6d | 61 74 69 63 61 6c 20 6f |..Mathem|atical o|
|00001600| 70 65 72 61 74 69 6f 6e | 73 22 0d 07 9e 5a e7 20 |peration|s"...Z. |
|00001610| 63 6f 6e 66 69 67 75 72 | 65 5f 6f 6b 25 3d a3 20 |configur|e_ok%=. |
|00001620| f1 8a 38 2c 32 30 29 22 | 2a 20 36 2e 2e 2e 2e 43 |..8,20)"|* 6....C|
|00001630| 6f 6e 66 69 67 75 72 65 | 20 70 72 6f 67 72 61 6d |onfigure| program|
|00001640| 22 20 8b 20 f1 8a 31 30 | 2c 32 30 29 22 36 2e 2e |" . ..10|,20)"6..|
|00001650| 2e 2e 43 6f 6e 66 69 67 | 75 72 65 20 70 72 6f 67 |..Config|ure prog|
|00001660| 72 61 6d 22 0d 07 a8 71 | e7 20 6f 73 5f 6f 6b 25 |ram"...q|. os_ok%|
|00001670| 3d a3 20 f1 8a 38 2c 32 | 32 29 22 2a 20 37 2e 2e |=. ..8,2|2)"* 7..|
|00001680| 2e 2e 50 65 72 66 6f 72 | 6d 20 6f 70 65 72 61 74 |..Perfor|m operat|
|00001690| 69 6e 67 20 73 79 73 74 | 65 6d 20 63 6f 6d 6d 61 |ing syst|em comma|
|000016a0| 6e 64 22 20 8b 20 f1 8a | 31 30 2c 32 32 29 22 37 |nd" . ..|10,22)"7|
|000016b0| 2e 2e 2e 2e 50 65 72 66 | 6f 72 6d 20 6f 70 65 72 |....Perf|orm oper|
|000016c0| 61 74 69 6e 67 20 73 79 | 73 74 65 6d 20 63 6f 6d |ating sy|stem com|
|000016d0| 6d 61 6e 64 22 0d 07 b2 | 1f f1 8a 31 30 2c 32 34 |mand"...|...10,24|
|000016e0| 29 22 38 2e 2e 2e 2e 51 | 75 69 74 20 70 72 6f 67 |)"8....Q|uit prog|
|000016f0| 72 61 6d 22 0d 07 bc 23 | f1 8a 32 2c 32 38 29 22 |ram"...#|..2,28)"|
|00001700| 57 68 69 63 68 20 64 6f | 20 79 6f 75 20 77 61 6e |Which do| you wan|
|00001710| 74 3f 20 5b 20 5d 22 0d | 07 c6 0a f2 74 69 74 6c |t? [ ]".|....titl|
|00001720| 65 0d 07 d0 12 f2 73 68 | 6f 77 5f 74 69 6d 65 28 |e.....sh|ow_time(|
|00001730| 33 30 29 0d 07 da 05 f5 | 0d 07 e4 0a 78 3d a6 28 |30).....|....x=.(|
|00001740| 30 29 0d 07 ee 1e e7 20 | 78 3c 3e 2d 31 20 4b 45 |0)..... |x<>-1 KE|
|00001750| 59 24 3d bd 78 20 8b 20 | 4b 45 59 24 3d 22 20 22 |Y$=.x . |KEY$=" "|
|00001760| 0d 07 f8 21 e7 20 91 3e | 31 30 30 30 20 8c 20 d1 |...!. .>|1000 . .|
|00001770| 3d 30 3a f2 73 68 6f 77 | 5f 74 69 6d 65 28 33 30 |=0:.show|_time(30|
|00001780| 29 0d 08 02 0e f1 20 8a | 32 32 2c 32 38 29 3b 0d |)..... .|22,28);.|
|00001790| 08 0c 17 fd 20 a7 22 31 | 32 33 34 35 36 37 38 22 |.... ."1|2345678"|
|000017a0| 2c 4b 45 59 24 29 0d 08 | 16 26 e7 20 4b 45 59 24 |,KEY$)..|.&. KEY$|
|000017b0| 3d 22 31 22 20 80 20 66 | 75 6e 63 74 69 6f 6e 25 |="1" . f|unction%|
|000017c0| 3e 30 20 f2 70 6c 6f 74 | 5f 6f 70 73 0d 08 20 1a |>0 .plot|_ops.. .|
|000017d0| e7 20 4b 45 59 24 3d 22 | 32 22 20 f2 65 64 69 74 |. KEY$="|2" .edit|
|000017e0| 5f 6c 69 6e 65 73 0d 08 | 2a 1c e7 20 4b 45 59 24 |_lines..|*.. KEY$|
|000017f0| 3d 22 33 22 20 f2 64 61 | 74 61 62 61 73 65 5f 6f |="3" .da|tabase_o|
|00001800| 70 73 0d 08 34 1a e7 20 | 4b 45 59 24 3d 22 34 22 |ps..4.. |KEY$="4"|
|00001810| 20 f2 63 61 6c 63 75 6c | 61 74 6f 72 0d 08 3e 19 | .calcul|ator..>.|
|00001820| e7 20 4b 45 59 24 3d 22 | 35 22 20 f2 6d 61 74 68 |. KEY$="|5" .math|
|00001830| 73 5f 6f 70 73 0d 08 48 | 1e e7 20 4b 45 59 24 3d |s_ops..H|.. KEY$=|
|00001840| 22 37 22 20 80 20 6f 73 | 5f 6f 6b 25 20 f2 6f 73 |"7" . os|_ok% .os|
|00001850| 63 6c 69 0d 08 52 29 e7 | 20 4b 45 59 24 3d 22 36 |cli..R).| KEY$="6|
|00001860| 22 20 80 20 63 6f 6e 66 | 69 67 75 72 65 5f 6f 6b |" . conf|igure_ok|
|00001870| 25 20 f2 63 6f 6e 66 69 | 67 75 72 65 0d 08 5c 16 |% .confi|gure..\.|
|00001880| e7 20 4b 45 59 24 3d 22 | 38 22 20 71 75 69 74 25 |. KEY$="|8" quit%|
|00001890| 3d b9 0d 08 66 05 e1 0d | 08 70 05 3a 0d 08 7a 0e |=...f...|.p.:..z.|
|000018a0| dd f2 70 6c 6f 74 5f 6f | 70 73 0d 08 84 0c ea 20 |..plot_o|ps..... |
|000018b0| 4b 45 59 24 2c 78 0d 08 | 8e 05 f5 0d 08 98 10 db |KEY$,x..|........|
|000018c0| 3a ef 31 39 2c 30 2c 34 | 3b 30 3b 0d 08 a2 35 f1 |:.19,0,4|;0;...5.|
|000018d0| 8a 30 2c 34 29 a4 63 65 | 6e 74 72 65 28 22 50 20 |.0,4).ce|ntre("P |
|000018e0| 4c 20 4f 20 54 20 54 20 | 49 20 4e 20 47 20 20 20 |L O T T |I N G   |
|000018f0| 20 4f 20 50 20 54 20 49 | 20 4f 20 4e 20 53 22 29 | O P T I| O N S")|
|00001900| 0d 08 ac 31 f1 8a 32 2c | 36 29 22 50 6c 65 61 73 |...1..2,|6)"Pleas|
|00001910| 65 20 73 65 6c 65 63 74 | 20 6f 70 74 69 6f 6e 20 |e select| option |
|00001920| 77 69 74 68 20 6e 75 6d | 62 65 72 20 6b 65 79 3a |with num|ber key:|
|00001930| 22 0d 08 b6 2d f1 8a 31 | 30 2c 38 29 22 31 2e 2e |"...-..1|0,8)"1..|
|00001940| 2e 2e 50 6c 6f 74 20 61 | 6c 6c 20 6c 69 6e 65 73 |..Plot a|ll lines|
|00001950| 20 6f 6e 20 73 61 6d 65 | 20 61 78 65 73 22 0d 08 | on same| axes"..|
|00001960| c0 22 f1 8a 31 30 2c 39 | 29 22 32 2e 2e 2e 2e 50 |."..10,9|)"2....P|
|00001970| 6c 6f 74 20 73 69 6e 67 | 6c 65 20 6c 69 6e 65 22 |lot sing|le line"|
|00001980| 0d 08 ca 32 f1 8a 31 30 | 2c 31 30 29 22 33 2e 2e |...2..10|,10)"3..|
|00001990| 2e 2e 50 6c 6f 74 20 73 | 69 6e 67 6c 65 20 6c 69 |..Plot s|ingle li|
|000019a0| 6e 65 20 77 69 74 68 20 | 76 61 72 69 61 62 6c 65 |ne with |variable|
|000019b0| 73 22 0d 08 d4 3c f1 8a | 31 30 2c 31 31 29 22 34 |s"...<..|10,11)"4|
|000019c0| 2e 2e 2e 2e 50 6c 6f 74 | 20 73 65 76 65 72 61 6c |....Plot| several|
|000019d0| 20 6c 69 6e 65 73 20 6f | 6e 20 73 61 6d 65 20 61 | lines o|n same a|
|000019e0| 78 65 73 20 28 6e 6f 74 | 20 61 6c 6c 29 22 0d 08 |xes (not| all)"..|
|000019f0| de 26 f1 8a 31 30 2c 31 | 32 29 22 52 2e 2e 2e 2e |.&..10,1|2)"R....|
|00001a00| 52 65 74 75 72 6e 20 74 | 6f 20 6d 61 69 6e 20 6d |Return t|o main m|
|00001a10| 65 6e 75 22 0d 08 e8 23 | f1 8a 32 2c 31 35 29 22 |enu"...#|..2,15)"|
|00001a20| 57 68 69 63 68 20 64 6f | 20 79 6f 75 20 77 61 6e |Which do| you wan|
|00001a30| 74 3f 20 5b 20 5d 22 0d | 08 f2 16 f2 73 68 6f 77 |t? [ ]".|....show|
|00001a40| 5f 66 6f 72 6d 75 6c 61 | 73 28 31 36 29 0d 08 fc |_formula|s(16)...|
|00001a50| 0a f2 74 69 74 6c 65 0d | 09 06 12 f2 73 68 6f 77 |..title.|....show|
|00001a60| 5f 74 69 6d 65 28 33 30 | 29 0d 09 10 05 f5 0d 09 |_time(30|).......|
|00001a70| 1a 0a 78 3d a6 28 30 29 | 0d 09 24 1e e7 20 78 3c |..x=.(0)|..$.. x<|
|00001a80| 3e 2d 31 20 4b 45 59 24 | 3d bd 78 20 8b 20 4b 45 |>-1 KEY$|=.x . KE|
|00001a90| 59 24 3d 22 20 22 0d 09 | 2e 21 e7 20 91 3e 31 30 |Y$=" "..|.!. .>10|
|00001aa0| 30 30 20 8c 20 d1 3d 30 | 3a f2 73 68 6f 77 5f 74 |00 . .=0|:.show_t|
|00001ab0| 69 6d 65 28 33 30 29 0d | 09 38 0e f1 20 8a 32 32 |ime(30).|.8.. .22|
|00001ac0| 2c 31 35 29 3b 0d 09 42 | 13 fd 20 a7 22 31 32 33 |,15);..B|.. ."123|
|00001ad0| 52 22 2c 4b 45 59 24 29 | 0d 09 4c 17 e7 20 4b 45 |R",KEY$)|..L.. KE|
|00001ae0| 59 24 3d 22 31 22 20 f2 | 70 6c 6f 74 61 6c 6c 0d |Y$="1" .|plotall.|
|00001af0| 09 56 1b e7 20 4b 45 59 | 24 3d 22 33 22 20 f2 69 |.V.. KEY|$="3" .i|
|00001b00| 6e 63 5f 70 6c 6f 74 28 | 31 29 0d 09 60 0e fd 20 |nc_plot(|1)..`.. |
|00001b10| 4b 45 59 24 3d 22 52 22 | 0d 09 6a 05 e1 0d 09 74 |KEY$="R"|..j....t|
|00001b20| 05 3a 0d 09 7e 10 dd f2 | 65 64 69 74 5f 6c 69 6e |.:..~...|edit_lin|
|00001b30| 65 73 0d 09 88 1b ea 20 | 68 69 67 68 25 2c 6f 6c |es..... |high%,ol|
|00001b40| 64 68 69 67 68 25 2c 4b | 45 59 24 2c 78 0d 09 92 |dhigh%,K|EY$,x...|
|00001b50| 16 68 69 67 68 25 3d 31 | 3a 6f 6c 64 68 69 67 68 |.high%=1|:oldhigh|
|00001b60| 25 3d 30 0d 09 9c 05 f5 | 0d 09 a6 10 db 3a ef 31 |%=0.....|.....:.1|
|00001b70| 39 2c 30 2c 34 3b 30 3b | 0d 09 b0 38 f1 8a 30 2c |9,0,4;0;|...8..0,|
|00001b80| 34 29 a4 63 65 6e 74 72 | 65 28 22 45 20 44 20 49 |4).centr|e("E D I|
|00001b90| 20 54 20 20 20 20 4c 20 | 49 20 4e 20 45 20 20 20 | T    L |I N E   |
|00001ba0| 20 44 20 45 20 54 20 41 | 20 49 20 4c 20 53 22 29 | D E T A| I L S")|
|00001bb0| 0d 09 ba 4e f1 8a 32 2c | 36 29 22 50 6c 65 61 73 |...N..2,|6)"Pleas|
|00001bc0| 65 20 73 65 6c 65 63 74 | 20 6f 70 74 69 6f 6e 20 |e select| option |
|00001bd0| 77 69 74 68 20 6e 75 6d | 62 65 72 20 6b 65 79 20 |with num|ber key |
|00001be0| 28 43 75 72 73 6f 72 20 | 6b 65 79 73 20 74 6f 20 |(Cursor |keys to |
|00001bf0| 73 65 6c 65 63 74 20 6c | 69 6e 65 29 3a 22 0d 09 |select l|ine):"..|
|00001c00| c4 23 f1 8a 35 2c 37 29 | 22 31 2e 2e 2e 2e 41 64 |.#..5,7)|"1....Ad|
|00001c10| 64 20 61 20 6c 69 6e 65 | 20 74 6f 20 6c 69 73 74 |d a line| to list|
|00001c20| 22 0d 09 ce 71 e7 20 66 | 75 6e 63 74 69 6f 6e 25 |"...q. f|unction%|
|00001c30| 3c 68 69 67 68 25 20 f1 | 8a 33 2c 38 29 22 2a 20 |<high% .|.3,8)"* |
|00001c40| 32 2e 2e 2e 2e 44 65 6c | 65 74 65 20 73 65 6c 65 |2....Del|ete sele|
|00001c50| 63 74 65 64 20 6c 69 6e | 65 20 66 72 6f 6d 20 6c |cted lin|e from l|
|00001c60| 69 73 74 22 20 8b 20 f1 | 8a 35 2c 38 29 22 32 2e |ist" . .|.5,8)"2.|
|00001c70| 2e 2e 2e 44 65 6c 65 74 | 65 20 73 65 6c 65 63 74 |...Delet|e select|
|00001c80| 65 64 20 6c 69 6e 65 20 | 66 72 6f 6d 20 6c 69 73 |ed line |from lis|
|00001c90| 74 22 0d 09 d8 73 e7 20 | 66 75 6e 63 74 69 6f 6e |t"...s. |function|
|00001ca0| 25 3c 68 69 67 68 25 20 | f1 8a 33 2c 39 29 22 2a |%<high% |..3,9)"*|
|00001cb0| 20 33 2e 2e 2e 2e 43 68 | 61 6e 67 65 20 64 65 74 | 3....Ch|ange det|
|00001cc0| 61 69 6c 73 20 6f 66 20 | 73 65 6c 65 63 74 65 64 |ails of |selected|
|00001cd0| 20 6c 69 6e 65 22 20 8b | 20 f1 8a 35 2c 39 29 22 | line" .| ..5,9)"|
|00001ce0| 33 2e 2e 2e 2e 43 68 61 | 6e 67 65 20 64 65 74 61 |3....Cha|nge deta|
|00001cf0| 69 6c 73 20 6f 66 20 73 | 65 6c 65 63 74 65 64 20 |ils of s|elected |
|00001d00| 6c 69 6e 65 22 0d 09 e2 | 32 f1 8a 35 2c 31 30 29 |line"...|2..5,10)|
|00001d10| 22 34 2e 2e 2e 2e 43 68 | 61 6e 67 65 20 76 61 72 |"4....Ch|ange var|
|00001d20| 69 61 62 6c 65 73 20 28 | 41 20 42 20 43 20 4d 20 |iables (|A B C M |
|00001d30| 4e 20 50 20 51 29 22 0d | 09 ec 93 e7 20 66 75 6e |N P Q)".|.... fun|
|00001d40| 63 74 69 6f 6e 25 3c 68 | 69 67 68 25 20 f1 8a 33 |ction%<h|igh% ..3|
|00001d50| 2c 31 31 29 22 2a 20 35 | 2e 2e 2e 2e 46 69 6e 64 |,11)"* 5|....Find|
|00001d60| 20 6d 61 78 20 61 6e 64 | 20 6d 69 6e 20 59 20 76 | max and| min Y v|
|00001d70| 61 6c 75 65 73 20 6f 66 | 20 73 65 6c 65 63 74 65 |alues of| selecte|
|00001d80| 64 20 66 75 6e 63 74 69 | 6f 6e 22 20 8b 20 f1 8a |d functi|on" . ..|
|00001d90| 35 2c 31 31 29 22 35 2e | 2e 2e 2e 46 69 6e 64 20 |5,11)"5.|...Find |
|00001da0| 6d 61 78 20 61 6e 64 20 | 6d 69 6e 20 59 20 76 61 |max and |min Y va|
|00001db0| 6c 75 65 73 20 6f 66 20 | 73 65 6c 65 63 74 65 64 |lues of |selected|
|00001dc0| 20 66 75 6e 63 74 69 6f | 6e 22 0d 09 f6 3e f1 8a | functio|n"...>..|
|00001dd0| 35 2c 31 32 29 22 36 2e | 2e 2e 2e 44 65 67 72 65 |5,12)"6.|...Degre|
|00001de0| 65 73 2f 52 61 64 69 61 | 6e 73 20 20 28 22 3b a4 |es/Radia|ns  (";.|
|00001df0| 72 61 64 69 61 6e 73 5f | 6f 6e 5f 6f 66 66 28 72 |radians_|on_off(r|
|00001e00| 61 64 25 29 3b 22 29 22 | 0d 0a 00 25 f1 8a 35 2c |ad%);")"|...%..5,|
|00001e10| 31 33 29 22 52 2e 2e 2e | 2e 52 65 74 75 72 6e 20 |13)"R...|.Return |
|00001e20| 74 6f 20 6d 61 69 6e 20 | 6d 65 6e 75 22 0d 0a 0a |to main |menu"...|
|00001e30| 23 f1 8a 32 2c 31 35 29 | 22 57 68 69 63 68 20 64 |#..2,15)|"Which d|
|00001e40| 6f 20 79 6f 75 20 77 61 | 6e 74 3f 20 5b 20 5d 22 |o you wa|nt? [ ]"|
|00001e50| 0d 0a 14 16 f2 73 68 6f | 77 5f 66 6f 72 6d 75 6c |.....sho|w_formul|
|00001e60| 61 73 28 31 36 29 0d 0a | 1e 0a f2 74 69 74 6c 65 |as(16)..|...title|
|00001e70| 0d 0a 28 12 f2 73 68 6f | 77 5f 74 69 6d 65 28 33 |..(..sho|w_time(3|
|00001e80| 30 29 0d 0a 32 1b f2 68 | 69 67 68 5f 66 6f 72 6d |0)..2..h|igh_form|
|00001e90| 75 6c 61 28 31 36 2c 68 | 69 67 68 25 29 0d 0a 3c |ula(16,h|igh%)..<|
|00001ea0| 12 6f 6c 64 68 69 67 68 | 25 3d 68 69 67 68 25 0d |.oldhigh|%=high%.|
|00001eb0| 0a 46 05 f5 0d 0a 50 0a | 78 3d a6 28 30 29 0d 0a |.F....P.|x=.(0)..|
|00001ec0| 5a 37 e7 20 a6 28 2d 35 | 38 29 20 68 69 67 68 25 |Z7. .(-5|8) high%|
|00001ed0| 3d 68 69 67 68 25 2d 31 | 3a f2 77 61 69 74 28 31 |=high%-1|:.wait(1|
|00001ee0| 30 29 3a e7 20 68 69 67 | 68 25 3d 30 20 68 69 67 |0):. hig|h%=0 hig|
|00001ef0| 68 25 3d 31 30 0d 0a 64 | 37 e7 20 a6 28 2d 34 32 |h%=10..d|7. .(-42|
|00001f00| 29 20 68 69 67 68 25 3d | 68 69 67 68 25 2b 31 3a |) high%=|high%+1:|
|00001f10| f2 77 61 69 74 28 31 30 | 29 3a e7 20 68 69 67 68 |.wait(10|):. high|
|00001f20| 25 3d 31 31 20 68 69 67 | 68 25 3d 31 0d 0a 6e 1e |%=11 hig|h%=1..n.|
|00001f30| e7 20 78 3c 3e 2d 31 20 | 4b 45 59 24 3d bd 78 20 |. x<>-1 |KEY$=.x |
|00001f40| 8b 20 4b 45 59 24 3d 22 | 20 22 0d 0a 78 21 e7 20 |. KEY$="| "..x!. |
|00001f50| 91 3e 31 30 30 30 20 8c | 20 d1 3d 30 3a f2 73 68 |.>1000 .| .=0:.sh|
|00001f60| 6f 77 5f 74 69 6d 65 28 | 33 30 29 0d 0a 82 0e f1 |ow_time(|30).....|
|00001f70| 20 8a 32 32 2c 31 35 29 | 3b 0d 0a 8c 28 fd 20 a7 | .22,15)|;...(. .|
|00001f80| 22 31 32 33 34 35 36 52 | 22 2c 4b 45 59 24 29 20 |"123456R|",KEY$) |
|00001f90| 84 20 68 69 67 68 25 3c | 3e 6f 6c 64 68 69 67 68 |. high%<|>oldhigh|
|00001fa0| 25 0d 0a 96 1f e7 20 4b | 45 59 24 3d 22 31 22 20 |%..... K|EY$="1" |
|00001fb0| f2 67 65 74 5f 6e 65 77 | 5f 66 6f 72 6d 75 6c 61 |.get_new|_formula|
|00001fc0| 0d 0a a0 30 e7 20 4b 45 | 59 24 3d 22 32 22 20 80 |...0. KE|Y$="2" .|
|00001fd0| 20 66 75 6e 63 74 69 6f | 6e 25 3e 3d 68 69 67 68 | functio|n%>=high|
|00001fe0| 25 20 f2 64 65 6c 65 74 | 65 28 68 69 67 68 25 29 |% .delet|e(high%)|
|00001ff0| 0d 0a aa 3b e7 20 4b 45 | 59 24 3d 22 33 22 20 80 |...;. KE|Y$="3" .|
|00002000| 20 66 75 6e 63 74 69 6f | 6e 25 3e 3d 68 69 67 68 | functio|n%>=high|
|00002010| 25 20 f2 65 64 69 74 5f | 6c 69 6e 65 5f 64 65 74 |% .edit_|line_det|
|00002020| 61 69 6c 73 28 68 69 67 | 68 25 29 0d 0a b4 65 e7 |ails(hig|h%)...e.|
|00002030| 20 4b 45 59 24 3d 22 34 | 22 20 db 3a f1 22 57 68 | KEY$="4|" .:."Wh|
|00002040| 69 63 68 20 76 61 72 69 | 61 62 6c 65 3f 20 28 41 |ich vari|able? (A|
|00002050| 2d 57 20 6f 72 20 5a 29 | 20 22 3b 3a 76 61 72 24 |-W or Z)| ";:var$|
|00002060| 3d be 3a f1 20 76 61 72 | 24 3a e8 22 56 61 6c 75 |=.:. var|$:."Valu|
|00002070| 65 3d 20 22 3b 76 61 6c | 3a f2 73 65 74 5f 76 61 |e= ";val|:.set_va|
|00002080| 72 69 61 62 6c 65 28 76 | 61 72 24 2c 76 61 6c 29 |riable(v|ar$,val)|
|00002090| 0d 0a be 35 e7 20 4b 45 | 59 24 3d 22 35 22 20 80 |...5. KE|Y$="5" .|
|000020a0| 20 66 75 6e 63 74 69 6f | 6e 25 3e 3d 68 69 67 68 | functio|n%>=high|
|000020b0| 25 20 f2 67 65 74 5f 79 | 5f 72 61 6e 67 65 28 68 |% .get_y|_range(h|
|000020c0| 69 67 68 25 29 0d 0a c8 | 21 e7 20 4b 45 59 24 3d |igh%)...|!. KEY$=|
|000020d0| 22 36 22 20 72 61 64 25 | 3d a4 74 6f 67 67 6c 65 |"6" rad%|=.toggle|
|000020e0| 28 72 61 64 25 29 0d 0a | d2 0e fd 20 4b 45 59 24 |(rad%)..|... KEY$|
|000020f0| 3d 22 52 22 0d 0a dc 05 | e1 0d 0a e6 05 3a 0d 0a |="R"....|.....:..|
|00002100| f0 1e dd f2 65 64 69 74 | 5f 6c 69 6e 65 5f 64 65 |....edit|_line_de|
|00002110| 74 61 69 6c 73 28 6c 69 | 6e 65 25 29 0d 0a fa 0c |tails(li|ne%)....|
|00002120| ea 20 4b 45 59 24 2c 78 | 0d 0b 04 05 f5 0d 0b 0e |. KEY$,x|........|
|00002130| 10 db 3a ef 31 39 2c 30 | 2c 34 3b 30 3b 0d 0b 18 |..:.19,0|,4;0;...|
|00002140| 38 f1 8a 30 2c 34 29 a4 | 63 65 6e 74 72 65 28 22 |8..0,4).|centre("|
|00002150| 45 20 44 20 49 20 54 20 | 20 20 20 4c 20 49 20 4e |E D I T |   L I N|
|00002160| 20 45 20 20 20 20 44 20 | 45 20 54 20 41 20 49 20 | E    D |E T A I |
|00002170| 4c 20 53 22 29 0d 0b 22 | 31 f1 8a 32 2c 36 29 22 |L S").."|1..2,6)"|
|00002180| 50 6c 65 61 73 65 20 73 | 65 6c 65 63 74 20 6f 70 |Please s|elect op|
|00002190| 74 69 6f 6e 20 77 69 74 | 68 20 6e 75 6d 62 65 72 |tion wit|h number|
|000021a0| 20 6b 65 79 3a 22 0d 0b | 2c 20 f1 8a 31 30 2c 38 | key:"..|, ..10,8|
|000021b0| 29 22 31 2e 2e 2e 2e 43 | 68 61 6e 67 65 20 66 6f |)"1....C|hange fo|
|000021c0| 72 6d 75 6c 61 22 0d 0b | 36 29 f1 8a 31 30 2c 31 |rmula"..|6)..10,1|
|000021d0| 30 29 22 32 2e 2e 2e 2e | 43 68 61 6e 67 65 20 6d |0)"2....|Change m|
|000021e0| 69 6e 69 6d 75 6d 20 78 | 20 76 61 6c 75 65 22 0d |inimum x| value".|
|000021f0| 0b 40 29 f1 8a 31 30 2c | 31 32 29 22 33 2e 2e 2e |.@)..10,|12)"3...|
|00002200| 2e 43 68 61 6e 67 65 20 | 6d 61 78 69 6d 75 6d 20 |.Change |maximum |
|00002210| 78 20 76 61 6c 75 65 22 | 0d 0b 4a 29 f1 8a 31 30 |x value"|..J)..10|
|00002220| 2c 31 34 29 22 34 2e 2e | 2e 2e 43 68 61 6e 67 65 |,14)"4..|..Change|
|00002230| 20 6d 69 6e 69 6d 75 6d | 20 79 20 76 61 6c 75 65 | minimum| y value|
|00002240| 22 0d 0b 54 29 f1 8a 31 | 30 2c 31 36 29 22 35 2e |"..T)..1|0,16)"5.|
|00002250| 2e 2e 2e 43 68 61 6e 67 | 65 20 6d 61 78 69 6d 75 |...Chang|e maximu|
|00002260| 6d 20 79 20 76 61 6c 75 | 65 22 0d 0b 5e 2a f1 8a |m y valu|e"..^*..|
|00002270| 31 30 2c 31 38 29 22 36 | 2e 2e 2e 2e 41 75 74 6f |10,18)"6|....Auto|
|00002280| 20 72 61 6e 67 65 20 66 | 6f 72 20 79 20 76 61 6c | range f|or y val|
|00002290| 75 65 73 22 0d 0b 68 2c | f1 8a 31 30 2c 32 30 29 |ues"..h,|..10,20)|
|000022a0| 22 37 2e 2e 2e 2e 53 74 | 6f 72 65 20 66 6f 72 6d |"7....St|ore form|
|000022b0| 75 6c 61 20 69 6e 20 64 | 61 74 61 62 61 73 65 22 |ula in d|atabase"|
|000022c0| 0d 0b 72 2a f1 8a 31 30 | 2c 32 32 29 22 52 2e 2e |..r*..10|,22)"R..|
|000022d0| 2e 2e 52 65 74 75 72 6e | 20 74 6f 20 70 72 65 76 |..Return| to prev|
|000022e0| 69 6f 75 73 20 6d 65 6e | 75 22 0d 0b 7c 23 f1 8a |ious men|u"..|#..|
|000022f0| 32 2c 32 34 29 22 57 68 | 69 63 68 20 64 6f 20 79 |2,24)"Wh|ich do y|
|00002300| 6f 75 20 77 61 6e 74 3f | 20 5b 20 5d 22 0d 0b 86 |ou want?| [ ]"...|
|00002310| 47 f1 8a 31 2c 32 36 29 | 22 6e 22 8a 34 29 22 46 |G..1,26)|"n".4)"F|
|00002320| 75 6e 63 74 69 6f 6e 22 | 8a 33 39 29 22 6d 69 6e |unction"|.39)"min|
|00002330| 20 78 22 8a 34 39 29 22 | 6d 61 78 20 78 22 8a 35 | x".49)"|max x".5|
|00002340| 39 29 22 6d 69 6e 20 79 | 22 8a 36 39 29 22 6d 61 |9)"min y|".69)"ma|
|00002350| 78 20 79 22 0d 0b 90 7b | f1 8a 31 2c 32 37 29 22 |x y"...{|..1,27)"|
|00002360| 22 3b 6c 69 6e 65 25 3b | 8a 35 2c 32 37 29 22 79 |";line%;|.5,27)"y|
|00002370| 3d 22 3b 66 75 6e 63 24 | 28 6c 69 6e 65 25 29 3b |=";func$|(line%);|
|00002380| 8a 34 30 2c 32 37 29 3b | 78 6d 69 6e 28 6c 69 6e |.40,27);|xmin(lin|
|00002390| 65 25 29 3b 8a 35 30 2c | 32 37 29 3b 78 6d 61 78 |e%);.50,|27);xmax|
|000023a0| 28 6c 69 6e 65 25 29 3b | 8a 36 30 2c 32 37 29 3b |(line%);|.60,27);|
|000023b0| 79 6d 69 6e 28 6c 69 6e | 65 25 29 3b 8a 37 30 2c |ymin(lin|e%);.70,|
|000023c0| 32 37 29 3b 79 6d 61 78 | 28 6c 69 6e 65 25 29 0d |27);ymax|(line%).|
|000023d0| 0b 9a 0a f2 74 69 74 6c | 65 0d 0b a4 12 f2 73 68 |....titl|e.....sh|
|000023e0| 6f 77 5f 74 69 6d 65 28 | 33 30 29 0d 0b ae 05 f5 |ow_time(|30).....|
|000023f0| 0d 0b b8 0a 78 3d a6 28 | 30 29 0d 0b c2 1e e7 20 |....x=.(|0)..... |
|00002400| 78 3c 3e 2d 31 20 4b 45 | 59 24 3d bd 78 20 8b 20 |x<>-1 KE|Y$=.x . |
|00002410| 4b 45 59 24 3d 22 20 22 | 0d 0b cc 0e f1 20 8a 32 |KEY$=" "|..... .2|
|00002420| 32 2c 32 34 29 3b 0d 0b | d6 18 fd 20 a7 22 31 32 |2,24);..|... ."12|
|00002430| 33 34 35 37 36 37 52 22 | 2c 4b 45 59 24 29 0d 0b |345767R"|,KEY$)..|
|00002440| e0 80 e7 20 4b 45 59 24 | 3d 22 31 22 20 e8 8a 31 |... KEY$|="1" ..1|
|00002450| 2c 32 38 29 22 46 75 6e | 63 74 69 6f 6e 3a 20 79 |,28)"Fun|ction: y|
|00002460| 3d 22 66 75 6e 63 24 3a | 66 75 6e 63 24 3d a4 63 |="func$:|func$=.c|
|00002470| 61 73 65 28 66 75 6e 63 | 24 29 3a 62 61 73 69 63 |ase(func|$):basic|
|00002480| 76 24 28 6c 69 6e 65 25 | 29 3d a4 62 61 73 69 63 |v$(line%|)=.basic|
|00002490| 5f 76 65 72 73 69 6f 6e | 28 66 75 6e 63 24 2c b9 |_version|(func$,.|
|000024a0| 29 3a 66 75 6e 63 24 28 | 6c 69 6e 65 25 29 3d a4 |):func$(|line%)=.|
|000024b0| 61 6c 67 65 62 72 61 28 | 66 75 6e 63 24 29 0d 0b |algebra(|func$)..|
|000024c0| ea 2e e7 20 4b 45 59 24 | 3d 22 32 22 20 e8 8a 31 |... KEY$|="2" ..1|
|000024d0| 2c 32 38 29 22 4d 69 6e | 69 6d 75 6d 20 78 3a 20 |,28)"Min|imum x: |
|000024e0| 22 78 6d 69 6e 28 6c 69 | 6e 65 25 29 0d 0b f4 2e |"xmin(li|ne%)....|
|000024f0| e7 20 4b 45 59 24 3d 22 | 33 22 20 e8 8a 31 2c 32 |. KEY$="|3" ..1,2|
|00002500| 38 29 22 4d 61 78 69 6d | 75 6d 20 78 3a 20 22 78 |8)"Maxim|um x: "x|
|00002510| 6d 61 78 28 6c 69 6e 65 | 25 29 0d 0b fe 2e e7 20 |max(line|%)..... |
|00002520| 4b 45 59 24 3d 22 34 22 | 20 e8 8a 31 2c 32 38 29 |KEY$="4"| ..1,28)|
|00002530| 22 4d 69 6e 69 6d 75 6d | 20 79 3a 20 22 79 6d 69 |"Minimum| y: "ymi|
|00002540| 6e 28 6c 69 6e 65 25 29 | 0d 0c 08 2e e7 20 4b 45 |n(line%)|..... KE|
|00002550| 59 24 3d 22 35 22 20 e8 | 8a 31 2c 32 38 29 22 4d |Y$="5" .|.1,28)"M|
|00002560| 61 78 69 6d 75 6d 20 79 | 3a 20 22 79 6d 61 78 28 |aximum y|: "ymax(|
|00002570| 6c 69 6e 65 25 29 0d 0c | 12 22 e7 20 4b 45 59 24 |line%)..|.". KEY$|
|00002580| 3d 22 36 22 20 f2 67 65 | 74 5f 79 5f 72 61 6e 67 |="6" .ge|t_y_rang|
|00002590| 65 28 6c 69 6e 65 25 29 | 0d 0c 1c 1c e7 20 4b 45 |e(line%)|..... KE|
|000025a0| 59 24 3d 22 37 22 20 f2 | 73 74 6f 72 65 28 6c 69 |Y$="7" .|store(li|
|000025b0| 6e 65 25 29 0d 0c 26 0e | fd 20 4b 45 59 24 3d 22 |ne%)..&.|. KEY$="|
|000025c0| 52 22 0d 0c 30 05 e1 0d | 0c 3a 05 3a 0d 0c 44 0f |R"..0...|.:.:..D.|
|000025d0| dd f2 6d 61 74 68 73 5f | 6f 70 73 0d 0c 4e 0c ea |..maths_|ops..N..|
|000025e0| 20 4b 45 59 24 2c 78 0d | 0c 58 05 f5 0d 0c 62 10 | KEY$,x.|.X....b.|
|000025f0| db 3a ef 31 39 2c 30 2c | 34 3b 30 3b 0d 0c 6c 45 |.:.19,0,|4;0;..lE|
|00002600| f1 8a 30 2c 34 29 a4 63 | 65 6e 74 72 65 28 22 4d |..0,4).c|entre("M|
|00002610| 20 41 20 54 20 48 20 45 | 20 52 20 4d 20 41 20 54 | A T H E| R M A T|
|00002620| 20 49 20 43 20 41 20 4c | 20 20 20 20 4f 20 50 20 | I C A L|    O P |
|00002630| 45 20 52 20 41 20 54 20 | 49 20 4f 20 4e 20 53 22 |E R A T |I O N S"|
|00002640| 29 0d 0c 76 31 f1 8a 32 | 2c 36 29 22 50 6c 65 61 |)..v1..2|,6)"Plea|
|00002650| 73 65 20 73 65 6c 65 63 | 74 20 6f 70 74 69 6f 6e |se selec|t option|
|00002660| 20 77 69 74 68 20 6e 75 | 6d 62 65 72 20 6b 65 79 | with nu|mber key|
|00002670| 3a 22 0d 0c 80 22 f1 8a | 31 30 2c 39 29 22 31 2e |:"..."..|10,9)"1.|
|00002680| 2e 2e 2e 51 75 61 64 72 | 61 74 69 63 20 73 6f 6c |...Quadr|atic sol|
|00002690| 76 65 72 22 0d 0c 8a 22 | f1 8a 31 30 2c 31 31 29 |ver"..."|..10,11)|
|000026a0| 22 32 2e 2e 2e 2e 44 69 | 66 66 65 72 65 6e 74 69 |"2....Di|fferenti|
|000026b0| 61 74 69 6f 6e 22 0d 0c | 94 1e f1 8a 31 30 2c 31 |ation"..|....10,1|
|000026c0| 33 29 22 33 2e 2e 2e 2e | 49 6e 74 65 67 72 61 74 |3)"3....|Integrat|
|000026d0| 69 6f 6e 22 0d 0c 9e 19 | f1 8a 31 30 2c 31 35 29 |ion"....|..10,15)|
|000026e0| 22 34 2e 2e 2e 2e 53 65 | 72 69 65 73 22 0d 0c a8 |"4....Se|ries"...|
|000026f0| 26 f1 8a 31 30 2c 31 37 | 29 22 52 2e 2e 2e 2e 52 |&..10,17|)"R....R|
|00002700| 65 74 75 72 6e 20 74 6f | 20 6d 61 69 6e 20 6d 65 |eturn to| main me|
|00002710| 6e 75 22 0d 0c b2 23 f1 | 8a 32 2c 31 39 29 22 57 |nu"...#.|.2,19)"W|
|00002720| 68 69 63 68 20 64 6f 20 | 79 6f 75 20 77 61 6e 74 |hich do |you want|
|00002730| 3f 20 5b 20 5d 22 0d 0c | bc 0a f2 74 69 74 6c 65 |? [ ]"..|...title|
|00002740| 0d 0c c6 12 f2 73 68 6f | 77 5f 74 69 6d 65 28 33 |.....sho|w_time(3|
|00002750| 30 29 0d 0c d0 05 f5 0d | 0c da 0a 78 3d a6 28 30 |0)......|...x=.(0|
|00002760| 29 0d 0c e4 1e e7 20 78 | 3c 3e 2d 31 20 4b 45 59 |)..... x|<>-1 KEY|
|00002770| 24 3d bd 78 20 8b 20 4b | 45 59 24 3d 22 20 22 0d |$=.x . K|EY$=" ".|
|00002780| 0c ee 21 e7 20 91 3e 31 | 30 30 30 20 8c 20 d1 3d |..!. .>1|000 . .=|
|00002790| 30 3a f2 73 68 6f 77 5f | 74 69 6d 65 28 33 30 29 |0:.show_|time(30)|
|000027a0| 0d 0c f8 0e f1 20 8a 32 | 32 2c 31 39 29 3b 0d 0d |..... .2|2,19);..|
|000027b0| 02 14 fd 20 a7 22 31 32 | 33 34 52 22 2c 4b 45 59 |... ."12|34R",KEY|
|000027c0| 24 29 0d 0d 0c 1c e7 20 | 4b 45 59 24 3d 22 31 22 |$)..... |KEY$="1"|
|000027d0| 20 8c 20 f2 71 75 61 64 | 72 61 74 69 63 73 0d 0d | . .quad|ratics..|
|000027e0| 16 21 e7 20 4b 45 59 24 | 3d 22 32 22 20 8c 20 f2 |.!. KEY$|="2" . .|
|000027f0| 64 69 66 66 65 72 65 6e | 74 69 61 74 69 6f 6e 0d |differen|tiation.|
|00002800| 0d 20 1d e7 20 4b 45 59 | 24 3d 22 33 22 20 8c 20 |. .. KEY|$="3" . |
|00002810| f2 69 6e 74 65 67 72 61 | 74 69 6f 6e 0d 0d 2a 18 |.integra|tion..*.|
|00002820| e7 20 4b 45 59 24 3d 22 | 34 22 20 8c 20 f2 73 65 |. KEY$="|4" . .se|
|00002830| 72 69 65 73 0d 0d 34 0e | fd 20 4b 45 59 24 3d 22 |ries..4.|. KEY$="|
|00002840| 52 22 0d 0d 3e 05 e1 0d | 0d 48 05 3a 0d 0d 52 0f |R"..>...|.H.:..R.|
|00002850| dd f2 63 6f 6e 66 69 67 | 75 72 65 0d 0d 5c 0c ea |..config|ure..\..|
|00002860| 20 4b 45 59 24 2c 78 0d | 0d 66 05 f5 0d 0d 70 10 | KEY$,x.|.f....p.|
|00002870| db 3a ef 31 39 2c 30 2c | 34 3b 30 3b 0d 0d 7a 3b |.:.19,0,|4;0;..z;|
|00002880| f1 8a 30 2c 34 29 a4 63 | 65 6e 74 72 65 28 22 43 |..0,4).c|entre("C|
|00002890| 20 4f 20 4e 20 46 20 49 | 20 47 20 55 20 52 20 41 | O N F I| G U R A|
|000028a0| 20 54 20 49 20 4f 20 4e | 20 20 20 20 20 20 4d 20 | T I O N|      M |
|000028b0| 45 20 4e 20 55 22 29 0d | 0d 84 31 f1 8a 32 2c 36 |E N U").|..1..2,6|
|000028c0| 29 22 50 6c 65 61 73 65 | 20 73 65 6c 65 63 74 20 |)"Please| select |
|000028d0| 6f 70 74 69 6f 6e 20 77 | 69 74 68 20 6e 75 6d 62 |option w|ith numb|
|000028e0| 65 72 20 6b 65 79 3a 22 | 0d 0d 8e 3a f1 8a 31 30 |er key:"|...:..10|
|000028f0| 2c 39 29 22 31 2e 2e 2e | 2e 52 6f 6f 74 20 64 69 |,9)"1...|.Root di|
|00002900| 72 65 63 74 6f 72 79 22 | 8a 34 30 29 a4 63 68 6f |rectory"|.40).cho|
|00002910| 70 28 72 6f 6f 74 5f 64 | 69 72 65 63 74 6f 72 79 |p(root_d|irectory|
|00002920| 24 29 0d 0d 98 38 f1 8a | 31 30 2c 31 30 29 22 32 |$)...8..|10,10)"2|
|00002930| 2e 2e 2e 2e 44 65 66 61 | 75 6c 74 20 64 61 74 61 |....Defa|ult data|
|00002940| 62 61 73 65 22 8a 34 30 | 29 64 65 66 61 75 6c 74 |base".40|)default|
|00002950| 5f 64 61 74 61 62 61 73 | 65 24 0d 0d a2 3d f1 8a |_databas|e$...=..|
|00002960| 31 30 2c 31 31 29 22 33 | 2e 2e 2e 2e 53 63 72 65 |10,11)"3|....Scre|
|00002970| 65 6e 20 64 75 6d 70 20 | 70 72 6f 67 72 61 6d 22 |en dump |program"|
|00002980| 8a 34 30 29 a4 63 68 6f | 70 28 73 63 72 65 65 6e |.40).cho|p(screen|
|00002990| 5f 70 72 6f 67 24 29 0d | 0d ac 3d f1 8a 31 30 2c |_prog$).|..=..10,|
|000029a0| 31 32 29 22 34 2e 2e 2e | 2e 53 63 72 65 65 6e 20 |12)"4...|.Screen |
|000029b0| 64 75 6d 70 20 63 6f 6d | 6d 61 6e 64 22 8a 34 30 |dump com|mand".40|
|000029c0| 29 a4 63 68 6f 70 28 73 | 63 72 65 65 6e 5f 64 75 |).chop(s|creen_du|
|000029d0| 6d 70 24 29 0d 0d b6 3f | f1 8a 31 30 2c 31 33 29 |mp$)...?|..10,13)|
|000029e0| 22 35 2e 2e 2e 2e 50 72 | 69 6e 74 65 72 20 65 6e |"5....Pr|inter en|
|000029f0| 61 62 6c 65 2f 64 69 73 | 61 62 6c 65 22 8a 34 30 |able/dis|able".40|
|00002a00| 29 a4 65 6e 61 62 6c 65 | 64 28 70 72 69 6e 74 65 |).enable|d(printe|
|00002a10| 72 25 29 0d 0d c0 2d f1 | 8a 31 30 2c 31 34 29 22 |r%)...-.|.10,14)"|
|00002a20| 36 2e 2e 2e 2e 50 6f 69 | 6e 74 73 20 70 6c 6f 74 |6....Poi|nts plot|
|00002a30| 74 65 64 22 8a 34 30 29 | 3b 70 6f 69 6e 74 73 25 |ted".40)|;points%|
|00002a40| 0d 0d ca 34 f1 8a 31 30 | 2c 31 35 29 22 37 2e 2e |...4..10|,15)"7..|
|00002a50| 2e 2e 4d 61 78 20 66 75 | 6e 63 74 69 6f 6e 73 20 |..Max fu|nctions |
|00002a60| 69 6e 20 64 61 74 61 62 | 61 73 65 22 8a 34 30 29 |in datab|ase".40)|
|00002a70| 3b 6d 61 78 0d 0d d4 41 | f1 8a 31 30 2c 31 36 29 |;max...A|..10,16)|
|00002a80| 22 38 2e 2e 2e 2e 4f 53 | 20 63 6f 6d 6d 61 6e 64 |"8....OS| command|
|00002a90| 73 20 65 6e 61 62 6c 65 | 2f 64 69 73 61 62 6c 65 |s enable|/disable|
|00002aa0| 22 8a 34 30 29 a4 65 6e | 61 62 6c 65 64 28 6f 73 |".40).en|abled(os|
|00002ab0| 5f 6f 6b 25 29 0d 0d de | 46 f1 8a 31 30 2c 31 37 |_ok%)...|F..10,17|
|00002ac0| 29 22 39 2e 2e 2e 2e 43 | 6f 6e 66 69 67 75 72 65 |)"9....C|onfigure|
|00002ad0| 20 65 6e 61 62 6c 65 2f | 64 69 73 61 62 6c 65 22 | enable/|disable"|
|00002ae0| 8a 34 30 29 a4 65 6e 61 | 62 6c 65 64 28 63 6f 6e |.40).ena|bled(con|
|00002af0| 66 69 67 75 72 65 5f 6f | 6b 25 29 0d 0d e8 39 f1 |figure_o|k%)...9.|
|00002b00| 8a 31 30 2c 31 38 29 22 | 30 2e 2e 2e 2e 53 65 74 |.10,18)"|0....Set|
|00002b10| 20 63 6f 6e 66 69 67 75 | 72 65 20 70 61 73 73 77 | configu|re passw|
|00002b20| 6f 72 64 22 8a 34 30 29 | 63 6f 6e 66 69 67 5f 70 |ord".40)|config_p|
|00002b30| 61 73 73 24 0d 0d f2 26 | f1 8a 31 30 2c 32 30 29 |ass$...&|..10,20)|
|00002b40| 22 52 2e 2e 2e 2e 52 65 | 74 75 72 6e 20 74 6f 20 |"R....Re|turn to |
|00002b50| 6d 61 69 6e 20 6d 65 6e | 75 22 0d 0d fc 23 f1 8a |main men|u"...#..|
|00002b60| 32 2c 32 33 29 22 57 68 | 69 63 68 20 64 6f 20 79 |2,23)"Wh|ich do y|
|00002b70| 6f 75 20 77 61 6e 74 3f | 20 5b 20 5d 22 0d 0e 06 |ou want?| [ ]"...|
|00002b80| 50 f1 8a 32 2c 32 36 29 | 22 52 75 6e 6e 69 6e 67 |P..2,26)|"Running|
|00002b90| 20 6f 6e 3a 20 22 3b 63 | 6f 6d 70 75 74 65 72 24 | on: ";c|omputer$|
|00002ba0| 3b 8a 33 38 29 3b 22 54 | 65 72 6d 69 6e 61 74 65 |;.38);"T|erminate|
|00002bb0| 20 6f 6e 20 65 72 72 6f | 72 3a 20 22 3b a4 65 6e | on erro|r: ";.en|
|00002bc0| 61 62 6c 65 64 28 64 65 | 62 75 67 25 29 0d 0e 10 |abled(de|bug%)...|
|00002bd0| 46 f1 8a 32 2c 32 37 29 | 22 46 75 6e 63 74 69 6f |F..2,27)|"Functio|
|00002be0| 6e 73 3a 20 20 22 3b 66 | 75 6e 63 74 69 6f 6e 25 |ns:  ";f|unction%|
|00002bf0| 3b 8a 33 38 29 3b 22 53 | 69 7a 65 20 6f 66 20 64 |;.38);"S|ize of d|
|00002c00| 61 74 61 62 61 73 65 3a | 20 20 22 3b 73 74 6f 72 |atabase:|  ";stor|
|00002c10| 65 64 25 0d 0e 1a 0a f2 | 74 69 74 6c 65 0d 0e 24 |ed%.....|title..$|
|00002c20| 12 f2 73 68 6f 77 5f 74 | 69 6d 65 28 33 30 29 0d |..show_t|ime(30).|
|00002c30| 0e 2e 05 f5 0d 0e 38 0a | 78 3d a6 28 30 29 0d 0e |......8.|x=.(0)..|
|00002c40| 42 1e e7 20 78 3c 3e 2d | 31 20 4b 45 59 24 3d bd |B.. x<>-|1 KEY$=.|
|00002c50| 78 20 8b 20 4b 45 59 24 | 3d 22 20 22 0d 0e 4c 21 |x . KEY$|=" "..L!|
|00002c60| e7 20 91 3e 31 30 30 30 | 20 8c 20 d1 3d 30 3a f2 |. .>1000| . .=0:.|
|00002c70| 73 68 6f 77 5f 74 69 6d | 65 28 33 30 29 0d 0e 56 |show_tim|e(30)..V|
|00002c80| 0e f1 20 8a 32 32 2c 32 | 33 29 3b 0d 0e 60 1a fd |.. .22,2|3);..`..|
|00002c90| 20 a7 22 31 32 33 34 35 | 36 37 38 39 30 52 22 2c | ."12345|67890R",|
|00002ca0| 4b 45 59 24 29 0d 0e 6a | 37 e7 20 4b 45 59 24 3d |KEY$)..j|7. KEY$=|
|00002cb0| 22 31 22 20 e8 8a 31 2c | 32 38 29 22 52 6f 6f 74 |"1" ..1,|28)"Root|
|00002cc0| 20 64 69 72 65 63 74 6f | 72 79 3a 20 22 72 6f 6f | directo|ry: "roo|
|00002cd0| 74 5f 64 69 72 65 63 74 | 6f 72 79 24 0d 0e 74 3b |t_direct|ory$..t;|
|00002ce0| e7 20 4b 45 59 24 3d 22 | 32 22 20 e8 8a 31 2c 32 |. KEY$="|2" ..1,2|
|00002cf0| 38 29 22 44 65 66 61 75 | 6c 74 20 64 61 74 61 62 |8)"Defau|lt datab|
|00002d00| 61 73 65 3a 20 22 64 65 | 66 61 75 6c 74 5f 64 61 |ase: "de|fault_da|
|00002d10| 74 61 62 61 73 65 24 0d | 0e 7e 39 e7 20 4b 45 59 |tabase$.|.~9. KEY|
|00002d20| 24 3d 22 33 22 20 e8 8a | 31 2c 32 38 29 22 53 63 |$="3" ..|1,28)"Sc|
|00002d30| 72 65 65 6e 20 64 75 6d | 70 20 70 72 6f 67 72 61 |reen dum|p progra|
|00002d40| 6d 3a 20 22 73 63 72 65 | 65 6e 5f 70 72 6f 67 24 |m: "scre|en_prog$|
|00002d50| 0d 0e 88 3a e7 20 4b 45 | 59 24 3d 22 34 22 20 e8 |...:. KE|Y$="4" .|
|00002d60| 8a 31 2c 32 38 29 22 53 | 63 72 65 65 6e 20 64 75 |.1,28)"S|creen du|
|00002d70| 6d 70 20 63 6f 6d 6d 61 | 6e 64 3a 20 2a 22 73 63 |mp comma|nd: *"sc|
|00002d80| 72 65 65 6e 5f 64 75 6d | 70 24 0d 0e 92 29 e7 20 |reen_dum|p$...). |
|00002d90| 4b 45 59 24 3d 22 35 22 | 20 70 72 69 6e 74 65 72 |KEY$="5"| printer|
|00002da0| 25 3d a4 74 6f 67 67 6c | 65 28 70 72 69 6e 74 65 |%=.toggl|e(printe|
|00002db0| 72 25 29 0d 0e 9c 2f e7 | 20 4b 45 59 24 3d 22 36 |r%).../.| KEY$="6|
|00002dc0| 22 20 e8 8a 31 2c 32 38 | 29 22 50 6f 69 6e 74 73 |" ..1,28|)"Points|
|00002dd0| 20 70 6c 6f 74 74 65 64 | 3a 20 22 70 6f 69 6e 74 | plotted|: "point|
|00002de0| 73 25 0d 0e a6 38 e7 20 | 4b 45 59 24 3d 22 37 22 |s%...8. |KEY$="7"|
|00002df0| 20 e8 8a 31 2c 32 38 29 | 22 4d 61 78 69 6d 75 6d | ..1,28)|"Maximum|
|00002e00| 20 6e 75 6d 62 65 72 20 | 6f 66 20 66 75 6e 63 74 | number |of funct|
|00002e10| 69 6f 6e 73 3a 20 22 6d | 61 78 0d 0e b0 25 e7 20 |ions: "m|ax...%. |
|00002e20| 4b 45 59 24 3d 22 38 22 | 20 6f 73 5f 6f 6b 25 3d |KEY$="8"| os_ok%=|
|00002e30| a4 74 6f 67 67 6c 65 28 | 6f 73 5f 6f 6b 25 29 0d |.toggle(|os_ok%).|
|00002e40| 0e ba 33 e7 20 4b 45 59 | 24 3d 22 39 22 20 63 6f |..3. KEY|$="9" co|
|00002e50| 6e 66 69 67 75 72 65 5f | 6f 6b 25 3d a4 74 6f 67 |nfigure_|ok%=.tog|
|00002e60| 67 6c 65 28 63 6f 6e 66 | 69 67 75 72 65 5f 6f 6b |gle(conf|igure_ok|
|00002e70| 25 29 0d 0e c4 38 e7 20 | 4b 45 59 24 3d 22 30 22 |%)...8. |KEY$="0"|
|00002e80| 20 e8 8a 31 2c 32 38 29 | 22 43 6f 6e 66 69 67 75 | ..1,28)|"Configu|
|00002e90| 72 65 20 70 61 73 73 77 | 6f 72 64 3a 20 22 63 6f |re passw|ord: "co|
|00002ea0| 6e 66 69 67 5f 70 61 73 | 73 24 0d 0e ce 0e fd 20 |nfig_pas|s$..... |
|00002eb0| 4b 45 59 24 3d 22 52 22 | 0d 0e d8 13 f2 73 61 76 |KEY$="R"|.....sav|
|00002ec0| 65 5f 63 6f 6e 66 69 67 | 75 72 65 0d 0e e2 05 e1 |e_config|ure.....|
|00002ed0| 0d 0e ec 05 3a 0d 0e f6 | 12 dd f2 64 61 74 61 62 |....:...|...datab|
|00002ee0| 61 73 65 5f 6f 70 73 0d | 0f 00 21 ea 20 4b 45 59 |ase_ops.|..!. KEY|
|00002ef0| 24 2c 78 2c 70 61 67 65 | 25 2c 68 69 67 68 25 2c |$,x,page|%,high%,|
|00002f00| 6f 6c 64 68 69 67 68 25 | 0d 0f 0a 1e 68 69 67 68 |oldhigh%|....high|
|00002f10| 25 3d 31 3a 6f 6c 64 68 | 69 67 68 25 3d 30 3a 70 |%=1:oldh|igh%=0:p|
|00002f20| 61 67 65 25 3d 30 0d 0f | 14 05 f5 0d 0f 1e 10 db |age%=0..|........|
|00002f30| 3a ef 31 39 2c 30 2c 34 | 3b 30 3b 0d 0f 28 36 f1 |:.19,0,4|;0;..(6.|
|00002f40| 8a 30 2c 34 29 a4 63 65 | 6e 74 72 65 28 22 44 20 |.0,4).ce|ntre("D |
|00002f50| 41 20 54 20 41 20 42 20 | 41 20 53 20 45 20 20 20 |A T A B |A S E   |
|00002f60| 20 20 4f 20 50 20 54 20 | 49 20 4f 20 4e 20 53 22 |  O P T |I O N S"|
|00002f70| 29 0d 0f 32 31 f1 8a 32 | 2c 36 29 22 50 6c 65 61 |)..21..2|,6)"Plea|
|00002f80| 73 65 20 73 65 6c 65 63 | 74 20 6f 70 74 69 6f 6e |se selec|t option|
|00002f90| 20 77 69 74 68 20 6e 75 | 6d 62 65 72 20 6b 65 79 | with nu|mber key|
|00002fa0| 3a 22 0d 0f 3c 29 f1 8a | 31 30 2c 38 29 22 31 2e |:"..<)..|10,8)"1.|
|00002fb0| 2e 2e 2e 4c 6f 61 64 20 | 64 61 74 61 62 61 73 65 |...Load |database|
|00002fc0| 20 66 72 6f 6d 20 64 69 | 73 6b 22 0d 0f 46 5c e7 | from di|sk"..F\.|
|00002fd0| 20 73 74 6f 72 65 64 25 | 3d 30 20 8c 20 f1 8a 38 | stored%|=0 . ..8|
|00002fe0| 2c 39 29 22 2a 20 32 2e | 2e 2e 2e 53 61 76 65 20 |,9)"* 2.|...Save |
|00002ff0| 64 61 74 61 62 61 73 65 | 20 74 6f 20 64 69 73 6b |database| to disk|
|00003000| 22 20 8b 20 f1 8a 31 30 | 2c 39 29 22 32 2e 2e 2e |" . ..10|,9)"2...|
|00003010| 2e 53 61 76 65 20 64 61 | 74 61 62 61 73 65 20 74 |.Save da|tabase t|
|00003020| 6f 20 64 69 73 6b 22 0d | 0f 50 73 e7 20 73 74 6f |o disk".|.Ps. sto|
|00003030| 72 65 64 25 3c 70 61 67 | 65 25 2a 31 30 2b 68 69 |red%<pag|e%*10+hi|
|00003040| 67 68 25 20 8c 20 f1 8a | 38 2c 31 30 29 22 2a 20 |gh% . ..|8,10)"* |
|00003050| 33 2e 2e 2e 2e 44 65 6c | 65 74 65 20 6c 69 6e 65 |3....Del|ete line|
|00003060| 20 66 72 6f 6d 20 64 61 | 74 61 62 61 73 65 22 20 | from da|tabase" |
|00003070| 8b 20 f1 8a 31 30 2c 31 | 30 29 22 33 2e 2e 2e 2e |. ..10,1|0)"3....|
|00003080| 44 65 6c 65 74 65 20 6c | 69 6e 65 20 66 72 6f 6d |Delete l|ine from|
|00003090| 20 64 61 74 61 62 61 73 | 65 22 0d 0f 5a 3e f1 8a | databas|e"..Z>..|
|000030a0| 31 30 2c 31 31 29 bd 31 | 33 39 3b 22 2e 2e 2e 2e |10,11).1|39;"....|
|000030b0| 53 65 6c 65 63 74 20 6c | 69 6e 65 20 20 20 20 20 |Select l|ine     |
|000030c0| 50 44 2e 2e 2e 4e 65 78 | 74 20 70 61 67 65 20 6f |PD...Nex|t page o|
|000030d0| 66 20 6c 69 6e 65 73 22 | 0d 0f 64 42 f1 8a 31 30 |f lines"|..dB..10|
|000030e0| 2c 31 32 29 bd 31 33 38 | 3b 22 2e 2e 2e 2e 53 65 |,12).138|;"....Se|
|000030f0| 6c 65 63 74 20 6c 69 6e | 65 20 20 20 20 20 50 55 |lect lin|e     PU|
|00003100| 2e 2e 2e 50 72 65 76 69 | 6f 75 73 20 70 61 67 65 |...Previ|ous page|
|00003110| 20 6f 66 20 6c 69 6e 65 | 73 22 0d 0f 6e 26 f1 8a | of line|s"..n&..|
|00003120| 31 30 2c 31 33 29 22 52 | 2e 2e 2e 2e 52 65 74 75 |10,13)"R|....Retu|
|00003130| 72 6e 20 74 6f 20 6d 61 | 69 6e 20 6d 65 6e 75 22 |rn to ma|in menu"|
|00003140| 0d 0f 78 23 f1 8a 32 2c | 31 35 29 22 57 68 69 63 |..x#..2,|15)"Whic|
|00003150| 68 20 64 6f 20 79 6f 75 | 20 77 61 6e 74 3f 20 5b |h do you| want? [|
|00003160| 20 5d 22 0d 0f 82 13 f1 | 8a 31 2c 31 36 29 c4 37 | ]".....|.1,16).7|
|00003170| 38 2c 22 5f 22 29 0d 0f | 8c 19 f2 73 68 6f 77 5f |8,"_")..|...show_|
|00003180| 64 61 74 61 62 61 73 65 | 28 70 61 67 65 25 29 0d |database|(page%).|
|00003190| 0f 96 0a f2 74 69 74 6c | 65 0d 0f a0 12 f2 73 68 |....titl|e.....sh|
|000031a0| 6f 77 5f 74 69 6d 65 28 | 33 30 29 0d 0f aa 31 f2 |ow_time(|30)...1.|
|000031b0| 68 69 67 68 5f 73 74 6f | 72 65 64 5f 66 6f 72 6d |high_sto|red_form|
|000031c0| 75 6c 61 28 31 36 2c 68 | 69 67 68 25 2c 70 61 67 |ula(16,h|igh%,pag|
|000031d0| 65 25 2a 31 30 2b 68 69 | 67 68 25 29 0d 0f b4 21 |e%*10+hi|gh%)...!|
|000031e0| 6f 6c 64 70 61 67 65 25 | 3d 70 61 67 65 25 3a 6f |oldpage%|=page%:o|
|000031f0| 6c 64 68 69 67 68 25 3d | 68 69 67 68 25 0d 0f be |ldhigh%=|high%...|
|00003200| 05 f5 0d 0f c8 24 e7 20 | a6 28 2d 36 34 29 20 80 |.....$. |.(-64) .|
|00003210| 20 70 61 67 65 25 3e 30 | 20 70 61 67 65 25 3d 70 | page%>0| page%=p|
|00003220| 61 67 65 25 2d 31 0d 0f | d2 24 e7 20 a6 28 2d 37 |age%-1..|.$. .(-7|
|00003230| 39 29 20 80 20 70 61 67 | 65 25 3c 39 20 70 61 67 |9) . pag|e%<9 pag|
|00003240| 65 25 3d 70 61 67 65 25 | 2b 31 0d 0f dc 37 e7 20 |e%=page%|+1...7. |
|00003250| a6 28 2d 35 38 29 20 68 | 69 67 68 25 3d 68 69 67 |.(-58) h|igh%=hig|
|00003260| 68 25 2d 31 3a f2 77 61 | 69 74 28 31 30 29 3a e7 |h%-1:.wa|it(10):.|
|00003270| 20 68 69 67 68 25 3d 30 | 20 68 69 67 68 25 3d 31 | high%=0| high%=1|
|00003280| 30 0d 0f e6 37 e7 20 a6 | 28 2d 34 32 29 20 68 69 |0...7. .|(-42) hi|
|00003290| 67 68 25 3d 68 69 67 68 | 25 2b 31 3a f2 77 61 69 |gh%=high|%+1:.wai|
|000032a0| 74 28 31 30 29 3a e7 20 | 68 69 67 68 25 3d 31 31 |t(10):. |high%=11|
|000032b0| 20 68 69 67 68 25 3d 31 | 0d 0f f0 0a 78 3d a6 28 | high%=1|....x=.(|
|000032c0| 30 29 0d 0f fa 1e e7 20 | 78 3c 3e 2d 31 20 4b 45 |0)..... |x<>-1 KE|
|000032d0| 59 24 3d bd 78 20 8b 20 | 4b 45 59 24 3d 22 20 22 |Y$=.x . |KEY$=" "|
|000032e0| 0d 10 04 21 e7 20 91 3e | 31 30 30 30 20 8c 20 d1 |...!. .>|1000 . .|
|000032f0| 3d 30 3a f2 73 68 6f 77 | 5f 74 69 6d 65 28 33 30 |=0:.show|_time(30|
|00003300| 29 0d 10 0e 0e f1 20 8a | 32 32 2c 31 35 29 3b 0d |)..... .|22,15);.|
|00003310| 10 18 3c fd 20 a7 22 31 | 32 33 34 35 36 37 38 52 |..<. ."1|2345678R|
|00003320| 22 2c 4b 45 59 24 29 20 | 84 20 6f 6c 64 70 61 67 |",KEY$) |. oldpag|
|00003330| 65 25 3c 3e 70 61 67 65 | 25 20 84 20 6f 6c 64 68 |e%<>page|% . oldh|
|00003340| 69 67 68 25 3c 3e 68 69 | 67 68 25 0d 10 22 29 e7 |igh%<>hi|gh%..").|
|00003350| 20 4b 45 59 24 3d 22 31 | 22 20 8c 20 f2 6c 6f 61 | KEY$="1|" . .loa|
|00003360| 64 28 64 65 66 61 75 6c | 74 5f 64 61 74 61 62 61 |d(defaul|t_databa|
|00003370| 73 65 24 29 0d 10 2c 35 | e7 20 4b 45 59 24 3d 22 |se$)..,5|. KEY$="|
|00003380| 32 22 20 80 20 73 74 6f | 72 65 64 25 3e 30 20 8c |2" . sto|red%>0 .|
|00003390| 20 f2 73 61 76 65 28 64 | 65 66 61 75 6c 74 5f 64 | .save(d|efault_d|
|000033a0| 61 74 61 62 61 73 65 24 | 29 0d 10 36 51 e7 20 4b |atabase$|)..6Q. K|
|000033b0| 45 59 24 3d 22 33 22 20 | 80 20 73 74 6f 72 65 64 |EY$="3" |. stored|
|000033c0| 25 3e 3d 70 61 67 65 25 | 2a 31 30 2b 68 69 67 68 |%>=page%|*10+high|
|000033d0| 25 20 8c 20 f2 64 65 6c | 65 74 65 5f 73 74 6f 72 |% . .del|ete_stor|
|000033e0| 65 64 5f 66 6f 72 6d 75 | 6c 61 28 70 61 67 65 25 |ed_formu|la(page%|
|000033f0| 2a 31 30 2b 68 69 67 68 | 25 29 0d 10 40 0e fd 20 |*10+high|%)..@.. |
|00003400| 4b 45 59 24 3d 22 52 22 | 0d 10 4a 05 e1 0d 10 54 |KEY$="R"|..J....T|
|00003410| 05 3a 0d 10 5e 1a dd f2 | 73 68 6f 77 5f 64 61 74 |.:..^...|show_dat|
|00003420| 61 62 61 73 65 28 70 61 | 67 65 25 29 0d 10 68 09 |abase(pa|ge%)..h.|
|00003430| ea 20 79 2c 6e 0d 10 72 | 4c 79 3d bc 2b 31 3a f1 |. y,n..r|Ly=.+1:.|
|00003440| 8a 31 2c 79 29 22 6e 22 | 8a 34 29 22 46 75 6e 63 |.1,y)"n"|.4)"Func|
|00003450| 74 69 6f 6e 22 8a 33 39 | 29 22 6d 69 6e 20 78 22 |tion".39|)"min x"|
|00003460| 8a 34 39 29 22 6d 61 78 | 20 78 22 8a 35 39 29 22 |.49)"max| x".59)"|
|00003470| 6d 69 6e 20 79 22 8a 36 | 39 29 22 6d 61 78 20 79 |min y".6|9)"max y|
|00003480| 22 0d 10 7c 21 e3 20 6e | 3d 70 61 67 65 25 2a 31 |"..|!. n|=page%*1|
|00003490| 30 2b 31 20 b8 20 28 70 | 61 67 65 25 2b 31 29 2a |0+1 . (p|age%+1)*|
|000034a0| 31 30 0d 10 86 09 79 3d | 79 2b 31 0d 10 90 59 e7 |10....y=|y+1...Y.|
|000034b0| 20 73 74 6f 72 65 64 5f | 66 75 6e 63 24 28 6e 29 | stored_|func$(n)|
|000034c0| 3c 3e 22 22 20 f1 8a 31 | 2c 79 29 22 22 3b 6e 3b |<>"" ..1|,y)"";n;|
|000034d0| 8a 35 2c 79 29 22 79 3d | 22 3b 73 74 6f 72 65 64 |.5,y)"y=|";stored|
|000034e0| 5f 66 75 6e 63 24 28 6e | 29 20 8b 20 f1 8a 31 2c |_func$(n|) . ..1,|
|000034f0| 79 29 3b 6e 3b 8a 32 30 | 2c 79 29 22 3c 42 6c 61 |y);n;.20|,y)"<Bla|
|00003500| 6e 6b 3e 22 0d 10 9a 5c | f1 8a 34 30 2c 79 29 3b |nk>"...\|..40,y);|
|00003510| 73 74 6f 72 65 64 5f 78 | 6d 69 6e 28 6e 29 3b 8a |stored_x|min(n);.|
|00003520| 35 30 2c 79 29 3b 73 74 | 6f 72 65 64 5f 78 6d 61 |50,y);st|ored_xma|
|00003530| 78 28 6e 29 3b 8a 36 30 | 2c 79 29 3b 73 74 6f 72 |x(n);.60|,y);stor|
|00003540| 65 64 5f 79 6d 69 6e 28 | 6e 29 3b 8a 37 30 2c 79 |ed_ymin(|n);.70,y|
|00003550| 29 3b 73 74 6f 72 65 64 | 5f 79 6d 61 78 28 6e 29 |);stored|_ymax(n)|
|00003560| 0d 10 a4 05 ed 0d 10 ae | 05 e1 0d 10 b8 05 3a 0d |........|......:.|
|00003570| 10 c2 24 dd f2 68 69 67 | 68 5f 73 74 6f 72 65 64 |..$..hig|h_stored|
|00003580| 5f 66 6f 72 6d 75 6c 61 | 28 79 2c 68 69 67 68 25 |_formula|(y,high%|
|00003590| 2c 6e 29 0d 10 cc 0b fb | 30 3a fb 31 32 39 0d 10 |,n).....|0:.129..|
|000035a0| d6 16 f1 8a 31 2c 79 2b | 68 69 67 68 25 2b 32 29 |....1,y+|high%+2)|
|000035b0| 22 22 3b 6e 0d 10 e0 57 | e7 20 73 74 6f 72 65 64 |"";n...W|. stored|
|000035c0| 5f 66 75 6e 63 24 28 6e | 29 3c 3e 22 22 20 f1 8a |_func$(n|)<>"" ..|
|000035d0| 35 2c 79 2b 68 69 67 68 | 25 2b 32 29 22 79 3d 22 |5,y+high|%+2)"y="|
|000035e0| 3b 73 74 6f 72 65 64 5f | 66 75 6e 63 24 28 6e 29 |;stored_|func$(n)|
|000035f0| 20 8b 20 f1 8a 32 30 2c | 79 2b 68 69 67 68 25 2b | . ..20,|y+high%+|
|00003600| 32 29 22 3c 42 6c 61 6e | 6b 3e 22 0d 10 ea 7c f1 |2)"<Blan|k>"...|.|
|00003610| 8a 34 30 2c 79 2b 68 69 | 67 68 25 2b 32 29 3b 73 |.40,y+hi|gh%+2);s|
|00003620| 74 6f 72 65 64 5f 78 6d | 69 6e 28 6e 29 3b 8a 35 |tored_xm|in(n);.5|
|00003630| 30 2c 79 2b 68 69 67 68 | 25 2b 32 29 3b 73 74 6f |0,y+high|%+2);sto|
|00003640| 72 65 64 5f 78 6d 61 78 | 28 6e 29 3b 8a 36 30 2c |red_xmax|(n);.60,|
|00003650| 79 2b 68 69 67 68 25 2b | 32 29 3b 73 74 6f 72 65 |y+high%+|2);store|
|00003660| 64 5f 79 6d 69 6e 28 6e | 29 3b 8a 37 30 2c 79 2b |d_ymin(n|);.70,y+|
|00003670| 68 69 67 68 25 2b 32 29 | 3b 73 74 6f 72 65 64 5f |high%+2)|;stored_|
|00003680| 79 6d 61 78 28 6e 29 0d | 10 f4 0b fb 31 3a fb 31 |ymax(n).|....1:.1|
|00003690| 32 38 0d 10 fe 05 e1 0d | 11 08 05 3a 0d 11 12 1e |28......|...:....|
|000036a0| dd f2 64 65 6c 65 74 65 | 5f 73 74 6f 72 65 64 5f |..delete|_stored_|
|000036b0| 66 6f 72 6d 75 6c 61 28 | 6e 29 0d 11 1c 19 e7 20 |formula(|n)..... |
|000036c0| 6e 3d 30 20 84 20 6e 3e | 73 74 6f 72 65 64 25 20 |n=0 . n>|stored% |
|000036d0| 8c 20 e1 0d 11 26 41 e7 | 20 6e 3d 73 74 6f 72 65 |. ...&A.| n=store|
|000036e0| 64 25 20 8c 20 73 74 6f | 72 65 64 25 3d 73 74 6f |d% . sto|red%=sto|
|000036f0| 72 65 64 25 2d 31 3a f2 | 73 74 6f 72 65 28 30 29 |red%-1:.|store(0)|
|00003700| 3a 73 74 6f 72 65 64 25 | 3d 73 74 6f 72 65 64 25 |:stored%|=stored%|
|00003710| 2d 31 3a e1 0d 11 30 15 | e3 20 78 3d 6e 20 b8 20 |-1:...0.|. x=n . |
|00003720| 73 74 6f 72 65 64 25 2d | 31 0d 11 3a 4b 73 74 6f |stored%-|1..:Ksto|
|00003730| 72 65 64 5f 66 75 6e 63 | 24 28 78 29 3d 73 74 6f |red_func|$(x)=sto|
|00003740| 72 65 64 5f 66 75 6e 63 | 24 28 78 2b 31 29 3a 73 |red_func|$(x+1):s|
|00003750| 74 6f 72 65 64 5f 62 61 | 73 69 63 76 24 28 78 29 |tored_ba|sicv$(x)|
|00003760| 3d 73 74 6f 72 65 64 5f | 62 61 73 69 63 76 24 28 |=stored_|basicv$(|
|00003770| 78 2b 31 29 0d 11 44 43 | 73 74 6f 72 65 64 5f 78 |x+1)..DC|stored_x|
|00003780| 6d 69 6e 28 78 29 3d 73 | 74 6f 72 65 64 5f 78 6d |min(x)=s|tored_xm|
|00003790| 69 6e 28 78 2b 31 29 3a | 73 74 6f 72 65 64 5f 78 |in(x+1):|stored_x|
|000037a0| 6d 61 78 28 78 29 3d 73 | 74 6f 72 65 64 5f 78 6d |max(x)=s|tored_xm|
|000037b0| 61 78 28 78 2b 31 29 0d | 11 4e 43 73 74 6f 72 65 |ax(x+1).|.NCstore|
|000037c0| 64 5f 79 6d 69 6e 28 78 | 29 3d 73 74 6f 72 65 64 |d_ymin(x|)=stored|
|000037d0| 5f 79 6d 69 6e 28 78 2b | 31 29 3a 73 74 6f 72 65 |_ymin(x+|1):store|
|000037e0| 64 5f 79 6d 61 78 28 78 | 29 3d 73 74 6f 72 65 64 |d_ymax(x|)=stored|
|000037f0| 5f 79 6d 61 78 28 78 2b | 31 29 0d 11 58 05 ed 0d |_ymax(x+|1)..X...|
|00003800| 11 62 31 73 74 6f 72 65 | 64 25 3d 73 74 6f 72 65 |.b1store|d%=store|
|00003810| 64 25 2d 31 3a f2 73 74 | 6f 72 65 28 30 29 3a 73 |d%-1:.st|ore(0):s|
|00003820| 74 6f 72 65 64 25 3d 73 | 74 6f 72 65 64 25 2d 31 |tored%=s|tored%-1|
|00003830| 0d 11 6c 05 e1 0d 11 76 | 05 3a 0d 11 80 0e dd f2 |..l....v|.:......|
|00003840| 65 72 72 6f 72 28 6e 29 | 0d 11 8a 07 ea 20 78 0d |error(n)|..... x.|
|00003850| 11 94 0c db 3a f7 20 8d | 64 5a 51 0d 11 9e 0d e3 |....:. .|dZQ.....|
|00003860| 20 78 3d 31 20 b8 20 6e | 0d 11 a8 0c f3 20 65 72 | x=1 . n|..... er|
|00003870| 72 6f 72 24 0d 11 b2 05 | ed 0d 11 bc 1b f1 8a 31 |ror$....|.......1|
|00003880| 2c 31 30 29 20 a4 63 65 | 6e 74 72 65 28 65 72 72 |,10) .ce|ntre(err|
|00003890| 6f 72 24 29 0d 11 c6 0e | f2 77 61 69 74 28 32 30 |or$)....|.wait(20|
|000038a0| 30 29 0d 11 d0 05 e1 0d | 11 da 29 dc 20 55 6e 61 |0)......|..). Una|
|000038b0| 62 6c 65 20 74 6f 20 63 | 72 65 61 74 65 20 63 6f |ble to c|reate co|
|000038c0| 6e 66 69 67 75 72 61 74 | 69 6f 6e 20 66 69 6c 65 |nfigurat|ion file|
|000038d0| 0d 11 e4 27 dc 20 55 6e | 61 62 6c 65 20 74 6f 20 |...'. Un|able to |
|000038e0| 72 65 61 64 20 63 6f 6e | 66 69 67 75 72 61 74 69 |read con|figurati|
|000038f0| 6f 6e 20 66 69 6c 65 0d | 11 ee 3d dc 20 59 6f 75 |on file.|..=. You|
|00003900| 20 68 61 76 65 20 65 6e | 74 65 72 65 64 20 61 6e | have en|tered an|
|00003910| 20 69 6e 63 6f 6d 70 72 | 65 68 65 73 69 62 6c 65 | incompr|ehesible|
|00003920| 20 66 75 6e 63 74 69 6f | 6e 2e 20 54 72 79 20 61 | functio|n. Try a|
|00003930| 67 61 69 6e 0d 11 f8 23 | dc 20 55 6e 61 62 6c 65 |gain...#|. Unable|
|00003940| 20 74 6f 20 66 69 6e 64 | 20 64 61 74 61 62 61 73 | to find| databas|
|00003950| 65 20 66 69 6c 65 2e 0d | 12 02 23 dc 20 55 6e 61 |e file..|..#. Una|
|00003960| 62 6c 65 20 74 6f 20 73 | 61 76 65 20 64 61 74 61 |ble to s|ave data|
|00003970| 62 61 73 65 20 66 69 6c | 65 2e 0d 12 0c 30 dc 20 |base fil|e....0. |
|00003980| 4d 61 78 69 6d 75 6d 20 | 58 20 63 61 6e 6e 6f 74 |Maximum |X cannot|
|00003990| 20 62 65 20 73 6d 61 6c | 6c 65 72 20 74 68 61 6e | be smal|ler than|
|000039a0| 20 6d 69 6e 69 6d 75 6d | 20 58 0d 12 16 05 3a 0d | minimum| X....:.|
|000039b0| 12 20 0f dd f2 73 79 73 | 5f 65 72 72 6f 72 0d 12 |. ...sys|_error..|
|000039c0| 2a 0d ef 32 36 3a db 3a | d9 23 30 0d 12 34 52 e7 |*..26:.:|.#0..4R.|
|000039d0| 20 9f 3d 31 37 20 80 20 | a6 28 2d 31 29 20 e8 22 | .=17 . |.(-1) ."|
|000039e0| 45 6e 74 65 72 20 70 61 | 73 73 77 6f 72 64 3a 20 |Enter pa|ssword: |
|000039f0| 22 70 61 73 73 24 3a e7 | 20 70 61 73 73 24 3d 63 |"pass$:.| pass$=c|
|00003a00| 6f 6e 66 69 67 5f 70 61 | 73 73 24 20 63 6f 6e 66 |onfig_pa|ss$ conf|
|00003a10| 69 67 75 72 65 5f 6f 6b | 25 3d b9 3a e1 0d 12 3e |igure_ok|%=.:...>|
|00003a20| 16 db 3a f6 3a f1 22 20 | 61 74 20 6c 69 6e 65 20 |..:.:." |at line |
|00003a30| 22 3b 9e 0d 12 48 0e f2 | 77 61 69 74 28 31 30 30 |";...H..|wait(100|
|00003a40| 29 0d 12 52 10 e7 20 64 | 65 62 75 67 25 3d a3 20 |)..R.. d|ebug%=. |
|00003a50| e1 0d 12 5c 0e ef 32 32 | 2c 30 3a 2a 46 58 34 0d |...\..22|,0:*FX4.|
|00003a60| 12 66 05 e0 0d 12 70 05 | 3a 0d 12 7a 0d dd f2 77 |.f....p.|:..z...w|
|00003a70| 61 69 74 28 6e 29 0d 12 | 84 07 d1 3d 30 0d 12 8e |ait(n)..|...=0...|
|00003a80| 0b f5 20 fd 20 91 3e 6e | 0d 12 98 05 e1 0d 12 a2 |.. . .>n|........|
|00003a90| 05 3a 0d 12 ac 0f dd a4 | 74 6f 67 67 6c 65 28 6e |.:......|toggle(n|
|00003aa0| 29 0d 12 b6 0f e7 20 6e | 3d 2d 31 20 8c 20 3d 30 |)..... n|=-1 . =0|
|00003ab0| 0d 12 c0 07 3d 2d 31 0d | 12 ca 05 3a 0d 12 d4 0b |....=-1.|...:....|
|00003ac0| dd f2 6f 73 63 6c 69 0d | 12 de 08 ea 20 61 24 0d |..oscli.|.... a$.|
|00003ad0| 12 e8 38 db 3a f2 74 69 | 74 6c 65 3a ef 32 38 2c |..8.:.ti|tle:.28,|
|00003ae0| 32 2c 33 30 2c 37 36 2c | 31 3a f1 22 3c 52 65 74 |2,30,76,|1:."<Ret|
|00003af0| 75 72 6e 3e 20 74 6f 20 | 72 65 74 75 72 6e 20 74 |urn> to |return t|
|00003b00| 6f 20 6d 65 6e 75 22 0d | 12 f2 05 f5 0d 12 fc 0a |o menu".|........|
|00003b10| e8 22 2a 22 61 24 0d 13 | 06 12 e7 20 61 24 3c 3e |."*"a$..|... a$<>|
|00003b20| 22 22 20 ff 28 61 24 29 | 0d 13 10 0b fd 20 61 24 |"" .(a$)|..... a$|
|00003b30| 3d 22 22 0d 13 1a 09 ef | 32 36 3a e1 0d 13 24 05 |="".....|26:...$.|
|00003b40| 3a 0d 13 2e 15 dd f2 67 | 65 74 5f 6e 65 77 5f 66 |:......g|et_new_f|
|00003b50| 6f 72 6d 75 6c 61 0d 13 | 38 0c ea 20 6e 2c 4b 45 |ormula..|8.. n,KE|
|00003b60| 59 24 0d 13 42 10 db 3a | ef 31 39 2c 30 2c 34 3b |Y$..B..:|.19,0,4;|
|00003b70| 30 3b 0d 13 4c 30 f1 8a | 30 2c 34 29 a4 63 65 6e |0;..L0..|0,4).cen|
|00003b80| 74 72 65 28 22 41 20 44 | 20 44 20 20 20 41 20 20 |tre("A D| D   A  |
|00003b90| 20 4e 20 45 20 57 20 20 | 20 4c 20 49 20 4e 20 45 | N E W  | L I N E|
|00003ba0| 22 29 0d 13 56 16 f2 73 | 68 6f 77 5f 66 6f 72 6d |")..V..s|how_form|
|00003bb0| 75 6c 61 73 28 31 37 29 | 0d 13 60 0a f2 74 69 74 |ulas(17)|..`..tit|
|00003bc0| 6c 65 0d 13 6a 11 ef 32 | 38 2c 31 2c 31 36 2c 37 |le..j..2|8,1,16,7|
|00003bd0| 37 2c 36 0d 13 74 07 f5 | 3a db 0d 13 7e 2a f1 8a |7,6..t..|:...~*..|
|00003be0| 30 2c 30 29 22 46 75 6e | 63 74 69 6f 6e 20 22 3b |0,0)"Fun|ction ";|
|00003bf0| 66 75 6e 63 74 69 6f 6e | 25 2b 31 3b 22 20 3a 20 |function|%+1;" : |
|00003c00| 79 3d 22 3b 0d 13 88 0f | e8 22 22 66 6f 72 6d 75 |y=";....|.""formu|
|00003c10| 6c 61 24 0d 13 92 1d e7 | 20 66 6f 72 6d 75 6c 61 |la$.....| formula|
|00003c20| 24 3d 22 22 20 fd 20 b9 | 3a ef 32 36 3a db 3a e1 |$="" . .|:.26:.:.|
|00003c30| 0d 13 9c 1c 66 6f 72 6d | 75 6c 61 24 3d a4 63 61 |....form|ula$=.ca|
|00003c40| 73 65 28 66 6f 72 6d 75 | 6c 61 24 29 0d 13 a6 2f |se(formu|la$).../|
|00003c50| e7 20 a4 62 61 73 69 63 | 5f 76 65 72 73 69 6f 6e |. .basic|_version|
|00003c60| 28 66 6f 72 6d 75 6c 61 | 24 2c b9 29 3d 22 22 20 |(formula|$,.)="" |
|00003c70| 8c 20 f2 65 72 72 6f 72 | 28 33 29 0d 13 b0 24 fd |. .error|(3)...$.|
|00003c80| 20 a4 62 61 73 69 63 5f | 76 65 72 73 69 6f 6e 28 | .basic_|version(|
|00003c90| 66 6f 72 6d 75 6c 61 24 | 2c b9 29 3c 3e 22 22 0d |formula$|,.)<>"".|
|00003ca0| 13 ba 21 6e 3d a4 73 65 | 61 72 63 68 28 a4 61 6c |..!n=.se|arch(.al|
|00003cb0| 67 65 62 72 61 28 66 6f | 72 6d 75 6c 61 24 29 29 |gebra(fo|rmula$))|
|00003cc0| 0d 13 c4 51 e7 20 6e 3d | 30 20 f1 22 54 68 69 73 |...Q. n=|0 ."This|
|00003cd0| 20 66 6f 72 6d 75 6c 61 | 20 69 73 20 6e 6f 74 20 | formula| is not |
|00003ce0| 73 74 6f 72 65 64 20 69 | 6e 20 74 68 65 20 64 61 |stored i|n the da|
|00003cf0| 74 61 62 61 73 65 2e 22 | 3a f2 67 65 74 5f 64 6f |tabase."|:.get_do|
|00003d00| 6d 61 69 6e 28 bc 2c 6e | 29 3a ef 32 36 3a db 3a |main(.,n|):.26:.:|
|00003d10| e1 0d 13 ce 15 f4 20 73 | 68 6f 77 20 64 65 66 69 |...... s|how defi|
|00003d20| 6e 69 74 69 6f 6e 0d 13 | d8 05 db 0d 13 e2 32 f1 |nition..|......2.|
|00003d30| 20 22 79 3d 22 3b 73 74 | 6f 72 65 64 5f 66 75 6e | "y=";st|ored_fun|
|00003d40| 63 24 28 6e 29 3b 22 20 | 68 61 73 20 62 65 65 6e |c$(n);" |has been|
|00003d50| 20 73 65 65 6e 20 62 65 | 66 6f 72 65 22 0d 13 ec | seen be|fore"...|
|00003d60| 35 f1 20 22 44 6f 6d 61 | 69 6e 3a 20 22 3b 73 74 |5. "Doma|in: ";st|
|00003d70| 6f 72 65 64 5f 78 6d 69 | 6e 28 6e 29 3b 22 20 74 |ored_xmi|n(n);" t|
|00003d80| 6f 20 22 3b 73 74 6f 72 | 65 64 5f 78 6d 61 78 28 |o ";stor|ed_xmax(|
|00003d90| 6e 29 0d 13 f6 36 f1 20 | 22 79 20 72 61 6e 67 65 |n)...6. |"y range|
|00003da0| 3a 20 22 3b 73 74 6f 72 | 65 64 5f 79 6d 69 6e 28 |: ";stor|ed_ymin(|
|00003db0| 6e 29 3b 22 20 74 6f 20 | 22 3b 73 74 6f 72 65 64 |n);" to |";stored|
|00003dc0| 5f 79 6d 61 78 28 6e 29 | 0d 14 00 30 f1 20 22 44 |_ymax(n)|...0. "D|
|00003dd0| 6f 20 79 6f 75 20 77 69 | 73 68 20 74 6f 20 75 73 |o you wi|sh to us|
|00003de0| 65 20 74 68 65 73 65 20 | 76 61 6c 75 65 73 3f 20 |e these |values? |
|00003df0| 28 59 2f 4e 29 20 22 3b | 0d 14 0a 05 f5 0d 14 14 |(Y/N) ";|........|
|00003e00| 0a 4b 45 59 24 3d be 0d | 14 1e 19 fd 20 4b 45 59 |.KEY$=..|.... KEY|
|00003e10| 24 3d 22 59 22 20 84 20 | 4b 45 59 24 3d 22 4e 22 |$="Y" . |KEY$="N"|
|00003e20| 0d 14 28 3f e7 20 4b 45 | 59 24 3d 22 4e 22 20 db |..(?. KE|Y$="N" .|
|00003e30| 3a f1 22 79 3d 22 3b 73 | 74 6f 72 65 64 5f 66 75 |:."y=";s|tored_fu|
|00003e40| 6e 63 24 28 6e 29 3a f2 | 67 65 74 5f 64 6f 6d 61 |nc$(n):.|get_doma|
|00003e50| 69 6e 28 bc 2c 6e 29 3a | ef 32 36 3a db 3a e1 0d |in(.,n):|.26:.:..|
|00003e60| 14 32 19 66 75 6e 63 74 | 69 6f 6e 25 3d 66 75 6e |.2.funct|ion%=fun|
|00003e70| 63 74 69 6f 6e 25 2b 31 | 0d 14 3c 24 66 75 6e 63 |ction%+1|..<$func|
|00003e80| 24 28 66 75 6e 63 74 69 | 6f 6e 25 29 3d 73 74 6f |$(functi|on%)=sto|
|00003e90| 72 65 64 5f 66 75 6e 63 | 24 28 6e 29 0d 14 46 22 |red_func|$(n)..F"|
|00003ea0| 78 6d 69 6e 28 66 75 6e | 63 74 69 6f 6e 25 29 3d |xmin(fun|ction%)=|
|00003eb0| 73 74 6f 72 65 64 5f 78 | 6d 69 6e 28 6e 29 0d 14 |stored_x|min(n)..|
|00003ec0| 50 22 78 6d 61 78 28 66 | 75 6e 63 74 69 6f 6e 25 |P"xmax(f|unction%|
|00003ed0| 29 3d 73 74 6f 72 65 64 | 5f 78 6d 61 78 28 6e 29 |)=stored|_xmax(n)|
|00003ee0| 0d 14 5a 22 79 6d 69 6e | 28 66 75 6e 63 74 69 6f |..Z"ymin|(functio|
|00003ef0| 6e 25 29 3d 73 74 6f 72 | 65 64 5f 79 6d 69 6e 28 |n%)=stor|ed_ymin(|
|00003f00| 6e 29 0d 14 64 22 79 6d | 61 78 28 66 75 6e 63 74 |n)..d"ym|ax(funct|
|00003f10| 69 6f 6e 25 29 3d 73 74 | 6f 72 65 64 5f 79 6d 61 |ion%)=st|ored_yma|
|00003f20| 78 28 6e 29 0d 14 6e 28 | 62 61 73 69 63 76 24 28 |x(n)..n(|basicv$(|
|00003f30| 66 75 6e 63 74 69 6f 6e | 25 29 3d 73 74 6f 72 65 |function|%)=store|
|00003f40| 64 5f 62 61 73 69 63 76 | 24 28 6e 29 0d 14 78 0b |d_basicv|$(n)..x.|
|00003f50| ef 32 36 3a db 3a e1 0d | 14 82 05 3a 0d 14 8c 15 |.26:.:..|...:....|
|00003f60| dd f2 67 65 74 5f 64 6f | 6d 61 69 6e 28 79 2c 6e |..get_do|main(y,n|
|00003f70| 29 0d 14 96 0a ea 20 4b | 45 59 24 0d 14 a0 43 f5 |)..... K|EY$...C.|
|00003f80| 3a db 3a f1 8a 30 2c 79 | 2d 32 29 20 22 46 75 6e |:.:..0,y|-2) "Fun|
|00003f90| 63 74 69 6f 6e 20 22 3b | 66 75 6e 63 74 69 6f 6e |ction ";|function|
|00003fa0| 25 2b 31 3b 22 20 3a 20 | 79 3d 22 3b a4 61 6c 67 |%+1;" : |y=";.alg|
|00003fb0| 65 62 72 61 28 66 6f 72 | 6d 75 6c 61 24 29 0d 14 |ebra(for|mula$)..|
|00003fc0| aa 48 e8 8a 30 2c 79 29 | 22 4d 69 6e 69 6d 75 6d |.H..0,y)|"Minimum|
|00003fd0| 20 58 3a 20 22 78 6d 69 | 6e 69 6d 75 6d 24 3a 78 | X: "xmi|nimum$:x|
|00003fe0| 6d 69 6e 69 6d 75 6d 3d | a0 28 a4 62 61 73 69 63 |minimum=|.(.basic|
|00003ff0| 5f 76 65 72 73 69 6f 6e | 28 78 6d 69 6e 69 6d 75 |_version|(xminimu|
|00004000| 6d 24 2c a3 29 29 0d 14 | b4 4a e8 8a 30 2c 79 2b |m$,.))..|.J..0,y+|
|00004010| 31 29 22 4d 61 78 69 6d | 75 6d 20 58 3a 20 22 78 |1)"Maxim|um X: "x|
|00004020| 6d 61 78 69 6d 75 6d 24 | 3a 78 6d 61 78 69 6d 75 |maximum$|:xmaximu|
|00004030| 6d 3d a0 28 a4 62 61 73 | 69 63 5f 76 65 72 73 69 |m=.(.bas|ic_versi|
|00004040| 6f 6e 28 78 6d 61 78 69 | 6d 75 6d 24 2c a3 29 29 |on(xmaxi|mum$,.))|
|00004050| 0d 14 be 24 e7 20 78 6d | 61 78 69 6d 75 6d 3c 3d |...$. xm|aximum<=|
|00004060| 78 6d 69 6e 69 6d 75 6d | 20 8c 20 f2 65 72 72 6f |xminimum| . .erro|
|00004070| 72 28 36 29 0d 14 c8 2c | fd 20 78 6d 69 6e 69 6d |r(6)...,|. xminim|
|00004080| 75 6d 3c 3e 78 6d 61 78 | 69 6d 75 6d 20 80 20 78 |um<>xmax|imum . x|
|00004090| 6d 61 78 69 6d 75 6d 3e | 78 6d 69 6e 69 6d 75 6d |maximum>|xminimum|
|000040a0| 0d 14 d2 19 66 75 6e 63 | 74 69 6f 6e 25 3d 66 75 |....func|tion%=fu|
|000040b0| 6e 63 74 69 6f 6e 25 2b | 31 0d 14 dc 31 62 61 73 |nction%+|1...1bas|
|000040c0| 69 63 76 24 28 66 75 6e | 63 74 69 6f 6e 25 29 3d |icv$(fun|ction%)=|
|000040d0| a4 62 61 73 69 63 5f 76 | 65 72 73 69 6f 6e 28 66 |.basic_v|ersion(f|
|000040e0| 6f 72 6d 75 6c 61 24 2c | b9 29 0d 14 e6 27 66 75 |ormula$,|.)...'fu|
|000040f0| 6e 63 24 28 66 75 6e 63 | 74 69 6f 6e 25 29 3d a4 |nc$(func|tion%)=.|
|00004100| 61 6c 67 65 62 72 61 28 | 66 6f 72 6d 75 6c 61 24 |algebra(|formula$|
|00004110| 29 0d 14 f0 1c 78 6d 69 | 6e 28 66 75 6e 63 74 69 |)....xmi|n(functi|
|00004120| 6f 6e 25 29 3d 78 6d 69 | 6e 69 6d 75 6d 0d 14 fa |on%)=xmi|nimum...|
|00004130| 1c 78 6d 61 78 28 66 75 | 6e 63 74 69 6f 6e 25 29 |.xmax(fu|nction%)|
|00004140| 3d 78 6d 61 78 69 6d 75 | 6d 0d 15 04 1b f2 67 65 |=xmaximu|m.....ge|
|00004150| 74 5f 79 5f 72 61 6e 67 | 65 28 66 75 6e 63 74 69 |t_y_rang|e(functi|
|00004160| 6f 6e 25 29 0d 15 0e 46 | f1 27 22 44 6f 20 79 6f |on%)...F|.'"Do yo|
|00004170| 75 20 77 69 73 68 20 74 | 6f 20 73 74 6f 72 65 20 |u wish t|o store |
|00004180| 74 68 69 73 20 69 6e 66 | 6f 72 6d 61 74 69 6f 6e |this inf|ormation|
|00004190| 20 69 6e 20 74 68 65 20 | 64 61 74 61 62 61 73 65 | in the |database|
|000041a0| 3f 20 28 59 2f 4e 29 20 | 22 3b 0d 15 18 05 f5 0d |? (Y/N) |";......|
|000041b0| 15 22 0a 4b 45 59 24 3d | be 0d 15 2c 19 fd 20 4b |.".KEY$=|...,.. K|
|000041c0| 45 59 24 3d 22 59 22 20 | 84 20 4b 45 59 24 3d 22 |EY$="Y" |. KEY$="|
|000041d0| 4e 22 0d 15 36 0a f1 20 | 4b 45 59 24 0d 15 40 10 |N"..6.. |KEY$..@.|
|000041e0| e7 20 4b 45 59 24 3d 22 | 4e 22 20 e1 0d 15 4a 15 |. KEY$="|N" ...J.|
|000041f0| f2 73 74 6f 72 65 28 66 | 75 6e 63 74 69 6f 6e 25 |.store(f|unction%|
|00004200| 29 0d 15 54 05 e1 0d 15 | 5e 05 3a 0d 15 68 0e dd |)..T....|^.:..h..|
|00004210| f2 73 74 6f 72 65 28 78 | 29 0d 15 72 07 ea 20 6e |.store(x|)..r.. n|
|00004220| 0d 15 7c 17 6e 3d a4 73 | 65 61 72 63 68 28 66 75 |..|.n=.s|earch(fu|
|00004230| 6e 63 24 28 78 29 29 0d | 15 86 25 e7 20 6e 3d 30 |nc$(x)).|..%. n=0|
|00004240| 20 73 74 6f 72 65 64 25 | 3d 73 74 6f 72 65 64 25 | stored%|=stored%|
|00004250| 2b 31 3a 6e 3d 73 74 6f | 72 65 64 25 0d 15 90 1c |+1:n=sto|red%....|
|00004260| 73 74 6f 72 65 64 5f 66 | 75 6e 63 24 28 6e 29 3d |stored_f|unc$(n)=|
|00004270| 66 75 6e 63 24 28 78 29 | 0d 15 9a 1a 73 74 6f 72 |func$(x)|....stor|
|00004280| 65 64 5f 78 6d 69 6e 28 | 6e 29 3d 78 6d 69 6e 28 |ed_xmin(|n)=xmin(|
|00004290| 78 29 0d 15 a4 1a 73 74 | 6f 72 65 64 5f 78 6d 61 |x)....st|ored_xma|
|000042a0| 78 28 6e 29 3d 78 6d 61 | 78 28 78 29 0d 15 ae 1a |x(n)=xma|x(x)....|
|000042b0| 73 74 6f 72 65 64 5f 79 | 6d 69 6e 28 6e 29 3d 79 |stored_y|min(n)=y|
|000042c0| 6d 69 6e 28 78 29 0d 15 | b8 1a 73 74 6f 72 65 64 |min(x)..|..stored|
|000042d0| 5f 79 6d 61 78 28 6e 29 | 3d 79 6d 61 78 28 78 29 |_ymax(n)|=ymax(x)|
|000042e0| 0d 15 c2 20 73 74 6f 72 | 65 64 5f 62 61 73 69 63 |... stor|ed_basic|
|000042f0| 76 24 28 6e 29 3d 62 61 | 73 69 63 76 24 28 78 29 |v$(n)=ba|sicv$(x)|
|00004300| 0d 15 cc 05 e1 0d 15 d6 | 05 3a 0d 15 e0 10 dd a4 |........|.:......|
|00004310| 73 65 61 72 63 68 28 61 | 24 29 0d 15 ea 07 ea 20 |search(a|$)..... |
|00004320| 78 0d 15 f4 14 e7 20 73 | 74 6f 72 65 64 25 3d 30 |x..... s|tored%=0|
|00004330| 20 8c 20 3d 30 0d 15 fe | 0f 78 3d 30 3a f5 3a 78 | . =0...|.x=0:.:x|
|00004340| 3d 78 2b 31 0d 16 08 24 | fd 20 61 24 3d 73 74 6f |=x+1...$|. a$=sto|
|00004350| 72 65 64 5f 66 75 6e 63 | 24 28 78 29 20 84 20 78 |red_func|$(x) . x|
|00004360| 3d 73 74 6f 72 65 64 25 | 0d 16 12 1e e7 20 61 24 |=stored%|..... a$|
|00004370| 3c 3e 73 74 6f 72 65 64 | 5f 66 75 6e 63 24 28 78 |<>stored|_func$(x|
|00004380| 29 20 8c 20 3d 30 0d 16 | 1c 06 3d 78 0d 16 26 05 |) . =0..|..=x..&.|
|00004390| 3a 0d 16 30 0e dd a4 63 | 61 73 65 28 61 24 29 0d |:..0...c|ase(a$).|
|000043a0| 16 3a 07 ea 20 78 0d 16 | 44 0f e3 20 78 3d 31 20 |.:.. x..|D.. x=1 |
|000043b0| b8 20 a9 61 24 0d 16 4e | 12 63 68 61 72 24 3d c1 |. .a$..N|.char$=.|
|000043c0| 61 24 2c 78 2c 31 29 0d | 16 58 3f e7 20 97 63 68 |a$,x,1).|.X?. .ch|
|000043d0| 61 72 24 3e 36 34 20 80 | 20 97 63 68 61 72 24 3c |ar$>64 .| .char$<|
|000043e0| 39 31 20 8c 20 61 24 3d | c0 61 24 2c 78 2d 31 29 |91 . a$=|.a$,x-1)|
|000043f0| 2b bd 28 97 63 68 61 72 | 24 2b 33 32 29 2b c1 61 |+.(.char|$+32)+.a|
|00004400| 24 2c 78 2b 31 29 0d 16 | 62 05 ed 0d 16 6c 07 3d |$,x+1)..|b....l.=|
|00004410| 61 24 0d 16 76 05 3a 0d | 16 80 1d dd a4 62 61 73 |a$..v.:.|.....bas|
|00004420| 69 63 5f 76 65 72 73 69 | 6f 6e 28 61 24 2c 74 65 |ic_versi|on(a$,te|
|00004430| 73 74 25 29 0d 16 8a 13 | ea 20 78 2c 66 6c 61 67 |st%)....|. x,flag|
|00004440| 25 2c 62 24 2c 63 24 0d | 16 94 0a f7 20 8d 74 58 |%,b$,c$.|.... .tX|
|00004450| 57 0d 16 9e 05 f5 0d 16 | a8 0b f3 20 62 24 2c 63 |W.......|... b$,c|
|00004460| 24 0d 16 b2 25 e7 20 63 | 24 3d 22 53 49 4e 22 20 |$...%. c|$="SIN" |
|00004470| 80 20 72 61 64 25 3d a3 | 20 8c 20 63 24 3d 22 53 |. rad%=.| . c$="S|
|00004480| 49 4e 52 41 44 22 0d 16 | bc 25 e7 20 63 24 3d 22 |INRAD"..|.%. c$="|
|00004490| 43 4f 53 22 20 80 20 72 | 61 64 25 3d a3 20 8c 20 |COS" . r|ad%=. . |
|000044a0| 63 24 3d 22 43 4f 53 52 | 41 44 22 0d 16 c6 25 e7 |c$="COSR|AD"...%.|
|000044b0| 20 63 24 3d 22 54 41 4e | 22 20 80 20 72 61 64 25 | c$="TAN|" . rad%|
|000044c0| 3d a3 20 8c 20 63 24 3d | 22 54 41 4e 52 41 44 22 |=. . c$=|"TANRAD"|
|000044d0| 0d 16 d0 21 e7 20 62 24 | 3c 3e 22 23 22 20 f5 20 |...!. b$|<>"#" . |
|000044e0| fd 20 a4 72 65 70 6c 61 | 63 65 28 62 24 2c 63 24 |. .repla|ce(b$,c$|
|000044f0| 29 0d 16 da 0c fd 20 62 | 24 3d 22 23 22 0d 16 e4 |)..... b|$="#"...|
|00004500| 05 f5 0d 16 ee 0b 66 6c | 61 67 25 3d a3 0d 16 f8 |......fl|ag%=....|
|00004510| 0f e3 20 78 3d 31 20 b8 | 20 a9 61 24 0d 17 02 1d |.. x=1 .| .a$....|
|00004520| 62 24 3d c1 61 24 2c 78 | 2c 31 29 3a 63 24 3d c1 |b$=.a$,x|,1):c$=.|
|00004530| 61 24 2c 78 2b 31 2c 31 | 29 0d 17 0c a8 e7 20 a7 |a$,x+1,1|)..... .|
|00004540| 22 31 32 33 34 35 36 37 | 38 39 30 61 62 63 64 65 |"1234567|890abcde|
|00004550| 66 67 68 69 6a 6b 6c 6d | 6e 6f 70 71 72 73 74 75 |fghijklm|nopqrstu|
|00004560| 76 77 78 79 7a 29 22 2c | 62 24 29 3e 30 20 80 20 |vwxyz)",|b$)>0 . |
|00004570| a7 22 61 62 63 65 64 66 | 67 68 69 6a 6b 6c 6d 6e |."abcedf|ghijklmn|
|00004580| 6f 70 71 72 73 74 75 76 | 77 78 79 7a 41 42 43 44 |opqrstuv|wxyzABCD|
|00004590| 45 46 47 48 49 4a 4c 4d | 4e 4f 50 51 52 53 54 55 |EFGHIJLM|NOPQRSTU|
|000045a0| 56 57 58 59 5a 28 22 2c | 63 24 29 3e 30 20 80 20 |VWXYZ(",|c$)>0 . |
|000045b0| 63 24 3c 3e 22 22 20 80 | 20 66 6c 61 67 25 3d a3 |c$<>"" .| flag%=.|
|000045c0| 20 8c 20 66 6c 61 67 25 | 3d b9 3a 61 24 3d c0 61 | . flag%|=.:a$=.a|
|000045d0| 24 2c 78 29 2b 22 2a 22 | 2b c1 61 24 2c 78 2b 31 |$,x)+"*"|+.a$,x+1|
|000045e0| 29 0d 17 16 05 ed 0d 17 | 20 0d fd 20 66 6c 61 67 |).......| .. flag|
|000045f0| 25 3d a3 0d 17 2a 05 f5 | 0d 17 34 0b 66 6c 61 67 |%=...*..|..4.flag|
|00004600| 25 3d a3 0d 17 3e 0f e3 | 20 78 3d 31 20 b8 20 a9 |%=...>..| x=1 . .|
|00004610| 61 24 0d 17 48 0f 62 24 | 3d c1 61 24 2c 78 2c 31 |a$..H.b$|=.a$,x,1|
|00004620| 29 0d 17 52 70 e7 20 a7 | 22 61 62 63 64 65 66 67 |)..Rp. .|"abcdefg|
|00004630| 68 69 6a 6b 6c 6d 6e 6f | 70 71 72 73 74 75 76 77 |hijklmno|pqrstuvw|
|00004640| 78 79 7a 22 2c 62 24 29 | 3e 30 20 8c 20 61 24 3d |xyz",b$)|>0 . a$=|
|00004650| c0 61 24 2c 78 2d 31 29 | 2b bd 28 36 34 2b a7 22 |.a$,x-1)|+.(64+."|
|00004660| 61 62 63 64 65 66 67 68 | 69 6a 6b 6c 6d 6e 6f 70 |abcdefgh|ijklmnop|
|00004670| 71 72 73 74 75 76 77 78 | 79 7a 22 2c 62 24 29 29 |qrstuvwx|yz",b$))|
|00004680| 2b c1 61 24 2c 78 2b 31 | 29 3a 66 6c 61 67 25 3d |+.a$,x+1|):flag%=|
|00004690| b9 0d 17 5c 05 ed 0d 17 | 66 0d fd 20 66 6c 61 67 |...\....|f.. flag|
|000046a0| 25 3d a3 0d 17 70 13 e7 | 20 74 65 73 74 25 3d a3 |%=...p..| test%=.|
|000046b0| 20 8c 20 3d 61 24 0d 17 | 7a 33 e7 20 28 a7 61 24 | . =a$..|z3. (.a$|
|000046c0| 2c 22 58 22 29 3d 30 20 | 80 20 bb 28 61 24 29 3d |,"X")=0 |. .(a$)=|
|000046d0| 30 29 20 84 20 a7 61 24 | 2c 22 59 22 29 20 8c 20 |0) . .a$|,"Y") . |
|000046e0| 3d 22 22 20 8b 20 3d 61 | 24 0d 17 84 27 f4 20 64 |="" . =a|$...'. d|
|000046f0| 6f 20 61 6c 6c 20 6f 70 | 65 72 61 74 6f 72 73 20 |o all op|erators |
|00004700| 62 65 66 6f 72 65 20 76 | 61 72 69 61 62 6c 65 73 |before v|ariables|
|00004710| 0d 17 8e 3c f4 20 69 66 | 20 61 6e 79 74 68 69 6e |...<. if| anythin|
|00004720| 67 20 72 65 6d 61 69 6e | 73 20 69 6e 20 6c 6f 77 |g remain|s in low|
|00004730| 65 72 20 63 61 73 65 20 | 74 68 65 6e 20 69 74 20 |er case |then it |
|00004740| 6d 75 73 74 20 62 65 20 | 76 6f 69 64 0d 17 98 3e |must be |void...>|
|00004750| dc 20 69 6e 76 73 69 6e | 2c 41 53 4e 2c 69 6e 76 |. invsin|,ASN,inv|
|00004760| 63 6f 73 2c 41 43 53 2c | 69 6e 76 74 61 6e 2c 41 |cos,ACS,|invtan,A|
|00004770| 54 4e 2c 73 69 6e 2c 53 | 49 4e 2c 63 6f 73 2c 43 |TN,sin,S|IN,cos,C|
|00004780| 4f 53 2c 74 61 6e 2c 54 | 41 4e 0d 17 a2 25 dc 20 |OS,tan,T|AN...%. |
|00004790| 73 65 63 2c 31 2f 43 4f | 53 2c 63 6f 73 65 63 2c |sec,1/CO|S,cosec,|
|000047a0| 31 2f 53 49 4e 2c 63 6f | 74 2c 31 2f 54 41 4e 0d |1/SIN,co|t,1/TAN.|
|000047b0| 17 ac 41 dc 20 73 71 72 | 2c 53 51 52 2c 6c 6e 2c |..A. sqr|,SQR,ln,|
|000047c0| 4c 4e 2c 6c 6f 67 2c 4c | 4f 47 2c 64 65 67 2c 44 |LN,log,L|OG,deg,D|
|000047d0| 45 47 2c 72 61 64 2c 52 | 41 44 2c 65 78 70 2c 45 |EG,rad,R|AD,exp,E|
|000047e0| 58 50 2c 7c 2c 41 42 53 | 2c 69 6e 74 2c 49 4e 54 |XP,|,ABS|,int,INT|
|000047f0| 0d 17 b6 09 dc 20 23 2c | 23 0d 17 c0 05 3a 0d 17 |..... #,|#....:..|
|00004800| ca 14 dd a4 72 65 70 6c | 61 63 65 28 62 24 2c 63 |....repl|ace(b$,c|
|00004810| 24 29 0d 17 d4 07 ea 20 | 78 0d 17 de 0d 78 3d a7 |$)..... |x....x=.|
|00004820| 61 24 2c 62 24 29 0d 17 | e8 2c e7 20 78 3e 30 20 |a$,b$)..|.,. x>0 |
|00004830| 61 24 3d c0 61 24 2c 78 | 2d 31 29 2b 63 24 2b c1 |a$=.a$,x|-1)+c$+.|
|00004840| 61 24 2c 78 2b a9 62 24 | 29 3a 3d 30 20 8b 20 3d |a$,x+.b$|):=0 . =|
|00004850| 2d 31 0d 17 f2 05 3a 0d | 17 fc 11 dd a4 61 6c 67 |-1....:.|.....alg|
|00004860| 65 62 72 61 28 61 24 29 | 0d 18 06 07 ea 20 78 0d |ebra(a$)|..... x.|
|00004870| 18 10 05 f5 0d 18 1a 0b | 66 6c 61 67 25 3d a3 0d |........|flag%=..|
|00004880| 18 24 0f e3 20 78 3d 31 | 20 b8 20 a9 61 24 0d 18 |.$.. x=1| . .a$..|
|00004890| 2e 0f 62 24 3d c1 61 24 | 2c 78 2c 31 29 0d 18 38 |..b$=.a$|,x,1)..8|
|000048a0| 31 e7 20 62 24 3d 22 5e | 22 20 80 20 66 6c 61 67 |1. b$="^|" . flag|
|000048b0| 25 3d a3 20 8c 20 66 6c | 61 67 25 3d b9 3a 61 24 |%=. . fl|ag%=.:a$|
|000048c0| 3d a4 70 6f 77 65 72 73 | 28 78 2c 61 24 29 0d 18 |=.powers|(x,a$)..|
|000048d0| 42 05 ed 0d 18 4c 0d fd | 20 66 6c 61 67 25 3d a3 |B....L..| flag%=.|
|000048e0| 0d 18 56 1e f5 20 fd 20 | a4 72 65 70 6c 61 63 65 |..V.. . |.replace|
|000048f0| 28 22 73 71 72 22 2c bd | 28 73 71 72 29 29 0d 18 |("sqr",.|(sqr))..|
|00004900| 60 38 f5 20 fd 20 a4 72 | 65 70 6c 61 63 65 28 22 |`8. . .r|eplace("|
|00004910| 69 6e 76 73 69 6e 22 2c | 22 73 69 6e 22 2b bd 28 |invsin",|"sin"+.(|
|00004920| 6e 65 67 5f 70 6f 77 65 | 72 29 2b bd 28 31 2b 70 |neg_powe|r)+.(1+p|
|00004930| 6f 77 65 72 29 29 0d 18 | 6a 07 3d 61 24 0d 18 74 |ower))..|j.=a$..t|
|00004940| 05 3a 0d 18 7e 12 dd a4 | 70 6f 77 65 72 73 28 78 |.:..~...|powers(x|
|00004950| 2c 61 24 29 0d 18 88 0a | ea 20 62 24 2c 6e 0d 18 |,a$)....|. b$,n..|
|00004960| 92 09 78 3d 78 2b 31 0d | 18 9c 11 f5 3a 62 24 3d |..x=x+1.|....:b$=|
|00004970| c1 61 24 2c 78 2c 31 29 | 0d 18 a6 1f 6e 3d a7 22 |.a$,x,1)|....n=."|
|00004980| 30 31 32 33 34 35 36 37 | 38 39 61 62 63 6d 6e 70 |01234567|89abcmnp|
|00004990| 71 78 22 2c 62 24 29 0d | 18 b0 34 e7 20 6e 3e 30 |qx",b$).|..4. n>0|
|000049a0| 20 80 20 62 24 3c 3e 22 | 22 20 61 24 3d c0 61 24 | . b$<>"|" a$=.a$|
|000049b0| 2c 78 2d 31 29 2b bd 28 | 6e 2b 70 6f 77 65 72 2d |,x-1)+.(|n+power-|
|000049c0| 31 29 2b c1 61 24 2c 78 | 2b 31 29 0d 18 ba 17 78 |1)+.a$,x|+1)....x|
|000049d0| 3d 78 2b 31 3a fd 20 6e | 3d 30 20 84 20 62 24 3d |=x+1:. n|=0 . b$=|
|000049e0| 22 22 0d 18 c4 0e 6e 3d | a7 61 24 2c 22 5e 22 29 |""....n=|.a$,"^")|
|000049f0| 0d 18 ce 18 61 24 3d c0 | 61 24 2c 6e 2d 31 29 2b |....a$=.|a$,n-1)+|
|00004a00| c1 61 24 2c 6e 2b 31 29 | 0d 18 d8 07 3d 61 24 0d |.a$,n+1)|....=a$.|
|00004a10| 18 e2 05 3a 0d 18 ec 0f | dd f2 64 65 6c 65 74 65 |...:....|..delete|
|00004a20| 28 6e 29 0d 18 f6 45 66 | 75 6e 63 24 28 6e 29 3d |(n)...Ef|unc$(n)=|
|00004a30| 22 22 3a 78 6d 69 6e 28 | 6e 29 3d 30 3a 78 6d 61 |"":xmin(|n)=0:xma|
|00004a40| 78 28 6e 29 3d 30 3a 79 | 6d 69 6e 28 6e 29 3d 30 |x(n)=0:y|min(n)=0|
|00004a50| 3a 79 6d 61 78 28 6e 29 | 3d 30 3a 62 61 73 69 63 |:ymax(n)|=0:basic|
|00004a60| 76 24 28 6e 29 3d 22 22 | 0d 19 00 19 66 75 6e 63 |v$(n)=""|....func|
|00004a70| 74 69 6f 6e 25 3d 66 75 | 6e 63 74 69 6f 6e 25 2d |tion%=fu|nction%-|
|00004a80| 31 0d 19 0a 0c e7 20 6e | 3d 31 30 20 e1 0d 19 14 |1..... n|=10 ....|
|00004a90| 0d e3 20 78 3d 6e 20 b8 | 20 39 0d 19 1e 3b 66 75 |.. x=n .| 9...;fu|
|00004aa0| 6e 63 24 28 78 29 3d 66 | 75 6e 63 24 28 78 2b 31 |nc$(x)=f|unc$(x+1|
|00004ab0| 29 3a 78 6d 69 6e 28 78 | 29 3d 78 6d 69 6e 28 78 |):xmin(x|)=xmin(x|
|00004ac0| 2b 31 29 3a 78 6d 61 78 | 28 78 29 3d 78 6d 61 78 |+1):xmax|(x)=xmax|
|00004ad0| 28 78 2b 31 29 0d 19 28 | 3f 79 6d 69 6e 28 78 29 |(x+1)..(|?ymin(x)|
|00004ae0| 3d 79 6d 69 6e 28 78 2b | 31 29 3a 79 6d 61 78 28 |=ymin(x+|1):ymax(|
|00004af0| 78 29 3d 79 6d 61 78 28 | 78 2b 31 29 3a 62 61 73 |x)=ymax(|x+1):bas|
|00004b00| 69 63 76 24 28 78 29 3d | 62 61 73 69 63 76 24 28 |icv$(x)=|basicv$(|
|00004b10| 78 2b 31 29 0d 19 32 05 | ed 0d 19 3c 4b 66 75 6e |x+1)..2.|...<Kfun|
|00004b20| 63 24 28 31 30 29 3d 22 | 22 3a 78 6d 69 6e 28 31 |c$(10)="|":xmin(1|
|00004b30| 30 29 3d 30 3a 78 6d 61 | 78 28 31 30 29 3d 30 3a |0)=0:xma|x(10)=0:|
|00004b40| 79 6d 69 6e 28 31 30 29 | 3d 30 3a 79 6d 61 78 28 |ymin(10)|=0:ymax(|
|00004b50| 31 30 29 3d 30 3a 62 61 | 73 69 63 76 24 28 31 30 |10)=0:ba|sicv$(10|
|00004b60| 29 3d 22 22 0d 19 46 05 | e1 0d 19 50 05 3a 0d 19 |)=""..F.|...P.:..|
|00004b70| 5a 17 dd a4 72 61 64 69 | 61 6e 73 5f 6f 6e 5f 6f |Z...radi|ans_on_o|
|00004b80| 66 66 28 6e 29 0d 19 64 | 23 e7 20 6e 3d b9 20 8c |ff(n)..d|#. n=. .|
|00004b90| 20 3d 22 52 61 64 69 61 | 6e 73 22 20 8b 20 3d 22 | ="Radia|ns" . ="|
|00004ba0| 44 65 67 72 65 65 73 22 | 0d 19 6e 05 3a 0d 19 78 |Degrees"|..n.:..x|
|00004bb0| 10 dd f2 63 68 61 72 61 | 63 74 65 72 73 0d 19 82 |...chara|cters...|
|00004bc0| 20 ef 32 33 2c 32 32 34 | 2c 32 34 2c 33 36 2c 33 | .23,224|,24,36,3|
|00004bd0| 36 2c 33 36 2c 32 34 2c | 30 2c 30 2c 30 0d 19 8c |6,36,24,|0,0,0...|
|00004be0| 20 ef 32 33 2c 32 32 35 | 2c 31 36 2c 34 38 2c 31 | .23,225|,16,48,1|
|00004bf0| 36 2c 31 36 2c 35 36 2c | 30 2c 30 2c 30 0d 19 96 |6,16,56,|0,0,0...|
|00004c00| 1f ef 32 33 2c 32 32 36 | 2c 32 34 2c 33 36 2c 38 |..23,226|,24,36,8|
|00004c10| 2c 31 36 2c 36 30 2c 30 | 2c 30 2c 30 0d 19 a0 1f |,16,60,0|,0,0....|
|00004c20| ef 32 33 2c 32 32 37 2c | 32 34 2c 33 36 2c 38 2c |.23,227,|24,36,8,|
|00004c30| 33 36 2c 32 34 2c 30 2c | 30 2c 30 0d 19 aa 1f ef |36,24,0,|0,0.....|
|00004c40| 32 33 2c 32 32 38 2c 38 | 2c 32 34 2c 34 30 2c 31 |23,228,8|,24,40,1|
|00004c50| 32 34 2c 38 2c 30 2c 30 | 2c 30 0d 19 b4 1f ef 32 |24,8,0,0|,0.....2|
|00004c60| 33 2c 32 32 39 2c 36 30 | 2c 33 32 2c 35 36 2c 34 |3,229,60|,32,56,4|
|00004c70| 2c 35 36 2c 30 2c 30 2c | 30 0d 19 be 20 ef 32 33 |,56,0,0,|0... .23|
|00004c80| 2c 32 33 30 2c 32 38 2c | 33 32 2c 35 36 2c 33 36 |,230,28,|32,56,36|
|00004c90| 2c 32 34 2c 30 2c 30 2c | 30 0d 19 c8 1e ef 32 33 |,24,0,0,|0.....23|
|00004ca0| 2c 32 33 31 2c 36 30 2c | 34 2c 38 2c 31 36 2c 31 |,231,60,|4,8,16,1|
|00004cb0| 36 2c 30 2c 30 2c 30 0d | 19 d2 20 ef 32 33 2c 32 |6,0,0,0.|.. .23,2|
|00004cc0| 33 32 2c 32 34 2c 33 36 | 2c 32 34 2c 33 36 2c 32 |32,24,36|,24,36,2|
|00004cd0| 34 2c 30 2c 30 2c 30 0d | 19 dc 1f ef 32 33 2c 32 |4,0,0,0.|....23,2|
|00004ce0| 33 33 2c 32 34 2c 33 36 | 2c 32 38 2c 34 2c 32 34 |33,24,36|,28,4,24|
|00004cf0| 2c 30 2c 30 2c 30 0d 19 | e6 20 ef 32 33 2c 32 33 |,0,0,0..|. .23,23|
|00004d00| 34 2c 36 30 2c 36 2c 36 | 32 2c 31 30 32 2c 36 32 |4,60,6,6|2,102,62|
|00004d10| 2c 30 2c 30 2c 30 0d 19 | f0 23 ef 32 33 2c 32 33 |,0,0,0..|.#.23,23|
|00004d20| 35 2c 39 36 2c 39 36 2c | 31 32 34 2c 31 30 32 2c |5,96,96,|124,102,|
|00004d30| 31 32 34 2c 30 2c 30 2c | 30 0d 19 fa 20 ef 32 33 |124,0,0,|0... .23|
|00004d40| 2c 32 33 36 2c 32 38 2c | 35 34 2c 34 38 2c 35 34 |,236,28,|54,48,54|
|00004d50| 2c 32 38 2c 30 2c 30 2c | 30 0d 1a 04 21 ef 32 33 |,28,0,0,|0...!.23|
|00004d60| 2c 32 33 37 2c 35 34 2c | 31 30 37 2c 31 30 37 2c |,237,54,|107,107,|
|00004d70| 39 39 2c 30 2c 30 2c 30 | 2c 30 0d 1a 0e 23 ef 32 |99,0,0,0|,0...#.2|
|00004d80| 33 2c 32 33 38 2c 31 32 | 34 2c 31 30 32 2c 31 30 |3,238,12|4,102,10|
|00004d90| 32 2c 31 30 32 2c 30 2c | 30 2c 30 2c 30 0d 1a 18 |2,102,0,|0,0,0...|
|00004da0| 23 ef 32 33 2c 32 33 39 | 2c 31 32 34 2c 31 30 32 |#.23,239|,124,102|
|00004db0| 2c 31 32 34 2c 39 36 2c | 39 36 2c 30 2c 30 2c 30 |,124,96,|96,0,0,0|
|00004dc0| 0d 1a 22 1f ef 32 33 2c | 32 34 30 2c 36 32 2c 31 |.."..23,|240,62,1|
|00004dd0| 30 32 2c 36 32 2c 36 2c | 37 2c 30 2c 30 2c 30 0d |02,62,6,|7,0,0,0.|
|00004de0| 1a 2c 21 ef 32 33 2c 32 | 34 31 2c 31 30 32 2c 32 |.,!.23,2|41,102,2|
|00004df0| 34 2c 32 34 2c 31 30 32 | 2c 30 2c 30 2c 30 2c 30 |4,24,102|,0,0,0,0|
|00004e00| 0d 1a 36 23 ef 32 33 2c | 32 34 32 2c 33 31 2c 31 |..6#.23,|242,31,1|
|00004e10| 36 2c 31 36 2c 31 36 2c | 31 36 2c 38 30 2c 31 37 |6,16,16,|16,80,17|
|00004e20| 36 2c 30 0d 1a 40 23 ef | 32 33 2c 32 34 33 2c 30 |6,0..@#.|23,243,0|
|00004e30| 2c 30 2c 31 31 38 2c 31 | 33 36 2c 31 33 36 2c 31 |,0,118,1|36,136,1|
|00004e40| 31 38 2c 30 2c 30 0d 1a | 4a 2b ef 32 33 2c 32 34 |18,0,0..|J+.23,24|
|00004e50| 34 2c 32 34 38 2c 32 30 | 34 2c 32 30 34 2c 32 31 |4,248,20|4,204,21|
|00004e60| 36 2c 31 39 38 2c 31 39 | 38 2c 32 32 30 2c 31 39 |6,198,19|8,220,19|
|00004e70| 32 0d 1a 54 22 ef 32 33 | 2c 32 34 35 2c 30 2c 31 |2..T".23|,245,0,1|
|00004e80| 34 2c 32 37 2c 32 34 2c | 32 34 2c 32 34 2c 32 34 |4,27,24,|24,24,24|
|00004e90| 2c 32 34 0d 1a 5e 22 ef | 32 33 2c 32 34 36 2c 32 |,24..^".|23,246,2|
|00004ea0| 34 2c 32 34 2c 32 34 2c | 32 31 36 2c 31 31 32 2c |4,24,24,|216,112,|
|00004eb0| 30 2c 30 2c 30 0d 1a 68 | 27 ef 32 33 2c 32 34 37 |0,0,0..h|'.23,247|
|00004ec0| 2c 32 35 35 2c 31 39 32 | 2c 39 36 2c 34 38 2c 34 |,255,192|,96,48,4|
|00004ed0| 38 2c 39 36 2c 31 39 32 | 2c 32 35 35 0d 1a 72 21 |8,96,192|,255..r!|
|00004ee0| ef 32 33 2c 32 34 38 2c | 30 2c 32 34 2c 31 32 36 |.23,248,|0,24,126|
|00004ef0| 2c 32 34 2c 30 2c 31 32 | 36 2c 30 2c 30 0d 1a 7c |,24,0,12|6,0,0..||
|00004f00| 22 ef 32 33 2c 32 34 39 | 2c 30 2c 36 30 2c 31 30 |".23,249|,0,60,10|
|00004f10| 32 2c 36 2c 36 30 2c 31 | 30 32 2c 36 30 2c 30 0d |2,6,60,1|02,60,0.|
|00004f20| 1a 86 1d ef 32 33 2c 32 | 35 30 2c 30 2c 30 2c 36 |....23,2|50,0,0,6|
|00004f30| 2c 32 35 35 2c 36 2c 30 | 2c 30 2c 30 0d 1a 90 24 |,255,6,0|,0,0...$|
|00004f40| ef 32 33 2c 32 35 31 2c | 31 32 37 2c 39 36 2c 39 |.23,251,|127,96,9|
|00004f50| 36 2c 39 36 2c 39 36 2c | 39 36 2c 39 36 2c 39 36 |6,96,96,|96,96,96|
|00004f60| 0d 1a 9a 24 ef 32 33 2c | 32 35 32 2c 39 36 2c 39 |...$.23,|252,96,9|
|00004f70| 36 2c 39 36 2c 39 36 2c | 39 36 2c 39 36 2c 39 36 |6,96,96,|96,96,96|
|00004f80| 2c 31 32 37 0d 1a a4 1d | ef 32 33 2c 32 35 33 2c |,127....|.23,253,|
|00004f90| 32 35 34 2c 36 2c 36 2c | 36 2c 36 2c 36 2c 36 2c |254,6,6,|6,6,6,6,|
|00004fa0| 36 0d 1a ae 1d ef 32 33 | 2c 32 35 34 2c 36 2c 36 |6.....23|,254,6,6|
|00004fb0| 2c 36 2c 36 2c 36 2c 36 | 2c 36 2c 32 35 34 0d 1a |,6,6,6,6|,6,254..|
|00004fc0| b8 1c ef 32 33 2c 32 35 | 35 2c 30 2c 30 2c 36 30 |...23,25|5,0,0,60|
|00004fd0| 2c 30 2c 30 2c 30 2c 30 | 2c 30 0d 1a c2 40 73 71 |,0,0,0,0|,0...@sq|
|00004fe0| 72 3d 32 34 32 3a 61 6c | 70 68 61 3d 32 34 33 3a |r=242:al|pha=243:|
|00004ff0| 62 65 74 61 3d 32 34 34 | 3a 69 6e 74 5f 74 6f 70 |beta=244|:int_top|
|00005000| 3d 32 34 35 3a 69 6e 74 | 5f 62 6f 74 3d 32 34 36 |=245:int|_bot=246|
|00005010| 3a 73 69 67 6d 61 3d 32 | 34 37 0d 1a cc 38 70 6c |:sigma=2|47...8pl|
|00005020| 75 73 5f 6d 69 6e 75 73 | 3d 32 34 38 3a 64 65 6c |us_minus|=248:del|
|00005030| 74 61 3d 32 34 39 3a 74 | 65 6e 64 73 3d 32 35 30 |ta=249:t|ends=250|
|00005040| 3a 74 6f 70 31 3d 32 35 | 31 3a 62 6f 74 31 3d 32 |:top1=25|1:bot1=2|
|00005050| 35 32 0d 1a d6 2d 74 6f | 70 32 3d 32 35 33 3a 62 |52...-to|p2=253:b|
|00005060| 6f 74 32 3d 32 35 34 3a | 70 6f 77 65 72 3d 32 32 |ot2=254:|power=22|
|00005070| 34 3a 6e 65 67 5f 70 6f | 77 65 72 3d 32 35 35 0d |4:neg_po|wer=255.|
|00005080| 1a e0 05 e1 0d 1a ea 05 | 3a 0d 1a f4 10 dd f2 71 |........|:......q|
|00005090| 75 61 64 72 61 74 69 63 | 73 0d 1a fe 10 db 3a ef |uadratic|s.....:.|
|000050a0| 31 39 2c 30 2c 34 3b 30 | 3b 0d 1b 08 36 f1 20 8a |19,0,4;0|;...6. .|
|000050b0| 30 2c 34 29 a4 63 65 6e | 74 72 65 28 22 51 20 55 |0,4).cen|tre("Q U|
|000050c0| 20 41 20 44 20 52 20 41 | 20 54 20 49 20 43 20 20 | A D R A| T I C  |
|000050d0| 20 20 53 20 4f 20 4c 20 | 56 20 45 20 52 22 29 0d |  S O L |V E R").|
|000050e0| 1b 12 0a f2 74 69 74 6c | 65 0d 1b 1c 11 ef 32 38 |....titl|e.....28|
|000050f0| 2c 32 2c 33 30 2c 37 36 | 2c 36 0d 1b 26 54 f1 22 |,2,30,76|,6..&T."|
|00005100| 45 6e 74 65 72 20 74 68 | 65 20 66 6f 6c 6c 6f 77 |Enter th|e follow|
|00005110| 69 6e 67 20 64 65 74 61 | 69 6c 73 20 61 62 6f 75 |ing deta|ils abou|
|00005120| 74 20 74 68 65 20 71 75 | 61 64 72 61 74 69 63 20 |t the qu|adratic |
|00005130| 69 6e 20 74 68 65 20 66 | 6f 72 6d 20 79 3d 61 78 |in the f|orm y=ax|
|00005140| 22 3b bd 32 32 36 3b 22 | 2b 62 78 2b 63 22 0d 1b |";.226;"|+bx+c"..|
|00005150| 30 1d f1 27 22 43 6f 65 | 66 66 20 6f 66 20 78 22 |0..'"Coe|ff of x"|
|00005160| 3b bd 32 32 36 3b 22 3a | 20 22 3b 0d 1b 3a 0b e8 |;.226;":| ";..:..|
|00005170| 20 22 61 3d 22 61 0d 1b | 44 0f e7 20 61 3d 30 20 | "a="a..|D.. a=0 |
|00005180| ef 32 36 3a e1 0d 1b 4e | 16 f1 20 22 43 6f 65 66 |.26:...N|.. "Coef|
|00005190| 66 20 6f 66 20 78 20 3a | 20 22 3b 0d 1b 58 0b e8 |f of x :| ";..X..|
|000051a0| 20 22 62 3d 22 62 0d 1b | 62 16 f1 20 22 43 6f 6e | "b="b..|b.. "Con|
|000051b0| 73 74 61 6e 74 20 20 20 | 3a 20 22 3b 0d 1b 6c 0b |stant   |: ";..l.|
|000051c0| e8 20 22 63 3d 22 63 0d | 1b 76 1d db 3a f1 22 59 |. "c="c.|.v..:."Y|
|000051d0| 6f 75 72 20 65 71 75 61 | 74 69 6f 6e 20 69 73 20 |our equa|tion is |
|000051e0| 79 3d 22 3b 0d 1b 80 1e | e7 20 61 3d 2d 31 20 f1 |y=";....|. a=-1 .|
|000051f0| 22 2d 22 3b 20 8b 20 e7 | 20 61 3c 3e 31 20 f1 20 |"-"; . .| a<>1 . |
|00005200| 61 3b 0d 1b 8a 0f f1 20 | 22 78 22 3b bd 32 32 36 |a;..... |"x";.226|
|00005210| 3b 0d 1b 94 1e e7 20 62 | 3d 2d 31 20 f1 22 2d 22 |;..... b|=-1 ."-"|
|00005220| 3b 20 8b 20 e7 20 62 3e | 30 20 f1 22 2b 22 3b 0d |; . . b>|0 ."+";.|
|00005230| 1b 9e 33 e7 20 62 3c 3e | 30 20 80 20 62 3c 3e 31 |..3. b<>|0 . b<>1|
|00005240| 20 80 20 62 3c 3e 2d 31 | 20 f1 22 22 3b 62 3b 22 | . b<>-1| ."";b;"|
|00005250| 78 22 3b 20 8b 20 e7 20 | 62 3c 3e 30 20 f1 22 78 |x"; . . |b<>0 ."x|
|00005260| 22 3b 0d 1b a8 0f e7 20 | 63 3e 30 20 f1 22 2b 22 |";..... |c>0 ."+"|
|00005270| 3b 0d 1b b2 14 e7 20 63 | 3d 30 20 f1 20 8b 20 f1 |;..... c|=0 . . .|
|00005280| 20 22 22 3b 63 0d 1b bc | 34 f1 8a 30 2c 31 29 22 | "";c...|4..0,1)"|
|00005290| 54 68 65 20 72 6f 6f 74 | 73 20 6f 66 20 61 6e 79 |The root|s of any|
|000052a0| 20 71 75 61 64 72 61 74 | 69 63 20 61 72 65 20 67 | quadrat|ic are g|
|000052b0| 69 76 65 6e 20 62 79 3a | 22 0d 1b c6 3f f1 8a 34 |iven by:|"...?..4|
|000052c0| 38 2c 31 29 22 78 20 3d | 20 2d 62 20 22 3b bd 28 |8,1)"x =| -b ";.(|
|000052d0| 70 6c 75 73 5f 6d 69 6e | 75 73 29 3b 22 20 22 3b |plus_min|us);" ";|
|000052e0| bd 28 73 71 72 29 3b 22 | 7b 62 22 3b bd 32 32 36 |.(sqr);"|{b";.226|
|000052f0| 3b 22 2d 34 61 63 7d 22 | 0d 1b d0 23 f2 67 72 61 |;"-4ac}"|...#.gra|
|00005300| 70 68 69 63 5f 70 72 69 | 6e 74 28 35 33 2c 31 2b |phic_pri|nt(53,1+|
|00005310| 36 2c c4 31 34 2c 22 5f | 22 29 29 0d 1b da 0f f1 |6,.14,"_|")).....|
|00005320| 8a 35 36 2c 32 29 22 32 | 61 22 0d 1b e4 0f 64 3d |.56,2)"2|a"....d=|
|00005330| 62 5e 32 2d 34 2a 61 2a | 63 0d 1b ee 36 e7 20 64 |b^2-4*a*|c...6. d|
|00005340| 3e 3d 30 20 72 6f 6f 74 | 31 3d 28 2d 62 2d b6 28 |>=0 root|1=(-b-.(|
|00005350| 64 29 29 2f 28 32 2a 61 | 29 3a 72 6f 6f 74 32 3d |d))/(2*a|):root2=|
|00005360| 28 2d 62 2b b6 28 64 29 | 29 2f 28 32 2a 61 29 0d |(-b+.(d)|)/(2*a).|
|00005370| 1b f8 32 e7 20 64 3c 30 | 20 f1 8a 30 2c 33 29 22 |..2. d<0| ..0,3)"|
|00005380| 54 68 69 73 20 65 71 75 | 61 74 69 6f 6e 20 68 61 |This equ|ation ha|
|00005390| 73 20 63 6f 6d 70 6c 65 | 78 20 72 6f 6f 74 73 2e |s comple|x roots.|
|000053a0| 22 0d 1c 02 41 e7 20 64 | 3d 30 20 f1 8a 30 2c 33 |"...A. d|=0 ..0,3|
|000053b0| 29 22 78 3d 22 3b 72 6f | 6f 74 31 3b 22 20 74 77 |)"x=";ro|ot1;" tw|
|000053c0| 69 63 65 2e 20 28 69 65 | 2e 20 49 74 20 69 73 20 |ice. (ie|. It is |
|000053d0| 61 20 70 65 72 66 65 63 | 74 20 73 71 75 61 72 65 |a perfec|t square|
|000053e0| 29 22 0d 1c 0c 27 e7 20 | 64 3e 30 20 f1 8a 30 2c |)"...'. |d>0 ..0,|
|000053f0| 33 29 22 78 3d 22 3b 72 | 6f 6f 74 31 3b 22 20 6f |3)"x=";r|oot1;" o|
|00005400| 72 20 22 3b 72 6f 6f 74 | 32 0d 1c 16 4a f1 8a 30 |r ";root|2...J..0|
|00005410| 2c 35 29 22 54 68 65 20 | 73 75 6d 20 6f 66 20 74 |,5)"The |sum of t|
|00005420| 68 65 20 72 6f 6f 74 73 | 20 22 3b bd 28 61 6c 70 |he roots| ";.(alp|
|00005430| 68 61 29 3b 22 2b 22 3b | bd 28 62 65 74 61 29 3b |ha);"+";|.(beta);|
|00005440| 22 20 69 73 20 67 69 76 | 65 6e 20 62 79 20 2d 62 |" is giv|en by -b|
|00005450| 2f 61 22 0d 1c 20 49 f1 | 8a 30 2c 36 29 22 54 68 |/a".. I.|.0,6)"Th|
|00005460| 65 20 70 72 6f 64 75 63 | 74 20 6f 66 20 74 68 65 |e produc|t of the|
|00005470| 20 72 6f 6f 74 73 20 22 | 3b bd 28 61 6c 70 68 61 | roots "|;.(alpha|
|00005480| 29 3b bd 28 62 65 74 61 | 29 3b 22 20 69 73 20 67 |);.(beta|);" is g|
|00005490| 69 76 65 6e 20 62 79 20 | 63 2f 61 22 0d 1c 2a 28 |iven by |c/a"..*(|
|000054a0| f1 8a 35 30 2c 35 29 bd | 28 61 6c 70 68 61 29 3b |..50,5).|(alpha);|
|000054b0| 22 2b 22 3b bd 28 62 65 | 74 61 29 3b 22 3d 22 3b |"+";.(be|ta);"=";|
|000054c0| 2d 62 2f 61 0d 1c 34 23 | f1 8a 35 31 2c 36 29 bd |-b/a..4#|..51,6).|
|000054d0| 28 61 6c 70 68 61 29 3b | bd 28 62 65 74 61 29 3b |(alpha);|.(beta);|
|000054e0| 22 3d 22 3b 63 2f 61 0d | 1c 3e 54 f1 8a 30 2c 38 |"=";c/a.|.>T..0,8|
|000054f0| 29 22 54 68 65 20 65 71 | 75 61 74 69 6f 6e 20 6d |)"The eq|uation m|
|00005500| 61 79 20 61 6c 73 6f 20 | 62 65 20 65 78 70 72 65 |ay also |be expre|
|00005510| 73 73 65 64 20 69 6e 20 | 74 68 65 20 66 6f 72 6d |ssed in |the form|
|00005520| 20 79 3d 61 28 78 2d 70 | 29 2b 71 20 77 68 65 72 | y=a(x-p|)+q wher|
|00005530| 65 20 28 70 2c 71 29 20 | 69 73 22 0d 1c 48 53 f1 |e (p,q) |is"..HS.|
|00005540| 8a 30 2c 39 29 22 74 68 | 65 20 6d 61 78 20 6f 72 |.0,9)"th|e max or|
|00005550| 20 6d 69 6e 20 70 6f 69 | 6e 74 2e 20 54 68 65 72 | min poi|nt. Ther|
|00005560| 65 66 6f 72 65 20 78 3d | 70 20 69 73 20 74 68 65 |efore x=|p is the|
|00005570| 20 6c 69 6e 65 20 6f 66 | 20 73 79 6d 65 74 72 79 | line of| symetry|
|00005580| 20 6f 66 20 74 68 65 20 | 63 75 72 76 65 22 0d 1c | of the |curve"..|
|00005590| 52 28 f1 8a 30 2c 31 30 | 29 22 61 6e 64 20 71 20 |R(..0,10|)"and q |
|000055a0| 74 68 65 20 6d 61 78 20 | 6f 72 20 6d 69 6e 20 76 |the max |or min v|
|000055b0| 61 6c 75 65 2e 22 0d 1c | 5c 0e 70 3d 2d 62 2f 28 |alue."..|\.p=-b/(|
|000055c0| 32 2a 61 29 0d 1c 66 17 | 71 3d 28 34 2a 61 2a 63 |2*a)..f.|q=(4*a*c|
|000055d0| 2d 62 5e 32 29 2f 28 34 | 2a 61 29 0d 1c 70 10 f1 |-b^2)/(4|*a)..p..|
|000055e0| 8a 35 2c 31 31 29 22 79 | 3d 22 3b 0d 1c 7a 0f e7 |.5,11)"y|=";..z..|
|000055f0| 20 61 3c 30 20 f1 22 2d | 22 3b 0d 1c 84 19 e7 20 | a<0 ."-|";..... |
|00005600| 61 3c 3e 31 20 80 20 61 | 3c 3e 2d 31 20 f1 22 22 |a<>1 . a|<>-1 .""|
|00005610| 3b 61 3b 0d 1c 8e 0a f1 | 22 28 78 22 3b 0d 1c 98 |;a;.....|"(x";...|
|00005620| 26 e7 20 70 3e 30 20 f1 | 22 2d 22 3b 70 3b 20 8b |&. p>0 .|"-";p; .|
|00005630| 20 e7 20 70 3c 30 20 f1 | 22 2b 22 3b b6 28 70 5e | . p<0 .|"+";.(p^|
|00005640| 32 29 3b 0d 1c a2 0e f1 | 22 29 22 3b bd 32 32 36 |2);.....|")";.226|
|00005650| 3b 0d 1c ac 1e e7 20 71 | 3c 30 20 f1 22 22 3b 71 |;..... q|<0 ."";q|
|00005660| 20 8b 20 e7 20 71 3e 30 | 20 f1 22 2b 22 3b 71 0d | . . q>0| ."+";q.|
|00005670| 1c b6 0b e7 20 71 3d 30 | 20 f1 0d 1c c0 31 f1 8a |.... q=0| ....1..|
|00005680| 30 2c 32 39 29 20 a4 63 | 65 6e 74 72 65 28 22 50 |0,29) .c|entre("P|
|00005690| 72 65 73 73 20 61 6e 79 | 20 6b 65 79 20 74 6f 20 |ress any| key to |
|000056a0| 63 6f 6e 74 69 6e 75 65 | 22 29 3b 0d 1c ca 14 f2 |continue|");.....|
|000056b0| 73 63 72 65 65 6e 5f 64 | 75 6d 70 3a ef 32 36 0d |screen_d|ump:.26.|
|000056c0| 1c d4 05 e1 0d 1c de 05 | 3a 0d 1c e8 1b dd f2 67 |........|:......g|
|000056d0| 72 61 70 68 69 63 5f 70 | 72 69 6e 74 28 78 2c 79 |raphic_p|rint(x,y|
|000056e0| 2c 61 24 29 0d 1c f2 06 | ef 35 0d 1c fc 3f e7 20 |,a$)....|.5...?. |
|000056f0| 63 6f 6d 70 75 74 65 72 | 24 3d 22 4e 49 4d 42 55 |computer|$="NIMBU|
|00005700| 53 22 20 ec 20 78 2a 31 | 36 2c 39 39 31 2d 28 79 |S" . x*1|6,991-(y|
|00005710| 2a 33 32 29 20 8b 20 ec | 20 78 2a 31 36 2c 31 30 |*32) . .| x*16,10|
|00005720| 32 33 2d 28 79 2a 33 32 | 29 0d 1d 06 0b f1 20 61 |23-(y*32|)..... a|
|00005730| 24 3a ef 34 0d 1d 10 05 | e1 0d 1d 1a 05 3a 0d 1d |$:.4....|.....:..|
|00005740| 24 14 dd f2 67 65 74 5f | 79 5f 72 61 6e 67 65 28 |$...get_|y_range(|
|00005750| 6e 29 0d 1d 2e 09 ea 20 | 58 2c 59 0d 1d 38 27 f1 |n)..... |X,Y..8'.|
|00005760| 20 27 27 22 52 61 6e 67 | 69 6e 67 20 66 6f 72 20 | ''"Rang|ing for |
|00005770| 59 20 76 61 6c 75 65 73 | 2e 2e 2e 2e 2e 2e 2e 2e |Y values|........|
|00005780| 2e 22 0d 1d 42 17 79 6d | 61 78 28 6e 29 3d 30 3a |."..B.ym|ax(n)=0:|
|00005790| 79 6d 69 6e 28 6e 29 3d | 30 0d 1d 4c 35 e3 20 58 |ymin(n)=|0..L5. X|
|000057a0| 3d 78 6d 69 6e 28 6e 29 | 20 b8 20 78 6d 61 78 28 |=xmin(n)| . xmax(|
|000057b0| 6e 29 20 88 20 28 78 6d | 61 78 28 6e 29 2d 78 6d |n) . (xm|ax(n)-xm|
|000057c0| 69 6e 28 6e 29 29 2f 70 | 6f 69 6e 74 73 25 0d 1d |in(n))/p|oints%..|
|000057d0| 56 13 59 3d a0 28 62 61 | 73 69 63 76 24 28 6e 29 |V.Y=.(ba|sicv$(n)|
|000057e0| 29 0d 1d 60 1b e7 20 59 | 3e 79 6d 61 78 28 6e 29 |)..`.. Y|>ymax(n)|
|000057f0| 20 8c 20 79 6d 61 78 28 | 6e 29 3d 59 0d 1d 6a 1b | . ymax(|n)=Y..j.|
|00005800| e7 20 59 3c 79 6d 69 6e | 28 6e 29 20 8c 20 79 6d |. Y<ymin|(n) . ym|
|00005810| 69 6e 28 6e 29 3d 59 0d | 1d 74 05 ed 0d 1d 7e 29 |in(n)=Y.|.t....~)|
|00005820| e7 20 a7 62 61 73 69 63 | 76 24 28 6e 29 2c 22 53 |. .basic|v$(n),"S|
|00005830| 51 52 22 29 20 79 6d 69 | 6e 28 6e 29 3d 2d 79 6d |QR") ymi|n(n)=-ym|
|00005840| 61 78 28 6e 29 0d 1d 88 | 05 e1 0d 1d 92 05 3a 0d |ax(n)...|......:.|
|00005850| 1d 9c 0d dd f2 70 6c 6f | 74 61 6c 6c 0d 1d a6 10 |.....plo|tall....|
|00005860| db 3a ef 31 39 2c 30 2c | 34 3b 30 3b 0d 1d b0 37 |.:.19,0,|4;0;...7|
|00005870| 78 6d 69 6e 3d 78 6d 69 | 6e 28 31 29 3a 78 6d 61 |xmin=xmi|n(1):xma|
|00005880| 78 3d 78 6d 61 78 28 31 | 29 3a 79 6d 69 6e 3d 79 |x=xmax(1|):ymin=y|
|00005890| 6d 69 6e 28 31 29 3a 79 | 6d 61 78 3d 79 6d 61 78 |min(1):y|max=ymax|
|000058a0| 28 31 29 0d 1d ba 15 e3 | 20 6e 3d 31 20 b8 20 66 |(1).....| n=1 . f|
|000058b0| 75 6e 63 74 69 6f 6e 25 | 0d 1d c4 0b 66 6c 61 67 |unction%|....flag|
|000058c0| 25 3d a3 0d 1d ce 2f e7 | 20 78 6d 69 6e 28 6e 29 |%=..../.| xmin(n)|
|000058d0| 3d 78 6d 61 78 28 6e 29 | 20 84 20 79 6d 69 6e 28 |=xmax(n)| . ymin(|
|000058e0| 6e 29 3d 79 6d 61 78 28 | 6e 29 20 66 6c 61 67 25 |n)=ymax(|n) flag%|
|000058f0| 3d b9 0d 1d d8 29 e7 20 | 78 6d 69 6e 28 6e 29 3c |=....). |xmin(n)<|
|00005900| 78 6d 69 6e 20 80 20 66 | 6c 61 67 25 3d a3 20 78 |xmin . f|lag%=. x|
|00005910| 6d 69 6e 3d 78 6d 69 6e | 28 6e 29 0d 1d e2 29 e7 |min=xmin|(n)...).|
|00005920| 20 78 6d 61 78 28 6e 29 | 3e 78 6d 61 78 20 80 20 | xmax(n)|>xmax . |
|00005930| 66 6c 61 67 25 3d a3 20 | 78 6d 61 78 3d 78 6d 61 |flag%=. |xmax=xma|
|00005940| 78 28 6e 29 0d 1d ec 29 | e7 20 79 6d 69 6e 28 6e |x(n)...)|. ymin(n|
|00005950| 29 3c 79 6d 69 6e 20 80 | 20 66 6c 61 67 25 3d a3 |)<ymin .| flag%=.|
|00005960| 20 79 6d 69 6e 3d 79 6d | 69 6e 28 6e 29 0d 1d f6 | ymin=ym|in(n)...|
|00005970| 29 e7 20 79 6d 61 78 28 | 6e 29 3e 79 6d 61 78 20 |). ymax(|n)>ymax |
|00005980| 80 20 66 6c 61 67 25 3d | a3 20 79 6d 61 78 3d 79 |. flag%=|. ymax=y|
|00005990| 6d 61 78 28 6e 29 0d 1e | 00 05 ed 0d 1e 0a 15 e3 |max(n)..|........|
|000059a0| 20 6e 3d 31 20 b8 20 66 | 75 6e 63 74 69 6f 6e 25 | n=1 . f|unction%|
|000059b0| 0d 1e 14 0b 66 6c 61 67 | 25 3d a3 0d 1e 1e 2f e7 |....flag|%=..../.|
|000059c0| 20 78 6d 69 6e 28 6e 29 | 3d 78 6d 61 78 28 6e 29 | xmin(n)|=xmax(n)|
|000059d0| 20 84 20 79 6d 69 6e 28 | 6e 29 3d 79 6d 61 78 28 | . ymin(|n)=ymax(|
|000059e0| 6e 29 20 66 6c 61 67 25 | 3d b9 0d 1e 28 2e e7 20 |n) flag%|=...(.. |
|000059f0| 66 6c 61 67 25 3d a3 20 | f2 70 6c 6f 74 6c 69 6e |flag%=. |.plotlin|
|00005a00| 65 28 6e 2c 78 6d 69 6e | 2c 78 6d 61 78 2c 79 6d |e(n,xmin|,xmax,ym|
|00005a10| 69 6e 2c 79 6d 61 78 29 | 0d 1e 32 14 ed 3a d4 20 |in,ymax)|..2..:. |
|00005a20| 31 2c 2d 31 35 2c 31 30 | 30 2c 31 30 0d 1e 3c 10 |1,-15,10|0,10..<.|
|00005a30| f2 73 63 72 65 65 6e 5f | 64 75 6d 70 0d 1e 46 05 |.screen_|dump..F.|
|00005a40| e1 0d 1e 50 05 3a 0d 1e | 5a 0d dd f2 70 6c 6f 74 |...P.:..|Z...plot|
|00005a50| 28 6e 29 0d 1e 64 10 db | 3a ef 31 39 2c 30 2c 34 |(n)..d..|:.19,0,4|
|00005a60| 3b 30 3b 0d 1e 6e 29 e7 | 20 78 6d 69 6e 28 6e 29 |;0;..n).| xmin(n)|
|00005a70| 3d 78 6d 61 78 28 6e 29 | 20 84 20 79 6d 69 6e 28 |=xmax(n)| . ymin(|
|00005a80| 6e 29 3d 79 6d 61 78 28 | 6e 29 20 e1 0d 1e 78 30 |n)=ymax(|n) ...x0|
|00005a90| f2 70 6c 6f 74 6c 69 6e | 65 28 6e 2c 78 6d 69 6e |.plotlin|e(n,xmin|
|00005aa0| 28 6e 29 2c 78 6d 61 78 | 28 6e 29 2c 79 6d 69 6e |(n),xmax|(n),ymin|
|00005ab0| 28 6e 29 2c 79 6d 61 78 | 28 6e 29 29 0d 1e 82 1e |(n),ymax|(n))....|
|00005ac0| d4 20 31 2c 2d 31 35 2c | 31 30 30 2c 31 30 3a 73 |. 1,-15,|100,10:s|
|00005ad0| 63 72 65 65 6e 5f 64 75 | 6d 70 0d 1e 8c 05 e1 0d |creen_du|mp......|
|00005ae0| 1e 96 05 3a 0d 1e a0 11 | dd f2 69 6e 63 5f 70 6c |...:....|..inc_pl|
|00005af0| 6f 74 28 6e 29 0d 1e aa | 10 db 3a ef 31 39 2c 30 |ot(n)...|..:.19,0|
|00005b00| 2c 34 3b 30 3b 0d 1e b4 | 22 f1 22 57 68 69 63 68 |,4;0;...|"."Which|
|00005b10| 20 76 61 72 69 61 62 6c | 65 3a 20 22 3b 3a 61 24 | variabl|e: ";:a$|
|00005b20| 3d be 3a f1 20 61 24 0d | 1e be 2b e7 20 a7 22 41 |=.:. a$.|..+. ."A|
|00005b30| 42 43 44 45 46 47 48 49 | 4a 4b 4c 4d 4e 4f 50 51 |BCDEFGHI|JKLMNOPQ|
|00005b40| 52 53 54 55 56 57 58 59 | 5a 22 2c 61 24 29 3d 30 |RSTUVWXY|Z",a$)=0|
|00005b50| 20 e1 0d 1e c8 16 e8 22 | 53 74 61 72 74 20 61 74 | ......"|Start at|
|00005b60| 3a 20 22 73 74 61 72 74 | 0d 1e d2 1d e8 22 4e 75 |: "start|....."Nu|
|00005b70| 6d 62 65 72 20 6f 66 20 | 70 6c 6f 74 73 3a 20 22 |mber of |plots: "|
|00005b80| 70 6c 6f 74 73 0d 1e dc | 15 e8 22 49 6e 63 72 65 |plots...|.."Incre|
|00005b90| 6d 65 6e 74 3a 20 22 69 | 6e 63 0d 1e e6 11 79 6d |ment: "i|nc....ym|
|00005ba0| 61 78 3d 30 3a 79 6d 69 | 6e 3d 30 0d 1e f0 25 e3 |ax=0:ymi|n=0...%.|
|00005bb0| 20 61 3d 73 74 61 72 74 | 20 b8 20 73 74 61 72 74 | a=start| . start|
|00005bc0| 2b 70 6c 6f 74 73 2a 69 | 6e 63 20 88 20 69 6e 63 |+plots*i|nc . inc|
|00005bd0| 0d 1e fa 17 f2 73 65 74 | 5f 76 61 72 69 61 62 6c |.....set|_variabl|
|00005be0| 65 28 61 24 2c 61 29 0d | 1f 04 13 f2 67 65 74 5f |e(a$,a).|....get_|
|00005bf0| 79 5f 72 61 6e 67 65 28 | 6e 29 0d 1f 0e 1f e7 20 |y_range(|n)..... |
|00005c00| 79 6d 61 78 28 6e 29 3e | 79 6d 61 78 20 79 6d 61 |ymax(n)>|ymax yma|
|00005c10| 78 3d 79 6d 61 78 28 6e | 29 0d 1f 18 1f e7 20 79 |x=ymax(n|)..... y|
|00005c20| 6d 69 6e 28 6e 29 3c 79 | 6d 69 6e 20 79 6d 69 6e |min(n)<y|min ymin|
|00005c30| 3d 79 6d 69 6e 28 6e 29 | 0d 1f 22 05 ed 0d 1f 2c |=ymin(n)|.."....,|
|00005c40| 05 db 0d 1f 36 25 e3 20 | 61 3d 73 74 61 72 74 20 |....6%. |a=start |
|00005c50| b8 20 73 74 61 72 74 2b | 70 6c 6f 74 73 2a 69 6e |. start+|plots*in|
|00005c60| 63 20 88 20 69 6e 63 0d | 1f 40 17 f2 73 65 74 5f |c . inc.|.@..set_|
|00005c70| 76 61 72 69 61 62 6c 65 | 28 61 24 2c 61 29 0d 1f |variable|(a$,a)..|
|00005c80| 4a 2a f2 70 6c 6f 74 6c | 69 6e 65 28 6e 2c 78 6d |J*.plotl|ine(n,xm|
|00005c90| 69 6e 28 6e 29 2c 78 6d | 61 78 28 6e 29 2c 79 6d |in(n),xm|ax(n),ym|
|00005ca0| 69 6e 2c 79 6d 61 78 29 | 0d 1f 54 05 ed 0d 1f 5e |in,ymax)|..T....^|
|00005cb0| 13 ef 37 3a f2 73 63 72 | 65 65 6e 5f 64 75 6d 70 |..7:.scr|een_dump|
|00005cc0| 0d 1f 68 05 e1 0d 1f 72 | 05 3a 0d 1f 7c 25 dd f2 |..h....r|.:..|%..|
|00005cd0| 70 6c 6f 74 6c 69 6e 65 | 28 6e 2c 6d 69 6e 58 2c |plotline|(n,minX,|
|00005ce0| 6d 61 78 58 2c 6d 69 6e | 59 2c 6d 61 78 59 29 0d |maxX,min|Y,maxY).|
|00005cf0| 1f 86 07 ef 32 36 0d 1f | 90 13 53 71 72 25 3d 30 |....26..|..Sqr%=0|
|00005d00| 3a 53 71 72 6c 70 25 3d | 30 0d 1f 9a 20 e7 20 a7 |:Sqrlp%=|0... . .|
|00005d10| 62 61 73 69 63 76 24 28 | 6e 29 2c 22 53 51 52 22 |basicv$(|n),"SQR"|
|00005d20| 29 20 53 71 72 25 3d 2d | 31 0d 1f a4 1a 58 72 3d |) Sqr%=-|1....Xr=|
|00005d30| 6d 61 78 58 2d 6d 69 6e | 58 3a 58 73 3d 39 30 30 |maxX-min|X:Xs=900|
|00005d40| 2f 58 72 0d 1f ae 1a 59 | 72 3d 6d 61 78 59 2d 6d |/Xr....Y|r=maxY-m|
|00005d50| 69 6e 59 3a 59 73 3d 39 | 30 30 2f 59 72 0d 1f b8 |inY:Ys=9|00/Yr...|
|00005d60| 0c 4f 78 3d 2d 6d 69 6e | 58 0d 1f c2 0c 4f 79 3d |.Ox=-min|X....Oy=|
|00005d70| 2d 6d 69 6e 59 0d 1f cc | 18 c8 91 20 4f 78 2a 58 |-minY...|... Ox*X|
|00005d80| 73 2b 35 30 2c 4f 79 2a | 59 73 2b 35 30 0d 1f d6 |s+50,Oy*|Ys+50...|
|00005d90| 1b ec 20 30 2c 6d 69 6e | 59 2a 59 73 3a df 20 30 |.. 0,min|Y*Ys:. 0|
|00005da0| 2c 6d 61 78 59 2a 59 73 | 0d 1f e0 1b ec 20 6d 69 |,maxY*Ys|..... mi|
|00005db0| 6e 58 2a 58 73 2c 30 3a | df 20 6d 61 78 58 2a 58 |nX*Xs,0:|. maxX*X|
|00005dc0| 73 2c 30 0d 1f ea 3a e3 | 20 78 3d 6d 69 6e 58 20 |s,0...:.| x=minX |
|00005dd0| b8 20 6d 61 78 58 20 88 | 20 a4 73 63 61 6c 65 28 |. maxX .| .scale(|
|00005de0| 6d 69 6e 58 2c 6d 61 78 | 58 29 3a ec 20 78 2a 58 |minX,max|X):. x*X|
|00005df0| 73 2c 35 3a df 78 2a 58 | 73 2c 30 3a ed 0d 1f f4 |s,5:.x*X|s,0:....|
|00005e00| 3b e3 20 79 3d 6d 69 6e | 59 20 b8 20 6d 61 78 59 |;. y=min|Y . maxY|
|00005e10| 20 88 20 a4 73 63 61 6c | 65 28 6d 69 6e 59 2c 6d | . .scal|e(minY,m|
|00005e20| 61 78 59 29 3a ec 20 35 | 2c 79 2a 59 73 3a df 20 |axY):. 5|,y*Ys:. |
|00005e30| 30 2c 79 2a 59 73 3a ed | 0d 1f fe 1d ef 35 3a ec |0,y*Ys:.|.....5:.|
|00005e40| 20 2d 34 35 2c 6d 69 6e | 59 2a 59 73 3a f1 22 22 | -45,min|Y*Ys:.""|
|00005e50| 3b 6d 69 6e 59 0d 20 08 | 1b ec 20 2d 34 35 2c 6d |;minY. .|.. -45,m|
|00005e60| 61 78 59 2a 59 73 3a f1 | 20 22 22 3b 6d 61 78 59 |axY*Ys:.| "";maxY|
|00005e70| 0d 20 12 1b ec 20 6d 69 | 6e 58 2a 58 73 2c 2d 31 |. ... mi|nX*Xs,-1|
|00005e80| 30 3a f1 20 22 22 3b 6d | 69 6e 58 0d 20 1c 1b ec |0:. "";m|inX. ...|
|00005e90| 20 6d 61 78 58 2a 58 73 | 2c 2d 31 30 3a f1 20 22 | maxX*Xs|,-10:. "|
|00005ea0| 22 3b 6d 61 78 58 0d 20 | 26 38 ec 20 6d 61 78 58 |";maxX. |&8. maxX|
|00005eb0| 2a 58 73 2b 31 30 2c 28 | 6d 61 78 59 2a 59 73 29 |*Xs+10,(|maxY*Ys)|
|00005ec0| 2d 28 6e 2a 33 32 29 3a | f1 20 22 22 3b 6e 3b 22 |-(n*32):|. "";n;"|
|00005ed0| 2e 2e 79 3d 22 3b 66 75 | 6e 63 24 28 6e 29 0d 20 |..y=";fu|nc$(n). |
|00005ee0| 30 2a ef 34 2c 32 34 2c | 6d 69 6e 58 2a 58 73 3b |0*.4,24,|minX*Xs;|
|00005ef0| 6d 69 6e 59 2a 59 73 3b | 6d 61 78 58 2a 58 73 3b |minY*Ys;|maxX*Xs;|
|00005f00| 6d 61 78 59 2a 59 73 3b | 0d 20 3a 0d 58 3d 78 6d |maxY*Ys;|. :.X=xm|
|00005f10| 69 6e 28 6e 29 0d 20 44 | 1b ec 20 58 2a 58 73 2c |in(n). D|.. X*Xs,|
|00005f20| a0 28 62 61 73 69 63 76 | 24 28 6e 29 29 2a 59 73 |.(basicv|$(n))*Ys|
|00005f30| 0d 20 4e 26 e3 20 58 3d | 78 6d 69 6e 28 6e 29 20 |. N&. X=|xmin(n) |
|00005f40| b8 20 78 6d 61 78 28 6e | 29 20 88 20 58 72 2f 70 |. xmax(n|) . Xr/p|
|00005f50| 6f 69 6e 74 73 25 0d 20 | 58 2f e7 20 53 71 72 6c |oints%. |X/. Sqrl|
|00005f60| 70 25 20 59 3d 2d a0 28 | 62 61 73 69 63 76 24 28 |p% Y=-.(|basicv$(|
|00005f70| 6e 29 29 20 8b 20 59 3d | a0 28 62 61 73 69 63 76 |n)) . Y=|.(basicv|
|00005f80| 24 28 6e 29 29 0d 20 62 | 0f df 20 58 2a 58 73 2c |$(n)). b|.. X*Xs,|
|00005f90| 59 2a 59 73 0d 20 6c 5d | e7 20 28 53 71 72 25 3d |Y*Ys. l]|. (Sqr%=|
|00005fa0| 2d 31 20 80 20 58 3e 78 | 6d 61 78 28 6e 29 2d 58 |-1 . X>x|max(n)-X|
|00005fb0| 72 2f 31 30 30 30 20 80 | 20 53 71 72 6c 70 25 3d |r/1000 .| Sqrlp%=|
|00005fc0| 30 29 20 8c 20 58 3d 78 | 6d 69 6e 28 6e 29 3a 53 |0) . X=x|min(n):S|
|00005fd0| 71 72 6c 70 25 3d 2d 31 | 3a ec 20 58 2a 58 73 2c |qrlp%=-1|:. X*Xs,|
|00005fe0| 2d a0 28 62 61 73 69 63 | 76 24 28 6e 29 29 2a 59 |-.(basic|v$(n))*Y|
|00005ff0| 73 0d 20 76 05 ed 0d 20 | 80 09 ef 32 36 3a e1 0d |s. v... |...26:..|
|00006000| 20 8a 05 3a 0d 20 94 10 | dd a4 73 63 61 6c 65 28 | ..:. ..|..scale(|
|00006010| 61 2c 62 29 0d 20 9e 1a | e7 20 62 2d 61 3c 32 30 |a,b). ..|. b-a<20|
|00006020| 20 80 20 62 2d 61 3e 3d | 35 20 8c 20 3d 31 0d 20 | . b-a>=|5 . =1. |
|00006030| a8 17 e7 20 62 2d 61 3c | 35 20 8c 20 3d 28 62 2d |... b-a<|5 . =(b-|
|00006040| 61 29 2f 32 30 0d 20 b2 | 0b ea 20 73 2c 74 2c 75 |a)/20. .|.. s,t,u|
|00006050| 0d 20 bc 0f 73 3d 28 62 | 2d 61 29 20 81 32 30 0d |. ..s=(b|-a) .20.|
|00006060| 20 c6 0e 74 3d 28 73 20 | 81 32 29 2a 32 0d 20 d0 | ..t=(s |.2)*2. .|
|00006070| 0e 75 3d 28 73 20 81 35 | 29 2a 35 0d 20 da 23 e7 |.u=(s .5|)*5. .#.|
|00006080| 20 74 3e 75 20 80 20 75 | 3c 3e 30 20 8c 20 3d 75 | t>u . u|<>0 . =u|
|00006090| 20 8b 20 e7 20 74 3c 3e | 30 20 8c 20 3d 74 0d 20 | . . t<>|0 . =t. |
|000060a0| e4 0d 3d 28 62 2d 61 29 | 2f 32 30 0d 20 ee 05 3a |..=(b-a)|/20. ..:|
|000060b0| 0d 20 f8 18 dd f2 73 65 | 74 5f 76 61 72 69 61 62 |. ....se|t_variab|
|000060c0| 6c 65 28 61 24 2c 6e 29 | 0d 21 02 12 e7 20 61 24 |le(a$,n)|.!... a$|
|000060d0| 3d 22 41 22 20 8c 20 41 | 3d 6e 0d 21 0c 12 e7 20 |="A" . A|=n.!... |
|000060e0| 61 24 3d 22 42 22 20 8c | 20 42 3d 6e 0d 21 16 12 |a$="B" .| B=n.!..|
|000060f0| e7 20 61 24 3d 22 43 22 | 20 8c 20 43 3d 6e 0d 21 |. a$="C"| . C=n.!|
|00006100| 20 12 e7 20 61 24 3d 22 | 44 22 20 8c 20 44 3d 6e | .. a$="|D" . D=n|
|00006110| 0d 21 2a 12 e7 20 61 24 | 3d 22 45 22 20 8c 20 45 |.!*.. a$|="E" . E|
|00006120| 3d 6e 0d 21 34 12 e7 20 | 61 24 3d 22 46 22 20 8c |=n.!4.. |a$="F" .|
|00006130| 20 46 3d 6e 0d 21 3e 12 | e7 20 61 24 3d 22 47 22 | F=n.!>.|. a$="G"|
|00006140| 20 8c 20 47 3d 6e 0d 21 | 48 12 e7 20 61 24 3d 22 | . G=n.!|H.. a$="|
|00006150| 48 22 20 8c 20 48 3d 6e | 0d 21 52 12 e7 20 61 24 |H" . H=n|.!R.. a$|
|00006160| 3d 22 49 22 20 8c 20 49 | 3d 6e 0d 21 5c 12 e7 20 |="I" . I|=n.!\.. |
|00006170| 61 24 3d 22 4a 22 20 8c | 20 4a 3d 6e 0d 21 66 12 |a$="J" .| J=n.!f.|
|00006180| e7 20 61 24 3d 22 4b 22 | 20 8c 20 4b 3d 6e 0d 21 |. a$="K"| . K=n.!|
|00006190| 70 12 e7 20 61 24 3d 22 | 4c 22 20 8c 20 4c 3d 6e |p.. a$="|L" . L=n|
|000061a0| 0d 21 7a 12 e7 20 61 24 | 3d 22 4d 22 20 8c 20 4d |.!z.. a$|="M" . M|
|000061b0| 3d 6e 0d 21 84 12 e7 20 | 61 24 3d 22 4e 22 20 8c |=n.!... |a$="N" .|
|000061c0| 20 4e 3d 6e 0d 21 8e 12 | e7 20 61 24 3d 22 4f 22 | N=n.!..|. a$="O"|
|000061d0| 20 8c 20 4f 3d 6e 0d 21 | 98 12 e7 20 61 24 3d 22 | . O=n.!|... a$="|
|000061e0| 50 22 20 8c 20 50 3d 6e | 0d 21 a2 12 e7 20 61 24 |P" . P=n|.!... a$|
|000061f0| 3d 22 51 22 20 8c 20 51 | 3d 6e 0d 21 ac 12 e7 20 |="Q" . Q|=n.!... |
|00006200| 61 24 3d 22 52 22 20 8c | 20 52 3d 6e 0d 21 b6 12 |a$="R" .| R=n.!..|
|00006210| e7 20 61 24 3d 22 53 22 | 20 8c 20 53 3d 6e 0d 21 |. a$="S"| . S=n.!|
|00006220| c0 12 e7 20 61 24 3d 22 | 54 22 20 8c 20 54 3d 6e |... a$="|T" . T=n|
|00006230| 0d 21 ca 12 e7 20 61 24 | 3d 22 55 22 20 8c 20 55 |.!... a$|="U" . U|
|00006240| 3d 6e 0d 21 d4 12 e7 20 | 61 24 3d 22 56 22 20 8c |=n.!... |a$="V" .|
|00006250| 20 56 3d 6e 0d 21 de 12 | e7 20 61 24 3d 22 57 22 | V=n.!..|. a$="W"|
|00006260| 20 8c 20 57 3d 6e 0d 21 | e8 12 e7 20 61 24 3d 22 | . W=n.!|... a$="|
|00006270| 5a 22 20 8c 20 5a 3d 6e | 0d 21 f2 05 e1 0d 21 fc |Z" . Z=n|.!....!.|
|00006280| 05 3a 0d 22 06 10 dd f2 | 63 61 6c 63 75 6c 61 74 |.:."....|calculat|
|00006290| 6f 72 0d 22 10 08 ea 20 | 61 24 0d 22 1a 38 db 3a |or."... |a$.".8.:|
|000062a0| f2 74 69 74 6c 65 3a ef | 32 38 2c 32 2c 33 30 2c |.title:.|28,2,30,|
|000062b0| 37 36 2c 31 3a f1 22 3c | 52 65 74 75 72 6e 3e 20 |76,1:."<|Return> |
|000062c0| 74 6f 20 72 65 74 75 72 | 6e 20 74 6f 20 6d 65 6e |to retur|n to men|
|000062d0| 75 22 0d 22 24 0d 40 25 | 3d 26 39 30 41 3a f5 0d |u"."$.@%|=&90A:..|
|000062e0| 22 2e 13 e8 22 45 76 61 | 6c 75 61 74 65 3a 20 22 |"..."Eva|luate: "|
|000062f0| 61 24 0d 22 38 17 e7 20 | 61 24 3c 3e 22 22 20 f1 |a$."8.. |a$<>"" .|
|00006300| 22 3d 22 3b a0 28 61 24 | 29 0d 22 42 0b fd 20 61 |"=";.(a$|)."B.. a|
|00006310| 24 3d 22 22 0d 22 4c 11 | 40 25 3d 26 34 30 41 3a |$=""."L.|@%=&40A:|
|00006320| ef 32 36 3a e1 0d 22 56 | 05 3a 0d 22 60 15 dd f2 |.26:.."V|.:."`...|
|00006330| 64 69 66 66 65 72 65 6e | 74 69 61 74 69 6f 6e 0d |differen|tiation.|
|00006340| 22 6a 05 e1 0d 22 74 05 | 3a 0d 22 7e 11 dd f2 69 |"j..."t.|:."~...i|
|00006350| 6e 74 65 67 72 61 74 69 | 6f 6e 0d 22 88 1a db 3a |ntegrati|on."...:|
|00006360| f2 74 69 74 6c 65 3a ef | 32 38 2c 32 2c 33 30 2c |.title:.|28,2,30,|
|00006370| 37 36 2c 31 0d 22 92 26 | f1 20 a4 63 65 6e 74 72 |76,1.".&|. .centr|
|00006380| 65 28 22 49 20 4e 20 54 | 20 45 20 47 20 52 20 41 |e("I N T| E G R A|
|00006390| 20 54 20 49 20 4f 20 4e | 22 29 0d 22 9c 5d f1 27 | T I O N|").".].'|
|000063a0| 22 54 68 65 20 67 65 6e | 65 72 61 6c 20 72 75 6c |"The gen|eral rul|
|000063b0| 65 20 66 6f 72 20 74 68 | 65 20 69 6e 74 65 67 72 |e for th|e integr|
|000063c0| 61 74 69 6f 6e 20 6f 66 | 20 61 6e 79 20 66 75 6e |ation of| any fun|
|000063d0| 63 74 69 6f 6e 20 6f 66 | 20 74 68 65 20 66 6f 72 |ction of| the for|
|000063e0| 6d 20 78 22 3b bd 28 70 | 6f 77 65 72 2b 31 34 29 |m x";.(p|ower+14)|
|000063f0| 3b 22 20 69 73 3a 22 0d | 22 a6 5c f1 27 89 35 3b |;" is:".|".\.'.5;|
+--------+-------------------------+-------------------------+--------+--------+