/ APDL Public Domain 1 / APDL_PD1A.iso / educate / maths / pi

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 44 01 00 00 a4 01 00 00 |Archive.|D.......|
|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 50 49 00 00 00 00 | 00 00 00 00 ff ff ff ff |.!PI....|........|
|00000070| 44 fd ff ff f4 ba f4 8b | 00 00 00 00 ff ff ff ff |D.......|........|
|00000080| 20 01 00 80 82 21 42 6f | 6f 74 00 01 ff ff ff ff | ....!Bo|ot......|
|00000090| 5d 00 00 00 43 eb ff ff | e7 41 53 33 03 00 65 a1 |]...C...|.AS3..e.|
|000000a0| 5d 00 00 00 24 00 00 00 | 82 21 52 55 4e 00 89 01 |]...$...|.!RUN...|
|000000b0| ff ff ff ff 7b 00 00 00 | 42 eb ff ff d2 dd 72 12 |....{...|B.....r.|
|000000c0| 03 00 f5 d3 7b 00 00 00 | a5 00 00 00 82 21 52 55 |....{...|.....!RU|
|000000d0| 4e 49 4d 41 47 45 00 ff | 81 06 00 00 42 fb ff ff |NIMAGE..|....B...|
|000000e0| 9f 8a 5c 9a 03 00 0d b8 | 81 06 00 00 44 01 00 00 |..\.....|....D...|
|000000f0| 82 21 53 50 52 49 54 45 | 53 00 ff ff 3c 04 00 00 |.!SPRITE|S...<...|
|00000100| 42 f9 ff ff fb ee 77 12 | 03 00 df 8f 3c 04 00 00 |B.....w.|....<...|
|00000110| e9 07 00 00 82 50 49 52 | 45 41 44 45 52 00 ff ff |.....PIR|EADER...|
|00000120| 90 01 00 00 42 fb ff ff | 45 6f 75 12 03 00 f7 84 |....B...|Eou.....|
|00000130| 90 01 00 00 49 0c 00 00 | 82 52 65 61 64 4d 65 00 |....I...|.ReadMe.|
|00000140| ff ff ff ff 2f 01 00 00 | 44 ff ff ff 3b 1b 1a a6 |..../...|D...;...|
|00000150| 03 00 93 b2 2f 01 00 00 | fd 0d 00 00 00 00 00 00 |..../...|........|
|00000160| 95 e9 89 01 ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000170| ff ff ff ff ff ff ff ff | ff ff ff ff cb 36 9a 00 |........|.....6..|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| b0 01 00 00 46 69 6c 65 | 44 61 74 61 82 21 42 6f |....File|Data.!Bo|
|000001b0| 6f 74 00 01 ff ff ff ff | 5d 00 00 00 43 eb ff ff |ot......|]...C...|
|000001c0| e7 41 53 33 03 00 65 a1 | 49 63 6f 6e 53 70 72 69 |.AS3..e.|IconSpri|
|000001d0| 74 65 73 20 3c 4f 62 65 | 79 24 44 69 72 3e 2e 21 |tes <Obe|y$Dir>.!|
|000001e0| 53 70 72 69 74 65 73 0a | 7c 20 54 68 69 73 20 66 |Sprites.|| This f|
|000001f0| 69 6c 65 20 68 61 73 20 | 62 65 65 6e 20 69 6e 6e |ile has |been inn|
|00000200| 6f 63 75 6c 61 74 65 64 | 20 61 67 61 69 6e 73 74 |oculated| against|
|00000210| 20 74 68 65 20 45 78 74 | 65 6e 64 20 56 69 72 75 | the Ext|end Viru|
|00000220| 73 0a 7c 7c ff 46 69 6c | 65 44 61 74 61 82 21 52 |s.||.Fil|eData.!R|
|00000230| 55 4e 00 89 01 ff ff ff | ff 7b 00 00 00 42 eb ff |UN......|.{...B..|
|00000240| ff d2 dd 72 12 03 00 f5 | d3 53 45 54 20 50 49 24 |...r....|.SET PI$|
|00000250| 44 69 72 20 3c 4f 62 65 | 79 24 44 69 72 3e 0a 53 |Dir <Obe|y$Dir>.S|
|00000260| 65 74 20 41 6c 69 61 73 | 24 40 52 75 6e 54 79 70 |et Alias|$@RunTyp|
|00000270| 65 5f 31 32 38 20 52 75 | 6e 20 3c 4f 62 65 79 24 |e_128 Ru|n <Obey$|
|00000280| 44 69 72 3e 2e 50 69 72 | 65 61 64 65 72 20 25 25 |Dir>.Pir|eader %%|
|00000290| 2a 30 0a 53 65 74 20 46 | 69 6c 65 24 54 79 70 65 |*0.Set F|ile$Type|
|000002a0| 5f 31 32 38 20 50 69 66 | 69 6c 65 0a 52 55 4e 20 |_128 Pif|ile.RUN |
|000002b0| 3c 4f 62 65 79 24 44 69 | 72 3e 2e 21 52 75 6e 49 |<Obey$Di|r>.!RunI|
|000002c0| 6d 61 67 65 46 69 6c 65 | 44 61 74 61 82 21 52 55 |mageFile|Data.!RU|
|000002d0| 4e 49 4d 41 47 45 00 ff | 81 06 00 00 42 fb ff ff |NIMAGE..|....B...|
|000002e0| 9f 8a 5c 9a 03 00 0d b8 | 0d 00 0a 16 f4 20 3e 24 |..\.....|..... >$|
|000002f0| 2e 21 50 49 2e 21 52 55 | 4e 49 4d 41 47 45 0d 00 |.!PI.!RU|NIMAGE..|
|00000300| 14 07 eb 31 32 0d 00 1e | 18 e8 22 4e 4f 2e 20 4f |...12...|.."NO. O|
|00000310| 46 20 50 4c 41 43 45 53 | 22 3b 4e 50 25 0d 00 28 |F PLACES|";NP%..(|
|00000320| 05 db 0d 00 32 23 e8 22 | 44 4f 20 59 4f 55 20 57 |....2#."|DO YOU W|
|00000330| 41 4e 54 20 41 20 48 41 | 52 44 43 4f 50 59 22 3b |ANT A HA|RDCOPY";|
|00000340| 48 41 43 4f 24 0d 00 3c | 05 db 0d 00 46 32 e8 22 |HACO$..<|....F2."|
|00000350| 44 4f 20 59 4f 55 20 57 | 41 4e 54 20 41 20 43 4f |DO YOU W|ANT A CO|
|00000360| 50 59 20 50 52 49 4e 54 | 49 4e 47 20 54 4f 20 41 |PY PRINT|ING TO A|
|00000370| 20 46 49 4c 45 22 3b 50 | 52 46 49 24 0d 00 50 05 | FILE";P|RFI$..P.|
|00000380| db 0d 00 5a 17 f1 3a f1 | 22 43 41 4c 43 55 4c 41 |...Z..:.|"CALCULA|
|00000390| 54 49 4e 47 2e 2e 2e 22 | 0d 00 64 0e 44 25 3d 4e |TING..."|..d.D%=N|
|000003a0| 50 25 2f 34 2b 32 0d 00 | 6e 17 49 54 25 3d 28 4e |P%/4+2..|n.IT%=(N|
|000003b0| 50 25 2f ab 28 32 35 29 | 2b 35 29 2f 32 0d 00 78 |P%/.(25)|+5)/2..x|
|000003c0| 21 de 20 41 25 28 44 25 | 29 2c 42 25 28 44 25 29 |!. A%(D%|),B%(D%)|
|000003d0| 2c 43 25 28 44 25 29 2c | 44 25 28 44 25 29 0d 00 |,C%(D%),|D%(D%)..|
|000003e0| 82 1e 43 25 28 31 29 3d | 38 30 30 3a 44 25 28 31 |..C%(1)=|800:D%(1|
|000003f0| 29 3d 39 35 36 30 3a 4e | 25 3d 2d 31 0d 00 8c 0b |)=9560:N|%=-1....|
|00000400| 54 49 4d 45 31 3d 91 0d | 00 96 05 db 0d 00 a0 10 |TIME1=..|........|
|00000410| e3 20 4a 25 3d 31 20 b8 | 20 49 54 25 0d 00 aa 3a |. J%=1 .| IT%...:|
|00000420| f1 20 8a 30 2c 30 29 3b | 22 4e 55 4d 42 45 52 20 |. .0,0);|"NUMBER |
|00000430| 4f 46 20 4c 4f 4f 50 53 | 20 52 45 4d 41 49 4e 49 |OF LOOPS| REMAINI|
|00000440| 4e 47 20 3e 22 3b 28 49 | 54 25 2d 4a 25 29 3b 22 |NG >";(I|T%-J%);"|
|00000450| 20 20 20 20 20 22 0d 00 | b4 0b 4e 25 3d 4e 25 2b |     "..|..N%=N%+|
|00000460| 32 0d 00 be 0d f2 44 49 | 56 43 42 59 32 35 0d 00 |2.....DI|VCBY25..|
|00000470| c8 0c f2 44 49 56 43 42 | 59 4e 0d 00 d2 0c f2 41 |...DIVCB|YN.....A|
|00000480| 44 44 42 54 4f 41 0d 00 | dc 10 f2 44 49 56 44 42 |DDBTOA..|...DIVDB|
|00000490| 59 35 37 31 32 31 0d 00 | e6 0c f2 44 49 56 44 42 |Y57121..|...DIVDB|
|000004a0| 59 4e 0d 00 f0 0e f2 53 | 55 42 42 46 52 4f 4d 41 |YN.....S|UBBFROMA|
|000004b0| 0d 00 fa 0b 4e 25 3d 4e | 25 2b 32 0d 01 04 0d f2 |....N%=N|%+2.....|
|000004c0| 44 49 56 43 42 59 32 35 | 0d 01 0e 0c f2 44 49 56 |DIVCBY25|.....DIV|
|000004d0| 43 42 59 4e 0d 01 18 0e | f2 53 55 42 42 46 52 4f |CBYN....|.SUBBFRO|
|000004e0| 4d 41 0d 01 22 10 f2 44 | 49 56 44 42 59 35 37 31 |MA.."..D|IVDBY571|
|000004f0| 32 31 0d 01 2c 0c f2 44 | 49 56 44 42 59 4e 0d 01 |21..,..D|IVDBYN..|
|00000500| 36 0c f2 41 44 44 42 54 | 4f 41 0d 01 40 05 ed 0d |6..ADDBT|OA..@...|
|00000510| 01 4a 0b 54 49 4d 45 32 | 3d 91 0d 01 54 0a f2 50 |.J.TIME2|=...T..P|
|00000520| 52 49 4e 54 0d 01 5e 05 | e0 0d 01 68 0d dd f2 41 |RINT..^.|...h...A|
|00000530| 44 44 42 54 4f 41 0d 01 | 72 08 43 25 3d 30 0d 01 |DDBTOA..|r.C%=0..|
|00000540| 7c 13 e3 20 49 25 3d 44 | 25 20 b8 20 31 20 88 2d ||.. I%=D|% . 1 .-|
|00000550| 31 0d 01 86 17 53 25 3d | 41 25 28 49 25 29 2b 42 |1....S%=|A%(I%)+B|
|00000560| 25 28 49 25 29 2b 43 25 | 0d 01 90 1f 43 25 3d 53 |%(I%)+C%|....C%=S|
|00000570| 25 81 31 30 30 30 30 3a | 41 25 28 49 25 29 3d 53 |%.10000:|A%(I%)=S|
|00000580| 25 83 31 30 30 30 30 0d | 01 9a 05 ed 0d 01 a4 05 |%.10000.|........|
|00000590| e1 0d 01 ae 0f dd f2 53 | 55 42 42 46 52 4f 4d 41 |.......S|UBBFROMA|
|000005a0| 0d 01 b8 08 43 25 3d 30 | 0d 01 c2 13 e3 20 49 25 |....C%=0|..... I%|
|000005b0| 3d 44 25 20 b8 20 31 20 | 88 2d 31 0d 01 cc 17 53 |=D% . 1 |.-1....S|
|000005c0| 25 3d 41 25 28 49 25 29 | 2d 42 25 28 49 25 29 2d |%=A%(I%)|-B%(I%)-|
|000005d0| 43 25 0d 01 d6 26 e7 20 | 53 25 3c 30 20 8c 20 53 |C%...&. |S%<0 . S|
|000005e0| 25 3d 53 25 2b 31 30 30 | 30 30 3a 43 25 3d 31 3a |%=S%+100|00:C%=1:|
|000005f0| 8b 20 43 25 3d 30 3a cd | 0d 01 e0 13 41 25 28 49 |. C%=0:.|....A%(I|
|00000600| 25 29 3d 53 25 83 31 30 | 30 30 30 0d 01 ea 05 ed |%)=S%.10|000.....|
|00000610| 0d 01 f4 05 e1 0d 01 fe | 0e dd f2 44 49 56 43 42 |........|...DIVCB|
|00000620| 59 32 35 0d 02 08 08 52 | 25 3d 30 0d 02 12 10 e3 |Y25....R|%=0.....|
|00000630| 20 49 25 3d 20 31 20 b8 | 20 44 25 0d 02 1c 16 43 | I%= 1 .| D%....C|
|00000640| 25 3d 43 25 28 49 25 29 | 2b 31 30 30 30 30 2a 52 |%=C%(I%)|+10000*R|
|00000650| 25 0d 02 26 10 43 25 28 | 49 25 29 3d 43 25 81 32 |%..&.C%(|I%)=C%.2|
|00000660| 35 0d 02 30 0c 52 25 3d | 43 25 83 32 35 0d 02 3a |5..0.R%=|C%.25..:|
|00000670| 05 ed 0d 02 44 05 e1 0d | 02 4e 11 dd f2 44 49 56 |....D...|.N...DIV|
|00000680| 44 42 59 35 37 31 32 31 | 0d 02 58 08 52 25 3d 30 |DBY57121|..X.R%=0|
|00000690| 0d 02 62 0f e3 20 49 25 | 3d 31 20 b8 20 44 25 0d |..b.. I%|=1 . D%.|
|000006a0| 02 6c 16 43 25 3d 44 25 | 28 49 25 29 2b 31 30 30 |.l.C%=D%|(I%)+100|
|000006b0| 30 30 2a 52 25 0d 02 76 | 13 44 25 28 49 25 29 3d |00*R%..v|.D%(I%)=|
|000006c0| 43 25 81 35 37 31 32 31 | 0d 02 80 0f 52 25 3d 43 |C%.57121|....R%=C|
|000006d0| 25 83 35 37 31 32 31 0d | 02 8a 05 ed 0d 02 94 05 |%.57121.|........|
|000006e0| e1 0d 02 9e 0d dd f2 44 | 49 56 43 42 59 4e 0d 02 |.......D|IVCBYN..|
|000006f0| a8 08 52 25 3d 30 0d 02 | b2 0f e3 20 49 25 3d 31 |..R%=0..|... I%=1|
|00000700| 20 b8 20 44 25 0d 02 bc | 16 43 25 3d 43 25 28 49 | . D%...|.C%=C%(I|
|00000710| 25 29 2b 31 30 30 30 30 | 2a 52 25 0d 02 c6 10 42 |%)+10000|*R%....B|
|00000720| 25 28 49 25 29 3d 43 25 | 81 4e 25 0d 02 d0 0c 52 |%(I%)=C%|.N%....R|
|00000730| 25 3d 43 25 83 4e 25 0d | 02 da 05 ed 0d 02 e4 05 |%=C%.N%.|........|
|00000740| e1 0d 02 ee 0d dd f2 44 | 49 56 44 42 59 4e 0d 02 |.......D|IVDBYN..|
|00000750| f8 08 52 25 3d 30 0d 03 | 02 0f e3 20 49 25 3d 31 |..R%=0..|... I%=1|
|00000760| 20 b8 20 44 25 0d 03 0c | 16 43 25 3d 44 25 28 49 | . D%...|.C%=D%(I|
|00000770| 25 29 2b 31 30 30 30 30 | 2a 52 25 0d 03 16 10 42 |%)+10000|*R%....B|
|00000780| 25 28 49 25 29 3d 43 25 | 81 4e 25 0d 03 20 0c 52 |%(I%)=C%|.N%.. .R|
|00000790| 25 3d 43 25 83 4e 25 0d | 03 2a 05 ed 0d 03 34 05 |%=C%.N%.|.*....4.|
|000007a0| e1 0d 03 3e 0b dd f2 50 | 52 49 4e 54 0d 03 48 05 |...>...P|RINT..H.|
|000007b0| db 0d 03 52 29 e7 50 52 | 46 49 24 3d 22 59 45 53 |...R).PR|FI$="YES|
|000007c0| 22 20 8c 20 58 3d ae 28 | 22 24 2e 21 50 49 2e 22 |" . X=.(|"$.!PI."|
|000007d0| 2b 28 c3 28 4e 50 25 29 | 29 29 0d 03 5c 16 e7 20 |+(.(NP%)|))..\.. |
|000007e0| 48 41 43 4f 24 3d 22 59 | 45 53 22 20 8c 20 ef 32 |HACO$="Y|ES" . .2|
|000007f0| 0d 03 66 78 e7 20 50 52 | 46 49 24 3d 22 59 45 53 |..fx. PR|FI$="YES|
|00000800| 22 20 8c 20 f1 20 23 58 | 2c 22 54 49 4d 45 20 54 |" . . #X|,"TIME T|
|00000810| 41 4b 45 4e 20 54 4f 20 | 43 41 4c 43 55 4c 41 54 |AKEN TO |CALCULAT|
|00000820| 45 20 50 49 20 54 4f 20 | 22 2c 28 c3 28 4e 50 25 |E PI TO |",(.(NP%|
|00000830| 29 29 2c 22 20 50 4c 41 | 43 45 53 20 49 53 20 22 |))," PLA|CES IS "|
|00000840| 2c 28 c3 28 a8 28 54 49 | 4d 45 32 2d 54 49 4d 45 |,(.(.(TI|ME2-TIME|
|00000850| 31 29 2f 31 30 30 29 29 | 2c 22 20 53 45 43 4f 4e |1)/100))|," SECON|
|00000860| 44 53 2e 20 50 49 3d 22 | 0d 03 70 56 f1 20 22 54 |DS. PI="|..pV. "T|
|00000870| 49 4d 45 20 54 41 4b 45 | 4e 20 54 4f 20 43 41 4c |IME TAKE|N TO CAL|
|00000880| 43 55 4c 41 54 45 20 50 | 49 20 54 4f 20 22 3b 4e |CULATE P|I TO ";N|
|00000890| 50 25 3b 22 20 50 4c 41 | 43 45 53 20 49 53 20 22 |P%;" PLA|CES IS "|
|000008a0| 3b a8 28 54 49 4d 45 32 | 2d 54 49 4d 45 31 29 2f |;.(TIME2|-TIME1)/|
|000008b0| 31 30 30 3b 22 20 53 45 | 43 4f 4e 44 53 22 0d 03 |100;" SE|CONDS"..|
|000008c0| 7a 0d f1 3a f1 22 50 49 | 3d 22 3b 0d 03 84 0f e3 |z..:."PI|=";.....|
|000008d0| 20 49 25 3d 31 20 b8 20 | 44 25 0d 03 8e 0e f1 20 | I%=1 . |D%..... |
|000008e0| 3b 41 25 28 49 25 29 3b | 0d 03 98 22 e7 20 50 52 |;A%(I%);|...". PR|
|000008f0| 46 49 24 3d 22 59 45 53 | 22 20 8c 20 f1 20 23 58 |FI$="YES|" . . #X|
|00000900| 2c c3 28 41 25 28 49 25 | 29 29 0d 03 a2 05 ed 0d |,.(A%(I%|))......|
|00000910| 03 ac 07 f1 3a f1 0d 03 | b6 06 ef 33 0d 03 c0 0a |....:...|...3....|
|00000920| 2a 43 4c 4f 53 45 0d 03 | ca 3c e7 50 52 46 49 24 |*CLOSE..|.<.PRFI$|
|00000930| 3d 22 59 45 53 22 20 8c | 20 ff 20 22 53 45 54 54 |="YES" .| . "SETT|
|00000940| 59 50 45 20 22 2b 22 24 | 2e 21 50 49 2e 22 2b 28 |YPE "+"$|.!PI."+(|
|00000950| c3 28 4e 50 25 29 29 2b | 22 20 22 2b c3 28 31 32 |.(NP%))+|" "+.(12|
|00000960| 38 29 0d 03 d4 05 e1 0d | ff 46 69 6c 65 44 61 74 |8)......|.FileDat|
|00000970| 61 82 21 53 50 52 49 54 | 45 53 00 ff ff 3c 04 00 |a.!SPRIT|ES...<..|
|00000980| 00 42 f9 ff ff fb ee 77 | 12 03 00 df 8f 04 00 00 |.B.....w|........|
|00000990| 00 10 00 00 00 40 04 00 | 00 80 01 00 00 21 70 69 |.....@..|.....!pi|
|000009a0| 00 00 00 00 00 00 00 00 | 00 04 00 00 00 10 00 00 |........|........|
|000009b0| 00 00 00 00 00 0b 00 00 | 00 2c 00 00 00 2c 00 00 |........|.,...,..|
|000009c0| 00 0c 00 00 00 bb bb bb | bb bb bb bb bb bb bb bb |........|........|
|000009d0| bb bb bb bb bb bb 0b 00 | 00 9b 99 99 99 99 99 99 |........|........|
|000009e0| 99 99 99 99 99 99 99 99 | 99 99 0b 00 00 9b 99 99 |........|........|
|000009f0| 99 99 99 99 99 99 99 99 | 99 99 99 99 99 99 0b 00 |........|........|
|00000a00| 00 9b 99 99 99 99 99 99 | 99 99 99 99 99 99 99 99 |........|........|
|00000a10| 99 99 0b 00 00 9b 99 99 | 99 99 99 99 99 99 99 99 |........|........|
|00000a20| 99 99 99 99 99 99 0b 00 | 00 9b 99 29 77 77 77 77 |........|...)wwww|
|00000a30| 77 92 99 99 99 99 99 99 | 72 27 0b 00 00 9b 29 77 |w.......|r'....)w|
|00000a40| 27 29 67 92 72 77 92 99 | 99 99 29 77 77 92 0b 00 |')g.rw..|..)ww...|
|00000a50| 00 9b 99 99 99 29 67 92 | 99 72 77 77 77 77 77 27 |.....)g.|.rwwwww'|
|00000a60| 99 99 0b 00 00 9b 99 99 | 99 29 67 92 99 99 99 29 |........|.)g....)|
|00000a70| 77 92 99 99 99 99 0b 00 | 00 9b 99 99 99 29 67 92 |w.......|.....)g.|
|00000a80| 99 99 99 29 77 92 99 99 | 99 99 0b 00 00 9b 99 99 |...)w...|........|
|00000a90| 99 29 77 92 99 99 99 29 | 67 92 99 99 99 99 0b 00 |.)w....)|g.......|
|00000aa0| 00 9b 99 99 99 29 77 92 | 99 99 99 29 67 92 99 99 |.....)w.|...)g...|
|00000ab0| 99 99 0b 00 00 9b 99 99 | 99 29 67 92 99 99 99 29 |........|.)g....)|
|00000ac0| 77 92 99 99 99 99 0b 00 | 00 9b 99 99 99 29 67 92 |w.......|.....)g.|
|00000ad0| 99 99 99 29 77 92 99 99 | 99 99 0b 00 00 9b 99 99 |...)w...|........|
|00000ae0| 99 29 67 92 99 99 99 29 | 77 92 99 99 99 99 0b 00 |.)g....)|w.......|
|00000af0| 00 9b 99 99 99 99 99 99 | 99 99 99 99 99 99 99 99 |........|........|
|00000b00| 99 99 0b 00 00 bb bb bb | bb bb bb bb bb bb bb bb |........|........|
|00000b10| bb bb bb bb bb bb 0b 00 | 00 98 00 00 00 73 6d 21 |........|.....sm!|
|00000b20| 70 69 00 00 00 00 00 00 | 00 02 00 00 00 08 00 00 |pi......|........|
|00000b30| 00 00 00 00 00 07 00 00 | 00 2c 00 00 00 2c 00 00 |........|.,...,..|
|00000b40| 00 0c 00 00 00 bb bb bb | bb bb bb bb bb bb 00 00 |........|........|
|00000b50| 00 9b 99 99 99 99 99 99 | 99 b9 00 00 00 9b 29 77 |........|......)w|
|00000b60| 77 92 99 72 77 b2 00 00 | 00 2b 77 72 22 77 77 77 |w..rw...|.+wr"www|
|00000b70| 92 b9 00 00 00 9b 99 72 | 92 99 99 72 92 b9 00 00 |.......r|...r....|
|00000b80| 00 9b 99 72 92 99 99 72 | 92 b9 00 00 00 9b 99 72 |...r...r|.......r|
|00000b90| 92 99 99 72 92 b9 00 00 | 00 9b 99 72 92 99 99 72 |...r....|...r...r|
|00000ba0| 92 b9 00 00 00 bb bb bb | bb bb bb bb bb bb 00 00 |........|........|
|00000bb0| 00 80 01 00 00 66 69 6c | 65 5f 31 32 38 00 00 00 |.....fil|e_128...|
|00000bc0| 00 04 00 00 00 10 00 00 | 00 00 00 00 00 0b 00 00 |........|........|
|00000bd0| 00 2c 00 00 00 2c 00 00 | 00 0c 00 00 00 bb bb bb |.,...,..|........|
|00000be0| bb bb bb bb bb bb bb bb | bb bb bb bb bb bb 0b 00 |........|........|
|00000bf0| 00 db dd dd dd dd dd dd | dd dd dd dd dd dd dd dd |........|........|
|00000c00| dd dd 0b 00 00 db dd dd | dd dd dd dd dd dd dd dd |........|........|
|00000c10| dd dd dd dd dd dd 0b 00 | 00 db dd dd dd dd 1d 11 |........|........|
|00000c20| 11 11 dd 1d 11 dd dd dd | dd dd 0b 00 00 db dd dd |........|........|
|00000c30| dd dd d1 1d dd 1d 11 11 | dd dd dd dd dd dd 0b 00 |........|........|
|00000c40| 00 db dd dd dd dd dd 1d | dd dd dd 1d dd dd dd dd |........|........|
|00000c50| dd dd 0b 00 00 db dd dd | dd dd dd 1d dd dd dd 1d |........|........|
|00000c60| dd dd dd dd dd dd 0b 00 | 00 db dd dd dd dd dd 1d |........|........|
|00000c70| dd dd dd 1d dd dd dd dd | dd dd 0b 00 00 db dd dd |........|........|
|00000c80| dd dd dd dd dd dd dd dd | dd dd dd dd dd dd 0b 00 |........|........|
|00000c90| 00 db dd 99 99 dd dd 99 | 99 dd 99 99 99 dd 99 99 |........|........|
|00000ca0| dd dd 0b 00 00 db dd 99 | 9d d9 9d d9 9d d9 dd 99 |........|........|
|00000cb0| dd 9d d9 9d d9 dd 0b 00 | 00 db dd 99 dd 99 9d d9 |........|........|
|00000cc0| 9d d9 dd 99 dd 9d d9 9d | d9 dd 0b 00 00 db dd 99 |........|........|
|00000cd0| dd 99 9d 99 99 d9 dd 99 | dd 9d 99 99 d9 dd 0b 00 |........|........|
|00000ce0| 00 db dd 99 dd 99 9d d9 | 9d d9 dd 99 dd 9d d9 9d |........|........|
|00000cf0| d9 dd 0b 00 00 db dd 99 | 9d d9 9d d9 9d d9 dd 99 |........|........|
|00000d00| dd 9d d9 9d d9 dd 0b 00 | 00 db dd 99 99 dd 9d d9 |........|........|
|00000d10| 9d d9 dd 99 dd 9d d9 9d | d9 dd 0b 00 00 bb bb bb |........|........|
|00000d20| bb bb bb bb bb bb bb bb | bb bb bb bb bb bb 0b 00 |........|........|
|00000d30| 00 98 00 00 00 73 6d 61 | 6c 6c 5f 31 32 38 00 00 |.....sma|ll_128..|
|00000d40| 00 02 00 00 00 08 00 00 | 00 00 00 00 00 07 00 00 |........|........|
|00000d50| 00 2c 00 00 00 2c 00 00 | 00 0c 00 00 00 bb bb bb |.,...,..|........|
|00000d60| bb bb bb bb bb bb 00 00 | 00 db dd dd dd dd dd dd |........|........|
|00000d70| dd bd 00 00 00 db dd 77 | 77 dd 77 d7 dd bd 00 00 |.......w|w.w.....|
|00000d80| 00 db 7d dd d7 77 7d dd | dd bd 00 00 00 db dd dd |..}..w}.|........|
|00000d90| d7 dd 7d dd dd bd 00 00 | 00 db dd dd d7 dd 7d dd |..}.....|......}.|
|00000da0| dd bd 00 00 00 9b d9 dd | 99 dd 9d dd 99 b9 00 00 |........|........|
|00000db0| 00 9b 99 9d d9 d9 99 d9 | 9d bd 00 00 00 bb bb bb |........|........|
|00000dc0| bb bb bb bb bb bb 00 00 | 90 46 69 6c 65 44 61 74 |........|.FileDat|
|00000dd0| 61 82 50 49 52 45 41 44 | 45 52 00 ff ff 90 01 00 |a.PIREAD|ER......|
|00000de0| 00 42 fb ff ff 45 6f 75 | 12 03 00 f7 84 0d 00 0a |.B...Eou|........|
|00000df0| 13 f4 20 3e 21 50 49 2e | 50 49 52 45 41 44 45 52 |.. >!PI.|PIREADER|
|00000e00| 0d 00 14 1a c8 99 20 22 | 4f 53 5f 47 65 74 45 6e |...... "|OS_GetEn|
|00000e10| 76 22 20 b8 20 4e 41 4d | 45 24 0d 00 1e 17 e7 20 |v" . NAM|E$..... |
|00000e20| a7 4e 41 4d 45 24 2c 22 | 2d 71 75 69 74 22 29 20 |.NAME$,"|-quit") |
|00000e30| 8c 0d 00 28 3e 4e 41 4d | 45 24 3d c1 4e 41 4d 45 |...(>NAM|E$=.NAME|
|00000e40| 24 2c a7 4e 41 4d 45 24 | 2c 22 22 22 22 29 2b 31 |$,.NAME$|,"""")+1|
|00000e50| 29 20 3a 4e 41 4d 45 24 | 3d c1 4e 41 4d 45 24 2c |) :NAME$|=.NAME$,|
|00000e60| a7 4e 41 4d 45 24 2c 22 | 22 22 22 29 2b 31 29 0d |.NAME$,"|""")+1).|
|00000e70| 00 32 05 cd 0d 00 3c 1e | 46 49 4c 45 24 3d c2 4e |.2....<.|FILE$=.N|
|00000e80| 41 4d 45 24 2c 28 a9 28 | 4e 41 4d 45 24 29 2d 31 |AME$,(.(|NAME$)-1|
|00000e90| 29 29 0d 00 46 47 e7 20 | 46 49 4c 45 24 3d 22 22 |))..FG. |FILE$=""|
|00000ea0| 20 3a 85 20 31 31 31 2c | 22 54 6f 20 72 65 61 64 | :. 111,|"To read|
|00000eb0| 20 50 49 20 64 61 74 61 | 2c 20 64 6f 75 62 6c 65 | PI data|, double|
|00000ec0| 20 63 6c 69 63 6b 20 6f | 6e 20 61 20 50 49 20 44 | click o|n a PI D|
|00000ed0| 61 74 61 20 46 69 6c 65 | 22 0d 00 50 0e 58 3d ad |ata File|"..P.X=.|
|00000ee0| 28 46 49 4c 45 24 29 0d | 00 5a 16 e8 23 58 2c 41 |(FILE$).|.Z..#X,A|
|00000ef0| 24 2c 42 24 2c 43 24 2c | 44 24 2c 45 24 0d 00 64 |$,B$,C$,|D$,E$..d|
|00000f00| 25 e8 22 48 41 52 44 20 | 43 4f 50 59 22 3b 48 43 |%."HARD |COPY";HC|
|00000f10| 24 3a e7 20 48 43 24 3d | 22 59 45 53 22 20 8c 20 |$:. HC$=|"YES" . |
|00000f20| ef 32 0d 00 6e 14 f1 20 | 41 24 3b 42 24 3b 43 24 |.2..n.. |A$;B$;C$|
|00000f30| 3b 44 24 3b 45 24 0d 00 | 78 05 f1 0d 00 82 05 f5 |;D$;E$..|x.......|
|00000f40| 0d 00 8c 0a e8 23 58 2c | 46 24 0d 00 96 0a f1 20 |.....#X,|F$..... |
|00000f50| 3b 46 24 3b 0d 00 a0 09 | fd 20 c5 23 58 0d 00 aa |;F$;....|. .#X...|
|00000f60| 14 e7 20 48 43 24 3d 22 | 59 45 53 22 20 8c 20 ef |.. HC$="|YES" . .|
|00000f70| 33 0d 00 b4 0a 2a 43 4c | 4f 53 45 0d ff 46 69 6c |3....*CL|OSE..Fil|
|00000f80| 65 44 61 74 61 82 52 65 | 61 64 4d 65 00 ff ff ff |eData.Re|adMe....|
|00000f90| ff 2f 01 00 00 44 ff ff | ff 3b 1b 1a a6 03 00 93 |./...D..|.;......|
|00000fa0| b2 50 49 20 43 41 4c 43 | 55 4c 41 54 4f 52 0a 0a |.PI CALC|ULATOR..|
|00000fb0| 54 68 69 73 20 69 73 20 | 61 20 70 72 6f 67 72 61 |This is |a progra|
|00000fc0| 6d 20 77 68 69 63 68 20 | 77 69 6c 6c 20 63 61 6c |m which |will cal|
|00000fd0| 63 75 6c 61 74 65 20 27 | 50 49 27 20 61 63 63 75 |culate '|PI' accu|
|00000fe0| 72 61 74 65 6c 79 20 74 | 6f 20 61 20 73 70 65 63 |rately t|o a spec|
|00000ff0| 69 66 69 65 64 20 6e 75 | 6d 62 65 72 0a 6f 66 20 |ified nu|mber.of |
|00001000| 64 69 67 69 74 73 20 28 | 69 66 20 6d 6f 72 65 20 |digits (|if more |
|00001010| 74 68 61 6e 20 61 62 6f | 75 74 20 31 32 29 2e 20 |than abo|ut 12). |
|00001020| 48 6f 77 65 76 65 72 2c | 20 74 68 65 20 64 65 63 |However,| the dec|
|00001030| 69 6d 61 6c 20 70 6f 69 | 6e 74 20 69 73 20 6e 6f |imal poi|nt is no|
|00001040| 74 0a 70 72 69 6e 74 65 | 64 2e 0a 0a 4f 6e 63 65 |t.printe|d...Once|
|00001050| 20 74 68 65 20 72 6f 75 | 74 69 6e 65 20 68 61 73 | the rou|tine has|
|00001060| 20 62 65 65 6e 20 75 73 | 65 64 2c 20 61 20 64 61 | been us|ed, a da|
|00001070| 74 61 20 66 69 6c 65 20 | 63 6f 6e 74 61 69 6e 69 |ta file |containi|
|00001080| 6e 67 20 50 49 20 69 6e | 66 6f 72 6d 61 74 69 6f |ng PI in|formatio|
|00001090| 6e 20 63 61 6e 20 62 65 | 0a 65 78 61 6d 69 6e 65 |n can be|.examine|
|000010a0| 64 20 62 79 20 73 69 6d | 70 6c 79 20 63 6c 69 63 |d by sim|ply clic|
|000010b0| 6b 69 6e 67 20 6f 6e 20 | 69 74 2e 0a 0a 48 6f 70 |king on |it...Hop|
|000010c0| 65 20 69 74 73 20 55 73 | 65 66 75 6c 21 21 21 20 |e its Us|eful!!! |
+--------+-------------------------+-------------------------+--------+--------+