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

JOFFE

FILE INFORMATION

FILENAME(S): JOFFE

FILE TYPE(S): PRG

FILE SIZE: 16.5K

FIRST SEEN: 2025-11-30 21:23:47

APPEARS ON: 1 disk(s)

FILE HASH

a87920bc24f4f6e9c466263d880c7c185442c93ccb78d5274ffc4f99511aec84

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
DROLSOFT JOFFE PRG DuncanTwain 28 6 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 44 08 00 00 8F 20  20 20 54 48 45 20 4A 4F  |..D....   THE JO|
00000010: 46 46 45 20 50 4C 41 4E  2F 50 41 52 54 41 20 2D  |FFE PLAN/PARTA -|
00000020: 20 56 45 52 53 49 4F 4E  20 31 20 28 38 2F 31 30  | VERSION 1 (8/10|
00000030: 2F 38 34 29 20 2D 20 44  49 53 4B 20 41 4E 44 20  |/84) - DISK AND |
00000040: 54 41 50 45 00 7B 08 01  00 97 38 30 38 2C 32 33  |TAPE.{....808,23|
00000050: 34 3A 99 22 93 22 3A 9C  3A 97 35 33 32 37 32 2C  |4:.".":.:.53272,|
00000060: 32 32 3A 97 36 34 38 2C  34 3A 97 35 36 35 37 38  |22:.648,4:.56578|
00000070: 2C C2 28 35 36 35 37 38  29 B0 33 00 9C 08 02 00  |,.(56578).3.....|
00000080: 97 35 36 35 37 36 2C 28  C2 28 35 36 35 37 36 29  |.56576,(.(56576)|
00000090: AF 32 35 32 29 B0 33 3A  99 22 93 22 00 EB 08 03  |.252).3:."."....|
000000A0: 00 96 20 A5 42 28 58 29  B2 AB 33 31 AC 28 58 B2  |.. .B(X)..31.(X.|
000000B0: 31 B0 58 B2 33 B0 58 B2  35 B0 58 B2 37 B0 58 B2  |1.X.3.X.5.X.7.X.|
000000C0: 38 B0 58 B2 31 30 B0 58  B2 31 32 29 AB 33 30 AC  |8.X.10.X.12).30.|
000000D0: 28 58 B2 34 B0 58 B2 36  B0 58 B2 39 B0 58 B2 31  |(X.4.X.6.X.9.X.1|
000000E0: 31 29 AB 32 39 AC 28 58  B2 32 29 00 2D 09 04 00  |1).29.(X.2).-...|
000000F0: 97 35 33 32 38 30 2C 36  3A 97 35 33 32 38 31 2C  |.53280,6:.53281,|
00000100: 31 3A 99 C7 28 31 34 29  2C C7 28 38 29 3A 54 24  |1:..(14),.(8):T$|
00000110: B2 22 D4 C8 C5 A0 CA CF  C6 C6 C5 A0 D0 CC C1 CE  |."..............|
00000120: 22 3A 86 49 57 28 32 32  2C 33 2C 33 29 00 5A 09  |":.IW(22,3,3).Z.|
00000130: 05 00 96 A5 4C 28 58 29  B2 AB 28 58 AD 34 B2 B5  |....L(X)..(X.4..|
00000140: 28 58 AD 34 29 29 AB 28  58 AD 31 30 30 B2 B5 28  |(X.4)).(X.100..(|
00000150: 58 AD 31 30 30 29 29 AC  AB 31 00 67 09 06 00 8D  |X.100))..1.g....|
00000160: 32 35 3A 89 31 32 34 00  71 09 07 00 52 31 B2 32  |25:.124.q...R1.2|
00000170: 34 00 81 09 08 00 52 32  B2 32 34 3A 8D 31 30 3A  |4.....R2.24:.10:|
00000180: 8E 00 A5 09 09 00 97 37  38 31 2C 52 3A 97 37 38  |.......781,R:.78|
00000190: 32 2C 43 3A 97 37 38 33  2C 30 3A 9E 28 36 35 35  |2,C:.783,0:.(655|
000001A0: 32 30 29 3A 8E 00 C8 09  0A 00 81 52 43 B2 52 31  |20):.......RC.R1|
000001B0: A4 52 32 3A 97 37 38 31  2C 52 43 3A 9E 28 35 39  |.R2:.781,RC:.(59|
000001C0: 39 30 33 29 3A 82 52 43  00 EC 09 0B 00 81 52 43  |903):.RC......RC|
000001D0: B2 32 31 37 A4 32 34 31  3A 97 52 43 2C C2 28 52  |.217.241:.RC,.(R|
000001E0: 43 29 B0 31 32 38 3A 82  52 43 3A 8E 00 22 0A 0C  |C).128:.RC:.."..|
000001F0: 00 8D 37 3A 43 B2 31 33  3A 52 B2 32 34 3A 8D 39  |..7:C.13:R.24:.9|
00000200: 3A 99 22 90 92 D0 D2 C5  D3 D3 20 22 3B 3A 46 4C  |:."....... ";:FL|
00000210: 24 B2 22 20 D3 D0 C1 C3  C5 A0 22 3A 97 31 39 38  |$." ......":.198|
00000220: 2C 30 00 2F 0A 0D 00 46  4C B2 31 3A 8D 33 39 00  |,0./...FL.1:.39.|
00000230: 3F 0A 0E 00 8B 47 24 B3  B1 22 20 22 A7 31 33 00  |?....G$.." ".13.|
00000240: 4E 0A 0F 00 8D 37 3A 99  22 92 22 3B 3A 8E 00 6D  |N....7:.".";:..m|
00000250: 0A 10 00 48 24 B2 54 24  3A 99 22 93 22 3A 8D 31  |...H$.T$:.".":.1|
00000260: 37 3A 99 22 11 12 1F 22  53 50 24 3A 8E 00 93 0A  |7:."..."SP$:....|
00000270: 11 00 53 50 B2 B5 28 28  34 30 AB C3 28 48 24 29  |..SP..((40..(H$)|
00000280: 29 AD 32 29 3A 99 22 92  90 22 A6 53 50 29 3B 48  |).2):."..".SP);H|
00000290: 24 3A 8E 00 A3 0A 12 00  52 B2 32 34 3A 43 B2 31  |$:......R.24:C.1|
000002A0: 3A 8D 39 00 EA 0A 13 00  99 22 90 D4 59 50 45 20  |:.9......"..YPE |
000002B0: 12 1C D0 92 90 20 54 4F  20 50 52 49 4E 54 20 2D  |..... TO PRINT -|
000002C0: 20 12 1C C3 92 90 20 54  4F 20 43 4F 4E 54 49 4E  | ..... TO CONTIN|
000002D0: 55 45 20 20 22 3B 3A 52  4B B2 30 3A 41 4C 24 B2  |UE  ";:RK.0:AL$.|
000002E0: 22 43 50 C3 D0 22 3A 8D  33 36 00 06 0B 14 00 45  |"CP..":.36.....E|
000002F0: 46 B2 30 3A 8B 52 4B 24  B2 22 43 22 B0 52 4B 24  |F.0:.RK$."C".RK$|
00000300: B2 22 C3 22 A7 8E 00 22  0B 15 00 8D 37 3A 44 B2  |."."..."....7:D.|
00000310: 34 3A 8D 31 30 39 3A 8B  45 46 B2 31 A7 44 B2 30  |4:.109:.EF.1.D.0|
00000320: 3A 8E 00 57 0B 16 00 9F  34 2C 34 2C 37 3A 9D 34  |:..W....4,4,7:.4|
00000330: 3A 99 22 11 D4 48 45 20  CA 4F 46 46 45 20 D0 4C  |:."..HE .OFFE .L|
00000340: 41 4E 22 3A 99 22 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |AN":."==========|
00000350: 3D 3D 3D 3D 22 3A 99 00  7A 0B 17 00 41 24 B2 4E  |====":..z...A$.N|
00000360: 41 24 3A 8B C8 28 41 24  2C 31 29 B2 22 2A 22 A7  |A$:..(A$,1)."*".|
00000370: 41 24 B2 CA 28 41 24 2C  32 29 00 AB 0B 18 00 99  |A$..(A$,2)......|
00000380: 22 11 D3 55 42 4A 45 43  54 20 3A 20 22 41 24 3A  |"..UBJECT : "A$:|
00000390: 99 22 11 D3 54 41 52 54  49 4E 47 20 C4 41 54 45  |."..TARTING .ATE|
000003A0: 20 3A 20 22 53 44 24 3A  99 3A 8E 00 EE 0B 19 00  | : "SD$:.:......|
000003B0: 53 50 24 B2 22 20 20 20  20 20 20 20 20 20 20 20  |SP$."           |
000003C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 22 3A 99  |             ":.|
000003E0: 22 93 22 3A 52 B2 31 3A  43 B2 30 3A 8D 39 00 32  |".":R.1:C.0:.9.2|
000003F0: 0C 1A 00 99 22 12 1F 22  53 50 24 3A 99 22 90 12  |....".."SP$:."..|
00000400: 20 20 20 20 20 20 20 20  20 20 20 C9 D6 C1 CE 20  |           .... |
00000410: C2 C5 D2 C7 20 D3 CF C6  D4 D7 C1 D2 C5 20 20 20  |.... ........   |
00000420: 20 20 20 20 20 20 20 20  22 3A 99 22 12 1F 22 53  |        ":.".."S|
00000430: 50 24 00 57 0C 1B 00 52  B2 38 3A 43 B2 30 3A 8D  |P$.W...R.8:C.0:.|
00000440: 39 3A 48 24 B2 54 24 3A  8D 31 37 3A 52 B2 31 30  |9:H$.T$:.17:R.10|
00000450: 3A 43 B2 30 3A 8D 39 00  9B 0C 1C 00 48 24 B2 22  |:C.0:.9.....H$."|
00000460: D9 4F 55 52 20 D0 45 52  53 4F 4E 41 4C 20 CE 4F  |.OUR .ERSONAL .O|
00000470: 2D C4 49 45 54 20 D7 45  49 47 48 54 20 C3 4F 4E  |-.IET .EIGHT .ON|
00000480: 54 52 4F 4C 22 3A 8D 31  37 3A 99 3A 48 24 B2 22  |TROL":.17:.:H$."|
00000490: D3 59 53 54 45 4D 22 3A  8D 31 37 00 A8 0C 1D 00  |.YSTEM":.17.....|
000004A0: 8B 45 4E B2 31 A7 33 32  00 E3 0C 1E 00 52 B2 31  |.EN.1.32.....R.1|
000004B0: 35 3A 43 B2 30 3A 8D 39  3A 48 24 B2 22 C4 45 56  |5:C.0:.9:H$.".EV|
000004C0: 49 53 45 44 20 42 59 20  D0 D2 CF C6 C5 D3 D3 CF  |ISED BY ........|
000004D0: D2 A0 CA D5 D3 D4 C9 CE  A0 CA CF C6 C6 C5 22 3A  |..............":|
000004E0: 8D 31 37 00 07 0D 1F 00  52 B2 31 37 3A 43 B2 30  |.17.....R.17:C.0|
000004F0: 3A 8D 39 3A 48 24 B2 22  1C D0 D2 CF C7 D2 C1 CD  |:.9:H$."........|
00000500: 20 31 22 3A 8D 31 37 00  20 0D 20 00 43 B2 30 3A  | 1":.17. . .C.0:|
00000510: 52 B2 31 39 3A 8D 39 3A  99 22 12 1F 22 53 50 24  |R.19:.9:.".."SP$|
00000520: 00 52 0D 21 00 99 22 90  12 20 20 20 20 20 20 20  |.R.!.."..       |
00000530: 20 20 20 20 20 20 28 C3  29 20 28 D0 29 20 31 39  |      (.) (.) 19|
00000540: 38 34 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |84              |
00000550: 20 22 00 66 0D 22 00 99  22 1F 12 22 53 50 24 3B  | ".f."..".."SP$;|
00000560: 3A 8D 31 32 3A 8E 00 B0  0D 24 00 52 4B 24 B2 22  |:.12:....$.RK$."|
00000570: 22 3A 43 48 B2 30 3A 97  31 39 38 2C 30 3A 8B 52  |":CH.0:.198,0:.R|
00000580: 4B B1 30 A7 41 4C 24 B2  22 20 2D 2E 22 3A 8B 52  |K.0.AL$." -.":.R|
00000590: 4B B1 31 A7 41 4C 24 B2  22 30 31 32 33 34 35 36  |K.1.AL$."0123456|
000005A0: 37 38 39 2F 2E 22 3A 8B  52 4B B2 33 A7 4C B2 38  |789/.":.RK.3.L.8|
000005B0: 00 C9 0D 26 00 46 4C 24  B2 22 3F 22 3A 46 4C B2  |...&.FL$."?":FL.|
000005C0: 31 3A 8D 33 39 3A 89 34  35 00 E4 0D 27 00 52 24  |1:.39:.45...'.R$|
000005D0: B2 22 12 1C 22 3A 8B 46  4C B2 AB 31 A7 52 24 B2  |."..":.FL..1.R$.|
000005E0: 22 92 1C 22 00 22 0E 28  00 46 4C B2 AB 46 4C 3A  |"..".".(.FL..FL:|
000005F0: 99 52 24 3B 46 4C 24 3B  3A 81 44 45 B2 31 A4 C3  |.R$;FL$;:.DE.1..|
00000600: 28 46 4C 24 29 3A 99 22  9D 22 3B 3A 82 44 45 3A  |(FL$):.".";:.DE:|
00000610: 81 44 45 B2 31 A4 32 35  3A 47 24 B2 22 22 3A A1  |.DE.1.25:G$."":.|
00000620: 47 24 00 30 0E 29 00 8B  47 24 B2 22 22 A7 34 33  |G$.0.)..G$."".43|
00000630: 00 3F 0E 2A 00 46 4C B2  32 3A 44 45 B2 32 35 00  |.?.*.FL.2:DE.25.|
00000640: 4F 0E 2B 00 82 44 45 3A  8B 46 4C B2 32 A7 8E 00  |O.+..DE:.FL.2...|
00000650: 57 0E 2C 00 89 33 39 00  90 0E 2D 00 8B 47 24 B2  |W.,..39...-..G$.|
00000660: C7 28 32 30 29 AF 52 4B  24 B3 B1 22 22 A7 52 4B  |.(20).RK$.."".RK|
00000670: 24 B2 C8 28 52 4B 24 2C  C3 28 52 4B 24 29 AB 31  |$..(RK$,.(RK$).1|
00000680: 29 3A 99 22 92 9D 20 20  9D 9D 22 3B 3A 89 33 38  |):."..  ..";:.38|
00000690: 00 B4 0E 2E 00 8B 47 24  B3 B1 C7 28 31 33 29 B0  |......G$...(13).|
000006A0: 28 47 24 B2 C7 28 31 33  29 AF 52 4B 24 B2 22 22  |(G$..(13).RK$.""|
000006B0: 29 A7 34 39 00 ED 0E 2F  00 99 22 92 20 22 3B 3A  |).49.../..". ";:|
000006C0: 4C 4D B2 30 3A 8B 52 4B  B2 32 A7 43 48 B2 C5 28  |LM.0:.RK.2.CH..(|
000006D0: 52 4B 24 29 3A 8B B5 28  43 48 29 B2 43 48 A7 52  |RK$):..(CH).CH.R|
000006E0: 4B 24 B2 CA 28 C4 28 43  48 29 2C 32 29 00 F3 0E  |K$..(.(CH),2)...|
000006F0: 30 00 8E 00 33 0F 31 00  8B 47 24 B2 C7 28 31 33  |0...3.1..G$..(13|
00000700: 29 B0 47 24 B2 C7 28 32  30 29 B0 28 28 52 4B B2  |).G$..(20).((RK.|
00000710: 31 B0 52 4B B2 33 29 AF  C3 28 52 4B 24 29 B2 4C  |1.RK.3)..(RK$).L|
00000720: 29 B0 28 52 4B B2 30 AF  52 4B 24 B3 B1 22 22 29  |).(RK.0.RK$.."")|
00000730: A7 33 38 00 66 0F 32 00  8B 52 4B B2 31 AF 28 28  |.38.f.2..RK.1.((|
00000740: 47 24 B1 B2 22 C1 22 AF  47 24 B3 B2 22 DA 22 29  |G$..".".G$..".")|
00000750: B0 28 47 24 B1 B2 22 41  22 AF 47 24 B3 B2 22 5A  |.(G$.."A".G$.."Z|
00000760: 22 29 29 A7 36 38 00 9B  0F 33 00 8B 28 52 4B B2  |")).68...3..(RK.|
00000770: 31 AF 52 4B 24 B2 22 22  29 B0 28 52 4B B2 32 AF  |1.RK$."").(RK.2.|
00000780: C3 28 52 4B 24 29 B2 35  29 B0 28 52 4B B3 B1 33  |.(RK$).5).(RK..3|
00000790: AF 47 24 B2 22 2F 22 29  A7 33 38 00 C2 0F 34 00  |.G$."/").38...4.|
000007A0: 81 4B B2 31 A4 C3 28 41  4C 24 29 3A 8B 47 24 B3  |.K.1..(AL$):.G$.|
000007B0: B1 CA 28 41 4C 24 2C 4B  2C 31 29 A7 82 4B 3A 89  |..(AL$,K,1)..K:.|
000007C0: 33 38 00 DC 0F 35 00 4B  B2 C3 28 41 4C 24 29 3A  |38...5.K..(AL$):|
000007D0: 82 4B 3A 8B 52 4B B3 B1  32 A7 36 38 00 0F 10 36  |.K:.RK..2.68...6|
000007E0: 00 8B 52 4B 24 B2 22 22  AF 28 28 47 24 B2 22 30  |..RK$."".((G$."0|
000007F0: 22 AF 5A 45 B2 30 29 B0  47 24 B2 22 2E 22 29 B0  |".ZE.0).G$.".").|
00000800: C5 28 52 4B 24 AA 47 24  29 B1 4C 4D A7 33 38 00  |.(RK$.G$).LM.38.|
00000810: 39 10 37 00 58 59 B2 30  3A 81 4B B2 31 A4 C3 28  |9.7.XY.0:.K.1..(|
00000820: 52 4B 24 29 3A 8B CA 28  52 4B 24 2C 4B 2C 31 29  |RK$):..(RK$,K,1)|
00000830: B2 22 2E 22 A7 58 59 B2  31 00 57 10 3C 00 82 4B  |.".".XY.1.W.<..K|
00000840: 3A 8B 47 24 B2 22 2E 22  AF 28 58 59 B2 31 B0 44  |:.G$.".".(XY.1.D|
00000850: 50 B2 30 29 A7 33 38 00  73 10 44 00 52 4B 24 B2  |P.0).38.s.D.RK$.|
00000860: 52 4B 24 AA 47 24 3A 99  22 92 1C 22 47 24 3B 3A  |RK$.G$:.".."G$;:|
00000870: 89 33 38 00 A5 10 4F 00  8D 31 36 3A 99 22 11 90  |.38...O..16:."..|
00000880: 92 20 22 54 53 24 3A 99  22 11 1F 20 C5 4E 54 45  |. "TS$:.".. .NTE|
00000890: 52 20 44 41 54 45 20 49  4E 20 54 48 45 20 46 4F  |R DATE IN THE FO|
000008A0: 52 4D 41 54 22 00 E7 10  50 00 99 22 11 20 44 41  |RMAT"...P..". DA|
000008B0: 59 2F 4D 4F 4E 54 48 2F  59 45 41 52 20 28 45 47  |Y/MONTH/YEAR (EG|
000008C0: 20 32 36 2F 35 2F 38 34  29 22 3A 99 22 11 20 22  | 26/5/84)":.". "|
000008D0: 3B 3A 44 50 B2 30 3A 52  4B B2 33 3A 8D 33 36 3A  |;:DP.0:RK.3:.36:|
000008E0: 44 41 24 B2 52 4B 24 00  1E 11 51 00 81 49 B2 30  |DA$.RK$...Q..I.0|
000008F0: A4 32 3A 44 54 24 28 49  29 B2 22 22 3A 82 49 3A  |.2:DT$(I)."":.I:|
00000900: 43 54 B2 30 3A 81 49 B2  31 A4 C3 28 44 41 24 29  |CT.0:.I.1..(DA$)|
00000910: 3A 41 24 B2 CA 28 44 41  24 2C 49 2C 31 29 00 36  |:A$..(DA$,I,1).6|
00000920: 11 52 00 8B 41 24 B2 22  2F 22 A7 43 54 B2 43 54  |.R..A$."/".CT.CT|
00000930: AA 31 3A 89 38 34 00 4D  11 53 00 44 54 24 28 43  |.1:.84.M.S.DT$(C|
00000940: 54 29 B2 44 54 24 28 43  54 29 AA 41 24 00 83 11  |T).DT$(CT).A$...|
00000950: 54 00 82 49 3A 8B 43 54  B1 32 B0 C3 28 44 54 24  |T..I:.CT.2..(DT$|
00000960: 28 32 29 29 B3 B1 32 B0  C5 28 44 54 24 28 31 29  |(2))..2..(DT$(1)|
00000970: 29 B3 31 B0 C5 28 44 54  24 28 31 29 29 B1 31 32  |).1..(DT$(1)).12|
00000980: A7 38 39 00 AF 11 55 00  8B C5 28 44 54 24 28 30  |.89...U...(DT$(0|
00000990: 29 29 B3 31 B0 C5 28 44  54 24 28 30 29 29 B1 A5  |)).1..(DT$(0))..|
000009A0: 42 28 C5 28 44 54 24 28  31 29 29 29 A7 38 39 00  |B(.(DT$(1))).89.|
000009B0: E0 11 56 00 8B C5 28 44  54 24 28 31 29 29 B2 32  |..V...(DT$(1)).2|
000009C0: AF C5 28 44 54 24 28 30  29 29 B2 32 39 AF A5 4C  |..(DT$(0)).29..L|
000009D0: 28 C5 28 44 54 24 28 32  29 29 29 B2 30 A7 38 39  |(.(DT$(2))).0.89|
000009E0: 00 1C 12 57 00 81 49 B2  30 A4 32 3A 8B C5 28 44  |...W..I.0.2:..(D|
000009F0: 54 24 28 49 29 29 B3 31  30 AF C8 28 44 54 24 28  |T$(I)).10..(DT$(|
00000A00: 49 29 2C 31 29 B3 B1 22  30 22 A7 44 54 24 28 49  |I),1).."0".DT$(I|
00000A10: 29 B2 22 30 22 AA 44 54  24 28 49 29 00 4C 12 58  |)."0".DT$(I).L.X|
00000A20: 00 82 49 3A 44 41 24 B2  44 54 24 28 30 29 AA 22  |..I:DA$.DT$(0)."|
00000A30: 2F 22 AA 44 54 24 28 31  29 AA 22 2F 22 AA 44 54  |/".DT$(1)."/".DT|
00000A40: 24 28 32 29 3A 41 24 B2  22 22 3A 8E 00 81 12 59  |$(2):A$."":....Y|
00000A50: 00 99 3A 99 22 1C 11 20  C9 4E 56 41 4C 49 44 20  |..:.".. .NVALID |
00000A60: 45 4E 54 52 59 2E 20 D0  4C 45 41 53 45 20 54 52  |ENTRY. .LEASE TR|
00000A70: 59 20 41 47 41 49 4E 2E  22 3A 8D 31 32 3A 89 37  |Y AGAIN.":.12:.7|
00000A80: 39 00 B0 12 5A 00 99 22  20 1C 12 D9 92 1F 20 4F  |9...Z.." ..... O|
00000A90: 52 20 12 1C CE 92 1F 20  22 3B 3A 52 4B B2 30 3A  |R ..... ";:RK.0:|
00000AA0: 41 4C 24 B2 22 59 4E D9  CE 22 3A 8D 33 36 3A 8E  |AL$."YN..":.36:.|
00000AB0: 00 C8 12 5B 00 8B C3 28  46 44 24 29 B3 33 39 A7  |...[...(FD$).39.|
00000AC0: 99 46 44 24 3A 89 39 35  00 F1 12 5C 00 81 4A B2  |.FD$:.95...\..J.|
00000AD0: 33 39 A4 31 A9 AB 31 3A  58 24 B2 CA 28 46 44 24  |39.1..1:X$..(FD$|
00000AE0: 2C 4A 2C 31 29 3A 8B 58  24 B3 B1 22 20 22 A7 39  |,J,1):.X$.." ".9|
00000AF0: 34 00 2D 13 5D 00 99 C8  28 46 44 24 2C 4A AB 31  |4.-.]...(FD$,J.1|
00000B00: 29 3A 46 44 24 B2 C9 28  46 44 24 2C C3 28 46 44  |):FD$..(FD$,.(FD|
00000B10: 24 29 AB 4A AA 31 29 3A  4A B2 31 3A 8B 53 50 B2  |$).J.1):J.1:.SP.|
00000B20: 31 A7 46 44 24 B2 22 11  22 AA 46 44 24 00 38 13  |1.FD$.".".FD$.8.|
00000B30: 5E 00 82 4A 3A 89 39 31  00 43 13 5F 00 53 50 B2  |^..J:.91.C._.SP.|
00000B40: 30 3A 8E 00 81 13 60 00  52 B2 32 34 3A 43 B2 30  |0:....`.R.24:C.0|
00000B50: 3A 8D 39 3A 99 22 90 20  20 20 20 20 D0 52 45 53  |:.9:.".     .RES|
00000B60: 53 20 1C 12 D0 92 90 2C  20 1C 12 CE 90 92 20 4F  |S ....., ..... O|
00000B70: 52 20 54 59 50 45 20 4E  55 4D 42 45 52 22 3B 3A  |R TYPE NUMBER";:|
00000B80: 8E 00 AC 13 61 00 59 24  B2 22 22 3A 8B 57 4D B2  |....a.Y$."":.WM.|
00000B90: 31 A7 58 B2 B5 28 28 58  AC 34 2E 35 33 36 29 AA  |1.X..((X.4.536).|
00000BA0: 30 2E 35 29 AD 31 30 3A  89 31 30 31 00 CD 13 62  |0.5).10:.101...b|
00000BB0: 00 58 B2 B5 28 28 58 AC  31 30 29 AA 30 2E 35 29  |.X..((X.10).0.5)|
00000BC0: AD 31 30 3A 8B 57 4D B2  33 A7 31 30 31 00 FC 13  |.10:.WM.3.101...|
00000BD0: 63 00 59 B2 B5 28 58 AD  31 34 29 3A 59 24 B2 C4  |c.Y..(X.14):Y$..|
00000BE0: 28 59 29 AA 22 53 54 22  3A 8B C8 28 59 24 2C 32  |(Y)."ST":..(Y$,2|
00000BF0: 29 B2 22 20 30 22 A7 59  24 B2 22 22 00 1E 14 64  |)." 0".Y$.""...d|
00000C00: 00 58 B2 58 AB 28 59 AC  31 34 29 3A 58 B2 B5 28  |.X.X.(Y.14):X..(|
00000C10: 58 AC 31 30 30 AA 30 2E  35 29 AD 31 30 30 00 46  |X.100.0.5).100.F|
00000C20: 14 65 00 58 58 24 B2 C4  28 58 29 3A 8B 58 B3 31  |.e.XX$..(X):.X.1|
00000C30: AF 58 B1 30 A7 58 58 24  B2 22 20 30 22 AA CA 28  |.X.0.XX$." 0"..(|
00000C40: 58 58 24 2C 32 29 00 70  14 66 00 59 24 B2 59 24  |XX$,2).p.f.Y$.Y$|
00000C50: AA 58 58 24 3A 59 24 B2  CA 28 59 24 2C 32 29 3A  |.XX$:Y$..(Y$,2):|
00000C60: 8B 57 4D B2 32 A7 59 24  B2 59 24 AA 22 4C 42 22  |.WM.2.Y$.Y$."LB"|
00000C70: 00 76 14 67 00 8E 00 8D  14 68 00 8B 57 4D B2 33  |.v.g.....h..WM.3|
00000C80: A7 59 B2 C5 28 59 24 29  3A 89 31 30 38 00 AA 14  |.Y..(Y$):.108...|
00000C90: 69 00 8B 57 4D B2 31 A7  59 B2 C5 28 59 24 29 AC  |i..WM.1.Y..(Y$).|
00000CA0: 32 2E 32 30 35 3A 89 31  30 38 00 D4 14 6A 00 81  |2.205:.108...j..|
00000CB0: 49 B2 31 A4 C3 28 59 24  29 3A 8B CA 28 59 24 2C  |I.1..(Y$):..(Y$,|
00000CC0: 49 2C 31 29 B2 22 53 22  A7 4A B2 49 3A 49 B2 C3  |I,1)."S".J.I:I..|
00000CD0: 28 59 24 29 00 10 15 6B  00 82 49 3A 54 53 24 B2  |(Y$)...k..I:TS$.|
00000CE0: CA 28 59 24 2C 31 2C 4A  AB 31 29 3A 59 B2 28 C5  |.(Y$,1,J.1):Y.(.|
00000CF0: 28 54 53 24 29 AC 31 34  29 AA C5 28 CA 28 59 24  |(TS$).14)..(.(Y$|
00000D00: 2C 4A AA 33 2C C3 28 59  24 29 AB 4A AA 32 29 29  |,J.3,.(Y$).J.2))|
00000D10: 00 16 15 6C 00 8E 00 45  15 6D 00 45 46 B2 30 3A  |...l...E.m.EF.0:|
00000D20: 9F 31 2C 44 2C 36 3A 97  37 38 31 2C 31 3A 9E 28  |.1,D,6:.781,1:.(|
00000D30: 36 35 34 38 31 29 3A 8B  C2 28 37 38 33 29 AF 31  |65481):..(783).1|
00000D40: A7 45 46 B2 31 00 5C 15  6E 00 9E 28 36 35 35 31  |.EF.1.\.n..(6551|
00000D50: 31 29 3A 8B 45 46 B2 30  A7 31 31 34 00 95 15 6F  |1):.EF.0.114...o|
00000D60: 00 8D 31 36 3A 99 22 11  11 22 3A 48 24 B2 22 1C  |..16:."..":H$.".|
00000D70: C4 C5 D6 C9 C3 C5 A0 CE  CF D4 A0 D0 D2 C5 D3 C5  |................|
00000D80: CE D4 22 3A 8D 31 37 3A  54 53 24 B2 22 D0 D2 C9  |..":.17:TS$."...|
00000D90: CE D4 C5 D2 22 00 AF 15  70 00 8B 44 B2 38 A7 54  |...."...p..D.8.T|
00000DA0: 53 24 B2 22 C4 C9 D3 CB  A0 C4 D2 C9 D6 C5 22 00  |S$."..........".|
00000DB0: E8 15 71 00 99 22 11 22  3A 48 24 B2 22 D0 CC C5  |..q..".":H$."...|
00000DC0: C1 D3 C5 A0 C3 CF CE CE  C5 C3 D4 20 22 AA 54 53  |........... ".TS|
00000DD0: 24 AA 22 A0 C1 CE C4 A0  D4 C8 C5 CE 2E 2E 2E 22  |$."............"|
00000DE0: 3A 8D 31 37 3A 8D 31 32  00 EE 15 72 00 8E 00 F6  |:.17:.12...r....|
00000DF0: 15 73 00 8D 31 36 00 2C  16 74 00 81 4B B2 31 A4  |.s..16.,.t..K.1.|
00000E00: 51 4C 3A 99 22 92 11 20  90 22 51 24 28 4B 29 3A  |QL:.".. ."Q$(K):|
00000E10: 82 4B 3A 81 4B B2 31 A4  4C 4D 3A 99 22 11 20 1C  |.K:.K.1.LM:.". .|
00000E20: 12 22 CA 28 C4 28 4B 29  2C 32 29 3B 00 6A 16 75  |.".(.(K),2);.j.u|
00000E30: 00 99 22 92 20 1F 22 3B  4F 50 24 28 4B 29 3A 82  |..". .";OP$(K):.|
00000E40: 4B 3A 99 22 11 11 20 20  20 90 CF 50 54 49 4F 4E  |K:."..   ..PTION|
00000E50: 20 2D 20 22 3B 3A 44 50  B2 30 3A 5A 45 B2 30 3A  | - ";:DP.0:ZE.0:|
00000E60: 52 4B B2 32 3A 8D 33 36  3A 8E 00 7E 16 76 00 8B  |RK.2:.36:..~.v..|
00000E70: 57 4D B3 B1 32 A7 99 22  20 22 57 4D 24 3B 00 86  |WM..2.." "WM$;..|
00000E80: 16 77 00 99 3A 8E 00 A7  16 78 00 48 24 B2 22 20  |.w..:....x.H$." |
00000E90: 50 4F 55 4E 44 22 3A 8B  57 4D B2 31 A7 48 24 B2  |POUND":.WM.1.H$.|
00000EA0: 22 20 4B 49 4C 4F 22 00  BB 16 79 00 8B 58 B3 B1  |" KILO"...y..X..|
00000EB0: 31 A7 48 24 B2 48 24 AA  22 53 22 00 C1 16 7A 00  |1.H$.H$."S"...z.|
00000EC0: 8E 00 D5 16 7B 00 45 4E  B2 31 3A 8D 32 35 3A 9E  |....{.EN.1:.25:.|
00000ED0: 36 34 37 33 38 00 09 17  7C 00 8D 31 36 3A 99 22  |64738...|..16:."|
00000EE0: 1F 11 20 D4 48 49 53 20  50 52 4F 47 52 41 4D 20  |.. .HIS PROGRAM |
00000EF0: 53 48 4F 55 4C 44 20 42  45 20 55 53 45 44 20 54  |SHOULD BE USED T|
00000F00: 4F 20 53 45 54 20 55 50  22 00 39 17 7D 00 99 22  |O SET UP".9.}.."|
00000F10: 11 20 59 4F 55 52 20 50  45 52 53 4F 4E 41 4C 49  |. YOUR PERSONALI|
00000F20: 53 45 44 20 D7 45 49 47  48 54 20 C3 4F 4E 54 52  |SED .EIGHT .ONTR|
00000F30: 4F 4C 20 D0 4C 41 4E 2E  22 00 68 17 7E 00 99 22  |OL .LAN.".h.~.."|
00000F40: 11 20 C1 4E 53 57 45 52  20 41 4C 4C 20 54 48 45  |. .NSWER ALL THE|
00000F50: 20 51 55 45 53 54 49 4F  4E 53 20 48 4F 4E 45 53  | QUESTIONS HONES|
00000F60: 54 4C 59 2C 20 41 53 22  00 92 17 7F 00 99 22 11  |TLY, AS"......".|
00000F70: 20 54 48 45 20 49 4E 46  4F 52 4D 41 54 49 4F 4E  | THE INFORMATION|
00000F80: 20 59 4F 55 20 47 49 56  45 20 48 45 52 45 20 49  | YOU GIVE HERE I|
00000F90: 53 22 00 BD 17 80 00 99  22 11 20 55 53 45 44 20  |S"......". USED |
00000FA0: 54 48 52 4F 55 47 48 4F  55 54 20 54 48 45 20 D0  |THROUGHOUT THE .|
00000FB0: 4C 41 4E 2E 22 3A 8D 31  32 3A 8D 31 36 00 ED 17  |LAN.":.12:.16...|
00000FC0: 81 00 99 22 11 20 90 C9  46 20 59 4F 55 20 41 52  |...". ..F YOU AR|
00000FD0: 45 20 55 53 49 4E 47 20  54 48 45 20 43 41 53 53  |E USING THE CASS|
00000FE0: 45 54 54 45 20 56 45 52  53 49 4F 4E 22 00 1D 18  |ETTE VERSION"...|
00000FF0: 82 00 99 22 11 90 20 4F  46 20 54 48 45 20 50 52  |...".. OF THE PR|
00001000: 4F 47 52 41 4D 2C 20 50  4C 45 41 53 45 20 4C 45  |OGRAM, PLEASE LE|
00001010: 41 56 45 20 54 48 45 20  50 4C 41 59 22 00 4D 18  |AVE THE PLAY".M.|
00001020: 83 00 99 22 11 20 4B 45  59 20 44 45 50 52 45 53  |...". KEY DEPRES|
00001030: 53 45 44 2E 20 C9 46 20  59 4F 55 20 41 52 45 20  |SED. .F YOU ARE |
00001040: 4C 4F 41 44 49 4E 47 20  46 52 4F 4D 22 00 97 18  |LOADING FROM"...|
00001050: 84 00 99 22 11 20 44 49  53 4B 2C 20 4C 45 41 56  |...". DISK, LEAV|
00001060: 45 20 54 48 45 20 44 49  53 4B 20 49 4E 20 50 4C  |E THE DISK IN PL|
00001070: 41 43 45 20 20 20 20 20  20 20 20 20 20 11 20 54  |ACE          . T|
00001080: 48 52 4F 55 47 48 4F 55  54 20 54 48 45 20 50 52  |HROUGHOUT THE PR|
00001090: 4F 47 52 41 4D 2E 22 00  9F 18 85 00 8D 31 32 00  |OGRAM."......12.|
000010A0: D0 18 86 00 54 53 24 B2  22 D4 4F 44 41 59 27 53  |....TS$.".ODAY'S|
000010B0: 20 44 41 54 45 22 3A 8D  37 39 3A 53 44 24 B2 44  | DATE":.79:SD$.D|
000010C0: 41 24 3A 8D 31 36 3A 4C  B2 31 35 3A 52 4B B2 31  |A$:.16:L.15:RK.1|
000010D0: 00 16 19 87 00 99 22 11  90 20 D0 4C 45 41 53 45  |......".. .LEASE|
000010E0: 20 54 59 50 45 20 49 4E  20 59 4F 55 52 20 4E 41  | TYPE IN YOUR NA|
000010F0: 4D 45 20 28 4D 41 58 2E  20 31 35 20 20 20 20 20  |ME (MAX. 15     |
00001100: 20 11 20 43 48 41 52 41  43 54 45 52 53 29 22 3A  | . CHARACTERS)":|
00001110: 99 22 11 20 22 3B 00 28  19 88 00 8D 33 36 3A 4E  |.". ";.(....36:N|
00001120: 41 24 B2 52 4B 24 3A 99  00 70 19 89 00 99 22 11  |A$.RK$:..p....".|
00001130: 90 20 D7 48 41 54 20 53  45 58 20 41 52 45 20 59  |. .HAT SEX ARE Y|
00001140: 4F 55 3F 20 1C 12 CD 92  90 20 4F 52 20 1C 12 C6  |OU? ..... OR ...|
00001150: 92 20 22 3B 3A 52 4B B2  30 3A 41 4C 24 B2 22 4D  |. ";:RK.0:AL$."M|
00001160: 46 CD C6 22 3A 8D 33 36  3A 53 58 24 B2 52 4B 24  |F..":.36:SX$.RK$|
00001170: 00 AD 19 8A 00 99 3A 99  22 11 90 20 C8 4F 57 20  |......:.".. .OW |
00001180: 4F 4C 44 20 41 52 45 20  59 4F 55 2C 20 22 3B 4E  |OLD ARE YOU, ";N|
00001190: 41 24 3B 22 3F 20 22 3B  3A 4C 4D B2 39 39 3A 52  |A$;"? ";:LM.99:R|
000011A0: 4B B2 32 3A 8D 33 36 3A  41 47 B2 43 48 00 C7 19  |K.2:.36:AG.CH...|
000011B0: 8B 00 8B 41 47 B3 31 38  A7 54 53 24 B2 22 41 47  |...AG.18.TS$."AG|
000011C0: 45 22 3A 89 31 36 37 00  12 1A 8C 00 51 24 28 31  |E":.167.....Q$(1|
000011D0: 29 B2 22 90 D7 4F 55 4C  44 20 59 4F 55 20 4C 49  |)."..OULD YOU LI|
000011E0: 4B 45 20 57 45 49 47 48  54 53 20 54 4F 20 42 45  |KE WEIGHTS TO BE|
000011F0: 20 47 49 56 45 4E 20 49  4E 22 3A 51 4C B2 31 3A  | GIVEN IN":QL.1:|
00001200: 4F 50 24 28 31 29 B2 22  4B 49 4C 4F 47 52 41 4D  |OP$(1)."KILOGRAM|
00001210: 53 22 00 5D 1A 8D 00 4F  50 24 28 32 29 B2 22 53  |S".]...OP$(2)."S|
00001220: 54 4F 4E 45 53 20 41 4E  44 20 50 4F 55 4E 44 53  |TONES AND POUNDS|
00001230: 22 3A 4F 50 24 28 33 29  B2 22 50 4F 55 4E 44 53  |":OP$(3)."POUNDS|
00001240: 22 3A 4C 4D B2 33 3A 8D  31 31 35 3A 57 4D 24 B2  |":LM.3:.115:WM$.|
00001250: 4F 50 24 28 43 48 29 3A  57 4D B2 43 48 00 83 1A  |OP$(CH):WM.CH...|
00001260: 8E 00 99 3A 4C 4D B2 34  35 30 3A 8B 57 4D B2 31  |...:LM.450:.WM.1|
00001270: A7 57 4D 24 B2 22 4B 49  4C 4F 53 22 3A 4C 4D B2  |.WM$."KILOS":LM.|
00001280: 32 30 35 00 C1 1A 8F 00  99 22 11 90 20 C8 4F 57  |205......".. .OW|
00001290: 20 4D 55 43 48 20 44 4F  20 59 4F 55 20 57 45 49  | MUCH DO YOU WEI|
000012A0: 47 48 3F 22 3A 8B 57 4D  B3 B1 32 A7 99 22 20 11  |GH?":.WM..2.." .|
000012B0: 28 22 57 4D 24 22 29 20  3A 20 22 3B 3A 89 31 34  |("WM$") : ";:.14|
000012C0: 37 00 FB 1A 90 00 99 22  11 20 1F 53 54 4F 4E 45  |7......". .STONE|
000012D0: 53 20 3A 20 22 3B 3A 4C  4D B2 33 30 3A 52 4B B2  |S : ";:LM.30:RK.|
000012E0: 32 3A 8D 33 36 3A 52 4B  24 B2 52 4B 24 AA 22 53  |2:.36:RK$.RK$."S|
000012F0: 54 20 22 3A 54 57 24 B2  52 4B 24 00 0E 1B 91 00  |T ":TW$.RK$.....|
00001300: 8B 54 53 B3 B1 32 A7 53  57 24 B2 52 4B 24 00 31  |.TS..2.SW$.RK$.1|
00001310: 1B 92 00 99 22 20 20 20  1F 50 4F 55 4E 44 53 20  |...."   .POUNDS |
00001320: 3A 22 3B 3A 4C 4D B2 31  33 2E 39 39 3A 5A 45 B2  |:";:LM.13.99:ZE.|
00001330: 31 00 5B 1B 93 00 99 22  20 22 3B 3A 52 4B B2 32  |1.[...." ";:RK.2|
00001340: 3A 44 50 B2 31 3A 8D 33  36 3A 44 50 B2 30 3A 5A  |:DP.1:.36:DP.0:Z|
00001350: 45 B2 30 3A 8B 54 53 B2  32 A7 8E 00 7E 1B 94 00  |E.0:.TS.2...~...|
00001360: 53 57 24 B2 53 57 24 AA  52 4B 24 3A 8B 57 4D B2  |SW$.SW$.RK$:.WM.|
00001370: 32 A7 53 57 24 B2 53 57  24 AA 22 4C 42 22 00 C7  |2.SW$.SW$."LB"..|
00001380: 1B 95 00 51 24 28 31 29  B2 22 C4 4F 20 59 4F 55  |...Q$(1).".O YOU|
00001390: 20 57 41 4E 54 20 54 4F  20 47 49 56 45 20 59 4F  | WANT TO GIVE YO|
000013A0: 55 52 20 48 45 49 47 48  54 20 49 4E 22 3A 51 4C  |UR HEIGHT IN":QL|
000013B0: B2 31 3A 4F 50 24 28 31  29 B2 22 43 45 4E 54 49  |.1:OP$(1)."CENTI|
000013C0: 4D 45 54 52 45 53 22 00  F6 1B 96 00 4F 50 24 28  |METRES".....OP$(|
000013D0: 32 29 B2 22 46 45 45 54  20 41 4E 44 20 49 4E 43  |2)."FEET AND INC|
000013E0: 48 45 53 22 3A 4C 4D B2  32 3A 8D 31 31 35 3A 99  |HES":LM.2:.115:.|
000013F0: 3A 4F 50 B2 43 48 00 28  1C 97 00 48 54 B2 30 3A  |:OP.CH.(...HT.0:|
00001400: 99 22 11 90 20 C8 4F 57  20 54 41 4C 4C 20 41 52  |.".. .OW TALL AR|
00001410: 45 20 59 4F 55 3F 22 3A  4C 4D B2 32 34 30 3A 8B  |E YOU?":LM.240:.|
00001420: 4F 50 B2 31 A7 31 35 34  00 61 1C 98 00 99 22 11  |OP.1.154.a....".|
00001430: 20 1F 46 45 45 54 20 3A  20 22 3B 3A 4C 4D B2 31  | .FEET : ";:LM.1|
00001440: 30 3A 52 4B B2 32 3A 8D  33 36 3A 48 54 B2 43 48  |0:RK.2:.36:HT.CH|
00001450: AC 31 32 3A 48 54 24 B2  52 4B 24 AA 22 46 54 20  |.12:HT$.RK$."FT |
00001460: 22 00 8E 1C 99 00 99 22  20 20 20 1F 49 4E 43 48  |"......"   .INCH|
00001470: 45 53 20 3A 22 3B 3A 4C  4D B2 31 31 2E 39 39 3A  |ES :";:LM.11.99:|
00001480: 5A 45 B2 31 3A 44 50 B2  31 3A 89 31 35 35 00 A6  |ZE.1:DP.1:.155..|
00001490: 1C 9A 00 99 22 11 20 28  22 3B 4F 50 24 28 4F 50  |....". (";OP$(OP|
000014A0: 29 3B 22 29 22 3B 00 E1  1C 9B 00 99 22 20 22 3B  |);")";......" ";|
000014B0: 3A 52 4B B2 32 3A 8D 33  36 3A 48 54 B2 48 54 AA  |:RK.2:.36:HT.HT.|
000014C0: 43 48 3A 48 54 24 B2 48  54 24 AA 52 4B 24 3A 8B  |CH:HT$.HT$.RK$:.|
000014D0: 4F 50 B2 31 A7 48 54 24  B2 48 54 24 AA 22 43 4D  |OP.1.HT$.HT$."CM|
000014E0: 22 00 FD 1C 9C 00 8B 4F  50 B2 32 A7 48 54 24 B2  |"......OP.2.HT$.|
000014F0: 48 54 24 AA 22 49 4E 22  3A 89 31 35 38 00 0E 1D  |HT$."IN":.158...|
00001500: 9D 00 48 54 B2 48 54 AC  30 2E 33 39 33 37 00 3C  |..HT.HT.0.3937.<|
00001510: 1D 9E 00 8D 31 36 3A 99  22 90 11 20 C4 41 54 45  |....16:.".. .ATE|
00001520: 3A 20 20 20 1C 22 53 44  24 3A 99 22 11 90 20 CE  |:   ."SD$:.".. .|
00001530: 41 4D 45 3A 20 20 20 1C  22 4E 41 24 00 69 1D 9F  |AME:   ."NA$.i..|
00001540: 00 54 53 24 B2 22 CD 41  4C 45 22 3A 8B 53 58 24  |.TS$.".ALE":.SX$|
00001550: B2 22 46 22 B0 53 58 24  B2 22 C6 22 A7 54 53 24  |."F".SX$.".".TS$|
00001560: B2 22 C6 45 4D 41 4C 45  22 00 A5 1D A0 00 99 22  |.".EMALE"......"|
00001570: 11 90 20 D3 45 58 3A 20  20 20 20 1C 22 54 53 24  |.. .EX:    ."TS$|
00001580: 3A 99 22 11 90 20 C1 47  45 3A 20 20 20 1C 22 41  |:.".. .GE:   ."A|
00001590: 47 3A 99 22 90 11 20 D7  45 49 47 48 54 3A 20 1C  |G:.".. .EIGHT: .|
000015A0: 22 53 57 24 3B 00 C1 1D  A1 00 8D 31 31 38 3A 99  |"SW$;......118:.|
000015B0: 22 11 90 20 C8 45 49 47  48 54 3A 20 1C 22 48 54  |".. .EIGHT: ."HT|
000015C0: 24 00 ED 1D A2 00 99 22  11 11 1F 20 C1 52 45 20  |$......"... .RE |
000015D0: 54 48 45 53 45 20 44 45  54 41 49 4C 53 20 43 4F  |THESE DETAILS CO|
000015E0: 52 52 45 43 54 3F 20 22  3B 3A 8D 39 30 00 2F 1E  |RRECT? ";:.90./.|
000015F0: A3 00 8B 52 4B 24 B2 22  4E 22 B0 52 4B 24 B2 22  |...RK$."N".RK$."|
00001600: CE 22 A7 53 44 24 B2 22  22 3A 4E 41 24 B2 22 22  |.".SD$."":NA$.""|
00001610: 3A 53 58 24 B2 22 22 3A  41 47 B2 30 3A 53 57 24  |:SX$."":AG.0:SW$|
00001620: B2 22 22 3A 48 54 24 B2  22 22 3A 89 31 33 34 00  |."":HT$."":.134.|
00001630: 58 1E A4 00 58 B2 35 37  3A 54 B2 32 31 3A 8B 53  |X...X.57:T.21:.S|
00001640: 58 24 B2 22 46 22 B0 53  58 24 B2 22 C6 22 A7 58  |X$."F".SX$.".".X|
00001650: B2 35 33 3A 54 B2 32 32  00 74 1E A5 00 41 B2 B5  |.53:T.22.t...A..|
00001660: 28 48 54 29 AB 58 3A 8B  41 B1 30 AF 41 B3 B2 54  |(HT).X:.A.0.A..T|
00001670: A7 31 37 34 00 85 1E A6  00 54 53 24 B2 22 48 45  |.174.....TS$."HE|
00001680: 49 47 48 54 22 00 CD 1E  A7 00 8D 31 36 3A 99 22  |IGHT"......16:."|
00001690: 11 11 1F 20 D3 4F 52 52  59 20 2D 20 57 45 20 48  |... .ORRY - WE H|
000016A0: 41 56 45 20 4E 4F 20 46  49 47 55 52 45 53 20 41  |AVE NO FIGURES A|
000016B0: 56 41 49 4C 41 42 4C 45  20 20 20 11 20 46 4F 52  |VAILABLE   . FOR|
000016C0: 20 59 4F 55 52 20 22 54  53 24 22 2E 22 00 DC 1E  | YOUR "TS$"."...|
000016D0: A8 00 8B 41 47 B1 31 37  A7 31 37 31 00 0A 1F A9  |...AG.17.171....|
000016E0: 00 99 22 11 20 C1 54 20  59 4F 55 52 20 41 47 45  |..". .T YOUR AGE|
000016F0: 2C 20 59 4F 55 20 53 48  4F 55 4C 44 20 4E 4F 54  |, YOU SHOULD NOT|
00001700: 20 43 4F 4E 53 49 44 45  52 22 00 4A 1F AA 00 99  | CONSIDER".J....|
00001710: 22 11 20 4C 4F 53 49 4E  47 20 57 45 49 47 48 54  |". LOSING WEIGHT|
00001720: 20 55 4E 4C 45 53 53 20  59 4F 55 52 20 44 4F 43  | UNLESS YOUR DOC|
00001730: 54 4F 52 20 48 41 53 20  20 20 11 20 53 55 47 47  |TOR HAS   . SUGG|
00001740: 45 53 54 45 44 20 49 54  2E 22 00 7C 1F AB 00 99  |ESTED IT.".|....|
00001750: 22 11 11 20 C9 46 20 59  4F 55 20 52 45 41 4C 4C  |".. .F YOU REALL|
00001760: 59 20 54 48 49 4E 4B 20  59 4F 55 20 41 52 45 20  |Y THINK YOU ARE |
00001770: 4F 56 45 52 57 45 49 47  48 54 2C 22 00 A2 1F AC  |OVERWEIGHT,"....|
00001780: 00 99 22 20 41 53 4B 20  59 4F 55 52 20 44 4F 43  |.." ASK YOUR DOC|
00001790: 54 4F 52 20 54 4F 20 53  55 47 47 45 53 54 20 41  |TOR TO SUGGEST A|
000017A0: 4E 22 00 D7 1F AD 00 99  22 11 20 41 50 50 52 4F  |N"......". APPRO|
000017B0: 50 52 49 41 54 45 20 44  49 45 54 2D 50 4C 41 4E  |PRIATE DIET-PLAN|
000017C0: 20 54 4F 20 53 55 49 54  20 59 4F 55 2E 22 3A 8D  | TO SUIT YOU.":.|
000017D0: 31 32 3A 89 31 32 33 00  FB 1F AE 00 8B 53 58 24  |12:.123......SX$|
000017E0: B2 22 46 22 B0 53 58 24  B2 22 C6 22 A7 81 49 B2  |."F".SX$."."..I.|
000017F0: 31 A4 31 38 39 3A 87 41  3A 82 49 00 28 20 AF 00  |1.189:.A:.I.( ..|
00001800: 81 49 B2 31 A4 54 3A 81  4A B2 31 A4 33 3A 81 4B  |.I.1.T:.J.1.3:.K|
00001810: B2 31 A4 33 3A 87 49 57  28 49 2C 4A 2C 4B 29 3A  |.1.3:.IW(I,J,K):|
00001820: 82 4B 3A 82 4A 3A 82 49  00 61 20 B0 00 41 B2 48  |.K:.J:.I.a ..A.H|
00001830: 54 AB 58 3A 59 24 B2 53  57 24 3A 8D 31 30 34 3A  |T.X:Y$.SW$:.104:|
00001840: 57 54 B2 59 3A 41 52 B2  33 3A 8B 41 47 B3 33 35  |WT.Y:AR.3:.AG.35|
00001850: A7 41 52 B2 32 3A 8B 41  47 B3 32 35 A7 41 52 B2  |.AR.2:.AG.25.AR.|
00001860: 31 00 AB 20 B1 00 57 54  28 32 29 B2 49 57 28 41  |1.. ..WT(2).IW(A|
00001870: 2C 41 52 2C 31 29 3A 57  54 28 33 29 B2 49 57 28  |,AR,1):WT(3).IW(|
00001880: 41 2C 41 52 2C 32 29 3A  57 54 28 35 29 B2 49 57  |A,AR,2):WT(5).IW|
00001890: 28 41 2C 41 52 2C 33 29  3A 58 B2 57 54 28 32 29  |(A,AR,3):X.WT(2)|
000018A0: 3A 8D 39 37 3A 41 31 24  B2 59 24 00 D5 20 B2 00  |:.97:A1$.Y$.. ..|
000018B0: 58 B2 57 54 28 33 29 3A  8D 39 37 3A 42 31 24 B2  |X.WT(3):.97:B1$.|
000018C0: 59 24 3A 58 B2 57 54 28  35 29 3A 8D 39 37 3A 43  |Y$:X.WT(5):.97:C|
000018D0: 31 24 B2 59 24 00 11 21  B3 00 8D 31 36 3A 99 22  |1$.Y$..!...16:."|
000018E0: 11 1F 92 20 D9 4F 55 52  20 57 45 49 47 48 54 20  |... .OUR WEIGHT |
000018F0: 49 53 20 1C 22 53 57 24  3B 3A 8D 31 31 38 3A 99  |IS ."SW$;:.118:.|
00001900: 22 1F 11 20 D9 4F 55 52  20 49 44 45 41 4C 20 22  |".. .OUR IDEAL "|
00001910: 3B 00 45 21 B4 00 99 22  57 45 49 47 48 54 20 53  |;.E!..."WEIGHT S|
00001920: 48 4F 55 4C 44 20 42 45  20 42 45 54 57 45 45 4E  |HOULD BE BETWEEN|
00001930: 11 22 3A 48 24 B2 41 31  24 AA 22 20 41 4E 44 20  |.":H$.A1$." AND |
00001940: 22 AA 43 31 24 00 5E 21  B5 00 8B 57 4D B3 B1 32  |".C1$.^!...WM..2|
00001950: A7 48 24 B2 48 24 AA 22  20 22 AA 57 4D 24 00 75  |.H$.H$." ".WM$.u|
00001960: 21 B6 00 8D 31 37 3A 8B  57 54 B1 B2 57 54 28 32  |!...17:.WT..WT(2|
00001970: 29 A7 31 38 37 00 A7 21  B7 00 99 22 92 1F 11 20  |).187..!..."... |
00001980: D9 4F 55 20 53 48 4F 55  4C 44 20 4E 4F 54 20 42  |.OU SHOULD NOT B|
00001990: 45 20 4C 49 47 48 54 45  52 20 54 48 41 4E 20 59  |E LIGHTER THAN Y|
000019A0: 4F 55 20 41 52 45 22 00  D3 21 B8 00 99 22 11 20  |OU ARE"..!...". |
000019B0: 41 54 20 54 48 45 20 4D  4F 4D 45 4E 54 20 2D 20  |AT THE MOMENT - |
000019C0: 49 4E 20 46 41 43 54 20  59 4F 55 20 53 48 4F 55  |IN FACT YOU SHOU|
000019D0: 4C 44 22 00 FA 21 B9 00  99 22 11 20 43 4F 4E 53  |LD"..!...". CONS|
000019E0: 49 44 45 52 20 47 41 49  4E 49 4E 47 20 53 4F 4D  |IDER GAINING SOM|
000019F0: 45 20 57 45 49 47 48 54  21 22 00 34 22 BA 00 99  |E WEIGHT!".4"...|
00001A00: 22 11 20 D9 4F 55 20 43  45 52 54 41 49 4E 4C 59  |". .OU CERTAINLY|
00001A10: 20 44 4F 4E 27 54 20 4E  45 45 44 20 54 48 49 53  | DON'T NEED THIS|
00001A20: 20 50 52 4F 47 52 41 4D  2E 22 3A 57 4C B2 31 3A  | PROGRAM.":WL.1:|
00001A30: 89 32 30 35 00 48 22 BB  00 8B 57 54 B1 57 54 28  |.205.H"...WT.WT(|
00001A40: 33 29 AA 31 A7 31 39 30  00 78 22 BC 00 99 22 92  |3).1.190.x"...".|
00001A50: 1F 11 20 D2 45 4C 41 58  21 20 D9 4F 55 52 20 57  |.. .ELAX! .OUR W|
00001A60: 45 49 47 48 54 20 49 53  20 49 44 45 41 4C 2E 20  |EIGHT IS IDEAL. |
00001A70: D5 53 45 20 54 48 45 22  00 AF 22 BD 00 99 22 11  |.SE THE".."...".|
00001A80: 20 50 52 4F 47 52 41 4D  20 54 4F 20 4B 45 45 50  | PROGRAM TO KEEP|
00001A90: 20 59 4F 55 52 20 57 45  49 47 48 54 20 53 54 45  | YOUR WEIGHT STE|
00001AA0: 41 44 59 2E 22 3A 57 4C  B2 32 3A 89 32 30 35 00  |ADY.":WL.2:.205.|
00001AB0: C1 22 BE 00 8B 57 54 B1  57 54 28 35 29 A7 31 39  |."...WT.WT(5).19|
00001AC0: 35 00 F3 22 BF 00 99 22  92 1F 11 20 D9 4F 55 20  |5.."..."... .OU |
00001AD0: 41 52 45 20 49 4E 20 54  48 45 20 48 41 50 50 59  |ARE IN THE HAPPY|
00001AE0: 20 50 4F 53 49 54 49 4F  4E 20 4F 46 20 42 45 49  | POSITION OF BEI|
00001AF0: 4E 47 22 00 22 23 C0 00  99 22 11 20 41 42 4C 45  |NG"."#...". ABLE|
00001B00: 20 54 4F 20 44 45 43 49  44 45 20 46 4F 52 20 59  | TO DECIDE FOR Y|
00001B10: 4F 55 53 45 4C 46 20 57  48 45 54 48 45 52 20 4F  |OUSELF WHETHER O|
00001B20: 52 22 00 53 23 C1 00 99  22 11 20 4E 4F 54 20 59  |R".S#...". NOT Y|
00001B30: 4F 55 20 57 41 4E 54 20  54 4F 20 4C 4F 53 45 20  |OU WANT TO LOSE |
00001B40: 57 45 49 47 48 54 2E 20  C9 46 20 59 4F 55 20 41  |WEIGHT. .F YOU A|
00001B50: 52 45 22 00 8A 23 C2 00  99 22 20 48 41 50 50 59  |RE"..#..." HAPPY|
00001B60: 20 41 4E 44 20 48 45 41  4C 54 48 59 20 2D 20 53  | AND HEALTHY - S|
00001B70: 54 41 59 20 41 53 20 59  4F 55 20 41 52 45 2E 22  |TAY AS YOU ARE."|
00001B80: 3A 57 4C B2 33 3A 89 32  30 35 00 B5 23 C3 00 57  |:WL.3:.205..#..W|
00001B90: 4C B2 35 3A 8B 57 54 B3  57 54 28 35 29 AA 28 57  |L.5:.WT.WT(5).(W|
00001BA0: 54 28 35 29 AB 57 54 28  33 29 29 A7 57 4C B2 34  |T(5).WT(3)).WL.4|
00001BB0: 3A 89 32 30 31 00 E3 23  C4 00 99 22 1F 11 92 20  |:.201..#..."... |
00001BC0: D9 4F 55 20 41 52 45 20  4F 42 56 49 4F 55 53 4C  |.OU ARE OBVIOUSL|
00001BD0: 59 20 56 45 52 59 20 4F  56 45 52 57 45 49 47 48  |Y VERY OVERWEIGH|
00001BE0: 54 2E 22 00 12 24 C5 00  99 22 11 20 C9 46 20 59  |T."..$...". .F Y|
00001BF0: 4F 55 20 48 41 56 45 4E  27 54 20 44 4F 4E 45 20  |OU HAVEN'T DONE |
00001C00: 53 4F 20 41 4C 52 45 41  44 59 2C 20 56 49 53 49  |SO ALREADY, VISI|
00001C10: 54 22 00 40 24 C6 00 99  22 11 20 59 4F 55 52 20  |T".@$...". YOUR |
00001C20: 44 4F 43 54 4F 52 20 2D  20 54 48 45 52 45 20 4D  |DOCTOR - THERE M|
00001C30: 41 59 20 42 45 20 53 4F  4D 45 20 4E 45 45 44 22  |AY BE SOME NEED"|
00001C40: 00 6E 24 C7 00 99 22 11  20 46 4F 52 20 4D 45 44  |.n$...". FOR MED|
00001C50: 49 43 41 4C 20 54 52 45  41 54 4D 45 4E 54 20 49  |ICAL TREATMENT I|
00001C60: 4E 20 41 44 44 49 54 49  4F 4E 20 54 4F 22 00 A1  |N ADDITION TO"..|
00001C70: 24 C8 00 99 22 11 20 54  48 49 53 20 D7 45 49 47  |$...". THIS .EIG|
00001C80: 48 54 20 C3 4F 4E 54 52  4F 4C 20 D0 52 4F 47 52  |HT .ONTROL .ROGR|
00001C90: 41 4D 2E 22 3A 8D 31 32  3A 8D 31 36 3A 89 32 30  |AM.":.12:.16:.20|
00001CA0: 32 00 D2 24 C9 00 99 22  1F 92 11 20 D9 45 53 2C  |2..$..."... .ES,|
00001CB0: 20 59 4F 55 20 50 52 4F  42 41 42 4C 59 20 53 48  | YOU PROBABLY SH|
00001CC0: 4F 55 4C 44 20 4C 4F 53  45 20 57 45 49 47 48 54  |OULD LOSE WEIGHT|
00001CD0: 2E 22 00 02 25 CA 00 99  22 11 20 D4 48 45 20 42  |."..%...". .HE B|
00001CE0: 45 53 54 20 57 41 59 20  54 4F 20 4C 4F 53 45 20  |EST WAY TO LOSE |
00001CF0: 57 45 49 47 48 54 20 2D  20 41 4E 44 20 4B 45 45  |WEIGHT - AND KEE|
00001D00: 50 22 00 31 25 CB 00 99  22 11 20 49 54 20 4F 46  |P".1%...". IT OF|
00001D10: 46 21 20 2D 20 49 53 20  54 4F 20 4C 4F 53 45 20  |F! - IS TO LOSE |
00001D20: 49 54 20 53 4C 4F 57 4C  59 20 4F 56 45 52 20 41  |IT SLOWLY OVER A|
00001D30: 22 00 4A 25 CC 00 99 22  11 20 50 45 52 49 4F 44  |".J%...". PERIOD|
00001D40: 20 4F 46 20 54 49 4D 45  2E 22 00 82 25 CD 00 8D  | OF TIME."..%...|
00001D50: 31 32 3A 8D 31 36 3A 99  22 11 1F 20 CE 4F 20 4D  |12:.16:.".. .O M|
00001D60: 41 54 54 45 52 20 57 48  41 54 20 59 4F 55 52 20  |ATTER WHAT YOUR |
00001D70: 57 45 49 47 48 54 2C 20  59 4F 55 20 57 4F 55 4C  |WEIGHT, YOU WOUL|
00001D80: 44 22 00 C1 25 CE 00 99  22 11 20 42 45 20 53 55  |D"..%...". BE SU|
00001D90: 52 45 20 54 4F 20 42 45  4E 45 46 49 54 20 46 52  |RE TO BENEFIT FR|
00001DA0: 4F 4D 20 41 4E 20 49 4E  43 52 45 41 53 45 20 20  |OM AN INCREASE  |
00001DB0: 20 20 11 20 49 4E 20 45  58 45 52 43 49 53 45 2E  |  . IN EXERCISE.|
00001DC0: 22 00 F0 25 CF 00 99 22  11 20 D4 48 49 53 20 57  |"..%...". .HIS W|
00001DD0: 49 4C 4C 20 49 4D 50 52  4F 56 45 20 59 4F 55 52  |ILL IMPROVE YOUR|
00001DE0: 20 4D 45 54 41 42 4F 4C  49 43 20 52 41 54 45 22  | METABOLIC RATE"|
00001DF0: 00 1E 26 D0 00 99 22 11  20 41 4E 44 20 54 4F 4E  |..&...". AND TON|
00001E00: 45 20 55 50 20 59 4F 55  52 20 4D 55 53 43 4C 45  |E UP YOUR MUSCLE|
00001E10: 53 2C 20 57 48 49 43 48  20 57 49 4C 4C 22 00 5C  |S, WHICH WILL".\|
00001E20: 26 D1 00 99 22 11 20 4D  41 4B 45 20 59 4F 55 20  |&...". MAKE YOU |
00001E30: 4C 4F 4F 4B 20 53 4C 49  4D 4D 45 52 20 41 4E 44  |LOOK SLIMMER AND|
00001E40: 20 46 45 45 4C 20 46 49  54 54 45 52 2E 22 3A 8D  | FEEL FITTER.":.|
00001E50: 31 32 3A 8B 57 4C B3 34  A7 32 31 36 00 97 26 D2  |12:.WL.4.216..&.|
00001E60: 00 8D 31 36 3A 99 22 11  1C 20 D7 C1 D2 CE C9 CE  |..16:.".. ......|
00001E70: C7 22 3A 99 22 1F 11 20  C9 46 20 59 4F 55 20 41  |.":.".. .F YOU A|
00001E80: 52 45 20 4E 4F 54 20 55  53 45 44 20 54 4F 20 52  |RE NOT USED TO R|
00001E90: 45 47 55 4C 41 52 22 00  C6 26 D3 00 99 22 11 20  |EGULAR"..&...". |
00001EA0: 45 58 45 52 43 49 53 45  2C 20 54 41 4B 45 20 49  |EXERCISE, TAKE I|
00001EB0: 54 20 45 41 53 59 20 54  4F 20 42 45 47 49 4E 20  |T EASY TO BEGIN |
00001EC0: 57 49 54 48 2E 22 00 F2  26 D4 00 99 22 11 20 D2  |WITH."..&...". .|
00001ED0: 45 4D 45 4D 42 45 52 2C  20 42 45 43 41 55 53 45  |EMEMBER, BECAUSE|
00001EE0: 20 59 4F 55 20 41 52 45  20 43 41 52 52 59 49 4E  | YOU ARE CARRYIN|
00001EF0: 47 22 00 21 27 D5 00 99  22 11 20 45 58 54 52 41  |G".!'...". EXTRA|
00001F00: 20 57 45 49 47 48 54 2C  20 59 4F 55 20 57 49 4C  | WEIGHT, YOU WIL|
00001F10: 4C 20 55 53 45 20 41 20  4C 4F 54 20 4D 4F 52 45  |L USE A LOT MORE|
00001F20: 22 00 4D 27 D6 00 99 22  11 20 43 41 4C 4F 52 49  |".M'...". CALORI|
00001F30: 45 53 20 54 48 41 4E 20  4D 4F 53 54 20 50 45 4F  |ES THAN MOST PEO|
00001F40: 50 4C 45 20 49 4E 20 44  4F 49 4E 47 22 00 6F 27  |PLE IN DOING".o'|
00001F50: D7 00 99 22 11 20 45 56  45 4E 20 4C 49 47 48 54  |...". EVEN LIGHT|
00001F60: 20 45 58 45 52 43 49 53  45 2E 22 3A 8D 31 32 00  | EXERCISE.":.12.|
00001F70: 7D 27 D8 00 8B 57 4C B2  31 A7 31 32 33 00 A1 27  |}'...WL.1.123..'|
00001F80: D9 00 8B 57 4C B2 32 A7  57 54 28 31 29 B2 30 3A  |...WL.2.WT(1).0:|
00001F90: 57 54 28 34 29 B2 30 3A  54 44 B2 30 3A 89 32 34  |WT(4).0:TD.0:.24|
00001FA0: 35 00 DA 27 DA 00 57 54  28 31 29 B2 57 54 28 33  |5..'..WT(1).WT(3|
00001FB0: 29 3A 8B B6 28 57 54 AB  57 54 28 31 29 29 B3 31  |):..(WT.WT(1)).1|
00001FC0: A7 57 54 28 31 29 B2 30  3A 57 54 28 34 29 B2 30  |.WT(1).0:WT(4).0|
00001FD0: 3A 54 44 B2 30 3A 89 32  34 35 00 E2 27 DB 00 8D  |:TD.0:.245..'...|
00001FE0: 31 36 00 1D 28 DC 00 8B  57 4C B2 33 AF 54 53 B2  |16..(...WL.3.TS.|
00001FF0: 30 A7 99 22 11 90 20 A4  A4 A4 A4 A4 A4 A4 A4 22  |0..".. ........"|
00002000: 3A 99 22 20 12 CF D0 D4  C9 CF CE C1 CC 92 22 3A  |:." ..........":|
00002010: 99 22 90 20 A3 A3 A3 A3  A3 A3 A3 A3 22 00 50 28  |.". ........".P(|
00002020: DD 00 99 22 11 90 20 D4  41 52 47 45 54 20 57 45  |...".. .ARGET WE|
00002030: 49 47 48 54 20 3A 20 1C  22 3B 3A 58 B2 57 54 28  |IGHT : .";:X.WT(|
00002040: 31 29 3A 8D 39 37 3A 99  59 24 3B 3A 8D 31 31 38  |1):.97:.Y$;:.118|
00002050: 00 61 28 DE 00 8B 54 53  B2 34 AF 54 44 B1 30 A7  |.a(...TS.4.TD.0.|
00002060: 8E 00 6F 28 DF 00 8B 54  53 B2 34 A7 32 32 38 00  |..o(...TS.4.228.|
00002070: AB 28 E0 00 99 3A 99 22  1F 20 D4 4F 20 41 43 48  |.(...:.". .O ACH|
00002080: 49 45 56 45 20 54 48 49  53 2C 20 59 4F 55 20 4E  |IEVE THIS, YOU N|
00002090: 45 45 44 20 54 4F 20 4C  4F 53 45 22 3A 58 B2 57  |EED TO LOSE":X.W|
000020A0: 54 AB 57 54 28 31 29 3A  8D 39 37 00 D2 28 E1 00  |T.WT(1):.97..(..|
000020B0: 99 22 11 20 90 22 59 24  3B 3A 8B 57 4D B3 B1 32  |.". ."Y$;:.WM..2|
000020C0: A7 58 B2 C5 28 59 24 29  3A 8D 31 32 30 3A 99 48  |.X..(Y$):.120:.H|
000020D0: 24 3B 00 E0 28 E2 00 8B  54 53 B2 33 A7 32 32 38  |$;..(...TS.3.228|
000020E0: 00 15 29 E3 00 57 54 28  34 29 B2 30 2E 35 3A 52  |..)..WT(4).0.5:R|
000020F0: 4C 24 B2 22 30 2E 35 20  50 4F 55 4E 44 53 22 3A  |L$."0.5 POUNDS":|
00002100: 8B 57 4D B2 31 A7 52 4C  24 B2 22 30 2E 32 20 4B  |.WM.1.RL$."0.2 K|
00002110: 49 4C 4F 53 22 00 3E 29  E4 00 99 3A 99 22 11 1F  |ILOS".>)...:."..|
00002120: 20 C1 54 20 41 20 52 41  54 45 20 4F 46 20 22 52  | .T A RATE OF "R|
00002130: 4C 24 22 20 50 45 52 20  57 45 45 4B 2C 22 00 75  |L$" PER WEEK,".u|
00002140: 29 E5 00 99 22 11 20 59  4F 55 20 53 48 4F 55 4C  |)...". YOU SHOUL|
00002150: 44 20 41 43 48 49 45 56  45 20 59 4F 55 52 20 54  |D ACHIEVE YOUR T|
00002160: 41 52 47 45 54 20 57 45  49 47 48 54 20 20 11 20  |ARGET WEIGHT  . |
00002170: 42 59 20 22 3B 00 BA 29  E6 00 58 B2 57 54 AB 57  |BY ";..)..X.WT.W|
00002180: 54 28 31 29 3A 54 B2 57  54 28 34 29 3A 57 4B B2  |T(1):T.WT(4):WK.|
00002190: B5 28 28 58 AD 54 29 AA  30 2E 39 29 3A 44 59 B2  |.((X.T).0.9):DY.|
000021A0: B5 28 57 4B AC 37 29 3A  54 44 B2 44 59 3A 8B 54  |.(WK.7):TD.DY:.T|
000021B0: 44 B1 31 38 32 A7 57 4C  B2 35 00 ED 29 E7 00 4E  |D.182.WL.5..)..N|
000021C0: 44 B2 30 3A 41 24 B2 CA  28 53 44 24 2C 34 2C 32  |D.0:A$..(SD$,4,2|
000021D0: 29 3A 59 52 B2 C5 28 C9  28 53 44 24 2C 32 29 29  |):YR..(.(SD$,2))|
000021E0: 3A 8B 41 24 B2 22 30 31  22 A7 32 33 33 00 27 2A  |:.A$."01".233.'*|
000021F0: E8 00 5A B2 C5 28 41 24  29 3A 81 49 B2 31 A4 5A  |..Z..(A$):.I.1.Z|
00002200: AB 31 3A 4E 44 B2 4E 44  AA A5 42 28 49 29 3A 82  |.1:ND.ND..B(I):.|
00002210: 49 3A 8B 5A B1 32 AF A5  4C 28 59 52 29 B2 30 A7  |I:.Z.2..L(YR).0.|
00002220: 4E 44 B2 4E 44 AB 31 00  59 2A E9 00 4E 44 B2 4E  |ND.ND.1.Y*..ND.N|
00002230: 44 AA C5 28 C8 28 53 44  24 2C 32 29 29 3A 44 59  |D..(.(SD$,2)):DY|
00002240: B2 44 59 AA 4E 44 3A 49  B2 30 3A 59 52 B2 C5 28  |.DY.ND:I.0:YR..(|
00002250: C9 28 53 44 24 2C 32 29  29 00 8D 2A EA 00 49 B2  |.(SD$,2))..*..I.|
00002260: 49 AA 31 3A 8B 44 59 B3  B2 A5 42 28 49 29 A7 41  |I.1:.DY...B(I).A|
00002270: 24 B2 C4 28 44 59 29 3A  42 24 B2 C4 28 49 29 3A  |$..(DY):B$..(I):|
00002280: 43 24 B2 C4 28 59 52 29  3A 89 32 33 38 00 AD 2A  |C$..(YR):.238..*|
00002290: EB 00 8B 49 B2 32 AF A5  4C 28 59 52 29 B2 30 A7  |...I.2..L(YR).0.|
000022A0: 44 59 B2 44 59 AB 32 38  3A 89 32 33 37 00 DD 2A  |DY.DY.28:.237..*|
000022B0: EC 00 44 59 B2 44 59 AB  A5 42 28 49 29 3A 8B 49  |..DY.DY..B(I):.I|
000022C0: B2 31 32 A7 49 B2 30 3A  59 52 B2 59 52 AA 31 3A  |.12.I.0:YR.YR.1:|
000022D0: 8B 59 52 B2 31 30 30 A7  59 52 B2 30 30 00 E6 2A  |.YR.100.YR.00..*|
000022E0: ED 00 89 32 33 34 00 09  2B EE 00 41 24 B2 CA 28  |...234..+..A$..(|
000022F0: 41 24 2C 32 29 3A 8B C5  28 41 24 29 B3 31 30 A7  |A$,2):..(A$).10.|
00002300: 41 24 B2 22 30 22 AA 41  24 00 2C 2B EF 00 42 24  |A$."0".A$.,+..B$|
00002310: B2 CA 28 42 24 2C 32 29  3A 8B C5 28 42 24 29 B3  |..(B$,2):..(B$).|
00002320: 31 30 A7 42 24 B2 22 30  22 AA 42 24 00 4F 2B F0  |10.B$."0".B$.O+.|
00002330: 00 43 24 B2 CA 28 43 24  2C 32 29 3A 8B C5 28 43  |.C$..(C$,2):..(C|
00002340: 24 29 B3 31 30 A7 43 24  B2 22 30 22 AA 43 24 00  |$).10.C$."0".C$.|
00002350: 75 2B F1 00 41 24 B2 41  24 AA 22 2F 22 AA 42 24  |u+..A$.A$."/".B$|
00002360: AA 22 2F 22 AA 43 24 3A  8B 45 4E B2 31 AF 57 4C  |."/".C$:.EN.1.WL|
00002370: B3 B1 35 A7 8E 00 88 2B  F2 00 54 44 24 B2 41 24  |..5....+..TD$.A$|
00002380: 3A 8B 45 4E B2 31 A7 8E  00 9C 2B F3 00 99 22 90  |:.EN.1....+...".|
00002390: 22 54 44 24 3A 8B 54 53  B2 34 A7 8E 00 A4 2B F4  |"TD$:.TS.4....+.|
000023A0: 00 8D 31 32 00 B3 2B F5  00 8B 54 53 B1 30 A7 8D  |..12..+...TS.0..|
000023B0: 32 37 35 00 C1 2B F6 00  8B 44 B3 B1 34 A7 8D 31  |275..+...D..4..1|
000023C0: 36 00 E8 2B F7 00 99 22  11 90 20 D9 4F 55 52 20  |6..+...".. .OUR |
000023D0: D7 45 49 47 48 54 20 3A  20 20 20 20 1C 22 3B 53  |.EIGHT :    .";S|
000023E0: 57 24 3B 3A 8D 31 31 38  00 13 2C F8 00 99 22 11  |W$;:.118..,...".|
000023F0: 90 20 D4 41 52 47 45 54  20 D7 45 49 47 48 54 20  |. .ARGET .EIGHT |
00002400: 3A 20 20 1C 22 3B 3A 8B  57 54 28 31 29 B1 30 A7  |:  .";:.WT(1).0.|
00002410: 32 35 31 00 53 2C F9 00  99 22 CE 4F 4E 45 22 3A  |251.S,...".ONE":|
00002420: 54 53 B2 31 3A 8B 57 4C  B2 32 A7 99 22 11 1F 20  |TS.1:.WL.2..".. |
00002430: D9 4F 55 52 20 50 52 45  53 45 4E 54 20 57 45 49  |.OUR PRESENT WEI|
00002440: 47 48 54 20 49 53 20 49  44 45 41 4C 2E 22 3A 89  |GHT IS IDEAL.":.|
00002450: 32 35 33 00 99 2C FA 00  99 22 11 1F 20 D9 4F 55  |253..,...".. .OU|
00002460: 20 48 41 56 45 20 43 48  4F 53 45 4E 20 54 4F 20  | HAVE CHOSEN TO |
00002470: 53 54 41 59 20 41 53 20  59 4F 55 20 41 52 45 2E  |STAY AS YOU ARE.|
00002480: 20 20 20 20 11 20 C7 4F  4F 44 20 46 4F 52 20 59  |    . .OOD FOR Y|
00002490: 4F 55 21 22 3A 89 32 35  33 00 DA 2C FB 00 58 B2  |OU!":.253..,..X.|
000024A0: 57 54 28 31 29 3A 8D 39  37 3A 99 59 24 3B 3A 8D  |WT(1):.97:.Y$;:.|
000024B0: 31 31 38 3A 99 22 11 90  20 D2 41 54 45 20 4F 46  |118:.".. .ATE OF|
000024C0: 20 CC 4F 53 53 20 3A 20  20 20 1C 22 52 4C 24 22  | .OSS :   ."RL$"|
000024D0: 20 50 45 52 20 57 45 45  4B 22 00 FA 2C FC 00 99  | PER WEEK"..,...|
000024E0: 22 90 11 20 D4 41 52 47  45 54 20 C4 41 54 45 20  |".. .ARGET .ATE |
000024F0: 3A 20 20 20 20 1C 22 54  44 24 00 0B 2D FD 00 54  |:    ."TD$..-..T|
00002500: 53 B2 30 3A 8B 45 4E B2  31 A7 8E 00 48 2D FE 00  |S.0:.EN.1...H-..|
00002510: 54 53 24 28 31 29 B2 22  41 4E 59 20 4F 46 20 54  |TS$(1)."ANY OF T|
00002520: 48 45 53 45 20 46 49 47  55 52 45 53 22 3A 54 53  |HESE FIGURES":TS|
00002530: 24 28 32 29 B2 22 54 48  45 20 54 41 52 47 45 54  |$(2)."THE TARGET|
00002540: 20 57 45 49 47 48 54 22  00 7F 2D FF 00 54 53 24  | WEIGHT"..-..TS$|
00002550: 28 33 29 B2 22 54 48 45  20 52 41 54 45 20 4F 46  |(3)."THE RATE OF|
00002560: 20 4C 4F 53 53 22 3A 54  53 24 28 34 29 B2 22 54  | LOSS":TS$(4)."T|
00002570: 48 45 20 54 41 52 47 45  54 20 44 41 54 45 22 00  |HE TARGET DATE".|
00002580: 9B 2D 00 01 54 53 B2 54  53 AA 31 3A 8B 54 53 B1  |.-..TS.TS.1:.TS.|
00002590: 34 A7 8D 32 37 35 3A 89  32 36 34 00 D4 2D 01 01  |4..275:.264..-..|
000025A0: 57 57 B2 30 3A 52 31 B2  31 35 3A 8D 38 3A 52 B2  |WW.0:R1.15:.8:R.|
000025B0: 31 35 3A 43 B2 30 3A 8D  39 3A 99 22 1F 20 C4 4F  |15:C.0:.9:.". .O|
000025C0: 20 59 4F 55 20 57 41 4E  54 20 54 4F 20 43 48 41  | YOU WANT TO CHA|
000025D0: 4E 47 45 22 00 03 2E 02  01 99 22 11 20 22 54 53  |NGE"......". "TS|
000025E0: 24 28 54 53 29 22 3F 20  22 3B 3A 8D 39 30 3A 8B  |$(TS)"? ";:.90:.|
000025F0: 52 4B 24 B2 22 4E 22 B0  52 4B 24 B2 22 CE 22 A7  |RK$."N".RK$.".".|
00002600: 32 36 31 00 11 2E 03 01  8B 54 53 B2 31 A7 32 35  |261......TS.1.25|
00002610: 36 00 1A 2E 04 01 89 33  31 32 00 29 2E 05 01 8B  |6......312.)....|
00002620: 54 53 B2 31 A7 54 53 B2  34 00 40 2E 06 01 8B 54  |TS.1.TS.4.@....T|
00002630: 53 B2 32 AF 57 54 28 34  29 B2 30 A7 54 53 B2 34  |S.2.WT(4).0.TS.4|
00002640: 00 49 2E 07 01 89 32 35  36 00 59 2E 08 01 8B 54  |.I....256.Y....T|
00002650: 44 B3 31 38 33 A7 32 38  37 00 97 2E 09 01 8D 31  |D.183.287......1|
00002660: 36 3A 4E 41 24 B2 22 2A  22 AA 4E 41 24 3A 99 22  |6:NA$."*".NA$:."|
00002670: 11 1F 20 D9 4F 55 20 57  49 4C 4C 20 46 49 4E 44  |.. .OU WILL FIND|
00002680: 20 49 54 20 45 41 53 49  45 52 20 54 4F 20 53 54  | IT EASIER TO ST|
00002690: 49 43 4B 20 54 4F 22 00  C1 2E 0A 01 99 22 11 20  |ICK TO"......". |
000026A0: 54 48 45 20 50 52 4F 47  52 41 4D 4D 45 20 49 46  |THE PROGRAMME IF|
000026B0: 20 59 4F 55 20 48 41 56  45 20 41 20 4D 4F 52 45  | YOU HAVE A MORE|
000026C0: 22 00 EF 2E 0B 01 99 22  11 20 49 4D 4D 45 44 49  |"......". IMMEDI|
000026D0: 41 54 45 20 54 41 52 47  45 54 2E 20 D4 48 45 20  |ATE TARGET. .HE |
000026E0: 49 4E 49 54 49 41 4C 20  54 41 52 47 45 54 22 00  |INITIAL TARGET".|
000026F0: 19 2F 0C 01 99 22 11 20  57 45 49 47 48 54 20 49  |./...". WEIGHT I|
00002700: 53 20 54 48 45 52 45 46  4F 52 45 20 47 49 56 45  |S THEREFORE GIVE|
00002710: 4E 20 41 53 20 54 48 45  22 00 47 2F 0D 01 99 22  |N AS THE".G/..."|
00002720: 11 20 45 58 50 45 43 54  45 44 20 57 45 49 47 48  |. EXPECTED WEIGH|
00002730: 54 20 41 46 54 45 52 20  53 49 58 20 4D 4F 4E 54  |T AFTER SIX MONT|
00002740: 48 53 2C 20 41 54 22 00  76 2F 0E 01 99 22 11 20  |HS, AT".v/...". |
00002750: 59 4F 55 52 20 43 48 4F  53 45 4E 20 52 41 54 45  |YOUR CHOSEN RATE|
00002760: 20 4F 46 20 4C 4F 53 53  2E 20 C9 46 20 59 4F 55  | OF LOSS. .F YOU|
00002770: 20 57 41 4E 54 22 00 A6  2F 0F 01 99 22 11 20 54  | WANT"../...". T|
00002780: 4F 20 4C 4F 53 45 20 53  54 49 4C 4C 20 4D 4F 52  |O LOSE STILL MOR|
00002790: 45 20 57 45 49 47 48 54  2C 20 55 53 45 20 D0 52  |E WEIGHT, USE .R|
000027A0: 4F 47 52 41 4D 22 00 E0  2F 10 01 99 22 11 20 31  |OGRAM"../...". 1|
000027B0: 20 54 4F 20 53 45 54 20  55 50 20 41 4E 4F 54 48  | TO SET UP ANOTH|
000027C0: 45 52 20 50 4C 41 4E 20  41 46 54 45 52 20 53 49  |ER PLAN AFTER SI|
000027D0: 58 20 20 20 20 20 11 20  4D 4F 4E 54 48 53 2E 22  |X     . MONTHS."|
000027E0: 00 0B 30 11 01 8D 31 32  3A 8D 31 36 3A 57 54 28  |..0...12:.16:WT(|
000027F0: 31 29 B2 57 54 28 31 29  AA 28 57 54 28 34 29 AC  |1).WT(1).(WT(4).|
00002800: 28 54 44 AB 31 38 32 29  AD 37 29 00 32 30 12 01  |(TD.182).7).20..|
00002810: 54 44 B2 31 38 32 3A 44  59 B2 54 44 3A 45 4E B2  |TD.182:DY.TD:EN.|
00002820: 31 3A 8D 32 33 31 3A 54  44 24 B2 41 24 3A 89 32  |1:.231:TD$.A$:.2|
00002830: 38 37 00 68 30 13 01 8B  28 57 54 28 31 29 B3 57  |87.h0...(WT(1).W|
00002840: 54 28 32 29 AF 54 53 B2  32 AF 57 54 28 31 29 B1  |T(2).TS.2.WT(1).|
00002850: 30 29 B0 28 54 53 B2 33  AF 57 54 28 34 29 B1 32  |0).(TS.3.WT(4).2|
00002860: 2E 32 31 29 A7 32 37 38  00 97 30 14 01 8B 54 53  |.21).278..0...TS|
00002870: B2 35 AF 57 54 28 31 29  B1 30 AF 28 57 54 28 31  |.5.WT(1).0.(WT(1|
00002880: 29 B3 57 54 28 32 29 B0  57 54 28 34 29 B1 32 2E  |).WT(2).WT(4).2.|
00002890: 32 31 29 A7 32 38 32 00  9D 30 15 01 8E 00 D0 30  |21).282..0.....0|
000028A0: 16 01 8D 31 36 3A 99 22  11 1F 20 C9 54 20 4D 41  |...16:.".. .T MA|
000028B0: 59 20 42 45 20 51 55 49  54 45 20 44 49 46 46 49  |Y BE QUITE DIFFI|
000028C0: 43 55 4C 54 20 54 4F 20  41 43 48 49 45 56 45 22  |CULT TO ACHIEVE"|
000028D0: 00 17 31 17 01 99 22 11  20 22 54 53 24 28 54 53  |..1...". "TS$(TS|
000028E0: 29 22 20 59 4F 55 20 48  41 56 45 20 43 48 4F 53  |)" YOU HAVE CHOS|
000028F0: 45 4E 2E 22 3A 99 22 11  20 D9 4F 55 20 53 48 4F  |EN.":.". .OU SHO|
00002900: 55 4C 44 20 53 45 52 49  4F 55 53 4C 59 20 43 4F  |ULD SERIOUSLY CO|
00002910: 4E 53 49 44 45 52 22 00  4A 31 18 01 99 22 11 20  |NSIDER".J1...". |
00002920: 41 43 43 45 50 54 49 4E  47 20 54 48 45 20 46 49  |ACCEPTING THE FI|
00002930: 52 53 54 20 53 55 47 47  45 53 54 45 44 20 46 49  |RST SUGGESTED FI|
00002940: 47 55 52 45 2E 22 3A 8D  31 32 00 50 31 19 01 8E  |GURE.":.12.P1...|
00002950: 00 82 31 1A 01 8D 31 36  3A 99 22 11 20 C4 4F 20  |..1...16:.". .O |
00002960: 4E 4F 54 20 42 45 20 54  4F 4F 20 53 55 52 50 52  |NOT BE TOO SURPR|
00002970: 49 53 45 44 20 49 46 20  54 48 49 53 20 D0 4C 41  |ISED IF THIS .LA|
00002980: 4E 22 00 AF 31 1B 01 99  22 11 20 44 4F 45 53 20  |N"..1...". DOES |
00002990: 4E 4F 54 20 57 4F 52 4B  20 46 4F 52 20 59 4F 55  |NOT WORK FOR YOU|
000029A0: 20 2D 20 54 48 45 20 46  49 47 55 52 45 53 22 00  | - THE FIGURES".|
000029B0: DC 31 1C 01 99 22 11 20  59 4F 55 20 48 41 56 45  |.1...". YOU HAVE|
000029C0: 20 43 48 4F 53 45 4E 20  4D 41 59 20 42 45 20 44  | CHOSEN MAY BE D|
000029D0: 49 46 46 49 43 55 4C 54  20 54 4F 22 00 0A 32 1D  |IFFICULT TO"..2.|
000029E0: 01 99 22 11 20 41 43 48  49 45 56 45 2E 20 C8 4F  |..". ACHIEVE. .O|
000029F0: 57 45 56 45 52 2C 20 49  46 20 59 4F 55 20 57 41  |WEVER, IF YOU WA|
00002A00: 4E 54 20 54 4F 20 54 52  59 22 00 37 32 1E 01 99  |NT TO TRY".72...|
00002A10: 22 11 20 49 54 2C 20 47  4F 20 41 48 45 41 44 20  |". IT, GO AHEAD |
00002A20: 2D 20 41 4E 44 20 47 4F  4F 44 20 4C 55 43 4B 21  |- AND GOOD LUCK!|
00002A30: 22 3A 8D 31 32 3A 8E 00  5A 32 1F 01 45 4E B2 31  |":.12:..Z2..EN.1|
00002A40: 3A 8D 32 34 36 3A 8B 44  B2 34 A7 98 34 3A A0 34  |:.246:.D.4..4:.4|
00002A50: 3A 44 B2 44 31 3A 89 32  38 37 00 6C 32 20 01 8D  |:D.D1:.287.l2 ..|
00002A60: 31 38 3A 8B 45 46 B2 31  A7 32 38 37 00 85 32 21  |18:.EF.1.287..2!|
00002A70: 01 8B 52 4B 24 B2 22 50  22 B0 52 4B 24 B2 22 D0  |..RK$."P".RK$.".|
00002A80: 22 A7 32 38 37 00 B5 32  22 01 51 24 28 31 29 B2  |".287..2".Q$(1).|
00002A90: 22 D4 48 45 20 53 45 43  4F 4E 44 20 50 41 52 54  |".HE SECOND PART|
00002AA0: 20 4F 46 20 54 48 45 20  50 52 4F 47 52 41 4D 20  | OF THE PROGRAM |
00002AB0: 4D 55 53 54 22 00 FA 32  23 01 51 24 28 32 29 B2  |MUST"..2#.Q$(2).|
00002AC0: 22 4E 4F 57 20 42 45 20  4C 4F 41 44 45 44 2E 20  |"NOW BE LOADED. |
00002AD0: C1 52 45 20 59 4F 55 20  4C 4F 41 44 49 4E 47 20  |.RE YOU LOADING |
00002AE0: 46 52 4F 4D 20 22 3A 51  4C B2 32 3A 4F 50 24 28  |FROM ":QL.2:OP$(|
00002AF0: 31 29 B2 22 44 49 53 4B  3F 22 00 36 33 24 01 4F  |1)."DISK?".63$.O|
00002B00: 50 24 28 32 29 B2 22 54  41 50 45 3F 22 3A 4C 4D  |P$(2)."TAPE?":LM|
00002B10: B2 32 3A 8D 31 31 35 3A  99 3A 44 B2 31 3A 8B 43  |.2:.115:.:D.1:.C|
00002B20: 48 B2 31 A7 44 B2 38 3A  8D 31 30 39 3A 8B 45 46  |H.1.D.8:.109:.EF|
00002B30: B2 31 A7 32 39 30 00 6B  33 25 01 8D 31 36 3A 99  |.1.290.k3%..16:.|
00002B40: 22 11 11 1F 20 D0 4C 45  41 53 45 20 57 41 49 54  |"... .LEASE WAIT|
00002B50: 20 57 48 49 4C 45 20 27  D0 41 52 54 42 27 20 49  | WHILE '.ARTB' I|
00002B60: 53 20 4C 4F 41 44 49 4E  47 2E 22 00 78 33 26 01  |S LOADING.".x3&.|
00002B70: 8B 44 B2 38 A7 32 39 37  00 A4 33 27 01 99 22 11  |.D.8.297..3'..".|
00002B80: 20 D4 48 49 53 20 57 49  4C 4C 20 54 41 4B 45 20  | .HIS WILL TAKE |
00002B90: 4A 55 53 54 20 4F 56 45  52 20 31 20 4D 49 4E 55  |JUST OVER 1 MINU|
00002BA0: 54 45 2E 22 00 C8 33 29  01 8D 34 35 30 3A 8D 31  |TE."..3)..450:.1|
00002BB0: 32 3A 99 22 91 91 91 91  91 90 20 22 3B 3A 93 22  |2:."...... ";:."|
00002BC0: 50 41 52 54 42 22 2C 44  00 FC 33 2A 01 99 22 11  |PARTB",D..3*..".|
00002BD0: 1F 20 D4 48 49 53 20 47  49 56 45 53 20 41 20 54  |. .HIS GIVES A T|
00002BE0: 41 52 47 45 54 20 44 41  54 45 20 4F 46 22 3A 99  |ARGET DATE OF":.|
00002BF0: 22 11 20 22 3B 3A 8D 32  33 30 3A 8E 00 47 34 2B  |". ";:.230:..G4+|
00002C00: 01 99 22 11 1C 20 D4 48  49 53 20 43 4F 55 4C 44  |..".. .HIS COULD|
00002C10: 20 4C 45 41 44 20 54 4F  20 49 4C 4C 2D 48 45 41  | LEAD TO ILL-HEA|
00002C20: 4C 54 48 20 41 4E 44 20  49 53 20 20 20 11 20 54  |LTH AND IS   . T|
00002C30: 48 45 52 45 46 4F 52 45  20 55 4E 41 43 43 45 50  |HEREFORE UNACCEP|
00002C40: 54 41 42 4C 45 2E 22 00  51 34 2C 01 8D 31 32 3A  |TABLE.".Q4,..12:|
00002C50: 8E 00 8C 34 2D 01 99 22  11 90 20 CF 4B 41 59 20  |...4-..".. .KAY |
00002C60: 2D 20 54 52 59 20 49 54  20 59 4F 55 52 20 57 41  |- TRY IT YOUR WA|
00002C70: 59 2E 20 C1 4E 44 20 47  4F 4F 44 20 4C 55 43 4B  |Y. .ND GOOD LUCK|
00002C80: 20 20 11 20 54 4F 20 59  4F 55 21 22 00 96 34 2E  |  . TO YOU!"..4.|
00002C90: 01 8D 31 32 3A 8E 00 C4  34 2F 01 99 22 11 1F 20  |..12:...4/..".. |
00002CA0: C8 4F 57 20 41 42 4F 55  54 20 41 20 43 4F 4D 50  |.OW ABOUT A COMP|
00002CB0: 52 4F 4D 49 53 45 20 2D  20 22 3A 99 22 11 20 22  |ROMISE - ":.". "|
00002CC0: 59 24 3A 8E 00 EC 34 30  01 99 22 11 1F 20 D7 49  |Y$:...40..".. .I|
00002CD0: 4C 4C 20 59 4F 55 20 41  43 43 45 50 54 20 54 48  |LL YOU ACCEPT TH|
00002CE0: 49 53 3F 20 22 3B 3A 8D  39 30 3A 8E 00 25 35 31  |IS? ";:.90:..%51|
00002CF0: 01 99 22 11 1F 20 C9 54  20 49 53 20 41 44 56 49  |..".. .T IS ADVI|
00002D00: 53 41 42 4C 45 20 54 4F  20 4C 4F 53 45 20 57 45  |SABLE TO LOSE WE|
00002D10: 49 47 48 54 20 53 4C 4F  57 4C 59 2E 22 3A 8D 31  |IGHT SLOWLY.":.1|
00002D20: 32 3A 8D 31 36 00 59 35  32 01 99 22 11 1F 20 D7  |2:.16.Y52..".. .|
00002D30: 45 20 53 55 47 47 45 53  54 20 41 20 52 41 54 45  |E SUGGEST A RATE|
00002D40: 20 4F 46 20 22 54 53 24  3A 99 22 11 20 50 45 52  | OF "TS$:.". PER|
00002D50: 20 57 45 45 4B 2E 22 3A  8E 00 7B 35 33 01 99 22  | WEEK.":..{53.."|
00002D60: 11 90 20 D0 4C 45 41 53  45 20 54 52 59 20 41 47  |.. .LEASE TRY AG|
00002D70: 41 49 4E 2E 22 3A 8D 31  32 3A 8E 00 93 35 34 01  |AIN.":.12:...54.|
00002D80: 8B 54 57 B2 32 AF 57 4D  B2 31 A7 54 57 B2 32 2E  |.TW.2.WM.1.TW.2.|
00002D90: 32 30 35 00 BE 35 35 01  54 53 24 B2 C4 28 54 57  |205..55.TS$..(TW|
00002DA0: 29 3A 54 53 24 B2 CA 28  54 53 24 2C 32 29 3A 58  |):TS$..(TS$,2):X|
00002DB0: B2 54 57 3A 8D 39 37 3A  54 53 24 B2 59 24 00 E2  |.TW:.97:TS$.Y$..|
00002DC0: 35 36 01 58 B2 C5 28 54  53 24 29 3A 8B 57 4D B3  |56.X..(TS$):.WM.|
00002DD0: B1 32 A7 8D 31 32 30 3A  54 53 24 B2 54 53 24 AA  |.2..120:TS$.TS$.|
00002DE0: 48 24 00 E8 35 37 01 8E  00 F6 35 38 01 8B 54 53  |H$..57....58..TS|
00002DF0: B1 32 A7 33 34 39 00 0D  36 39 01 8D 31 36 3A 8B  |.2.349..69..16:.|
00002E00: 57 4C B1 32 B0 57 57 B1  30 A7 33 31 38 00 3D 36  |WL.2.WW.0.318.=6|
00002E10: 3A 01 99 22 11 1F 20 D9  4F 55 52 20 50 52 45 53  |:..".. .OUR PRES|
00002E20: 45 4E 54 20 57 45 49 47  48 54 20 49 53 20 49 44  |ENT WEIGHT IS ID|
00002E30: 45 41 4C 2E 20 C1 52 45  20 59 4F 55 22 00 69 36  |EAL. .RE YOU".i6|
00002E40: 3B 01 99 22 11 20 53 55  52 45 20 59 4F 55 20 57  |;..". SURE YOU W|
00002E50: 41 4E 54 20 54 4F 20 4C  4F 53 45 20 57 45 49 47  |ANT TO LOSE WEIG|
00002E60: 48 54 3F 11 22 3A 8D 39  30 00 9D 36 3C 01 8B 52  |HT?.":.90..6<..R|
00002E70: 4B 24 B2 22 4E 22 B0 52  4B 24 B2 22 CE 22 A7 54  |K$."N".RK$.".".T|
00002E80: 53 B2 34 3A 57 54 28 31  29 B2 30 3A 57 54 28 34  |S.4:WT(1).0:WT(4|
00002E90: 29 B2 30 3A 54 44 B2 30  3A 89 32 34 35 00 A5 36  |).0:TD.0:.245..6|
00002EA0: 3D 01 8D 31 36 00 E5 36  3E 01 99 22 11 92 90 20  |=..16..6>.."... |
00002EB0: D0 52 45 53 45 4E 54 20  54 41 52 47 45 54 20 57  |.RESENT TARGET W|
00002EC0: 45 49 47 48 54 20 3A 20  1C 22 3B 3A 58 B2 57 54  |EIGHT : .";:X.WT|
00002ED0: 28 31 29 3A 8B 58 B2 30  A7 99 22 CE 4F 4E 45 22  |(1):.X.0..".ONE"|
00002EE0: 3A 89 33 32 30 00 F7 36  3F 01 8D 39 37 3A 99 59  |:.320..6?..97:.Y|
00002EF0: 24 3B 3A 8D 31 31 38 00  21 37 40 01 57 57 B2 31  |$;:.118.!7@.WW.1|
00002F00: 3A 99 3A 99 22 11 90 20  D2 45 51 55 45 53 54 45  |:.:.".. .EQUESTE|
00002F10: 44 20 54 41 52 47 45 54  20 57 45 49 47 48 54 20  |D TARGET WEIGHT |
00002F20: 22 00 56 37 41 01 8B 57  4D B3 B1 32 A7 99 22 20  |".V7A..WM..2.." |
00002F30: 11 28 22 57 4D 24 22 29  20 3A 20 22 3B 3A 4C 4D  |.("WM$") : ";:LM|
00002F40: B2 35 30 30 3A 8D 31 34  37 3A 54 57 24 B2 52 4B  |.500:.147:TW$.RK|
00002F50: 24 3A 89 33 32 33 00 71  37 42 01 8D 31 34 34 3A  |$:.323.q7B..144:|
00002F60: 54 57 24 B2 54 57 24 AA  52 4B 24 AA 22 4C 42 53  |TW$.TW$.RK$."LBS|
00002F70: 22 00 96 37 43 01 99 3A  59 24 B2 54 57 24 3A 8D  |"..7C..:Y$.TW$:.|
00002F80: 31 30 34 3A 52 51 B2 59  3A 8B 57 54 AB 52 51 B1  |104:RQ.Y:.WT.RQ.|
00002F90: B2 31 A7 33 32 37 00 A8  37 44 01 8B 57 54 AB 52  |.1.327..7D..WT.R|
00002FA0: 51 B3 B2 30 A7 33 32 37  00 D9 37 45 01 99 22 11  |Q..0.327..7E..".|
00002FB0: 1C 20 D9 4F 55 20 45 49  54 48 45 52 20 57 41 4E  |. .OU EITHER WAN|
00002FC0: 54 20 54 4F 20 4C 4F 53  45 20 53 4F 4D 45 20 57  |T TO LOSE SOME W|
00002FD0: 45 49 47 48 54 20 4F 52  22 00 10 38 46 01 99 22  |EIGHT OR"..8F.."|
00002FE0: 11 20 59 4F 55 20 44 4F  4E 27 54 2E 20 CE 4F 20  |. YOU DON'T. .O |
00002FF0: 48 41 4C 46 20 4D 45 41  53 55 52 45 53 2C 20 50  |HALF MEASURES, P|
00003000: 4C 45 41 53 45 21 22 3A  8D 31 32 3A 89 33 31 37  |LEASE!":.12:.317|
00003010: 00 36 38 47 01 8B 52 51  B3 57 54 28 32 29 AB 28  |.68G..RQ.WT(2).(|
00003020: 57 54 28 33 29 AB 57 54  28 32 29 29 A7 8D 32 39  |WT(3).WT(2))..29|
00003030: 39 3A 89 33 31 37 00 46  38 48 01 8B 52 51 B3 B2  |9:.317.F8H..RQ..|
00003040: 57 54 A7 33 33 31 00 75  38 49 01 99 22 11 1C 20  |WT.331.u8I..".. |
00003050: D9 4F 55 52 20 43 48 4F  53 45 4E 20 54 41 52 47  |.OUR CHOSEN TARG|
00003060: 45 54 20 57 45 49 47 48  54 20 49 53 20 47 52 45  |ET WEIGHT IS GRE|
00003070: 41 54 45 52 22 00 A2 38  4A 01 99 22 11 20 54 48  |ATER"..8J..". TH|
00003080: 41 4E 20 59 4F 55 52 20  43 55 52 52 45 4E 54 20  |AN YOUR CURRENT |
00003090: 57 45 49 47 48 54 2E 22  3A 8D 33 30 37 3A 89 33  |WEIGHT.":.307:.3|
000030A0: 31 37 00 B5 38 4B 01 8B  52 51 B1 B2 57 54 28 32  |17..8K..RQ..WT(2|
000030B0: 29 A7 33 34 32 00 E8 38  4C 01 99 22 11 1F 20 D9  |).342..8L..".. .|
000030C0: 4F 55 20 53 48 4F 55 4C  44 20 4E 4F 54 20 57 45  |OU SHOULD NOT WE|
000030D0: 49 47 48 20 4C 45 53 53  20 54 48 41 4E 22 3A 99  |IGH LESS THAN":.|
000030E0: 22 11 20 22 41 31 24 3B  00 04 39 4D 01 54 57 B2  |". "A1$;..9M.TW.|
000030F0: 57 54 28 32 29 3A 8D 31  31 38 3A 8D 33 30 34 3A  |WT(2):.118:.304:|
00003100: 89 33 33 39 00 1D 39 4E  01 52 31 B2 31 36 3A 8D  |.339..9N.R1.16:.|
00003110: 38 3A 52 B2 31 36 3A 43  B2 30 3A 8D 39 00 36 39  |8:R.16:C.0:.9.69|
00003120: 4F 01 8B 57 57 B2 34 B0  58 B2 AB 31 A7 8D 33 30  |O..WW.4.X..1..30|
00003130: 31 3A 89 33 34 37 00 6F  39 50 01 54 57 B2 52 51  |1:.347.o9P.TW.RQ|
00003140: AA B5 28 28 57 54 28 32  29 AB 54 57 29 AD 32 29  |..((WT(2).TW).2)|
00003150: 3A 8B 28 B6 28 52 51 AB  54 57 29 B3 31 29 B0 28  |:.(.(RQ.TW).1).(|
00003160: 58 B2 54 57 29 A7 58 B2  AB 31 3A 89 33 33 35 00  |X.TW).X..1:.335.|
00003170: 91 39 51 01 58 B2 54 57  3A 8D 39 37 3A 8B 57 4D  |.9Q.X.TW:.97:.WM|
00003180: B3 B1 32 A7 59 24 B2 59  24 AA 22 20 22 AA 57 4D  |..2.Y$.Y$." ".WM|
00003190: 24 00 9F 39 52 01 8D 33  30 33 3A 8D 33 30 34 00  |$..9R..303:.304.|
000031A0: BF 39 53 01 8B 52 4B 24  B2 22 59 22 B0 52 4B 24  |.9S..RK$."Y".RK$|
000031B0: B2 22 D9 22 A7 52 51 B2  54 57 3A 89 33 34 37 00  |.".".RQ.TW:.347.|
000031C0: D7 39 54 01 57 57 B2 57  57 AA 31 3A 8B 57 57 B2  |.9T.WW.WW.1:.WW.|
000031D0: 32 A7 54 57 B2 52 51 00  E5 39 55 01 58 B2 54 57  |2.TW.RQ..9U.X.TW|
000031E0: 3A 89 33 33 34 00 F8 39  56 01 8B 52 51 B3 B2 57  |:.334..9V..RQ..W|
000031F0: 54 28 35 29 A7 33 34 37  00 26 3A 57 01 99 22 11  |T(5).347.&:W..".|
00003200: 1F 20 D9 4F 55 20 41 52  45 20 4F 56 45 52 57 45  |. .OU ARE OVERWE|
00003210: 49 47 48 54 20 41 4E 44  20 CE C5 C5 C4 20 54 4F  |IGHT AND .... TO|
00003220: 20 4C 4F 53 45 22 00 52  3A 58 01 99 22 11 20 53  | LOSE".R:X..". S|
00003230: 4F 4D 45 20 57 45 49 47  48 54 2E 20 D4 48 45 20  |OME WEIGHT. .HE |
00003240: 43 4F 4D 50 55 54 45 52  20 57 49 4C 4C 20 4E 4F  |COMPUTER WILL NO|
00003250: 54 22 00 90 3A 59 01 99  22 11 20 41 43 43 45 50  |T"..:Y..". ACCEP|
00003260: 54 20 41 20 54 41 52 47  45 54 20 57 45 49 47 48  |T A TARGET WEIGH|
00003270: 54 20 47 52 45 41 54 45  52 20 54 48 41 4E 22 3A  |T GREATER THAN":|
00003280: 58 B2 57 54 28 35 29 3A  52 51 B2 58 3A 8D 39 37  |X.WT(5):RQ.X:.97|
00003290: 00 A6 3A 5A 01 99 22 11  20 22 59 24 3B 3A 8D 31  |..:Z..". "Y$;:.1|
000032A0: 31 38 3A 8D 31 32 00 D4  3A 5B 01 57 54 28 31 29  |18:.12..:[.WT(1)|
000032B0: B2 52 51 3A 8B 57 54 B2  52 51 A7 57 54 28 31 29  |.RQ:.WT.RQ.WT(1)|
000032C0: B2 30 3A 57 54 28 34 29  B2 30 3A 54 44 B2 30 3A  |.0:WT(4).0:TD.0:|
000032D0: 89 32 34 35 00 DD 3A 5C  01 89 32 31 39 00 E8 3A  |.245..:\..219..:|
000032E0: 5D 01 58 24 B2 52 4C 24  00 F6 3A 5E 01 8B 54 53  |].X$.RL$..:^..TS|
000032F0: B1 33 A7 33 38 38 00 31  3B 5F 01 8D 31 36 3A 99  |.3.388.1;_..16:.|
00003300: 22 11 90 20 D0 52 45 53  45 4E 54 20 52 41 54 45  |".. .RESENT RATE|
00003310: 20 4F 46 20 4C 4F 53 53  20 3A 20 1C 22 58 24 3A  | OF LOSS : ."X$:|
00003320: 99 A3 32 33 29 22 11 20  50 45 52 20 57 45 45 4B  |..23)". PER WEEK|
00003330: 22 00 61 3B 60 01 99 22  11 90 20 C4 45 53 49 52  |".a;`..".. .ESIR|
00003340: 45 44 20 52 41 54 45 20  28 22 3B 3A 8B 57 4D B1  |ED RATE (";:.WM.|
00003350: 31 A7 99 22 50 4F 55 4E  44 53 22 3B 3A 89 33 35  |1.."POUNDS";:.35|
00003360: 34 00 6F 3B 61 01 99 22  4B 49 4C 4F 53 22 3B 00  |4.o;a.."KILOS";.|
00003370: AA 3B 62 01 99 22 20 50  45 52 20 57 45 45 4B 29  |.;b.." PER WEEK)|
00003380: 20 3A 20 22 3B 3A 5A 45  B2 31 3A 4C 4D B2 31 30  | : ";:ZE.1:LM.10|
00003390: 3A 44 50 B2 31 3A 52 4B  B2 32 3A 8D 33 36 3A 99  |:DP.1:RK.2:.36:.|
000033A0: 3A 52 51 B2 C5 28 52 4B  24 29 00 CD 3B 63 01 54  |:RQ..(RK$)..;c.T|
000033B0: 53 24 B2 52 4B 24 3A 8B  57 4D B2 31 A7 59 24 B2  |S$.RK$:.WM.1.Y$.|
000033C0: 52 4B 24 3A 8D 31 30 34  3A 52 51 B2 59 00 DD 3B  |RK$:.104:RQ.Y..;|
000033D0: 64 01 8B 52 51 B1 30 2E  32 A7 33 35 39 00 09 3C  |d..RQ.0.2.359..<|
000033E0: 65 01 99 22 11 1C 20 D9  4F 55 20 43 4F 55 4C 44  |e..".. .OU COULD|
000033F0: 20 45 41 53 49 4C 59 20  4C 4F 53 45 20 57 45 49  | EASILY LOSE WEI|
00003400: 47 48 54 20 41 54 20 41  22 00 33 3C 66 01 99 22  |GHT AT A".3<f.."|
00003410: 11 20 46 41 53 54 45 52  20 52 41 54 45 2E 22 3A  |. FASTER RATE.":|
00003420: 54 57 B2 30 2E 35 3A 8D  31 32 3A 8D 31 36 3A 89  |TW.0.5:.12:.16:.|
00003430: 33 36 37 00 42 3C 67 01  8B 52 51 B3 B2 36 A7 33  |367.B<g..RQ..6.3|
00003440: 36 32 00 62 3C 68 01 8D  32 39 39 3A 54 57 B2 57  |62.b<h..299:TW.W|
00003450: 54 AB 57 54 28 31 29 3A  8B 54 57 B1 32 A7 54 57  |T.WT(1):.TW.2.TW|
00003460: B2 32 00 6F 3C 69 01 8D  31 36 3A 89 33 36 37 00  |.2.o<i..16:.367.|
00003470: 97 3C 6A 01 8B 54 53 B3  34 A7 59 24 B2 54 53 24  |.<j..TS.4.Y$.TS$|
00003480: 3A 58 B2 C5 28 59 24 29  3A 8D 31 32 30 3A 52 51  |:X..(Y$):.120:RQ|
00003490: 24 B2 59 24 AA 48 24 00  B1 3C 6B 01 8B 52 51 AB  |$.Y$.H$..<k..RQ.|
000034A0: 28 57 54 AB 57 54 28 31  29 29 B2 B3 30 A7 33 37  |(WT.WT(1))..0.37|
000034B0: 32 00 EE 3C 6C 01 99 22  1C 11 20 D9 4F 55 20 44  |2..<l..".. .OU D|
000034C0: 4F 4E 27 54 20 48 41 56  45 20 4D 55 43 48 20 57  |ON'T HAVE MUCH W|
000034D0: 45 49 47 48 54 20 54 4F  20 4C 4F 53 45 20 53 4F  |EIGHT TO LOSE SO|
000034E0: 20 20 11 20 57 48 59 20  52 55 53 48 3F 22 00 0D  |  . WHY RUSH?"..|
000034F0: 3D 6D 01 54 57 B2 57 54  AB 57 54 28 31 29 3A 8B  |=m.TW.WT.WT(1):.|
00003500: 54 57 B1 30 2E 35 A7 54  57 B2 30 2E 35 00 19 3D  |TW.0.5.TW.0.5..=|
00003510: 6E 01 8D 31 32 3A 8D 31  36 00 4C 3D 6F 01 54 44  |n..12:.16.L=o.TD|
00003520: B2 30 3A 8D 33 30 38 3A  8D 33 30 36 3A 57 54 28  |.0:.308:.306:WT(|
00003530: 34 29 B2 54 57 3A 52 4C  24 B2 54 53 24 3A 57 57  |4).TW:RL$.TS$:WW|
00003540: B2 30 3A 8B 54 53 B2 33  A7 33 36 39 00 55 3D 70  |.0:.TS.3.369.U=p|
00003550: 01 8D 32 39 38 00 73 3D  71 01 8D 33 30 34 3A 8B  |..298.s=q..304:.|
00003560: 52 4B 24 B2 22 4E 22 B0  52 4B 24 B2 22 CE 22 A7  |RK$."N".RK$.".".|
00003570: 33 35 30 00 81 3D 72 01  8B 54 53 B2 33 A7 32 31  |350..=r..TS.3.21|
00003580: 39 00 8A 3D 73 01 89 33  38 37 00 B3 3D 74 01 8B  |9..=s..387..=t..|
00003590: 28 57 4D B2 31 AF C5 28  52 51 24 29 B1 31 29 B0  |(WM.1..(RQ$).1).|
000035A0: 28 57 4D B1 31 AF C5 28  52 51 24 29 B1 32 29 A7  |(WM.1..(RQ$).2).|
000035B0: 33 37 34 00 C8 3D 75 01  8D 31 32 3A 54 44 24 B2  |374..=u..12:TD$.|
000035C0: 54 57 24 3A 89 33 38 36  00 D6 3D 76 01 54 57 B2  |TW$:.386..=v.TW.|
000035D0: 32 3A 8D 33 30 38 00 E4  3D 77 01 8D 33 30 35 3A  |2:.308..=w..305:|
000035E0: 89 33 38 33 00 FF 3D 78  01 52 51 B2 54 57 3A 52  |.383..=x.RQ.TW:R|
000035F0: 51 24 B2 54 53 24 3A 8D  31 32 3A 89 33 38 36 00  |Q$.TS$:.12:.386.|
00003600: 14 3E 79 01 52 31 B2 31  33 3A 8B 54 53 B2 33 A7  |.>y.R1.13:.TS.3.|
00003610: 52 31 B2 39 00 27 3E 7A  01 8D 38 3A 52 B2 52 31  |R1.9.'>z..8:R.R1|
00003620: 3A 43 B2 30 3A 8D 39 00  4E 3E 7B 01 54 57 B2 B5  |:C.0:.9.N>{.TW..|
00003630: 28 28 28 52 51 AB 28 28  52 51 AB 54 57 29 AD 32  |(((RQ.((RQ.TW).2|
00003640: 29 29 AC 31 30 29 AA 30  2E 35 29 AD 31 30 00 78  |)).10).0.5).10.x|
00003650: 3E 7C 01 8D 33 30 38 3A  8B 54 53 B2 34 AF B5 28  |>|..308:.TS.4..(|
00003660: 28 57 54 AB 57 54 28 31  29 29 AD 54 57 29 AA 31  |(WT.WT(1)).TW).1|
00003670: B2 57 4B A7 57 57 B2 33  00 94 3E 7D 01 8B 57 57  |.WK.WW.3..>}..WW|
00003680: B2 33 A7 54 44 24 B2 54  57 24 3A 8D 33 30 31 3A  |.3.TD$.TW$:.301:|
00003690: 89 33 38 36 00 B1 3E 7E  01 59 24 B2 54 53 24 AA  |.386..>~.Y$.TS$.|
000036A0: 22 20 50 45 52 20 57 45  45 4B 2E 22 3A 8D 33 30  |" PER WEEK.":.30|
000036B0: 33 00 C9 3E 7F 01 8B 54  53 B2 34 A7 57 54 28 34  |3..>...TS.4.WT(4|
000036C0: 29 B2 54 57 3A 8D 32 39  38 00 F6 3E 80 01 8D 33  |).TW:.298..>...3|
000036D0: 30 34 3A 8B 52 4B 24 B2  22 59 22 B0 52 4B 24 B2  |04:.RK$."Y".RK$.|
000036E0: 22 D9 22 A7 52 51 B2 54  57 3A 52 51 24 B2 54 53  |".".RQ.TW:RQ$.TS|
000036F0: 24 3A 89 33 38 36 00 07  3F 81 01 57 57 B2 57 57  |$:.386..?..WW.WW|
00003700: AA 31 3A 89 33 37 37 00  26 3F 82 01 57 54 28 34  |.1:.377.&?..WT(4|
00003710: 29 B2 52 51 3A 52 4C 24  B2 52 51 24 3A 8B 54 53  |).RQ:RL$.RQ$:.TS|
00003720: B2 33 A7 32 31 39 00 2F  3F 83 01 89 32 34 35 00  |.3.219./?...245.|
00003730: 5A 3F 84 01 54 53 24 B2  22 C3 48 4F 53 45 4E 20  |Z?..TS$.".HOSEN |
00003740: 54 41 52 47 45 54 20 44  41 54 45 22 3A 8D 37 39  |TARGET DATE":.79|
00003750: 3A 54 57 24 B2 44 41 24  3A 99 00 90 3F 85 01 41  |:TW$.DA$:...?..A|
00003760: B2 C5 28 C9 28 54 57 24  2C 32 29 29 AC 31 30 30  |..(.(TW$,2)).100|
00003770: 30 30 AA C5 28 CA 28 54  57 24 2C 34 2C 32 29 29  |00..(.(TW$,4,2))|
00003780: AC 31 30 30 AA C5 28 C8  28 54 57 24 2C 32 29 29  |.100..(.(TW$,2))|
00003790: 00 C6 3F 86 01 42 B2 C5  28 C9 28 53 44 24 2C 32  |..?..B..(.(SD$,2|
000037A0: 29 29 AC 31 30 30 30 30  AA C5 28 CA 28 53 44 24  |)).10000..(.(SD$|
000037B0: 2C 34 2C 32 29 29 AC 31  30 30 AA C5 28 C8 28 53  |,4,2)).100..(.(S|
000037C0: 44 24 2C 32 29 29 00 F0  3F 87 01 8B 41 B2 B3 42  |D$,2))..?...A..B|
000037D0: A7 99 3A 99 22 11 1C 20  C9 4E 56 41 4C 49 44 20  |..:.".. .NVALID |
000037E0: 44 41 54 45 2E 22 3A 8D  33 30 37 3A 89 33 38 38  |DATE.":.307:.388|
000037F0: 00 15 40 88 01 4E 44 B2  30 3A 41 B2 C5 28 C9 28  |..@..ND.0:A..(.(|
00003800: 54 57 24 2C 32 29 29 3A  42 B2 C5 28 C9 28 53 44  |TW$,2)):B..(.(SD|
00003810: 24 2C 32 29 29 00 46 40  89 01 49 B2 C5 28 CA 28  |$,2)).F@..I..(.(|
00003820: 53 44 24 2C 34 2C 32 29  29 3A 4A B2 C5 28 CA 28  |SD$,4,2)):J..(.(|
00003830: 54 57 24 2C 34 2C 32 29  29 3A 8B 49 B2 4A AF 41  |TW$,4,2)):.I.J.A|
00003840: B2 42 A7 34 30 31 00 60  40 8A 01 4A B2 4A AB 31  |.B.401.`@..J.J.1|
00003850: 3A 8B 4A B2 30 A7 4A B2  31 32 3A 41 B2 41 AB 31  |:.J.0.J.12:A.A.1|
00003860: 00 79 40 8B 01 4E 44 B2  A5 42 28 49 29 AB C5 28  |.y@..ND..B(I)..(|
00003870: C8 28 53 44 24 2C 32 29  29 00 8A 40 8C 01 8B 49  |.(SD$,2))..@...I|
00003880: B2 4A AF 41 B2 42 A7 34  30 32 00 A4 40 8D 01 49  |.J.A.B.402..@..I|
00003890: B2 49 AA 31 3A 8B 49 B2  31 33 A7 49 B2 31 3A 42  |.I.1:.I.13.I.1:B|
000038A0: B2 42 AA 31 00 B4 40 8E  01 4E 44 B2 4E 44 AA A5  |.B.1..@..ND.ND..|
000038B0: 42 28 49 29 00 CD 40 8F  01 8B 49 B2 32 AF A5 4C  |B(I)..@...I.2..L|
000038C0: 28 42 29 B2 30 A7 4E 44  B2 4E 44 AB 31 00 D6 40  |(B).0.ND.ND.1..@|
000038D0: 90 01 89 33 39 36 00 FA  40 91 01 4E 44 B2 C5 28  |...396..@..ND..(|
000038E0: C8 28 54 57 24 2C 32 29  29 AB C5 28 C8 28 53 44  |.(TW$,2))..(.(SD|
000038F0: 24 2C 32 29 29 3A 89 34  30 33 00 10 41 92 01 4E  |$,2)):.403..A..N|
00003900: 44 B2 4E 44 AA C5 28 C8  28 54 57 24 2C 32 29 29  |D.ND..(.(TW$,2))|
00003910: 00 32 41 93 01 54 44 B2  4E 44 3A 57 4B B2 B5 28  |.2A..TD.ND:WK..(|
00003920: 54 44 AD 37 29 3A 8B 57  4B B2 54 44 AD 37 A7 34  |TD.7):.WK.TD.7.4|
00003930: 30 36 00 73 41 94 01 4E  44 B2 57 4B AC 37 AA 37  |06.sA..ND.WK.7.7|
00003940: 3A 57 4B B2 4E 44 AD 37  3A 44 59 B2 4E 44 3A 54  |:WK.ND.7:DY.ND:T|
00003950: 44 B2 4E 44 3A 99 22 11  1F 20 D7 45 45 4B 20 45  |D.ND:.".. .EEK E|
00003960: 4E 44 49 4E 47 20 44 41  54 45 3A 20 22 3B 3A 8D  |NDING DATE: ";:.|
00003970: 32 33 31 00 82 41 95 01  54 57 24 B2 41 24 3A 8D  |231..A..TW$.A$:.|
00003980: 31 32 00 BA 41 96 01 8D  32 31 39 3A 99 22 11 1F  |12..A...219:."..|
00003990: 20 D9 4F 55 20 48 41 56  45 20 22 3B 3A 58 B2 57  | .OU HAVE ";:X.W|
000039A0: 54 AB 57 54 28 31 29 3A  8D 39 37 3A 99 59 24 3B  |T.WT(1):.97:.Y$;|
000039B0: 3A 8B 57 4D B2 32 A7 34  30 38 00 D0 41 97 01 58  |:.WM.2.408..A..X|
000039C0: B2 C5 28 59 24 29 3A 8D  31 32 30 3A 99 48 24 3B  |..(Y$):.120:.H$;|
000039D0: 00 F0 41 98 01 99 22 20  54 4F 20 4C 4F 53 45 20  |..A..." TO LOSE |
000039E0: 49 4E 22 54 44 3A 99 22  11 20 44 41 59 53 2E 22  |IN"TD:.". DAYS."|
000039F0: 00 11 42 99 01 41 B2 B5  28 28 57 54 AB 57 54 28  |..B..A..((WT.WT(|
00003A00: 31 29 29 AD 57 4B AC 31  30 AA 30 2E 35 29 AD 31  |1)).WK.10.0.5).1|
00003A10: 30 00 1F 42 9A 01 54 57  B2 41 3A 8D 33 30 39 00  |0..B..TW.A:.309.|
00003A20: 33 42 9B 01 8B C5 28 54  53 24 29 B3 30 2E 31 A7  |3B....(TS$).0.1.|
00003A30: 34 31 33 00 6A 42 9C 01  99 22 11 1F 20 D4 48 49  |413.jB...".. .HI|
00003A40: 53 20 57 4F 55 4C 44 20  47 49 56 45 20 41 20 52  |S WOULD GIVE A R|
00003A50: 41 54 45 20 4F 46 20 22  54 53 24 3A 99 22 11 20  |ATE OF "TS$:.". |
00003A60: 50 45 52 20 57 45 45 4B  2E 22 00 80 42 9D 01 52  |PER WEEK."..B..R|
00003A70: 51 B2 41 3A 52 51 24 B2  54 53 24 3A 89 33 35 36  |Q.A:RQ$.TS$:.356|
00003A80: 00 B1 42 9E 01 83 39 34  2C 31 30 37 2C 31 32 34  |..B...94,107,124|
00003A90: 2C 39 37 2C 31 30 38 2C  31 32 36 2C 39 38 2C 31  |,97,108,126,98,1|
00003AA0: 31 30 2C 31 32 38 2C 39  38 2C 31 31 30 2C 31 32  |10,128,98,110,12|
00003AB0: 37 00 E2 42 9F 01 83 31  30 30 2C 31 31 31 2C 31  |7..B...100,111,1|
00003AC0: 33 30 2C 31 30 31 2C 31  31 33 2C 31 33 32 2C 31  |30,101,113,132,1|
00003AD0: 30 31 2C 31 31 33 2C 31  33 30 2C 31 30 33 2C 31  |01,113,130,103,1|
00003AE0: 31 34 00 13 43 A0 01 83  31 33 33 2C 31 30 34 2C  |14..C...133,104,|
00003AF0: 31 31 36 2C 31 33 35 2C  31 30 34 2C 31 31 36 2C  |116,135,104,116,|
00003B00: 31 33 33 2C 31 30 36 2C  31 31 38 2C 31 33 36 2C  |133,106,118,136,|
00003B10: 31 30 38 00 44 43 A1 01  83 31 32 30 2C 31 33 38  |108.DC...120,138|
00003B20: 2C 31 30 37 2C 31 31 39  2C 31 33 36 2C 31 31 30  |,107,119,136,110|
00003B30: 2C 31 32 32 2C 31 34 30  2C 31 31 32 2C 31 32 34  |,122,140,112,124|
00003B40: 2C 31 34 32 00 75 43 A2  01 83 31 30 39 2C 31 32  |,142.uC...109,12|
00003B50: 32 2C 31 33 39 2C 31 31  33 2C 31 32 36 2C 31 34  |2,139,113,126,14|
00003B60: 33 2C 31 31 34 2C 31 32  38 2C 31 34 35 2C 31 31  |3,114,128,145,11|
00003B70: 32 2C 31 32 35 00 A6 43  A3 01 83 31 34 33 2C 31  |2,125..C...143,1|
00003B80: 31 37 2C 31 33 30 2C 31  34 38 2C 31 31 38 2C 31  |17,130,148,118,1|
00003B90: 33 32 2C 31 35 30 2C 31  31 35 2C 31 32 38 2C 31  |32,150,115,128,1|
00003BA0: 34 36 2C 31 32 30 00 D7  43 A4 01 83 31 33 34 2C  |46,120..C...134,|
00003BB0: 31 35 32 2C 31 32 32 2C  31 33 35 2C 31 35 34 2C  |152,122,135,154,|
00003BC0: 31 31 38 2C 31 33 31 2C  31 35 30 2C 31 32 34 2C  |118,131,150,124,|
00003BD0: 31 33 38 2C 31 35 37 00  08 44 A5 01 83 31 32 36  |138,157..D...126|
00003BE0: 2C 31 34 30 2C 31 35 37  2C 31 32 30 2C 31 33 34  |,140,157,120,134|
00003BF0: 2C 31 35 33 2C 31 32 37  2C 31 34 32 2C 31 36 31  |,153,127,142,161|
00003C00: 2C 31 32 39 2C 31 34 34  00 39 44 A6 01 83 31 36  |,129,144.9D...16|
00003C10: 33 2C 31 32 33 2C 31 33  37 2C 31 35 36 2C 31 33  |3,123,137,156,13|
00003C20: 31 2C 31 34 36 2C 31 36  36 2C 31 33 33 2C 31 34  |1,146,166,133,14|
00003C30: 38 2C 31 36 38 2C 31 32  36 00 6A 44 A7 01 83 31  |8,168,126.jD...1|
00003C40: 34 30 2C 31 35 39 2C 31  33 34 2C 31 35 30 2C 31  |40,159,134,150,1|
00003C50: 37 30 2C 31 33 36 2C 31  35 32 2C 31 37 32 2C 31  |70,136,152,172,1|
00003C60: 32 39 2C 31 34 34 2C 31  36 33 00 9B 44 A8 01 83  |29,144,163..D...|
00003C70: 31 33 38 2C 31 35 34 2C  31 37 35 2C 31 34 31 2C  |138,154,175,141,|
00003C80: 31 35 37 2C 31 37 37 2C  31 33 31 2C 31 34 36 2C  |157,177,131,146,|
00003C90: 31 36 36 2C 31 34 31 2C  31 35 37 00 CC 44 A9 01  |166,141,157..D..|
00003CA0: 83 31 37 39 2C 31 34 34  2C 31 36 30 2C 31 38 30  |.179,144,160,180|
00003CB0: 2C 31 33 34 2C 31 35 30  2C 31 37 30 2C 31 34 35  |,134,150,170,145|
00003CC0: 2C 31 36 32 2C 31 38 34  2C 31 34 38 00 FD 44 AA  |,162,184,148..D.|
00003CD0: 01 83 31 36 35 2C 31 38  35 2C 31 33 37 2C 31 35  |..165,185,137,15|
00003CE0: 32 2C 31 37 33 2C 31 34  38 2C 31 36 35 2C 31 38  |2,173,148,165,18|
00003CF0: 38 2C 31 35 31 2C 31 36  38 2C 31 38 39 00 2E 45  |8,151,168,189..E|
00003D00: AB 01 83 31 34 30 2C 31  35 36 2C 31 37 37 2C 31  |...140,156,177,1|
00003D10: 35 31 2C 31 36 39 2C 31  39 32 2C 31 35 34 2C 31  |51,169,192,154,1|
00003D20: 37 32 2C 31 39 35 2C 31  34 33 2C 31 36 30 00 5F  |72,195,143,160._|
00003D30: 45 AC 01 83 31 38 30 2C  31 35 35 2C 31 37 32 2C  |E...180,155,172,|
00003D40: 31 39 35 2C 31 35 38 2C  31 37 35 2C 31 39 37 2C  |195,158,175,197,|
00003D50: 31 34 36 2C 31 36 33 2C  31 38 34 2C 31 35 38 00  |146,163,184,158.|
00003D60: 90 45 AD 01 83 31 37 35  2C 32 30 30 2C 31 36 30  |.E...175,200,160|
00003D70: 2C 31 37 38 2C 32 30 32  2C 31 34 39 2C 31 36 37  |,178,202,149,167|
00003D80: 2C 31 38 38 2C 31 36 31  2C 31 37 39 2C 32 30 33  |,188,161,179,203|
00003D90: 00 C5 45 AE 01 83 31 36  34 2C 31 38 32 2C 32 30  |..E...164,182,20|
00003DA0: 35 2C 31 35 32 2C 31 37  31 2C 31 39 33 2C 31 36  |5,152,171,193,16|
00003DB0: 34 2C 31 38 33 2C 32 30  37 2C 31 36 38 2C 31 38  |4,183,207,168,18|
00003DC0: 36 2C 32 30 39 00 04 46  AF 01 83 37 38 2C 38 37  |6,209..F...78,87|
00003DD0: 2C 39 39 2C 37 38 2C 38  37 2C 39 39 2C 38 30 2C  |,99,78,87,99,80,|
00003DE0: 38 39 2C 31 30 30 2C 38  32 2C 39 31 2C 31 30 33  |89,100,82,91,103|
00003DF0: 2C 38 32 2C 39 31 2C 31  30 33 2C 38 34 2C 39 33  |,82,91,103,84,93|
00003E00: 2C 31 30 35 00 45 46 B0  01 83 38 35 2C 39 34 2C  |,105.EF...85,94,|
00003E10: 31 30 37 2C 38 35 2C 39  34 2C 31 30 37 2C 38 37  |107,85,94,107,87|
00003E20: 2C 39 36 2C 31 30 39 2C  38 37 2C 39 37 2C 31 31  |,96,109,87,97,11|
00003E30: 31 2C 38 37 2C 39 37 2C  31 31 31 2C 38 39 2C 39  |1,87,97,111,89,9|
00003E40: 39 2C 31 31 33 00 81 46  B1 01 83 39 30 2C 31 30  |9,113..F...90,10|
00003E50: 31 2C 31 31 35 2C 39 30  2C 31 30 31 2C 31 31 35  |1,115,90,101,115|
00003E60: 2C 39 32 2C 31 30 32 2C  31 31 37 2C 39 32 2C 31  |,92,102,117,92,1|
00003E70: 30 34 2C 31 31 38 2C 39  34 2C 31 30 34 2C 31 31  |04,118,94,104,11|
00003E80: 39 00 BD 46 B2 01 83 39  35 2C 31 30 36 2C 31 32  |9..F...95,106,12|
00003E90: 30 2C 39 34 2C 31 30 36  2C 31 32 31 2C 39 37 2C  |0,94,106,121,97,|
00003EA0: 31 30 38 2C 31 32 33 2C  39 38 2C 31 31 30 2C 31  |108,123,98,110,1|
00003EB0: 32 35 2C 39 37 2C 31 30  39 2C 31 32 34 00 FE 46  |25,97,109,124..F|
00003EC0: B3 01 83 31 30 30 2C 31  31 31 2C 31 32 37 2C 31  |...100,111,127,1|
00003ED0: 30 32 2C 31 31 33 2C 31  32 39 2C 31 30 30 2C 31  |02,113,129,100,1|
00003EE0: 31 32 2C 31 32 37 2C 31  30 33 2C 31 31 35 2C 31  |12,127,103,115,1|
00003EF0: 33 31 2C 31 30 35 2C 31  31 37 2C 31 33 34 00 3F  |31,105,117,134.?|
00003F00: 47 B4 01 83 31 30 33 2C  31 31 35 2C 31 33 30 2C  |G...103,115,130,|
00003F10: 31 30 36 2C 31 31 38 2C  31 33 35 2C 31 30 39 2C  |106,118,135,109,|
00003F20: 31 32 30 2C 31 33 38 2C  31 30 36 2C 31 31 38 2C  |120,138,106,118,|
00003F30: 31 33 33 2C 31 30 39 2C  31 32 32 2C 31 33 39 00  |133,109,122,139.|
00003F40: 80 47 B5 01 83 31 31 31  2C 31 32 34 2C 31 34 32  |.G...111,124,142|
00003F50: 2C 31 30 39 2C 31 32 31  2C 31 33 36 2C 31 31 32  |,109,121,136,112|
00003F60: 2C 31 32 35 2C 31 34 33  2C 31 31 34 2C 31 32 37  |,125,143,114,127|
00003F70: 2C 31 34 36 2C 31 31 32  2C 31 32 34 2C 31 33 39  |,146,112,124,139|
00003F80: 00 C1 47 B6 01 83 31 31  35 2C 31 32 39 2C 31 34  |..G...115,129,14|
00003F90: 37 2C 31 31 37 2C 31 33  31 2C 31 34 39 2C 31 31  |7,117,131,149,11|
00003FA0: 35 2C 31 32 37 2C 31 34  34 2C 31 31 39 2C 31 33  |5,127,144,119,13|
00003FB0: 32 2C 31 35 31 2C 31 32  31 2C 31 33 34 2C 31 35  |2,151,121,134,15|
00003FC0: 33 00 02 48 B7 01 83 31  31 38 2C 31 33 30 2C 31  |3..H...118,130,1|
00003FD0: 34 36 2C 31 32 32 2C 31  33 36 2C 31 35 34 2C 31  |46,122,136,154,1|
00003FE0: 32 34 2C 31 33 39 2C 31  35 36 2C 31 32 31 2C 31  |24,139,156,121,1|
00003FF0: 33 33 2C 31 34 38 2C 31  32 35 2C 31 34 30 2C 31  |33,148,125,140,1|
00004000: 35 38 00 43 48 B8 01 83  31 32 36 2C 31 34 32 2C  |58.CH...126,142,|
00004010: 31 35 39 2C 31 32 34 2C  31 33 36 2C 31 35 32 2C  |159,124,136,152,|
00004020: 31 32 39 2C 31 34 34 2C  31 36 32 2C 31 33 30 2C  |129,144,162,130,|
00004030: 31 34 35 2C 31 36 33 2C  31 32 37 2C 31 34 30 2C  |145,163,127,140,|
00004040: 31 35 35 00 84 48 B9 01  83 31 33 33 2C 31 34 38  |155..H...133,148|
00004050: 2C 31 36 36 2C 31 33 34  2C 31 34 39 2C 31 36 36  |,166,134,149,166|
00004060: 2C 31 33 30 2C 31 34 34  2C 31 35 38 2C 31 33 37  |,130,144,158,137|
00004070: 2C 31 35 32 2C 31 37 30  2C 31 33 37 2C 31 35 33  |,152,170,137,153|
00004080: 2C 31 37 30 00 C5 48 BA  01 83 31 33 32 2C 31 34  |,170..H...132,14|
00004090: 37 2C 31 36 32 2C 31 34  30 2C 31 35 36 2C 31 37  |7,162,140,156,17|
000040A0: 34 2C 31 34 31 2C 31 35  37 2C 31 37 34 2C 31 33  |4,141,157,174,13|
000040B0: 35 2C 31 35 30 2C 31 36  35 2C 31 34 33 2C 31 35  |5,150,165,143,15|
000040C0: 39 2C 31 37 37 00 FA 48  BB 01 83 31 34 34 2C 31  |9,177..H...144,1|
000040D0: 36 30 2C 31 37 38 2C 31  33 38 2C 31 35 34 2C 31  |60,178,138,154,1|
000040E0: 36 39 2C 31 34 35 2C 31  36 33 2C 31 38 31 2C 31  |69,145,163,181,1|
000040F0: 34 36 2C 31 36 34 2C 31  38 30 00 2F 49 C2 01 4D  |46,164,180./I..M|
00004100: 45 4D B2 34 39 31 35 32  3A 50 4F 24 B2 4E 41 24  |EM.49152:PO$.NA$|
00004110: 3A 8D 34 36 30 3A 50 4F  24 B2 53 57 24 3A 8D 34  |:.460:PO$.SW$:.4|
00004120: 36 30 3A 50 4F 24 B2 53  44 24 3A 8D 34 36 30 00  |60:PO$.SD$:.460.|
00004130: 6E 49 C7 01 81 41 B2 31  A4 34 3A 4E 55 B2 57 54  |nI...A.1.4:NU.WT|
00004140: 28 41 29 3A 8D 34 36 35  3A 82 41 3A 4E 55 B2 41  |(A):.465:.A:NU.A|
00004150: 47 3A 8D 34 36 35 3A 4E  55 B2 57 4D 3A 8D 34 36  |G:.465:NU.WM:.46|
00004160: 35 3A 4E 55 B2 54 44 3A  8D 34 36 35 3A 8E 00 B1  |5:NU.TD:.465:...|
00004170: 49 CC 01 81 41 B2 30 A4  C3 28 50 4F 24 29 AB 31  |I...A.0..(PO$).1|
00004180: 3A 97 4D 45 4D AA 41 2C  C6 28 CA 28 50 4F 24 2C  |:.MEM.A,.(.(PO$,|
00004190: 41 AA 31 2C 31 29 29 3A  82 41 3A 97 4D 45 4D AA  |A.1,1)):.A:.MEM.|
000041A0: 41 2C 30 3A 4D 45 4D B2  4D 45 4D AA 41 AA 31 3A  |A,0:MEM.MEM.A.1:|
000041B0: 8E 00 E8 49 D1 01 4E 55  B2 4E 55 AC 31 30 30 3A  |...I..NU.NU.100:|
000041C0: 97 4D 45 4D 2C 4E 55 AF  32 35 35 3A 97 4D 45 4D  |.MEM,NU.255:.MEM|
000041D0: AA 31 2C B5 28 4E 55 AD  32 35 36 29 3A 4D 45 4D  |.1,.(NU.256):MEM|
000041E0: B2 4D 45 4D AA 32 3A 8E  00 00 00                 |.MEM.2:....     |
..D....   THE JOFFE PLAN/PARTA - VERSION
 1 (8/10/84) - DISK AND TAPE.{....808,23
4:.".":.:.53272,22:.648,4:.56578,B(56578
).3......56576,(B(56576).252).3:."."....
.. .B(X)..31.(X.1.X.3.X.5.X.7.X.8.X.10.X
.12).30.(X.4.X.6.X.9.X.11).29.(X.2).-...
.53280,6:.53281,1:.G(14),G(8):T$."THE JO
FFE PLAN":.IW(22,3,3).Z.....L(X)..(X.4..
(X.4)).(X.100..(X.100))..1.G....25:.124.
Q...R1.24.....R2.24:.10:.......781,R:.78
2,C:.783,0:.(65520):..H....RC.R1.R2:.781
,RC:.(59903):.RC......RC.217.241:.RC,B(R
C).128:.RC:.."....7:C.13:R.24:.9:."..PRE
SS ";:FL$." SPACE ":.198,0./...FL.1:.39.
?....G$.." ".13.N....7:.".";:..M...H$.T$
:.".":.17:."..."SP$:......SP..((40.C(H$)
).2):."..".SP);H$:......R.24:C.1:.9.....
.".TYPE ..P.. TO PRINT - ..C.. TO CONTIN
UE  ";:RK.0:AL$."CPCP":.36.....EF.0:.RK$
."C".RK$."C"..."....7:D.4:.109:.EF.1.D.0
:..W....4,4,7:.4:.".THE JOFFE PLAN":."==
============":..Z...A$.NA$:.H(A$,1)."*".
A$.J(A$,2)......".SUBJECT : "A$:.".START
ING DATE : "SD$:.:......SP$."           
                             ":.".":R.1:
C.0:.9.2....".."SP$:."..           IVAN 
BERG SOFTWARE           ":.".."SP$.W...R
.8:C.0:.9:H$.T$:.17:R.10:C.0:.9.....H$."
YOUR PERSONAL NO-DIET WEIGHT CONTROL":.1
7:.:H$."SYSTEM":.17......EN.1.32.....R.1
5:C.0:.9:H$."DEVISED BY PROFESSOR JUSTIN
 JOFFE":.17.....R.17:C.0:.9:H$.".PROGRAM
 1":.17. . .C.0:R.19:.9:.".."SP$.R.!..".
.             (C) (P) 1984              
 ".F."..".."SP$;:.12:....$.RK$."":CH.0:.
198,0:.RK.0.AL$." -.":.RK.1.AL$."0123456
789/.":.RK.3.L.8.I.&.FL$."?":FL.1:.39:.4
5...'.R$."..":.FL..1.R$."..".".(.FL..FL:
.R$;FL$;:.DE.1.C(FL$):.".";:.DE:.DE.1.25
:G$."":.G$.0.)..G$."".43.?.*.FL.2:DE.25.
O.+..DE:.FL.2...W.,..39...-..G$.G(20).RK
$.."".RK$.H(RK$,C(RK$).1):."..  ..";:.38
......G$..G(13).(G$.G(13).RK$."").49.../
..". ";:LM.0:.RK.2.CH.E(RK$):..(CH).CH.R
K$.J(D(CH),2)...0...3.1..G$.G(13).G$.G(2
0).((RK.1.RK.3).C(RK$).L).(RK.0.RK$.."")
.38.F.2..RK.1.((G$.."A".G$.."Z").(G$.."A
".G$.."Z")).68...3..(RK.1.RK$."").(RK.2.
C(RK$).5).(RK..3.G$."/").38.B.4..K.1.C(A
L$):.G$..J(AL$,K,1)..K:.38...5.K.C(AL$):
.K:.RK..2.68...6..RK$."".((G$."0".ZE.0).
G$.".").E(RK$.G$).LM.38.9.7.XY.0:.K.1.C(
RK$):.J(RK$,K,1).".".XY.1.W.<..K:.G$."."
.(XY.1.DP.0).38.S.D.RK$.RK$.G$:.".."G$;:
.38...O..16:."... "TS$:.".. ENTER DATE I
N THE FORMAT"...P..". DAY/MONTH/YEAR (EG
 26/5/84)":.". ";:DP.0:RK.3:.36:DA$.RK$.
..Q..I.0.2:DT$(I)."":.I:CT.0:.I.1.C(DA$)
:A$.J(DA$,I,1).6.R..A$."/".CT.CT.1:.84.M
.S.DT$(CT).DT$(CT).A$...T..I:.CT.2.C(DT$
(2))..2.E(DT$(1)).1.E(DT$(1)).12.89...U.
.E(DT$(0)).1.E(DT$(0))..B(E(DT$(1))).89.
..V..E(DT$(1)).2.E(DT$(0)).29..L(E(DT$(2
))).0.89...W..I.0.2:.E(DT$(I)).10.H(DT$(
I),1).."0".DT$(I)."0".DT$(I).L.X..I:DA$.
DT$(0)."/".DT$(1)."/".DT$(2):A$."":....Y
..:.".. INVALID ENTRY. PLEASE TRY AGAIN.
":.12:.79...Z.." ..Y.. OR ..N.. ";:RK.0:
AL$."YNYN":.36:..H.[..C(FD$).39..FD$:.95
...\..J.39.1..1:X$.J(FD$,J,1):.X$.." ".9
4.-.]..H(FD$,J.1):FD$.I(FD$,C(FD$).J.1):
J.1:.SP.1.FD$.".".FD$.8.^..J:.91.C._.SP.
0:....`.R.24:C.0:.9:.".     PRESS ..P..,
 ..N.. OR TYPE NUMBER";:....A.Y$."":.WM.
1.X..((X.4.536).0.5).10:.101.M.B.X..((X.
10).0.5).10:.WM.3.101...C.Y..(X.14):Y$.D
(Y)."ST":.H(Y$,2)." 0".Y$.""...D.X.X.(Y.
14):X..(X.100.0.5).100.F.E.XX$.D(X):.X.1
.X.0.XX$." 0".J(XX$,2).P.F.Y$.Y$.XX$:Y$.
J(Y$,2):.WM.2.Y$.Y$."LB".V.G.....H..WM.3
.Y.E(Y$):.108...I..WM.1.Y.E(Y$).2.205:.1
08.T.J..I.1.C(Y$):.J(Y$,I,1)."S".J.I:I.C
(Y$)...K..I:TS$.J(Y$,1,J.1):Y.(E(TS$).14
).E(J(Y$,J.3,C(Y$).J.2))...L...E.M.EF.0:
.1,D,6:.781,1:.(65481):.B(783).1.EF.1.\.
N..(65511):.EF.0.114...O..16:."..":H$.".
DEVICE NOT PRESENT":.17:TS$."PRINTER"...
P..D.8.TS$."DISK DRIVE"...Q..".":H$."PLE
ASE CONNECT ".TS$." AND THEN...":.17:.12
...R.....S..16.,.T..K.1.QL:.".. ."Q$(K):
.K:.K.1.LM:.". .."J(D(K),2);.J.U..". .";
OP$(K):.K:."..   .OPTION - ";:DP.0:ZE.0:
RK.2:.36:..~.V..WM..2.." "WM$;...W..:...
.X.H$." POUND":.WM.1.H$." KILO"...Y..X..
1.H$.H$."S".A.Z...U.{.EN.1:.25:.64738...
|..16:.".. THIS PROGRAM SHOULD BE USED T
O SET UP".9.}..". YOUR PERSONALISED WEIG
HT CONTROL PLAN.".H.~..". ANSWER ALL THE
 QUESTIONS HONESTLY, AS".....". THE INF
ORMATION YOU GIVE HERE IS"......". USED 
THROUGHOUT THE PLAN.":.12:.16......". .I
F YOU ARE USING THE CASSETTE VERSION"...
...".. OF THE PROGRAM, PLEASE LEAVE THE 
PLAY".M....". KEY DEPRESSED. IF YOU ARE 
LOADING FROM"......". DISK, LEAVE THE DI
SK IN PLACE          . THROUGHOUT THE PR
OGRAM."......12.P...TS$."TODAY'S DATE":.
79:SD$.DA$:.16:L.15:RK.1......".. PLEASE
 TYPE IN YOUR NAME (MAX. 15      . CHARA
CTERS)":.". ";.(....36:NA$.RK$:..P....".
. WHAT SEX ARE YOU? ..M.. OR ..F. ";:RK.
0:AL$."MFMF":.36:SX$.RK$......:.".. HOW 
OLD ARE YOU, ";NA$;"? ";:LM.99:RK.2:.36:
AG.CH.G....AG.18.TS$."AGE":.167.....Q$(1
).".WOULD YOU LIKE WEIGHTS TO BE GIVEN I
N":QL.1:OP$(1)."KILOGRAMS".]...OP$(2)."S
TONES AND POUNDS":OP$(3)."POUNDS":LM.3:.
115:WM$.OP$(CH):WM.CH......:LM.450:.WM.1
.WM$."KILOS":LM.205.A....".. HOW MUCH DO
 YOU WEIGH?":.WM..2.." .("WM$") : ";:.14
7......". .STONES : ";:LM.30:RK.2:.36:RK
$.RK$."ST ":TW$.RK$......TS..2.SW$.RK$.1
...."   .POUNDS :";:LM.13.99:ZE.1.[...."
 ";:RK.2:DP.1:.36:DP.0:ZE.0:.TS.2...~...
SW$.SW$.RK$:.WM.2.SW$.SW$."LB".G...Q$(1)
."DO YOU WANT TO GIVE YOUR HEIGHT IN":QL
.1:OP$(1)."CENTIMETRES".....OP$(2)."FEET
 AND INCHES":LM.2:.115:.:OP.CH.(...HT.0:
.".. HOW TALL ARE YOU?":LM.240:.OP.1.154
.A....". .FEET : ";:LM.10:RK.2:.36:HT.CH
.12:HT$.RK$."FT "......"   .INCHES :";:L
M.11.99:ZE.1:DP.1:.155......". (";OP$(OP
);")";......" ";:RK.2:.36:HT.HT.CH:HT$.H
T$.RK$:.OP.1.HT$.HT$."CM"......OP.2.HT$.
HT$."IN":.158.....HT.HT.0.3937.<....16:.
".. DATE:   ."SD$:.".. NAME:   ."NA$.I..
.TS$."MALE":.SX$."F".SX$."F".TS$."FEMALE
"... ..".. SEX:    ."TS$:.".. AGE:   ."A
G:.".. WEIGHT: ."SW$;.A....118:.".. HEIG
HT: ."HT$......"... ARE THESE DETAILS CO
RRECT? ";:.90./....RK$."N".RK$."N".SD$."
":NA$."":SX$."":AG.0:SW$."":HT$."":.134.
X...X.57:T.21:.SX$."F".SX$."F".X.53:T.22
.T...A..(HT).X:.A.0.A..T.174.....TS$."HE
IGHT".M....16:."... SORRY - WE HAVE NO F
IGURES AVAILABLE   . FOR YOUR "TS$"."...
...AG.17.171......". AT YOUR AGE, YOU SH
OULD NOT CONSIDER".J....". LOSING WEIGHT
 UNLESS YOUR DOCTOR HAS   . SUGGESTED IT
.".|....".. IF YOU REALLY THINK YOU ARE 
OVERWEIGHT,"......" ASK YOUR DOCTOR TO S
UGGEST AN".W....". APPROPRIATE DIET-PLAN
 TO SUIT YOU.":.12:.123......SX$."F".SX$
."F"..I.1.189:.A:.I.( ...I.1.T:.J.1.3:.K
.1.3:.IW(I,J,K):.K:.J:.I.A ..A.HT.X:Y$.S
W$:.104:WT.Y:AR.3:.AG.35.AR.2:.AG.25.AR.
1.. ..WT(2).IW(A,AR,1):WT(3).IW(A,AR,2):
WT(5).IW(A,AR,3):X.WT(2):.97:A1$.Y$.U ..
X.WT(3):.97:B1$.Y$:X.WT(5):.97:C1$.Y$..!
...16:."... YOUR WEIGHT IS ."SW$;:.118:.
".. YOUR IDEAL ";.E!..."WEIGHT SHOULD BE
 BETWEEN.":H$.A1$." AND ".C1$.^!...WM..2
.H$.H$." ".WM$.U!...17:.WT..WT(2).187..!
..."... YOU SHOULD NOT BE LIGHTER THAN Y
OU ARE".S!...". AT THE MOMENT - IN FACT 
YOU SHOULD"..!...". CONSIDER GAINING SOM
E WEIGHT!".4"...". YOU CERTAINLY DON'T N
EED THIS PROGRAM.":WL.1:.205.H"...WT.WT(
3).1.190.X"..."... RELAX! YOUR WEIGHT IS
 IDEAL. USE THE".."...". PROGRAM TO KEEP
 YOUR WEIGHT STEADY.":WL.2:.205.A"...WT.
WT(5).195.."..."... YOU ARE IN THE HAPPY
 POSITION OF BEING"."#...". ABLE TO DECI
DE FOR YOUSELF WHETHER OR".S#A..". NOT Y
OU WANT TO LOSE WEIGHT. IF YOU ARE"..#B.
." HAPPY AND HEALTHY - STAY AS YOU ARE."
:WL.3:.205..#C.WL.5:.WT.WT(5).(WT(5).WT(
3)).WL.4:.201..#D.."... YOU ARE OBVIOUSL
Y VERY OVERWEIGHT."..$E..". IF YOU HAVEN
'T DONE SO ALREADY, VISIT".@$F..". YOUR 
DOCTOR - THERE MAY BE SOME NEED".N$G..".
 FOR MEDICAL TREATMENT IN ADDITION TO"..
$H..". THIS WEIGHT CONTROL PROGRAM.":.12
:.16:.202.R$I.."... YES, YOU PROBABLY SH
OULD LOSE WEIGHT."..%J..". THE BEST WAY 
TO LOSE WEIGHT - AND KEEP".1%K..". IT OF
F! - IS TO LOSE IT SLOWLY OVER A".J%L.."
. PERIOD OF TIME."..%M..12:.16:.".. NO M
ATTER WHAT YOUR WEIGHT, YOU WOULD".A%N..
". BE SURE TO BENEFIT FROM AN INCREASE  
  . IN EXERCISE."..%O..". THIS WILL IMPR
OVE YOUR METABOLIC RATE"..&P..". AND TON
E UP YOUR MUSCLES, WHICH WILL".\&Q..". M
AKE YOU LOOK SLIMMER AND FEEL FITTER.":.
12:.WL.4.216..&R..16:.".. WARNING":.".. 
IF YOU ARE NOT USED TO REGULAR".F&S..". 
EXERCISE, TAKE IT EASY TO BEGIN WITH."..
&T..". REMEMBER, BECAUSE YOU ARE CARRYIN
G".!'U..". EXTRA WEIGHT, YOU WILL USE A 
LOT MORE".M'V..". CALORIES THAN MOST PEO
PLE IN DOING".O'W..". EVEN LIGHT EXERCIS
E.":.12.}'X..WL.1.123..'Y..WL.2.WT(1).0:
WT(4).0:TD.0:.245.Z'Z.WT(1).WT(3):..(WT.
WT(1)).1.WT(1).0:WT(4).0:TD.0:.245..'...
16..(...WL.3.TS.0..".. ........":." .OPT
IONAL.":.". ........".P(...".. TARGET WE
IGHT : .";:X.WT(1):.97:.Y$;:.118.A(...TS
.4.TD.0...O(...TS.4.228..(...:.". TO ACH
IEVE THIS, YOU NEED TO LOSE":X.WT.WT(1):
.97.R(...". ."Y$;:.WM..2.X.E(Y$):.120:.H
$;..(...TS.3.228..)..WT(4).0.5:RL$."0.5 
POUNDS":.WM.1.RL$."0.2 KILOS".>)...:."..
 AT A RATE OF "RL$" PER WEEK,".U)...". Y
OU SHOULD ACHIEVE YOUR TARGET WEIGHT  . 
BY ";..)..X.WT.WT(1):T.WT(4):WK..((X.T).
0.9):DY..(WK.7):TD.DY:.TD.182.WL.5..)..N
D.0:A$.J(SD$,4,2):YR.E(I(SD$,2)):.A$."01
".233.'*..Z.E(A$):.I.1.Z.1:ND.ND..B(I):.
I:.Z.2..L(YR).0.ND.ND.1.Y*..ND.ND.E(H(SD
$,2)):DY.DY.ND:I.0:YR.E(I(SD$,2))..*..I.
I.1:.DY...B(I).A$.D(DY):B$.D(I):C$.D(YR)
:.238..*...I.2..L(YR).0.DY.DY.28:.237..*
..DY.DY..B(I):.I.12.I.0:YR.YR.1:.YR.100.
YR.00..*...234..+..A$.J(A$,2):.E(A$).10.
A$."0".A$.,+..B$.J(B$,2):.E(B$).10.B$."0
".B$.O+..C$.J(C$,2):.E(C$).10.C$."0".C$.
U+..A$.A$."/".B$."/".C$:.EN.1.WL..5....+
..TD$.A$:.EN.1....+..."."TD$:.TS.4....+.
..12..+...TS.0..275.A+...D..4..16..+..."
.. YOUR WEIGHT :    .";SW$;:.118..,...".
. TARGET WEIGHT :  .";:.WT(1).0.251.S,..
."NONE":TS.1:.WL.2..".. YOUR PRESENT WEI
GHT IS IDEAL.":.253..,...".. YOU HAVE CH
OSEN TO STAY AS YOU ARE.    . GOOD FOR Y
OU!":.253.Z,..X.WT(1):.97:.Y$;:.118:."..
 RATE OF LOSS :   ."RL$" PER WEEK"..,...
".. TARGET DATE :    ."TD$..-..TS.0:.EN.
1...H-..TS$(1)."ANY OF THESE FIGURES":TS
$(2)."THE TARGET WEIGHT".-..TS$(3)."THE
 RATE OF LOSS":TS$(4)."THE TARGET DATE".
.-..TS.TS.1:.TS.4..275:.264.T-..WW.0:R1.
15:.8:R.15:C.0:.9:.". DO YOU WANT TO CHA
NGE"......". "TS$(TS)"? ";:.90:.RK$."N".
RK$."N".261......TS.1.256......312.)....
TS.1.TS.4.@....TS.2.WT(4).0.TS.4.I....25
6.Y....TD.183.287......16:NA$."*".NA$:."
.. YOU WILL FIND IT EASIER TO STICK TO".
A....". THE PROGRAMME IF YOU HAVE A MORE
"......". IMMEDIATE TARGET. THE INITIAL 
TARGET"../...". WEIGHT IS THEREFORE GIVE
N AS THE".G/...". EXPECTED WEIGHT AFTER 
SIX MONTHS, AT".V/...". YOUR CHOSEN RATE
 OF LOSS. IF YOU WANT"../...". TO LOSE S
TILL MORE WEIGHT, USE PROGRAM"../...". 1
 TO SET UP ANOTHER PLAN AFTER SIX     . 
MONTHS."..0...12:.16:WT(1).WT(1).(WT(4).
(TD.182).7).20..TD.182:DY.TD:EN.1:.231:T
D$.A$:.287.H0...(WT(1).WT(2).TS.2.WT(1).
0).(TS.3.WT(4).2.21).278..0...TS.5.WT(1)
.0.(WT(1).WT(2).WT(4).2.21).282..0....P0
...16:.".. IT MAY BE QUITE DIFFICULT TO 
ACHIEVE"..1...". "TS$(TS)" YOU HAVE CHOS
EN.":.". YOU SHOULD SERIOUSLY CONSIDER".
J1...". ACCEPTING THE FIRST SUGGESTED FI
GURE.":.12.P1.....1...16:.". DO NOT BE T
OO SURPRISED IF THIS PLAN"..1...". DOES 
NOT WORK FOR YOU - THE FIGURES"..1...". 
YOU HAVE CHOSEN MAY BE DIFFICULT TO"..2.
..". ACHIEVE. HOWEVER, IF YOU WANT TO TR
Y".72...". IT, GO AHEAD - AND GOOD LUCK!
":.12:..Z2..EN.1:.246:.D.4..4: 4:D.D1:.2
87.L2 ..18:.EF.1.287..2!..RK$."P".RK$."P
".287..2".Q$(1)."THE SECOND PART OF THE 
PROGRAM MUST"..2#.Q$(2)."NOW BE LOADED. 
ARE YOU LOADING FROM ":QL.2:OP$(1)."DISK
?".63$.OP$(2)."TAPE?":LM.2:.115:.:D.1:.C
H.1.D.8:.109:.EF.1.290.K3%..16:."... PLE
ASE WAIT WHILE 'PARTB' IS LOADING.".X3&.
.D.8.297..3'..". THIS WILL TAKE JUST OVE
R 1 MINUTE.".H3)..450:.12:."...... ";:."
PARTB",D..3*..".. THIS GIVES A TARGET DA
TE OF":.". ";:.230:..G4+..".. THIS COULD
 LEAD TO ILL-HEALTH AND IS   . THEREFORE
 UNACCEPTABLE.".Q4,..12:...4-..".. OKAY 
- TRY IT YOUR WAY. AND GOOD LUCK  . TO Y
OU!"..4...12:..D4/..".. HOW ABOUT A COMP
ROMISE - ":.". "Y$:...40..".. WILL YOU A
CCEPT THIS? ";:.90:..%51..".. IT IS ADVI
SABLE TO LOSE WEIGHT SLOWLY.":.12:.16.Y5
2..".. WE SUGGEST A RATE OF "TS$:.". PER
 WEEK.":..{53..".. PLEASE TRY AGAIN.":.1
2:...54..TW.2.WM.1.TW.2.205..55.TS$.D(TW
):TS$.J(TS$,2):X.TW:.97:TS$.Y$..56.X.E(T
S$):.WM..2..120:TS$.TS$.H$..57....58..TS
.2.349..69..16:.WL.2.WW.0.318.=6:..".. Y
OUR PRESENT WEIGHT IS IDEAL. ARE YOU".I6
;..". SURE YOU WANT TO LOSE WEIGHT?.":.9
0..6<..RK$."N".RK$."N".TS.4:WT(1).0:WT(4
).0:TD.0:.245..6=..16..6>.."... PRESENT 
TARGET WEIGHT : .";:X.WT(1):.X.0.."NONE"
:.320..6?..97:.Y$;:.118.!7@.WW.1:.:.".. 
REQUESTED TARGET WEIGHT ".V7A..WM..2.." 
.("WM$") : ";:LM.500:.147:TW$.RK$:.323.Q
7B..144:TW$.TW$.RK$."LBS"..7C..:Y$.TW$:.
104:RQ.Y:.WT.RQ..1.327..7D..WT.RQ..0.327
.Y7E..".. YOU EITHER WANT TO LOSE SOME W
EIGHT OR"..8F..". YOU DON'T. NO HALF MEA
SURES, PLEASE!":.12:.317.68G..RQ.WT(2).(
WT(3).WT(2))..299:.317.F8H..RQ..WT.331.U
8I..".. YOUR CHOSEN TARGET WEIGHT IS GRE
ATER"..8J..". THAN YOUR CURRENT WEIGHT."
:.307:.317..8K..RQ..WT(2).342..8L..".. Y
OU SHOULD NOT WEIGH LESS THAN":.". "A1$;
..9M.TW.WT(2):.118:.304:.339..9N.R1.16:.
8:R.16:C.0:.9.69O..WW.4.X..1..301:.347.O
9P.TW.RQ..((WT(2).TW).2):.(.(RQ.TW).1).(
X.TW).X..1:.335..9Q.X.TW:.97:.WM..2.Y$.Y
$." ".WM$..9R..303:.304..9S..RK$."Y".RK$
."Y".RQ.TW:.347.W9T.WW.WW.1:.WW.2.TW.RQ.
.9U.X.TW:.334..9V..RQ..WT(5).347.&:W..".
. YOU ARE OVERWEIGHT AND NEED TO LOSE".R
:X..". SOME WEIGHT. THE COMPUTER WILL NO
T"..:Y..". ACCEPT A TARGET WEIGHT GREATE
R THAN":X.WT(5):RQ.X:.97..:Z..". "Y$;:.1
18:.12.T:[.WT(1).RQ:.WT.RQ.WT(1).0:WT(4)
.0:TD.0:.245..:\..219..:].X$.RL$..:^..TS
.3.388.1;_..16:.".. PRESENT RATE OF LOSS
 : ."X$:..23)". PER WEEK".A;`..".. DESIR
ED RATE (";:.WM.1.."POUNDS";:.354.O;A.."
KILOS";..;B.." PER WEEK) : ";:ZE.1:LM.10
:DP.1:RK.2:.36:.:RQ.E(RK$).M;C.TS$.RK$:.
WM.1.Y$.RK$:.104:RQ.Y..;D..RQ.0.2.359..<
E..".. YOU COULD EASILY LOSE WEIGHT AT A
".3<F..". FASTER RATE.":TW.0.5:.12:.16:.
367.B<G..RQ..6.362.B<H..299:TW.WT.WT(1):
.TW.2.TW.2.O<I..16:.367..<J..TS.4.Y$.TS$
:X.E(Y$):.120:RQ$.Y$.H$..<K..RQ.(WT.WT(1
))..0.372..<L..".. YOU DON'T HAVE MUCH W
EIGHT TO LOSE SO  . WHY RUSH?"..=M.TW.WT
.WT(1):.TW.0.5.TW.0.5..=N..12:.16.L=O.TD
.0:.308:.306:WT(4).TW:RL$.TS$:WW.0:.TS.3
.369.U=P..298.S=Q..304:.RK$."N".RK$."N".
350..=R..TS.3.219..=S..387..=T..(WM.1.E(
RQ$).1).(WM.1.E(RQ$).2).374.H=U..12:TD$.
TW$:.386.V=V.TW.2:.308..=W..305:.383..=X
.RQ.TW:RQ$.TS$:.12:.386..>Y.R1.13:.TS.3.
R1.9.'>Z..8:R.R1:C.0:.9.N>{.TW..(((RQ.((
RQ.TW).2)).10).0.5).10.X>|..308:.TS.4..(
(WT.WT(1)).TW).1.WK.WW.3..>}..WW.3.TD$.T
W$:.301:.386..>~.Y$.TS$." PER WEEK.":.30
3.I>..TS.4.WT(4).TW:.298..>...304:.RK$.
"Y".RK$."Y".RQ.TW:RQ$.TS$:.386..?..WW.WW
.1:.377.&?..WT(4).RQ:RL$.RQ$:.TS.3.219./
?...245.Z?..TS$."CHOSEN TARGET DATE":.79
:TW$.DA$:...?..A.E(I(TW$,2)).10000.E(J(T
W$,4,2)).100.E(H(TW$,2)).F?..B.E(I(SD$,2
)).10000.E(J(SD$,4,2)).100.E(H(SD$,2))..
?...A..B..:.".. INVALID DATE.":.307:.388
..@..ND.0:A.E(I(TW$,2)):B.E(I(SD$,2)).F@
..I.E(J(SD$,4,2)):J.E(J(TW$,4,2)):.I.J.A
.B.401.`@..J.J.1:.J.0.J.12:A.A.1.Y@..ND.
.B(I).E(H(SD$,2))..@...I.J.A.B.402..@..I
.I.1:.I.13.I.1:B.B.1..@..ND.ND..B(I).M@.
..I.2..L(B).0.ND.ND.1.V@...396..@..ND.E(
H(TW$,2)).E(H(SD$,2)):.403..A..ND.ND.E(H
(TW$,2)).2A..TD.ND:WK..(TD.7):.WK.TD.7.4
06.SA..ND.WK.7.7:WK.ND.7:DY.ND:TD.ND:.".
. WEEK ENDING DATE: ";:.231..A..TW$.A$:.
12..A...219:.".. YOU HAVE ";:X.WT.WT(1):
.97:.Y$;:.WM.2.408.PA..X.E(Y$):.120:.H$;
..A..." TO LOSE IN"TD:.". DAYS."..B..A..
((WT.WT(1)).WK.10.0.5).10..B..TW.A:.309.
3B...E(TS$).0.1.413.JB...".. THIS WOULD 
GIVE A RATE OF "TS$:.". PER WEEK."..B..R
Q.A:RQ$.TS$:.356..B...94,107,124,97,108,
126,98,110,128,98,110,127..B...100,111,1
30,101,113,132,101,113,130,103,114..C ..
133,104,116,135,104,116,133,106,118,136,
108.DC...120,138,107,119,136,110,122,140
,112,124,142.UC...109,122,139,113,126,14
3,114,128,145,112,125..C...143,117,130,1
48,118,132,150,115,128,146,120.WC...134,
152,122,135,154,118,131,150,124,138,157.
.D...126,140,157,120,134,153,127,142,161
,129,144.9D...163,123,137,156,131,146,16
6,133,148,168,126.JD...140,159,134,150,1
70,136,152,172,129,144,163..D...138,154,
175,141,157,177,131,146,166,141,157.LD..
.179,144,160,180,134,150,170,145,162,184
,148..D...165,185,137,152,173,148,165,18
8,151,168,189..E...140,156,177,151,169,1
92,154,172,195,143,160._E...180,155,172,
195,158,175,197,146,163,184,158..E...175
,200,160,178,202,149,167,188,161,179,203
.EE...164,182,205,152,171,193,164,183,20
7,168,186,209..F...78,87,99,78,87,99,80,
89,100,82,91,103,82,91,103,84,93,105.EF.
..85,94,107,85,94,107,87,96,109,87,97,11
1,87,97,111,89,99,113..F...90,101,115,90
,101,115,92,102,117,92,104,118,94,104,11
9..F...95,106,120,94,106,121,97,108,123,
98,110,125,97,109,124..F...100,111,127,1
02,113,129,100,112,127,103,115,131,105,1
17,134.?G...103,115,130,106,118,135,109,
120,138,106,118,133,109,122,139..G...111
,124,142,109,121,136,112,125,143,114,127
,146,112,124,139.AG...115,129,147,117,13
1,149,115,127,144,119,132,151,121,134,15
3..H...118,130,146,122,136,154,124,139,1
56,121,133,148,125,140,158.CH...126,142,
159,124,136,152,129,144,162,130,145,163,
127,140,155..H...133,148,166,134,149,166
,130,144,158,137,152,170,137,153,170.EH.
..132,147,162,140,156,174,141,157,174,13
5,150,165,143,159,177..H...144,160,178,1
38,154,169,145,163,181,146,164,180./IB.M
EM.49152:PO$.NA$:.460:PO$.SW$:.460:PO$.S
D$:.460.NIG..A.1.4:NU.WT(A):.465:.A:NU.A
G:.465:NU.WM:.465:NU.TD:.465:...IL..A.0.
C(PO$).1:.MEM.A,F(J(PO$,A.1,1)):.A:.MEM.
A,0:MEM.MEM.A.1:...IQ.NU.NU.100:.MEM,NU.
255:.MEM.1,.(NU.256):MEM.MEM.2:....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL