DECISION MAKER
FILE INFORMATION
FILENAME(S): DECISION MAKER
FILE TYPE(S): PRG
FILE SIZE: 6.7K
FIRST SEEN: 2025-11-30 21:23:34
APPEARS ON: 1 disk(s)
FILE HASH
5b66e6fa1667dc2f0de068001546c73bb84b4f7703a9c05e7d74ec7551100152
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 43 2 | DECISION MAKER | PRG | DuncanTwain | 14 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 4D 08 02 00 8F 20 20 20 20 20 20 20 43 42 |..M.... CB|
00000010: 4D 20 36 34 20 44 45 43 49 53 49 4F 4E 20 4D 41 |M 64 DECISION MA|
00000020: 4B 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 |KER |
00000030: 20 20 20 28 43 29 20 31 39 38 33 20 43 52 45 41 | (C) 1983 CREA|
00000040: 54 49 56 45 20 53 4F 46 54 57 41 52 45 00 75 08 |TIVE SOFTWARE.u.|
00000050: 0A 00 41 B2 30 3A 46 B2 AB 31 3A 52 24 B2 C7 28 |..A.0:F..1:R$..(|
00000060: 31 33 29 3A 97 35 33 32 38 31 2C 31 3A 97 35 33 |13):.53281,1:.53|
00000070: 32 38 30 2C 33 00 B4 08 0C 00 99 22 93 11 11 11 |280,3......"....|
00000080: 11 11 11 0E 08 1C 22 2C 22 20 20 20 20 A4 A4 A4 |......"," ...|
00000090: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 3A 99 2C 22 |...........":.,"|
000000A0: 20 20 20 20 12 C4 C5 C3 C9 D3 C9 CF CE A0 CD C1 | ............|
000000B0: CB C5 D2 22 00 04 09 0F 00 44 24 B2 22 30 3A 27 |...".....D$."0:'|
000000C0: 22 3A 43 24 B2 22 11 1C 12 43 92 48 41 4E 47 45 |":C$."...C.HANGE|
000000D0: 20 12 44 92 45 4C 45 54 45 20 12 45 92 4E 44 1F | .D.ELETE .E.ND.|
000000E0: 11 11 22 3A 42 24 B2 22 20 20 20 20 20 20 20 20 |..":B$." |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000100: 20 20 20 22 00 53 09 10 00 4C 24 B2 22 A4 A4 A4 | ".S...L$."...|
00000110: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 3A 53 |.............":S|
00000120: 24 B2 22 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |$.".............|
00000130: 9D 9D 9D 22 3A 59 24 B2 22 13 11 11 11 11 11 11 |...":Y$.".......|
00000140: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000150: 11 11 22 00 97 09 14 00 99 2C 22 11 11 11 9C 20 |.."......,".... |
00000160: 20 20 20 C3 4F 50 59 52 49 47 48 54 20 31 39 38 | .OPYRIGHT 198|
00000170: 33 22 52 24 A3 31 39 29 22 11 42 59 22 52 24 A3 |3"R$.19)".BY"R$.|
00000180: 31 32 29 22 11 C3 52 45 41 54 49 56 45 20 D3 4F |12)"..REATIVE .O|
00000190: 46 54 57 41 52 45 22 00 9F 09 19 00 8D 39 35 00 |FTWARE"......95.|
000001A0: D8 09 1E 00 99 22 93 1F 0E 22 2C 22 20 20 20 20 |....."..."," |
000001B0: 20 20 CD 20 C5 20 CE 20 D5 11 22 52 24 2C 22 1C | . . . .."R$,".|
000001C0: C1 4C 54 45 52 4E 41 54 49 56 45 53 3A 22 52 24 |.LTERNATIVES:"R$|
000001D0: 22 31 2E 20 C1 44 44 22 00 FB 09 23 00 99 22 32 |"1. .DD"...#.."2|
000001E0: 2E 20 C3 48 41 4E 47 45 2F C4 45 4C 45 54 45 22 |. .HANGE/.ELETE"|
000001F0: 52 24 22 33 2E 20 CC 49 53 54 22 00 3C 0A 28 00 |R$"3. .IST".<.(.|
00000200: 99 2C 22 11 90 C6 41 43 54 4F 52 53 3A 22 52 24 |.,"...ACTORS:"R$|
00000210: 22 34 2E 20 C1 44 44 22 52 24 22 35 2E 20 C3 48 |"4. .DD"R$"5. .H|
00000220: 41 4E 47 45 2F C4 45 4C 45 54 45 22 52 24 22 36 |ANGE/.ELETE"R$"6|
00000230: 2E 20 CC 49 53 54 2F D2 41 54 45 22 00 6A 0A 32 |. .IST/.ATE".j.2|
00000240: 00 99 22 11 1E 37 2E 20 D3 43 4F 52 45 20 41 4C |.."..7. .CORE AL|
00000250: 54 45 52 4E 41 54 49 56 45 53 22 52 24 2C 22 11 |TERNATIVES"R$,".|
00000260: 9C C3 4F 4D 50 55 54 45 3A 22 00 B7 0A 3C 00 99 |..OMPUTE:"...<..|
00000270: 22 38 2E 20 C4 49 53 50 4C 41 59 20 52 45 53 55 |"8. .ISPLAY RESU|
00000280: 4C 54 22 52 24 22 39 2E 20 D0 52 49 4E 54 20 52 |LT"R$"9. .RINT R|
00000290: 45 53 55 4C 54 22 52 24 2C 22 11 1F C4 41 54 41 |ESULT"R$,"...ATA|
000002A0: 20 46 49 4C 45 53 3A 22 52 24 22 31 30 2E 20 D3 | FILES:"R$"10. .|
000002B0: 54 4F 52 45 20 22 3B 00 05 0B 46 00 99 22 44 41 |TORE ";...F.."DA|
000002C0: 54 41 22 52 24 22 31 31 2E 20 D2 45 43 41 4C 4C |TA"R$"11. .ECALL|
000002D0: 20 44 41 54 41 22 52 24 22 31 32 2E 20 D3 48 4F | DATA"R$"12. .HO|
000002E0: 57 20 C4 CD 20 46 49 4C 45 53 20 28 C4 49 53 4B |W .. FILES (.ISK|
000002F0: 20 4F 4E 4C 59 29 22 52 24 22 11 90 31 33 2E 20 | ONLY)"R$"..13. |
00000300: C5 4E 44 22 2C 00 2F 0B 4B 00 99 2C 22 12 1C 9D |.ND",./.K..,"...|
00000310: CF 50 54 49 4F 4E 3F 92 22 3B 3A 58 31 B2 32 38 |.PTION?.";:X1.28|
00000320: 3A 59 B2 32 33 3A 58 32 B2 32 3A 8D 33 35 30 00 |:Y.23:X2.2:.350.|
00000330: 73 0B 50 00 91 58 30 89 31 30 30 2C 32 30 30 2C |s.P..X0.100,200,|
00000340: 33 30 30 2C 34 30 30 2C 35 30 30 2C 37 30 30 2C |300,400,500,700,|
00000350: 38 30 30 2C 39 30 30 2C 31 32 30 30 2C 31 30 30 |800,900,1200,100|
00000360: 30 2C 31 31 30 30 2C 36 30 30 2C 31 33 30 30 3A |0,1100,600,1300:|
00000370: 89 33 30 00 AC 0B 52 00 99 22 13 11 11 11 11 11 |.30...R.."......|
00000380: 11 11 22 2C 22 12 9C D4 92 41 50 45 20 4F 52 20 |..","....APE OR |
00000390: 12 C4 92 49 53 4B 3F 22 3A 58 32 B2 31 3A 59 B2 |...ISK?":X2.1:Y.|
000003A0: 37 3A 58 31 B2 32 35 3A 8D 31 35 30 00 D5 0B 53 |7:X1.25:.150...S|
000003B0: 00 8B 58 24 B2 22 22 B0 58 24 B2 22 44 22 B0 58 |..X$."".X$."D".X|
000003C0: 24 B2 22 C4 22 B0 58 24 B2 22 54 22 B0 58 24 B2 |$.".".X$."T".X$.|
000003D0: 22 D4 22 A7 8E 00 DD 0B 54 00 89 38 32 00 13 0C |".".....T..82...|
000003E0: 55 00 99 2C 22 11 1F C5 4E 54 45 52 20 46 49 4C |U..,"...NTER FIL|
000003F0: 45 20 4E 41 4D 45 2E 22 3A 58 32 B2 31 35 3A 59 |E NAME.":X2.15:Y|
00000400: B2 34 3A 58 31 B2 31 30 3A 8D 31 35 30 3A 49 24 |.4:X1.10:.150:I$|
00000410: B2 58 24 00 2F 0C 57 00 8B C8 28 58 24 2C 31 29 |.X$./.W...(X$,1)|
00000420: B2 22 27 22 A7 49 24 B2 CA 28 58 24 2C 32 29 00 |."'".I$..(X$,2).|
00000430: 35 0C 58 00 8E 00 54 0C 5A 00 99 2C 22 11 1F D0 |5.X...T.Z..,"...|
00000440: 52 45 53 53 20 41 20 4B 45 59 20 54 4F 20 47 4F |RESS A KEY TO GO|
00000450: 20 4F 4E 2E 00 6B 0C 5C 00 A1 49 24 3A 91 AB 28 | ON..k.\..I$:..(|
00000460: 49 24 B2 22 22 29 89 39 32 3A 8E 00 9F 0C 5D 00 |I$."").92:....].|
00000470: 99 C8 28 59 24 2C 59 AA 31 29 A3 58 31 29 22 90 |..(Y$,Y.1).X1)".|
00000480: 22 C8 28 4C 24 2C 58 32 29 C8 28 53 24 2C 58 32 |".(L$,X2).(S$,X2|
00000490: 29 3B 3A 58 24 B2 22 22 3A 58 30 B2 30 3A 8E 00 |);:X$."":X0.0:..|
000004A0: B0 0C 5F 00 81 58 B2 30 A4 33 45 33 3A 82 3A 8E |.._..X.0.3E3:.:.|
000004B0: 00 ED 0C 64 00 58 32 B2 31 35 3A 59 B2 34 3A 58 |...d.X2.15:Y.4:X|
000004C0: 31 B2 31 3A 8B 41 B1 39 A7 99 3A 99 22 93 11 11 |1.1:.A.9..:."...|
000004D0: 12 1C 22 2C 22 CD 41 58 49 4D 55 4D 20 31 30 20 |..",".AXIMUM 10 |
000004E0: 52 45 41 43 48 45 44 2E 22 3A 89 32 35 00 21 0D |REACHED.":.25.!.|
000004F0: 69 00 99 22 93 11 9C 20 C5 4E 54 45 52 20 41 4C |i.."... .NTER AL|
00000500: 54 45 52 4E 41 54 49 56 45 20 23 22 41 AA 31 22 |TERNATIVE #"A.1"|
00000510: 1F 22 3A 8D 31 35 30 3A 8B 58 24 B2 22 22 89 33 |.":.150:.X$."".3|
00000520: 30 00 39 0D 6E 00 41 B2 41 AA 31 3A 41 24 28 41 |0.9.n.A.A.1:A$(A|
00000530: 29 B2 58 24 3A 89 31 30 30 00 41 0D 96 00 8D 39 |).X$:.100.A....9|
00000540: 33 00 4D 0D 97 00 99 22 1F A6 9D 22 3B 00 6F 0D |3.M...."...";.o.|
00000550: 98 00 8D 39 32 3A 49 B2 C6 28 49 24 29 3A 58 B2 |...92:I..(I$):X.|
00000560: 49 AF 31 32 37 3A 8B 49 B2 31 33 89 33 36 35 00 |I.127:.I.13.365.|
00000570: A3 0D 9A 00 8B 28 49 B2 34 34 B0 49 B2 34 32 B0 |.....(I.44.I.42.|
00000580: 49 B2 35 38 B0 49 B2 33 34 B0 49 B2 32 39 B0 58 |I.58.I.34.I.29.X|
00000590: B3 33 32 B0 58 B1 39 36 29 AF 49 B3 B1 32 30 89 |.32.X.96).I..20.|
000005A0: 31 35 32 00 B2 0D 9B 00 8B 49 B3 B1 32 30 89 31 |152......I..20.1|
000005B0: 36 30 00 C1 0D 9C 00 8B 58 24 B2 22 22 89 31 35 |60......X$."".15|
000005C0: 32 00 DC 0D 9D 00 8B C3 28 58 24 29 B2 58 32 A7 |2.......(X$).X2.|
000005D0: 99 22 20 9D 9D 22 3B 3A 89 31 35 39 00 E9 0D 9E |." ..";:.159....|
000005E0: 00 99 22 90 A4 9D 9D 22 3B 00 03 0E 9F 00 58 24 |.."....";.....X$|
000005F0: B2 C8 28 58 24 2C C3 28 58 24 29 AB 31 29 3A 89 |..(X$,.(X$).1):.|
00000600: 31 35 31 00 1F 0E A0 00 8B C3 28 58 24 29 B3 58 |151.......(X$).X|
00000610: 32 A7 58 24 B2 58 24 AA 49 24 3A 99 49 24 3B 00 |2.X$.X$.I$:.I$;.|
00000620: 28 0E A1 00 89 31 35 31 00 38 0E C8 00 45 B2 31 |(....151.8...E.1|
00000630: 3A 8B 41 B3 31 89 33 30 00 7F 0E CD 00 99 22 93 |:.A.1.30......".|
00000640: 11 20 C1 4C 54 45 52 4E 41 54 49 56 45 20 23 22 |. .LTERNATIVE #"|
00000650: 45 3B 52 24 52 24 41 24 28 45 29 52 24 43 24 3B |E;R$R$A$(E)R$C$;|
00000660: 3A 58 31 B2 31 39 3A 59 B2 35 3A 58 32 B2 31 3A |:X1.19:Y.5:X2.1:|
00000670: 8D 31 35 30 3A 8B 58 24 B2 22 45 22 89 33 30 00 |.150:.X$."E".30.|
00000680: B6 0E D2 00 58 31 B2 31 3A 8B 58 24 B2 22 43 22 |....X1.1:.X$."C"|
00000690: A7 99 52 24 22 11 20 C3 48 41 4E 47 45 20 54 4F |..R$". .HANGE TO|
000006A0: 3F 22 3A 59 B2 39 3A 58 31 B2 30 3A 58 32 B2 31 |?":Y.9:X1.0:X2.1|
000006B0: 35 3A 8D 31 35 30 00 E8 0E D7 00 8B 58 31 B2 30 |5:.150......X1.0|
000006C0: AF 58 24 B2 22 22 A7 99 52 24 2C 22 11 1C CE 4F |.X$.""..R$,"...O|
000006D0: 20 43 48 41 4E 47 45 20 4D 41 44 45 2E 1F 22 3A | CHANGE MADE..":|
000006E0: 8D 39 35 3A 89 32 39 30 00 00 0F DC 00 8B 58 31 |.95:.290......X1|
000006F0: B2 30 A7 41 24 28 45 29 B2 58 24 3A 89 32 39 30 |.0.A$(E).X$:.290|
00000700: 00 11 0F E6 00 8B 58 24 B3 B1 22 44 22 89 32 39 |......X$.."D".29|
00000710: 30 00 30 0F EB 00 99 52 24 22 11 1C 20 C4 C5 CC |0.0....R$".. ...|
00000720: C5 D4 C9 CE C7 1F 22 3A 8B 45 B2 41 89 32 34 35 |......":.E.A.245|
00000730: 00 69 0F F0 00 81 49 B2 45 A4 41 AB 31 3A 41 24 |.i....I.E.A.1:A$|
00000740: 28 49 29 B2 41 24 28 49 AA 31 29 3A 81 58 B2 30 |(I).A$(I.1):.X.0|
00000750: A4 31 30 3A 4D 25 28 49 2C 58 29 B2 4D 25 28 49 |.10:M%(I,X).M%(I|
00000760: AA 31 2C 58 29 3A 82 3A 82 00 81 0F F2 00 81 58 |.1,X):.:.......X|
00000770: B2 30 A4 31 30 3A 4D 25 28 49 2C 58 29 B2 30 3A |.0.10:M%(I,X).0:|
00000780: 82 00 91 0F F5 00 41 B2 41 AB 31 3A 45 B2 45 AB |......A.A.1:E.E.|
00000790: 31 00 AC 0F 22 01 45 B2 45 AA 31 3A 91 AB 28 45 |1...".E.E.1:..(E|
000007A0: B3 B2 41 29 89 32 30 35 3A 89 33 30 00 D5 0F 2C |..A).205:.30...,|
000007B0: 01 91 AB 28 41 B3 31 29 89 33 30 3A 99 22 93 11 |...(A.1).30:."..|
000007C0: 11 11 22 2C 22 1E C1 4C 54 45 52 4E 41 54 49 56 |..","..LTERNATIV|
000007D0: 45 53 3A 11 22 00 FD 0F 36 01 81 49 B2 31 A4 41 |ES:."...6..I.1.A|
000007E0: 3A 99 2C 22 90 22 49 22 9C 22 A3 31 35 29 41 24 |:.,"."I".".15)A$|
000007F0: 28 49 29 3A 82 3A 8D 39 30 3A 89 33 30 00 05 10 |(I):.:.90:.30...|
00000800: 5E 01 8D 39 33 00 11 10 5F 01 99 22 1F A6 9D 22 |^..93..._.."..."|
00000810: 3B 00 2B 10 60 01 8D 39 32 3A 49 B2 C6 28 49 24 |;.+.`..92:I..(I$|
00000820: 29 3A 8B 49 B2 31 33 89 33 36 35 00 4C 10 62 01 |):.I.13.365.L.b.|
00000830: 8B 28 49 B3 34 38 B0 49 B1 35 37 29 AF 49 B3 B1 |.(I.48.I.57).I..|
00000840: 34 33 AF 49 B3 B1 32 30 89 33 35 32 00 5B 10 63 |43.I..20.352.[.c|
00000850: 01 8B 49 B3 B1 32 30 89 33 36 30 00 6A 10 64 01 |..I..20.360.j.d.|
00000860: 8B 58 24 B2 22 22 89 33 35 32 00 85 10 65 01 8B |.X$."".352...e..|
00000870: C3 28 58 24 29 B2 58 32 A7 99 22 20 9D 9D 22 3B |.(X$).X2.." ..";|
00000880: 3A 89 33 35 39 00 92 10 66 01 99 22 90 A4 9D 9D |:.359...f.."....|
00000890: 22 3B 00 AC 10 67 01 58 24 B2 C8 28 58 24 2C C3 |";...g.X$..(X$,.|
000008A0: 28 58 24 29 AB 31 29 3A 89 33 35 31 00 C8 10 68 |(X$).1):.351...h|
000008B0: 01 8B C3 28 58 24 29 B3 58 32 A7 58 24 B2 58 24 |...(X$).X2.X$.X$|
000008C0: AA 49 24 3A 99 49 24 3B 00 D1 10 69 01 89 33 35 |.I$:.I$;...i..35|
000008D0: 31 00 F3 10 6D 01 99 C8 28 42 24 2C 58 32 AB C3 |1...m...(B$,X2..|
000008E0: 28 58 24 29 AA 31 29 3B 3A 58 30 B2 C5 28 58 24 |(X$).1);:X0..(X$|
000008F0: 29 3A 8E 00 30 11 90 01 58 32 B2 31 35 3A 59 B2 |):..0...X2.15:Y.|
00000900: 35 3A 58 31 B2 31 3A 8B 46 B1 39 A7 99 3A 99 22 |5:X1.1:.F.9..:."|
00000910: 93 11 11 12 1C 22 2C 22 CD 41 58 49 4D 55 4D 20 |.....",".AXIMUM |
00000920: 31 31 20 52 45 41 43 48 45 44 2E 22 3A 89 32 35 |11 REACHED.":.25|
00000930: 00 5F 11 95 01 99 22 93 11 9C 20 C5 4E 54 45 52 |._...."... .NTER|
00000940: 20 46 41 43 54 4F 52 20 23 22 46 AA 32 22 1F 22 | FACTOR #"F.2"."|
00000950: 3A 8D 31 35 30 3A 8B 58 24 B2 22 22 89 33 30 00 |:.150:.X$."".30.|
00000960: 77 11 9A 01 46 B2 46 AA 31 3A 46 24 28 46 29 B2 |w...F.F.1:F$(F).|
00000970: 58 24 3A 89 34 30 30 00 87 11 F4 01 45 B2 30 3A |X$:.400.....E.0:|
00000980: 8B 46 B3 30 89 33 30 00 CB 11 F9 01 99 22 93 11 |.F.0.30......"..|
00000990: 20 C6 41 43 54 4F 52 20 23 22 45 AA 31 3B 52 24 | .ACTOR #"E.1;R$|
000009A0: 52 24 46 24 28 45 29 52 24 43 24 3B 3A 58 31 B2 |R$F$(E)R$C$;:X1.|
000009B0: 31 39 3A 59 B2 35 3A 58 32 B2 31 3A 8D 31 35 30 |19:Y.5:X2.1:.150|
000009C0: 3A 8B 58 24 B2 22 45 22 89 33 30 00 02 12 FE 01 |:.X$."E".30.....|
000009D0: 58 31 B2 31 3A 8B 58 24 B2 22 43 22 A7 99 52 24 |X1.1:.X$."C"..R$|
000009E0: 22 11 20 C3 48 41 4E 47 45 20 54 4F 3F 22 3A 59 |". .HANGE TO?":Y|
000009F0: B2 39 3A 58 31 B2 30 3A 58 32 B2 31 35 3A 8D 31 |.9:X1.0:X2.15:.1|
00000A00: 35 30 00 34 12 03 02 8B 58 31 B2 30 AF 58 24 B2 |50.4....X1.0.X$.|
00000A10: 22 22 A7 99 52 24 2C 22 11 1C CE 4F 20 43 48 41 |""..R$,"...O CHA|
00000A20: 4E 47 45 20 4D 41 44 45 2E 1F 22 3A 8D 39 35 3A |NGE MADE..":.95:|
00000A30: 89 35 39 30 00 4C 12 08 02 8B 58 31 B2 30 A7 46 |.590.L....X1.0.F|
00000A40: 24 28 45 29 B2 58 24 3A 89 35 39 30 00 5D 12 12 |$(E).X$:.590.]..|
00000A50: 02 8B 58 24 B3 B1 22 44 22 89 35 39 30 00 7C 12 |..X$.."D".590.|.|
00000A60: 17 02 99 52 24 22 11 1C 20 C4 C5 CC C5 D4 C9 CE |...R$".. .......|
00000A70: C7 1F 22 3A 8B 45 B2 46 89 35 34 35 00 B5 12 1C |..":.E.F.545....|
00000A80: 02 81 49 B2 45 A4 46 AB 31 3A 46 24 28 49 29 B2 |..I.E.F.1:F$(I).|
00000A90: 46 24 28 49 AA 31 29 3A 81 58 B2 30 A4 31 30 3A |F$(I.1):.X.0.10:|
00000AA0: 4D 25 28 58 2C 49 29 B2 4D 25 28 58 2C 49 AA 31 |M%(X,I).M%(X,I.1|
00000AB0: 29 3A 82 3A 82 00 CD 12 1E 02 81 58 B2 30 A4 31 |):.:.......X.0.1|
00000AC0: 30 3A 4D 25 28 58 2C 49 29 B2 30 3A 82 00 DD 12 |0:M%(X,I).0:....|
00000AD0: 21 02 46 B2 46 AB 31 3A 45 B2 45 AB 31 00 F8 12 |!.F.F.1:E.E.1...|
00000AE0: 4E 02 45 B2 45 AA 31 3A 91 AB 28 45 B3 B2 46 29 |N.E.E.1:..(E..F)|
00000AF0: 89 35 30 35 3A 89 33 30 00 32 13 58 02 A0 35 3A |.505:.30.2.X..5:|
00000B00: 9F 35 2C 38 2C 31 35 3A A0 35 3A 8B 53 54 A7 99 |.5,8,15:.5:.ST..|
00000B10: 22 93 11 11 11 11 11 11 1C 12 22 2C 22 CE 4F 20 |".........",".O |
00000B20: 44 49 53 4B 20 4F 4E 20 4C 49 4E 45 2E 22 3A 89 |DISK ON LINE.":.|
00000B30: 32 35 00 69 13 5A 02 A0 35 3A 9F 35 2C 38 2C 31 |25.i.Z..5:.5,8,1|
00000B40: 35 2C 22 49 22 3A 99 22 93 11 22 2C 22 12 1E 20 |5,"I":."..",".. |
00000B50: C4 C5 C3 C9 D3 C9 CF CE 20 CD C1 CB C5 D2 20 C6 |........ ..... .|
00000B60: C9 CC C5 D3 20 92 9C 11 22 00 7F 13 5B 02 9F 32 |.... ..."...[..2|
00000B70: 2C 38 2C 30 2C 22 24 22 AA 44 24 AA 22 2A 22 00 |,8,0,"$".D$."*".|
00000B80: 8D 13 5C 02 A1 23 32 2C 49 24 2C 49 24 00 B3 13 |..\..#2,I$,I$...|
00000B90: 62 02 A1 23 32 2C 58 24 2C 49 24 3A 8B 58 24 B2 |b..#2,X$,I$:.X$.|
00000BA0: 22 22 AF 49 24 B2 22 22 A7 A0 32 3A 8D 39 30 3A |"".I$.""..2:.90:|
00000BB0: 89 33 30 00 E9 13 6C 02 A1 23 32 2C 58 24 2C 49 |.30...l..#2,X$,I|
00000BC0: 24 3A 99 2C CA 28 C4 28 C6 28 58 24 AA C7 28 30 |$:.,.(.(.(X$..(0|
00000BD0: 29 29 AA 32 35 36 AC C6 28 49 24 AA C7 28 30 29 |)).256..(I$..(0)|
00000BE0: 29 29 2C 32 29 22 20 22 3B 00 0A 14 76 02 81 58 |)),2)" ";...v..X|
00000BF0: B2 31 A4 31 39 3A A1 23 32 2C 49 24 3A 8B 49 24 |.1.19:.#2,I$:.I$|
00000C00: B3 B1 22 27 22 A7 99 49 24 3B 00 12 14 7B 02 82 |.."'"..I$;...{..|
00000C10: 3A 99 00 29 14 80 02 A1 23 32 2C 49 24 3A 8B 49 |:..)....#2,I$:.I|
00000C20: 24 B3 B1 22 22 89 36 34 30 00 3E 14 8A 02 A1 49 |$.."".640.>....I|
00000C30: 24 3A 8B 49 24 B3 B1 22 20 22 89 36 31 30 00 53 |$:.I$.." ".610.S|
00000C40: 14 94 02 A1 49 24 3A 8B 49 24 B3 B1 22 20 22 89 |....I$:.I$.." ".|
00000C50: 36 36 30 00 5C 14 B2 02 89 36 31 30 00 92 14 BC |660.\....610....|
00000C60: 02 91 46 AA 32 89 33 30 3A 99 22 93 90 11 20 20 |..F.2.30:."... |
00000C70: 20 20 20 C6 41 43 54 4F 52 22 A3 32 34 29 22 C9 | .ACTOR".24)".|
00000C80: 4D 50 4F 52 54 41 4E 43 45 11 22 3A 81 49 B2 30 |MPORTANCE.":.I.0|
00000C90: A4 46 00 BC 14 D0 02 99 22 1E 22 49 AA 31 22 9C |.F......"."I.1".|
00000CA0: 20 22 A3 35 29 46 24 28 49 29 A3 32 35 29 22 1F | ".5)F$(I).25)".|
00000CB0: 22 4D 25 28 30 2C 49 29 3A 82 3A 99 00 F7 14 DA |"M%(0,I):.:.....|
00000CC0: 02 99 22 11 20 C6 41 43 54 4F 52 20 4E 55 4D 42 |..". .ACTOR NUMB|
00000CD0: 45 52 3A 22 3A 59 B2 46 AA 36 3A 58 31 B2 31 37 |ER:":Y.F.6:X1.17|
00000CE0: 3A 58 32 B2 31 AB 28 46 B1 38 29 3A 8D 33 35 30 |:X2.1.(F.8):.350|
00000CF0: 3A 45 B2 58 30 AB 31 00 08 15 DC 02 8B 45 B3 30 |:E.X0.1......E.0|
00000D00: B0 45 B1 46 89 37 35 30 00 2F 15 E4 02 99 52 24 |.E.F.750./....R$|
00000D10: 22 11 20 C9 4D 50 4F 52 54 41 4E 43 45 3A 22 3A |". .MPORTANCE:":|
00000D20: 59 B2 59 AA 32 3A 58 32 B2 33 3A 8D 33 35 30 00 |Y.Y.2:X2.3:.350.|
00000D30: 4D 15 E6 02 8B 58 30 B3 30 B0 58 30 B1 31 30 30 |M....X0.0.X0.100|
00000D40: A7 99 22 91 91 91 91 22 3A 89 37 33 30 00 61 15 |.."....":.730.a.|
00000D50: E9 02 4D 25 28 30 2C 45 29 B2 58 30 3A 89 37 30 |..M%(0,E).X0:.70|
00000D60: 30 00 81 15 EE 02 45 B2 31 3A 81 49 B2 30 A4 46 |0.....E.1:.I.0.F|
00000D70: 3A 8B 4D 25 28 30 2C 49 29 B2 31 30 30 A7 45 B2 |:.M%(0,I).100.E.|
00000D80: 30 00 C1 15 F8 02 82 3A 8B 45 A7 99 3A 99 22 11 |0......:.E..:.".|
00000D90: 1C C1 54 20 4C 45 41 53 54 20 4F 4E 45 20 46 41 |..T LEAST ONE FA|
00000DA0: 43 54 4F 52 20 4D 55 53 54 20 42 45 20 52 41 54 |CTOR MUST BE RAT|
00000DB0: 45 44 20 31 30 30 2E 22 3A 8D 39 35 3A 89 37 30 |ED 100.":.95:.70|
00000DC0: 30 00 C9 15 16 03 89 33 30 00 E3 15 20 03 91 AB |0......30... ...|
00000DD0: 28 41 B3 31 B0 46 B3 31 29 89 33 30 3A 81 45 B2 |(A.1.F.1).30:.E.|
00000DE0: 30 A4 46 00 25 16 25 03 99 22 93 1F 11 20 20 D3 |0.F.%.%.."... .|
00000DF0: 43 4F 52 45 20 54 48 45 20 41 4C 54 45 52 4E 41 |CORE THE ALTERNA|
00000E00: 54 49 56 45 53 20 57 49 54 48 20 52 45 47 41 52 |TIVES WITH REGAR|
00000E10: 44 20 54 4F 22 52 24 22 1C 12 22 2C 46 24 28 45 |D TO"R$"..",F$(E|
00000E20: 29 22 2E 11 22 00 51 16 2A 03 81 58 B2 31 A4 41 |)"..".Q.*..X.1.A|
00000E30: 3A 99 22 1E 22 58 22 9C 22 A3 35 29 41 24 28 58 |:."."X".".5)A$(X|
00000E40: 29 A3 32 35 29 22 1F 22 4D 25 28 58 2C 45 29 3A |).25)"."M%(X,E):|
00000E50: 82 00 97 16 2F 03 99 22 11 20 C1 4C 54 45 52 4E |..../..". .LTERN|
00000E60: 41 54 49 56 45 20 23 3A 22 3A 59 B2 41 AA 35 3A |ATIVE #:":Y.A.5:|
00000E70: 58 31 B2 31 37 3A 58 32 B2 31 AB 28 41 B1 39 29 |X1.17:X2.1.(A.9)|
00000E80: 3A 8D 33 35 30 3A 58 B2 58 30 3A 8B 58 B3 31 B0 |:.350:X.X0:.X.1.|
00000E90: 58 B1 41 89 38 33 35 00 D2 16 39 03 99 52 24 22 |X.A.835...9..R$"|
00000EA0: 11 20 D3 43 4F 52 45 3A 22 3A 59 B2 59 AA 32 3A |. .CORE:":Y.Y.2:|
00000EB0: 58 32 B2 33 3A 8D 33 35 30 3A 8B 58 30 B1 30 AF |X2.3:.350:.X0.0.|
00000EC0: 58 30 B3 B2 31 30 30 A7 4D 25 28 58 2C 45 29 B2 |X0..100.M%(X,E).|
00000ED0: 58 30 00 DB 16 3E 03 89 38 30 35 00 E5 16 43 03 |X0...>..805...C.|
00000EE0: 82 3A 89 33 30 00 1A 17 84 03 91 AB 28 41 B3 32 |.:.30.......(A.2|
00000EF0: B0 46 B3 31 29 89 33 30 3A 99 22 93 11 11 11 11 |.F.1).30:.".....|
00000F00: 11 11 11 11 11 11 22 A3 31 34 29 22 1E C3 4F 4D |......".14)"..OM|
00000F10: 50 55 54 49 4E 47 2E 2E 2E 22 00 49 17 89 03 8D |PUTING...".I....|
00000F20: 39 37 30 3A 91 45 AA 31 89 32 35 3A 99 22 93 22 |970:.E.1.25:."."|
00000F30: 2C 22 11 11 11 1C C4 45 43 49 53 49 4F 4E 20 52 |,".....ECISION R|
00000F40: 45 53 55 4C 54 3A 11 11 22 00 76 17 8E 03 81 58 |ESULT:..".v....X|
00000F50: B2 31 A4 41 3A 99 2C 22 1E 22 41 24 28 5A 28 58 |.1.A:.,"."A$(Z(X|
00000F60: 29 29 A3 32 36 29 22 90 22 B5 28 56 28 5A 28 58 |)).26)".".(V(Z(X|
00000F70: 29 29 AA 2E 35 29 00 84 17 98 03 82 3A 8D 39 30 |))..5)......:.90|
00000F80: 3A 89 33 30 00 C3 17 CA 03 58 24 B2 22 1C 11 11 |:.30.....X$."...|
00000F90: 20 20 20 C3 41 4E 27 54 20 43 4F 4D 50 55 54 45 | .AN'T COMPUTE|
00000FA0: 21 11 22 3A 45 B2 30 3A 81 49 B2 30 A4 46 3A 45 |!.":E.0:.I.0.F:E|
00000FB0: B2 45 AA 4D 25 28 30 2C 49 29 3A 82 3A 8B 45 89 |.E.M%(0,I):.:.E.|
00000FC0: 39 37 32 00 F2 17 CB 03 99 2C 58 24 52 24 22 20 |972......,X$R$" |
00000FD0: 20 20 20 20 20 20 C6 41 43 54 4F 52 20 52 41 54 | .ACTOR RAT|
00000FE0: 49 4E 47 53 20 41 52 45 20 41 4C 4C 20 30 2E 22 |INGS ARE ALL 0."|
00000FF0: 3A 8E 00 14 18 CC 03 81 49 B2 30 A4 46 3A 4E 28 |:.......I.0.F:N(|
00001000: 30 2C 49 29 B2 31 30 30 AC 4D 25 28 30 2C 49 29 |0,I).100.M%(0,I)|
00001010: AD 45 3A 82 00 3F 18 CD 03 81 49 B2 30 A4 46 3A |.E:..?....I.0.F:|
00001020: 45 B2 30 3A 81 58 B2 31 A4 41 3A 45 B2 45 AA 4D |E.0:.X.1.A:E.E.M|
00001030: 25 28 58 2C 49 29 3A 82 3A 8B 45 89 39 37 36 00 |%(X,I):.:.E.976.|
00001040: 6D 18 CE 03 99 2C 58 24 52 24 22 20 20 D3 43 4F |m....,X$R$" .CO|
00001050: 52 45 53 20 46 4F 52 20 90 22 46 24 28 49 29 22 |RES FOR ."F$(I)"|
00001060: 1C 20 41 52 45 20 41 4C 4C 20 30 2E 22 00 79 18 |. ARE ALL 0.".y.|
00001070: CF 03 49 B2 46 3A 82 3A 8E 00 9D 18 D0 03 81 58 |..I.F:.:.......X|
00001080: B2 31 A4 41 3A 4E 28 58 2C 49 29 B2 31 30 30 AC |.1.A:N(X,I).100.|
00001090: 4D 25 28 58 2C 49 29 AD 45 3A 82 3A 82 00 D2 18 |M%(X,I).E:.:....|
000010A0: D1 03 81 58 B2 31 A4 41 3A 56 28 58 29 B2 30 3A |...X.1.A:V(X).0:|
000010B0: 81 49 B2 30 A4 46 3A 56 28 58 29 B2 56 28 58 29 |.I.0.F:V(X).V(X)|
000010C0: AA 4E 28 58 2C 49 29 AC 4E 28 30 2C 49 29 3A 82 |.N(X,I).N(0,I):.|
000010D0: 3A 82 00 0A 19 D2 03 81 49 B2 31 A4 31 30 3A 5A |:.......I.1.10:Z|
000010E0: 28 49 29 B2 49 3A 82 3A 81 58 B2 31 A4 31 30 3A |(I).I:.:.X.1.10:|
000010F0: 81 49 B2 31 A4 41 AB 31 3A 58 31 B2 5A 28 49 29 |.I.1.A.1:X1.Z(I)|
00001100: 3A 58 32 B2 5A 28 49 AA 31 29 00 2E 19 D3 03 8B |:X2.Z(I.1)......|
00001110: 56 28 58 31 29 B3 B2 56 28 58 32 29 A7 5A 28 49 |V(X1)..V(X2).Z(I|
00001120: AA 31 29 B2 58 31 3A 5A 28 49 29 B2 58 32 00 5B |.1).X1:Z(I).X2.[|
00001130: 19 D4 03 82 3A 82 3A 49 B2 31 30 30 AD 56 28 5A |....:.:I.100.V(Z|
00001140: 28 31 29 29 3A 81 45 B2 31 A4 41 3A 56 28 45 29 |(1)):.E.1.A:V(E)|
00001150: B2 49 AC 56 28 45 29 3A 82 3A 8E 00 99 19 E8 03 |.I.V(E):.:......|
00001160: 91 AB 28 41 B3 31 B0 46 B3 31 29 89 33 30 3A 99 |..(A.1.F.1).30:.|
00001170: 22 93 9A 22 2C 22 20 20 20 12 D3 D4 CF D2 C5 20 |".."," ...... |
00001180: C4 C1 D4 C1 22 3A 8D 38 35 3A 4A 24 B2 49 24 3A |....":.85:J$.I$:|
00001190: 8B 49 24 B2 22 22 89 33 30 00 AB 19 EA 03 8D 38 |.I$."".30......8|
000011A0: 32 3A 8B 58 24 B2 22 22 89 33 30 00 C3 19 EB 03 |2:.X$."".30.....|
000011B0: 8B 58 24 B2 22 44 22 B0 58 24 B2 22 C4 22 A7 31 |.X$."D".X$.".".1|
000011C0: 30 30 39 00 D9 19 EC 03 99 3A 9F 31 2C 31 2C 31 |009......:.1,1,1|
000011D0: 2C 4A 24 3A 89 31 30 33 30 00 11 1A F1 03 9F 31 |,J$:.1030......1|
000011E0: 2C 38 2C 31 35 3A A0 31 3A 8B 53 54 A7 99 22 93 |,8,15:.1:.ST..".|
000011F0: 11 11 11 11 11 11 11 1C 12 22 2C 22 CE 4F 20 44 |.........",".O D|
00001200: 49 53 4B 20 4F 4E 20 4C 49 4E 45 2E 22 3A 89 32 |ISK ON LINE.":.2|
00001210: 35 00 4A 1A F2 03 A0 35 3A 9F 35 2C 38 2C 31 35 |5.J....5:.5,8,15|
00001220: 2C 22 49 22 3A 9F 31 2C 38 2C 38 2C 44 24 AA 4A |,"I":.1,8,8,D$.J|
00001230: 24 AA 22 2C 53 2C 57 22 3A 84 35 2C 58 2C 58 24 |$.",S,W":.5,X,X$|
00001240: 3A 8B 58 B2 30 89 31 30 33 30 00 79 1A FC 03 A0 |:.X.0.1030.y....|
00001250: 31 3A 99 52 24 2C 22 11 12 1C 22 58 24 3A 8B 58 |1:.R$,"..."X$:.X|
00001260: B3 B1 36 33 A7 98 35 2C 22 53 22 44 24 4A 24 3A |..63..5,"S"D$J$:|
00001270: 8D 39 30 3A 89 31 30 30 30 00 B4 1A 01 04 99 2C |.90:.1000......,|
00001280: 22 11 D2 45 50 4C 41 43 45 3F 20 28 59 2F 4E 29 |"..EPLACE? (Y/N)|
00001290: 22 3A 59 B2 31 31 3A 58 31 B2 32 35 3A 58 32 B2 |":Y.11:X1.25:X2.|
000012A0: 31 3A 8D 31 35 30 3A 8B 58 24 B3 B1 22 59 22 89 |1:.150:.X$.."Y".|
000012B0: 31 30 30 30 00 C9 1A 03 04 98 35 2C 22 53 22 44 |1000......5,"S"D|
000012C0: 24 4A 24 3A 89 31 30 31 30 00 E9 1A 06 04 99 3A |$J$:.1010......:|
000012D0: 99 2C 22 11 90 D3 54 4F 52 49 4E 47 20 22 4A 24 |.,"...TORING "J$|
000012E0: 3A 4A 24 B2 C7 28 33 34 29 00 22 1B 0B 04 98 31 |:J$..(34)."....1|
000012F0: 2C 41 22 2C 22 46 3A 81 58 B2 31 A4 41 3A 98 31 |,A","F:.X.1.A:.1|
00001300: 2C 4A 24 41 24 28 58 29 4A 24 3A 82 3A 81 58 B2 |,J$A$(X)J$:.:.X.|
00001310: 30 A4 46 3A 98 31 2C 4A 24 46 24 28 58 29 4A 24 |0.F:.1,J$F$(X)J$|
00001320: 3A 82 00 4C 1B 10 04 81 58 B2 30 A4 31 30 3A 81 |:..L....X.0.10:.|
00001330: 49 B2 30 A4 31 30 3A 98 31 2C 4D 25 28 58 2C 49 |I.0.10:.1,M%(X,I|
00001340: 29 3A 82 3A 82 3A A0 31 3A 89 33 30 00 7E 1B 4C |):.:.:.1:.30.~.L|
00001350: 04 99 22 93 97 22 2C 22 20 20 20 20 12 D2 C5 C3 |..".."," ....|
00001360: C1 CC CC 20 C4 C1 D4 C1 22 3A 8D 38 35 3A 46 49 |... ....":.85:FI|
00001370: 24 B2 49 24 3A 8B 49 24 B2 22 22 89 33 30 00 90 |$.I$:.I$."".30..|
00001380: 1B 4E 04 8D 38 32 3A 8B 58 24 B2 22 22 89 33 30 |.N..82:.X$."".30|
00001390: 00 A8 1B 4F 04 8B 58 24 B2 22 44 22 B0 58 24 B2 |...O..X$."D".X$.|
000013A0: 22 C4 22 A7 31 31 30 39 00 BD 1B 50 04 9F 31 2C |".".1109...P..1,|
000013B0: 31 2C 30 2C 46 49 24 3A 89 31 31 33 30 00 F5 1B |1,0,FI$:.1130...|
000013C0: 55 04 9F 31 2C 38 2C 31 35 3A A0 31 3A 8B 53 54 |U..1,8,15:.1:.ST|
000013D0: A7 99 22 93 11 11 11 11 11 11 11 1C 12 22 2C 22 |.."..........","|
000013E0: CE 4F 20 44 49 53 4B 20 4F 4E 20 4C 49 4E 45 2E |.O DISK ON LINE.|
000013F0: 22 3A 89 32 35 00 2F 1C 56 04 A0 35 3A 9F 35 2C |":.25./.V..5:.5,|
00001400: 38 2C 31 35 2C 22 49 22 3A 9F 31 2C 38 2C 38 2C |8,15,"I":.1,8,8,|
00001410: 44 24 AA 46 49 24 AA 22 2C 53 2C 52 22 3A 84 35 |D$.FI$.",S,R":.5|
00001420: 2C 58 2C 58 24 3A 8B 58 B2 30 89 31 31 33 30 00 |,X,X$:.X.0.1130.|
00001430: 4C 1C 60 04 99 52 24 22 11 12 1C 22 2C 58 24 3A |L.`..R$"...",X$:|
00001440: A0 31 3A 8D 39 30 3A 89 31 31 30 30 00 66 1C 6A |.1:.90:.1100.f.j|
00001450: 04 99 3A 99 2C 22 11 90 D2 45 43 41 4C 4C 49 4E |..:.,"...ECALLIN|
00001460: 47 20 22 46 49 24 00 95 1C 6F 04 84 31 2C 41 2C |G "FI$...o..1,A,|
00001470: 46 3A 81 58 B2 31 A4 41 3A 84 31 2C 41 24 28 58 |F:.X.1.A:.1,A$(X|
00001480: 29 3A 82 3A 81 58 B2 30 A4 46 3A 84 31 2C 46 24 |):.:.X.0.F:.1,F$|
00001490: 28 58 29 3A 82 00 BF 1C 74 04 81 58 B2 30 A4 31 |(X):....t..X.0.1|
000014A0: 30 3A 81 49 B2 30 A4 31 30 3A 84 31 2C 4D 25 28 |0:.I.0.10:.1,M%(|
000014B0: 58 2C 49 29 3A 82 3A 82 3A A0 31 3A 89 33 30 00 |X,I):.:.:.1:.30.|
000014C0: CF 1C B0 04 8B 41 B3 32 B0 46 B3 31 89 33 30 00 |.....A.2.F.1.30.|
000014D0: 09 1D B2 04 9F 34 2C 34 2C 37 3A A0 34 3A 8B 53 |.....4,4,7:.4:.S|
000014E0: 54 A7 99 22 93 11 11 11 11 11 11 11 1C 12 22 2C |T.."..........",|
000014F0: 22 CE 4F 20 50 52 49 4E 54 45 52 20 4F 4E 20 4C |".O PRINTER ON L|
00001500: 49 4E 45 2E 22 3A 89 32 35 00 4F 1D B5 04 99 22 |INE.":.25.O...."|
00001510: 93 1E C3 4F 4D 50 55 54 49 4E 47 2E 2E 2E 22 3A |...OMPUTING...":|
00001520: 8D 39 37 30 3A 91 45 AA 31 89 32 35 3A 9F 34 2C |.970:.E.1.25:.4,|
00001530: 34 2C 37 3A 50 47 B2 30 3A 99 22 93 11 D0 52 49 |4,7:PG.0:."...RI|
00001540: 4E 54 49 4E 47 2E 2E 2E 22 3A 8D 31 34 30 30 00 |NTING...":.1400.|
00001550: 82 1D B7 04 8D 31 34 32 30 3A 98 34 2C 22 22 A6 |.....1420:.4,"".|
00001560: 33 31 29 22 C1 CC D4 C5 D2 CE C1 D4 C9 D6 C5 D3 |31)"............|
00001570: 22 3A 8D 31 34 32 30 3A 98 34 3A 4C 4E B2 4C 4E |":.1420:.4:LN.LN|
00001580: AA 32 00 B3 1D BA 04 81 58 B2 31 A4 41 3A 98 34 |.2......X.1.A:.4|
00001590: 2C C9 28 42 24 AA C4 28 58 29 2C 33 29 2C 41 24 |,.(B$..(X),3),A$|
000015A0: 28 58 29 3A 4C 4E B2 4C 4E AA 31 3A 8D 31 35 30 |(X):LN.LN.1:.150|
000015B0: 30 3A 82 00 E7 1D BF 04 98 34 2C 52 24 3A 8D 31 |0:.......4,R$:.1|
000015C0: 34 32 30 3A 98 34 2C 22 22 A6 33 34 29 22 C6 C1 |420:.4,"".34)"..|
000015D0: C3 D4 CF D2 D3 22 3A 8D 31 34 32 30 3A 98 34 3A |.....":.1420:.4:|
000015E0: 4C 4E B2 4C 4E AA 34 00 16 1E C0 04 98 34 2C 22 |LN.LN.4......4,"|
000015F0: CE 55 4D 42 45 52 20 20 20 20 20 20 C6 41 43 54 |.UMBER .ACT|
00001600: 4F 52 20 20 20 20 20 20 22 2C 22 C9 4D 50 4F 52 |OR ",".MPOR|
00001610: 54 41 4E 43 45 22 00 4D 1E C1 04 98 34 2C 22 2D |TANCE".M....4,"-|
00001620: 2D 2D 2D 2D 2D 20 20 20 20 20 20 2D 2D 2D 2D 2D |----- -----|
00001630: 2D 20 20 20 20 20 20 22 2C 22 2D 2D 2D 2D 2D 2D |- ","------|
00001640: 2D 2D 2D 2D 22 3A 4C 4E B2 4C 4E AA 32 00 81 1E |----":LN.LN.2...|
00001650: C4 04 81 58 B2 30 A4 46 3A 98 34 2C C9 28 42 24 |...X.0.F:.4,.(B$|
00001660: AA C4 28 58 AA 31 29 2C 33 29 2C C8 28 46 24 28 |..(X.1),3),.(F$(|
00001670: 58 29 AA 42 24 2C 32 30 29 3B 4D 25 28 30 2C 58 |X).B$,20);M%(0,X|
00001680: 29 00 AD 1E C9 04 4C 4E B2 4C 4E AA 31 3A 8D 31 |).....LN.LN.1:.1|
00001690: 35 30 30 3A 82 3A 98 34 2C 52 24 3A 45 B2 41 3A |500:.:.4,R$:E.A:|
000016A0: 8B 41 B1 35 A7 45 B2 B5 28 41 AD 32 29 00 E6 1E |.A.5.E..(A.2)...|
000016B0: CE 04 8D 31 34 32 30 3A 98 34 2C 22 22 A6 32 39 |...1420:.4,"".29|
000016C0: 29 22 C1 CC D4 C5 D2 CE C1 D4 C9 D6 C5 A0 D3 C3 |)"..............|
000016D0: CF D2 C5 D3 22 3A 8D 31 34 32 30 3A 98 34 3A 4C |....":.1420:.4:L|
000016E0: 4E B2 4C 4E AA 34 00 16 1F D3 04 98 34 2C 22 22 |N.LN.4......4,""|
000016F0: A6 39 29 3B 3A 81 58 B2 31 A4 45 3A 98 34 2C C8 |.9);:.X.1.E:.4,.|
00001700: 28 41 24 28 58 29 AA 42 24 2C 31 33 29 22 20 22 |(A$(X).B$,13)" "|
00001710: 3B 3A 82 3A 98 34 00 47 1F D5 04 98 34 2C 22 22 |;:.:.4.G....4,""|
00001720: A6 39 29 3B 3A 81 58 B2 31 A4 45 3A 81 49 B2 31 |.9);:.X.1.E:.I.1|
00001730: A4 31 33 3A 98 34 2C 22 2D 22 3B 3A 82 3A 98 34 |.13:.4,"-";:.:.4|
00001740: 2C 22 20 22 3B 3A 82 00 70 1F D8 04 98 34 3A 4C |," ";:..p....4:L|
00001750: 4E B2 4C 4E AA 32 3A 81 58 B2 30 A4 46 3A 98 34 |N.LN.2:.X.0.F:.4|
00001760: 2C C8 28 46 24 28 58 29 AA 42 24 2C 31 33 29 3B |,.(F$(X).B$,13);|
00001770: 00 9A 1F DD 04 81 49 B2 31 A4 45 3A 98 34 2C C9 |......I.1.E:.4,.|
00001780: 28 42 24 AA C4 28 4D 25 28 49 2C 58 29 29 2C 37 |(B$..(M%(I,X)),7|
00001790: 29 A6 36 29 3B 3A 82 3A 98 34 00 B8 1F E2 04 4C |).6);:.:.4.....L|
000017A0: 4E B2 4C 4E AA 31 3A 8D 31 35 30 30 3A 82 3A 8B |N.LN.1:.1500:.:.|
000017B0: 45 B2 41 89 31 32 37 30 00 DA 1F E4 04 8B 4C 4E |E.A.1270......LN|
000017C0: B1 35 30 AB 46 A7 81 4C 4E B2 4C 4E A4 36 35 3A |.50.F..LN.LN.65:|
000017D0: 98 34 3A 82 3A 8D 31 34 30 30 00 0C 20 E7 04 98 |.4:.:.1400.. ...|
000017E0: 34 2C 52 24 A6 39 29 3B 3A 81 58 B2 45 AA 31 A4 |4,R$.9);:.X.E.1.|
000017F0: 41 3A 98 34 2C C8 28 41 24 28 58 29 AA 42 24 2C |A:.4,.(A$(X).B$,|
00001800: 31 33 29 22 20 22 3B 3A 82 3A 98 34 00 3F 20 E8 |13)" ";:.:.4.? .|
00001810: 04 98 34 2C 22 22 A6 39 29 3B 3A 81 58 B2 45 AA |..4,"".9);:.X.E.|
00001820: 31 A4 41 3A 81 49 B2 31 A4 31 33 3A 98 34 2C 22 |1.A:.I.1.13:.4,"|
00001830: 2D 22 3B 3A 82 3A 98 34 2C 22 20 22 3B 3A 82 00 |-";:.:.4," ";:..|
00001840: 68 20 EC 04 98 34 3A 4C 4E B2 4C 4E AA 33 3A 81 |h ...4:LN.LN.3:.|
00001850: 58 B2 30 A4 46 3A 98 34 2C C8 28 46 24 28 58 29 |X.0.F:.4,.(F$(X)|
00001860: AA 42 24 2C 31 33 29 3B 00 94 20 F1 04 81 49 B2 |.B$,13);.. ...I.|
00001870: 45 AA 31 A4 41 3A 98 34 2C C9 28 42 24 AA C4 28 |E.1.A:.4,.(B$..(|
00001880: 4D 25 28 49 2C 58 29 29 2C 37 29 A6 36 29 3B 3A |M%(I,X)),7).6);:|
00001890: 82 3A 98 34 00 A8 20 F3 04 4C 4E B2 4C 4E AA 31 |.:.4.. ..LN.LN.1|
000018A0: 3A 8D 31 35 30 30 3A 82 00 E2 20 F6 04 98 34 2C |:.1500:... ...4,|
000018B0: 52 24 52 24 52 24 3A 4C 4E B2 4C 4E AA 34 3A 8D |R$R$R$:LN.LN.4:.|
000018C0: 31 35 30 30 3A 8B 4C 4E B1 35 30 AB 41 A7 81 4C |1500:.LN.50.A..L|
000018D0: 4E B2 4C 4E A4 36 35 3A 98 34 3A 82 3A 8D 31 34 |N.LN.65:.4:.:.14|
000018E0: 30 30 00 15 21 FB 04 98 34 2C 52 24 52 24 3A 8D |00..!...4,R$R$:.|
000018F0: 31 34 32 30 3A 98 34 2C 22 22 A6 32 38 29 22 C4 |1420:.4,"".28)".|
00001900: C5 C3 C9 D3 C9 CF CE A0 D2 C5 D3 D5 CC D4 22 3A |..............":|
00001910: 8D 31 34 32 30 00 5D 21 00 05 98 34 2C 52 24 22 |.1420.]!...4,R$"|
00001920: CE 55 4D 42 45 52 20 20 20 C1 4C 54 45 52 4E 41 |.UMBER .LTERNA|
00001930: 54 49 56 45 22 2C 22 D6 41 4C 55 45 22 52 24 22 |TIVE",".ALUE"R$"|
00001940: 2D 2D 2D 2D 2D 2D 20 20 20 2D 2D 2D 2D 2D 2D 2D |------ -------|
00001950: 2D 2D 2D 2D 22 2C 22 2D 2D 2D 2D 2D 22 00 84 21 |----","-----"..!|
00001960: 0A 05 4C 4E B2 4C 4E AA 37 3A 81 58 B2 31 A4 41 |..LN.LN.7:.X.1.A|
00001970: 3A 98 34 2C C9 28 42 24 AA C4 28 58 29 2C 33 29 |:.4,.(B$..(X),3)|
00001980: A6 36 29 3B 00 BD 21 0C 05 98 34 2C C8 28 41 24 |.6);..!...4,.(A$|
00001990: 28 5A 28 58 29 29 AA 42 24 2C 31 36 29 A6 35 29 |(Z(X)).B$,16).5)|
000019A0: B5 28 56 28 5A 28 58 29 29 AA 2E 35 29 3A 4C 4E |.(V(Z(X))..5):LN|
000019B0: B2 4C 4E AA 31 3A 8D 31 35 30 30 3A 82 00 D7 21 |.LN.1:.1500:...!|
000019C0: 0F 05 81 4C 4E B2 4C 4E A4 36 35 3A 98 34 3A 82 |...LN.LN.65:.4:.|
000019D0: 3A A0 34 3A 89 33 30 00 E9 21 14 05 99 22 93 11 |:.4:.30..!..."..|
000019E0: 8E 09 44 4F 4E 45 22 3A 80 00 FA 21 1E 05 A0 31 |..DONE":...!...1|
000019F0: 3A A0 34 3A A0 35 3A 89 33 30 00 3E 22 78 05 50 |:.4:.5:.30.>"x.P|
00001A00: 47 B2 50 47 AA 31 3A 98 34 2C 22 C3 52 45 41 54 |G.PG.1:.4,".REAT|
00001A10: 49 56 45 20 D3 4F 46 54 57 41 52 45 22 A6 39 29 |IVE .OFTWARE".9)|
00001A20: 22 C4 A0 C5 A0 C3 A0 C9 A0 D3 A0 C9 A0 CF A0 CE |"...............|
00001A30: A0 A0 A0 CD A0 C1 A0 CB A0 C5 A0 D2 22 3B 00 62 |............";.b|
00001A40: 22 82 05 98 34 2C 22 22 A6 32 30 29 22 D0 41 47 |"...4,"".20)".AG|
00001A50: 45 22 50 47 3B 52 24 52 24 52 24 3A 4C 4E B2 34 |E"PG;R$R$R$:LN.4|
00001A60: 3A 8E 00 85 22 8C 05 81 4A B2 31 A4 37 39 3A 98 |:..."...J.1.79:.|
00001A70: 34 2C 22 2D 22 3B 3A 82 3A 98 34 3A 4C 4E B2 4C |4,"-";:.:.4:LN.L|
00001A80: 4E AA 31 3A 8E 00 92 22 DC 05 8B 4C 4E B3 35 38 |N.1:..."...LN.58|
00001A90: A7 8E 00 AB 22 E6 05 81 4C 4E B2 4C 4E A4 36 35 |...."...LN.LN.65|
00001AA0: 3A 98 34 3A 82 3A 89 31 34 30 30 00 00 00 |:.4:.:.1400... |
..M.... CBM 64 DECISION MAKER
(C) 1983 CREATIVE SOFTWARE.U.
..A.0:F..1:R$.G(13):.53281,1:.53280,3...
...".........."," ..............":.,"
.DECISION MAKER".....D$."0:'":C$."..
.C.HANGE .D.ELETE .E.ND...":B$."
".S...L$."...........
.....":S$."................":Y$.".......
.................."......,".... COPYR
IGHT 1983"R$.19)".BY"R$.12)".CREATIVE SO
FTWARE"......95.X...."..."," M E N
U."R$,".ALTERNATIVES:"R$"1. ADD"...#.."2
. CHANGE/DELETE"R$"3. LIST".<.(..,"..FAC
TORS:"R$"4. ADD"R$"5. CHANGE/DELETE"R$"6
. LIST/RATE".J.2.."..7. SCORE ALTERNATIV
ES"R$,"..COMPUTE:"...<.."8. DISPLAY RESU
LT"R$"9. PRINT RESULT"R$,"..DATA FILES:"
R$"10. STORE ";...F.."DATA"R$"11. RECALL
DATA"R$"12. SHOW DM FILES (DISK ONLY)"R
$"..13. END",./.K..,"...OPTION?.";:X1.28
:Y.23:X2.2:.350.S.P..X0.100,200,300,400,
500,700,800,900,1200,1000,1100,600,1300:
.30...R.."........","..T.APE OR .D.ISK?"
:X2.1:Y.7:X1.25:.150.U.S..X$."".X$."D".X
$."D".X$."T".X$."T".....T..82...U..,"..E
NTER FILE NAME.":X2.15:Y.4:X1.10:.150:I$
.X$./.W..H(X$,1)."'".I$.J(X$,2).5.X...T.
Z..,"..PRESS A KEY TO GO ON..K.\..I$:..(
I$."").92:....]..H(Y$,Y.1).X1)"."H(L$,X2
)H(S$,X2);:X$."":X0.0:...._..X.0.3E3:.:.
...D.X2.15:Y.4:X1.1:.A.9..:.".....","MAX
IMUM 10 REACHED.":.25.!.I.."... ENTER AL
TERNATIVE #"A.1".":.150:.X$."".30.9.N.A.
A.1:A$(A).X$:.100.A....93.M...."...";.O.
...92:I.F(I$):X.I.127:.I.13.365......(I.
44.I.42.I.58.I.34.I.29.X.32.X.96).I..20.
152......I..20.160.A....X$."".152......C
(X$).X2.." ..";:.159......"....";.....X$
.H(X$,C(X$).1):.151... ..C(X$).X2.X$.X$.
I$:.I$;.(....151.8.H.E.1:.A.1.30..M..".
. ALTERNATIVE #"E;R$R$A$(E)R$C$;:X1.19:Y
.5:X2.1:.150:.X$."E".30...R.X1.1:.X$."C"
..R$". CHANGE TO?":Y.9:X1.0:X2.15:.150..
.W..X1.0.X$.""..R$,"..NO CHANGE MADE..":
.95:.290......X1.0.A$(E).X$:.290......X$
.."D".290.0....R$".. DELETING.":.E.A.245
.I....I.E.A.1:A$(I).A$(I.1):.X.0.10:M%(I
,X).M%(I.1,X):.:.......X.0.10:M%(I,X).0:
......A.A.1:E.E.1...".E.E.1:..(E..A).205
:.30.U.,...(A.1).30:."....",".ALTERNATIV
ES:."...6..I.1.A:.,"."I".".15)A$(I):.:.9
0:.30...^..93..._.."...";.+.`..92:I.F(I$
):.I.13.365.L.B..(I.48.I.57).I..43.I..20
.352.[.C..I..20.360.J.D..X$."".352...E..
C(X$).X2.." ..";:.359...F.."....";...G.X
$.H(X$,C(X$).1):.351.H.H..C(X$).X2.X$.X$
.I$:.I$;.Q.I..351...M..H(B$,X2.C(X$).1);
:X0.E(X$):..0...X2.15:Y.5:X1.1:.F.9..:."
.....","MAXIMUM 11 REACHED.":.25._....".
.. ENTER FACTOR #"F.2".":.150:.X$."".30.
W...F.F.1:F$(F).X$:.400.....E.0:.F.0.30.
K....".. FACTOR #"E.1;R$R$F$(E)R$C$;:X1.
19:Y.5:X2.1:.150:.X$."E".30.....X1.1:.X$
."C"..R$". CHANGE TO?":Y.9:X1.0:X2.15:.1
50.4....X1.0.X$.""..R$,"..NO CHANGE MADE
..":.95:.590.L....X1.0.F$(E).X$:.590.]..
..X$.."D".590.|....R$".. DELETING.":.E.F
.545......I.E.F.1:F$(I).F$(I.1):.X.0.10:
M%(X,I).M%(X,I.1):.:..M....X.0.10:M%(X,I
).0:....!.F.F.1:E.E.1...N.E.E.1:..(E..F)
.505:.30.2.X. 5:.5,8,15: 5:.ST..".......
..","NO DISK ON LINE.":.25.I.Z. 5:.5,8,1
5,"I":."..",".. DECISION MAKER FILES ...
"..[..2,8,0,"$".D$."*"...\..#2,I$,I$...
B..#2,X$,I$:.X$."".I$."". 2:.90:.30...L.
.#2,X$,I$:.,J(D(F(X$.G(0)).256.F(I$.G(0)
)),2)" ";...V..X.1.19:.#2,I$:.I$.."'"..I
$;...{..:..)....#2,I$:.I$.."".640.>....I
$:.I$.." ".610.S....I$:.I$.." ".660.\...
.610......F.2.30:."... FACTOR".24)"I
MPORTANCE.":.I.0.F...P.."."I.1". ".5)F$(
I).25)"."M%(0,I):.:....Z..". FACTOR NUMB
ER:":Y.F.6:X1.17:X2.1.(F.8):.350:E.X0.1.
.....E.0.E.F.750./....R$". IMPORTANCE:":
Y.Y.2:X2.3:.350.M....X0.0.X0.100.."...."
:.730.A...M%(0,E).X0:.700.....E.1:.I.0.F
:.M%(0,I).100.E.0.A....:.E..:."..AT LEAS
T ONE FACTOR MUST BE RATED 100.":.95:.70
0.I....30... ...(A.1.F.1).30:.E.0.F.%.%.
."... SCORE THE ALTERNATIVES WITH REGAR
D TO"R$"..",F$(E)"..".Q.*..X.1.A:."."X".
".5)A$(X).25)"."M%(X,E):..../..". ALTERN
ATIVE #:":Y.A.5:X1.17:X2.1.(A.9):.350:X.
X0:.X.1.X.A.835.R.9..R$". SCORE:":Y.Y.2:
X2.3:.350:.X0.0.X0..100.M%(X,E).X0...>..
805...C..:.30.......(A.2.F.1).30:.".....
......".14)".COMPUTING...".I....970:.E.1
.25:.".","....DECISION RESULT:..".V....X
.1.A:.,"."A$(Z(X)).26)".".(V(Z(X))..5)..
....:.90:.30.C.J.X$."... CAN'T COMPUTE
!.":E.0:.I.0.F:E.E.M%(0,I):.:.E.972...K.
.,X$R$" FACTOR RATINGS ARE ALL 0."
:....L..I.0.F:N(0,I).100.M%(0,I).E:..?.M
..I.0.F:E.0:.X.1.A:E.E.M%(X,I):.:.E.976.
M.N..,X$R$" SCORES FOR ."F$(I)". ARE AL
L 0.".Y.O.I.F:.:....P..X.1.A:N(X,I).100.
M%(X,I).E:.:..R.Q..X.1.A:V(X).0:.I.0.F:V
(X).V(X).N(X,I).N(0,I):.:....R..I.1.10:Z
(I).I:.:.X.1.10:.I.1.A.1:X1.Z(I):X2.Z(I.
1)...S..V(X1)..V(X2).Z(I.1).X1:Z(I).X2.[
.T..:.:I.100.V(Z(1)):.E.1.A:V(E).I.V(E):
.:........(A.1.F.1).30:.".."," .STORE
DATA":.85:J$.I$:.I$."".30......82:.X$.""
.30.C....X$."D".X$."D".1009.Y....:.1,1,1
,J$:.1030......1,8,15: 1:.ST..".........
.","NO DISK ON LINE.":.25.J... 5:.5,8,15
,"I":.1,8,8,D$.J$.",S,W":.5,X,X$:.X.0.10
30.Y... 1:.R$,"..."X$:.X..63..5,"S"D$J$:
.90:.1000......,".REPLACE? (Y/N)":Y.11:X
1.25:X2.1:.150:.X$.."Y".1000.I....5,"S"D
$J$:.1010......:.,"..STORING "J$:J$.G(34
)."....1,A","F:.X.1.A:.1,J$A$(X)J$:.:.X.
0.F:.1,J$F$(X)J$:..L....X.0.10:.I.0.10:.
1,M%(X,I):.:.: 1:.30.~.L..".."," .REC
ALL DATA":.85:FI$.I$:.I$."".30...N..82:.
X$."".30...O..X$."D".X$."D".1109...P..1,
1,0,FI$:.1130...U..1,8,15: 1:.ST..".....
.....","NO DISK ON LINE.":.25./.V. 5:.5,
8,15,"I":.1,8,8,D$.FI$.",S,R":.5,X,X$:.X
.0.1130.L.`..R$"...",X$: 1:.90:.1100.F.J
..:.,"..RECALLING "FI$...O..1,A,F:.X.1.A
:.1,A$(X):.:.X.0.F:.1,F$(X):....T..X.0.1
0:.I.0.10:.1,M%(X,I):.:.: 1:.30.O....A.2
.F.1.30......4,4,7: 4:.ST.."..........",
"NO PRINTER ON LINE.":.25.O...."..COMPUT
ING...":.970:.E.1.25:.4,4,7:PG.0:."..PRI
NTING...":.1400......1420:.4,"".31)"ALTE
RNATIVES":.1420:.4:LN.LN.2......X.1.A:.4
,I(B$.D(X),3),A$(X):LN.LN.1:.1500:......
.4,R$:.1420:.4,"".34)"FACTORS":.1420:.4:
LN.LN.4......4,"NUMBER FACTOR
","IMPORTANCE".M.A..4,"------ -----
- ","----------":LN.LN.2...D..X.0.F
:.4,I(B$.D(X.1),3),H(F$(X).B$,20);M%(0,X
)...I.LN.LN.1:.1500:.:.4,R$:E.A:.A.5.E..
(A.2)...N..1420:.4,"".29)"ALTERNATIVE SC
ORES":.1420:.4:LN.LN.4...S..4,"".9);:.X.
1.E:.4,H(A$(X).B$,13)" ";:.:.4.G.U..4,""
.9);:.X.1.E:.I.1.13:.4,"-";:.:.4," ";:..
P.X..4:LN.LN.2:.X.0.F:.4,H(F$(X).B$,13);
......I.1.E:.4,I(B$.D(M%(I,X)),7).6);:.:
.4.....LN.LN.1:.1500:.:.E.A.1270.Z....LN
.50.F..LN.LN.65:.4:.:.1400.. ...4,R$.9);
:.X.E.1.A:.4,H(A$(X).B$,13)" ";:.:.4.? .
..4,"".9);:.X.E.1.A:.I.1.13:.4,"-";:.:.4
," ";:..H ...4:LN.LN.3:.X.0.F:.4,H(F$(X)
.B$,13);.. ...I.E.1.A:.4,I(B$.D(M%(I,X))
,7).6);:.:.4.. ..LN.LN.1:.1500:... ...4,
R$R$R$:LN.LN.4:.1500:.LN.50.A..LN.LN.65:
.4:.:.1400..!...4,R$R$:.1420:.4,"".28)"D
ECISION RESULT":.1420.]!...4,R$"NUMBER
ALTERNATIVE","VALUE"R$"------ -------
----","-----"..!..LN.LN.7:.X.1.A:.4,I(B$
.D(X),3).6);..!...4,H(A$(Z(X)).B$,16).5)
.(V(Z(X))..5):LN.LN.1:.1500:..W!...LN.LN
.65:.4:.: 4:.30..!..."....DONE":...!.. 1
: 4: 5:.30.>"X.PG.PG.1:.4,"CREATIVE SOFT
WARE".9)"D E C I S I O N M A K E R";.B
"...4,"".20)"PAGE"PG;R$R$R$:LN.4:..."...
J.1.79:.4,"-";:.:.4:LN.LN.1:..."...LN.58
...."...LN.LN.65:.4:.:.1400...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL