_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

MATCHMAKER

FILE INFORMATION

FILENAME(S): MATCHMAKER

FILE TYPE(S): PRG

FILE SIZE: 11.4K

FIRST SEEN: 2025-11-30 18:24:29

APPEARS ON: 1 disk(s)

FILE HASH

857c632243578f9b211176e3944f4628bf893e794c2053798310dd92f81e28a8

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
ROLLS 30 MATCHMAKER PRG Sailor, Rolls 17 6 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 3E 08 00 00 56 49  43 B2 31 33 AC 34 30 39  |..>...VIC.13.409|
00000010: 36 3A 97 56 49 43 AA 32  31 2C 30 3A 81 41 B2 31  |6:.VIC.21,0:.A.1|
00000020: 33 A4 31 35 3A 81 42 B2  30 A4 36 33 3A 87 53 3A  |3.15:.B.0.63:.S:|
00000030: 97 41 AC 36 34 AA 42 2C  53 3A 82 42 2C 41 00 8C  |.A.64.B,S:.B,A..|
00000040: 08 01 00 83 30 2C 30 2C  31 32 37 2C 30 2C 30 2C  |....0,0,127,0,0,|
00000050: 31 32 37 2C 30 2C 30 2C  31 35 2C 33 2C 32 35 35  |127,0,0,15,3,255|
00000060: 2C 33 31 2C 31 35 2C 32  35 35 2C 32 35 31 2C 36  |,31,15,255,251,6|
00000070: 33 2C 32 35 35 2C 32 34  33 2C 31 32 30 2C 30 2C  |3,255,243,120,0,|
00000080: 31 32 30 2C 32 34 30 2C  30 2C 36 30 00 D9 08 02  |120,240,0,60....|
00000090: 00 83 32 32 34 2C 30 2C  32 38 2C 32 32 34 2C 30  |..224,0,28,224,0|
000000A0: 2C 32 38 2C 32 32 34 2C  30 2C 32 38 2C 32 32 34  |,28,224,0,28,224|
000000B0: 2C 30 2C 32 38 2C 32 32  34 2C 30 2C 32 38 2C 32  |,0,28,224,0,28,2|
000000C0: 32 34 2C 30 2C 32 38 2C  32 32 34 2C 30 2C 32 38  |24,0,28,224,0,28|
000000D0: 2C 32 32 34 2C 30 2C 32  38 00 11 09 03 00 83 32  |,224,0,28......2|
000000E0: 34 30 2C 30 2C 36 30 2C  31 32 30 2C 30 2C 31 32  |40,0,60,120,0,12|
000000F0: 30 2C 36 33 2C 32 35 35  2C 32 34 30 2C 31 35 2C  |0,63,255,240,15,|
00000100: 32 35 35 2C 31 39 32 2C  33 2C 32 35 35 2C 30 2C  |255,192,3,255,0,|
00000110: 30 00 5F 09 04 00 83 31  2C 32 35 35 2C 31 32 38  |0._....1,255,128|
00000120: 2C 37 2C 32 35 35 2C 32  32 34 2C 31 35 2C 32 35  |,7,255,224,15,25|
00000130: 35 2C 32 34 30 2C 33 31  2C 30 2C 32 34 38 2C 33  |5,240,31,0,248,3|
00000140: 30 2C 30 2C 31 32 30 2C  32 38 2C 30 2C 35 36 2C  |0,0,120,28,0,56,|
00000150: 32 38 2C 30 2C 35 36 2C  32 38 2C 30 2C 35 36 00  |28,0,56,28,0,56.|
00000160: AC 09 05 00 83 32 38 2C  30 2C 35 36 2C 32 38 2C  |.....28,0,56,28,|
00000170: 30 2C 35 36 2C 33 30 2C  30 2C 31 32 30 2C 33 31  |0,56,30,0,120,31|
00000180: 2C 30 2C 32 34 38 2C 31  35 2C 32 35 35 2C 32 34  |,0,248,15,255,24|
00000190: 30 2C 37 2C 32 35 35 2C  32 32 34 2C 31 2C 32 35  |0,7,255,224,1,25|
000001A0: 35 2C 31 32 38 2C 30 2C  32 34 2C 30 00 D8 09 06  |5,128,0,24,0....|
000001B0: 00 83 30 2C 32 34 2C 30  2C 30 2C 31 32 36 2C 30  |..0,24,0,0,126,0|
000001C0: 2C 30 2C 31 32 36 2C 30  2C 30 2C 32 34 2C 30 2C  |,0,126,0,0,24,0,|
000001D0: 30 2C 32 34 2C 30 2C 30  00 26 0A 07 00 83 31 35  |0,24,0,0.&....15|
000001E0: 2C 31 32 38 2C 32 34 38  2C 33 31 2C 32 32 37 2C  |,128,248,31,227,|
000001F0: 32 35 32 2C 36 33 2C 32  34 37 2C 32 35 34 2C 31  |252,63,247,254,1|
00000200: 32 37 2C 32 35 35 2C 32  35 35 2C 31 32 37 2C 32  |27,255,255,127,2|
00000210: 35 35 2C 32 35 35 2C 31  32 37 2C 32 35 35 2C 32  |55,255,127,255,2|
00000220: 35 35 2C 31 32 37 00 76  0A 08 00 83 32 35 35 2C  |55,127.v....255,|
00000230: 32 35 35 2C 31 32 37 2C  32 35 35 2C 32 35 35 2C  |255,127,255,255,|
00000240: 36 33 2C 32 35 35 2C 32  35 34 2C 36 33 2C 32 35  |63,255,254,63,25|
00000250: 35 2C 32 35 34 2C 33 31  2C 32 35 35 2C 32 35 32  |5,254,31,255,252|
00000260: 2C 33 31 2C 32 35 35 2C  32 35 32 2C 31 35 2C 32  |,31,255,252,15,2|
00000270: 35 35 2C 32 34 38 00 C1  0A 09 00 83 37 2C 32 35  |55,248......7,25|
00000280: 35 2C 32 34 30 2C 33 2C  32 35 35 2C 32 32 34 2C  |5,240,3,255,224,|
00000290: 31 2C 32 35 35 2C 31 39  32 2C 30 2C 32 35 35 2C  |1,255,192,0,255,|
000002A0: 31 32 38 2C 30 2C 31 32  37 2C 30 2C 30 2C 36 32  |128,0,127,0,0,62|
000002B0: 2C 30 2C 30 2C 32 38 2C  30 2C 30 2C 38 2C 30 2C  |,0,0,28,0,0,8,0,|
000002C0: 30 00 E3 0A 0A 00 53 44  B2 35 34 32 37 32 3A 81  |0.....SD.54272:.|
000002D0: 54 52 B2 53 44 A4 53 44  AA 32 34 3A 97 54 52 2C  |TR.SD.SD.24:.TR,|
000002E0: 30 3A 82 00 00 0B 0B 00  86 48 46 25 28 31 35 29  |0:.......HF%(15)|
000002F0: 2C 4C 46 25 28 31 35 29  2C 44 52 25 28 31 35 29  |,LF%(15),DR%(15)|
00000300: 00 20 0B 0C 00 97 53 44  AA 35 2C 30 3A 97 53 44  |. ....SD.5,0:.SD|
00000310: AA 36 2C 32 34 30 3A 97  53 44 AA 32 34 2C 31 35  |.6,240:.SD.24,15|
00000320: 00 48 0B 0E 00 81 54 52  B2 30 A4 31 35 3A 87 48  |.H....TR.0.15:.H|
00000330: 46 25 28 54 52 29 2C 4C  46 25 28 54 52 29 2C 44  |F%(TR),LF%(TR),D|
00000340: 52 25 28 54 52 29 3A 82  00 8B 0B 0F 00 97 35 33  |R%(TR):.......53|
00000350: 32 38 30 2C 36 3A 97 35  33 32 38 31 2C 31 3A 44  |280,6:.53281,1:D|
00000360: 4E 24 B2 22 20 44 45 56  49 43 45 20 4E 4F 54 20  |N$." DEVICE NOT |
00000370: 50 52 45 53 45 4E 54 22  3A 45 43 24 B2 22 45 4E  |PRESENT":EC$."EN|
00000380: 54 45 52 20 43 48 4F 49  43 45 22 00 D3 0B 10 00  |TER CHOICE".....|
00000390: 83 31 32 2C 31 34 33 2C  35 31 32 2C 38 2C 39 37  |.12,143,512,8,97|
000003A0: 2C 39 36 2C 39 2C 31 30  34 2C 39 36 2C 31 30 2C  |,96,9,104,96,10,|
000003B0: 31 34 33 2C 39 36 2C 31  31 2C 34 38 2C 39 36 2C  |143,96,11,48,96,|
000003C0: 31 32 2C 31 34 33 2C 36  34 30 2C 38 2C 39 37 2C  |12,143,640,8,97,|
000003D0: 32 35 36 00 17 0C 11 00  83 31 34 2C 32 34 2C 32  |256......14,24,2|
000003E0: 35 36 2C 31 32 2C 31 34  33 2C 32 35 36 2C 31 31  |56,12,143,256,11|
000003F0: 2C 34 38 2C 31 32 38 2C  31 32 2C 31 34 33 2C 31  |,48,128,12,143,1|
00000400: 32 38 2C 31 34 2C 32 34  2C 31 32 38 2C 31 35 2C  |28,14,24,128,15,|
00000410: 32 31 30 2C 31 32 38 00  38 0C 12 00 83 31 36 2C  |210,128.8....16,|
00000420: 31 39 35 2C 32 35 36 2C  30 2C 30 2C 32 35 36 2C  |195,256,0,0,256,|
00000430: 38 2C 39 37 2C 36 34 30  00 58 0C 13 00 81 41 B2  |8,97,640.X....A.|
00000440: 31 A4 32 3A 81 42 B2 31  A4 33 3A 87 4E 32 28 41  |1.2:.B.1.3:.N2(A|
00000450: 2C 42 29 3A 82 42 2C 41  00 76 0C 14 00 83 20 35  |,B):.B,A.v.... 5|
00000460: 34 2C 31 34 37 2C 2E 31  32 35 2C 31 30 38 2C 31  |4,147,.125,108,1|
00000470: 34 39 2C 2E 32 35 00 B4  0C 19 00 4E B2 33 30 3A  |49,.25.....N.30:|
00000480: 53 50 24 B2 22 20 20 20  20 20 20 20 20 20 20 20  |SP$."           |
00000490: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 22 3A 4E  |             ":N|
000004B0: 51 B2 32 35 00 E5 0C 1E  00 96 20 A5 41 28 58 29  |Q.25...... .A(X)|
000004C0: B2 AB 31 AC 28 58 B1 37  39 29 AB 31 AC 28 58 B1  |..1.(X.79).1.(X.|
000004D0: 36 34 29 AB 31 AC 28 58  B1 34 39 29 AB 31 AC 28  |64).1.(X.49).1.(|
000004E0: 58 B1 33 34 29 00 EE 0C  28 00 89 34 32 30 00 12  |X.34)...(..420..|
000004F0: 0D 32 00 97 37 38 31 2C  52 3A 97 37 38 32 2C 43  |.2..781,R:.782,C|
00000500: 3A 97 37 38 33 2C 30 3A  9E 28 36 35 35 32 30 29  |:.783,0:.(65520)|
00000510: 3A 8E 00 37 0D 3C 00 81  52 33 B2 52 31 A4 52 32  |:..7.<..R3.R1.R2|
00000520: 3A 97 37 38 31 2C 52 33  3A 9E 28 35 39 39 30 33  |:.781,R3:.(59903|
00000530: 29 3A 82 52 33 3A 8E 00  4A 0D 46 00 52 B2 32 30  |):.R3:..J.F.R.20|
00000540: 3A 43 B2 30 3A 8D 35 30  3A 8E 00 9B 0D 64 00 83  |:C.0:.50:....d..|
00000550: 22 44 49 53 41 53 54 52  4F 55 53 22 2C 22 4C 41  |"DISASTROUS","LA|
00000560: 52 47 45 4C 59 20 49 4E  43 4F 4D 50 41 54 49 42  |RGELY INCOMPATIB|
00000570: 4C 45 22 2C 22 53 4F 4D  45 20 44 49 46 46 49 43  |LE","SOME DIFFIC|
00000580: 55 4C 54 49 45 53 22 2C  22 46 41 49 52 4C 59 20  |ULTIES","FAIRLY |
00000590: 43 4F 4D 50 41 54 49 42  4C 45 22 00 B9 0D 6E 00  |COMPATIBLE"...n.|
000005A0: 83 22 45 58 54 52 45 4D  45 4C 59 20 57 45 4C 4C  |."EXTREMELY WELL|
000005B0: 20 4D 41 54 43 48 45 44  22 00 FF 0D 78 00 83 22  | MATCHED"...x.."|
000005C0: 41 4E 53 57 45 52 20 51  55 45 53 54 49 4F 4E 53  |ANSWER QUESTIONS|
000005D0: 22 2C 22 53 41 56 45 20  41 4E 53 57 45 52 53 22  |","SAVE ANSWERS"|
000005E0: 2C 22 47 45 54 20 41 4E  53 57 45 52 53 22 2C 22  |,"GET ANSWERS","|
000005F0: 44 45 4C 45 54 45 20 41  4E 53 57 45 52 53 22 00  |DELETE ANSWERS".|
00000600: 4B 0E 82 00 83 43 4F 4D  50 41 54 49 42 49 4C 49  |K....COMPATIBILI|
00000610: 54 59 20 43 48 45 43 4B  2C 50 45 52 46 45 43 54  |TY CHECK,PERFECT|
00000620: 20 50 41 49 52 53 2C 49  4E 53 54 52 55 43 54 49  | PAIRS,INSTRUCTI|
00000630: 4F 4E 53 2C 44 49 53 50  4C 41 59 20 44 49 52 45  |ONS,DISPLAY DIRE|
00000640: 43 54 4F 52 59 2C 22 45  4E 44 22 00 60 0E 8C 00  |CTORY,"END".`...|
00000650: 4D 54 24 B2 22 4D 41 54  43 48 4D 41 4B 45 52 22  |MT$."MATCHMAKER"|
00000660: 00 90 0E A0 00 8D 32 32  30 3A 99 A6 31 34 29 22  |......220:..14)"|
00000670: 90 92 CF B7 B7 B7 B7 B7  B7 B7 B7 B7 B7 D0 22 3A  |..............":|
00000680: 99 A6 31 34 29 22 92 90  A5 22 4D 54 24 22 A7 22  |..14)"..."MT$"."|
00000690: 00 B4 0E AA 00 99 A6 31  34 29 22 CC AF AF AF AF  |.......14)".....|
000006A0: AF AF AF AF AF AF BA 22  3A 99 A6 31 38 29 22 11  |.......":..18)".|
000006B0: 54 48 45 22 00 EB 0E B4  00 99 A6 31 36 29 22 50  |THE".......16)"P|
000006C0: 41 52 54 4E 45 52 22 3A  99 A6 31 33 29 22 43 4F  |ARTNER":..13)"CO|
000006D0: 4D 50 41 54 49 42 49 4C  49 54 59 22 3A 99 A6 31  |MPATIBILITY":..1|
000006E0: 36 29 22 50 52 4F 47 52  41 4D 22 00 19 0F BE 00  |6)"PROGRAM".....|
000006F0: 99 A6 31 34 29 22 11 44  45 56 49 53 45 44 20 42  |..14)".DEVISED B|
00000700: 59 22 3A 99 A6 31 32 29  22 44 52 2E 47 4C 45 4E  |Y":..12)"DR.GLEN|
00000710: 4E 20 57 49 4C 53 4F 4E  22 00 55 0F C8 00 99 22  |N WILSON".U...."|
00000720: 11 1F 12 22 53 50 24 3A  99 22 90 12 20 20 20 20  |..."SP$:."..    |
00000730: 20 20 20 20 20 20 20 20  20 28 43 29 20 28 50 29  |         (C) (P)|
00000740: 20 20 31 39 38 33 20 20  20 20 20 20 20 20 20 20  |  1983          |
00000750: 20 20 20 20 22 00 70 0F  CB 00 99 22 12 1F 22 53  |    ".p....".."S|
00000760: 50 24 3B 3A 81 44 45 B2  31 A4 32 30 30 30 3A 82  |P$;:.DE.1.2000:.|
00000770: 00 7C 0F D2 00 8B 4F 50  B2 39 A7 8E 00 A2 0F D3  |.|....OP.9......|
00000780: 00 81 49 B2 30 A4 34 3A  87 54 24 28 49 29 3A 82  |..I.0.4:.T$(I):.|
00000790: 49 3A 81 49 B2 31 A4 39  3A 87 4D 24 28 49 29 3A  |I:.I.1.9:.M$(I):|
000007A0: 82 49 00 AC 0F D4 00 8D  36 30 30 30 00 E4 0F D7  |.I......6000....|
000007B0: 00 52 B2 32 31 3A 43 B2  31 32 3A 8D 35 30 3A 97  |.R.21:C.12:.50:.|
000007C0: 31 39 38 2C 30 3A 99 22  90 50 52 45 53 53 20 12  |198,0:.".PRESS .|
000007D0: 1C 20 20 53 50 41 43 45  20 20 92 22 3B 3A 8D 33  |.  SPACE  .";:.3|
000007E0: 32 30 3A 8E 00 2B 10 DC  00 99 22 93 11 12 1F 22  |20:..+...."...."|
000007F0: 53 50 24 22 11 90 20 20  20 20 20 20 20 20 20 20  |SP$"..          |
00000800: 20 49 56 41 4E 20 42 45  52 47 20 53 4F 46 54 57  | IVAN BERG SOFTW|
00000810: 41 52 45 20 20 20 20 20  20 20 20 20 20 20 92 22  |ARE           ."|
00000820: 3A 99 22 12 1F 22 53 50  24 3A 8E 00 3D 10 E6 00  |:.".."SP$:..=...|
00000830: 8D 32 31 35 30 3A 81 49  31 B2 31 A4 39 00 68 10  |.2150:.I1.1.9.h.|
00000840: F0 00 99 22 20 20 20 20  20 12 20 22 C9 28 C4 28  |..."     . ".(.(|
00000850: 49 31 29 2C 31 29 22 20  92 20 22 4D 24 28 49 31  |I1),1)" . "M$(I1|
00000860: 29 22 11 22 3A 82 49 31  00 9F 10 FA 00 97 31 39  |)".":.I1......19|
00000870: 38 2C 30 3A 51 45 B2 35  3A 51 51 B2 30 3A 99 22  |8,0:QE.5:QQ.0:."|
00000880: 20 20 20 20 20 22 45 43  24 3B 3A 8D 32 32 36 30  |     "EC$;:.2260|
00000890: 3A 8D 32 34 35 30 3A 4F  50 B2 C5 28 41 24 29 00  |:.2450:OP..(A$).|
000008A0: DC 10 FF 00 8B 51 51 B2  39 39 B0 4F 50 B3 31 B0  |.....QQ.99.OP.1.|
000008B0: 4F 50 B1 39 B0 B5 28 4F  50 29 B3 B1 4F 50 A7 8D  |OP.9..(OP)..OP..|
000008C0: 32 37 30 3A 9E 35 39 39  30 33 3A 52 B2 54 58 3A  |270:.59903:R.TX:|
000008D0: 43 B2 30 3A 8D 35 30 3A  89 32 35 30 00 E2 10 04  |C.0:.50:.250....|
000008E0: 01 8E 00 EE 10 0E 01 8D  37 31 30 30 3A 8E 00 16  |........7100:...|
000008F0: 11 22 01 99 22 13 11 11  11 11 11 11 11 11 11 11  |.".."...........|
00000900: 11 11 20 20 20 41 4E 53  57 45 52 53 20 3A 22 50  |..   ANSWERS :"P|
00000910: 22 20 22 49 3A 8E 00 47  11 2C 01 8D 37 30 3A 44  |" "I:..G.,..70:D|
00000920: 24 B2 22 22 3A 99 22 20  45 4E 54 45 52 45 44 20  |$."":." ENTERED |
00000930: 44 45 54 41 49 4C 53 20  43 4F 52 52 45 43 54 20  |DETAILS CORRECT |
00000940: 20 59 2F 4E 20 22 3B 00  6C 11 2E 01 51 45 B2 35  | Y/N ";.l...QE.5|
00000950: 3A 51 51 B2 30 3A 8D 32  34 35 30 3A 44 24 B2 41  |:QQ.0:.2450:D$.A|
00000960: 24 3A 8B 51 51 B2 39 39  A7 33 30 35 00 81 11 2F  |$:.QQ.99.305.../|
00000970: 01 8B 44 24 B2 22 59 22  B0 44 24 B2 22 4E 22 A7  |..D$."Y".D$."N".|
00000980: 8E 00 9D 11 31 01 52 31  B2 52 3A 52 32 B2 52 3A  |....1.R1.R:R2.R:|
00000990: 8D 36 30 3A 8D 32 37 30  3A 89 33 30 30 00 CC 11  |.60:.270:.300...|
000009A0: 36 01 52 B2 32 32 3A 43  B2 31 33 3A 8D 35 30 3A  |6.R.22:C.13:.50:|
000009B0: 97 31 39 38 2C 30 3A 99  22 50 52 45 53 53 20 12  |.198,0:."PRESS .|
000009C0: 20 20 53 50 41 43 45 20  20 92 22 3B 00 E3 11 40  |  SPACE  .";...@|
000009D0: 01 A1 47 54 24 3A 8B 47  54 24 B3 B1 22 20 22 A7  |..GT$:.GT$.." ".|
000009E0: 33 32 30 00 E9 11 4A 01  8E 00 1C 12 54 01 97 31  |320...J.....T..1|
000009F0: 39 38 2C 30 3A 8D 35 30  3A 99 41 45 24 22 20 3A  |98,0:.50:.AE$" :|
00000A00: 20 22 3B 3A 51 45 B2 35  3A 51 51 B2 30 3A 8D 32  | ";:QE.5:QQ.0:.2|
00000A10: 34 35 30 3A 41 47 B2 C5  28 41 24 29 00 41 12 5E  |450:AG..(A$).A.^|
00000A20: 01 8B 51 51 B2 39 39 B0  41 47 B3 31 36 B0 41 47  |..QQ.99.AG.16.AG|
00000A30: B1 38 30 A7 8D 32 37 30  3A 8D 36 30 3A 89 33 34  |.80..270:.60:.34|
00000A40: 30 00 54 12 68 01 52 24  B2 C7 28 31 35 30 AA 41  |0.T.h.R$..(150.A|
00000A50: 47 29 3A 8E 00 8C 12 72  01 8D 35 30 3A 53 24 B2  |G):....r..50:S$.|
00000A60: 22 22 3A 99 22 20 53 45  58 20 4D 2F 46 20 20 20  |"":." SEX M/F   |
00000A70: 20 20 3A 20 22 3B 3A 51  45 B2 35 3A 51 51 B2 30  |  : ";:QE.5:QQ.0|
00000A80: 3A 8D 32 34 35 30 3A 53  24 B2 41 24 00 B5 12 7C  |:.2450:S$.A$...||
00000A90: 01 8B 51 51 B2 39 39 B0  53 24 B3 B1 22 4D 22 AF  |..QQ.99.S$.."M".|
00000AA0: 53 24 B3 B1 22 46 22 A7  8D 32 37 30 3A 8D 36 30  |S$.."F"..270:.60|
00000AB0: 3A 89 33 37 30 00 BB 12  86 01 8E 00 E3 12 90 01  |:.370...........|
00000AC0: 81 50 31 B2 4B 38 A4 4B  39 3A 8B 50 31 B2 36 B0  |.P1.K8.K9:.P1.6.|
00000AD0: 50 31 B2 31 31 B0 50 31  B2 32 31 B0 50 31 B2 32  |P1.11.P1.21.P1.2|
00000AE0: 36 A7 99 00 08 13 9A 01  99 C9 28 C4 28 50 31 29  |6.........(.(P1)|
00000AF0: 2C 32 29 22 20 22 C8 28  41 24 28 50 31 29 2C 31  |,2)" ".(A$(P1),1|
00000B00: 35 29 3A 82 50 31 3A 8E  00 3C 13 A4 01 86 41 24  |5):.P1:..<....A$|
00000B10: 28 4E 29 2C 4D 24 28 39  29 2C 51 24 28 4E 51 29  |(N),M$(9),Q$(NQ)|
00000B20: 2C 52 24 28 4E 51 2C 35  29 2C 44 24 28 4E 51 29  |,R$(NQ,5),D$(NQ)|
00000B30: 2C 50 25 28 4E 29 2C 54  24 28 34 29 00 45 13 AE  |,P%(N),T$(4).E..|
00000B40: 01 8D 31 34 30 00 78 13  B8 01 44 44 24 B2 22 4C  |..140.x...DD$."L|
00000B50: 4F 41 44 20 51 55 45 53  54 49 4F 4E 53 20 46 52  |OAD QUESTIONS FR|
00000B60: 4F 4D 22 3A 8D 32 33 36  30 3A 8D 32 31 35 30 3A  |OM":.2360:.2150:|
00000B70: 8B 44 B2 31 A7 34 35 30  00 A2 13 BD 01 8D 32 36  |.D.1.450......26|
00000B80: 32 30 3A 8B 45 46 B2 31  A7 99 22 11 1D 1D 1D 22  |20:.EF.1.."...."|
00000B90: 44 4E 24 3A 8D 32 37 30  3A 8D 33 31 30 3A 89 34  |DN$:.270:.310:.4|
00000BA0: 34 30 00 C0 13 C2 01 9F  31 2C 44 2C 53 41 2C 22  |40......1,D,SA,"|
00000BB0: 51 55 45 53 54 22 3A 8B  44 B3 B1 38 A7 34 35 35  |QUEST":.D..8.455|
00000BC0: 00 EB 13 C4 01 8D 32 36  35 30 3A 8B 44 4D B1 31  |......2650:.DM.1|
00000BD0: 39 A7 99 22 11 1D 1D 1D  22 44 4D 24 3A 8D 32 37  |9.."...."DM$:.27|
00000BE0: 30 3A 8D 33 31 30 3A 89  34 34 30 00 00 14 C7 01  |0:.310:.440.....|
00000BF0: 81 49 B2 31 A4 4E 51 3A  84 31 2C 51 24 28 49 29  |.I.1.NQ:.1,Q$(I)|
00000C00: 00 25 14 CC 01 81 49 32  B2 31 A4 35 3A 84 31 2C  |.%....I2.1.5:.1,|
00000C10: 52 24 28 49 2C 49 32 29  3A 82 49 32 3A 84 31 2C  |R$(I,I2):.I2:.1,|
00000C20: 44 24 28 49 29 00 5E 14  CE 01 8B 20 C9 28 44 24  |D$(I).^.... .(D$|
00000C30: 28 49 29 2C 31 29 B2 22  26 22 A7 84 31 2C 47 47  |(I),1)."&"..1,GG|
00000C40: 24 3A 44 24 28 49 29 B2  C8 28 44 24 28 49 29 2C  |$:D$(I)..(D$(I),|
00000C50: 37 39 29 AA 47 47 24 3A  47 47 24 B2 22 22 00 95  |79).GG$:GG$.""..|
00000C60: 14 D6 01 99 22 92 13 11  11 11 11 11 11 11 11 11  |...."...........|
00000C70: 11 20 20 20 20 20 52 45  41 44 49 4E 47 20 51 55  |.     READING QU|
00000C80: 45 53 54 49 4F 4E 53 20  3A 20 32 35 20 20 20 20  |ESTIONS : 25    |
00000C90: 22 49 3A 82 49 00 A2 14  E0 01 A0 31 3A 8D 35 30  |"I:.I......1:.50|
00000CA0: 36 30 00 D7 14 EA 01 8D  32 33 30 3A 91 4F 50 89  |60......230:.OP.|
00000CB0: 35 30 30 2C 37 33 33 2C  37 33 34 2C 37 39 30 2C  |500,733,734,790,|
00000CC0: 38 36 30 2C 31 32 32 30  2C 32 30 30 30 2C 33 30  |860,1220,2000,30|
00000CD0: 30 30 2C 31 33 34 30 00  09 15 F4 01 8B 50 B2 4E  |00,1340......P.N|
00000CE0: A7 99 22 93 11 11 11 11  11 1C 20 20 50 41 52 54  |..".......  PART|
00000CF0: 49 43 49 50 41 4E 54 20  4C 49 4D 49 54 1F 22 3A  |ICIPANT LIMIT.":|
00000D00: 8D 33 31 30 3A 89 34 39  30 00 32 15 F9 01 4E 24  |.310:.490.2...N$|
00000D10: B2 22 22 3A 8D 32 31 35  30 3A 99 22 20 59 4F 55  |."":.2150:." YOU|
00000D20: 52 20 44 45 54 41 49 4C  53 20 50 4C 45 41 53 45  |R DETAILS PLEASE|
00000D30: 11 22 00 78 15 FB 01 99  22 20 4E 41 4D 45 20 20  |.".x...." NAME  |
00000D40: 20 20 20 20 20 20 3A 20  22 3B 3A 52 B2 37 3A 52  |      : ";:R.7:R|
00000D50: 31 B2 37 3A 52 32 B2 37  3A 51 45 B2 31 35 3A 51  |1.7:R2.7:QE.15:Q|
00000D60: 51 B2 30 3A 8D 32 34 35  30 3A 4E 24 B2 41 24 3A  |Q.0:.2450:N$.A$:|
00000D70: 4C 31 B2 C3 28 4E 24 29  00 91 15 FE 01 8B 51 51  |L1..(N$)......QQ|
00000D80: B2 39 39 A7 8D 32 37 30  3A 8D 36 30 3A 89 35 30  |.99..270:.60:.50|
00000D90: 37 00 A3 15 08 02 8B 4E  24 B2 22 45 4E 44 22 A7  |7......N$."END".|
00000DA0: 34 39 30 00 C3 15 12 02  4E 24 B2 4E 24 AA C8 28  |490.....N$.N$..(|
00000DB0: 53 50 24 2C 31 35 AB 4C  31 29 3A 8B 50 B2 30 A7  |SP$,15.L1):.P.0.|
00000DC0: 35 36 30 00 FE 15 1C 02  81 49 B2 31 A4 50 3A 8B  |560......I.1.P:.|
00000DD0: 4E 24 B2 C8 28 41 24 28  49 29 2C 31 35 29 A7 99  |N$..(A$(I),15)..|
00000DE0: 22 11 4E 41 4D 45 20 41  4C 52 45 41 44 59 20 55  |".NAME ALREADY U|
00000DF0: 53 45 44 22 3A 8D 33 31  30 3A 89 35 30 35 00 05  |SED":.310:.505..|
00000E00: 16 26 02 82 49 00 39 16  30 02 50 B2 50 AA 31 3A  |.&..I.9.0.P.P.1:|
00000E10: 41 45 24 B2 22 20 41 47  45 20 20 20 20 20 20 20  |AE$." AGE       |
00000E20: 20 22 3A 52 B2 39 3A 52  31 B2 39 3A 52 32 B2 39  | ":R.9:R1.9:R2.9|
00000E30: 3A 43 B2 30 3A 8D 33 34  30 00 5F 16 35 02 41 24  |:C.0:.340._.5.A$|
00000E40: 28 50 29 B2 4E 24 AA 52  24 3A 52 B2 31 31 3A 52  |(P).N$.R$:R.11:R|
00000E50: 31 B2 31 31 3A 52 32 B2  31 31 3A 8D 33 37 30 00  |1.11:R2.11:.370.|
00000E60: 84 16 3A 02 8D 33 30 30  3A 8B 44 24 B2 22 59 22  |..:..300:.D$."Y"|
00000E70: A7 41 24 28 50 29 B2 41  24 28 50 29 AA 53 24 3A  |.A$(P).A$(P).S$:|
00000E80: 89 35 39 30 00 93 16 44  02 50 B2 50 AB 31 3A 89  |.590...D.P.P.1:.|
00000E90: 35 31 30 00 BC 16 4E 02  8D 32 31 35 30 3A 99 22  |510...N..2150:."|
00000EA0: 20 52 45 51 55 49 52 45  44 20 50 41 52 54 4E 45  | REQUIRED PARTNE|
00000EB0: 52 27 53 20 44 45 54 41  49 4C 53 22 00 E2 16 53  |R'S DETAILS"...S|
00000EC0: 02 52 B2 37 3A 52 31 B2  37 3A 52 32 B2 37 3A 8D  |.R.7:R1.7:R2.7:.|
00000ED0: 33 37 30 3A 41 24 28 50  29 B2 41 24 28 50 29 AA  |370:A$(P).A$(P).|
00000EE0: 53 24 00 12 17 58 02 41  45 24 B2 22 20 4D 49 4E  |S$...X.AE$." MIN|
00000EF0: 49 4D 55 4D 20 41 47 45  22 3A 52 B2 39 3A 52 31  |IMUM AGE":R.9:R1|
00000F00: B2 39 3A 52 32 B2 39 3A  8D 33 34 30 3A 41 31 B2  |.9:R2.9:.340:A1.|
00000F10: 41 47 00 3A 17 5D 02 41  45 24 B2 22 20 4D 41 58  |AG.:.].AE$." MAX|
00000F20: 49 4D 55 4D 20 41 47 45  22 3A 52 B2 31 31 3A 52  |IMUM AGE":R.11:R|
00000F30: 31 B2 31 31 3A 52 32 B2  31 31 00 43 17 62 02 8D  |1.11:R2.11.C.b..|
00000F40: 33 34 30 00 67 17 6C 02  8B 41 47 B3 41 31 A7 8D  |340.g.l..AG.A1..|
00000F50: 32 37 30 3A 52 31 B2 39  3A 52 32 B2 31 34 3A 8D  |270:R1.9:R2.14:.|
00000F60: 36 30 3A 89 36 30 30 00  95 17 76 02 41 24 28 50  |60:.600...v.A$(P|
00000F70: 29 B2 41 24 28 50 29 AA  C7 28 31 35 30 AA 41 31  |).A$(P)..(150.A1|
00000F80: 29 AA 52 24 3A 8D 33 30  30 3A 8B 44 24 B2 22 59  |).R$:.300:.D$."Y|
00000F90: 22 A7 36 35 30 00 B0 17  80 02 41 24 28 50 29 B2  |".650.....A$(P).|
00000FA0: C8 28 41 24 28 50 29 2C  31 37 29 3A 89 35 39 30  |.(A$(P),17):.590|
00000FB0: 00 F1 17 8A 02 8D 32 31  35 30 3A 99 22 50 4C 45  |......2150:."PLE|
00000FC0: 41 53 45 20 41 4E 53 57  45 52 20 54 48 45 20 46  |ASE ANSWER THE F|
00000FD0: 4F 4C 4C 4F 57 49 4E 47  20 51 55 45 53 54 49 4F  |OLLOWING QUESTIO|
00000FE0: 4E 53 22 3A 99 22 11 48  4F 4E 45 53 54 4C 59 22  |NS":.".HONESTLY"|
00000FF0: 3B 00 1E 18 94 02 99 22  20 28 59 4F 55 52 20 41  |;......" (YOUR A|
00001000: 4E 53 57 45 52 53 20 41  52 45 20 43 4F 4E 46 49  |NSWERS ARE CONFI|
00001010: 44 45 4E 54 49 41 4C 29  22 3A 8D 33 31 30 00 3F  |DENTIAL)":.310.?|
00001020: 18 99 02 81 49 B2 31 A4  4E 51 3A 46 50 24 B2 51  |....I.1.NQ:FP$.Q|
00001030: 24 28 49 29 3A 99 22 93  22 3A 8D 32 31 30 30 00  |$(I):.".":.2100.|
00001040: 57 18 9E 02 99 22 11 12  22 53 50 24 22 92 22 3A  |W....".."SP$".":|
00001050: 81 49 32 B2 31 A4 35 00  7A 18 A8 02 99 22 20 12  |.I2.1.5.z...." .|
00001060: 22 C9 28 C4 28 49 32 29  2C 31 29 22 92 20 22 52  |".(.(I2),1)". "R|
00001070: 24 28 49 2C 49 32 29 22  11 22 00 8D 18 B2 02 4C  |$(I,I2)".".....L|
00001080: 31 B2 C3 28 52 24 28 49  2C 49 32 29 29 00 9C 18  |1..(R$(I,I2))...|
00001090: C6 02 82 49 32 3A 97 31  39 38 2C 30 00 BE 18 D0  |...I2:.198,0....|
000010A0: 02 A1 47 54 24 3A 47 54  B2 C5 28 47 54 24 29 3A  |..GT$:GT..(GT$):|
000010B0: 8B 47 54 B3 31 B0 47 54  B1 35 A7 37 32 30 00 DC  |.GT.1.GT.5.720..|
000010C0: 18 DA 02 41 24 28 50 29  B2 41 24 28 50 29 AA C7  |...A$(P).A$(P)..|
000010D0: 28 47 54 29 3A 82 49 3A  89 34 39 30 00 00 19 DD  |(GT):.I:.490....|
000010E0: 02 44 44 24 B2 22 53 41  56 45 20 41 4E 53 57 45  |.DD$."SAVE ANSWE|
000010F0: 52 53 20 4F 4E 22 3A 53  41 B2 31 3A 89 37 33 35  |RS ON":SA.1:.735|
00001100: 00 21 19 DE 02 44 44 24  B2 22 4C 4F 41 44 20 41  |.!...DD$."LOAD A|
00001110: 4E 53 57 45 52 53 20 46  52 4F 4D 22 3A 53 41 B2  |NSWERS FROM":SA.|
00001120: 30 00 3C 19 DF 02 8D 32  33 36 30 3A 8B 44 44 24  |0.<....2360:.DD$|
00001130: B2 22 41 42 4F 52 54 22  A7 34 39 30 00 68 19 E0  |."ABORT".490.h..|
00001140: 02 8B 44 B2 38 A7 8D 32  36 32 30 3A 8B 45 46 B2  |..D.8..2620:.EF.|
00001150: 31 A7 99 22 11 22 44 4E  24 3A 8D 32 37 30 3A 8D  |1.."."DN$:.270:.|
00001160: 33 31 30 3A 89 37 36 35  00 A0 19 E1 02 8D 32 31  |310:.765......21|
00001170: 35 30 3A 8B 44 B2 31 A7  99 22 11 20 20 20 4C 4F  |50:.D.1..".   LO|
00001180: 41 44 20 41 4E 44 20 52  45 57 49 4E 44 20 41 4E  |AD AND REWIND AN|
00001190: 53 57 45 52 20 22 44 44  24 3A 99 3A 89 37 33 39  |SWER "DD$:.:.739|
000011A0: 00 BD 19 E2 02 99 22 11  20 20 20 4C 4F 41 44 20  |......".   LOAD |
000011B0: 41 4E 53 57 45 52 20 22  44 44 24 3A 99 00 DE 19  |ANSWER "DD$:....|
000011C0: E3 02 8D 32 37 30 30 3A  8B 44 B2 38 AF 4F 50 B2  |...2700:.D.8.OP.|
000011D0: 32 A7 46 24 B2 46 24 AA  22 2C 53 2C 57 22 00 F7  |2.F$.F$.",S,W"..|
000011E0: 19 E4 02 9F 31 2C 44 2C  53 41 2C 46 24 3A 8B 44  |....1,D,SA,F$:.D|
000011F0: B3 B1 38 A7 37 34 33 00  0D 1A E5 02 8D 32 36 35  |..8.743......265|
00001200: 30 3A 8B 44 4D B2 36 33  A7 32 39 30 30 00 32 1A  |0:.DM.63.2900.2.|
00001210: E6 02 8B 44 4D B1 31 39  A7 99 22 11 20 20 20 22  |...DM.19..".   "|
00001220: 44 4D 24 3A 8D 32 37 30  3A 8D 33 31 30 3A 89 37  |DM$:.270:.310:.7|
00001230: 36 35 00 40 1A E7 02 8B  4F 50 B2 33 A7 37 37 30  |65.@....OP.3.770|
00001240: 00 69 1A F8 02 98 31 2C  50 3A 81 49 B2 31 A4 50  |.i....1,P:.I.1.P|
00001250: 3A 98 31 2C 41 24 28 49  29 3A 8D 32 39 30 3A 82  |:.1,A$(I):.290:.|
00001260: 49 3A A0 31 3A 89 34 39  30 00 77 1A FD 02 8B 4F  |I:.1:.490.w....O|
00001270: 50 B2 33 A7 37 33 34 00  80 1A FE 02 89 37 33 33  |P.3.734......733|
00001280: 00 A1 1A 02 03 84 31 2C  50 3A 81 49 B2 31 A4 50  |......1,P:.I.1.P|
00001290: 3A 84 31 2C 41 24 28 49  29 3A 8D 32 39 30 3A 82  |:.1,A$(I):.290:.|
000012A0: 49 00 A8 1A 0C 03 A0 31  00 C2 1A 0D 03 8D 32 31  |I......1......21|
000012B0: 35 30 3A 99 3A 52 B2 36  3A 52 31 B2 36 3A 52 32  |50:.:R.6:R1.6:R2|
000012C0: B2 36 00 F8 1A 0E 03 51  51 B2 30 3A 51 45 B2 35  |.6.....QQ.0:QE.5|
000012D0: 3A 99 22 20 50 52 49 4E  54 20 4F 55 54 20 4E 41  |:." PRINT OUT NA|
000012E0: 4D 45 53 20 4F 4E 20 46  49 4C 45 20 59 2F 4E 20  |MES ON FILE Y/N |
000012F0: 22 3B 3A 8D 32 34 35 30  00 08 1B 0F 03 8B 41 24  |";:.2450......A$|
00001300: B2 22 4E 22 A7 34 39 30  00 31 1B 10 03 8B 41 24  |."N".490.1....A$|
00001310: B3 B1 22 59 22 B0 51 51  B2 39 39 A7 8D 36 30 3A  |.."Y".QQ.99..60:|
00001320: 43 B2 30 3A 8D 32 37 30  3A 8D 35 30 3A 89 37 38  |C.0:.270:.50:.78|
00001330: 32 00 5C 1B 11 03 44 B2  34 3A 8D 32 36 32 30 3A  |2.\...D.4:.2620:|
00001340: 8B 45 46 B2 31 A7 99 22  11 22 44 4E 24 3A 8D 32  |.EF.1.."."DN$:.2|
00001350: 37 30 3A 8D 33 31 30 3A  89 37 38 31 00 66 1B 12  |70:.310:.781.f..|
00001360: 03 89 33 36 30 30 00 73  1B 16 03 8B 50 B2 30 A7  |..3600.s....P.0.|
00001370: 34 39 30 00 92 1B 1B 03  53 39 B2 30 3A 4B 38 B2  |490.....S9.0:K8.|
00001380: 31 3A 4B 39 B2 50 3A 8B  50 B1 31 35 A7 4B 39 B2  |1:K9.P:.P.15.K9.|
00001390: 31 35 00 AC 1B 20 03 8D  32 31 36 30 3A 8D 34 30  |15... ..2160:.40|
000013A0: 30 3A 97 31 39 38 2C 30  3A 8D 37 30 00 E8 1B 25  |0:.198,0:.70...%|
000013B0: 03 51 51 B2 30 3A 51 45  B2 35 3A 99 22 20 4E 55  |.QQ.0:QE.5:." NU|
000013C0: 4D 42 45 52 20 4F 46 20  50 45 52 53 4F 4E 20 54  |MBER OF PERSON T|
000013D0: 4F 20 44 45 4C 45 54 45  20 22 3B 3A 8D 32 34 35  |O DELETE ";:.245|
000013E0: 30 3A 47 54 24 B2 41 24  00 F9 1B 2A 03 8B 47 54  |0:GT$.A$...*..GT|
000013F0: 24 B2 22 45 22 A7 34 39  30 00 0B 1C 2B 03 8B 47  |$."E".490...+..G|
00001400: 54 24 B3 B1 22 4E 22 A7  38 32 30 00 1A 1C 2C 03  |T$.."N".820...,.|
00001410: 8B 50 B3 B2 31 35 A7 38  30 30 00 39 1C 2D 03 8B  |.P..15.800.9.-..|
00001420: 53 39 B2 30 A7 53 39 B2  31 3A 4B 38 B2 31 36 3A  |S9.0.S9.1:K8.16:|
00001430: 4B 39 B2 50 3A 89 38 30  30 00 42 1C 2E 03 89 37  |K9.P:.800.B....7|
00001440: 39 35 00 50 1C 34 03 50  31 B2 C5 28 47 54 24 29  |95.P.4.P1..(GT$)|
00001450: 00 86 1C 39 03 8B 50 31  B3 4B 38 B0 50 31 B1 4B  |...9..P1.K8.P1.K|
00001460: 39 B0 51 51 B2 39 39 B0  B5 28 50 31 29 B3 B1 50  |9.QQ.99..(P1)..P|
00001470: 31 A7 8D 32 37 30 3A 8D  35 30 3A 9E 35 39 39 30  |1..270:.50:.5990|
00001480: 33 3A 89 38 30 35 00 94  1C 3E 03 8B 50 31 B2 50  |3:.805...>..P1.P|
00001490: A7 38 35 30 00 B3 1C 48  03 81 49 B2 50 31 A4 50  |.850...H..I.P1.P|
000014A0: AB 31 3A 41 24 28 49 29  B2 41 24 28 49 AA 31 29  |.1:A$(I).A$(I.1)|
000014B0: 3A 82 49 00 CC 1C 52 03  41 24 28 50 29 B2 22 20  |:.I...R.A$(P)." |
000014C0: 22 3A 50 B2 50 AB 31 3A  89 37 39 30 00 DF 1C 5C  |":P.P.1:.790...\|
000014D0: 03 8B 50 B3 32 A7 8D 32  37 30 3A 89 34 39 30 00  |..P.2..270:.490.|
000014E0: FE 1C 61 03 53 39 B2 30  3A 4B 38 B2 31 3A 4B 39  |..a.S9.0:K8.1:K9|
000014F0: B2 50 3A 8B 50 B1 31 35  A7 4B 39 B2 31 35 00 18  |.P:.P.15.K9.15..|
00001500: 1D 66 03 8D 32 31 35 30  3A 8D 34 30 30 3A 97 31  |.f..2150:.400:.1|
00001510: 39 38 2C 30 3A 8D 37 30  00 53 1D 6B 03 51 51 B2  |98,0:.70.S.k.QQ.|
00001520: 30 3A 51 45 B2 35 3A 99  22 20 4E 55 4D 42 45 52  |0:QE.5:." NUMBER|
00001530: 20 4F 46 20 50 45 52 53  4F 4E 20 54 4F 20 43 48  | OF PERSON TO CH|
00001540: 45 43 4B 20 22 3B 3A 8D  32 34 35 30 3A 47 54 24  |ECK ";:.2450:GT$|
00001550: B2 41 24 00 64 1D 70 03  8B 47 54 24 B2 22 45 22  |.A$.d.p..GT$."E"|
00001560: A7 34 39 30 00 76 1D 71  03 8B 47 54 24 B3 B1 22  |.490.v.q..GT$.."|
00001570: 4E 22 A7 38 39 30 00 85  1D 72 03 8B 50 B3 B2 31  |N".890...r..P..1|
00001580: 35 A7 38 37 30 00 A4 1D  75 03 8B 53 39 B2 30 A7  |5.870...u..S9.0.|
00001590: 53 39 B2 31 3A 4B 38 B2  31 36 3A 4B 39 B2 50 3A  |S9.1:K8.16:K9.P:|
000015A0: 89 38 37 30 00 AD 1D 76  03 89 38 36 35 00 BB 1D  |.870...v..865...|
000015B0: 7A 03 50 31 B2 C5 28 47  54 24 29 00 F1 1D 7F 03  |z.P1..(GT$).....|
000015C0: 8B 50 31 B3 4B 38 B0 50  31 B1 4B 39 B0 51 51 B2  |.P1.K8.P1.K9.QQ.|
000015D0: 39 39 B0 B5 28 50 31 29  B3 B1 50 31 A7 8D 32 37  |99..(P1)..P1..27|
000015E0: 30 3A 8D 35 30 3A 9E 35  39 39 30 33 3A 89 38 37  |0:.50:.59903:.87|
000015F0: 35 00 27 1E 84 03 8D 32  31 35 30 3A 99 22 20 50  |5.'....2150:." P|
00001600: 4C 45 41 53 45 20 57 41  49 54 20 3A 22 3A 99 22  |LEASE WAIT :":."|
00001610: 11 20 43 4F 4D 50 55 54  49 4E 47 20 53 43 4F 52  |. COMPUTING SCOR|
00001620: 45 53 20 46 4F 52 22 00  47 1E 89 03 99 22 11 20  |ES FOR".G....". |
00001630: 22 C8 28 41 24 28 50 31  29 2C 31 35 29 3A 8D 39  |".(A$(P1),15):.9|
00001640: 31 30 3A 89 39 39 30 00  90 1E 8E 03 50 53 24 B2  |10:.990.....PS$.|
00001650: CA 28 41 24 28 50 31 29  2C 31 38 2C 31 29 3A 4D  |.(A$(P1),18,1):M|
00001660: 31 B2 C6 28 CA 28 41 24  28 50 31 29 2C 31 39 2C  |1..(.(A$(P1),19,|
00001670: 31 29 29 AB 31 35 30 3A  4D 32 B2 C6 28 CA 28 41  |1)).150:M2..(.(A|
00001680: 24 28 50 31 29 2C 32 30  2C 31 29 29 AB 31 35 30  |$(P1),20,1)).150|
00001690: 00 99 1E 98 03 53 57 B2  30 00 B8 1E A2 03 81 49  |.....SW.0......I|
000016A0: B2 31 A4 50 3A 8B 49 B2  50 31 A7 50 25 28 49 29  |.1.P:.I.P1.P%(I)|
000016B0: B2 AB 31 3A 89 39 38 30  00 DE 1E AC 03 8B 50 53  |..1:.980......PS|
000016C0: 24 B3 B1 CA 28 41 24 28  49 29 2C 31 37 2C 31 29  |$...(A$(I),17,1)|
000016D0: A7 50 25 28 49 29 B2 AB  31 3A 89 39 38 30 00 15  |.P%(I)..1:.980..|
000016E0: 1F B6 03 4D 33 B2 C6 28  CA 28 41 24 28 49 29 2C  |...M3..(.(A$(I),|
000016F0: 31 36 2C 31 29 29 AB 31  35 30 3A 8B 4D 33 B3 4D  |16,1)).150:.M3.M|
00001700: 31 B0 4D 33 B1 4D 32 A7  50 25 28 49 29 B2 AB 31  |1.M3.M2.P%(I)..1|
00001710: 3A 89 39 38 30 00 35 1F  C0 03 50 25 28 49 29 B2  |:.980.5...P%(I).|
00001720: 31 30 30 3A 53 57 B2 31  3A 81 49 32 B2 32 31 A4  |100:SW.1:.I2.21.|
00001730: 32 30 AA 4E 51 00 6F 1F  CA 03 50 25 28 49 29 B2  |20.NQ.o...P%(I).|
00001740: 50 25 28 49 29 AB B6 28  C6 28 CA 28 41 24 28 50  |P%(I)..(.(.(A$(P|
00001750: 31 29 2C 49 32 2C 31 29  29 AB C6 28 CA 28 41 24  |1),I2,1))..(.(A$|
00001760: 28 49 29 2C 49 32 2C 31  29 29 29 3A 82 49 32 00  |(I),I2,1))):.I2.|
00001770: 78 1F D4 03 82 49 3A 8E  00 8D 1F DE 03 53 53 B2  |x....I:......SS.|
00001780: 31 30 30 3A 53 46 B2 30  3A 53 50 B2 30 00 C4 1F  |100:SF.0:SP.0...|
00001790: E3 03 8D 32 31 35 30 3A  99 22 20 20 50 41 52 54  |...2150:."  PART|
000017A0: 4E 45 52 53 20 46 4F 52  20 22 C8 28 41 24 28 50  |NERS FOR ".(A$(P|
000017B0: 31 29 2C 31 35 29 A3 33  30 29 22 53 43 4F 52 45  |1),15).30)"SCORE|
000017C0: 20 25 11 22 00 F9 1F F2  03 8B 53 57 B2 30 A7 99  | %."......SW.0..|
000017D0: 22 11 20 4E 4F 20 53 55  49 54 41 42 4C 45 20 50  |". NO SUITABLE P|
000017E0: 41 52 54 4E 45 52 53 20  46 4F 55 4E 44 2E 22 3A  |ARTNERS FOUND.":|
000017F0: 8D 33 31 30 3A 89 38 37  30 00 21 20 FC 03 81 49  |.310:.870.! ...I|
00001800: B2 53 53 A4 53 46 A9 AB  31 3A 81 49 32 B2 31 A4  |.SS.SF..1:.I2.1.|
00001810: 50 3A 8B 49 B3 B1 50 25  28 49 32 29 A7 31 30 36  |P:.I..P%(I2).106|
00001820: 35 00 44 20 06 04 99 22  20 22 C9 28 C4 28 49 32  |5.D ..." ".(.(I2|
00001830: 29 2C 32 29 22 20 22 C8  28 41 24 28 49 32 29 2C  |),2)" ".(A$(I2),|
00001840: 31 35 29 3B 00 65 20 10  04 8B 50 25 28 49 32 29  |15);.e ...P%(I2)|
00001850: B2 31 30 30 A7 99 A3 33  31 29 22 31 30 30 22 3A  |.100...31)"100":|
00001860: 89 31 30 36 30 00 7D 20  1A 04 99 A3 33 32 29 C9  |.1060.} ....32).|
00001870: 28 C4 28 50 25 28 49 32  29 29 2C 32 29 00 9B 20  |(.(P%(I2)),2).. |
00001880: 24 04 53 50 B2 53 50 AA  31 3A 8B 53 50 B2 31 35  |$.SP.SP.1:.SP.15|
00001890: A7 53 53 B2 49 3A 89 31  30 37 30 00 A6 20 29 04  |.SS.I:.1070.. ).|
000018A0: 82 49 32 3A 82 49 00 DE  20 2E 04 8D 37 30 3A 97  |.I2:.I.. ...70:.|
000018B0: 31 39 38 2C 30 3A 99 22  20 4E 55 4D 42 45 52 20  |198,0:." NUMBER |
000018C0: 4F 46 20 50 45 52 53 4F  4E 20 54 4F 20 4D 41 54  |OF PERSON TO MAT|
000018D0: 43 48 20 57 49 54 48 22  3A 52 B2 52 AA 31 00 0B  |CH WITH":R.R.1..|
000018E0: 21 33 04 51 51 B2 30 3A  51 45 B2 35 3A 99 22 20  |!3.QQ.0:QE.5:." |
000018F0: 22 C8 28 41 24 28 50 31  29 2C 31 35 29 3B 3A 8D  |".(A$(P1),15);:.|
00001900: 32 34 35 30 3A 47 54 24  B2 41 24 00 1C 21 38 04  |2450:GT$.A$..!8.|
00001910: 8B 47 54 24 B2 22 45 22  A7 38 37 30 00 33 21 3D  |.GT$."E".870.3!=|
00001920: 04 8B 47 54 24 B2 22 4E  22 AF 53 50 B2 31 35 A7  |..GT$."N".SP.15.|
00001930: 39 39 35 00 44 21 3E 04  8B 47 54 24 B2 22 4E 22  |995.D!>..GT$."N"|
00001940: A7 39 39 30 00 52 21 42  04 50 32 B2 C5 28 47 54  |.990.R!B.P2..(GT|
00001950: 24 29 00 76 21 45 04 8B  50 32 B3 31 B0 50 32 B1  |$).v!E..P2.1.P2.|
00001960: 50 B0 51 51 B2 39 39 B0  B5 28 50 32 29 B3 B1 50  |P.QQ.99..(P2)..P|
00001970: 32 A7 31 31 32 30 00 89  21 4C 04 8B 50 25 28 50  |2.1120..!L..P%(P|
00001980: 32 29 B3 30 A7 31 31 32  30 00 9F 21 56 04 8D 31  |2).0.1120..!V..1|
00001990: 31 32 35 3A 8D 31 31 34  30 3A 89 31 31 35 30 00  |125:.1140:.1150.|
000019A0: B9 21 60 04 8D 32 37 30  3A 8D 35 30 3A 9E 35 39  |.!`..270:.50:.59|
000019B0: 39 30 33 3A 89 31 30 37  35 00 C3 21 65 04 8D 32  |903:.1075..!e..2|
000019C0: 31 35 30 00 F7 21 6A 04  99 22 20 22 C8 28 41 24  |150..!j.." ".(A$|
000019D0: 28 50 31 29 2C 31 35 29  3A 99 3A 99 22 20 41 4E  |(P1),15):.:." AN|
000019E0: 44 22 3A 99 3A 99 22 20  22 C8 28 41 24 28 50 32  |D":.:." ".(A$(P2|
000019F0: 29 2C 31 35 29 3A 8E 00  34 22 74 04 99 22 11 9F  |),15):..4"t.."..|
00001A00: 12 22 53 50 24 22 92 05  22 3A 99 50 25 28 50 32  |."SP$"..":.P%(P2|
00001A10: 29 22 25 20 20 22 54 24  28 A5 41 28 50 25 28 50  |)"%  "T$(.A(P%(P|
00001A20: 32 29 29 29 3A 99 22 11  9F 12 22 53 50 24 22 92  |2))):."..."SP$".|
00001A30: 05 22 3A 8E 00 42 22 7E  04 8D 33 31 30 3A 53 32  |.":..B"~..310:S2|
00001A40: B2 30 00 56 22 88 04 8D  31 31 32 35 3A 99 22 11  |.0.V"...1125:.".|
00001A50: 9F 12 22 53 50 24 00 89  22 92 04 99 22 05 20 20  |.."SP$.."...".  |
00001A60: 20 20 41 52 45 41 53 20  4F 46 20 4C 49 4B 45 4C  |  AREAS OF LIKEL|
00001A70: 59 20 43 4F 4E 46 4C 49  43 54 11 22 3A 99 22 12  |Y CONFLICT.":.".|
00001A80: 9F 22 53 50 24 22 92 05  22 00 C6 22 9C 04 81 49  |."SP$"..".."...I|
00001A90: B2 32 31 A4 32 30 AA 4E  51 3A 8B B6 28 C6 28 CA  |.21.20.NQ:..(.(.|
00001AA0: 28 41 24 28 50 31 29 2C  49 2C 31 29 29 AB C6 28  |(A$(P1),I,1))..(|
00001AB0: CA 28 41 24 28 50 32 29  2C 49 2C 31 29 29 29 B3  |.(A$(P2),I,1))).|
00001AC0: 33 A7 31 32 30 30 00 FB  22 A6 04 52 31 B2 31 37  |3.1200.."..R1.17|
00001AD0: 3A 52 32 B2 32 34 3A 8D  36 30 3A 52 B2 31 37 3A  |:R2.24:.60:R.17:|
00001AE0: 43 B2 30 3A 8D 35 30 3A  53 32 B2 31 3A 99 44 24  |C.0:.50:S2.1:.D$|
00001AF0: 28 49 AB 32 30 29 3A 8D  33 31 30 00 27 23 B0 04  |(I.20):.310.'#..|
00001B00: 82 49 3A 8B 53 32 B2 30  A7 99 22 11 20 4E 4F 20  |.I:.S2.0..". NO |
00001B10: 41 52 45 41 53 20 4F 46  20 43 4F 4E 46 4C 49 43  |AREAS OF CONFLIC|
00001B20: 54 22 3A 8D 33 31 30 00  41 23 B1 04 8D 32 31 35  |T":.310.A#...215|
00001B30: 30 3A 99 3A 52 B2 36 3A  52 31 B2 36 3A 52 32 B2  |0:.:R.6:R1.6:R2.|
00001B40: 36 00 79 23 B2 04 51 51  B2 30 3A 51 45 B2 35 3A  |6.y#..QQ.0:QE.5:|
00001B50: 99 22 20 50 52 49 4E 54  20 43 4F 4D 50 41 54 49  |." PRINT COMPATI|
00001B60: 42 49 4C 49 54 59 20 43  48 45 43 4B 20 59 2F 4E  |BILITY CHECK Y/N|
00001B70: 20 22 3B 3A 8D 32 34 35  30 00 89 23 B3 04 8B 41  | ";:.2450..#...A|
00001B80: 24 B2 22 4E 22 A7 39 39  30 00 B3 23 B4 04 8B 41  |$."N".990..#...A|
00001B90: 24 B3 B1 22 59 22 B0 51  51 B2 39 39 A7 8D 36 30  |$.."Y".QQ.99..60|
00001BA0: 3A 43 B2 30 3A 8D 32 37  30 3A 8D 35 30 3A 89 31  |:C.0:.270:.50:.1|
00001BB0: 32 30 32 00 DF 23 B5 04  44 B2 34 3A 8D 32 36 32  |202..#..D.4:.262|
00001BC0: 30 3A 8B 45 46 B2 31 A7  99 22 11 22 44 4E 24 3A  |0:.EF.1.."."DN$:|
00001BD0: 8D 32 37 30 3A 8D 33 31  30 3A 89 31 32 30 31 00  |.270:.310:.1201.|
00001BE0: E9 23 B6 04 89 33 35 30  30 00 F2 23 BA 04 89 39  |.#...3500..#...9|
00001BF0: 39 30 00 05 24 C4 04 8B  50 B3 32 A7 8D 32 37 30  |90..$...P.2..270|
00001C00: 3A 89 34 39 30 00 3F 24  CE 04 81 50 31 B2 31 A4  |:.490.?$...P1.1.|
00001C10: 50 3A 8D 32 31 35 30 3A  99 22 11 20 20 53 45 41  |P:.2150:.".  SEA|
00001C20: 52 43 48 49 4E 47 20 46  4F 52 20 42 45 53 54 20  |RCHING FOR BEST |
00001C30: 50 41 52 54 4E 45 52 20  46 4F 52 20 3A 11 22 00  |PARTNER FOR :.".|
00001C40: 63 24 D8 04 99 22 20 20  22 C8 28 41 24 28 50 31  |c$..."  ".(A$(P1|
00001C50: 29 2C 31 35 29 3A 81 44  45 B2 31 A4 35 30 30 3A  |),15):.DE.1.500:|
00001C60: 82 44 45 00 78 24 E2 04  8D 39 31 30 3A 8B 53 57  |.DE.x$...910:.SW|
00001C70: B3 B1 30 A7 31 32 38 30  00 9A 24 EC 04 8D 32 31  |..0.1280..$...21|
00001C80: 35 30 3A 99 22 11 20 53  4F 52 52 59 20 22 C8 28  |50:.". SORRY ".(|
00001C90: 41 24 28 50 31 29 2C 31  35 29 00 CB 24 F6 04 99  |A$(P1),15)..$...|
00001CA0: 22 11 20 43 41 4E 27 54  20 46 49 4E 44 20 59 4F  |". CAN'T FIND YO|
00001CB0: 55 20 41 20 53 55 49 54  41 42 4C 45 20 50 41 52  |U A SUITABLE PAR|
00001CC0: 54 4E 45 52 22 3A 89 31  33 31 30 00 F3 24 00 05  |TNER":.1310..$..|
00001CD0: 81 49 B2 31 30 30 A4 30  A9 AB 31 3A 81 49 32 B2  |.I.100.0..1:.I2.|
00001CE0: 31 A4 50 3A 8B 49 B3 B1  50 25 28 49 32 29 A7 31  |1.P:.I..P%(I2).1|
00001CF0: 33 30 30 00 0F 25 0A 05  50 32 B2 49 32 3A 8D 31  |300..%..P2.I2:.1|
00001D00: 31 32 35 3A 8D 31 31 34  30 3A 89 31 33 31 30 00  |125:.1140:.1310.|
00001D10: 1A 25 14 05 82 49 32 3A  82 49 00 27 25 1E 05 8D  |.%...I2:.I.'%...|
00001D20: 33 31 30 3A 82 50 31 00  41 25 1F 05 8D 32 31 35  |310:.P1.A%...215|
00001D30: 30 3A 99 3A 52 B2 36 3A  52 31 B2 36 3A 52 32 B2  |0:.:R.6:R1.6:R2.|
00001D40: 36 00 77 25 20 05 51 51  B2 30 3A 51 45 B2 35 3A  |6.w% .QQ.0:QE.5:|
00001D50: 99 22 20 50 52 49 4E 54  20 4F 55 54 20 50 45 52  |." PRINT OUT PER|
00001D60: 46 45 43 54 20 50 41 49  52 53 20 59 2F 4E 20 22  |FECT PAIRS Y/N "|
00001D70: 3B 3A 8D 32 34 35 30 00  87 25 21 05 8B 41 24 B2  |;:.2450..%!..A$.|
00001D80: 22 4E 22 A7 34 39 30 00  B1 25 22 05 8B 41 24 B3  |"N".490..%"..A$.|
00001D90: B1 22 59 22 B0 51 51 B2  39 39 A7 8D 36 30 3A 43  |."Y".QQ.99..60:C|
00001DA0: B2 30 3A 8D 32 37 30 3A  8D 35 30 3A 89 31 33 31  |.0:.270:.50:.131|
00001DB0: 32 00 DD 25 23 05 44 B2  34 3A 8D 32 36 32 30 3A  |2..%#.D.4:.2620:|
00001DC0: 8B 45 46 B2 31 A7 99 22  11 22 44 4E 24 3A 8D 32  |.EF.1.."."DN$:.2|
00001DD0: 37 30 3A 8D 33 31 30 3A  89 31 33 31 31 00 E7 25  |70:.310:.1311..%|
00001DE0: 24 05 89 32 38 30 30 00  0F 26 3C 05 97 35 33 32  |$..2800..&<..532|
00001DF0: 38 30 2C 36 3A 97 35 33  32 38 31 2C 31 3A 8D 31  |80,6:.53281,1:.1|
00001E00: 36 30 3A 99 22 91 91 91  91 91 91 91 22 3A 80 00  |60:.".......":..|
00001E10: 19 26 D0 07 8D 32 31 35  30 00 63 26 D5 07 99 22  |.&...2150.c&..."|
00001E20: 11 4D 41 54 43 48 4D 41  4B 45 52 20 53 54 4F 52  |.MATCHMAKER STOR|
00001E30: 45 53 20 59 4F 55 52 20  41 4E 53 57 45 52 53 20  |ES YOUR ANSWERS |
00001E40: 54 4F 20 32 35 11 20 20  20 20 50 45 52 53 4F 4E  |TO 25.    PERSON|
00001E50: 41 4C 20 51 55 45 53 54  49 4F 4E 53 20 41 4E 44  |AL QUESTIONS AND|
00001E60: 20 22 3B 00 A4 26 DA 07  99 22 57 49 4C 4C 20 43  | ";..&..."WILL C|
00001E70: 4F 4D 50 41 52 45 20 59  4F 55 52 11 53 43 4F 52  |OMPARE YOUR.SCOR|
00001E80: 45 20 57 49 54 48 20 54  48 45 20 53 43 4F 52 45  |E WITH THE SCORE|
00001E90: 53 20 4F 46 20 45 56 45  52 59 4F 4E 45 20 45 4C  |S OF EVERYONE EL|
00001EA0: 53 45 11 22 00 EE 26 E4  07 99 22 50 41 52 54 49  |SE."..&..."PARTI|
00001EB0: 43 49 50 41 54 49 4E 47  2E 20 52 45 53 55 4C 54  |CIPATING. RESULT|
00001EC0: 53 20 41 52 45 20 41 56  41 49 4C 41 42 4C 45 22  |S ARE AVAILABLE"|
00001ED0: 3A 99 22 11 41 46 54 45  52 20 54 57 4F 20 4F 52  |:.".AFTER TWO OR|
00001EE0: 20 4D 4F 52 45 20 50 45  4F 50 4C 45 22 3B 00 24  | MORE PEOPLE";.$|
00001EF0: 27 EE 07 99 22 20 48 41  56 45 20 41 4E 53 57 45  |'..." HAVE ANSWE|
00001F00: 52 45 44 22 3A 99 22 11  54 48 45 20 51 55 45 53  |RED":.".THE QUES|
00001F10: 54 49 4F 4E 53 2E 22 3A  8D 33 31 30 3A 8D 32 31  |TIONS.":.310:.21|
00001F20: 35 30 3A 99 00 6C 27 F8  07 99 22 41 4E 53 57 45  |50:..l'..."ANSWE|
00001F30: 52 20 54 48 45 20 51 55  45 53 54 49 4F 4E 53 20  |R THE QUESTIONS |
00001F40: 48 4F 4E 45 53 54 4C 59  20 28 41 4E 44 11 22 3A  |HONESTLY (AND.":|
00001F50: 99 22 54 48 45 52 45 27  53 20 4E 4F 20 52 45 41  |."THERE'S NO REA|
00001F60: 53 4F 4E 20 4E 4F 54 20  54 4F 22 3B 00 AB 27 02  |SON NOT TO";..'.|
00001F70: 08 99 22 20 41 53 20 59  4F 55 52 20 41 4E 53 57  |.." AS YOUR ANSW|
00001F80: 45 52 53 11 41 52 45 20  43 4F 4E 46 49 44 45 4E  |ERS.ARE CONFIDEN|
00001F90: 54 49 41 4C 29 20 41 4E  44 20 54 48 45 20 50 52  |TIAL) AND THE PR|
00001FA0: 4F 47 52 41 4D 20 57 49  4C 4C 22 00 DB 27 0C 08  |OGRAM WILL"..'..|
00001FB0: 99 22 11 50 41 49 52 20  43 4F 55 50 4C 45 53 20  |.".PAIR COUPLES |
00001FC0: 41 43 43 4F 52 44 49 4E  47 20 54 4F 20 43 4F 4D  |ACCORDING TO COM|
00001FD0: 50 41 54 49 42 49 4C 49  54 59 22 00 09 28 16 08  |PATIBILITY"..(..|
00001FE0: 99 22 11 4F 52 20 47 49  56 45 20 41 20 50 45 52  |.".OR GIVE A PER|
00001FF0: 43 45 4E 54 41 47 45 20  4F 46 1D 43 4F 4D 50 41  |CENTAGE OF.COMPA|
00002000: 54 49 42 49 4C 49 54 59  22 00 35 28 20 08 99 22  |TIBILITY".5( .."|
00002010: 11 42 45 54 57 45 45 4E  20 53 45 4C 45 43 54 45  |.BETWEEN SELECTE|
00002020: 44 20 43 4F 55 50 4C 45  53 2E 22 3A 8D 33 31 30  |D COUPLES.":.310|
00002030: 3A 89 34 39 30 00 43 28  34 08 4C 53 B2 C3 28 46  |:.490.C(4.LS..(F|
00002040: 50 24 29 00 56 28 3E 08  8B 4C 53 B3 B2 34 30 A7  |P$).V(>..LS..40.|
00002050: 99 46 50 24 3A 8E 00 83  28 48 08 99 C8 28 46 50  |.FP$:...(H...(FP|
00002060: 24 2C 34 30 29 3A 46 50  24 B2 CA 28 46 50 24 2C  |$,40):FP$..(FP$,|
00002070: 34 31 29 3A 4C 53 B2 C3  28 46 50 24 29 3A 89 32  |41):LS..(FP$):.2|
00002080: 31 31 30 00 99 28 66 08  97 35 33 32 38 30 2C 35  |110..(f..53280,5|
00002090: 3A 97 35 33 32 38 31 2C  30 00 B7 28 70 08 99 22  |:.53281,0..(p.."|
000020A0: 93 05 11 22 A3 31 35 29  4D 54 24 3A 99 22 11 12  |...".15)MT$:."..|
000020B0: 22 53 50 24 22 92 22 00  BD 28 7A 08 8E 00 E7 28  |"SP$"."..(z....(|
000020C0: D4 08 97 37 38 33 2C 31  3A 9E 28 36 35 35 32 30  |...783,1:.(65520|
000020D0: 29 3A 54 58 B2 C2 28 37  38 31 29 3A 54 59 B2 C2  |):TX..(781):TY..|
000020E0: 28 37 38 32 29 3A 8E 00  18 29 38 09 8D 32 31 35  |(782):...)8..215|
000020F0: 30 3A 97 31 39 38 2C 30  3A 99 22 92 05 20 20 20  |0:.198,0:."..   |
00002100: 20 20 12 20 31 20 92 20  20 20 22 3B 44 44 24 3B  |  . 1 .   ";DD$;|
00002110: 22 20 54 41 50 45 11 22  00 3A 29 42 09 99 22 20  |" TAPE.".:)B.." |
00002120: 20 20 20 20 12 20 32 20  92 20 20 20 22 3B 44 44  |    . 2 .   ";DD|
00002130: 24 3B 22 20 44 49 53 4B  11 22 00 69 29 4C 09 8B  |$;" DISK.".i)L..|
00002140: 4F 50 B2 32 B0 4F 50 B2  33 A7 99 22 20 20 20 20  |OP.2.OP.3.."    |
00002150: 20 12 20 33 20 92 20 20  20 52 45 54 55 52 4E 20  | . 3 .   RETURN |
00002160: 54 4F 20 4D 45 4E 55 11  22 00 A1 29 56 09 8D 32  |TO MENU."..)V..2|
00002170: 32 36 30 3A 51 51 B2 30  3A 99 22 20 20 20 20 20  |260:QQ.0:."     |
00002180: 22 45 43 24 3B 3A 51 45  B2 35 3A 8D 32 34 35 30  |"EC$;:QE.5:.2450|
00002190: 3A 47 54 24 B2 41 24 3A  47 54 B2 C5 28 47 54 24  |:GT$.A$:GT..(GT$|
000021A0: 29 00 BA 29 5B 09 54 4C  B2 33 3A 8B 4F 50 B2 33  |)..)[.TL.3:.OP.3|
000021B0: B0 4F 50 B2 32 A7 54 4C  B2 34 00 DF 29 60 09 8B  |.OP.2.TL.4..)`..|
000021C0: 51 51 B3 B1 39 39 AF 47  54 B1 30 AF 47 54 B3 54  |QQ..99.GT.0.GT.T|
000021D0: 4C AF B5 28 47 54 29 B2  47 54 A7 32 34 33 30 00  |L..(GT).GT.2430.|
000021E0: 0B 2A 6A 09 52 31 B2 54  58 3A 52 32 B2 54 58 3A  |.*j.R1.TX:R2.TX:|
000021F0: 52 B2 54 58 3A 8D 36 30  3A 43 B2 30 3A 8D 32 37  |R.TX:.60:C.0:.27|
00002200: 30 3A 8D 35 30 3A 89 32  33 39 30 00 38 2A 7E 09  |0:.50:.2390.8*~.|
00002210: 44 B2 31 3A 44 44 24 B2  22 54 41 50 45 22 3A 8B  |D.1:DD$."TAPE":.|
00002220: 47 54 B2 32 A7 44 B2 38  3A 44 44 24 B2 22 44 49  |GT.2.D.8:DD$."DI|
00002230: 53 4B 22 3A 53 41 B2 36  00 57 2A 83 09 8B 47 54  |SK":SA.6.W*...GT|
00002240: B2 33 A7 44 44 24 B2 22  41 42 4F 52 54 22 3A 44  |.3.DD$."ABORT":D|
00002250: B2 30 3A 53 41 B2 30 00  5D 2A 88 09 8E 00 7B 2A  |.0:SA.0.]*....{*|
00002260: 92 09 41 24 B2 22 22 3A  99 22 3F 20 22 3B 3A 43  |..A$."":."? ";:C|
00002270: 4E 54 B2 31 3A 97 31 39  38 2C 30 00 9B 2A 9C 09  |NT.1:.198,0..*..|
00002280: 97 37 38 33 2C 31 3A 9E  36 35 35 32 30 3A 57 58  |.783,1:.65520:WX|
00002290: B2 37 38 31 3A 57 59 B2  37 38 32 00 A9 2A A6 09  |.781:WY.782..*..|
000022A0: 46 B2 30 3A 8D 32 35 37  30 00 C6 2A B0 09 8B C6  |F.0:.2570..*....|
000022B0: 28 43 48 24 29 B2 31 33  AF 41 24 B3 B1 22 22 A7  |(CH$).13.A$.."".|
000022C0: 99 22 A0 22 3A 8E 00 E7  2A BA 09 8B C6 28 43 48  |.".":...*....(CH|
000022D0: 24 29 B2 32 30 AF 43 4E  54 B1 31 A7 8D 32 35 36  |$).20.CNT.1..256|
000022E0: 30 3A 89 32 34 37 30 00  00 2B C4 09 8B 43 48 24  |0:.2470..+...CH$|
000022F0: B2 22 20 22 AF 43 4E 54  B3 B1 31 A7 32 35 34 30  |." ".CNT..1.2540|
00002300: 00 2C 2B CE 09 8B 43 48  24 B2 22 2C 22 B0 43 48  |.,+...CH$.",".CH|
00002310: 24 B2 22 3A 22 B0 43 48  24 B2 22 3B 22 B0 43 48  |$.":".CH$.";".CH|
00002320: 24 B2 C7 28 33 34 29 A7  32 34 37 30 00 46 2B E2  |$..(34).2470.F+.|
00002330: 09 8B 43 48 24 B3 22 21  22 B0 43 48 24 B1 22 5F  |..CH$."!".CH$."_|
00002340: 22 A7 32 34 37 30 00 5F  2B EC 09 8B 43 4E 54 B1  |".2470._+...CNT.|
00002350: 51 45 A7 51 51 B2 39 39  3A 99 22 20 22 3A 8E 00  |QE.QQ.99:." ":..|
00002360: 83 2B F6 09 41 24 B2 41  24 AA 43 48 24 3A 99 43  |.+..A$.A$.CH$:.C|
00002370: 48 24 3B 3A 43 4E 54 B2  43 4E 54 AA 31 3A 89 32  |H$;:CNT.CNT.1:.2|
00002380: 34 37 30 00 AE 2B 00 0A  99 22 20 9D 9D 20 9D 22  |470..+..." .. ."|
00002390: 3B 3A 43 4E 54 B2 43 4E  54 AB 31 3A 41 24 B2 C8  |;:CNT.CNT.1:A$..|
000023A0: 28 41 24 2C C3 28 41 24  29 AB 31 29 3A 8E 00 C6  |(A$,.(A$).1):...|
000023B0: 2B 0A 0A 99 22 20 9D 22  3B 3A 8D 32 36 30 30 3A  |+..." .";:.2600:|
000023C0: 8B 46 B2 31 A7 8E 00 E0  2B 14 0A 99 22 12 20 92  |.F.1....+...". .|
000023D0: 9D 22 3B 3A 8D 32 36 30  30 3A 8B 46 B2 31 A7 8E  |.";:.2600:.F.1..|
000023E0: 00 EA 2B 1E 0A 89 32 35  37 30 00 0A 2C 28 0A 81  |..+...2570..,(..|
000023F0: 41 B2 31 A4 35 30 3A A1  43 48 24 3A 8B 43 48 24  |A.1.50:.CH$:.CH$|
00002400: B3 B1 22 22 A7 46 B2 31  3A 8E 00 13 2C 32 0A 82  |.."".F.1:...,2..|
00002410: 41 3A 8E 00 42 2C 3C 0A  45 46 B2 30 3A 9F 31 2C  |A:..B,<.EF.0:.1,|
00002420: 44 2C 30 3A 97 37 38 31  2C 31 3A 9E 28 36 35 34  |D,0:.781,1:.(654|
00002430: 38 31 29 3A 8B C2 28 37  38 33 29 AF 31 A7 45 46  |81):..(783).1.EF|
00002440: B2 31 00 51 2C 46 0A 9E  28 36 35 35 31 31 29 3A  |.1.Q,F..(65511):|
00002450: 8E 00 6E 2C 5A 0A 44 4D  B2 30 3A 9F 31 35 2C 38  |..n,Z.DM.0:.15,8|
00002460: 2C 31 35 3A 84 31 35 2C  44 4D 2C 44 4D 24 00 80  |,15:.15,DM,DM$..|
00002470: 2C 64 0A 8B 44 4D B1 31  39 A7 A0 31 3A A0 31 35  |,d..DM.19..1:.15|
00002480: 00 86 2C 6E 0A 8E 00 A6  2C 8C 0A 8D 32 32 36 30  |..,n....,...2260|
00002490: 3A 99 22 1D 1D 1D 45 4E  54 45 52 20 46 49 4C 45  |:."...ENTER FILE|
000024A0: 4E 41 4D 45 22 3B 00 CB  2C 96 0A 51 51 B2 30 3A  |NAME";..,..QQ.0:|
000024B0: 51 45 B2 31 36 3A 8D 32  34 35 30 3A 46 24 B2 41  |QE.16:.2450:F$.A|
000024C0: 24 3A 8B 51 51 B3 B1 39  39 A7 8E 00 F7 2C A0 0A  |$:.QQ..99....,..|
000024D0: 52 31 B2 54 58 3A 52 32  B2 54 58 3A 52 B2 54 58  |R1.TX:R2.TX:R.TX|
000024E0: 3A 8D 36 30 3A 43 B2 30  3A 8D 32 37 30 3A 8D 35  |:.60:C.0:.270:.5|
000024F0: 30 3A 89 32 37 30 30 00  16 2D F0 0A 9F 31 2C 34  |0:.2700..-...1,4|
00002500: 3A 9D 31 3A 99 C7 28 31  34 29 3B 4D 54 24 3B C7  |:.1:..(14);MT$;.|
00002510: 28 31 35 29 3A 99 00 39  2D F5 0A 99 C7 28 31 34  |(15):..9-....(14|
00002520: 29 22 50 45 52 46 45 43  54 20 50 41 49 52 53 22  |)"PERFECT PAIRS"|
00002530: C7 28 31 35 29 3A 99 3A  99 00 69 2D FA 0A 81 50  |.(15):.:..i-...P|
00002540: 31 B2 31 A4 50 3A 99 22  42 45 53 54 20 50 41 52  |1.1.P:."BEST PAR|
00002550: 54 4E 45 52 20 46 4F 52  20 22 3B C8 28 41 24 28  |TNER FOR ";.(A$(|
00002560: 50 31 29 2C 31 35 29 3A  99 00 7E 2D 0E 0B 8D 39  |P1),15):..~-...9|
00002570: 31 30 3A 8B 53 57 B3 B1  30 A7 32 38 36 30 00 B7  |10:.SW..0.2860..|
00002580: 2D 22 0B 99 22 20 53 4F  52 52 59 2C 20 43 41 4E  |-".." SORRY, CAN|
00002590: 27 54 20 46 49 4E 44 20  59 4F 55 20 41 20 53 55  |'T FIND YOU A SU|
000025A0: 49 54 41 42 4C 45 20 50  41 52 54 4E 45 52 22 3A  |ITABLE PARTNER":|
000025B0: 99 3A 89 32 38 39 30 00  DF 2D 2C 0B 81 49 B2 31  |.:.2890..-,..I.1|
000025C0: 30 30 A4 30 A9 AB 31 3A  81 49 32 B2 31 A4 50 3A  |00.0..1:.I2.1.P:|
000025D0: 8B 49 B3 B1 50 25 28 49  32 29 A7 32 38 38 30 00  |.I..P%(I2).2880.|
000025E0: FF 2D 36 0B 50 32 B2 49  32 3A 99 22 49 53 20 3A  |.-6.P2.I2:."IS :|
000025F0: 22 C8 28 41 24 28 50 32  29 2C 31 35 29 3A 99 00  |".(A$(P2),15):..|
00002600: 37 2E 3B 0B 99 22 43 4F  4D 50 41 54 49 42 49 4C  |7.;.."COMPATIBIL|
00002610: 49 54 59 20 3A 22 50 25  28 50 32 29 22 25 20 20  |ITY :"P%(P2)"%  |
00002620: 22 54 24 28 A5 41 28 50  25 28 50 32 29 29 29 3A  |"T$(.A(P%(P2))):|
00002630: 99 3A 89 32 38 39 30 00  42 2E 40 0B 82 49 32 3A  |.:.2890.B.@..I2:|
00002640: 82 49 00 79 2E 4A 0B 99  3A 82 50 31 3A 99 C7 28  |.I.y.J..:.P1:..(|
00002650: 31 34 29 22 45 4E 44 20  4F 46 20 50 45 52 46 45  |14)"END OF PERFE|
00002660: 43 54 20 50 41 49 52 53  22 C7 28 31 35 29 3A 98  |CT PAIRS".(15):.|
00002670: 31 3A A0 31 3A 89 34 39  30 00 85 2E 54 0B 99 3A  |1:.1:.490...T..:|
00002680: 8D 32 32 36 30 00 BB 2E  5E 0B 51 51 B2 30 3A 51  |.2260...^.QQ.0:Q|
00002690: 45 B2 35 3A 99 22 20 20  20 46 49 4C 45 20 45 58  |E.5:."   FILE EX|
000026A0: 49 53 54 53 20 2D 20 52  45 50 4C 41 43 45 20 59  |ISTS - REPLACE Y|
000026B0: 2F 4E 20 22 3B 3A 8D 32  34 35 30 00 CB 2E 68 0B  |/N ";:.2450...h.|
000026C0: 8B 41 24 B2 22 4E 22 A7  37 36 35 00 F9 2E 72 0B  |.A$."N".765...r.|
000026D0: 8B 41 24 B3 B1 22 59 22  B0 51 51 B2 39 39 A7 52  |.A$.."Y".QQ.99.R|
000026E0: 31 B2 54 58 3A 52 32 B2  54 59 3A 8D 32 37 30 3A  |1.TX:R2.TY:.270:|
000026F0: 8D 36 30 3A 89 32 39 31  30 00 0E 2F 7C 0B 46 24  |.60:.2910../|.F$|
00002700: B2 22 40 30 3A 22 AA 46  24 3A 89 37 34 30 00 18  |."@0:".F$:.740..|
00002710: 2F B8 0B 8D 32 31 36 30  00 44 2F C2 0B 44 B2 38  |/...2160.D/..D.8|
00002720: 3A 8D 32 36 32 30 3A 8B  45 46 B2 31 A7 99 22 92  |:.2620:.EF.1..".|
00002730: 11 1D 1D 1D 1D 22 3B 44  4E 24 3A 8D 33 31 30 3A  |.....";DN$:.310:|
00002740: 89 34 39 30 00 6A 2F CC  0B 8D 32 36 35 30 3A 8B  |.490.j/...2650:.|
00002750: 44 4D B1 31 39 A7 99 22  92 11 1D 1D 1D 1D 22 3B  |DM.19.."......";|
00002760: 44 4D 24 3A 8D 33 31 30  3A 8E 00 88 2F D6 0B 99  |DM$:.310:.../...|
00002770: A3 31 33 29 22 05 92 11  46 49 4C 45 53 20 4F 4E  |.13)"...FILES ON|
00002780: 20 44 49 53 4B 22 3A 99  00 A3 2F E0 0B 9F 31 34  | DISK":.../...14|
00002790: 2C 38 2C 30 2C 22 24 30  22 3A 44 44 B2 31 3A 44  |,8,0,"$0":DD.1:D|
000027A0: 43 B2 30 00 B2 2F EA 0B  A1 23 31 34 2C 41 24 2C  |C.0../...#14,A$,|
000027B0: 42 24 00 C1 2F F4 0B A1  23 31 34 2C 41 24 2C 42  |B$../...#14,A$,B|
000027C0: 24 00 D0 2F FE 0B A1 23  31 34 2C 41 24 2C 42 24  |$../...#14,A$,B$|
000027D0: 00 E5 2F 08 0C 8B 41 24  B3 B1 22 22 A7 44 43 B2  |../...A$.."".DC.|
000027E0: C6 28 41 24 29 00 01 30  12 0C 8B 42 24 B3 B1 22  |.(A$)..0...B$.."|
000027F0: 22 A7 44 43 B2 44 43 AA  C6 28 42 24 29 AC 32 35  |".DC.DC..(B$).25|
00002800: 36 00 19 30 1C 0C A1 23  31 34 2C 42 24 3A 8B 53  |6..0...#14,B$:.S|
00002810: 54 B3 B1 30 A7 33 31 39  30 00 2D 30 26 0C 8B 42  |T..0.3190.-0&..B|
00002820: 24 B3 B1 C7 28 33 34 29  A7 33 31 30 30 00 55 30  |$...(34).3100.U0|
00002830: 30 0C A1 23 31 34 2C 42  24 3A 8B 42 24 B3 B1 C7  |0..#14,B$:.B$...|
00002840: 28 33 34 29 A7 44 42 24  B2 44 42 24 AA 42 24 3A  |(34).DB$.DB$.B$:|
00002850: 89 33 31 32 30 00 70 30  3A 0C A1 23 31 34 2C 42  |.3120.p0:..#14,B|
00002860: 24 3A 8B 42 24 B2 C7 28  33 32 29 A7 33 31 33 30  |$:.B$..(32).3130|
00002870: 00 94 30 44 0C 44 43 24  B2 44 43 24 AA 42 24 3A  |..0D.DC$.DC$.B$:|
00002880: A1 23 31 34 2C 42 24 3A  8B 42 24 B3 B1 22 22 A7  |.#14,B$:.B$.."".|
00002890: 33 31 34 30 00 AD 30 4E  0C 99 44 43 3B A3 35 29  |3140..0N..DC;.5)|
000028A0: 3B 44 42 24 3B A3 32 35  29 3B 44 43 24 00 EC 30  |;DB$;.25);DC$..0|
000028B0: 58 0C 44 44 B2 44 44 AA  31 3A 8B 44 44 B1 31 30  |X.DD.DD.1:.DD.10|
000028C0: A7 44 44 B2 31 3A 8D 33  31 30 3A 8D 32 31 36 30  |.DD.1:.310:.2160|
000028D0: 3A 99 A3 31 33 29 22 05  92 11 46 49 4C 45 53 20  |:..13)"...FILES |
000028E0: 4F 4E 20 44 49 53 4B 20  20 22 3A 99 00 03 31 62  |ON DISK  ":...1b|
000028F0: 0C 44 43 24 B2 22 22 3A  44 42 24 B2 22 22 3A 44  |.DC$."":DB$."":D|
00002900: 43 B2 30 00 12 31 6C 0C  8B 53 54 B2 30 A7 33 30  |C.0..1l..ST.0.30|
00002910: 36 30 00 2D 31 76 0C 99  3A 99 44 43 3B A3 35 29  |60.-1v..:.DC;.5)|
00002920: 22 42 4C 4F 43 4B 53 20  46 52 45 45 22 00 3F 31  |"BLOCKS FREE".?1|
00002930: 80 0C A0 31 34 3A 8D 33  31 30 3A 89 34 39 30 00  |...14:.310:.490.|
00002940: 74 31 AC 0D 9F 31 2C 34  3A 9D 31 3A 99 C7 28 31  |t1...1,4:.1:..(1|
00002950: 34 29 4D 54 24 3A 99 3A  99 C7 28 31 34 29 22 43  |4)MT$:.:..(14)"C|
00002960: 4F 4D 50 41 54 49 42 49  4C 49 54 59 20 43 48 45  |OMPATIBILITY CHE|
00002970: 43 4B 22 3B 00 89 31 B6  0D 99 C7 28 31 35 29 3A  |CK";..1....(15):|
00002980: 99 3A 8D 31 31 33 30 3A  99 00 B1 31 B7 0D 99 C7  |.:.1130:...1....|
00002990: 28 31 34 29 50 25 28 50  32 29 22 25 20 22 54 24  |(14)P%(P2)"% "T$|
000029A0: 28 A5 41 28 50 25 28 50  32 29 29 29 C7 28 31 35  |(.A(P%(P2))).(15|
000029B0: 29 00 EE 31 C0 0D 81 49  B2 32 31 A4 32 30 AA 4E  |)..1...I.21.20.N|
000029C0: 51 3A 8B B6 28 C6 28 CA  28 41 24 28 50 31 29 2C  |Q:..(.(.(A$(P1),|
000029D0: 49 2C 31 29 29 AB C6 28  CA 28 41 24 28 50 32 29  |I,1))..(.(A$(P2)|
000029E0: 2C 49 2C 31 29 29 29 B3  33 A7 33 35 34 30 00 07  |,I,1))).3.3540..|
000029F0: 32 CA 0D 46 50 24 B2 44  24 28 49 AB 32 30 29 3A  |2..FP$.D$(I.20):|
00002A00: 8D 32 31 30 30 3A 99 00  2F 32 D4 0D 82 49 3A 8B  |.2100:../2...I:.|
00002A10: 53 32 B2 30 A7 99 3A 99  22 20 4E 4F 20 41 52 45  |S2.0..:." NO ARE|
00002A20: 41 53 20 4F 46 20 43 4F  4E 46 4C 49 43 54 22 00  |AS OF CONFLICT".|
00002A30: 5A 32 DE 0D 99 3A 99 C7  28 31 34 29 22 45 4E 44  |Z2...:..(14)"END|
00002A40: 20 4F 46 20 43 48 45 43  4B 22 C7 28 31 35 29 3A  | OF CHECK".(15):|
00002A50: 98 31 3A A0 31 3A 89 39  39 30 00 87 32 10 0E 9F  |.1:.1:.990..2...|
00002A60: 31 2C 34 3A 9D 31 3A 99  C7 28 31 34 29 3B 22 4E  |1,4:.1:..(14);"N|
00002A70: 41 4D 45 53 20 4F 4E 20  46 49 4C 45 22 3B C7 28  |AMES ON FILE";.(|
00002A80: 31 35 29 3A 99 3A 99 00  BD 32 1A 0E 81 50 31 B2  |15):.:...2...P1.|
00002A90: 31 A4 50 3A 99 C9 28 22  20 20 20 20 22 AA C4 28  |1.P:..("    "..(|
00002AA0: 50 31 29 2C 35 29 22 20  20 20 22 C8 28 41 24 28  |P1),5)"   ".(A$(|
00002AB0: 50 31 29 2C 31 35 29 3A  99 3A 82 50 31 00 E9 32  |P1),15):.:.P1..2|
00002AC0: 24 0E 99 3A 99 C7 28 31  34 29 3B 22 45 4E 44 20  |$..:..(14);"END |
00002AD0: 4F 46 20 46 49 4C 45 22  3B C7 28 31 35 29 3A 98  |OF FILE";.(15):.|
00002AE0: 31 3A A0 31 3A 89 34 39  30 00 08 33 C4 13 97 53  |1:.1:.490..3...S|
00002AF0: 44 AA 32 34 2C 38 3A 97  53 44 AA 35 2C 30 3A 97  |D.24,8:.SD.5,0:.|
00002B00: 53 44 AA 36 2C 32 34 30  00 38 33 C6 13 81 54 52  |SD.6,240.83...TR|
00002B10: B2 30 A4 31 35 3A 97 53  44 AA 31 2C 48 46 25 28  |.0.15:.SD.1,HF%(|
00002B20: 54 52 29 3A 97 53 44 2C  4C 46 25 28 54 52 29 3A  |TR):.SD,LF%(TR):|
00002B30: 97 53 44 AA 34 2C 33 33  00 4C 33 C9 13 81 44 45  |.SD.4,33.L3...DE|
00002B40: B2 31 A4 44 52 25 28 54  52 29 3A 82 00 65 33 CE  |.1.DR%(TR):..e3.|
00002B50: 13 97 53 44 AA 34 2C 33  32 3A 82 3A 97 56 49 43  |..SD.4,32:.:.VIC|
00002B60: AA 32 31 2C 30 00 6B 33  D8 13 8E 00 94 33 70 17  |.21,0.k3.....3p.|
00002B70: 97 32 30 34 30 2C 31 33  3A 97 32 30 34 31 2C 31  |.2040,13:.2041,1|
00002B80: 34 3A 97 32 30 34 32 2C  31 35 3A 97 56 49 43 AA  |4:.2042,15:.VIC.|
00002B90: 33 30 2C 30 00 D1 33 75  17 58 31 B2 30 3A 58 32  |30,0..3u.X1.0:X2|
00002BA0: B2 33 34 35 3A 59 B2 31  34 30 3A 97 56 49 43 AA  |.345:Y.140:.VIC.|
00002BB0: 31 36 2C 32 3A 97 56 49  43 AA 32 37 2C 33 3A 81  |16,2:.VIC.27,3:.|
00002BC0: 41 B2 30 A4 35 3A 97 56  49 43 AA 41 2C 30 3A 82  |A.0.5:.VIC.A,0:.|
00002BD0: 41 00 F3 33 7A 17 97 56  49 43 AA 33 39 2C 36 3A  |A..3z..VIC.39,6:|
00002BE0: 97 56 49 43 AA 34 30 2C  34 3A 97 56 49 43 AA 34  |.VIC.40,4:.VIC.4|
00002BF0: 31 2C 32 00 15 34 84 17  97 56 49 43 AA 32 33 2C  |1,2..4...VIC.23,|
00002C00: 30 3A 97 56 49 43 AA 32  39 2C 30 3A 97 56 49 43  |0:.VIC.29,0:.VIC|
00002C10: AA 32 31 2C 33 00 2B 34  98 17 8B 58 32 B3 32 35  |.21,3.+4...X2.25|
00002C20: 36 A7 97 56 49 43 AA 31  36 2C 30 00 5B 34 A2 17  |6..VIC.16,0.[4..|
00002C30: 97 56 49 43 AA 30 2C 58  31 3A 97 56 49 43 AA 32  |.VIC.0,X1:.VIC.2|
00002C40: 2C 58 32 AF 32 35 35 3A  97 56 49 43 AA 31 2C 59  |,X2.255:.VIC.1,Y|
00002C50: 3A 97 56 49 43 AA 33 2C  59 AA 35 00 82 34 B6 17  |:.VIC.3,Y.5..4..|
00002C60: 58 31 B2 58 31 AA 31 3A  58 32 B2 58 32 AB 31 3A  |X1.X1.1:X2.X2.1:|
00002C70: 8B C2 28 56 49 43 AA 33  30 29 B3 B1 33 A7 36 30  |..(VIC.30)..3.60|
00002C80: 34 30 00 B0 34 CA 17 97  56 49 43 AA 34 2C 31 35  |40..4...VIC.4,15|
00002C90: 36 3A 97 56 49 43 AA 35  2C 31 33 33 3A 97 56 49  |6:.VIC.5,133:.VI|
00002CA0: 43 AA 32 37 2C 30 3A 97  56 49 43 AA 32 31 2C 34  |C.27,0:.VIC.21,4|
00002CB0: 00 C8 34 58 1B 97 56 49  43 AA 32 33 2C 34 3A 97  |..4X..VIC.23,4:.|
00002CC0: 56 49 43 AA 32 39 2C 34  00 D2 34 6C 1B 8D 35 30  |VIC.29,4..4l..50|
00002CD0: 36 30 00 D8 34 80 1B 8E  00 FA 34 BC 1B 97 53 44  |60..4.....4...SD|
00002CE0: AA 32 34 2C 31 35 3A 97  53 44 AA 35 2C 31 32 30  |.24,15:.SD.5,120|
00002CF0: 3A 97 53 44 AA 36 2C 31  31 30 00 0F 35 C6 1B 81  |:.SD.6,110..5...|
00002D00: 49 32 B2 31 A4 32 3A 97  53 44 AA 34 2C 31 37 00  |I2.1.2:.SD.4,17.|
00002D10: 31 35 D0 1B 97 53 44 AA  31 2C 4E 32 28 49 32 2C  |15...SD.1,N2(I2,|
00002D20: 31 29 3A 97 53 44 AA 30  2C 4E 32 28 49 32 2C 32  |1):.SD.0,N2(I2,2|
00002D30: 29 00 54 35 DA 1B 97 53  44 AA 34 2C 31 36 3A 81  |).T5...SD.4,16:.|
00002D40: 44 4C B2 31 A4 4E 32 28  49 32 2C 33 29 AC 35 30  |DL.1.N2(I2,3).50|
00002D50: 3A 82 44 4C 00 65 35 E4  1B 82 49 32 3A 97 53 44  |:.DL.e5...I2:.SD|
00002D60: AA 34 2C 31 37 00 7B 35  EE 1B 81 41 B2 30 A4 31  |.4,17.{5...A.0.1|
00002D70: 3A 97 53 44 AA 41 2C 30  3A 82 41 00 81 35 F8 1B  |:.SD.A,0:.A..5..|
00002D80: 8E 00 87 35 A5 AA                                 |...5..          |
..>...VIC.13.4096:.VIC.21,0:.A.13.15:.B.
0.63:.S:.A.64.B,S:.B,A......0,0,127,0,0,
127,0,0,15,3,255,31,15,255,251,63,255,24
3,120,0,120,240,0,60.Y....224,0,28,224,0
,28,224,0,28,224,0,28,224,0,28,224,0,28,
224,0,28,224,0,28......240,0,60,120,0,12
0,63,255,240,15,255,192,3,255,0,0._....1
,255,128,7,255,224,15,255,240,31,0,248,3
0,0,120,28,0,56,28,0,56,28,0,56......28,
0,56,28,0,56,30,0,120,31,0,248,15,255,24
0,7,255,224,1,255,128,0,24,0.X....0,24,0
,0,126,0,0,126,0,0,24,0,0,24,0,0.&....15
,128,248,31,227,252,63,247,254,127,255,2
55,127,255,255,127,255,255,127.V....255,
255,127,255,255,63,255,254,63,255,254,31
,255,252,31,255,252,15,255,248.A....7,25
5,240,3,255,224,1,255,192,0,255,128,0,12
7,0,0,62,0,0,28,0,0,8,0,0.....SD.54272:.
TR.SD.SD.24:.TR,0:.......HF%(15),LF%(15)
,DR%(15). ....SD.5,0:.SD.6,240:.SD.24,15
.H....TR.0.15:.HF%(TR),LF%(TR),DR%(TR):.
......53280,6:.53281,1:DN$." DEVICE NOT 
PRESENT":EC$."ENTER CHOICE".S....12,143,
512,8,97,96,9,104,96,10,143,96,11,48,96,
12,143,640,8,97,256......14,24,256,12,14
3,256,11,48,128,12,143,128,14,24,128,15,
210,128.8....16,195,256,0,0,256,8,97,640
.X....A.1.2:.B.1.3:.N2(A,B):.B,A.V.... 5
4,147,.125,108,149,.25.....N.30:SP$."   
                                     ":N
Q.25...... .A(X)..1.(X.79).1.(X.64).1.(X
.49).1.(X.34)...(..420...2..781,R:.782,C
:.783,0:.(65520):..7.<..R3.R1.R2:.781,R3
:.(59903):.R3:..J.F.R.20:C.0:.50:....D..
"DISASTROUS","LARGELY INCOMPATIBLE","SOM
E DIFFICULTIES","FAIRLY COMPATIBLE"...N.
."EXTREMELY WELL MATCHED"...X.."ANSWER Q
UESTIONS","SAVE ANSWERS","GET ANSWERS","
DELETE ANSWERS".K....COMPATIBILITY CHECK
,PERFECT PAIRS,INSTRUCTIONS,DISPLAY DIRE
CTORY,"END".`...MT$."MATCHMAKER"... ..22
0:..14)"..O..........P":..14)"..."MT$"."
.......14)"L...........":..18)".THE"....
...16)"PARTNER":..13)"COMPATIBILITY":..1
6)"PROGRAM".......14)".DEVISED BY":..12)
"DR.GLENN WILSON".U.H.."..."SP$:."..    
         (C) (P)  1983              ".P.
K..".."SP$;:.DE.1.2000:..|.R..OP.9.....S
..I.0.4:.T$(I):.I:.I.1.9:.M$(I):.I...T..
6000...W.R.21:C.12:.50:.198,0:.".PRESS .
.  SPACE  .";:.320:..+...."...."SP$"..  
         IVAN BERG SOFTWARE           ."
:.".."SP$:..=....2150:.I1.1.9.H...."    
 . "I(D(I1),1)" . "M$(I1)".":.I1......19
8,0:QE.5:QQ.0:."     "EC$;:.2260:.2450:O
P.E(A$)......QQ.99.OP.1.OP.9..(OP)..OP..
270:.59903:R.TX:C.0:.50:.250............
7100:...."..".............   ANSWERS :"P
" "I:..G.,..70:D$."":." ENTERED DETAILS 
CORRECT  Y/N ";.L...QE.5:QQ.0:.2450:D$.A
$:.QQ.99.305.../..D$."Y".D$."N".....1.R1
.R:R2.R:.60:.270:.300.L.6.R.22:C.13:.50:
.198,0:."PRESS .  SPACE  .";...@..GT$:.G
T$.." ".320...J.....T..198,0:.50:.AE$" :
 ";:QE.5:QQ.0:.2450:AG.E(A$).A.^..QQ.99.
AG.16.AG.80..270:.60:.340.T.H.R$.G(150.A
G):....R..50:S$."":." SEX M/F     : ";:Q
E.5:QQ.0:.2450:S$.A$...|..QQ.99.S$.."M".
S$.."F"..270:.60:.370............P1.K8.K
9:.P1.6.P1.11.P1.21.P1.26........I(D(P1)
,2)" "H(A$(P1),15):.P1:..<....A$(N),M$(9
),Q$(NQ),R$(NQ,5),D$(NQ),P%(N),T$(4).E..
..140.X...DD$."LOAD QUESTIONS FROM":.236
0:.2150:.D.1.450......2620:.EF.1.."...."
DN$:.270:.310:.440...B..1,D,SA,"QUEST":.
D..8.455...D..2650:.DM.19.."...."DM$:.27
0:.310:.440...G..I.1.NQ:.1,Q$(I).%.L..I2
.1.5:.1,R$(I,I2):.I2:.1,D$(I).^.N.. I(D$
(I),1)."&"..1,GG$:D$(I).H(D$(I),79).GG$:
GG$.""...V.."............     READING QU
ESTIONS : 25    "I:.I..... 1:.5060.W....
230:.OP.500,733,734,790,860,1220,2000,30
00,1340......P.N..".......  PARTICIPANT 
LIMIT.":.310:.490.2...N$."":.2150:." YOU
R DETAILS PLEASE.".X...." NAME        : 
";:R.7:R1.7:R2.7:QE.15:QQ.0:.2450:N$.A$:
L1.C(N$)......QQ.99..270:.60:.507......N
$."END".490.C...N$.N$.H(SP$,15.L1):.P.0.
560......I.1.P:.N$.H(A$(I),15)..".NAME A
LREADY USED":.310:.505...&..I.9.0.P.P.1:
AE$." AGE        ":R.9:R1.9:R2.9:C.0:.34
0._.5.A$(P).N$.R$:R.11:R1.11:R2.11:.370.
..:..300:.D$."Y".A$(P).A$(P).S$:.590...D
.P.P.1:.510...N..2150:." REQUIRED PARTNE
R'S DETAILS"...S.R.7:R1.7:R2.7:.370:A$(P
).A$(P).S$...X.AE$." MINIMUM AGE":R.9:R1
.9:R2.9:.340:A1.AG.:.].AE$." MAXIMUM AGE
":R.11:R1.11:R2.11.C.B..340.G.L..AG.A1..
270:R1.9:R2.14:.60:.600...V.A$(P).A$(P).
G(150.A1).R$:.300:.D$."Y".650.....A$(P).
H(A$(P),17):.590......2150:."PLEASE ANSW
ER THE FOLLOWING QUESTIONS":.".HONESTLY"
;......" (YOUR ANSWERS ARE CONFIDENTIAL)
":.310.?....I.1.NQ:FP$.Q$(I):.".":.2100.
W....".."SP$".":.I2.1.5.Z...." ."I(D(I2)
,1)". "R$(I,I2)".".....L1.C(R$(I,I2))...
F..I2:.198,0...P..GT$:GT.E(GT$):.GT.1.GT
.5.720...Z.A$(P).A$(P).G(GT):.I:.490....
.DD$."SAVE ANSWERS ON":SA.1:.735.!...DD$
."LOAD ANSWERS FROM":SA.0.<....2360:.DD$
."ABORT".490.H....D.8..2620:.EF.1.."."DN
$:.270:.310:.765. ....2150:.D.1..".   LO
AD AND REWIND ANSWER "DD$:.:.739......".
   LOAD ANSWER "DD$:.......2700:.D.8.OP.
2.F$.F$.",S,W"......1,D,SA,F$:.D..8.743.
.....2650:.DM.63.2900.2....DM.19..".   "
DM$:.270:.310:.765.@....OP.3.770.I....1,
P:.I.1.P:.1,A$(I):.290:.I: 1:.490.W....O
P.3.734......733......1,P:.I.1.P:.1,A$(I
):.290:.I..... 1.B....2150:.:R.6:R1.6:R2
.6.....QQ.0:QE.5:." PRINT OUT NAMES ON F
ILE Y/N ";:.2450......A$."N".490.1....A$
.."Y".QQ.99..60:C.0:.270:.50:.782.\...D.
4:.2620:.EF.1.."."DN$:.270:.310:.781.F..
..3600.S....P.0.490.....S9.0:K8.1:K9.P:.
P.15.K9.15... ..2160:.400:.198,0:.70...%
.QQ.0:QE.5:." NUMBER OF PERSON TO DELETE
 ";:.2450:GT$.A$...*..GT$."E".490...+..G
T$.."N".820...,..P..15.800.9.-..S9.0.S9.
1:K8.16:K9.P:.800.B....795.P.4.P1.E(GT$)
...9..P1.K8.P1.K9.QQ.99..(P1)..P1..270:.
50:.59903:.805...>..P1.P.850...H..I.P1.P
.1:A$(I).A$(I.1):.I.L.R.A$(P)." ":P.P.1:
.790...\..P.2..270:.490...A.S9.0:K8.1:K9
.P:.P.15.K9.15...F..2150:.400:.198,0:.70
.S.K.QQ.0:QE.5:." NUMBER OF PERSON TO CH
ECK ";:.2450:GT$.A$.D.P..GT$."E".490.V.Q
..GT$.."N".890...R..P..15.870...U..S9.0.
S9.1:K8.16:K9.P:.870...V..865...Z.P1.E(G
T$).....P1.K8.P1.K9.QQ.99..(P1)..P1..27
0:.50:.59903:.875.'....2150:." PLEASE WA
IT :":.". COMPUTING SCORES FOR".G....". 
"H(A$(P1),15):.910:.990.....PS$.J(A$(P1)
,18,1):M1.F(J(A$(P1),19,1)).150:M2.F(J(A
$(P1),20,1)).150.....SW.0......I.1.P:.I.
P1.P%(I)..1:.980......PS$..J(A$(I),17,1)
.P%(I)..1:.980.....M3.F(J(A$(I),16,1)).1
50:.M3.M1.M3.M2.P%(I)..1:.980.5...P%(I).
100:SW.1:.I2.21.20.NQ.O.J.P%(I).P%(I)..(
F(J(A$(P1),I2,1)).F(J(A$(I),I2,1))):.I2.
X.T..I:......SS.100:SF.0:SP.0.D....2150:
."  PARTNERS FOR "H(A$(P1),15).30)"SCORE
 %."......SW.0..". NO SUITABLE PARTNERS 
FOUND.":.310:.870.! ...I.SS.SF..1:.I2.1.
P:.I..P%(I2).1065.D ..." "I(D(I2),2)" "H
(A$(I2),15);.E ...P%(I2).100...31)"100":
.1060.} ....32)I(D(P%(I2)),2).. $.SP.SP.
1:.SP.15.SS.I:.1070.. )..I2:.I.. ...70:.
198,0:." NUMBER OF PERSON TO MATCH WITH"
:R.R.1..!3.QQ.0:QE.5:." "H(A$(P1),15);:.
2450:GT$.A$..!8..GT$."E".870.3!=..GT$."N
".SP.15.995.D!>..GT$."N".990.R!B.P2.E(GT
$).V!E..P2.1.P2.P.QQ.99..(P2)..P2.1120..
!L..P%(P2).0.1120..!V..1125:.1140:.1150.
.!`..270:.50:.59903:.1075.C!E..2150..!J.
." "H(A$(P1),15):.:." AND":.:." "H(A$(P2
),15):..4"T.."..."SP$"..":.P%(P2)"%  "T$
(.A(P%(P2))):."..."SP$"..":..B"~..310:S2
.0.V"...1125:."..."SP$.."...".    AREAS 
OF LIKELY CONFLICT.":.".."SP$"..".F"...I
.21.20.NQ:..(F(J(A$(P1),I,1)).F(J(A$(P2)
,I,1))).3.1200.."..R1.17:R2.24:.60:R.17:
C.0:.50:S2.1:.D$(I.20):.310.'#...I:.S2.0
..". NO AREAS OF CONFLICT":.310.A#...215
0:.:R.6:R1.6:R2.6.Y#..QQ.0:QE.5:." PRINT
 COMPATIBILITY CHECK Y/N ";:.2450..#...A
$."N".990..#...A$.."Y".QQ.99..60:C.0:.27
0:.50:.1202..#..D.4:.2620:.EF.1.."."DN$:
.270:.310:.1201..#...3500..#...990..$D..
P.2..270:.490.?$N..P1.1.P:.2150:.".  SEA
RCHING FOR BEST PARTNER FOR :.".C$X.."  
"H(A$(P1),15):.DE.1.500:.DE.X$...910:.SW
..0.1280..$...2150:.". SORRY "H(A$(P1),1
5).K$...". CAN'T FIND YOU A SUITABLE PAR
TNER":.1310..$...I.100.0..1:.I2.1.P:.I..
P%(I2).1300..%..P2.I2:.1125:.1140:.1310.
.%...I2:.I.'%...310:.P1.A%...2150:.:R.6:
R1.6:R2.6.W% .QQ.0:QE.5:." PRINT OUT PER
FECT PAIRS Y/N ";:.2450..%!..A$."N".490.
.%"..A$.."Y".QQ.99..60:C.0:.270:.50:.131
2..%#.D.4:.2620:.EF.1.."."DN$:.270:.310:
.1311..%$..2800..&<..53280,6:.53281,1:.1
60:.".......":...&P..2150.C&U..".MATCHMA
KER STORES YOUR ANSWERS TO 25.    PERSON
AL QUESTIONS AND ";..&Z.."WILL COMPARE Y
OUR.SCORE WITH THE SCORES OF EVERYONE EL
SE."..&..."PARTICIPATING. RESULTS ARE AV
AILABLE":.".AFTER TWO OR MORE PEOPLE";.$
'..." HAVE ANSWERED":.".THE QUESTIONS.":
.310:.2150:..L'..."ANSWER THE QUESTIONS 
HONESTLY (AND.":."THERE'S NO REASON NOT 
TO";..'..." AS YOUR ANSWERS.ARE CONFIDEN
TIAL) AND THE PROGRAM WILL"..'...".PAIR 
COUPLES ACCORDING TO COMPATIBILITY"..(..
.".OR GIVE A PERCENTAGE OF.COMPATIBILITY
".5( ..".BETWEEN SELECTED COUPLES.":.310
:.490.C(4.LS.C(FP$).V(>..LS..40..FP$:...
(H..H(FP$,40):FP$.J(FP$,41):LS.C(FP$):.2
110..(F..53280,5:.53281,0..(P.."...".15)
MT$:.".."SP$"."..(Z....(T..783,1:.(65520
):TX.B(781):TY.B(782):...)8..2150:.198,0
:."..     . 1 .   ";DD$;" TAPE.".:)B.." 
    . 2 .   ";DD$;" DISK.".I)L..OP.2.OP.
3.."     . 3 .   RETURN TO MENU."..)V..2
260:QQ.0:."     "EC$;:QE.5:.2450:GT$.A$:
GT.E(GT$)..)[.TL.3:.OP.3.OP.2.TL.4..)`..
QQ..99.GT.0.GT.TL..(GT).GT.2430..*J.R1.T
X:R2.TX:R.TX:.60:C.0:.270:.50:.2390.8*~.
D.1:DD$."TAPE":.GT.2.D.8:DD$."DISK":SA.6
.W*...GT.3.DD$."ABORT":D.0:SA.0.]*....{*
..A$."":."? ";:CNT.1:.198,0..*...783,1:.
65520:WX.781:WY.782..*..F.0:.2570.F*...F
(CH$).13.A$.."".." ":...*...F(CH$).20.CN
T.1..2560:.2470..+D..CH$." ".CNT..1.2540
.,+N..CH$.",".CH$.":".CH$.";".CH$.G(34).
2470.F+...CH$."!".CH$."_".2470._+...CNT.
QE.QQ.99:." ":...+..A$.A$.CH$:.CH$;:CNT.
CNT.1:.2470..+..." .. .";:CNT.CNT.1:A$.H
(A$,C(A$).1):..F+..." .";:.2600:.F.1....
+...". ..";:.2600:.F.1....+...2570..,(..
A.1.50:.CH$:.CH$.."".F.1:...,2..A:..B,<.
EF.0:.1,D,0:.781,1:.(65481):.B(783).1.EF
.1.Q,F..(65511):..N,Z.DM.0:.15,8,15:.15,
DM,DM$..,D..DM.19. 1: 15..,N....,...2260
:."...ENTER FILENAME";.K,..QQ.0:QE.16:.2
450:F$.A$:.QQ..99...., .R1.TX:R2.TX:R.TX
:.60:C.0:.270:.50:.2700..-...1,4:.1:.G(1
4);MT$;G(15):..9-...G(14)"PERFECT PAIRS"
G(15):.:..I-...P1.1.P:."BEST PARTNER FOR
 ";H(A$(P1),15):..~-...910:.SW..0.2860..
-".." SORRY, CAN'T FIND YOU A SUITABLE P
ARTNER":.:.2890..-,..I.100.0..1:.I2.1.P:
.I..P%(I2).2880..-6.P2.I2:."IS :"H(A$(P2
),15):..7.;.."COMPATIBILITY :"P%(P2)"%  
"T$(.A(P%(P2))):.:.2890.B.@..I2:.I.Y.J..
:.P1:.G(14)"END OF PERFECT PAIRS"G(15):.
1: 1:.490...T..:.2260...^.QQ.0:QE.5:."  
 FILE EXISTS - REPLACE Y/N ";:.2450.K.H.
.A$."N".765...R..A$.."Y".QQ.99.R1.TX:R2.
TY:.270:.60:.2910../|.F$."@0:".F$:.740..
/...2160.D/B.D.8:.2620:.EF.1.."......";D
N$:.310:.490.J/L..2650:.DM.19.."......";
DM$:.310:.../V...13)"...FILES ON DISK":.
../...14,8,0,"$0":DD.1:DC.0../...#14,A$,
B$.A/...#14,A$,B$.P/...#14,A$,B$../...A$
.."".DC.F(A$)..0...B$.."".DC.DC.F(B$).25
6..0...#14,B$:.ST..0.3190.-0&..B$..G(34)
.3100.U00..#14,B$:.B$..G(34).DB$.DB$.B$:
.3120.P0:..#14,B$:.B$.G(32).3130..0D.DC$
.DC$.B$:.#14,B$:.B$.."".3140..0N..DC;.5)
;DB$;.25);DC$..0X.DD.DD.1:.DD.10.DD.1:.3
10:.2160:..13)"...FILES ON DISK  ":...1B
.DC$."":DB$."":DC.0..1L..ST.0.3060.-1V..
:.DC;.5)"BLOCKS FREE".?1.. 14:.310:.490.
T1...1,4:.1:.G(14)MT$:.:.G(14)"COMPATIBI
LITY CHECK";..1...G(15):.:.1130:...1...G
(14)P%(P2)"% "T$(.A(P%(P2)))G(15)..1...I
.21.20.NQ:..(F(J(A$(P1),I,1)).F(J(A$(P2)
,I,1))).3.3540..2J.FP$.D$(I.20):.2100:..
/2T..I:.S2.0..:." NO AREAS OF CONFLICT".
Z2...:.G(14)"END OF CHECK"G(15):.1: 1:.9
90..2...1,4:.1:.G(14);"NAMES ON FILE";G(
15):.:...2...P1.1.P:.I("    ".D(P1),5)" 
  "H(A$(P1),15):.:.P1..2$..:.G(14);"END 
