GAUSS!
FILE INFORMATION
FILENAME(S): GAUSS!
FILE TYPE(S): PRG
FILE SIZE: 5K
FIRST SEEN: 2025-11-30 21:05:46
APPEARS ON: 1 disk(s)
FILE HASH
ed8bae55aa4859b2306ca6021e7462bb7caf1dae67fd1d9193a602561db7d869
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CS TAPES PET 07 | GAUSS! | PRG | DuncanTwain | 5 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 11 04 00 00 9C 3A 97 35 39 34 36 38 2C 31 |.......:.59468,1|
00000010: 32 00 3D 04 01 00 8F 20 47 41 55 53 53 21 20 43 |2.=.... GAUSS! C|
00000020: 4F 50 59 52 49 47 48 54 20 28 43 29 20 31 39 37 |OPYRIGHT (C) 197|
00000030: 39 20 47 4C 45 4E 20 46 49 53 48 45 52 00 43 04 |9 GLEN FISHER.C.|
00000040: 04 00 3A 00 60 04 05 00 8F 20 43 55 52 53 4F 52 |..:.`.... CURSOR|
00000050: 20 23 31 32 2C 20 4A 55 4C 59 2C 20 31 39 37 39 | #12, JULY, 1979|
00000060: 00 81 04 06 00 8F 20 42 4F 58 20 35 35 30 2C 20 |...... BOX 550, |
00000070: 47 4F 4C 45 54 41 2C 20 43 41 2E 20 39 33 30 31 |GOLETA, CA. 9301|
00000080: 37 00 87 04 08 00 3A 00 9F 04 0A 00 8F 20 41 53 |7.....:...... AS|
00000090: 20 4F 46 20 41 55 47 20 31 31 20 31 39 37 39 00 | OF AUG 11 1979.|
000000A0: C0 04 5A 00 50 47 24 B2 22 47 41 55 53 53 21 22 |..Z.PG$."GAUSS!"|
000000B0: 3A 4E 4D 24 B2 22 31 32 22 3A 8D 36 32 30 30 30 |:NM$."12":.62000|
000000C0: 00 EF 04 64 00 99 22 13 11 11 11 11 11 11 11 11 |...d..".........|
000000D0: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000000E0: 12 4A 55 53 54 20 41 20 4D 4F 4D 45 4E 54 92 00 |.JUST A MOMENT..|
000000F0: 11 05 66 00 43 B2 32 38 3A 55 44 B2 30 3A 52 4E |..f.C.28:UD.0:RN|
00000100: B2 30 3A 53 43 B2 30 3A 4D 58 B2 30 3A 52 54 B2 |.0:SC.0:MX.0:RT.|
00000110: 30 00 1D 05 69 00 4F B2 30 3A 50 B2 30 00 36 05 |0...i.O.0:P.0.6.|
00000120: 6E 00 43 52 54 B2 33 32 37 36 38 3A 44 59 B2 35 |n.CRT.32768:DY.5|
00000130: 31 38 34 30 30 30 00 55 05 73 00 43 54 B2 35 39 |184000.U.s.CT.59|
00000140: 34 36 37 3A 54 4E B2 35 39 34 36 36 3A 50 43 B2 |467:TN.59466:PC.|
00000150: 35 39 34 36 34 00 65 05 78 00 49 56 B2 32 31 36 |59464.e.x.IV.216|
00000160: 3A 53 44 B2 30 00 74 05 82 00 50 44 24 B2 22 20 |:SD.0.t...PD$." |
00000170: 20 20 92 22 00 9E 05 96 00 86 4E 28 32 35 29 2C | ."......N(25),|
00000180: 50 24 28 32 35 29 2C 47 52 24 28 34 38 29 2C 50 |P$(25),GR$(48),P|
00000190: 43 24 28 31 30 30 29 2C 4E 54 28 32 35 29 00 A8 |C$(100),NT(25)..|
000001A0: 05 A0 00 42 4C B2 38 31 00 BE 05 C8 00 81 49 B2 |...BL.81......I.|
000001B0: 32 A4 32 34 3A 87 4E 54 28 49 29 3A 82 49 00 F3 |2.24:.NT(I):.I..|
000001C0: 05 CD 00 83 36 34 2C 36 38 2C 37 32 2C 37 36 2C |....64,68,72,76,|
000001D0: 38 31 2C 38 35 2C 39 31 2C 39 36 2C 31 30 32 2C |81,85,91,96,102,|
000001E0: 31 30 38 2C 31 31 34 2C 31 32 31 2C 31 32 38 2C |108,114,121,128,|
000001F0: 31 33 36 00 20 06 D2 00 83 31 34 34 2C 31 35 32 |136. ....144,152|
00000200: 2C 31 36 31 2C 31 37 31 2C 31 38 31 2C 31 39 32 |,161,171,181,192|
00000210: 2C 32 30 33 2C 32 31 35 2C 32 32 38 2C 32 34 32 |,203,215,228,242|
00000220: 00 2D 06 FA 00 4E 28 32 29 B2 31 30 30 00 3F 06 |.-...N(2).100.?.|
00000230: 04 01 81 49 B2 34 A4 32 34 A9 32 3A 4E B2 30 00 |...I.4.24.2:N.0.|
00000240: 4E 06 0E 01 81 4A B2 32 A4 49 AB 32 A9 32 00 68 |N....J.2.I.2.2.h|
00000250: 06 18 01 54 B2 4E 28 4A 29 AD 32 3A 4E 28 4A 29 |...T.N(J).2:N(J)|
00000260: B2 4E AA 54 3A 4E B2 54 00 79 06 22 01 82 4A 3A |.N.T:N.T.y."..J:|
00000270: 4E 28 49 29 B2 4E 3A 82 49 00 81 06 27 01 99 22 |N(I).N:.I...'.."|
00000280: 93 00 B4 06 2C 01 81 49 B2 32 A4 32 34 A9 32 3A |....,..I.2.24.2:|
00000290: 4E B2 4E 28 49 29 3A 8D 35 32 30 30 3A 50 24 28 |N.N(I):.5200:P$(|
000002A0: 49 29 B2 CA 28 4E 24 2C 32 29 3A 4E 28 49 29 B2 |I)..(N$,2):N(I).|
000002B0: 30 3A 82 49 00 BF 06 36 01 81 4E B2 31 A4 36 00 |0:.I...6..N.1.6.|
000002C0: EC 06 40 01 4C 24 B2 CA 28 22 20 20 20 20 20 22 |..@.L$..(" "|
000002D0: 2C 4E 29 3A 52 24 B2 C8 28 22 12 20 20 20 20 20 |,N):R$..(". |
000002E0: 22 2C 4E 29 3A 49 B2 4E AC 38 AB 38 00 27 07 4A |",N):I.N.8.8.'.J|
000002F0: 01 81 4A B2 31 A4 38 3A 47 52 24 28 49 AA 4A 29 |..J.1.8:GR$(I.J)|
00000300: B2 4C 24 AA CA 28 22 92 A7 92 AA 92 B6 12 A1 12 |.L$..(".........|
00000310: B5 12 B4 12 A5 12 20 22 2C 4A AA 4A AB 31 2C 32 |...... ",J.J.1,2|
00000320: 29 AA 52 24 3A 82 4A 00 2E 07 54 01 82 4E 00 42 |).R$:.J...T..N.B|
00000330: 07 5E 01 47 52 24 28 30 29 B2 22 20 20 20 20 20 |.^.GR$(0)." |
00000340: 20 22 00 4B 07 F4 01 4D 58 B2 30 00 55 07 84 03 | ".K...MX.0.U...|
00000350: 99 22 13 22 3B 00 6A 07 B6 03 99 A3 43 29 3B 22 |.".";.j.....C);"|
00000360: C0 C0 C0 C0 C0 C0 AE 9D 11 DD 00 84 07 E8 03 81 |................|
00000370: 49 B2 31 A4 35 3A 8D 35 30 30 30 3A 8D 35 31 30 |I.1.5:.5000:.510|
00000380: 30 3A 82 49 00 92 07 ED 03 99 22 91 A4 A4 A4 A4 |0:.I......".....|
00000390: A4 22 00 A0 07 F2 03 49 B2 36 3A 8D 35 30 30 30 |.".....I.6:.5000|
000003A0: 00 AE 07 F7 03 99 22 A3 A3 A3 A3 A3 91 22 00 CB |......"......"..|
000003B0: 07 FC 03 81 49 B2 35 A4 31 A9 AB 31 3A 8D 35 31 |....I.5.1..1:.51|
000003C0: 30 30 3A 8D 35 30 30 30 3A 82 49 00 EE 07 06 04 |00:.5000:.I.....|
000003D0: 99 A3 43 29 3B 22 20 20 20 20 20 20 DD 22 3A 99 |..C);" .":.|
000003E0: A3 43 29 3B 22 C0 C0 C0 C0 C0 C0 BD 13 22 00 FF |.C);"........"..|
000003F0: 07 4C 04 54 49 24 B2 22 30 30 30 30 30 30 22 00 |.L.TI$."000000".|
00000400: 15 08 B0 04 99 22 13 B0 C0 C0 C0 B2 C0 C0 C0 C0 |....."..........|
00000410: C0 C0 C0 C0 AE 00 2A 08 B5 04 99 22 DD 20 20 20 |......*....". |
00000420: DD 20 20 20 20 20 20 20 20 DD 00 3F 08 BA 04 99 |. ..?....|
00000430: 22 AB C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 C0 C0 B3 00 |"...............|
00000440: 54 08 BF 04 99 22 DD 20 20 20 20 20 20 20 20 20 |T....". |
00000450: 20 20 20 DD 00 69 08 C4 04 99 22 AD C0 C0 C0 C0 | ..i....".....|
00000460: C0 C0 C0 C0 C0 C0 C0 C0 BD 00 73 08 6C 07 54 4D |..........s.l.TM|
00000470: B2 54 49 00 85 08 D0 07 8B 45 58 A7 99 22 13 11 |.TI......EX.."..|
00000480: 11 11 22 3A 80 00 95 08 D5 07 8B 54 49 B3 54 4D |..":.......TI.TM|
00000490: A7 32 30 30 35 00 C2 08 DA 07 54 4D B2 54 4D AA |.2005.....TM.TM.|
000004A0: 49 56 3A 54 24 B2 54 49 24 3A 8B 54 4D B1 B2 44 |IV:T$.TI$:.TM..D|
000004B0: 59 A7 54 4D B2 54 4D AB 44 59 3A 4E 44 B2 4E 44 |Y.TM.TM.DY:ND.ND|
000004C0: AA 31 00 DD 08 DF 07 99 22 13 11 1D 22 3B C9 28 |.1......"...";.(|
000004D0: 22 20 22 AA C4 28 4E 44 29 2C 33 29 3B 00 08 09 |" "..(ND),3);...|
000004E0: E4 07 99 22 1D 22 3B C8 28 54 24 2C 32 29 3B 22 |...".";.(T$,2);"|
000004F0: 3A 22 3B CA 28 54 24 2C 33 2C 32 29 3B 22 3A 22 |:";.(T$,3,2);":"|
00000500: 3B C9 28 54 24 2C 32 29 00 21 09 EE 07 42 B2 42 |;.(T$,2).!...B.B|
00000510: AA 31 3A 99 22 13 11 11 11 1D 42 41 4C 4C 22 3B |.1:.".....BALL";|
00000520: 42 00 3B 09 F8 07 50 B2 31 32 AC 34 30 AA 43 52 |B.;...P.12.40.CR|
00000530: 54 3A 55 44 B2 30 3A 52 54 B2 31 00 49 09 02 08 |T:UD.0:RT.1.I...|
00000540: 52 B2 31 33 3A 4F B2 33 32 00 52 09 34 08 97 50 |R.13:O.32.R.4..P|
00000550: 2C 4F 00 71 09 3E 08 50 B2 50 AA 55 44 AA 52 54 |,O.q.>.P.P.UD.RT|
00000560: 3A 52 B2 52 AA 52 43 3A 55 44 B2 30 3A 52 43 B2 |:R.R.RC:UD.0:RC.|
00000570: 30 00 82 09 48 08 4F B2 C2 28 50 29 3A 97 50 2C |0...H.O..(P):.P,|
00000580: 42 4C 00 91 09 52 08 8B 4F B2 33 32 A7 32 32 30 |BL...R..O.32.220|
00000590: 30 00 A4 09 57 08 4E 54 B2 4E 54 28 52 29 3A 8D |0...W.NT.NT(R):.|
000005A0: 32 39 30 30 00 BA 09 5C 08 8B 4F B3 B1 36 34 A7 |2900...\..O..64.|
000005B0: 97 50 2C 4F 3A 89 32 35 30 30 00 DF 09 66 08 55 |.P,O:.2500...f.U|
000005C0: 44 B2 34 30 3A 52 43 B2 31 3A 8B BB 28 31 29 B1 |D.40:RC.1:..(1).|
000005D0: 2E 35 A7 55 44 B2 AB 34 30 3A 52 43 B2 AB 31 00 |.5.UD..40:RC..1.|
000005E0: E9 09 98 08 8D 32 39 31 30 00 F3 09 A2 08 89 32 |.....2910......2|
000005F0: 31 30 30 00 01 0A AC 08 81 49 B2 31 A4 44 4C 3A |100......I.1.DL:|
00000600: 82 00 16 0A C4 09 45 52 B2 30 3A 4E 28 52 29 B2 |......ER.0:N(R).|
00000610: 4E 28 52 29 AA 31 00 41 0A CE 09 8B 4E 28 52 29 |N(R).1.A....N(R)|
00000620: B1 4D 58 A7 4D 58 B2 4E 28 52 29 3A 53 43 B2 34 |.MX.MX.N(R):SC.4|
00000630: 38 AD 4D 58 3A 52 4E B2 4D 58 AD 28 4D 58 AA 31 |8.MX:RN.MX.(MX.1|
00000640: 29 00 55 0A D8 09 A1 54 24 3A 8B 54 24 B2 22 22 |).U....T$:.T$.""|
00000650: A7 32 35 39 30 00 6D 0A DD 09 8B 54 24 B2 43 52 |.2590.m....T$.CR|
00000660: 24 A7 45 58 B2 31 3A 54 24 B2 54 59 24 00 85 0A |$.EX.1:T$.TY$...|
00000670: E2 09 8B 54 24 B2 22 2B 22 A7 53 44 B2 31 36 3A |...T$."+".SD.16:|
00000680: 89 32 35 39 30 00 9C 0A EC 09 8B 54 24 B2 22 2D |.2590......T$."-|
00000690: 22 A7 53 44 B2 30 3A 89 32 35 39 30 00 B5 0A F6 |".SD.0:.2590....|
000006A0: 09 8B 54 24 B3 B1 54 59 24 A7 45 52 B2 31 3A 54 |..T$..TY$.ER.1:T|
000006B0: 59 24 B2 54 24 00 C7 0A 1E 0A 8B 54 59 24 B2 22 |Y$.T$......TY$."|
000006C0: 25 22 A7 32 37 30 30 00 D6 0A 28 0A 8B 45 52 B2 |%".2700...(..ER.|
000006D0: 30 A7 32 36 34 30 00 E4 0A 32 0A 81 49 B2 32 A4 |0.2640...2..I.2.|
000006E0: 32 34 A9 32 00 11 0B 3C 0A 4E 24 B2 C9 28 22 20 |24.2...<.N$..(" |
000006F0: 20 20 22 AA C4 28 4E 28 49 29 29 2C 35 29 3A 8B | "..(N(I)),5):.|
00000700: 4E 28 49 29 B2 30 A7 4E 24 B2 22 20 20 20 20 20 |N(I).0.N$." |
00000710: 22 00 2D 0B 41 0A 97 51 4C 2C 49 3A 99 22 91 22 |".-.A..QL,I:."."|
00000720: 3B A3 43 AA 37 29 3B 4E 24 3B 22 13 22 00 3A 0B |;.C.7);N$;".".:.|
00000730: 46 0A 82 49 3A 89 32 36 35 30 00 66 0B 50 0A 97 |F..I:.2650.f.P..|
00000740: 51 4C 2C 52 3A 99 22 91 22 3B A3 43 AA 37 29 3B |QL,R:.".";.C.7);|
00000750: C9 28 22 20 20 20 22 AA C4 28 4E 28 52 29 29 2C |.(" "..(N(R)),|
00000760: 35 29 3B 22 13 22 00 74 0B 5A 0A 81 49 B2 32 A4 |5);".".t.Z..I.2.|
00000770: 32 34 A9 32 00 9B 0B 64 0A 97 51 4C 2C 49 3A 99 |24.2...d..QL,I:.|
00000780: 22 91 22 3B A3 43 29 3B 47 52 24 28 4E 28 49 29 |".";.C);GR$(N(I)|
00000790: AC 53 43 AA 52 4E 29 3B 22 13 22 00 A2 0B 6E 0A |.SC.RN);"."...n.|
000007A0: 82 49 00 AC 0B 78 0A 89 32 38 30 30 00 BB 0B 8C |.I...x..2800....|
000007B0: 0A 8B 45 52 B2 30 A7 32 37 35 30 00 C9 0B 96 0A |..ER.0.2750.....|
000007C0: 81 49 B2 32 A4 32 34 A9 32 00 E8 0B A0 0A 97 51 |.I.2.24.2......Q|
000007D0: 4C 2C 49 3A 99 22 91 22 3B A3 43 AA 37 29 3B 50 |L,I:.".";.C.7);P|
000007E0: 24 28 49 29 3B 22 13 22 00 EF 0B AA 0A 82 49 00 |$(I);"."......I.|
000007F0: FD 0B BE 0A 81 49 B2 32 A4 32 34 A9 32 00 14 0C |.....I.2.24.2...|
00000800: C8 0A 4E B2 4E 28 49 29 AD 42 AC 31 30 30 3A 8D |..N.N(I).B.100:.|
00000810: 35 32 30 30 00 2E 0C D2 0A 97 51 4C 2C 49 3A 99 |5200......QL,I:.|
00000820: 22 91 22 3B A3 43 29 3B 4E 24 3B 22 13 22 00 35 |".";.C);N$;".".5|
00000830: 0C DC 0A 82 49 00 45 0C F0 0A 8D 32 39 31 30 3A |....I.E....2910:|
00000840: 89 32 30 30 30 00 60 0C 54 0B 97 43 54 2C 53 44 |.2000.`.T..CT,SD|
00000850: 3A 97 54 4E 2C 31 35 3A 97 50 43 2C 4E 54 3A 8E |:.TN,15:.PC,NT:.|
00000860: 00 78 0C 5E 0B 97 50 43 2C 30 3A 97 54 4E 2C 30 |.x.^..PC,0:.TN,0|
00000870: 3A 97 43 54 2C 30 3A 8E 00 83 0C B7 0B 99 22 13 |:.CT,0:.......".|
00000880: 22 3A 80 00 92 0C 88 13 99 A3 33 30 AB 34 AC 49 |":........30.4.I|
00000890: 29 3B 00 AE 0C 92 13 8B 49 B1 31 A7 81 4A B2 32 |);......I.1..J.2|
000008A0: A4 49 3A 99 22 C0 20 20 20 22 3B 3A 82 4A 00 B8 |.I:.". ";:.J..|
000008B0: 0C 9C 13 99 22 C0 22 3B 00 CB 0C A6 13 99 A3 43 |....".";.......C|
000008C0: 29 3B 22 C0 C0 C0 C0 C0 C0 B3 22 00 D1 0C B0 13 |);".......".....|
000008D0: 8E 00 E0 0C EC 13 99 A3 32 38 AB 34 AC 49 29 3B |........28.4.I);|
000008E0: 00 FC 0C F6 13 8B 49 B1 31 A7 81 4A B2 32 A4 49 |......I.1..J.2.I|
000008F0: 3A 99 22 C0 20 20 20 22 3B 3A 82 4A 00 06 0D 00 |:.". ";:.J....|
00000900: 14 99 22 C0 22 3B 00 19 0D 0A 14 99 A3 43 29 3B |..".";.......C);|
00000910: 22 20 20 20 20 20 20 DD 22 00 1F 0D 14 14 8E 00 |" .".......|
00000920: 44 0D 50 14 4E B2 B5 28 4E AC 31 30 30 AA 2E 35 |D.P.N..(N.100..5|
00000930: 29 3A 8B 4E B2 30 A7 4E 24 B2 22 20 20 20 20 20 |):.N.0.N$." |
00000940: 20 22 3A 8E 00 65 0D 5A 14 4E 24 B2 CA 28 C4 28 | ":..e.Z.N$..(.(|
00000950: 4E 29 2C 32 29 3A 8B 4E B3 31 30 A7 4E 24 B2 22 |N),2):.N.10.N$."|
00000960: 30 22 AA 4E 24 00 7A 0D 64 14 8B 4E B3 31 30 30 |0".N$.z.d..N.100|
00000970: A7 4E 24 B2 22 30 22 AA 4E 24 00 A6 0D 6E 14 4E |.N$."0".N$...n.N|
00000980: 24 B2 C9 28 50 44 24 AA 4E 24 2C 36 29 3A 4E 24 |$..(PD$.N$,6):N$|
00000990: B2 C8 28 4E 24 2C 34 29 AA 22 2E 22 AA C9 28 4E |..(N$,4)."."..(N|
000009A0: 24 2C 32 29 3A 8E 00 C7 0D 60 EA 49 4E 24 B2 22 |$,2):....`.IN$."|
000009B0: 20 22 3A 5A 54 B2 54 49 3A 5A 43 B2 32 3A 5A 44 | ":ZT.TI:ZC.2:ZD|
000009C0: 24 B2 C7 28 32 30 29 00 DD 0D 6A EA A1 5A 24 3A |$..(20)...j..Z$:|
000009D0: 8B 5A 24 B3 B1 22 22 A7 36 30 30 37 30 00 0D 0E |.Z$.."".60070...|
000009E0: 74 EA 8B 5A 54 B3 B2 54 49 A7 99 CA 28 22 20 A6 |t..ZT..TI...(" .|
000009F0: 22 2C 5A 43 2C 31 29 3B 22 9D 22 3B 3A 5A 43 B2 |",ZC,1);".";:ZC.|
00000A00: 33 AB 5A 43 3A 5A 54 B2 54 49 AA 31 35 00 18 0E |3.ZC:ZT.TI.15...|
00000A10: 7E EA 89 36 30 30 31 30 00 48 0E A6 EA 5A B2 C6 |~..60010.H...Z..|
00000A20: 28 5A 24 29 3A 5A 4C B2 C3 28 49 4E 24 29 3A 8B |(Z$):ZL..(IN$):.|
00000A30: 28 5A AF 31 32 37 29 B3 33 32 A7 99 22 20 9D 22 |(Z.127).32.." ."|
00000A40: 3B 3A 89 36 30 31 31 30 00 78 0E B0 EA 8B 46 4C |;:.60110.x....FL|
00000A50: AF 28 5A AF 31 32 37 29 B1 36 34 AF 28 5A AF 31 |.(Z.127).64.(Z.1|
00000A60: 32 37 29 B3 39 31 A7 5A 24 B2 C7 28 28 5A AA 31 |27).91.Z$..((Z.1|
00000A70: 32 38 29 AF 32 35 35 29 00 8A 0E BA EA 8B 5A 4C |28).255)......ZL|
00000A80: B1 32 35 34 A7 36 30 30 31 30 00 A5 0E C4 EA 49 |.254.60010.....I|
00000A90: 4E 24 B2 49 4E 24 AA 5A 24 3A 99 5A 24 3B 5A 44 |N$.IN$.Z$:.Z$;ZD|
00000AA0: 24 3B 5A 24 3B 00 C4 0E CE EA 8B 5A B2 31 33 A7 |$;Z$;......Z.13.|
00000AB0: 49 4E 24 B2 CA 28 49 4E 24 2C 32 29 3A 99 43 52 |IN$..(IN$,2):.CR|
00000AC0: 24 3B 3A 8E 00 F0 0E D8 EA 8B 5A B2 32 30 AF 5A |$;:.......Z.20.Z|
00000AD0: 4C B1 31 A7 49 4E 24 B2 C8 28 49 4E 24 2C 5A 4C |L.1.IN$..(IN$,ZL|
00000AE0: AB 31 29 3A 99 22 9D 22 3B 3A 89 36 30 30 31 30 |.1):.".";:.60010|
00000AF0: 00 23 0F E2 EA 8B 5A B2 31 34 31 A7 5A 24 B2 C7 |.#....Z.141.Z$..|
00000B00: 28 AB 32 30 AC 28 5A 4C B1 31 29 29 3A 81 5A B2 |(.20.(ZL.1)):.Z.|
00000B10: 32 A4 5A 4C 3A 99 5A 24 3B 3A 82 5A 3A 89 36 30 |2.ZL:.Z$;:.Z:.60|
00000B20: 30 30 30 00 2E 0F EC EA 89 36 30 30 31 30 00 3E |000......60010.>|
00000B30: 0F 28 EB 8B 50 4E B2 30 A7 36 30 32 35 30 00 49 |.(..PN.0.60250.I|
00000B40: 0F 2D EB 8D 36 30 35 30 30 00 64 0F 32 EB 99 22 |.-..60500.d.2.."|
00000B50: 50 52 45 53 53 20 12 52 45 54 55 52 4E 92 20 54 |PRESS .RETURN. T|
00000B60: 4F 20 22 3B 00 81 0F 3C EB 8B 50 4E B2 4C 50 A7 |O ";...<..PN.LP.|
00000B70: 99 22 42 45 47 49 4E 3A 22 3B 3A 89 36 30 32 34 |."BEGIN:";:.6024|
00000B80: 30 00 93 0F 46 EB 99 22 43 4F 4E 54 49 4E 55 45 |0...F.."CONTINUE|
00000B90: 3A 22 3B 00 A8 0F 50 EB A1 54 24 3A 8B 54 24 B2 |:";...P..T$:.T$.|
00000BA0: 22 22 A7 36 30 32 34 30 00 B9 0F 5A EB 8B 50 4E |"".60240...Z..PN|
00000BB0: B2 4C 50 A7 36 30 33 30 30 00 F7 0F 64 EB 50 4E |.LP.60300...d.PN|
00000BC0: B2 50 4E AA 31 3A 99 22 93 22 3B 50 47 24 3B 22 |.PN.1:.".";PG$;"|
00000BD0: 20 2D 20 43 55 52 53 4F 52 20 23 22 3B 4E 4D 24 | - CURSOR #";NM$|
00000BE0: 3B 22 20 20 28 43 29 20 31 39 37 39 20 20 20 50 |;" (C) 1979 P|
00000BF0: 41 47 45 22 3B 50 4E 00 02 10 69 EB 8D 36 30 35 |AGE";PN...i..605|
00000C00: 30 30 00 08 10 6E EB 8E 00 1F 10 8C EB 99 22 93 |00...n........".|
00000C10: 22 3A 9C 3A 8D 36 30 34 30 30 3A 89 31 30 30 00 |":.:.60400:.100.|
00000C20: 5C 10 F0 EB 51 4B B2 35 32 35 3A 51 4C B2 32 34 |\...QK.525:QL.24|
00000C30: 35 3A 51 4D B2 31 33 34 3A 51 50 B2 35 31 35 3A |5:QM.134:QP.515:|
00000C40: 51 51 B2 32 33 34 3A 51 53 B2 35 31 36 3A 51 56 |QQ.234:QS.516:QV|
00000C50: B2 31 3A 43 52 24 B2 C7 28 31 33 29 00 6E 10 FA |.1:CR$..(13).n..|
00000C60: EB 8B C2 28 35 30 30 30 30 29 B2 30 A7 8E 00 A0 |...(50000).0....|
00000C70: 10 04 EC 51 4B B2 31 35 38 3A 51 4C B2 32 31 36 |...QK.158:QL.216|
00000C80: 3A 51 4D B2 35 32 3A 51 50 B2 31 35 31 3A 51 51 |:QM.52:QP.151:QQ|
00000C90: B2 32 30 35 3A 51 53 B2 31 35 32 3A 51 56 B2 32 |.205:QS.152:QV.2|
00000CA0: 00 A6 10 0E EC 8E 00 C0 10 54 EC 81 49 B2 31 A4 |.........T..I.1.|
00000CB0: 31 30 3A 99 22 C0 C0 C0 C0 22 3B 3A 82 49 3A 8E |10:."....";:.I:.|
00000CC0: 00 E7 10 30 F2 99 22 93 11 11 22 3B A3 39 29 3B |...0.."...";.9);|
00000CD0: 22 43 55 52 53 4F 52 20 23 22 3B 4E 4D 24 3B 22 |"CURSOR #";NM$;"|
00000CE0: 20 20 22 3B 50 47 24 00 13 11 3A F2 99 22 11 20 | ";PG$...:..". |
00000CF0: 43 4F 50 59 52 49 47 48 54 20 28 43 29 20 31 39 |COPYRIGHT (C) 19|
00000D00: 37 39 20 20 42 59 20 47 4C 45 4E 20 46 49 53 48 |79 BY GLEN FISH|
00000D10: 45 52 11 00 1E 11 44 F2 8D 36 30 35 30 30 00 49 |ER....D..60500.I|
00000D20: 11 4E F2 99 22 11 42 49 4E 4F 4D 49 41 4C 20 44 |.N..".BINOMIAL D|
00000D30: 49 53 54 52 49 42 55 54 49 4F 4E 20 44 45 4D 4F |ISTRIBUTION DEMO|
00000D40: 4E 53 54 52 41 54 49 4F 4E 00 6C 11 80 F2 99 22 |NSTRATION.l...."|
00000D50: 11 11 57 41 4E 54 20 44 49 52 45 43 54 49 4F 4E |..WANT DIRECTION|
00000D60: 53 3F 20 22 3B 3A 8D 36 30 30 30 30 00 85 11 8A |S? ";:.60000....|
00000D70: F2 8B C8 28 49 4E 24 2C 31 29 B3 B1 22 59 22 A7 |...(IN$,1).."Y".|
00000D80: 36 30 33 30 30 00 95 11 94 F2 4C 50 B2 34 3A 8D |60300.....LP.4:.|
00000D90: 36 30 32 30 30 00 C5 11 9E F2 99 22 11 47 41 55 |60200......".GAU|
00000DA0: 53 53 21 2C 20 28 57 49 54 48 20 41 4C 4C 20 44 |SS!, (WITH ALL D|
00000DB0: 55 45 20 52 45 53 50 45 43 54 20 54 4F 20 50 41 |UE RESPECT TO PA|
00000DC0: 53 43 41 4C 2C 00 F2 11 A8 F2 99 22 42 45 52 4E |SCAL,......"BERN|
00000DD0: 4F 55 4C 4C 49 2C 20 54 41 52 54 41 47 4C 49 41 |OULLI, TARTAGLIA|
00000DE0: 2C 20 43 41 52 44 41 4E 4F 2C 20 41 4E 44 20 54 |, CARDANO, AND T|
00000DF0: 48 45 00 1A 12 B2 F2 99 22 11 41 4E 43 49 45 4E |HE......".ANCIEN|
00000E00: 54 20 43 48 49 4E 45 53 45 20 4D 41 54 48 45 4D |T CHINESE MATHEM|
00000E10: 41 54 49 43 49 41 4E 53 29 2C 00 4A 12 BC F2 99 |ATICIANS),.J....|
00000E20: 22 11 49 53 20 41 20 47 52 41 50 48 49 43 20 44 |".IS A GRAPHIC D|
00000E30: 45 4D 4F 4E 53 54 52 41 54 49 4F 4E 20 4F 46 20 |EMONSTRATION OF |
00000E40: 54 48 45 20 42 49 4E 4F 4D 2D 00 78 12 C6 F2 99 |THE BINOM-.x....|
00000E50: 22 49 41 4C 20 44 49 53 54 52 49 42 55 54 49 4F |"IAL DISTRIBUTIO|
00000E60: 4E 2E 20 42 45 46 4F 52 45 20 59 4F 55 52 20 56 |N. BEFORE YOUR V|
00000E70: 45 52 59 20 45 59 45 53 00 A8 12 D0 F2 99 22 11 |ERY EYES......".|
00000E80: 41 20 53 54 45 45 4C 20 42 41 4C 4C 20 42 45 41 |A STEEL BALL BEA|
00000E90: 52 49 4E 47 20 57 49 4C 4C 20 44 52 4F 50 20 44 |RING WILL DROP D|
00000EA0: 4F 57 4E 20 49 4E 54 4F 00 D3 12 DA F2 99 22 4F |OWN INTO......"O|
00000EB0: 4E 45 20 4F 46 20 54 57 45 4C 56 45 20 42 49 4E |NE OF TWELVE BIN|
00000EC0: 53 2E 20 28 41 43 54 55 41 4C 4C 59 2C 20 49 54 |S. (ACTUALLY, IT|
00000ED0: 20 49 53 00 03 13 E4 F2 99 22 11 53 48 4F 54 20 | IS......".SHOT |
00000EE0: 46 52 4F 4D 20 41 20 48 49 47 48 2D 50 52 45 53 |FROM A HIGH-PRES|
00000EF0: 53 55 52 45 20 47 55 4E 20 49 4E 20 41 20 5A 45 |SURE GUN IN A ZE|
00000F00: 52 4F 2D 00 20 13 EE F2 99 22 47 52 41 56 49 54 |RO-. ...."GRAVIT|
00000F10: 59 20 45 4E 56 49 52 4F 4E 4D 45 4E 54 2E 29 11 |Y ENVIRONMENT.).|
00000F20: 00 2B 13 F8 F2 8D 36 30 32 30 30 00 59 13 02 F3 |.+....60200.Y...|
00000F30: 99 22 11 41 53 20 54 48 45 20 42 41 4C 4C 53 20 |.".AS THE BALLS |
00000F40: 41 43 43 55 4D 55 4C 41 54 45 20 49 4E 20 54 48 |ACCUMULATE IN TH|
00000F50: 45 20 56 41 52 49 4F 55 53 00 87 13 0C F3 99 22 |E VARIOUS......"|
00000F60: 11 42 49 4E 53 2C 20 41 20 53 45 4C 46 2D 53 43 |.BINS, A SELF-SC|
00000F70: 41 4C 49 4E 47 20 42 41 52 20 47 52 41 50 48 20 |ALING BAR GRAPH |
00000F80: 49 53 20 44 49 53 2D 00 B4 13 16 F3 99 22 11 50 |IS DIS-......".P|
00000F90: 4C 41 59 45 44 2C 20 41 53 20 57 45 4C 4C 20 41 |LAYED, AS WELL A|
00000FA0: 53 20 54 48 45 20 43 4F 55 4E 54 20 46 4F 52 20 |S THE COUNT FOR |
00000FB0: 45 41 43 48 00 DD 13 20 F3 99 22 11 42 49 4E 2E |EACH... ..".BIN.|
00000FC0: 20 59 4F 55 20 4D 41 59 20 43 4F 4E 54 52 4F 4C | YOU MAY CONTROL|
00000FD0: 20 54 57 4F 20 4F 50 54 49 4F 4E 53 3A 00 0F 14 | TWO OPTIONS:...|
00000FE0: 2A F3 99 22 20 20 20 20 20 20 20 20 20 20 11 53 |*.." .S|
00000FF0: 4F 55 4E 44 11 9D 9D 9D 9D 9D C5 C5 C5 C5 C5 91 |OUND............|
00001000: 20 12 4F 4E 92 20 50 52 45 53 53 20 27 2B 27 00 | .ON. PRESS '+'.|
00001010: 35 14 34 F3 99 22 20 20 20 20 20 20 20 20 20 20 |5.4.." |
00001020: 11 20 20 20 20 20 12 4F 46 46 92 20 50 52 45 53 |. .OFF. PRES|
00001030: 53 20 27 2D 27 00 73 14 3E F3 99 22 20 20 20 20 |S '-'.s.>.." |
00001040: 11 50 45 52 43 45 4E 54 41 47 45 53 11 9D 9D 9D |.PERCENTAGES....|
00001050: 9D 9D 9D 9D 9D 9D 9D 9D C5 C5 C5 C5 C5 C5 C5 C5 |................|
00001060: C5 C5 C5 91 20 12 4F 4E 92 20 50 52 45 53 53 20 |.... .ON. PRESS |
00001070: 27 25 27 00 9D 14 48 F3 99 22 11 20 20 20 20 20 |'%'...H..". |
00001080: 20 20 20 20 20 20 20 20 20 20 12 4F 46 46 92 20 | .OFF. |
00001090: 50 52 45 53 53 20 27 53 50 41 43 45 27 00 CC 14 |PRESS 'SPACE'...|
000010A0: 52 F3 99 22 11 28 50 4C 45 41 53 45 20 42 45 20 |R..".(PLEASE BE |
000010B0: 53 55 52 45 20 53 4F 55 4E 44 20 49 53 20 12 4F |SURE SOUND IS .O|
000010C0: 46 46 92 20 57 48 45 4E 20 59 4F 55 00 F0 14 5C |FF. WHEN YOU...\|
000010D0: F3 99 22 11 44 45 43 49 44 45 20 54 4F 20 53 54 |..".DECIDE TO ST|
000010E0: 4F 50 20 54 48 45 20 50 52 4F 47 52 41 4D 2E 29 |OP THE PROGRAM.)|
000010F0: 00 FB 14 66 F3 8D 36 30 32 30 30 00 29 15 70 F3 |...f..60200.).p.|
00001100: 99 22 11 57 48 45 4E 20 54 48 45 20 50 45 52 43 |.".WHEN THE PERC|
00001110: 45 4E 54 41 47 45 20 4F 50 54 49 4F 4E 20 49 53 |ENTAGE OPTION IS|
00001120: 20 12 4F 4E 92 2C 59 4F 55 00 54 15 7A F3 99 22 | .ON.,YOU.T.z.."|
00001130: 11 57 49 4C 4C 20 53 45 45 20 54 48 45 20 41 43 |.WILL SEE THE AC|
00001140: 54 55 41 4C 20 50 45 52 43 45 4E 54 41 47 45 53 |TUAL PERCENTAGES|
00001150: 20 46 4F 52 00 82 15 84 F3 99 22 11 45 41 43 48 | FOR......".EACH|
00001160: 20 42 49 4E 20 4F 4E 20 54 48 45 20 4C 45 46 54 | BIN ON THE LEFT|
00001170: 2C 20 41 4E 44 20 54 48 45 20 45 58 50 45 43 54 |, AND THE EXPECT|
00001180: 45 44 00 B2 15 8E F3 99 22 11 50 45 52 43 45 4E |ED......".PERCEN|
00001190: 54 41 47 45 53 20 4F 4E 20 54 48 45 20 52 49 47 |TAGES ON THE RIG|
000011A0: 48 54 2E 20 41 46 54 45 52 20 54 48 45 20 50 52 |HT. AFTER THE PR|
000011B0: 4F 2D 00 E1 15 98 F3 99 22 47 52 41 4D 20 52 55 |O-......"GRAM RU|
000011C0: 4E 53 20 53 45 56 45 52 41 4C 20 48 4F 55 52 53 |NS SEVERAL HOURS|
000011D0: 2C 20 54 48 45 20 50 45 52 43 45 4E 54 41 47 45 |, THE PERCENTAGE|
000011E0: 53 00 0A 16 A2 F3 99 22 57 49 4C 4C 20 42 45 20 |S......"WILL BE |
000011F0: 56 45 52 59 20 43 4C 4F 53 45 20 54 4F 20 54 48 |VERY CLOSE TO TH|
00001200: 45 20 45 58 50 45 43 54 45 44 00 3A 16 AC F3 99 |E EXPECTED.:....|
00001210: 22 11 52 45 53 55 4C 54 53 2E 20 28 54 48 45 20 |".RESULTS. (THE |
00001220: 52 41 4E 44 4F 4D 20 4E 55 4D 42 45 52 53 20 50 |RANDOM NUMBERS P|
00001230: 52 4F 44 55 43 45 44 20 42 59 00 68 16 B6 F3 99 |RODUCED BY.h....|
00001240: 22 54 48 45 20 27 4F 4C 44 27 20 50 45 54 20 52 |"THE 'OLD' PET R|
00001250: 4F 4D 53 20 41 52 45 20 4C 45 53 53 20 54 48 41 |OMS ARE LESS THA|
00001260: 4E 20 52 41 4E 44 4F 4D 00 91 16 C0 F3 99 22 11 |N RANDOM......".|
00001270: 41 53 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 |AS THIS PROGRAM |
00001280: 43 4C 45 41 52 4C 59 20 53 48 4F 57 53 2E 2E 2E |CLEARLY SHOWS...|
00001290: 29 00 9C 16 CA F3 8D 36 30 32 30 30 00 CB 16 D4 |)......60200....|
000012A0: F3 99 22 11 49 4E 20 54 48 45 20 55 50 50 45 52 |..".IN THE UPPER|
000012B0: 2D 4C 45 46 54 20 43 4F 52 4E 45 52 20 4F 46 20 |-LEFT CORNER OF |
000012C0: 59 4F 55 52 20 53 43 52 45 45 4E 00 FB 16 DE F3 |YOUR SCREEN.....|
000012D0: 99 22 11 54 48 45 20 45 4C 41 50 53 45 44 20 54 |.".THE ELAPSED T|
000012E0: 49 4D 45 20 49 53 20 53 48 4F 57 4E 20 49 4E 20 |IME IS SHOWN IN |
000012F0: 44 41 59 53 2C 20 48 4F 55 52 53 00 27 17 E8 F3 |DAYS, HOURS.'...|
00001300: 99 22 4D 49 4E 55 54 45 53 20 41 4E 44 20 53 45 |."MINUTES AND SE|
00001310: 43 4F 4E 44 53 2E 20 45 41 43 48 20 48 4F 55 52 |CONDS. EACH HOUR|
00001320: 2C 20 41 42 4F 55 54 00 56 17 F2 F3 99 22 11 31 |, ABOUT.V....".1|
00001330: 30 30 30 20 42 41 4C 4C 53 20 41 52 45 20 45 4A |000 BALLS ARE EJ|
00001340: 45 43 54 45 44 2E 20 53 4F 2C 20 49 46 20 59 4F |ECTED. SO, IF YO|
00001350: 55 20 57 41 4E 54 00 83 17 FC F3 99 22 11 54 4F |U WANT......".TO|
00001360: 20 53 49 4D 55 4C 41 54 45 20 47 41 55 53 53 21 | SIMULATE GAUSS!|
00001370: 20 42 59 20 46 4C 49 50 50 49 4E 47 20 43 4F 49 | BY FLIPPING COI|
00001380: 4E 53 2C 00 B2 17 06 F4 99 22 11 59 4F 55 20 4E |NS,......".YOU N|
00001390: 45 45 44 20 54 4F 20 46 4C 49 50 20 31 31 2C 30 |EED TO FLIP 11,0|
000013A0: 30 30 20 43 4F 49 4E 53 20 50 45 52 20 48 4F 55 |00 COINS PER HOU|
000013B0: 52 2E 00 DF 17 10 F4 99 22 11 4E 4F 57 20 59 4F |R.......".NOW YO|
000013C0: 55 20 4B 4E 4F 57 20 57 48 59 20 59 4F 55 20 42 |U KNOW WHY YOU B|
000013D0: 4F 55 47 48 54 20 59 4F 55 52 20 50 45 54 21 00 |OUGHT YOUR PET!.|
000013E0: E9 17 1A F4 99 22 C5 C5 C5 00 1A 18 1F F4 99 22 |....."........."|
000013F0: 11 59 4F 55 20 43 41 4E 20 53 54 4F 50 20 47 41 |.YOU CAN STOP GA|
00001400: 55 53 53 21 20 42 59 20 50 52 45 53 53 49 4E 47 |USS! BY PRESSING|
00001410: 20 12 52 45 54 55 52 4E 92 2E 00 25 18 56 F4 8D | .RETURN...%.V..|
00001420: 36 30 32 30 30 00 00 00 |60200... |
.......:.59468,12.=.... GAUSS! COPYRIGHT
(C) 1979 GLEN FISHER.C...:.`.... CURSOR
#12, JULY, 1979...... BOX 550, GOLETA,
CA. 93017.....:...... AS OF AUG 11 1979.
..Z.PG$."GAUSS!":NM$."12":.62000...D..".
.........................JUST A MOMENT..
..F.C.28:UD.0:RN.0:SC.0:MX.0:RT.0...I.O.
0:P.0.6.N.CRT.32768:DY.5184000.U.S.CT.59
467:TN.59466:PC.59464.E.X.IV.216:SD.0.T.
..PD$." ."......N(25),P$(25),GR$(48),P
C$(100),NT(25)... .BL.81...H..I.2.24:.NT
(I):.I...M..64,68,72,76,81,85,91,96,102,
108,114,121,128,136. .R..144,152,161,171
,181,192,203,215,228,242.-...N(2).100.?.
...I.4.24.2:N.0.N....J.2.I.2.2.H...T.N(J
).2:N(J).N.T:N.T.Y."..J:N(I).N:.I...'.."
....,..I.2.24.2:N.N(I):.5200:P$(I).J(N$,
2):N(I).0:.I...6..N.1.6...@.L$.J(" "
,N):R$.H(". ",N):I.N.8.8.'.J..J.1.8:
GR$(I.J).L$.J("............... ",J.J.1,2
).R$:.J...T..N.B.^.GR$(0)." ".K...M
X.0.U....".";.J.....C);"................
I.1.5:.5000:.5100:.I......"......". ...I
.6:.5000......"......".K....I.5.1..1:.51
00:.5000:.I.......C);" .":..C);"...
....."...L.TI$."000000"......"..........
......*....". . ..?....".......
........T....". ..I.D..".....
..........S.L.TM.TI...P..EX.."....":....
U..TI.TM.2005.B.Z.TM.TM.IV:T$.TI$:.TM..D
Y.TM.TM.DY:ND.ND.1......"...";I(" ".D(ND
),3);......".";H(T$,2);":";J(T$,3,2);":"
;I(T$,2).!...B.B.1:.".....BALL";B.;...P.
12.40.CRT:UD.0:RT.1.I...R.13:O.32.R.4..P
,O.Q.>.P.P.UD.RT:R.R.RC:UD.0:RC.0...H.O.
B(P):.P,BL...R..O.32.2200...W.NT.NT(R):.
2900...\..O..64..P,O:.2500...F.UD.40:RC.
1:..(1)..5.UD..40:RC..1......2910......2
100......I.1.DL:....D.ER.0:N(R).N(R).1.A
.N..N(R).MX.MX.N(R):SC.48.MX:RN.MX.(MX.1
).U.X..T$:.T$."".2590.M....T$.CR$.EX.1:T
$.TY$......T$."+".SD.16:.2590......T$."-
".SD.0:.2590......T$..TY$.ER.1:TY$.T$.G.
...TY$."%".2700.V.(..ER.0.2640...2..I.2.
24.2...<.N$.I(" ".D(N(I)),5):.N(I).0.N
$." ".-.A..QL,I:.".";.C.7);N$;".".:.
F..I:.2650.F.P..QL,R:.".";.C.7);I(" ".
D(N(R)),5);".".T.Z..I.2.24.2...D..QL,I:.
".";.C);GR$(N(I).SC.RN);"."...N..I...X..
2800......ER.0.2750.I....I.2.24.2... ..Q
L,I:.".";.C.7);P$(I);"."......I......I.2
.24.2...H.N.N(I).B.100:.5200...R..QL,I:.
".";.C);N$;".".5....I.E....2910:.2000.`.
T..CT,SD:.TN,15:.PC,NT:..X.^..PC,0:.TN,0
:.CT,0:.......".":........30.4.I);......
I.1..J.2.I:.". ";:.J......".";.K.....C
);".......".Q...........28.4.I);......I.
1..J.2.I:.". ";:.J......".";.......C);
" .".......D.P.N..(N.100..5):.N.0.N
$." ":..E.Z.N$.J(D(N),2):.N.10.N$."
0".N$.Z.D..N.100.N$."0".N$...N.N$.I(PD$.
N$,6):N$.H(N$,4).".".I(N$,2):..G.`.IN$."
":ZT.TI:ZC.2:ZD$.G(20)...J..Z$:.Z$.."".
60070...T..ZT..TI..J(" .",ZC,1);".";:ZC.
3.ZC:ZT.TI.15...~..60010.H...Z.F(Z$):ZL.
C(IN$):.(Z.127).32.." .";:.60110.X....FL
.(Z.127).64.(Z.127).91.Z$.G((Z.128).255)
......ZL.254.60010...D.IN$.IN$.Z$:.Z$;ZD
$;Z$;.D.N..Z.13.IN$.J(IN$,2):.CR$;:....X
..Z.20.ZL.1.IN$.H(IN$,ZL.1):.".";:.60010
.#....Z.141.Z$.G(.20.(ZL.1)):.Z.2.ZL:.Z$
;:.Z:.60000......60010.>.(..PN.0.60250.I
.-..60500.D.2.."PRESS .RETURN. TO ";...<
..PN.LP.."BEGIN:";:.60240...F.."CONTINUE
:";...P..T$:.T$."".60240...Z..PN.LP.6030
0...D.PN.PN.1:.".";PG$;" - CURSOR #";NM$
;" (C) 1979 PAGE";PN...I..60500...N..
......".":.:.60400:.100.\...QK.525:QL.24
5:QM.134:QP.515:QQ.234:QS.516:QV.1:CR$.G
(13).N....B(50000).0... ...QK.158:QL.216
:QM.52:QP.151:QQ.205:QS.152:QV.2........
.T..I.1.10:."....";:.I:....0.."...";.9);
"CURSOR #";NM$;" ";PG$...:..". COPYRIGH
T (C) 1979 BY GLEN FISHER....D..60500.I
.N..".BINOMIAL DISTRIBUTION DEMONSTRATIO
N.L...."..WANT DIRECTIONS? ";:.60000....
..H(IN$,1).."Y".60300.....LP.4:.60200.E.
...".GAUSS!, (WITH ALL DUE RESPECT TO PA
SCAL,......"BERNOULLI, TARTAGLIA, CARDAN
O, AND THE......".ANCIENT CHINESE MATHEM
ATICIANS),.J....".IS A GRAPHIC DEMONSTRA
TION OF THE BINOM-.X.F.."IAL DISTRIBUTIO
N. BEFORE YOUR VERY EYES...P..".A STEEL
BALL BEARING WILL DROP DOWN INTO.S.Z.."O
NE OF TWELVE BINS. (ACTUALLY, IT IS.....
.".SHOT FROM A HIGH-PRESSURE GUN IN A ZE
RO-. ...."GRAVITY ENVIRONMENT.)..+....60
200.Y....".AS THE BALLS ACCUMULATE IN TH
E VARIOUS......".BINS, A SELF-SCALING BA
R GRAPH IS DIS-......".PLAYED, AS WELL A
S THE COUNT FOR EACH... ..".BIN. YOU MAY
CONTROL TWO OPTIONS:...*.." .S
OUND......EEEEE. .ON. PRESS '+'.5.4.."
. .OFF. PRESS '-'.S.>.."
.PERCENTAGES............EEEEEEEEEEE. .ON
. PRESS '%'...H..". .OFF.
PRESS 'SPACE'.L.R..".(PLEASE BE SURE SOU
ND IS .OFF. WHEN YOU...\..".DECIDE TO ST
OP THE PROGRAM.)...F..60200.).P..".WHEN
THE PERCENTAGE OPTION IS .ON.,YOU.T.Z.."
.WILL SEE THE ACTUAL PERCENTAGES FOR....
..".EACH BIN ON THE LEFT, AND THE EXPECT
ED......".PERCENTAGES ON THE RIGHT. AFTE
R THE PRO-......"GRAM RUNS SEVERAL HOURS
, THE PERCENTAGES......"WILL BE VERY CLO
SE TO THE EXPECTED.:....".RESULTS. (THE
RANDOM NUMBERS PRODUCED BY.H...."THE 'OL
D' PET ROMS ARE LESS THAN RANDOM......".
AS THIS PROGRAM CLEARLY SHOWS...)...J..6
0200.K.T..".IN THE UPPER-LEFT CORNER OF
YOUR SCREEN......".THE ELAPSED TIME IS S
HOWN IN DAYS, HOURS.'...."MINUTES AND SE
CONDS. EACH HOUR, ABOUT.V....".1000 BALL
S ARE EJECTED. SO, IF YOU WANT......".TO
SIMULATE GAUSS! BY FLIPPING COINS,.....
.".YOU NEED TO FLIP 11,000 COINS PER HOU
R.......".NOW YOU KNOW WHY YOU BOUGHT YO
UR PET!......"EEE......".YOU CAN STOP GA
USS! BY PRESSING .RETURN...%.V..60200...
> CLICK IMAGE PREVIEW FOR FULL MODAL