OF FILE";G(15):.1: 1:.490..3D..SD.24,8:.
SD.5,0:.SD.6,240.83F..TR.0.15:.SD.1,HF%(
TR):.SD,LF%(TR):.SD.4,33.L3I..DE.1.DR%(T
R):..E3N..SD.4,32:.:.VIC.21,0.K3X....3P.
.2040,13:.2041,14:.2042,15:.VIC.30,0.Q3U
.X1.0:X2.345:Y.140:.VIC.16,2:.VIC.27,3:.
A.0.5:.VIC.A,0:.A..3Z..VIC.39,6:.VIC.40,
4:.VIC.41,2..4...VIC.23,0:.VIC.29,0:.VIC
.21,3.+4...X2.256..VIC.16,0.[4...VIC.0,X
1:.VIC.2,X2.255:.VIC.1,Y:.VIC.3,Y.5..4..
X1.X1.1:X2.X2.1:.B(VIC.30)..3.6040..4J..
VIC.4,156:.VIC.5,133:.VIC.27,0:.VIC.21,4
.H4X..VIC.23,4:.VIC.29,4.R4L..5060.X4...
..4...SD.24,15:.SD.5,120:.SD.6,110..5F..
I2.1.2:.SD.4,17.15P..SD.1,N2(I2,1):.SD.0
,N2(I2,2).T5Z..SD.4,16:.DL.1.N2(I2,3).50
:.DL.E5...I2:.SD.4,17.{5...A.0.1:.SD.A,0
:.A..5.....5..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL