PARTA
FILE INFORMATION
FILENAME(S): PARTA
FILE TYPE(S): PRG
FILE SIZE: 16.5K
FIRST SEEN: 2025-11-30 21:08:56
APPEARS ON: 1 disk(s)
FILE HASH
87402f60715aaddd5e4286e7b61da3fd6f4249838fec75722e90608a608a62a4
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPELLEN | PARTA | PRG | DuncanTwain | 10 | 4 | 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 72 08 01 00 99 22 93 22 3A 9C 3A |TAPE.r....".":.:|
00000050: 97 35 33 32 37 32 2C 32 32 3A 97 36 34 38 2C 34 |.53272,22:.648,4|
00000060: 3A 97 35 36 35 37 38 2C C2 28 35 36 35 37 38 29 |:.56578,.(56578)|
00000070: B0 33 00 93 08 02 00 97 35 36 35 37 36 2C 28 C2 |.3......56576,(.|
00000080: 28 35 36 35 37 36 29 AF 32 35 32 29 B0 33 3A 99 |(56576).252).3:.|
00000090: 22 93 22 00 E2 08 03 00 96 20 A5 42 28 58 29 B2 |"."...... .B(X).|
000000A0: AB 33 31 AC 28 58 B2 31 B0 58 B2 33 B0 58 B2 35 |.31.(X.1.X.3.X.5|
000000B0: B0 58 B2 37 B0 58 B2 38 B0 58 B2 31 30 B0 58 B2 |.X.7.X.8.X.10.X.|
000000C0: 31 32 29 AB 33 30 AC 28 58 B2 34 B0 58 B2 36 B0 |12).30.(X.4.X.6.|
000000D0: 58 B2 39 B0 58 B2 31 31 29 AB 32 39 AC 28 58 B2 |X.9.X.11).29.(X.|
000000E0: 32 29 00 24 09 04 00 97 35 33 32 38 30 2C 36 3A |2).$....53280,6:|
000000F0: 97 35 33 32 38 31 2C 31 3A 99 C7 28 31 34 29 2C |.53281,1:..(14),|
00000100: C7 28 38 29 3A 54 24 B2 22 C3 D2 C1 C3 CB C5 C4 |.(8):T$.".......|
00000110: A0 C2 D9 A0 C7 D4 D3 22 3A 86 49 57 28 32 32 2C |.......":.IW(22,|
00000120: 33 2C 33 29 00 51 09 05 00 96 A5 4C 28 58 29 B2 |3,3).Q.....L(X).|
00000130: AB 28 58 AD 34 B2 B5 28 58 AD 34 29 29 AB 28 58 |.(X.4..(X.4)).(X|
00000140: AD 31 30 30 B2 B5 28 58 AD 31 30 30 29 29 AC AB |.100..(X.100))..|
00000150: 31 00 5E 09 06 00 8D 32 35 3A 89 31 32 34 00 68 |1.^....25:.124.h|
00000160: 09 07 00 52 31 B2 32 34 00 78 09 08 00 52 32 B2 |...R1.24.x...R2.|
00000170: 32 34 3A 8D 31 30 3A 8E 00 9C 09 09 00 97 37 38 |24:.10:.......78|
00000180: 31 2C 52 3A 97 37 38 32 2C 43 3A 97 37 38 33 2C |1,R:.782,C:.783,|
00000190: 30 3A 9E 28 36 35 35 32 30 29 3A 8E 00 BF 09 0A |0:.(65520):.....|
000001A0: 00 81 52 43 B2 52 31 A4 52 32 3A 97 37 38 31 2C |..RC.R1.R2:.781,|
000001B0: 52 43 3A 9E 28 35 39 39 30 33 29 3A 82 52 43 00 |RC:.(59903):.RC.|
000001C0: E3 09 0B 00 81 52 43 B2 32 31 37 A4 32 34 31 3A |.....RC.217.241:|
000001D0: 97 52 43 2C C2 28 52 43 29 B0 31 32 38 3A 82 52 |.RC,.(RC).128:.R|
000001E0: 43 3A 8E 00 19 0A 0C 00 8D 37 3A 43 B2 31 33 3A |C:.......7:C.13:|
000001F0: 52 B2 32 34 3A 8D 39 3A 99 22 90 92 D0 D2 C5 D3 |R.24:.9:."......|
00000200: D3 20 22 3B 3A 46 4C 24 B2 22 20 D3 D0 C1 C3 C5 |. ";:FL$." .....|
00000210: A0 22 3A 97 31 39 38 2C 30 00 26 0A 0D 00 46 4C |.":.198,0.&...FL|
00000220: B2 31 3A 8D 33 39 00 36 0A 0E 00 8B 47 24 B3 B1 |.1:.39.6....G$..|
00000230: 22 20 22 A7 31 33 00 45 0A 0F 00 8D 37 3A 99 22 |" ".13.E....7:."|
00000240: 92 22 3B 3A 8E 00 64 0A 10 00 48 24 B2 54 24 3A |.";:..d...H$.T$:|
00000250: 99 22 93 22 3A 8D 31 37 3A 99 22 11 12 1F 22 53 |.".":.17:."..."S|
00000260: 50 24 3A 8E 00 8A 0A 11 00 53 50 B2 B5 28 28 34 |P$:......SP..((4|
00000270: 30 AB C3 28 48 24 29 29 AD 32 29 3A 99 22 92 90 |0..(H$)).2):."..|
00000280: 22 A6 53 50 29 3B 48 24 3A 8E 00 9A 0A 12 00 52 |".SP);H$:......R|
00000290: B2 32 34 3A 43 B2 31 3A 8D 39 00 E1 0A 13 00 99 |.24:C.1:.9......|
000002A0: 22 90 D4 59 50 45 20 12 1C D0 92 90 20 54 4F 20 |"..YPE ..... TO |
000002B0: 50 52 49 4E 54 20 2D 20 12 1C C3 92 90 20 54 4F |PRINT - ..... TO|
000002C0: 20 43 4F 4E 54 49 4E 55 45 20 20 22 3B 3A 52 4B | CONTINUE ";:RK|
000002D0: B2 30 3A 41 4C 24 B2 22 43 50 C3 D0 22 3A 8D 33 |.0:AL$."CP..":.3|
000002E0: 36 00 FD 0A 14 00 45 46 B2 30 3A 8B 52 4B 24 B2 |6.....EF.0:.RK$.|
000002F0: 22 43 22 B0 52 4B 24 B2 22 C3 22 A7 8E 00 19 0B |"C".RK$.".".....|
00000300: 15 00 8D 37 3A 44 B2 34 3A 8D 31 30 39 3A 8B 45 |...7:D.4:.109:.E|
00000310: 46 B2 31 A7 44 B2 30 3A 8E 00 4E 0B 16 00 9F 34 |F.1.D.0:..N....4|
00000320: 2C 34 2C 37 3A 9D 34 3A 99 22 11 D4 48 45 20 CA |,4,7:.4:."..HE .|
00000330: 4F 46 46 45 20 D0 4C 41 4E 22 3A 99 22 3D 3D 3D |OFFE .LAN":."===|
00000340: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 3A 99 00 71 |===========":..q|
00000350: 0B 17 00 41 24 B2 4E 41 24 3A 8B C8 28 41 24 2C |...A$.NA$:..(A$,|
00000360: 31 29 B2 22 2A 22 A7 41 24 B2 CA 28 41 24 2C 32 |1)."*".A$..(A$,2|
00000370: 29 00 A2 0B 18 00 99 22 11 D3 55 42 4A 45 43 54 |)......"..UBJECT|
00000380: 20 3A 20 22 41 24 3A 99 22 11 D3 54 41 52 54 49 | : "A$:."..TARTI|
00000390: 4E 47 20 C4 41 54 45 20 3A 20 22 53 44 24 3A 99 |NG .ATE : "SD$:.|
000003A0: 3A 8E 00 E5 0B 19 00 53 50 24 B2 22 20 20 20 20 |:......SP$." |
000003B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003D0: 20 20 20 20 22 3A 99 22 93 22 3A 52 B2 31 3A 43 | ":.".":R.1:C|
000003E0: B2 30 3A 8D 39 00 29 0C 1A 00 99 22 12 1F 22 53 |.0:.9.)....".."S|
000003F0: 50 24 3A 99 22 90 12 20 20 20 20 20 20 20 20 20 |P$:.".. |
00000400: 20 20 C9 D6 C1 CE 20 C2 C5 D2 C7 20 D3 CF C6 D4 | .... .... ....|
00000410: D7 C1 D2 C5 20 20 20 20 20 20 20 20 20 20 20 22 |.... "|
00000420: 3A 99 22 12 1F 22 53 50 24 00 4E 0C 1B 00 52 B2 |:.".."SP$.N...R.|
00000430: 38 3A 43 B2 30 3A 8D 39 3A 48 24 B2 54 24 3A 8D |8:C.0:.9:H$.T$:.|
00000440: 31 37 3A 52 B2 31 30 3A 43 B2 30 3A 8D 39 00 92 |17:R.10:C.0:.9..|
00000450: 0C 1C 00 48 24 B2 22 D9 4F 55 52 20 D0 45 52 53 |...H$.".OUR .ERS|
00000460: 4F 4E 41 4C 20 CE 4F 2D C4 49 45 54 20 D7 45 49 |ONAL .O-.IET .EI|
00000470: 47 48 54 20 C3 4F 4E 54 52 4F 4C 22 3A 8D 31 37 |GHT .ONTROL":.17|
00000480: 3A 99 3A 48 24 B2 22 D3 59 53 54 45 4D 22 3A 8D |:.:H$.".YSTEM":.|
00000490: 31 37 00 9F 0C 1D 00 8B 45 4E B2 31 A7 33 32 00 |17......EN.1.32.|
000004A0: DA 0C 1E 00 52 B2 31 35 3A 43 B2 30 3A 8D 39 3A |....R.15:C.0:.9:|
000004B0: 48 24 B2 22 C4 45 56 49 53 45 44 20 42 59 20 D0 |H$.".EVISED BY .|
000004C0: D2 CF C6 C5 D3 D3 CF D2 A0 CA D5 D3 D4 C9 CE A0 |................|
000004D0: CA CF C6 C6 C5 22 3A 8D 31 37 00 FE 0C 1F 00 52 |.....":.17.....R|
000004E0: B2 31 37 3A 43 B2 30 3A 8D 39 3A 48 24 B2 22 1C |.17:C.0:.9:H$.".|
000004F0: D0 D2 CF C7 D2 C1 CD 20 31 22 3A 8D 31 37 00 17 |....... 1":.17..|
00000500: 0D 20 00 43 B2 30 3A 52 B2 31 39 3A 8D 39 3A 99 |. .C.0:R.19:.9:.|
00000510: 22 12 1F 22 53 50 24 00 49 0D 21 00 99 22 90 12 |".."SP$.I.!.."..|
00000520: 20 20 20 20 20 20 20 20 20 20 20 20 20 28 C3 29 | (.)|
00000530: 20 28 D0 29 20 31 39 38 34 20 20 20 20 20 20 20 | (.) 1984 |
00000540: 20 20 20 20 20 20 20 20 22 00 5D 0D 22 00 99 22 | ".].".."|
00000550: 1F 12 22 53 50 24 3B 3A 8D 31 32 3A 8E 00 A7 0D |.."SP$;:.12:....|
00000560: 24 00 52 4B 24 B2 22 22 3A 43 48 B2 30 3A 97 31 |$.RK$."":CH.0:.1|
00000570: 39 38 2C 30 3A 8B 52 4B B1 30 A7 41 4C 24 B2 22 |98,0:.RK.0.AL$."|
00000580: 20 2D 2E 22 3A 8B 52 4B B1 31 A7 41 4C 24 B2 22 | -.":.RK.1.AL$."|
00000590: 30 31 32 33 34 35 36 37 38 39 2F 2E 22 3A 8B 52 |0123456789/.":.R|
000005A0: 4B B2 33 A7 4C B2 38 00 C0 0D 26 00 46 4C 24 B2 |K.3.L.8...&.FL$.|
000005B0: 22 3F 22 3A 46 4C B2 31 3A 8D 33 39 3A 89 34 35 |"?":FL.1:.39:.45|
000005C0: 00 DB 0D 27 00 52 24 B2 22 12 1C 22 3A 8B 46 4C |...'.R$."..":.FL|
000005D0: B2 AB 31 A7 52 24 B2 22 92 1C 22 00 19 0E 28 00 |..1.R$.".."...(.|
000005E0: 46 4C B2 AB 46 4C 3A 99 52 24 3B 46 4C 24 3B 3A |FL..FL:.R$;FL$;:|
000005F0: 81 44 45 B2 31 A4 C3 28 46 4C 24 29 3A 99 22 9D |.DE.1..(FL$):.".|
00000600: 22 3B 3A 82 44 45 3A 81 44 45 B2 31 A4 32 35 3A |";:.DE:.DE.1.25:|
00000610: 47 24 B2 22 22 3A A1 47 24 00 27 0E 29 00 8B 47 |G$."":.G$.'.)..G|
00000620: 24 B2 22 22 A7 34 33 00 36 0E 2A 00 46 4C B2 32 |$."".43.6.*.FL.2|
00000630: 3A 44 45 B2 32 35 00 46 0E 2B 00 82 44 45 3A 8B |:DE.25.F.+..DE:.|
00000640: 46 4C B2 32 A7 8E 00 4E 0E 2C 00 89 33 39 00 87 |FL.2...N.,..39..|
00000650: 0E 2D 00 8B 47 24 B2 C7 28 32 30 29 AF 52 4B 24 |.-..G$..(20).RK$|
00000660: B3 B1 22 22 A7 52 4B 24 B2 C8 28 52 4B 24 2C C3 |.."".RK$..(RK$,.|
00000670: 28 52 4B 24 29 AB 31 29 3A 99 22 92 9D 20 20 9D |(RK$).1):.".. .|
00000680: 9D 22 3B 3A 89 33 38 00 AB 0E 2E 00 8B 47 24 B3 |.";:.38......G$.|
00000690: B1 C7 28 31 33 29 B0 28 47 24 B2 C7 28 31 33 29 |..(13).(G$..(13)|
000006A0: AF 52 4B 24 B2 22 22 29 A7 34 39 00 E4 0E 2F 00 |.RK$."").49.../.|
000006B0: 99 22 92 20 22 3B 3A 4C 4D B2 30 3A 8B 52 4B B2 |.". ";:LM.0:.RK.|
000006C0: 32 A7 43 48 B2 C5 28 52 4B 24 29 3A 8B B5 28 43 |2.CH..(RK$):..(C|
000006D0: 48 29 B2 43 48 A7 52 4B 24 B2 CA 28 C4 28 43 48 |H).CH.RK$..(.(CH|
000006E0: 29 2C 32 29 00 EA 0E 30 00 8E 00 2A 0F 31 00 8B |),2)...0...*.1..|
000006F0: 47 24 B2 C7 28 31 33 29 B0 47 24 B2 C7 28 32 30 |G$..(13).G$..(20|
00000700: 29 B0 28 28 52 4B B2 31 B0 52 4B B2 33 29 AF C3 |).((RK.1.RK.3)..|
00000710: 28 52 4B 24 29 B2 4C 29 B0 28 52 4B B2 30 AF 52 |(RK$).L).(RK.0.R|
00000720: 4B 24 B3 B1 22 22 29 A7 33 38 00 5D 0F 32 00 8B |K$.."").38.].2..|
00000730: 52 4B B2 31 AF 28 28 47 24 B1 B2 22 C1 22 AF 47 |RK.1.((G$..".".G|
00000740: 24 B3 B2 22 DA 22 29 B0 28 47 24 B1 B2 22 41 22 |$..".").(G$.."A"|
00000750: AF 47 24 B3 B2 22 5A 22 29 29 A7 36 38 00 92 0F |.G$.."Z")).68...|
00000760: 33 00 8B 28 52 4B B2 31 AF 52 4B 24 B2 22 22 29 |3..(RK.1.RK$."")|
00000770: B0 28 52 4B B2 32 AF C3 28 52 4B 24 29 B2 35 29 |.(RK.2..(RK$).5)|
00000780: B0 28 52 4B B3 B1 33 AF 47 24 B2 22 2F 22 29 A7 |.(RK..3.G$."/").|
00000790: 33 38 00 B9 0F 34 00 81 4B B2 31 A4 C3 28 41 4C |38...4..K.1..(AL|
000007A0: 24 29 3A 8B 47 24 B3 B1 CA 28 41 4C 24 2C 4B 2C |$):.G$...(AL$,K,|
000007B0: 31 29 A7 82 4B 3A 89 33 38 00 D3 0F 35 00 4B B2 |1)..K:.38...5.K.|
000007C0: C3 28 41 4C 24 29 3A 82 4B 3A 8B 52 4B B3 B1 32 |.(AL$):.K:.RK..2|
000007D0: A7 36 38 00 06 10 36 00 8B 52 4B 24 B2 22 22 AF |.68...6..RK$."".|
000007E0: 28 28 47 24 B2 22 30 22 AF 5A 45 B2 30 29 B0 47 |((G$."0".ZE.0).G|
000007F0: 24 B2 22 2E 22 29 B0 C5 28 52 4B 24 AA 47 24 29 |$.".")..(RK$.G$)|
00000800: B1 4C 4D A7 33 38 00 30 10 37 00 58 59 B2 30 3A |.LM.38.0.7.XY.0:|
00000810: 81 4B B2 31 A4 C3 28 52 4B 24 29 3A 8B CA 28 52 |.K.1..(RK$):..(R|
00000820: 4B 24 2C 4B 2C 31 29 B2 22 2E 22 A7 58 59 B2 31 |K$,K,1).".".XY.1|
00000830: 00 4E 10 3C 00 82 4B 3A 8B 47 24 B2 22 2E 22 AF |.N.<..K:.G$.".".|
00000840: 28 58 59 B2 31 B0 44 50 B2 30 29 A7 33 38 00 6A |(XY.1.DP.0).38.j|
00000850: 10 44 00 52 4B 24 B2 52 4B 24 AA 47 24 3A 99 22 |.D.RK$.RK$.G$:."|
00000860: 92 1C 22 47 24 3B 3A 89 33 38 00 9C 10 4F 00 8D |.."G$;:.38...O..|
00000870: 31 36 3A 99 22 11 90 92 20 22 54 53 24 3A 99 22 |16:."... "TS$:."|
00000880: 11 1F 20 C5 4E 54 45 52 20 44 41 54 45 20 49 4E |.. .NTER DATE IN|
00000890: 20 54 48 45 20 46 4F 52 4D 41 54 22 00 DE 10 50 | THE FORMAT"...P|
000008A0: 00 99 22 11 20 44 41 59 2F 4D 4F 4E 54 48 2F 59 |..". DAY/MONTH/Y|
000008B0: 45 41 52 20 28 45 47 20 32 36 2F 35 2F 38 34 29 |EAR (EG 26/5/84)|
000008C0: 22 3A 99 22 11 20 22 3B 3A 44 50 B2 30 3A 52 4B |":.". ";:DP.0:RK|
000008D0: B2 33 3A 8D 33 36 3A 44 41 24 B2 52 4B 24 00 15 |.3:.36:DA$.RK$..|
000008E0: 11 51 00 81 49 B2 30 A4 32 3A 44 54 24 28 49 29 |.Q..I.0.2:DT$(I)|
000008F0: B2 22 22 3A 82 49 3A 43 54 B2 30 3A 81 49 B2 31 |."":.I:CT.0:.I.1|
00000900: A4 C3 28 44 41 24 29 3A 41 24 B2 CA 28 44 41 24 |..(DA$):A$..(DA$|
00000910: 2C 49 2C 31 29 00 2D 11 52 00 8B 41 24 B2 22 2F |,I,1).-.R..A$."/|
00000920: 22 A7 43 54 B2 43 54 AA 31 3A 89 38 34 00 44 11 |".CT.CT.1:.84.D.|
00000930: 53 00 44 54 24 28 43 54 29 B2 44 54 24 28 43 54 |S.DT$(CT).DT$(CT|
00000940: 29 AA 41 24 00 7A 11 54 00 82 49 3A 8B 43 54 B1 |).A$.z.T..I:.CT.|
00000950: 32 B0 C3 28 44 54 24 28 32 29 29 B3 B1 32 B0 C5 |2..(DT$(2))..2..|
00000960: 28 44 54 24 28 31 29 29 B3 31 B0 C5 28 44 54 24 |(DT$(1)).1..(DT$|
00000970: 28 31 29 29 B1 31 32 A7 38 39 00 A6 11 55 00 8B |(1)).12.89...U..|
00000980: C5 28 44 54 24 28 30 29 29 B3 31 B0 C5 28 44 54 |.(DT$(0)).1..(DT|
00000990: 24 28 30 29 29 B1 A5 42 28 C5 28 44 54 24 28 31 |$(0))..B(.(DT$(1|
000009A0: 29 29 29 A7 38 39 00 D7 11 56 00 8B C5 28 44 54 |))).89...V...(DT|
000009B0: 24 28 31 29 29 B2 32 AF C5 28 44 54 24 28 30 29 |$(1)).2..(DT$(0)|
000009C0: 29 B2 32 39 AF A5 4C 28 C5 28 44 54 24 28 32 29 |).29..L(.(DT$(2)|
000009D0: 29 29 B2 30 A7 38 39 00 13 12 57 00 81 49 B2 30 |)).0.89...W..I.0|
000009E0: A4 32 3A 8B C5 28 44 54 24 28 49 29 29 B3 31 30 |.2:..(DT$(I)).10|
000009F0: AF C8 28 44 54 24 28 49 29 2C 31 29 B3 B1 22 30 |..(DT$(I),1).."0|
00000A00: 22 A7 44 54 24 28 49 29 B2 22 30 22 AA 44 54 24 |".DT$(I)."0".DT$|
00000A10: 28 49 29 00 43 12 58 00 82 49 3A 44 41 24 B2 44 |(I).C.X..I:DA$.D|
00000A20: 54 24 28 30 29 AA 22 2F 22 AA 44 54 24 28 31 29 |T$(0)."/".DT$(1)|
00000A30: AA 22 2F 22 AA 44 54 24 28 32 29 3A 41 24 B2 22 |."/".DT$(2):A$."|
00000A40: 22 3A 8E 00 78 12 59 00 99 3A 99 22 1C 11 20 C9 |":..x.Y..:.".. .|
00000A50: 4E 56 41 4C 49 44 20 45 4E 54 52 59 2E 20 D0 4C |NVALID ENTRY. .L|
00000A60: 45 41 53 45 20 54 52 59 20 41 47 41 49 4E 2E 22 |EASE TRY AGAIN."|
00000A70: 3A 8D 31 32 3A 89 37 39 00 A7 12 5A 00 99 22 20 |:.12:.79...Z.." |
00000A80: 1C 12 D9 92 1F 20 4F 52 20 12 1C CE 92 1F 20 22 |..... OR ..... "|
00000A90: 3B 3A 52 4B B2 30 3A 41 4C 24 B2 22 59 4E D9 CE |;:RK.0:AL$."YN..|
00000AA0: 22 3A 8D 33 36 3A 8E 00 BF 12 5B 00 8B C3 28 46 |":.36:....[...(F|
00000AB0: 44 24 29 B3 33 39 A7 99 46 44 24 3A 89 39 35 00 |D$).39..FD$:.95.|
00000AC0: E8 12 5C 00 81 4A B2 33 39 A4 31 A9 AB 31 3A 58 |..\..J.39.1..1:X|
00000AD0: 24 B2 CA 28 46 44 24 2C 4A 2C 31 29 3A 8B 58 24 |$..(FD$,J,1):.X$|
00000AE0: B3 B1 22 20 22 A7 39 34 00 24 13 5D 00 99 C8 28 |.." ".94.$.]...(|
00000AF0: 46 44 24 2C 4A AB 31 29 3A 46 44 24 B2 C9 28 46 |FD$,J.1):FD$..(F|
00000B00: 44 24 2C C3 28 46 44 24 29 AB 4A AA 31 29 3A 4A |D$,.(FD$).J.1):J|
00000B10: B2 31 3A 8B 53 50 B2 31 A7 46 44 24 B2 22 11 22 |.1:.SP.1.FD$."."|
00000B20: AA 46 44 24 00 2F 13 5E 00 82 4A 3A 89 39 31 00 |.FD$./.^..J:.91.|
00000B30: 3A 13 5F 00 53 50 B2 30 3A 8E 00 78 13 60 00 52 |:._.SP.0:..x.`.R|
00000B40: B2 32 34 3A 43 B2 30 3A 8D 39 3A 99 22 90 20 20 |.24:C.0:.9:.". |
00000B50: 20 20 20 D0 52 45 53 53 20 1C 12 D0 92 90 2C 20 | .RESS ....., |
00000B60: 1C 12 CE 90 92 20 4F 52 20 54 59 50 45 20 4E 55 |..... OR TYPE NU|
00000B70: 4D 42 45 52 22 3B 3A 8E 00 A3 13 61 00 59 24 B2 |MBER";:....a.Y$.|
00000B80: 22 22 3A 8B 57 4D B2 31 A7 58 B2 B5 28 28 58 AC |"":.WM.1.X..((X.|
00000B90: 34 2E 35 33 36 29 AA 30 2E 35 29 AD 31 30 3A 89 |4.536).0.5).10:.|
00000BA0: 31 30 31 00 C4 13 62 00 58 B2 B5 28 28 58 AC 31 |101...b.X..((X.1|
00000BB0: 30 29 AA 30 2E 35 29 AD 31 30 3A 8B 57 4D B2 33 |0).0.5).10:.WM.3|
00000BC0: A7 31 30 31 00 F3 13 63 00 59 B2 B5 28 58 AD 31 |.101...c.Y..(X.1|
00000BD0: 34 29 3A 59 24 B2 C4 28 59 29 AA 22 53 54 22 3A |4):Y$..(Y)."ST":|
00000BE0: 8B C8 28 59 24 2C 32 29 B2 22 20 30 22 A7 59 24 |..(Y$,2)." 0".Y$|
00000BF0: B2 22 22 00 15 14 64 00 58 B2 58 AB 28 59 AC 31 |.""...d.X.X.(Y.1|
00000C00: 34 29 3A 58 B2 B5 28 58 AC 31 30 30 AA 30 2E 35 |4):X..(X.100.0.5|
00000C10: 29 AD 31 30 30 00 3D 14 65 00 58 58 24 B2 C4 28 |).100.=.e.XX$..(|
00000C20: 58 29 3A 8B 58 B3 31 AF 58 B1 30 A7 58 58 24 B2 |X):.X.1.X.0.XX$.|
00000C30: 22 20 30 22 AA CA 28 58 58 24 2C 32 29 00 67 14 |" 0"..(XX$,2).g.|
00000C40: 66 00 59 24 B2 59 24 AA 58 58 24 3A 59 24 B2 CA |f.Y$.Y$.XX$:Y$..|
00000C50: 28 59 24 2C 32 29 3A 8B 57 4D B2 32 A7 59 24 B2 |(Y$,2):.WM.2.Y$.|
00000C60: 59 24 AA 22 4C 42 22 00 6D 14 67 00 8E 00 84 14 |Y$."LB".m.g.....|
00000C70: 68 00 8B 57 4D B2 33 A7 59 B2 C5 28 59 24 29 3A |h..WM.3.Y..(Y$):|
00000C80: 89 31 30 38 00 A1 14 69 00 8B 57 4D B2 31 A7 59 |.108...i..WM.1.Y|
00000C90: B2 C5 28 59 24 29 AC 32 2E 32 30 35 3A 89 31 30 |..(Y$).2.205:.10|
00000CA0: 38 00 CB 14 6A 00 81 49 B2 31 A4 C3 28 59 24 29 |8...j..I.1..(Y$)|
00000CB0: 3A 8B CA 28 59 24 2C 49 2C 31 29 B2 22 53 22 A7 |:..(Y$,I,1)."S".|
00000CC0: 4A B2 49 3A 49 B2 C3 28 59 24 29 00 07 15 6B 00 |J.I:I..(Y$)...k.|
00000CD0: 82 49 3A 54 53 24 B2 CA 28 59 24 2C 31 2C 4A AB |.I:TS$..(Y$,1,J.|
00000CE0: 31 29 3A 59 B2 28 C5 28 54 53 24 29 AC 31 34 29 |1):Y.(.(TS$).14)|
00000CF0: AA C5 28 CA 28 59 24 2C 4A AA 33 2C C3 28 59 24 |..(.(Y$,J.3,.(Y$|
00000D00: 29 AB 4A AA 32 29 29 00 0D 15 6C 00 8E 00 3C 15 |).J.2))...l...<.|
00000D10: 6D 00 45 46 B2 30 3A 9F 31 2C 44 2C 36 3A 97 37 |m.EF.0:.1,D,6:.7|
00000D20: 38 31 2C 31 3A 9E 28 36 35 34 38 31 29 3A 8B C2 |81,1:.(65481):..|
00000D30: 28 37 38 33 29 AF 31 A7 45 46 B2 31 00 53 15 6E |(783).1.EF.1.S.n|
00000D40: 00 9E 28 36 35 35 31 31 29 3A 8B 45 46 B2 30 A7 |..(65511):.EF.0.|
00000D50: 31 31 34 00 8C 15 6F 00 8D 31 36 3A 99 22 11 11 |114...o..16:."..|
00000D60: 22 3A 48 24 B2 22 1C C4 C5 D6 C9 C3 C5 A0 CE CF |":H$."..........|
00000D70: D4 A0 D0 D2 C5 D3 C5 CE D4 22 3A 8D 31 37 3A 54 |.........":.17:T|
00000D80: 53 24 B2 22 D0 D2 C9 CE D4 C5 D2 22 00 A6 15 70 |S$."......."...p|
00000D90: 00 8B 44 B2 38 A7 54 53 24 B2 22 C4 C9 D3 CB A0 |..D.8.TS$.".....|
00000DA0: C4 D2 C9 D6 C5 22 00 DF 15 71 00 99 22 11 22 3A |....."...q..".":|
00000DB0: 48 24 B2 22 D0 CC C5 C1 D3 C5 A0 C3 CF CE CE C5 |H$."............|
00000DC0: C3 D4 20 22 AA 54 53 24 AA 22 A0 C1 CE C4 A0 D4 |.. ".TS$."......|
00000DD0: C8 C5 CE 2E 2E 2E 22 3A 8D 31 37 3A 8D 31 32 00 |......":.17:.12.|
00000DE0: E5 15 72 00 8E 00 ED 15 73 00 8D 31 36 00 23 16 |..r.....s..16.#.|
00000DF0: 74 00 81 4B B2 31 A4 51 4C 3A 99 22 92 11 20 90 |t..K.1.QL:.".. .|
00000E00: 22 51 24 28 4B 29 3A 82 4B 3A 81 4B B2 31 A4 4C |"Q$(K):.K:.K.1.L|
00000E10: 4D 3A 99 22 11 20 1C 12 22 CA 28 C4 28 4B 29 2C |M:.". ..".(.(K),|
00000E20: 32 29 3B 00 61 16 75 00 99 22 92 20 1F 22 3B 4F |2);.a.u..". .";O|
00000E30: 50 24 28 4B 29 3A 82 4B 3A 99 22 11 11 20 20 20 |P$(K):.K:.".. |
00000E40: 90 CF 50 54 49 4F 4E 20 2D 20 22 3B 3A 44 50 B2 |..PTION - ";:DP.|
00000E50: 30 3A 5A 45 B2 30 3A 52 4B B2 32 3A 8D 33 36 3A |0:ZE.0:RK.2:.36:|
00000E60: 8E 00 75 16 76 00 8B 57 4D B3 B1 32 A7 99 22 20 |..u.v..WM..2.." |
00000E70: 22 57 4D 24 3B 00 7D 16 77 00 99 3A 8E 00 9E 16 |"WM$;.}.w..:....|
00000E80: 78 00 48 24 B2 22 20 50 4F 55 4E 44 22 3A 8B 57 |x.H$." POUND":.W|
00000E90: 4D B2 31 A7 48 24 B2 22 20 4B 49 4C 4F 22 00 B2 |M.1.H$." KILO"..|
00000EA0: 16 79 00 8B 58 B3 B1 31 A7 48 24 B2 48 24 AA 22 |.y..X..1.H$.H$."|
00000EB0: 53 22 00 B8 16 7A 00 8E 00 CC 16 7B 00 45 4E B2 |S"...z.....{.EN.|
00000EC0: 31 3A 8D 32 35 3A 9E 36 34 37 33 38 00 00 17 7C |1:.25:.64738...||
00000ED0: 00 8D 31 36 3A 99 22 1F 11 20 D4 48 49 53 20 50 |..16:.".. .HIS P|
00000EE0: 52 4F 47 52 41 4D 20 53 48 4F 55 4C 44 20 42 45 |ROGRAM SHOULD BE|
00000EF0: 20 55 53 45 44 20 54 4F 20 53 45 54 20 55 50 22 | USED TO SET UP"|
00000F00: 00 30 17 7D 00 99 22 11 20 59 4F 55 52 20 50 45 |.0.}..". YOUR PE|
00000F10: 52 53 4F 4E 41 4C 49 53 45 44 20 D7 45 49 47 48 |RSONALISED .EIGH|
00000F20: 54 20 C3 4F 4E 54 52 4F 4C 20 D0 4C 41 4E 2E 22 |T .ONTROL .LAN."|
00000F30: 00 5F 17 7E 00 99 22 11 20 C1 4E 53 57 45 52 20 |._.~..". .NSWER |
00000F40: 41 4C 4C 20 54 48 45 20 51 55 45 53 54 49 4F 4E |ALL THE QUESTION|
00000F50: 53 20 48 4F 4E 45 53 54 4C 59 2C 20 41 53 22 00 |S HONESTLY, AS".|
00000F60: 89 17 7F 00 99 22 11 20 54 48 45 20 49 4E 46 4F |.....". THE INFO|
00000F70: 52 4D 41 54 49 4F 4E 20 59 4F 55 20 47 49 56 45 |RMATION YOU GIVE|
00000F80: 20 48 45 52 45 20 49 53 22 00 B4 17 80 00 99 22 | HERE IS"......"|
00000F90: 11 20 55 53 45 44 20 54 48 52 4F 55 47 48 4F 55 |. USED THROUGHOU|
00000FA0: 54 20 54 48 45 20 D0 4C 41 4E 2E 22 3A 8D 31 32 |T THE .LAN.":.12|
00000FB0: 3A 8D 31 36 00 E4 17 81 00 99 22 11 20 90 C9 46 |:.16......". ..F|
00000FC0: 20 59 4F 55 20 41 52 45 20 55 53 49 4E 47 20 54 | YOU ARE USING T|
00000FD0: 48 45 20 43 41 53 53 45 54 54 45 20 56 45 52 53 |HE CASSETTE VERS|
00000FE0: 49 4F 4E 22 00 14 18 82 00 99 22 11 90 20 4F 46 |ION"......".. OF|
00000FF0: 20 54 48 45 20 50 52 4F 47 52 41 4D 2C 20 50 4C | THE PROGRAM, PL|
00001000: 45 41 53 45 20 4C 45 41 56 45 20 54 48 45 20 50 |EASE LEAVE THE P|
00001010: 4C 41 59 22 00 44 18 83 00 99 22 11 20 4B 45 59 |LAY".D....". KEY|
00001020: 20 44 45 50 52 45 53 53 45 44 2E 20 C9 46 20 59 | DEPRESSED. .F Y|
00001030: 4F 55 20 41 52 45 20 4C 4F 41 44 49 4E 47 20 46 |OU ARE LOADING F|
00001040: 52 4F 4D 22 00 8E 18 84 00 99 22 11 20 44 49 53 |ROM"......". DIS|
00001050: 4B 2C 20 4C 45 41 56 45 20 54 48 45 20 44 49 53 |K, LEAVE THE DIS|
00001060: 4B 20 49 4E 20 50 4C 41 43 45 20 20 20 20 20 20 |K IN PLACE |
00001070: 20 20 20 20 11 20 54 48 52 4F 55 47 48 4F 55 54 | . THROUGHOUT|
00001080: 20 54 48 45 20 50 52 4F 47 52 41 4D 2E 22 00 96 | THE PROGRAM."..|
00001090: 18 85 00 8D 31 32 00 C7 18 86 00 54 53 24 B2 22 |....12.....TS$."|
000010A0: D4 4F 44 41 59 27 53 20 44 41 54 45 22 3A 8D 37 |.ODAY'S DATE":.7|
000010B0: 39 3A 53 44 24 B2 44 41 24 3A 8D 31 36 3A 4C B2 |9:SD$.DA$:.16:L.|
000010C0: 31 35 3A 52 4B B2 31 00 0D 19 87 00 99 22 11 90 |15:RK.1......"..|
000010D0: 20 D0 4C 45 41 53 45 20 54 59 50 45 20 49 4E 20 | .LEASE TYPE IN |
000010E0: 59 4F 55 52 20 4E 41 4D 45 20 28 4D 41 58 2E 20 |YOUR NAME (MAX. |
000010F0: 31 35 20 20 20 20 20 20 11 20 43 48 41 52 41 43 |15 . CHARAC|
00001100: 54 45 52 53 29 22 3A 99 22 11 20 22 3B 00 1F 19 |TERS)":.". ";...|
00001110: 88 00 8D 33 36 3A 4E 41 24 B2 52 4B 24 3A 99 00 |...36:NA$.RK$:..|
00001120: 67 19 89 00 99 22 11 90 20 D7 48 41 54 20 53 45 |g....".. .HAT SE|
00001130: 58 20 41 52 45 20 59 4F 55 3F 20 1C 12 CD 92 90 |X ARE YOU? .....|
00001140: 20 4F 52 20 1C 12 C6 92 20 22 3B 3A 52 4B B2 30 | OR .... ";:RK.0|
00001150: 3A 41 4C 24 B2 22 4D 46 CD C6 22 3A 8D 33 36 3A |:AL$."MF..":.36:|
00001160: 53 58 24 B2 52 4B 24 00 A4 19 8A 00 99 3A 99 22 |SX$.RK$......:."|
00001170: 11 90 20 C8 4F 57 20 4F 4C 44 20 41 52 45 20 59 |.. .OW OLD ARE Y|
00001180: 4F 55 2C 20 22 3B 4E 41 24 3B 22 3F 20 22 3B 3A |OU, ";NA$;"? ";:|
00001190: 4C 4D B2 39 39 3A 52 4B B2 32 3A 8D 33 36 3A 41 |LM.99:RK.2:.36:A|
000011A0: 47 B2 43 48 00 BE 19 8B 00 8B 41 47 B3 31 38 A7 |G.CH......AG.18.|
000011B0: 54 53 24 B2 22 41 47 45 22 3A 89 31 36 37 00 09 |TS$."AGE":.167..|
000011C0: 1A 8C 00 51 24 28 31 29 B2 22 90 D7 4F 55 4C 44 |...Q$(1)."..OULD|
000011D0: 20 59 4F 55 20 4C 49 4B 45 20 57 45 49 47 48 54 | YOU LIKE WEIGHT|
000011E0: 53 20 54 4F 20 42 45 20 47 49 56 45 4E 20 49 4E |S TO BE GIVEN IN|
000011F0: 22 3A 51 4C B2 31 3A 4F 50 24 28 31 29 B2 22 4B |":QL.1:OP$(1)."K|
00001200: 49 4C 4F 47 52 41 4D 53 22 00 54 1A 8D 00 4F 50 |ILOGRAMS".T...OP|
00001210: 24 28 32 29 B2 22 53 54 4F 4E 45 53 20 41 4E 44 |$(2)."STONES AND|
00001220: 20 50 4F 55 4E 44 53 22 3A 4F 50 24 28 33 29 B2 | POUNDS":OP$(3).|
00001230: 22 50 4F 55 4E 44 53 22 3A 4C 4D B2 33 3A 8D 31 |"POUNDS":LM.3:.1|
00001240: 31 35 3A 57 4D 24 B2 4F 50 24 28 43 48 29 3A 57 |15:WM$.OP$(CH):W|
00001250: 4D B2 43 48 00 7A 1A 8E 00 99 3A 4C 4D B2 34 35 |M.CH.z....:LM.45|
00001260: 30 3A 8B 57 4D B2 31 A7 57 4D 24 B2 22 4B 49 4C |0:.WM.1.WM$."KIL|
00001270: 4F 53 22 3A 4C 4D B2 32 30 35 00 B8 1A 8F 00 99 |OS":LM.205......|
00001280: 22 11 90 20 C8 4F 57 20 4D 55 43 48 20 44 4F 20 |".. .OW MUCH DO |
00001290: 59 4F 55 20 57 45 49 47 48 3F 22 3A 8B 57 4D B3 |YOU WEIGH?":.WM.|
000012A0: B1 32 A7 99 22 20 11 28 22 57 4D 24 22 29 20 3A |.2.." .("WM$") :|
000012B0: 20 22 3B 3A 89 31 34 37 00 F2 1A 90 00 99 22 11 | ";:.147......".|
000012C0: 20 1F 53 54 4F 4E 45 53 20 3A 20 22 3B 3A 4C 4D | .STONES : ";:LM|
000012D0: B2 33 30 3A 52 4B B2 32 3A 8D 33 36 3A 52 4B 24 |.30:RK.2:.36:RK$|
000012E0: B2 52 4B 24 AA 22 53 54 20 22 3A 54 57 24 B2 52 |.RK$."ST ":TW$.R|
000012F0: 4B 24 00 05 1B 91 00 8B 54 53 B3 B1 32 A7 53 57 |K$......TS..2.SW|
00001300: 24 B2 52 4B 24 00 28 1B 92 00 99 22 20 20 20 1F |$.RK$.(...." .|
00001310: 50 4F 55 4E 44 53 20 3A 22 3B 3A 4C 4D B2 31 33 |POUNDS :";:LM.13|
00001320: 2E 39 39 3A 5A 45 B2 31 00 52 1B 93 00 99 22 20 |.99:ZE.1.R...." |
00001330: 22 3B 3A 52 4B B2 32 3A 44 50 B2 31 3A 8D 33 36 |";:RK.2:DP.1:.36|
00001340: 3A 44 50 B2 30 3A 5A 45 B2 30 3A 8B 54 53 B2 32 |:DP.0:ZE.0:.TS.2|
00001350: A7 8E 00 75 1B 94 00 53 57 24 B2 53 57 24 AA 52 |...u...SW$.SW$.R|
00001360: 4B 24 3A 8B 57 4D B2 32 A7 53 57 24 B2 53 57 24 |K$:.WM.2.SW$.SW$|
00001370: AA 22 4C 42 22 00 BE 1B 95 00 51 24 28 31 29 B2 |."LB".....Q$(1).|
00001380: 22 C4 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 |".O YOU WANT TO |
00001390: 47 49 56 45 20 59 4F 55 52 20 48 45 49 47 48 54 |GIVE YOUR HEIGHT|
000013A0: 20 49 4E 22 3A 51 4C B2 31 3A 4F 50 24 28 31 29 | IN":QL.1:OP$(1)|
000013B0: B2 22 43 45 4E 54 49 4D 45 54 52 45 53 22 00 ED |."CENTIMETRES"..|
000013C0: 1B 96 00 4F 50 24 28 32 29 B2 22 46 45 45 54 20 |...OP$(2)."FEET |
000013D0: 41 4E 44 20 49 4E 43 48 45 53 22 3A 4C 4D B2 32 |AND INCHES":LM.2|
000013E0: 3A 8D 31 31 35 3A 99 3A 4F 50 B2 43 48 00 1F 1C |:.115:.:OP.CH...|
000013F0: 97 00 48 54 B2 30 3A 99 22 11 90 20 C8 4F 57 20 |..HT.0:.".. .OW |
00001400: 54 41 4C 4C 20 41 52 45 20 59 4F 55 3F 22 3A 4C |TALL ARE YOU?":L|
00001410: 4D B2 32 34 30 3A 8B 4F 50 B2 31 A7 31 35 34 00 |M.240:.OP.1.154.|
00001420: 58 1C 98 00 99 22 11 20 1F 46 45 45 54 20 3A 20 |X....". .FEET : |
00001430: 22 3B 3A 4C 4D B2 31 30 3A 52 4B B2 32 3A 8D 33 |";:LM.10:RK.2:.3|
00001440: 36 3A 48 54 B2 43 48 AC 31 32 3A 48 54 24 B2 52 |6:HT.CH.12:HT$.R|
00001450: 4B 24 AA 22 46 54 20 22 00 85 1C 99 00 99 22 20 |K$."FT "......" |
00001460: 20 20 1F 49 4E 43 48 45 53 20 3A 22 3B 3A 4C 4D | .INCHES :";:LM|
00001470: B2 31 31 2E 39 39 3A 5A 45 B2 31 3A 44 50 B2 31 |.11.99:ZE.1:DP.1|
00001480: 3A 89 31 35 35 00 9D 1C 9A 00 99 22 11 20 28 22 |:.155......". ("|
00001490: 3B 4F 50 24 28 4F 50 29 3B 22 29 22 3B 00 D8 1C |;OP$(OP);")";...|
000014A0: 9B 00 99 22 20 22 3B 3A 52 4B B2 32 3A 8D 33 36 |..." ";:RK.2:.36|
000014B0: 3A 48 54 B2 48 54 AA 43 48 3A 48 54 24 B2 48 54 |:HT.HT.CH:HT$.HT|
000014C0: 24 AA 52 4B 24 3A 8B 4F 50 B2 31 A7 48 54 24 B2 |$.RK$:.OP.1.HT$.|
000014D0: 48 54 24 AA 22 43 4D 22 00 F4 1C 9C 00 8B 4F 50 |HT$."CM"......OP|
000014E0: B2 32 A7 48 54 24 B2 48 54 24 AA 22 49 4E 22 3A |.2.HT$.HT$."IN":|
000014F0: 89 31 35 38 00 05 1D 9D 00 48 54 B2 48 54 AC 30 |.158.....HT.HT.0|
00001500: 2E 33 39 33 37 00 33 1D 9E 00 8D 31 36 3A 99 22 |.3937.3....16:."|
00001510: 90 11 20 C4 41 54 45 3A 20 20 20 1C 22 53 44 24 |.. .ATE: ."SD$|
00001520: 3A 99 22 11 90 20 CE 41 4D 45 3A 20 20 20 1C 22 |:.".. .AME: ."|
00001530: 4E 41 24 00 60 1D 9F 00 54 53 24 B2 22 CD 41 4C |NA$.`...TS$.".AL|
00001540: 45 22 3A 8B 53 58 24 B2 22 46 22 B0 53 58 24 B2 |E":.SX$."F".SX$.|
00001550: 22 C6 22 A7 54 53 24 B2 22 C6 45 4D 41 4C 45 22 |".".TS$.".EMALE"|
00001560: 00 9C 1D A0 00 99 22 11 90 20 D3 45 58 3A 20 20 |......".. .EX: |
00001570: 20 20 1C 22 54 53 24 3A 99 22 11 90 20 C1 47 45 | ."TS$:.".. .GE|
00001580: 3A 20 20 20 1C 22 41 47 3A 99 22 90 11 20 D7 45 |: ."AG:.".. .E|
00001590: 49 47 48 54 3A 20 1C 22 53 57 24 3B 00 B8 1D A1 |IGHT: ."SW$;....|
000015A0: 00 8D 31 31 38 3A 99 22 11 90 20 C8 45 49 47 48 |..118:.".. .EIGH|
000015B0: 54 3A 20 1C 22 48 54 24 00 E4 1D A2 00 99 22 11 |T: ."HT$......".|
000015C0: 11 1F 20 C1 52 45 20 54 48 45 53 45 20 44 45 54 |.. .RE THESE DET|
000015D0: 41 49 4C 53 20 43 4F 52 52 45 43 54 3F 20 22 3B |AILS CORRECT? ";|
000015E0: 3A 8D 39 30 00 26 1E A3 00 8B 52 4B 24 B2 22 4E |:.90.&....RK$."N|
000015F0: 22 B0 52 4B 24 B2 22 CE 22 A7 53 44 24 B2 22 22 |".RK$.".".SD$.""|
00001600: 3A 4E 41 24 B2 22 22 3A 53 58 24 B2 22 22 3A 41 |:NA$."":SX$."":A|
00001610: 47 B2 30 3A 53 57 24 B2 22 22 3A 48 54 24 B2 22 |G.0:SW$."":HT$."|
00001620: 22 3A 89 31 33 34 00 4F 1E A4 00 58 B2 35 37 3A |":.134.O...X.57:|
00001630: 54 B2 32 31 3A 8B 53 58 24 B2 22 46 22 B0 53 58 |T.21:.SX$."F".SX|
00001640: 24 B2 22 C6 22 A7 58 B2 35 33 3A 54 B2 32 32 00 |$.".".X.53:T.22.|
00001650: 6B 1E A5 00 41 B2 B5 28 48 54 29 AB 58 3A 8B 41 |k...A..(HT).X:.A|
00001660: B1 30 AF 41 B3 B2 54 A7 31 37 34 00 7C 1E A6 00 |.0.A..T.174.|...|
00001670: 54 53 24 B2 22 48 45 49 47 48 54 22 00 C4 1E A7 |TS$."HEIGHT"....|
00001680: 00 8D 31 36 3A 99 22 11 11 1F 20 D3 4F 52 52 59 |..16:."... .ORRY|
00001690: 20 2D 20 57 45 20 48 41 56 45 20 4E 4F 20 46 49 | - WE HAVE NO FI|
000016A0: 47 55 52 45 53 20 41 56 41 49 4C 41 42 4C 45 20 |GURES AVAILABLE |
000016B0: 20 20 11 20 46 4F 52 20 59 4F 55 52 20 22 54 53 | . FOR YOUR "TS|
000016C0: 24 22 2E 22 00 D3 1E A8 00 8B 41 47 B1 31 37 A7 |$"."......AG.17.|
000016D0: 31 37 31 00 01 1F A9 00 99 22 11 20 C1 54 20 59 |171......". .T Y|
000016E0: 4F 55 52 20 41 47 45 2C 20 59 4F 55 20 53 48 4F |OUR AGE, YOU SHO|
000016F0: 55 4C 44 20 4E 4F 54 20 43 4F 4E 53 49 44 45 52 |ULD NOT CONSIDER|
00001700: 22 00 41 1F AA 00 99 22 11 20 4C 4F 53 49 4E 47 |".A....". LOSING|
00001710: 20 57 45 49 47 48 54 20 55 4E 4C 45 53 53 20 59 | WEIGHT UNLESS Y|
00001720: 4F 55 52 20 44 4F 43 54 4F 52 20 48 41 53 20 20 |OUR DOCTOR HAS |
00001730: 20 11 20 53 55 47 47 45 53 54 45 44 20 49 54 2E | . SUGGESTED IT.|
00001740: 22 00 73 1F AB 00 99 22 11 11 20 C9 46 20 59 4F |".s....".. .F YO|
00001750: 55 20 52 45 41 4C 4C 59 20 54 48 49 4E 4B 20 59 |U REALLY THINK Y|
00001760: 4F 55 20 41 52 45 20 4F 56 45 52 57 45 49 47 48 |OU ARE OVERWEIGH|
00001770: 54 2C 22 00 99 1F AC 00 99 22 20 41 53 4B 20 59 |T,"......" ASK Y|
00001780: 4F 55 52 20 44 4F 43 54 4F 52 20 54 4F 20 53 55 |OUR DOCTOR TO SU|
00001790: 47 47 45 53 54 20 41 4E 22 00 CE 1F AD 00 99 22 |GGEST AN"......"|
000017A0: 11 20 41 50 50 52 4F 50 52 49 41 54 45 20 44 49 |. APPROPRIATE DI|
000017B0: 45 54 2D 50 4C 41 4E 20 54 4F 20 53 55 49 54 20 |ET-PLAN TO SUIT |
000017C0: 59 4F 55 2E 22 3A 8D 31 32 3A 89 31 32 33 00 F2 |YOU.":.12:.123..|
000017D0: 1F AE 00 8B 53 58 24 B2 22 46 22 B0 53 58 24 B2 |....SX$."F".SX$.|
000017E0: 22 C6 22 A7 81 49 B2 31 A4 31 38 39 3A 87 41 3A |"."..I.1.189:.A:|
000017F0: 82 49 00 1F 20 AF 00 81 49 B2 31 A4 54 3A 81 4A |.I.. ...I.1.T:.J|
00001800: B2 31 A4 33 3A 81 4B B2 31 A4 33 3A 87 49 57 28 |.1.3:.K.1.3:.IW(|
00001810: 49 2C 4A 2C 4B 29 3A 82 4B 3A 82 4A 3A 82 49 00 |I,J,K):.K:.J:.I.|
00001820: 58 20 B0 00 41 B2 48 54 AB 58 3A 59 24 B2 53 57 |X ..A.HT.X:Y$.SW|
00001830: 24 3A 8D 31 30 34 3A 57 54 B2 59 3A 41 52 B2 33 |$:.104:WT.Y:AR.3|
00001840: 3A 8B 41 47 B3 33 35 A7 41 52 B2 32 3A 8B 41 47 |:.AG.35.AR.2:.AG|
00001850: B3 32 35 A7 41 52 B2 31 00 A2 20 B1 00 57 54 28 |.25.AR.1.. ..WT(|
00001860: 32 29 B2 49 57 28 41 2C 41 52 2C 31 29 3A 57 54 |2).IW(A,AR,1):WT|
00001870: 28 33 29 B2 49 57 28 41 2C 41 52 2C 32 29 3A 57 |(3).IW(A,AR,2):W|
00001880: 54 28 35 29 B2 49 57 28 41 2C 41 52 2C 33 29 3A |T(5).IW(A,AR,3):|
00001890: 58 B2 57 54 28 32 29 3A 8D 39 37 3A 41 31 24 B2 |X.WT(2):.97:A1$.|
000018A0: 59 24 00 CC 20 B2 00 58 B2 57 54 28 33 29 3A 8D |Y$.. ..X.WT(3):.|
000018B0: 39 37 3A 42 31 24 B2 59 24 3A 58 B2 57 54 28 35 |97:B1$.Y$:X.WT(5|
000018C0: 29 3A 8D 39 37 3A 43 31 24 B2 59 24 00 08 21 B3 |):.97:C1$.Y$..!.|
000018D0: 00 8D 31 36 3A 99 22 11 1F 92 20 D9 4F 55 52 20 |..16:."... .OUR |
000018E0: 57 45 49 47 48 54 20 49 53 20 1C 22 53 57 24 3B |WEIGHT IS ."SW$;|
000018F0: 3A 8D 31 31 38 3A 99 22 1F 11 20 D9 4F 55 52 20 |:.118:.".. .OUR |
00001900: 49 44 45 41 4C 20 22 3B 00 3C 21 B4 00 99 22 57 |IDEAL ";.<!..."W|
00001910: 45 49 47 48 54 20 53 48 4F 55 4C 44 20 42 45 20 |EIGHT SHOULD BE |
00001920: 42 45 54 57 45 45 4E 11 22 3A 48 24 B2 41 31 24 |BETWEEN.":H$.A1$|
00001930: AA 22 20 41 4E 44 20 22 AA 43 31 24 00 55 21 B5 |." AND ".C1$.U!.|
00001940: 00 8B 57 4D B3 B1 32 A7 48 24 B2 48 24 AA 22 20 |..WM..2.H$.H$." |
00001950: 22 AA 57 4D 24 00 6C 21 B6 00 8D 31 37 3A 8B 57 |".WM$.l!...17:.W|
00001960: 54 B1 B2 57 54 28 32 29 A7 31 38 37 00 9E 21 B7 |T..WT(2).187..!.|
00001970: 00 99 22 92 1F 11 20 D9 4F 55 20 53 48 4F 55 4C |.."... .OU SHOUL|
00001980: 44 20 4E 4F 54 20 42 45 20 4C 49 47 48 54 45 52 |D NOT BE LIGHTER|
00001990: 20 54 48 41 4E 20 59 4F 55 20 41 52 45 22 00 CA | THAN YOU ARE"..|
000019A0: 21 B8 00 99 22 11 20 41 54 20 54 48 45 20 4D 4F |!...". AT THE MO|
000019B0: 4D 45 4E 54 20 2D 20 49 4E 20 46 41 43 54 20 59 |MENT - IN FACT Y|
000019C0: 4F 55 20 53 48 4F 55 4C 44 22 00 F1 21 B9 00 99 |OU SHOULD"..!...|
000019D0: 22 11 20 43 4F 4E 53 49 44 45 52 20 47 41 49 4E |". CONSIDER GAIN|
000019E0: 49 4E 47 20 53 4F 4D 45 20 57 45 49 47 48 54 21 |ING SOME WEIGHT!|
000019F0: 22 00 2B 22 BA 00 99 22 11 20 D9 4F 55 20 43 45 |".+"...". .OU CE|
00001A00: 52 54 41 49 4E 4C 59 20 44 4F 4E 27 54 20 4E 45 |RTAINLY DON'T NE|
00001A10: 45 44 20 54 48 49 53 20 50 52 4F 47 52 41 4D 2E |ED THIS PROGRAM.|
00001A20: 22 3A 57 4C B2 31 3A 89 32 30 35 00 3F 22 BB 00 |":WL.1:.205.?"..|
00001A30: 8B 57 54 B1 57 54 28 33 29 AA 31 A7 31 39 30 00 |.WT.WT(3).1.190.|
00001A40: 6F 22 BC 00 99 22 92 1F 11 20 D2 45 4C 41 58 21 |o"..."... .ELAX!|
00001A50: 20 D9 4F 55 52 20 57 45 49 47 48 54 20 49 53 20 | .OUR WEIGHT IS |
00001A60: 49 44 45 41 4C 2E 20 D5 53 45 20 54 48 45 22 00 |IDEAL. .SE THE".|
00001A70: A6 22 BD 00 99 22 11 20 50 52 4F 47 52 41 4D 20 |."...". PROGRAM |
00001A80: 54 4F 20 4B 45 45 50 20 59 4F 55 52 20 57 45 49 |TO KEEP YOUR WEI|
00001A90: 47 48 54 20 53 54 45 41 44 59 2E 22 3A 57 4C B2 |GHT STEADY.":WL.|
00001AA0: 32 3A 89 32 30 35 00 B8 22 BE 00 8B 57 54 B1 57 |2:.205.."...WT.W|
00001AB0: 54 28 35 29 A7 31 39 35 00 EA 22 BF 00 99 22 92 |T(5).195.."...".|
00001AC0: 1F 11 20 D9 4F 55 20 41 52 45 20 49 4E 20 54 48 |.. .OU ARE IN TH|
00001AD0: 45 20 48 41 50 50 59 20 50 4F 53 49 54 49 4F 4E |E HAPPY POSITION|
00001AE0: 20 4F 46 20 42 45 49 4E 47 22 00 19 23 C0 00 99 | OF BEING"..#...|
00001AF0: 22 11 20 41 42 4C 45 20 54 4F 20 44 45 43 49 44 |". ABLE TO DECID|
00001B00: 45 20 46 4F 52 20 59 4F 55 53 45 4C 46 20 57 48 |E FOR YOUSELF WH|
00001B10: 45 54 48 45 52 20 4F 52 22 00 4A 23 C1 00 99 22 |ETHER OR".J#..."|
00001B20: 11 20 4E 4F 54 20 59 4F 55 20 57 41 4E 54 20 54 |. NOT YOU WANT T|
00001B30: 4F 20 4C 4F 53 45 20 57 45 49 47 48 54 2E 20 C9 |O LOSE WEIGHT. .|
00001B40: 46 20 59 4F 55 20 41 52 45 22 00 81 23 C2 00 99 |F YOU ARE"..#...|
00001B50: 22 20 48 41 50 50 59 20 41 4E 44 20 48 45 41 4C |" HAPPY AND HEAL|
00001B60: 54 48 59 20 2D 20 53 54 41 59 20 41 53 20 59 4F |THY - STAY AS YO|
00001B70: 55 20 41 52 45 2E 22 3A 57 4C B2 33 3A 89 32 30 |U ARE.":WL.3:.20|
00001B80: 35 00 AC 23 C3 00 57 4C B2 35 3A 8B 57 54 B3 57 |5..#..WL.5:.WT.W|
00001B90: 54 28 35 29 AA 28 57 54 28 35 29 AB 57 54 28 33 |T(5).(WT(5).WT(3|
00001BA0: 29 29 A7 57 4C B2 34 3A 89 32 30 31 00 DA 23 C4 |)).WL.4:.201..#.|
00001BB0: 00 99 22 1F 11 92 20 D9 4F 55 20 41 52 45 20 4F |.."... .OU ARE O|
00001BC0: 42 56 49 4F 55 53 4C 59 20 56 45 52 59 20 4F 56 |BVIOUSLY VERY OV|
00001BD0: 45 52 57 45 49 47 48 54 2E 22 00 09 24 C5 00 99 |ERWEIGHT."..$...|
00001BE0: 22 11 20 C9 46 20 59 4F 55 20 48 41 56 45 4E 27 |". .F YOU HAVEN'|
00001BF0: 54 20 44 4F 4E 45 20 53 4F 20 41 4C 52 45 41 44 |T DONE SO ALREAD|
00001C00: 59 2C 20 56 49 53 49 54 22 00 37 24 C6 00 99 22 |Y, VISIT".7$..."|
00001C10: 11 20 59 4F 55 52 20 44 4F 43 54 4F 52 20 2D 20 |. YOUR DOCTOR - |
00001C20: 54 48 45 52 45 20 4D 41 59 20 42 45 20 53 4F 4D |THERE MAY BE SOM|
00001C30: 45 20 4E 45 45 44 22 00 65 24 C7 00 99 22 11 20 |E NEED".e$...". |
00001C40: 46 4F 52 20 4D 45 44 49 43 41 4C 20 54 52 45 41 |FOR MEDICAL TREA|
00001C50: 54 4D 45 4E 54 20 49 4E 20 41 44 44 49 54 49 4F |TMENT IN ADDITIO|
00001C60: 4E 20 54 4F 22 00 98 24 C8 00 99 22 11 20 54 48 |N TO"..$...". TH|
00001C70: 49 53 20 D7 45 49 47 48 54 20 C3 4F 4E 54 52 4F |IS .EIGHT .ONTRO|
00001C80: 4C 20 D0 52 4F 47 52 41 4D 2E 22 3A 8D 31 32 3A |L .ROGRAM.":.12:|
00001C90: 8D 31 36 3A 89 32 30 32 00 C9 24 C9 00 99 22 1F |.16:.202..$...".|
00001CA0: 92 11 20 D9 45 53 2C 20 59 4F 55 20 50 52 4F 42 |.. .ES, YOU PROB|
00001CB0: 41 42 4C 59 20 53 48 4F 55 4C 44 20 4C 4F 53 45 |ABLY SHOULD LOSE|
00001CC0: 20 57 45 49 47 48 54 2E 22 00 F9 24 CA 00 99 22 | WEIGHT."..$..."|
00001CD0: 11 20 D4 48 45 20 42 45 53 54 20 57 41 59 20 54 |. .HE BEST WAY T|
00001CE0: 4F 20 4C 4F 53 45 20 57 45 49 47 48 54 20 2D 20 |O LOSE WEIGHT - |
00001CF0: 41 4E 44 20 4B 45 45 50 22 00 28 25 CB 00 99 22 |AND KEEP".(%..."|
00001D00: 11 20 49 54 20 4F 46 46 21 20 2D 20 49 53 20 54 |. IT OFF! - IS T|
00001D10: 4F 20 4C 4F 53 45 20 49 54 20 53 4C 4F 57 4C 59 |O LOSE IT SLOWLY|
00001D20: 20 4F 56 45 52 20 41 22 00 41 25 CC 00 99 22 11 | OVER A".A%...".|
00001D30: 20 50 45 52 49 4F 44 20 4F 46 20 54 49 4D 45 2E | PERIOD OF TIME.|
00001D40: 22 00 79 25 CD 00 8D 31 32 3A 8D 31 36 3A 99 22 |".y%...12:.16:."|
00001D50: 11 1F 20 CE 4F 20 4D 41 54 54 45 52 20 57 48 41 |.. .O MATTER WHA|
00001D60: 54 20 59 4F 55 52 20 57 45 49 47 48 54 2C 20 59 |T YOUR WEIGHT, Y|
00001D70: 4F 55 20 57 4F 55 4C 44 22 00 B8 25 CE 00 99 22 |OU WOULD"..%..."|
00001D80: 11 20 42 45 20 53 55 52 45 20 54 4F 20 42 45 4E |. BE SURE TO BEN|
00001D90: 45 46 49 54 20 46 52 4F 4D 20 41 4E 20 49 4E 43 |EFIT FROM AN INC|
00001DA0: 52 45 41 53 45 20 20 20 20 11 20 49 4E 20 45 58 |REASE . IN EX|
00001DB0: 45 52 43 49 53 45 2E 22 00 E7 25 CF 00 99 22 11 |ERCISE."..%...".|
00001DC0: 20 D4 48 49 53 20 57 49 4C 4C 20 49 4D 50 52 4F | .HIS WILL IMPRO|
00001DD0: 56 45 20 59 4F 55 52 20 4D 45 54 41 42 4F 4C 49 |VE YOUR METABOLI|
00001DE0: 43 20 52 41 54 45 22 00 15 26 D0 00 99 22 11 20 |C RATE"..&...". |
00001DF0: 41 4E 44 20 54 4F 4E 45 20 55 50 20 59 4F 55 52 |AND TONE UP YOUR|
00001E00: 20 4D 55 53 43 4C 45 53 2C 20 57 48 49 43 48 20 | MUSCLES, WHICH |
00001E10: 57 49 4C 4C 22 00 53 26 D1 00 99 22 11 20 4D 41 |WILL".S&...". MA|
00001E20: 4B 45 20 59 4F 55 20 4C 4F 4F 4B 20 53 4C 49 4D |KE YOU LOOK SLIM|
00001E30: 4D 45 52 20 41 4E 44 20 46 45 45 4C 20 46 49 54 |MER AND FEEL FIT|
00001E40: 54 45 52 2E 22 3A 8D 31 32 3A 8B 57 4C B3 34 A7 |TER.":.12:.WL.4.|
00001E50: 32 31 36 00 8E 26 D2 00 8D 31 36 3A 99 22 11 1C |216..&...16:."..|
00001E60: 20 D7 C1 D2 CE C9 CE C7 22 3A 99 22 1F 11 20 C9 | .......":.".. .|
00001E70: 46 20 59 4F 55 20 41 52 45 20 4E 4F 54 20 55 53 |F YOU ARE NOT US|
00001E80: 45 44 20 54 4F 20 52 45 47 55 4C 41 52 22 00 BD |ED TO REGULAR"..|
00001E90: 26 D3 00 99 22 11 20 45 58 45 52 43 49 53 45 2C |&...". EXERCISE,|
00001EA0: 20 54 41 4B 45 20 49 54 20 45 41 53 59 20 54 4F | TAKE IT EASY TO|
00001EB0: 20 42 45 47 49 4E 20 57 49 54 48 2E 22 00 E9 26 | BEGIN WITH."..&|
00001EC0: D4 00 99 22 11 20 D2 45 4D 45 4D 42 45 52 2C 20 |...". .EMEMBER, |
00001ED0: 42 45 43 41 55 53 45 20 59 4F 55 20 41 52 45 20 |BECAUSE YOU ARE |
00001EE0: 43 41 52 52 59 49 4E 47 22 00 18 27 D5 00 99 22 |CARRYING"..'..."|
00001EF0: 11 20 45 58 54 52 41 20 57 45 49 47 48 54 2C 20 |. EXTRA WEIGHT, |
00001F00: 59 4F 55 20 57 49 4C 4C 20 55 53 45 20 41 20 4C |YOU WILL USE A L|
00001F10: 4F 54 20 4D 4F 52 45 22 00 44 27 D6 00 99 22 11 |OT MORE".D'...".|
00001F20: 20 43 41 4C 4F 52 49 45 53 20 54 48 41 4E 20 4D | CALORIES THAN M|
00001F30: 4F 53 54 20 50 45 4F 50 4C 45 20 49 4E 20 44 4F |OST PEOPLE IN DO|
00001F40: 49 4E 47 22 00 66 27 D7 00 99 22 11 20 45 56 45 |ING".f'...". EVE|
00001F50: 4E 20 4C 49 47 48 54 20 45 58 45 52 43 49 53 45 |N LIGHT EXERCISE|
00001F60: 2E 22 3A 8D 31 32 00 74 27 D8 00 8B 57 4C B2 31 |.":.12.t'...WL.1|
00001F70: A7 31 32 33 00 98 27 D9 00 8B 57 4C B2 32 A7 57 |.123..'...WL.2.W|
00001F80: 54 28 31 29 B2 30 3A 57 54 28 34 29 B2 30 3A 54 |T(1).0:WT(4).0:T|
00001F90: 44 B2 30 3A 89 32 34 35 00 D1 27 DA 00 57 54 28 |D.0:.245..'..WT(|
00001FA0: 31 29 B2 57 54 28 33 29 3A 8B B6 28 57 54 AB 57 |1).WT(3):..(WT.W|
00001FB0: 54 28 31 29 29 B3 31 A7 57 54 28 31 29 B2 30 3A |T(1)).1.WT(1).0:|
00001FC0: 57 54 28 34 29 B2 30 3A 54 44 B2 30 3A 89 32 34 |WT(4).0:TD.0:.24|
00001FD0: 35 00 D9 27 DB 00 8D 31 36 00 14 28 DC 00 8B 57 |5..'...16..(...W|
00001FE0: 4C B2 33 AF 54 53 B2 30 A7 99 22 11 90 20 A4 A4 |L.3.TS.0..".. ..|
00001FF0: A4 A4 A4 A4 A4 A4 22 3A 99 22 20 12 CF D0 D4 C9 |......":." .....|
00002000: CF CE C1 CC 92 22 3A 99 22 90 20 A3 A3 A3 A3 A3 |.....":.". .....|
00002010: A3 A3 A3 22 00 47 28 DD 00 99 22 11 90 20 D4 41 |...".G(...".. .A|
00002020: 52 47 45 54 20 57 45 49 47 48 54 20 3A 20 1C 22 |RGET WEIGHT : ."|
00002030: 3B 3A 58 B2 57 54 28 31 29 3A 8D 39 37 3A 99 59 |;:X.WT(1):.97:.Y|
00002040: 24 3B 3A 8D 31 31 38 00 58 28 DE 00 8B 54 53 B2 |$;:.118.X(...TS.|
00002050: 34 AF 54 44 B1 30 A7 8E 00 66 28 DF 00 8B 54 53 |4.TD.0...f(...TS|
00002060: B2 34 A7 32 32 38 00 A2 28 E0 00 99 3A 99 22 1F |.4.228..(...:.".|
00002070: 20 D4 4F 20 41 43 48 49 45 56 45 20 54 48 49 53 | .O ACHIEVE THIS|
00002080: 2C 20 59 4F 55 20 4E 45 45 44 20 54 4F 20 4C 4F |, YOU NEED TO LO|
00002090: 53 45 22 3A 58 B2 57 54 AB 57 54 28 31 29 3A 8D |SE":X.WT.WT(1):.|
000020A0: 39 37 00 C9 28 E1 00 99 22 11 20 90 22 59 24 3B |97..(...". ."Y$;|
000020B0: 3A 8B 57 4D B3 B1 32 A7 58 B2 C5 28 59 24 29 3A |:.WM..2.X..(Y$):|
000020C0: 8D 31 32 30 3A 99 48 24 3B 00 D7 28 E2 00 8B 54 |.120:.H$;..(...T|
000020D0: 53 B2 33 A7 32 32 38 00 0C 29 E3 00 57 54 28 34 |S.3.228..)..WT(4|
000020E0: 29 B2 30 2E 35 3A 52 4C 24 B2 22 30 2E 35 20 50 |).0.5:RL$."0.5 P|
000020F0: 4F 55 4E 44 53 22 3A 8B 57 4D B2 31 A7 52 4C 24 |OUNDS":.WM.1.RL$|
00002100: B2 22 30 2E 32 20 4B 49 4C 4F 53 22 00 35 29 E4 |."0.2 KILOS".5).|
00002110: 00 99 3A 99 22 11 1F 20 C1 54 20 41 20 52 41 54 |..:.".. .T A RAT|
00002120: 45 20 4F 46 20 22 52 4C 24 22 20 50 45 52 20 57 |E OF "RL$" PER W|
00002130: 45 45 4B 2C 22 00 6C 29 E5 00 99 22 11 20 59 4F |EEK,".l)...". YO|
00002140: 55 20 53 48 4F 55 4C 44 20 41 43 48 49 45 56 45 |U SHOULD ACHIEVE|
00002150: 20 59 4F 55 52 20 54 41 52 47 45 54 20 57 45 49 | YOUR TARGET WEI|
00002160: 47 48 54 20 20 11 20 42 59 20 22 3B 00 B1 29 E6 |GHT . BY ";..).|
00002170: 00 58 B2 57 54 AB 57 54 28 31 29 3A 54 B2 57 54 |.X.WT.WT(1):T.WT|
00002180: 28 34 29 3A 57 4B B2 B5 28 28 58 AD 54 29 AA 30 |(4):WK..((X.T).0|
00002190: 2E 39 29 3A 44 59 B2 B5 28 57 4B AC 37 29 3A 54 |.9):DY..(WK.7):T|
000021A0: 44 B2 44 59 3A 8B 54 44 B1 31 38 32 A7 57 4C B2 |D.DY:.TD.182.WL.|
000021B0: 35 00 E4 29 E7 00 4E 44 B2 30 3A 41 24 B2 CA 28 |5..)..ND.0:A$..(|
000021C0: 53 44 24 2C 34 2C 32 29 3A 59 52 B2 C5 28 C9 28 |SD$,4,2):YR..(.(|
000021D0: 53 44 24 2C 32 29 29 3A 8B 41 24 B2 22 30 31 22 |SD$,2)):.A$."01"|
000021E0: A7 32 33 33 00 1E 2A E8 00 5A B2 C5 28 41 24 29 |.233..*..Z..(A$)|
000021F0: 3A 81 49 B2 31 A4 5A AB 31 3A 4E 44 B2 4E 44 AA |:.I.1.Z.1:ND.ND.|
00002200: A5 42 28 49 29 3A 82 49 3A 8B 5A B1 32 AF A5 4C |.B(I):.I:.Z.2..L|
00002210: 28 59 52 29 B2 30 A7 4E 44 B2 4E 44 AB 31 00 50 |(YR).0.ND.ND.1.P|
00002220: 2A E9 00 4E 44 B2 4E 44 AA C5 28 C8 28 53 44 24 |*..ND.ND..(.(SD$|
00002230: 2C 32 29 29 3A 44 59 B2 44 59 AA 4E 44 3A 49 B2 |,2)):DY.DY.ND:I.|
00002240: 30 3A 59 52 B2 C5 28 C9 28 53 44 24 2C 32 29 29 |0:YR..(.(SD$,2))|
00002250: 00 84 2A EA 00 49 B2 49 AA 31 3A 8B 44 59 B3 B2 |..*..I.I.1:.DY..|
00002260: A5 42 28 49 29 A7 41 24 B2 C4 28 44 59 29 3A 42 |.B(I).A$..(DY):B|
00002270: 24 B2 C4 28 49 29 3A 43 24 B2 C4 28 59 52 29 3A |$..(I):C$..(YR):|
00002280: 89 32 33 38 00 A4 2A EB 00 8B 49 B2 32 AF A5 4C |.238..*...I.2..L|
00002290: 28 59 52 29 B2 30 A7 44 59 B2 44 59 AB 32 38 3A |(YR).0.DY.DY.28:|
000022A0: 89 32 33 37 00 D4 2A EC 00 44 59 B2 44 59 AB A5 |.237..*..DY.DY..|
000022B0: 42 28 49 29 3A 8B 49 B2 31 32 A7 49 B2 30 3A 59 |B(I):.I.12.I.0:Y|
000022C0: 52 B2 59 52 AA 31 3A 8B 59 52 B2 31 30 30 A7 59 |R.YR.1:.YR.100.Y|
000022D0: 52 B2 30 30 00 DD 2A ED 00 89 32 33 34 00 00 2B |R.00..*...234..+|
000022E0: EE 00 41 24 B2 CA 28 41 24 2C 32 29 3A 8B C5 28 |..A$..(A$,2):..(|
000022F0: 41 24 29 B3 31 30 A7 41 24 B2 22 30 22 AA 41 24 |A$).10.A$."0".A$|
00002300: 00 23 2B EF 00 42 24 B2 CA 28 42 24 2C 32 29 3A |.#+..B$..(B$,2):|
00002310: 8B C5 28 42 24 29 B3 31 30 A7 42 24 B2 22 30 22 |..(B$).10.B$."0"|
00002320: AA 42 24 00 46 2B F0 00 43 24 B2 CA 28 43 24 2C |.B$.F+..C$..(C$,|
00002330: 32 29 3A 8B C5 28 43 24 29 B3 31 30 A7 43 24 B2 |2):..(C$).10.C$.|
00002340: 22 30 22 AA 43 24 00 6C 2B F1 00 41 24 B2 41 24 |"0".C$.l+..A$.A$|
00002350: AA 22 2F 22 AA 42 24 AA 22 2F 22 AA 43 24 3A 8B |."/".B$."/".C$:.|
00002360: 45 4E B2 31 AF 57 4C B3 B1 35 A7 8E 00 7F 2B F2 |EN.1.WL..5....+.|
00002370: 00 54 44 24 B2 41 24 3A 8B 45 4E B2 31 A7 8E 00 |.TD$.A$:.EN.1...|
00002380: 93 2B F3 00 99 22 90 22 54 44 24 3A 8B 54 53 B2 |.+..."."TD$:.TS.|
00002390: 34 A7 8E 00 9B 2B F4 00 8D 31 32 00 AA 2B F5 00 |4....+...12..+..|
000023A0: 8B 54 53 B1 30 A7 8D 32 37 35 00 B8 2B F6 00 8B |.TS.0..275..+...|
000023B0: 44 B3 B1 34 A7 8D 31 36 00 DF 2B F7 00 99 22 11 |D..4..16..+...".|
000023C0: 90 20 D9 4F 55 52 20 D7 45 49 47 48 54 20 3A 20 |. .OUR .EIGHT : |
000023D0: 20 20 20 1C 22 3B 53 57 24 3B 3A 8D 31 31 38 00 | .";SW$;:.118.|
000023E0: 0A 2C F8 00 99 22 11 90 20 D4 41 52 47 45 54 20 |.,...".. .ARGET |
000023F0: D7 45 49 47 48 54 20 3A 20 20 1C 22 3B 3A 8B 57 |.EIGHT : .";:.W|
00002400: 54 28 31 29 B1 30 A7 32 35 31 00 4A 2C F9 00 99 |T(1).0.251.J,...|
00002410: 22 CE 4F 4E 45 22 3A 54 53 B2 31 3A 8B 57 4C B2 |".ONE":TS.1:.WL.|
00002420: 32 A7 99 22 11 1F 20 D9 4F 55 52 20 50 52 45 53 |2..".. .OUR PRES|
00002430: 45 4E 54 20 57 45 49 47 48 54 20 49 53 20 49 44 |ENT WEIGHT IS ID|
00002440: 45 41 4C 2E 22 3A 89 32 35 33 00 90 2C FA 00 99 |EAL.":.253..,...|
00002450: 22 11 1F 20 D9 4F 55 20 48 41 56 45 20 43 48 4F |".. .OU HAVE CHO|
00002460: 53 45 4E 20 54 4F 20 53 54 41 59 20 41 53 20 59 |SEN TO STAY AS Y|
00002470: 4F 55 20 41 52 45 2E 20 20 20 20 11 20 C7 4F 4F |OU ARE. . .OO|
00002480: 44 20 46 4F 52 20 59 4F 55 21 22 3A 89 32 35 33 |D FOR YOU!":.253|
00002490: 00 D1 2C FB 00 58 B2 57 54 28 31 29 3A 8D 39 37 |..,..X.WT(1):.97|
000024A0: 3A 99 59 24 3B 3A 8D 31 31 38 3A 99 22 11 90 20 |:.Y$;:.118:.".. |
000024B0: D2 41 54 45 20 4F 46 20 CC 4F 53 53 20 3A 20 20 |.ATE OF .OSS : |
000024C0: 20 1C 22 52 4C 24 22 20 50 45 52 20 57 45 45 4B | ."RL$" PER WEEK|
000024D0: 22 00 F1 2C FC 00 99 22 90 11 20 D4 41 52 47 45 |"..,...".. .ARGE|
000024E0: 54 20 C4 41 54 45 20 3A 20 20 20 20 1C 22 54 44 |T .ATE : ."TD|
000024F0: 24 00 02 2D FD 00 54 53 B2 30 3A 8B 45 4E B2 31 |$..-..TS.0:.EN.1|
00002500: A7 8E 00 3F 2D FE 00 54 53 24 28 31 29 B2 22 41 |...?-..TS$(1)."A|
00002510: 4E 59 20 4F 46 20 54 48 45 53 45 20 46 49 47 55 |NY OF THESE FIGU|
00002520: 52 45 53 22 3A 54 53 24 28 32 29 B2 22 54 48 45 |RES":TS$(2)."THE|
00002530: 20 54 41 52 47 45 54 20 57 45 49 47 48 54 22 00 | TARGET WEIGHT".|
00002540: 76 2D FF 00 54 53 24 28 33 29 B2 22 54 48 45 20 |v-..TS$(3)."THE |
00002550: 52 41 54 45 20 4F 46 20 4C 4F 53 53 22 3A 54 53 |RATE OF LOSS":TS|
00002560: 24 28 34 29 B2 22 54 48 45 20 54 41 52 47 45 54 |$(4)."THE TARGET|
00002570: 20 44 41 54 45 22 00 92 2D 00 01 54 53 B2 54 53 | DATE"..-..TS.TS|
00002580: AA 31 3A 8B 54 53 B1 34 A7 8D 32 37 35 3A 89 32 |.1:.TS.4..275:.2|
00002590: 36 34 00 CB 2D 01 01 57 57 B2 30 3A 52 31 B2 31 |64..-..WW.0:R1.1|
000025A0: 35 3A 8D 38 3A 52 B2 31 35 3A 43 B2 30 3A 8D 39 |5:.8:R.15:C.0:.9|
000025B0: 3A 99 22 1F 20 C4 4F 20 59 4F 55 20 57 41 4E 54 |:.". .O YOU WANT|
000025C0: 20 54 4F 20 43 48 41 4E 47 45 22 00 FA 2D 02 01 | TO CHANGE"..-..|
000025D0: 99 22 11 20 22 54 53 24 28 54 53 29 22 3F 20 22 |.". "TS$(TS)"? "|
000025E0: 3B 3A 8D 39 30 3A 8B 52 4B 24 B2 22 4E 22 B0 52 |;:.90:.RK$."N".R|
000025F0: 4B 24 B2 22 CE 22 A7 32 36 31 00 08 2E 03 01 8B |K$.".".261......|
00002600: 54 53 B2 31 A7 32 35 36 00 11 2E 04 01 89 33 31 |TS.1.256......31|
00002610: 32 00 20 2E 05 01 8B 54 53 B2 31 A7 54 53 B2 34 |2. ....TS.1.TS.4|
00002620: 00 37 2E 06 01 8B 54 53 B2 32 AF 57 54 28 34 29 |.7....TS.2.WT(4)|
00002630: B2 30 A7 54 53 B2 34 00 40 2E 07 01 89 32 35 36 |.0.TS.4.@....256|
00002640: 00 50 2E 08 01 8B 54 44 B3 31 38 33 A7 32 38 37 |.P....TD.183.287|
00002650: 00 8E 2E 09 01 8D 31 36 3A 4E 41 24 B2 22 2A 22 |......16:NA$."*"|
00002660: AA 4E 41 24 3A 99 22 11 1F 20 D9 4F 55 20 57 49 |.NA$:.".. .OU WI|
00002670: 4C 4C 20 46 49 4E 44 20 49 54 20 45 41 53 49 45 |LL FIND IT EASIE|
00002680: 52 20 54 4F 20 53 54 49 43 4B 20 54 4F 22 00 B8 |R TO STICK TO"..|
00002690: 2E 0A 01 99 22 11 20 54 48 45 20 50 52 4F 47 52 |....". THE PROGR|
000026A0: 41 4D 4D 45 20 49 46 20 59 4F 55 20 48 41 56 45 |AMME IF YOU HAVE|
000026B0: 20 41 20 4D 4F 52 45 22 00 E6 2E 0B 01 99 22 11 | A MORE"......".|
000026C0: 20 49 4D 4D 45 44 49 41 54 45 20 54 41 52 47 45 | IMMEDIATE TARGE|
000026D0: 54 2E 20 D4 48 45 20 49 4E 49 54 49 41 4C 20 54 |T. .HE INITIAL T|
000026E0: 41 52 47 45 54 22 00 10 2F 0C 01 99 22 11 20 57 |ARGET"../...". W|
000026F0: 45 49 47 48 54 20 49 53 20 54 48 45 52 45 46 4F |EIGHT IS THEREFO|
00002700: 52 45 20 47 49 56 45 4E 20 41 53 20 54 48 45 22 |RE GIVEN AS THE"|
00002710: 00 3E 2F 0D 01 99 22 11 20 45 58 50 45 43 54 45 |.>/...". EXPECTE|
00002720: 44 20 57 45 49 47 48 54 20 41 46 54 45 52 20 53 |D WEIGHT AFTER S|
00002730: 49 58 20 4D 4F 4E 54 48 53 2C 20 41 54 22 00 6D |IX MONTHS, AT".m|
00002740: 2F 0E 01 99 22 11 20 59 4F 55 52 20 43 48 4F 53 |/...". YOUR CHOS|
00002750: 45 4E 20 52 41 54 45 20 4F 46 20 4C 4F 53 53 2E |EN RATE OF LOSS.|
00002760: 20 C9 46 20 59 4F 55 20 57 41 4E 54 22 00 9D 2F | .F YOU WANT"../|
00002770: 0F 01 99 22 11 20 54 4F 20 4C 4F 53 45 20 53 54 |...". TO LOSE ST|
00002780: 49 4C 4C 20 4D 4F 52 45 20 57 45 49 47 48 54 2C |ILL MORE WEIGHT,|
00002790: 20 55 53 45 20 D0 52 4F 47 52 41 4D 22 00 D7 2F | USE .ROGRAM"../|
000027A0: 10 01 99 22 11 20 31 20 54 4F 20 53 45 54 20 55 |...". 1 TO SET U|
000027B0: 50 20 41 4E 4F 54 48 45 52 20 50 4C 41 4E 20 41 |P ANOTHER PLAN A|
000027C0: 46 54 45 52 20 53 49 58 20 20 20 20 20 11 20 4D |FTER SIX . M|
000027D0: 4F 4E 54 48 53 2E 22 00 02 30 11 01 8D 31 32 3A |ONTHS."..0...12:|
000027E0: 8D 31 36 3A 57 54 28 31 29 B2 57 54 28 31 29 AA |.16:WT(1).WT(1).|
000027F0: 28 57 54 28 34 29 AC 28 54 44 AB 31 38 32 29 AD |(WT(4).(TD.182).|
00002800: 37 29 00 29 30 12 01 54 44 B2 31 38 32 3A 44 59 |7).)0..TD.182:DY|
00002810: B2 54 44 3A 45 4E B2 31 3A 8D 32 33 31 3A 54 44 |.TD:EN.1:.231:TD|
00002820: 24 B2 41 24 3A 89 32 38 37 00 5F 30 13 01 8B 28 |$.A$:.287._0...(|
00002830: 57 54 28 31 29 B3 57 54 28 32 29 AF 54 53 B2 32 |WT(1).WT(2).TS.2|
00002840: AF 57 54 28 31 29 B1 30 29 B0 28 54 53 B2 33 AF |.WT(1).0).(TS.3.|
00002850: 57 54 28 34 29 B1 32 2E 32 31 29 A7 32 37 38 00 |WT(4).2.21).278.|
00002860: 8E 30 14 01 8B 54 53 B2 35 AF 57 54 28 31 29 B1 |.0...TS.5.WT(1).|
00002870: 30 AF 28 57 54 28 31 29 B3 57 54 28 32 29 B0 57 |0.(WT(1).WT(2).W|
00002880: 54 28 34 29 B1 32 2E 32 31 29 A7 32 38 32 00 94 |T(4).2.21).282..|
00002890: 30 15 01 8E 00 C7 30 16 01 8D 31 36 3A 99 22 11 |0.....0...16:.".|
000028A0: 1F 20 C9 54 20 4D 41 59 20 42 45 20 51 55 49 54 |. .T MAY BE QUIT|
000028B0: 45 20 44 49 46 46 49 43 55 4C 54 20 54 4F 20 41 |E DIFFICULT TO A|
000028C0: 43 48 49 45 56 45 22 00 0E 31 17 01 99 22 11 20 |CHIEVE"..1...". |
000028D0: 22 54 53 24 28 54 53 29 22 20 59 4F 55 20 48 41 |"TS$(TS)" YOU HA|
000028E0: 56 45 20 43 48 4F 53 45 4E 2E 22 3A 99 22 11 20 |VE CHOSEN.":.". |
000028F0: D9 4F 55 20 53 48 4F 55 4C 44 20 53 45 52 49 4F |.OU SHOULD SERIO|
00002900: 55 53 4C 59 20 43 4F 4E 53 49 44 45 52 22 00 41 |USLY CONSIDER".A|
00002910: 31 18 01 99 22 11 20 41 43 43 45 50 54 49 4E 47 |1...". ACCEPTING|
00002920: 20 54 48 45 20 46 49 52 53 54 20 53 55 47 47 45 | THE FIRST SUGGE|
00002930: 53 54 45 44 20 46 49 47 55 52 45 2E 22 3A 8D 31 |STED FIGURE.":.1|
00002940: 32 00 47 31 19 01 8E 00 79 31 1A 01 8D 31 36 3A |2.G1....y1...16:|
00002950: 99 22 11 20 C4 4F 20 4E 4F 54 20 42 45 20 54 4F |.". .O NOT BE TO|
00002960: 4F 20 53 55 52 50 52 49 53 45 44 20 49 46 20 54 |O SURPRISED IF T|
00002970: 48 49 53 20 D0 4C 41 4E 22 00 A6 31 1B 01 99 22 |HIS .LAN"..1..."|
00002980: 11 20 44 4F 45 53 20 4E 4F 54 20 57 4F 52 4B 20 |. DOES NOT WORK |
00002990: 46 4F 52 20 59 4F 55 20 2D 20 54 48 45 20 46 49 |FOR YOU - THE FI|
000029A0: 47 55 52 45 53 22 00 D3 31 1C 01 99 22 11 20 59 |GURES"..1...". Y|
000029B0: 4F 55 20 48 41 56 45 20 43 48 4F 53 45 4E 20 4D |OU HAVE CHOSEN M|
000029C0: 41 59 20 42 45 20 44 49 46 46 49 43 55 4C 54 20 |AY BE DIFFICULT |
000029D0: 54 4F 22 00 01 32 1D 01 99 22 11 20 41 43 48 49 |TO"..2...". ACHI|
000029E0: 45 56 45 2E 20 C8 4F 57 45 56 45 52 2C 20 49 46 |EVE. .OWEVER, IF|
000029F0: 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 54 52 59 | YOU WANT TO TRY|
00002A00: 22 00 2E 32 1E 01 99 22 11 20 49 54 2C 20 47 4F |"..2...". IT, GO|
00002A10: 20 41 48 45 41 44 20 2D 20 41 4E 44 20 47 4F 4F | AHEAD - AND GOO|
00002A20: 44 20 4C 55 43 4B 21 22 3A 8D 31 32 3A 8E 00 51 |D LUCK!":.12:..Q|
00002A30: 32 1F 01 45 4E B2 31 3A 8D 32 34 36 3A 8B 44 B2 |2..EN.1:.246:.D.|
00002A40: 34 A7 98 34 3A A0 34 3A 44 B2 44 31 3A 89 32 38 |4..4:.4:D.D1:.28|
00002A50: 37 00 63 32 20 01 8D 31 38 3A 8B 45 46 B2 31 A7 |7.c2 ..18:.EF.1.|
00002A60: 32 38 37 00 7C 32 21 01 8B 52 4B 24 B2 22 50 22 |287.|2!..RK$."P"|
00002A70: B0 52 4B 24 B2 22 D0 22 A7 32 38 37 00 AC 32 22 |.RK$.".".287..2"|
00002A80: 01 51 24 28 31 29 B2 22 D4 48 45 20 53 45 43 4F |.Q$(1).".HE SECO|
00002A90: 4E 44 20 50 41 52 54 20 4F 46 20 54 48 45 20 50 |ND PART OF THE P|
00002AA0: 52 4F 47 52 41 4D 20 4D 55 53 54 22 00 F1 32 23 |ROGRAM MUST"..2#|
00002AB0: 01 51 24 28 32 29 B2 22 4E 4F 57 20 42 45 20 4C |.Q$(2)."NOW BE L|
00002AC0: 4F 41 44 45 44 2E 20 C1 52 45 20 59 4F 55 20 4C |OADED. .RE YOU L|
00002AD0: 4F 41 44 49 4E 47 20 46 52 4F 4D 20 22 3A 51 4C |OADING FROM ":QL|
00002AE0: B2 32 3A 4F 50 24 28 31 29 B2 22 44 49 53 4B 3F |.2:OP$(1)."DISK?|
00002AF0: 22 00 2D 33 24 01 4F 50 24 28 32 29 B2 22 54 41 |".-3$.OP$(2)."TA|
00002B00: 50 45 3F 22 3A 4C 4D B2 32 3A 8D 31 31 35 3A 99 |PE?":LM.2:.115:.|
00002B10: 3A 44 B2 31 3A 8B 43 48 B2 31 A7 44 B2 38 3A 8D |:D.1:.CH.1.D.8:.|
00002B20: 31 30 39 3A 8B 45 46 B2 31 A7 32 39 30 00 62 33 |109:.EF.1.290.b3|
00002B30: 25 01 8D 31 36 3A 99 22 11 11 1F 20 D0 4C 45 41 |%..16:."... .LEA|
00002B40: 53 45 20 57 41 49 54 20 57 48 49 4C 45 20 27 D0 |SE WAIT WHILE '.|
00002B50: 41 52 54 42 27 20 49 53 20 4C 4F 41 44 49 4E 47 |ARTB' IS LOADING|
00002B60: 2E 22 00 6F 33 26 01 8B 44 B2 38 A7 32 39 37 00 |.".o3&..D.8.297.|
00002B70: 9B 33 27 01 99 22 11 20 D4 48 49 53 20 57 49 4C |.3'..". .HIS WIL|
00002B80: 4C 20 54 41 4B 45 20 4A 55 53 54 20 4F 56 45 52 |L TAKE JUST OVER|
00002B90: 20 31 20 4D 49 4E 55 54 45 2E 22 00 BF 33 29 01 | 1 MINUTE."..3).|
00002BA0: 8D 34 35 30 3A 8D 31 32 3A 99 22 91 91 91 91 91 |.450:.12:.".....|
00002BB0: 90 20 22 3B 3A 93 22 50 41 52 54 42 22 2C 44 00 |. ";:."PARTB",D.|
00002BC0: F3 33 2A 01 99 22 11 1F 20 D4 48 49 53 20 47 49 |.3*..".. .HIS GI|
00002BD0: 56 45 53 20 41 20 54 41 52 47 45 54 20 44 41 54 |VES A TARGET DAT|
00002BE0: 45 20 4F 46 22 3A 99 22 11 20 22 3B 3A 8D 32 33 |E OF":.". ";:.23|
00002BF0: 30 3A 8E 00 3E 34 2B 01 99 22 11 1C 20 D4 48 49 |0:..>4+..".. .HI|
00002C00: 53 20 43 4F 55 4C 44 20 4C 45 41 44 20 54 4F 20 |S COULD LEAD TO |
00002C10: 49 4C 4C 2D 48 45 41 4C 54 48 20 41 4E 44 20 49 |ILL-HEALTH AND I|
00002C20: 53 20 20 20 11 20 54 48 45 52 45 46 4F 52 45 20 |S . THEREFORE |
00002C30: 55 4E 41 43 43 45 50 54 41 42 4C 45 2E 22 00 48 |UNACCEPTABLE.".H|
00002C40: 34 2C 01 8D 31 32 3A 8E 00 83 34 2D 01 99 22 11 |4,..12:...4-..".|
00002C50: 90 20 CF 4B 41 59 20 2D 20 54 52 59 20 49 54 20 |. .KAY - TRY IT |
00002C60: 59 4F 55 52 20 57 41 59 2E 20 C1 4E 44 20 47 4F |YOUR WAY. .ND GO|
00002C70: 4F 44 20 4C 55 43 4B 20 20 11 20 54 4F 20 59 4F |OD LUCK . TO YO|
00002C80: 55 21 22 00 8D 34 2E 01 8D 31 32 3A 8E 00 BB 34 |U!"..4...12:...4|
00002C90: 2F 01 99 22 11 1F 20 C8 4F 57 20 41 42 4F 55 54 |/..".. .OW ABOUT|
00002CA0: 20 41 20 43 4F 4D 50 52 4F 4D 49 53 45 20 2D 20 | A COMPROMISE - |
00002CB0: 22 3A 99 22 11 20 22 59 24 3A 8E 00 E3 34 30 01 |":.". "Y$:...40.|
00002CC0: 99 22 11 1F 20 D7 49 4C 4C 20 59 4F 55 20 41 43 |.".. .ILL YOU AC|
00002CD0: 43 45 50 54 20 54 48 49 53 3F 20 22 3B 3A 8D 39 |CEPT THIS? ";:.9|
00002CE0: 30 3A 8E 00 1C 35 31 01 99 22 11 1F 20 C9 54 20 |0:...51..".. .T |
00002CF0: 49 53 20 41 44 56 49 53 41 42 4C 45 20 54 4F 20 |IS ADVISABLE TO |
00002D00: 4C 4F 53 45 20 57 45 49 47 48 54 20 53 4C 4F 57 |LOSE WEIGHT SLOW|
00002D10: 4C 59 2E 22 3A 8D 31 32 3A 8D 31 36 00 50 35 32 |LY.":.12:.16.P52|
00002D20: 01 99 22 11 1F 20 D7 45 20 53 55 47 47 45 53 54 |..".. .E SUGGEST|
00002D30: 20 41 20 52 41 54 45 20 4F 46 20 22 54 53 24 3A | A RATE OF "TS$:|
00002D40: 99 22 11 20 50 45 52 20 57 45 45 4B 2E 22 3A 8E |.". PER WEEK.":.|
00002D50: 00 72 35 33 01 99 22 11 90 20 D0 4C 45 41 53 45 |.r53..".. .LEASE|
00002D60: 20 54 52 59 20 41 47 41 49 4E 2E 22 3A 8D 31 32 | TRY AGAIN.":.12|
00002D70: 3A 8E 00 8A 35 34 01 8B 54 57 B2 32 AF 57 4D B2 |:...54..TW.2.WM.|
00002D80: 31 A7 54 57 B2 32 2E 32 30 35 00 B5 35 35 01 54 |1.TW.2.205..55.T|
00002D90: 53 24 B2 C4 28 54 57 29 3A 54 53 24 B2 CA 28 54 |S$..(TW):TS$..(T|
00002DA0: 53 24 2C 32 29 3A 58 B2 54 57 3A 8D 39 37 3A 54 |S$,2):X.TW:.97:T|
00002DB0: 53 24 B2 59 24 00 D9 35 36 01 58 B2 C5 28 54 53 |S$.Y$..56.X..(TS|
00002DC0: 24 29 3A 8B 57 4D B3 B1 32 A7 8D 31 32 30 3A 54 |$):.WM..2..120:T|
00002DD0: 53 24 B2 54 53 24 AA 48 24 00 DF 35 37 01 8E 00 |S$.TS$.H$..57...|
00002DE0: ED 35 38 01 8B 54 53 B1 32 A7 33 34 39 00 04 36 |.58..TS.2.349..6|
00002DF0: 39 01 8D 31 36 3A 8B 57 4C B1 32 B0 57 57 B1 30 |9..16:.WL.2.WW.0|
00002E00: A7 33 31 38 00 34 36 3A 01 99 22 11 1F 20 D9 4F |.318.46:..".. .O|
00002E10: 55 52 20 50 52 45 53 45 4E 54 20 57 45 49 47 48 |UR PRESENT WEIGH|
00002E20: 54 20 49 53 20 49 44 45 41 4C 2E 20 C1 52 45 20 |T IS IDEAL. .RE |
00002E30: 59 4F 55 22 00 60 36 3B 01 99 22 11 20 53 55 52 |YOU".`6;..". SUR|
00002E40: 45 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 4C 4F |E YOU WANT TO LO|
00002E50: 53 45 20 57 45 49 47 48 54 3F 11 22 3A 8D 39 30 |SE WEIGHT?.":.90|
00002E60: 00 94 36 3C 01 8B 52 4B 24 B2 22 4E 22 B0 52 4B |..6<..RK$."N".RK|
00002E70: 24 B2 22 CE 22 A7 54 53 B2 34 3A 57 54 28 31 29 |$.".".TS.4:WT(1)|
00002E80: B2 30 3A 57 54 28 34 29 B2 30 3A 54 44 B2 30 3A |.0:WT(4).0:TD.0:|
00002E90: 89 32 34 35 00 9C 36 3D 01 8D 31 36 00 DC 36 3E |.245..6=..16..6>|
00002EA0: 01 99 22 11 92 90 20 D0 52 45 53 45 4E 54 20 54 |.."... .RESENT T|
00002EB0: 41 52 47 45 54 20 57 45 49 47 48 54 20 3A 20 1C |ARGET WEIGHT : .|
00002EC0: 22 3B 3A 58 B2 57 54 28 31 29 3A 8B 58 B2 30 A7 |";:X.WT(1):.X.0.|
00002ED0: 99 22 CE 4F 4E 45 22 3A 89 33 32 30 00 EE 36 3F |.".ONE":.320..6?|
00002EE0: 01 8D 39 37 3A 99 59 24 3B 3A 8D 31 31 38 00 18 |..97:.Y$;:.118..|
00002EF0: 37 40 01 57 57 B2 31 3A 99 3A 99 22 11 90 20 D2 |7@.WW.1:.:.".. .|
00002F00: 45 51 55 45 53 54 45 44 20 54 41 52 47 45 54 20 |EQUESTED TARGET |
00002F10: 57 45 49 47 48 54 20 22 00 4D 37 41 01 8B 57 4D |WEIGHT ".M7A..WM|
00002F20: B3 B1 32 A7 99 22 20 11 28 22 57 4D 24 22 29 20 |..2.." .("WM$") |
00002F30: 3A 20 22 3B 3A 4C 4D B2 35 30 30 3A 8D 31 34 37 |: ";:LM.500:.147|
00002F40: 3A 54 57 24 B2 52 4B 24 3A 89 33 32 33 00 68 37 |:TW$.RK$:.323.h7|
00002F50: 42 01 8D 31 34 34 3A 54 57 24 B2 54 57 24 AA 52 |B..144:TW$.TW$.R|
00002F60: 4B 24 AA 22 4C 42 53 22 00 8D 37 43 01 99 3A 59 |K$."LBS"..7C..:Y|
00002F70: 24 B2 54 57 24 3A 8D 31 30 34 3A 52 51 B2 59 3A |$.TW$:.104:RQ.Y:|
00002F80: 8B 57 54 AB 52 51 B1 B2 31 A7 33 32 37 00 9F 37 |.WT.RQ..1.327..7|
00002F90: 44 01 8B 57 54 AB 52 51 B3 B2 30 A7 33 32 37 00 |D..WT.RQ..0.327.|
00002FA0: D0 37 45 01 99 22 11 1C 20 D9 4F 55 20 45 49 54 |.7E..".. .OU EIT|
00002FB0: 48 45 52 20 57 41 4E 54 20 54 4F 20 4C 4F 53 45 |HER WANT TO LOSE|
00002FC0: 20 53 4F 4D 45 20 57 45 49 47 48 54 20 4F 52 22 | SOME WEIGHT OR"|
00002FD0: 00 07 38 46 01 99 22 11 20 59 4F 55 20 44 4F 4E |..8F..". YOU DON|
00002FE0: 27 54 2E 20 CE 4F 20 48 41 4C 46 20 4D 45 41 53 |'T. .O HALF MEAS|
00002FF0: 55 52 45 53 2C 20 50 4C 45 41 53 45 21 22 3A 8D |URES, PLEASE!":.|
00003000: 31 32 3A 89 33 31 37 00 2D 38 47 01 8B 52 51 B3 |12:.317.-8G..RQ.|
00003010: 57 54 28 32 29 AB 28 57 54 28 33 29 AB 57 54 28 |WT(2).(WT(3).WT(|
00003020: 32 29 29 A7 8D 32 39 39 3A 89 33 31 37 00 3D 38 |2))..299:.317.=8|
00003030: 48 01 8B 52 51 B3 B2 57 54 A7 33 33 31 00 6C 38 |H..RQ..WT.331.l8|
00003040: 49 01 99 22 11 1C 20 D9 4F 55 52 20 43 48 4F 53 |I..".. .OUR CHOS|
00003050: 45 4E 20 54 41 52 47 45 54 20 57 45 49 47 48 54 |EN TARGET WEIGHT|
00003060: 20 49 53 20 47 52 45 41 54 45 52 22 00 99 38 4A | IS GREATER"..8J|
00003070: 01 99 22 11 20 54 48 41 4E 20 59 4F 55 52 20 43 |..". THAN YOUR C|
00003080: 55 52 52 45 4E 54 20 57 45 49 47 48 54 2E 22 3A |URRENT WEIGHT.":|
00003090: 8D 33 30 37 3A 89 33 31 37 00 AC 38 4B 01 8B 52 |.307:.317..8K..R|
000030A0: 51 B1 B2 57 54 28 32 29 A7 33 34 32 00 DF 38 4C |Q..WT(2).342..8L|
000030B0: 01 99 22 11 1F 20 D9 4F 55 20 53 48 4F 55 4C 44 |..".. .OU SHOULD|
000030C0: 20 4E 4F 54 20 57 45 49 47 48 20 4C 45 53 53 20 | NOT WEIGH LESS |
000030D0: 54 48 41 4E 22 3A 99 22 11 20 22 41 31 24 3B 00 |THAN":.". "A1$;.|
000030E0: FB 38 4D 01 54 57 B2 57 54 28 32 29 3A 8D 31 31 |.8M.TW.WT(2):.11|
000030F0: 38 3A 8D 33 30 34 3A 89 33 33 39 00 14 39 4E 01 |8:.304:.339..9N.|
00003100: 52 31 B2 31 36 3A 8D 38 3A 52 B2 31 36 3A 43 B2 |R1.16:.8:R.16:C.|
00003110: 30 3A 8D 39 00 2D 39 4F 01 8B 57 57 B2 34 B0 58 |0:.9.-9O..WW.4.X|
00003120: B2 AB 31 A7 8D 33 30 31 3A 89 33 34 37 00 66 39 |..1..301:.347.f9|
00003130: 50 01 54 57 B2 52 51 AA B5 28 28 57 54 28 32 29 |P.TW.RQ..((WT(2)|
00003140: AB 54 57 29 AD 32 29 3A 8B 28 B6 28 52 51 AB 54 |.TW).2):.(.(RQ.T|
00003150: 57 29 B3 31 29 B0 28 58 B2 54 57 29 A7 58 B2 AB |W).1).(X.TW).X..|
00003160: 31 3A 89 33 33 35 00 88 39 51 01 58 B2 54 57 3A |1:.335..9Q.X.TW:|
00003170: 8D 39 37 3A 8B 57 4D B3 B1 32 A7 59 24 B2 59 24 |.97:.WM..2.Y$.Y$|
00003180: AA 22 20 22 AA 57 4D 24 00 96 39 52 01 8D 33 30 |." ".WM$..9R..30|
00003190: 33 3A 8D 33 30 34 00 B6 39 53 01 8B 52 4B 24 B2 |3:.304..9S..RK$.|
000031A0: 22 59 22 B0 52 4B 24 B2 22 D9 22 A7 52 51 B2 54 |"Y".RK$.".".RQ.T|
000031B0: 57 3A 89 33 34 37 00 CE 39 54 01 57 57 B2 57 57 |W:.347..9T.WW.WW|
000031C0: AA 31 3A 8B 57 57 B2 32 A7 54 57 B2 52 51 00 DC |.1:.WW.2.TW.RQ..|
000031D0: 39 55 01 58 B2 54 57 3A 89 33 33 34 00 EF 39 56 |9U.X.TW:.334..9V|
000031E0: 01 8B 52 51 B3 B2 57 54 28 35 29 A7 33 34 37 00 |..RQ..WT(5).347.|
000031F0: 1D 3A 57 01 99 22 11 1F 20 D9 4F 55 20 41 52 45 |.:W..".. .OU ARE|
00003200: 20 4F 56 45 52 57 45 49 47 48 54 20 41 4E 44 20 | OVERWEIGHT AND |
00003210: CE C5 C5 C4 20 54 4F 20 4C 4F 53 45 22 00 49 3A |.... TO LOSE".I:|
00003220: 58 01 99 22 11 20 53 4F 4D 45 20 57 45 49 47 48 |X..". SOME WEIGH|
00003230: 54 2E 20 D4 48 45 20 43 4F 4D 50 55 54 45 52 20 |T. .HE COMPUTER |
00003240: 57 49 4C 4C 20 4E 4F 54 22 00 87 3A 59 01 99 22 |WILL NOT"..:Y.."|
00003250: 11 20 41 43 43 45 50 54 20 41 20 54 41 52 47 45 |. ACCEPT A TARGE|
00003260: 54 20 57 45 49 47 48 54 20 47 52 45 41 54 45 52 |T WEIGHT GREATER|
00003270: 20 54 48 41 4E 22 3A 58 B2 57 54 28 35 29 3A 52 | THAN":X.WT(5):R|
00003280: 51 B2 58 3A 8D 39 37 00 9D 3A 5A 01 99 22 11 20 |Q.X:.97..:Z..". |
00003290: 22 59 24 3B 3A 8D 31 31 38 3A 8D 31 32 00 CB 3A |"Y$;:.118:.12..:|
000032A0: 5B 01 57 54 28 31 29 B2 52 51 3A 8B 57 54 B2 52 |[.WT(1).RQ:.WT.R|
000032B0: 51 A7 57 54 28 31 29 B2 30 3A 57 54 28 34 29 B2 |Q.WT(1).0:WT(4).|
000032C0: 30 3A 54 44 B2 30 3A 89 32 34 35 00 D4 3A 5C 01 |0:TD.0:.245..:\.|
000032D0: 89 32 31 39 00 DF 3A 5D 01 58 24 B2 52 4C 24 00 |.219..:].X$.RL$.|
000032E0: ED 3A 5E 01 8B 54 53 B1 33 A7 33 38 38 00 28 3B |.:^..TS.3.388.(;|
000032F0: 5F 01 8D 31 36 3A 99 22 11 90 20 D0 52 45 53 45 |_..16:.".. .RESE|
00003300: 4E 54 20 52 41 54 45 20 4F 46 20 4C 4F 53 53 20 |NT RATE OF LOSS |
00003310: 3A 20 1C 22 58 24 3A 99 A3 32 33 29 22 11 20 50 |: ."X$:..23)". P|
00003320: 45 52 20 57 45 45 4B 22 00 58 3B 60 01 99 22 11 |ER WEEK".X;`..".|
00003330: 90 20 C4 45 53 49 52 45 44 20 52 41 54 45 20 28 |. .ESIRED RATE (|
00003340: 22 3B 3A 8B 57 4D B1 31 A7 99 22 50 4F 55 4E 44 |";:.WM.1.."POUND|
00003350: 53 22 3B 3A 89 33 35 34 00 66 3B 61 01 99 22 4B |S";:.354.f;a.."K|
00003360: 49 4C 4F 53 22 3B 00 A1 3B 62 01 99 22 20 50 45 |ILOS";..;b.." PE|
00003370: 52 20 57 45 45 4B 29 20 3A 20 22 3B 3A 5A 45 B2 |R WEEK) : ";:ZE.|
00003380: 31 3A 4C 4D B2 31 30 3A 44 50 B2 31 3A 52 4B B2 |1:LM.10:DP.1:RK.|
00003390: 32 3A 8D 33 36 3A 99 3A 52 51 B2 C5 28 52 4B 24 |2:.36:.:RQ..(RK$|
000033A0: 29 00 C4 3B 63 01 54 53 24 B2 52 4B 24 3A 8B 57 |)..;c.TS$.RK$:.W|
000033B0: 4D B2 31 A7 59 24 B2 52 4B 24 3A 8D 31 30 34 3A |M.1.Y$.RK$:.104:|
000033C0: 52 51 B2 59 00 D4 3B 64 01 8B 52 51 B1 30 2E 32 |RQ.Y..;d..RQ.0.2|
000033D0: A7 33 35 39 00 00 3C 65 01 99 22 11 1C 20 D9 4F |.359..<e..".. .O|
000033E0: 55 20 43 4F 55 4C 44 20 45 41 53 49 4C 59 20 4C |U COULD EASILY L|
000033F0: 4F 53 45 20 57 45 49 47 48 54 20 41 54 20 41 22 |OSE WEIGHT AT A"|
00003400: 00 2A 3C 66 01 99 22 11 20 46 41 53 54 45 52 20 |.*<f..". FASTER |
00003410: 52 41 54 45 2E 22 3A 54 57 B2 30 2E 35 3A 8D 31 |RATE.":TW.0.5:.1|
00003420: 32 3A 8D 31 36 3A 89 33 36 37 00 39 3C 67 01 8B |2:.16:.367.9<g..|
00003430: 52 51 B3 B2 36 A7 33 36 32 00 59 3C 68 01 8D 32 |RQ..6.362.Y<h..2|
00003440: 39 39 3A 54 57 B2 57 54 AB 57 54 28 31 29 3A 8B |99:TW.WT.WT(1):.|
00003450: 54 57 B1 32 A7 54 57 B2 32 00 66 3C 69 01 8D 31 |TW.2.TW.2.f<i..1|
00003460: 36 3A 89 33 36 37 00 8E 3C 6A 01 8B 54 53 B3 34 |6:.367..<j..TS.4|
00003470: A7 59 24 B2 54 53 24 3A 58 B2 C5 28 59 24 29 3A |.Y$.TS$:X..(Y$):|
00003480: 8D 31 32 30 3A 52 51 24 B2 59 24 AA 48 24 00 A8 |.120:RQ$.Y$.H$..|
00003490: 3C 6B 01 8B 52 51 AB 28 57 54 AB 57 54 28 31 29 |<k..RQ.(WT.WT(1)|
000034A0: 29 B2 B3 30 A7 33 37 32 00 E5 3C 6C 01 99 22 1C |)..0.372..<l..".|
000034B0: 11 20 D9 4F 55 20 44 4F 4E 27 54 20 48 41 56 45 |. .OU DON'T HAVE|
000034C0: 20 4D 55 43 48 20 57 45 49 47 48 54 20 54 4F 20 | MUCH WEIGHT TO |
000034D0: 4C 4F 53 45 20 53 4F 20 20 11 20 57 48 59 20 52 |LOSE SO . WHY R|
000034E0: 55 53 48 3F 22 00 04 3D 6D 01 54 57 B2 57 54 AB |USH?"..=m.TW.WT.|
000034F0: 57 54 28 31 29 3A 8B 54 57 B1 30 2E 35 A7 54 57 |WT(1):.TW.0.5.TW|
00003500: B2 30 2E 35 00 10 3D 6E 01 8D 31 32 3A 8D 31 36 |.0.5..=n..12:.16|
00003510: 00 43 3D 6F 01 54 44 B2 30 3A 8D 33 30 38 3A 8D |.C=o.TD.0:.308:.|
00003520: 33 30 36 3A 57 54 28 34 29 B2 54 57 3A 52 4C 24 |306:WT(4).TW:RL$|
00003530: B2 54 53 24 3A 57 57 B2 30 3A 8B 54 53 B2 33 A7 |.TS$:WW.0:.TS.3.|
00003540: 33 36 39 00 4C 3D 70 01 8D 32 39 38 00 6A 3D 71 |369.L=p..298.j=q|
00003550: 01 8D 33 30 34 3A 8B 52 4B 24 B2 22 4E 22 B0 52 |..304:.RK$."N".R|
00003560: 4B 24 B2 22 CE 22 A7 33 35 30 00 78 3D 72 01 8B |K$.".".350.x=r..|
00003570: 54 53 B2 33 A7 32 31 39 00 81 3D 73 01 89 33 38 |TS.3.219..=s..38|
00003580: 37 00 AA 3D 74 01 8B 28 57 4D B2 31 AF C5 28 52 |7..=t..(WM.1..(R|
00003590: 51 24 29 B1 31 29 B0 28 57 4D B1 31 AF C5 28 52 |Q$).1).(WM.1..(R|
000035A0: 51 24 29 B1 32 29 A7 33 37 34 00 BF 3D 75 01 8D |Q$).2).374..=u..|
000035B0: 31 32 3A 54 44 24 B2 54 57 24 3A 89 33 38 36 00 |12:TD$.TW$:.386.|
000035C0: CD 3D 76 01 54 57 B2 32 3A 8D 33 30 38 00 DB 3D |.=v.TW.2:.308..=|
000035D0: 77 01 8D 33 30 35 3A 89 33 38 33 00 F6 3D 78 01 |w..305:.383..=x.|
000035E0: 52 51 B2 54 57 3A 52 51 24 B2 54 53 24 3A 8D 31 |RQ.TW:RQ$.TS$:.1|
000035F0: 32 3A 89 33 38 36 00 0B 3E 79 01 52 31 B2 31 33 |2:.386..>y.R1.13|
00003600: 3A 8B 54 53 B2 33 A7 52 31 B2 39 00 1E 3E 7A 01 |:.TS.3.R1.9..>z.|
00003610: 8D 38 3A 52 B2 52 31 3A 43 B2 30 3A 8D 39 00 45 |.8:R.R1:C.0:.9.E|
00003620: 3E 7B 01 54 57 B2 B5 28 28 28 52 51 AB 28 28 52 |>{.TW..(((RQ.((R|
00003630: 51 AB 54 57 29 AD 32 29 29 AC 31 30 29 AA 30 2E |Q.TW).2)).10).0.|
00003640: 35 29 AD 31 30 00 6F 3E 7C 01 8D 33 30 38 3A 8B |5).10.o>|..308:.|
00003650: 54 53 B2 34 AF B5 28 28 57 54 AB 57 54 28 31 29 |TS.4..((WT.WT(1)|
00003660: 29 AD 54 57 29 AA 31 B2 57 4B A7 57 57 B2 33 00 |).TW).1.WK.WW.3.|
00003670: 8B 3E 7D 01 8B 57 57 B2 33 A7 54 44 24 B2 54 57 |.>}..WW.3.TD$.TW|
00003680: 24 3A 8D 33 30 31 3A 89 33 38 36 00 A8 3E 7E 01 |$:.301:.386..>~.|
00003690: 59 24 B2 54 53 24 AA 22 20 50 45 52 20 57 45 45 |Y$.TS$." PER WEE|
000036A0: 4B 2E 22 3A 8D 33 30 33 00 C0 3E 7F 01 8B 54 53 |K.":.303..>...TS|
000036B0: B2 34 A7 57 54 28 34 29 B2 54 57 3A 8D 32 39 38 |.4.WT(4).TW:.298|
000036C0: 00 ED 3E 80 01 8D 33 30 34 3A 8B 52 4B 24 B2 22 |..>...304:.RK$."|
000036D0: 59 22 B0 52 4B 24 B2 22 D9 22 A7 52 51 B2 54 57 |Y".RK$.".".RQ.TW|
000036E0: 3A 52 51 24 B2 54 53 24 3A 89 33 38 36 00 FE 3E |:RQ$.TS$:.386..>|
000036F0: 81 01 57 57 B2 57 57 AA 31 3A 89 33 37 37 00 1D |..WW.WW.1:.377..|
00003700: 3F 82 01 57 54 28 34 29 B2 52 51 3A 52 4C 24 B2 |?..WT(4).RQ:RL$.|
00003710: 52 51 24 3A 8B 54 53 B2 33 A7 32 31 39 00 26 3F |RQ$:.TS.3.219.&?|
00003720: 83 01 89 32 34 35 00 51 3F 84 01 54 53 24 B2 22 |...245.Q?..TS$."|
00003730: C3 48 4F 53 45 4E 20 54 41 52 47 45 54 20 44 41 |.HOSEN TARGET DA|
00003740: 54 45 22 3A 8D 37 39 3A 54 57 24 B2 44 41 24 3A |TE":.79:TW$.DA$:|
00003750: 99 00 87 3F 85 01 41 B2 C5 28 C9 28 54 57 24 2C |...?..A..(.(TW$,|
00003760: 32 29 29 AC 31 30 30 30 30 AA C5 28 CA 28 54 57 |2)).10000..(.(TW|
00003770: 24 2C 34 2C 32 29 29 AC 31 30 30 AA C5 28 C8 28 |$,4,2)).100..(.(|
00003780: 54 57 24 2C 32 29 29 00 BD 3F 86 01 42 B2 C5 28 |TW$,2))..?..B..(|
00003790: C9 28 53 44 24 2C 32 29 29 AC 31 30 30 30 30 AA |.(SD$,2)).10000.|
000037A0: C5 28 CA 28 53 44 24 2C 34 2C 32 29 29 AC 31 30 |.(.(SD$,4,2)).10|
000037B0: 30 AA C5 28 C8 28 53 44 24 2C 32 29 29 00 E7 3F |0..(.(SD$,2))..?|
000037C0: 87 01 8B 41 B2 B3 42 A7 99 3A 99 22 11 1C 20 C9 |...A..B..:.".. .|
000037D0: 4E 56 41 4C 49 44 20 44 41 54 45 2E 22 3A 8D 33 |NVALID DATE.":.3|
000037E0: 30 37 3A 89 33 38 38 00 0C 40 88 01 4E 44 B2 30 |07:.388..@..ND.0|
000037F0: 3A 41 B2 C5 28 C9 28 54 57 24 2C 32 29 29 3A 42 |:A..(.(TW$,2)):B|
00003800: B2 C5 28 C9 28 53 44 24 2C 32 29 29 00 3D 40 89 |..(.(SD$,2)).=@.|
00003810: 01 49 B2 C5 28 CA 28 53 44 24 2C 34 2C 32 29 29 |.I..(.(SD$,4,2))|
00003820: 3A 4A B2 C5 28 CA 28 54 57 24 2C 34 2C 32 29 29 |:J..(.(TW$,4,2))|
00003830: 3A 8B 49 B2 4A AF 41 B2 42 A7 34 30 31 00 57 40 |:.I.J.A.B.401.W@|
00003840: 8A 01 4A B2 4A AB 31 3A 8B 4A B2 30 A7 4A B2 31 |..J.J.1:.J.0.J.1|
00003850: 32 3A 41 B2 41 AB 31 00 70 40 8B 01 4E 44 B2 A5 |2:A.A.1.p@..ND..|
00003860: 42 28 49 29 AB C5 28 C8 28 53 44 24 2C 32 29 29 |B(I)..(.(SD$,2))|
00003870: 00 81 40 8C 01 8B 49 B2 4A AF 41 B2 42 A7 34 30 |..@...I.J.A.B.40|
00003880: 32 00 9B 40 8D 01 49 B2 49 AA 31 3A 8B 49 B2 31 |2..@..I.I.1:.I.1|
00003890: 33 A7 49 B2 31 3A 42 B2 42 AA 31 00 AB 40 8E 01 |3.I.1:B.B.1..@..|
000038A0: 4E 44 B2 4E 44 AA A5 42 28 49 29 00 C4 40 8F 01 |ND.ND..B(I)..@..|
000038B0: 8B 49 B2 32 AF A5 4C 28 42 29 B2 30 A7 4E 44 B2 |.I.2..L(B).0.ND.|
000038C0: 4E 44 AB 31 00 CD 40 90 01 89 33 39 36 00 F1 40 |ND.1..@...396..@|
000038D0: 91 01 4E 44 B2 C5 28 C8 28 54 57 24 2C 32 29 29 |..ND..(.(TW$,2))|
000038E0: AB C5 28 C8 28 53 44 24 2C 32 29 29 3A 89 34 30 |..(.(SD$,2)):.40|
000038F0: 33 00 07 41 92 01 4E 44 B2 4E 44 AA C5 28 C8 28 |3..A..ND.ND..(.(|
00003900: 54 57 24 2C 32 29 29 00 29 41 93 01 54 44 B2 4E |TW$,2)).)A..TD.N|
00003910: 44 3A 57 4B B2 B5 28 54 44 AD 37 29 3A 8B 57 4B |D:WK..(TD.7):.WK|
00003920: B2 54 44 AD 37 A7 34 30 36 00 6A 41 94 01 4E 44 |.TD.7.406.jA..ND|
00003930: B2 57 4B AC 37 AA 37 3A 57 4B B2 4E 44 AD 37 3A |.WK.7.7:WK.ND.7:|
00003940: 44 59 B2 4E 44 3A 54 44 B2 4E 44 3A 99 22 11 1F |DY.ND:TD.ND:."..|
00003950: 20 D7 45 45 4B 20 45 4E 44 49 4E 47 20 44 41 54 | .EEK ENDING DAT|
00003960: 45 3A 20 22 3B 3A 8D 32 33 31 00 79 41 95 01 54 |E: ";:.231.yA..T|
00003970: 57 24 B2 41 24 3A 8D 31 32 00 B1 41 96 01 8D 32 |W$.A$:.12..A...2|
00003980: 31 39 3A 99 22 11 1F 20 D9 4F 55 20 48 41 56 45 |19:.".. .OU HAVE|
00003990: 20 22 3B 3A 58 B2 57 54 AB 57 54 28 31 29 3A 8D | ";:X.WT.WT(1):.|
000039A0: 39 37 3A 99 59 24 3B 3A 8B 57 4D B2 32 A7 34 30 |97:.Y$;:.WM.2.40|
000039B0: 38 00 C7 41 97 01 58 B2 C5 28 59 24 29 3A 8D 31 |8..A..X..(Y$):.1|
000039C0: 32 30 3A 99 48 24 3B 00 E7 41 98 01 99 22 20 54 |20:.H$;..A..." T|
000039D0: 4F 20 4C 4F 53 45 20 49 4E 22 54 44 3A 99 22 11 |O LOSE IN"TD:.".|
000039E0: 20 44 41 59 53 2E 22 00 08 42 99 01 41 B2 B5 28 | DAYS."..B..A..(|
000039F0: 28 57 54 AB 57 54 28 31 29 29 AD 57 4B AC 31 30 |(WT.WT(1)).WK.10|
00003A00: AA 30 2E 35 29 AD 31 30 00 16 42 9A 01 54 57 B2 |.0.5).10..B..TW.|
00003A10: 41 3A 8D 33 30 39 00 2A 42 9B 01 8B C5 28 54 53 |A:.309.*B....(TS|
00003A20: 24 29 B3 30 2E 31 A7 34 31 33 00 61 42 9C 01 99 |$).0.1.413.aB...|
00003A30: 22 11 1F 20 D4 48 49 53 20 57 4F 55 4C 44 20 47 |".. .HIS WOULD G|
00003A40: 49 56 45 20 41 20 52 41 54 45 20 4F 46 20 22 54 |IVE A RATE OF "T|
00003A50: 53 24 3A 99 22 11 20 50 45 52 20 57 45 45 4B 2E |S$:.". PER WEEK.|
00003A60: 22 00 77 42 9D 01 52 51 B2 41 3A 52 51 24 B2 54 |".wB..RQ.A:RQ$.T|
00003A70: 53 24 3A 89 33 35 36 00 A8 42 9E 01 83 39 34 2C |S$:.356..B...94,|
00003A80: 31 30 37 2C 31 32 34 2C 39 37 2C 31 30 38 2C 31 |107,124,97,108,1|
00003A90: 32 36 2C 39 38 2C 31 31 30 2C 31 32 38 2C 39 38 |26,98,110,128,98|
00003AA0: 2C 31 31 30 2C 31 32 37 00 D9 42 9F 01 83 31 30 |,110,127..B...10|
00003AB0: 30 2C 31 31 31 2C 31 33 30 2C 31 30 31 2C 31 31 |0,111,130,101,11|
00003AC0: 33 2C 31 33 32 2C 31 30 31 2C 31 31 33 2C 31 33 |3,132,101,113,13|
00003AD0: 30 2C 31 30 33 2C 31 31 34 00 0A 43 A0 01 83 31 |0,103,114..C...1|
00003AE0: 33 33 2C 31 30 34 2C 31 31 36 2C 31 33 35 2C 31 |33,104,116,135,1|
00003AF0: 30 34 2C 31 31 36 2C 31 33 33 2C 31 30 36 2C 31 |04,116,133,106,1|
00003B00: 31 38 2C 31 33 36 2C 31 30 38 00 3B 43 A1 01 83 |18,136,108.;C...|
00003B10: 31 32 30 2C 31 33 38 2C 31 30 37 2C 31 31 39 2C |120,138,107,119,|
00003B20: 31 33 36 2C 31 31 30 2C 31 32 32 2C 31 34 30 2C |136,110,122,140,|
00003B30: 31 31 32 2C 31 32 34 2C 31 34 32 00 6C 43 A2 01 |112,124,142.lC..|
00003B40: 83 31 30 39 2C 31 32 32 2C 31 33 39 2C 31 31 33 |.109,122,139,113|
00003B50: 2C 31 32 36 2C 31 34 33 2C 31 31 34 2C 31 32 38 |,126,143,114,128|
00003B60: 2C 31 34 35 2C 31 31 32 2C 31 32 35 00 9D 43 A3 |,145,112,125..C.|
00003B70: 01 83 31 34 33 2C 31 31 37 2C 31 33 30 2C 31 34 |..143,117,130,14|
00003B80: 38 2C 31 31 38 2C 31 33 32 2C 31 35 30 2C 31 31 |8,118,132,150,11|
00003B90: 35 2C 31 32 38 2C 31 34 36 2C 31 32 30 00 CE 43 |5,128,146,120..C|
00003BA0: A4 01 83 31 33 34 2C 31 35 32 2C 31 32 32 2C 31 |...134,152,122,1|
00003BB0: 33 35 2C 31 35 34 2C 31 31 38 2C 31 33 31 2C 31 |35,154,118,131,1|
00003BC0: 35 30 2C 31 32 34 2C 31 33 38 2C 31 35 37 00 FF |50,124,138,157..|
00003BD0: 43 A5 01 83 31 32 36 2C 31 34 30 2C 31 35 37 2C |C...126,140,157,|
00003BE0: 31 32 30 2C 31 33 34 2C 31 35 33 2C 31 32 37 2C |120,134,153,127,|
00003BF0: 31 34 32 2C 31 36 31 2C 31 32 39 2C 31 34 34 00 |142,161,129,144.|
00003C00: 30 44 A6 01 83 31 36 33 2C 31 32 33 2C 31 33 37 |0D...163,123,137|
00003C10: 2C 31 35 36 2C 31 33 31 2C 31 34 36 2C 31 36 36 |,156,131,146,166|
00003C20: 2C 31 33 33 2C 31 34 38 2C 31 36 38 2C 31 32 36 |,133,148,168,126|
00003C30: 00 61 44 A7 01 83 31 34 30 2C 31 35 39 2C 31 33 |.aD...140,159,13|
00003C40: 34 2C 31 35 30 2C 31 37 30 2C 31 33 36 2C 31 35 |4,150,170,136,15|
00003C50: 32 2C 31 37 32 2C 31 32 39 2C 31 34 34 2C 31 36 |2,172,129,144,16|
00003C60: 33 00 92 44 A8 01 83 31 33 38 2C 31 35 34 2C 31 |3..D...138,154,1|
00003C70: 37 35 2C 31 34 31 2C 31 35 37 2C 31 37 37 2C 31 |75,141,157,177,1|
00003C80: 33 31 2C 31 34 36 2C 31 36 36 2C 31 34 31 2C 31 |31,146,166,141,1|
00003C90: 35 37 00 C3 44 A9 01 83 31 37 39 2C 31 34 34 2C |57..D...179,144,|
00003CA0: 31 36 30 2C 31 38 30 2C 31 33 34 2C 31 35 30 2C |160,180,134,150,|
00003CB0: 31 37 30 2C 31 34 35 2C 31 36 32 2C 31 38 34 2C |170,145,162,184,|
00003CC0: 31 34 38 00 F4 44 AA 01 83 31 36 35 2C 31 38 35 |148..D...165,185|
00003CD0: 2C 31 33 37 2C 31 35 32 2C 31 37 33 2C 31 34 38 |,137,152,173,148|
00003CE0: 2C 31 36 35 2C 31 38 38 2C 31 35 31 2C 31 36 38 |,165,188,151,168|
00003CF0: 2C 31 38 39 00 25 45 AB 01 83 31 34 30 2C 31 35 |,189.%E...140,15|
00003D00: 36 2C 31 37 37 2C 31 35 31 2C 31 36 39 2C 31 39 |6,177,151,169,19|
00003D10: 32 2C 31 35 34 2C 31 37 32 2C 31 39 35 2C 31 34 |2,154,172,195,14|
00003D20: 33 2C 31 36 30 00 56 45 AC 01 83 31 38 30 2C 31 |3,160.VE...180,1|
00003D30: 35 35 2C 31 37 32 2C 31 39 35 2C 31 35 38 2C 31 |55,172,195,158,1|
00003D40: 37 35 2C 31 39 37 2C 31 34 36 2C 31 36 33 2C 31 |75,197,146,163,1|
00003D50: 38 34 2C 31 35 38 00 87 45 AD 01 83 31 37 35 2C |84,158..E...175,|
00003D60: 32 30 30 2C 31 36 30 2C 31 37 38 2C 32 30 32 2C |200,160,178,202,|
00003D70: 31 34 39 2C 31 36 37 2C 31 38 38 2C 31 36 31 2C |149,167,188,161,|
00003D80: 31 37 39 2C 32 30 33 00 BC 45 AE 01 83 31 36 34 |179,203..E...164|
00003D90: 2C 31 38 32 2C 32 30 35 2C 31 35 32 2C 31 37 31 |,182,205,152,171|
00003DA0: 2C 31 39 33 2C 31 36 34 2C 31 38 33 2C 32 30 37 |,193,164,183,207|
00003DB0: 2C 31 36 38 2C 31 38 36 2C 32 30 39 00 FB 45 AF |,168,186,209..E.|
00003DC0: 01 83 37 38 2C 38 37 2C 39 39 2C 37 38 2C 38 37 |..78,87,99,78,87|
00003DD0: 2C 39 39 2C 38 30 2C 38 39 2C 31 30 30 2C 38 32 |,99,80,89,100,82|
00003DE0: 2C 39 31 2C 31 30 33 2C 38 32 2C 39 31 2C 31 30 |,91,103,82,91,10|
00003DF0: 33 2C 38 34 2C 39 33 2C 31 30 35 00 3C 46 B0 01 |3,84,93,105.<F..|
00003E00: 83 38 35 2C 39 34 2C 31 30 37 2C 38 35 2C 39 34 |.85,94,107,85,94|
00003E10: 2C 31 30 37 2C 38 37 2C 39 36 2C 31 30 39 2C 38 |,107,87,96,109,8|
00003E20: 37 2C 39 37 2C 31 31 31 2C 38 37 2C 39 37 2C 31 |7,97,111,87,97,1|
00003E30: 31 31 2C 38 39 2C 39 39 2C 31 31 33 00 78 46 B1 |11,89,99,113.xF.|
00003E40: 01 83 39 30 2C 31 30 31 2C 31 31 35 2C 39 30 2C |..90,101,115,90,|
00003E50: 31 30 31 2C 31 31 35 2C 39 32 2C 31 30 32 2C 31 |101,115,92,102,1|
00003E60: 31 37 2C 39 32 2C 31 30 34 2C 31 31 38 2C 39 34 |17,92,104,118,94|
00003E70: 2C 31 30 34 2C 31 31 39 00 B4 46 B2 01 83 39 35 |,104,119..F...95|
00003E80: 2C 31 30 36 2C 31 32 30 2C 39 34 2C 31 30 36 2C |,106,120,94,106,|
00003E90: 31 32 31 2C 39 37 2C 31 30 38 2C 31 32 33 2C 39 |121,97,108,123,9|
00003EA0: 38 2C 31 31 30 2C 31 32 35 2C 39 37 2C 31 30 39 |8,110,125,97,109|
00003EB0: 2C 31 32 34 00 F5 46 B3 01 83 31 30 30 2C 31 31 |,124..F...100,11|
00003EC0: 31 2C 31 32 37 2C 31 30 32 2C 31 31 33 2C 31 32 |1,127,102,113,12|
00003ED0: 39 2C 31 30 30 2C 31 31 32 2C 31 32 37 2C 31 30 |9,100,112,127,10|
00003EE0: 33 2C 31 31 35 2C 31 33 31 2C 31 30 35 2C 31 31 |3,115,131,105,11|
00003EF0: 37 2C 31 33 34 00 36 47 B4 01 83 31 30 33 2C 31 |7,134.6G...103,1|
00003F00: 31 35 2C 31 33 30 2C 31 30 36 2C 31 31 38 2C 31 |15,130,106,118,1|
00003F10: 33 35 2C 31 30 39 2C 31 32 30 2C 31 33 38 2C 31 |35,109,120,138,1|
00003F20: 30 36 2C 31 31 38 2C 31 33 33 2C 31 30 39 2C 31 |06,118,133,109,1|
00003F30: 32 32 2C 31 33 39 00 77 47 B5 01 83 31 31 31 2C |22,139.wG...111,|
00003F40: 31 32 34 2C 31 34 32 2C 31 30 39 2C 31 32 31 2C |124,142,109,121,|
00003F50: 31 33 36 2C 31 31 32 2C 31 32 35 2C 31 34 33 2C |136,112,125,143,|
00003F60: 31 31 34 2C 31 32 37 2C 31 34 36 2C 31 31 32 2C |114,127,146,112,|
00003F70: 31 32 34 2C 31 33 39 00 B8 47 B6 01 83 31 31 35 |124,139..G...115|
00003F80: 2C 31 32 39 2C 31 34 37 2C 31 31 37 2C 31 33 31 |,129,147,117,131|
00003F90: 2C 31 34 39 2C 31 31 35 2C 31 32 37 2C 31 34 34 |,149,115,127,144|
00003FA0: 2C 31 31 39 2C 31 33 32 2C 31 35 31 2C 31 32 31 |,119,132,151,121|
00003FB0: 2C 31 33 34 2C 31 35 33 00 F9 47 B7 01 83 31 31 |,134,153..G...11|
00003FC0: 38 2C 31 33 30 2C 31 34 36 2C 31 32 32 2C 31 33 |8,130,146,122,13|
00003FD0: 36 2C 31 35 34 2C 31 32 34 2C 31 33 39 2C 31 35 |6,154,124,139,15|
00003FE0: 36 2C 31 32 31 2C 31 33 33 2C 31 34 38 2C 31 32 |6,121,133,148,12|
00003FF0: 35 2C 31 34 30 2C 31 35 38 00 3A 48 B8 01 83 31 |5,140,158.:H...1|
00004000: 32 36 2C 31 34 32 2C 31 35 39 2C 31 32 34 2C 31 |26,142,159,124,1|
00004010: 33 36 2C 31 35 32 2C 31 32 39 2C 31 34 34 2C 31 |36,152,129,144,1|
00004020: 36 32 2C 31 33 30 2C 31 34 35 2C 31 36 33 2C 31 |62,130,145,163,1|
00004030: 32 37 2C 31 34 30 2C 31 35 35 00 7B 48 B9 01 83 |27,140,155.{H...|
00004040: 31 33 33 2C 31 34 38 2C 31 36 36 2C 31 33 34 2C |133,148,166,134,|
00004050: 31 34 39 2C 31 36 36 2C 31 33 30 2C 31 34 34 2C |149,166,130,144,|
00004060: 31 35 38 2C 31 33 37 2C 31 35 32 2C 31 37 30 2C |158,137,152,170,|
00004070: 31 33 37 2C 31 35 33 2C 31 37 30 00 BC 48 BA 01 |137,153,170..H..|
00004080: 83 31 33 32 2C 31 34 37 2C 31 36 32 2C 31 34 30 |.132,147,162,140|
00004090: 2C 31 35 36 2C 31 37 34 2C 31 34 31 2C 31 35 37 |,156,174,141,157|
000040A0: 2C 31 37 34 2C 31 33 35 2C 31 35 30 2C 31 36 35 |,174,135,150,165|
000040B0: 2C 31 34 33 2C 31 35 39 2C 31 37 37 00 F1 48 BB |,143,159,177..H.|
000040C0: 01 83 31 34 34 2C 31 36 30 2C 31 37 38 2C 31 33 |..144,160,178,13|
000040D0: 38 2C 31 35 34 2C 31 36 39 2C 31 34 35 2C 31 36 |8,154,169,145,16|
000040E0: 33 2C 31 38 31 2C 31 34 36 2C 31 36 34 2C 31 38 |3,181,146,164,18|
000040F0: 30 00 26 49 C2 01 4D 45 4D B2 34 39 31 35 32 3A |0.&I..MEM.49152:|
00004100: 50 4F 24 B2 4E 41 24 3A 8D 34 36 30 3A 50 4F 24 |PO$.NA$:.460:PO$|
00004110: B2 53 57 24 3A 8D 34 36 30 3A 50 4F 24 B2 53 44 |.SW$:.460:PO$.SD|
00004120: 24 3A 8D 34 36 30 00 65 49 C7 01 81 41 B2 31 A4 |$:.460.eI...A.1.|
00004130: 34 3A 4E 55 B2 57 54 28 41 29 3A 8D 34 36 35 3A |4:NU.WT(A):.465:|
00004140: 82 41 3A 4E 55 B2 41 47 3A 8D 34 36 35 3A 4E 55 |.A:NU.AG:.465:NU|
00004150: B2 57 4D 3A 8D 34 36 35 3A 4E 55 B2 54 44 3A 8D |.WM:.465:NU.TD:.|
00004160: 34 36 35 3A 8E 00 A8 49 CC 01 81 41 B2 30 A4 C3 |465:...I...A.0..|
00004170: 28 50 4F 24 29 AB 31 3A 97 4D 45 4D AA 41 2C C6 |(PO$).1:.MEM.A,.|
00004180: 28 CA 28 50 4F 24 2C 41 AA 31 2C 31 29 29 3A 82 |(.(PO$,A.1,1)):.|
00004190: 41 3A 97 4D 45 4D AA 41 2C 30 3A 4D 45 4D B2 4D |A:.MEM.A,0:MEM.M|
000041A0: 45 4D AA 41 AA 31 3A 8E 00 DF 49 D1 01 4E 55 B2 |EM.A.1:...I..NU.|
000041B0: 4E 55 AC 31 30 30 3A 97 4D 45 4D 2C 4E 55 AF 32 |NU.100:.MEM,NU.2|
000041C0: 35 35 3A 97 4D 45 4D AA 31 2C B5 28 4E 55 AD 32 |55:.MEM.1,.(NU.2|
000041D0: 35 36 29 3A 4D 45 4D B2 4D 45 4D AA 32 3A 8E 00 |56):MEM.MEM.2:..|
000041E0: 00 00 |.. |
..D.... THE JOFFE PLAN/PARTA - VERSION
1 (8/10/84) - DISK AND TAPE.R....".":.:
.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$."CRACKED BY GTS"
:.IW(22,3,3).Q.....L(X)..(X.4..(X.4)).(X
.100..(X.100))..1.^....25:.124.H...R1.24
.X...R2.24:.10:.......781,R:.782,C:.783,
0:.(65520):.......RC.R1.R2:.781,RC:.(599
03):.RC......RC.217.241:.RC,B(RC).128:.R
C:.......7:C.13:R.24:.9:."..PRESS ";:FL$
." SPACE ":.198,0.&...FL.1:.39.6....G$..
" ".13.E....7:.".";:..D...H$.T$:.".":.17
:."..."SP$:......SP..((40.C(H$)).2):."..
".SP);H$:......R.24:C.1:.9......".TYPE .
.P.. TO PRINT - ..C.. TO CONTINUE ";:RK
.0:AL$."CPCP":.36.....EF.0:.RK$."C".RK$.
"C"........7:D.4:.109:.EF.1.D.0:..N....4
,4,7:.4:.".THE JOFFE PLAN":."===========
===":..Q...A$.NA$:.H(A$,1)."*".A$.J(A$,2
)......".SUBJECT : "A$:.".STARTING DATE
: "SD$:.:......SP$."
":.".":R.1:C.0:.9.).
...".."SP$:.".. IVAN BERG SOFT
WARE ":.".."SP$.N...R.8:C.0:.9
:H$.T$:.17:R.10:C.0:.9.....H$."YOUR PERS
ONAL NO-DIET WEIGHT CONTROL":.17:.:H$."S
YSTEM":.17......EN.1.32.Z...R.15: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$.I.!.."..
(C) (P) 1984 ".].".."
.."SP$;:.12:....$.RK$."":CH.0:.198,0:.RK
.0.AL$." -.":.RK.1.AL$."0123456789/.":.R
K.3.L.8...&.FL$."?":FL.1:.39:.45...'.R$.
"..":.FL..1.R$.".."...(.FL..FL:.R$;FL$;:
.DE.1.C(FL$):.".";:.DE:.DE.1.25:G$."":.G
$.'.)..G$."".43.6.*.FL.2:DE.25.F.+..DE:.
FL.2...N.,..39...-..G$.G(20).RK$.."".RK$
.H(RK$,C(RK$).1):.".. ..";:.38......G$.
.G(13).(G$.G(13).RK$."").49.../..". ";:L
M.0:.RK.2.CH.E(RK$):..(CH).CH.RK$.J(D(CH
),2)...0...*.1..G$.G(13).G$.G(20).((RK.1
.RK.3).C(RK$).L).(RK.0.RK$.."").38.].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...4..K.1.C(AL$):.G$..
J(AL$,K,1)..K:.38.S.5.K.C(AL$):.K:.RK..2
.68...6..RK$."".((G$."0".ZE.0).G$.".").E
(RK$.G$).LM.38.0.7.XY.0:.K.1.C(RK$):.J(R
K$,K,1).".".XY.1.N.<..K:.G$.".".(XY.1.DP
.0).38.J.D.RK$.RK$.G$:.".."G$;:.38...O..
16:."... "TS$:.".. ENTER DATE IN THE FOR
MAT"...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).-.R..A$."/".CT.CT.1:.84.D.S.DT$(CT
).DT$(CT).A$.Z.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.W.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).C.X..I:DA$.DT$(0)."/
".DT$(1)."/".DT$(2):A$."":..X.Y..:.".. I
NVALID ENTRY. PLEASE TRY AGAIN.":.12:.79
...Z.." ..Y.. OR ..N.. ";:RK.0:AL$."YNYN
":.36:....[..C(FD$).39..FD$:.95...\..J.3
9.1..1:X$.J(FD$,J,1):.X$.." ".94.$.]..H(
FD$,J.1):FD$.I(FD$,C(FD$).J.1):J.1:.SP.1
.FD$.".".FD$./.^..J:.91.:._.SP.0:..X.`.R
.24:C.0:.9:.". PRESS ..P.., ..N.. OR
TYPE NUMBER";:....A.Y$."":.WM.1.X..((X.
4.536).0.5).10:.101.D.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.=.E.XX$.D(X):.X.1.X.0.XX$.
" 0".J(XX$,2).G.F.Y$.Y$.XX$:Y$.J(Y$,2):.
WM.2.Y$.Y$."LB".M.G.....H..WM.3.Y.E(Y$):
.108...I..WM.1.Y.E(Y$).2.205:.108.K.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...<.M.EF.0:.1,D,6:.7
81,1:.(65481):.B(783).1.EF.1.S.N..(65511
):.EF.0.114...O..16:."..":H$.".DEVICE NO
T PRESENT":.17:TS$."PRINTER"...P..D.8.TS
$."DISK DRIVE"...Q..".":H$."PLEASE CONNE
CT ".TS$." AND THEN...":.17:.12...R.....
S..16.#.T..K.1.QL:.".. ."Q$(K):.K:.K.1.L
M:.". .."J(D(K),2);.A.U..". .";OP$(K):.K
:.".. .OPTION - ";:DP.0:ZE.0:RK.2:.36:
..U.V..WM..2.." "WM$;.}.W..:....X.H$." P
OUND":.WM.1.H$." KILO"...Y..X..1.H$.H$."
S"...Z...L.{.EN.1:.25:.64738...|..16:.".
. THIS PROGRAM SHOULD BE USED TO SET UP"
.0.}..". YOUR PERSONALISED WEIGHT CONTRO
L PLAN."._.~..". ANSWER ALL THE QUESTION
S HONESTLY, AS".....". THE INFORMATION
YOU GIVE HERE IS"......". USED THROUGHOU
T THE PLAN.":.12:.16......". .IF YOU ARE
USING THE CASSETTE VERSION"......".. OF
THE PROGRAM, PLEASE LEAVE THE PLAY".D..
..". KEY DEPRESSED. IF YOU ARE LOADING F
ROM"......". DISK, LEAVE THE DISK IN PLA
CE . THROUGHOUT THE PROGRAM."..
....12.G...TS$."TODAY'S DATE":.79:SD$.DA
$:.16:L.15:RK.1......".. PLEASE TYPE IN
YOUR NAME (MAX. 15 . CHARACTERS)":.
". ";......36:NA$.RK$:..G....".. WHAT SE
X ARE YOU? ..M.. OR ..F. ";:RK.0:AL$."MF
MF":.36:SX$.RK$......:.".. HOW OLD ARE Y
OU, ";NA$;"? ";:LM.99:RK.2:.36:AG.CH....
..AG.18.TS$."AGE":.167.....Q$(1).".WOULD
YOU LIKE WEIGHTS TO BE GIVEN IN":QL.1:O
P$(1)."KILOGRAMS".T...OP$(2)."STONES AND
POUNDS":OP$(3)."POUNDS":LM.3:.115:WM$.O
P$(CH):WM.CH.Z....:LM.450:.WM.1.WM$."KIL
OS":LM.205......".. HOW MUCH DO YOU WEIG
H?":.WM..2.." .("WM$") : ";:.147......".
.STONES : ";:LM.30:RK.2:.36:RK$.RK$."ST
":TW$.RK$......TS..2.SW$.RK$.(...." .
POUNDS :";:LM.13.99:ZE.1.R...." ";:RK.2:
DP.1:.36:DP.0:ZE.0:.TS.2...U...SW$.SW$.R
K$:.WM.2.SW$.SW$."LB".....Q$(1)."DO YOU
WANT TO GIVE YOUR HEIGHT IN":QL.1:OP$(1)
."CENTIMETRES".....OP$(2)."FEET AND INCH
ES":LM.2:.115:.:OP.CH.....HT.0:.".. HOW
TALL ARE YOU?":LM.240:.OP.1.154.X....".
.FEET : ";:LM.10:RK.2:.36:HT.CH.12:HT$.R
K$."FT "......" .INCHES :";:LM.11.99:Z
E.1:DP.1:.155......". (";OP$(OP);")";.X.
..." ";:RK.2:.36:HT.HT.CH:HT$.HT$.RK$:.O
P.1.HT$.HT$."CM"......OP.2.HT$.HT$."IN":
.158.....HT.HT.0.3937.3....16:.".. DATE:
."SD$:.".. NAME: ."NA$.`...TS$."MAL
E":.SX$."F".SX$."F".TS$."FEMALE"... ..".
. SEX: ."TS$:.".. AGE: ."AG:.".. WE
IGHT: ."SW$;......118:.".. HEIGHT: ."HT$
......"... ARE THESE DETAILS CORRECT? ";
:.90.&....RK$."N".RK$."N".SD$."":NA$."":
SX$."":AG.0:SW$."":HT$."":.134.O...X.57:
T.21:.SX$."F".SX$."F".X.53:T.22.K...A..(
HT).X:.A.0.A..T.174.|...TS$."HEIGHT".D..
..16:."... SORRY - WE HAVE NO FIGURES AV
AILABLE . FOR YOUR "TS$".".S....AG.17.
171......". AT YOUR AGE, YOU SHOULD NOT
CONSIDER".A....". LOSING WEIGHT UNLESS Y
OUR DOCTOR HAS . SUGGESTED IT.".S...."
.. IF YOU REALLY THINK YOU ARE OVERWEIGH
T,"......" ASK YOUR DOCTOR TO SUGGEST AN
".N....". 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.X ..A.HT.X:Y$.SW$:.104:W
T.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$.L ..X.WT(3):.
97:B1$.Y$:X.WT(5):.97:C1$.Y$..!...16:.".
.. YOUR WEIGHT IS ."SW$;:.118:.".. YOUR
IDEAL ";.<!..."WEIGHT SHOULD BE BETWEEN.
":H$.A1$." AND ".C1$.U!...WM..2.H$.H$."
".WM$.L!...17:.WT..WT(2).187..!..."... Y
OU SHOULD NOT BE LIGHTER THAN YOU ARE".J
!...". AT THE MOMENT - IN FACT YOU SHOUL
D"..!...". CONSIDER GAINING SOME WEIGHT!
".+"...". YOU CERTAINLY DON'T NEED THIS
PROGRAM.":WL.1:.205.?"...WT.WT(3).1.190.
O"..."... RELAX! YOUR WEIGHT IS IDEAL. U
SE THE".."...". PROGRAM TO KEEP YOUR WEI
GHT STEADY.":WL.2:.205.."...WT.WT(5).195
.."..."... YOU ARE IN THE HAPPY POSITION
OF BEING"..#...". ABLE TO DECIDE FOR YO
USELF WHETHER OR".J#A..". NOT YOU WANT T
O LOSE WEIGHT. IF YOU ARE"..#B.." HAPPY
AND HEALTHY - STAY AS YOU ARE.":WL.3:.20
5..#C.WL.5:.WT.WT(5).(WT(5).WT(3)).WL.4:
.201.Z#D.."... YOU ARE OBVIOUSLY VERY OV
ERWEIGHT."..$E..". IF YOU HAVEN'T DONE S
O ALREADY, VISIT".7$F..". YOUR DOCTOR -
THERE MAY BE SOME NEED".E$G..". FOR MEDI
CAL TREATMENT IN ADDITION TO"..$H..". TH
IS WEIGHT CONTROL PROGRAM.":.12:.16:.202
.I$I.."... YES, YOU PROBABLY SHOULD LOSE
WEIGHT."..$J..". THE BEST WAY TO LOSE W
EIGHT - AND KEEP".(%K..". IT OFF! - IS T
O LOSE IT SLOWLY OVER A".A%L..". PERIOD
OF TIME.".Y%M..12:.16:.".. NO MATTER WHA
T YOUR WEIGHT, YOU WOULD"..%N..". BE SUR
E TO BENEFIT FROM AN INCREASE . IN EX
ERCISE."..%O..". THIS WILL IMPROVE YOUR
METABOLIC RATE"..&P..". AND TONE UP YOUR
MUSCLES, WHICH WILL".S&Q..". MAKE YOU L
OOK SLIMMER AND FEEL FITTER.":.12:.WL.4.
216..&R..16:.".. WARNING":.".. IF YOU AR
E NOT USED TO REGULAR"..&S..". EXERCISE,
TAKE IT EASY TO BEGIN WITH."..&T..". RE
MEMBER, BECAUSE YOU ARE CARRYING"..'U.."
. EXTRA WEIGHT, YOU WILL USE A LOT MORE"
.D'V..". CALORIES THAN MOST PEOPLE IN DO
ING".F'W..". EVEN LIGHT EXERCISE.":.12.T
'X..WL.1.123..'Y..WL.2.WT(1).0:WT(4).0:T
D.0:.245.Q'Z.WT(1).WT(3):..(WT.WT(1)).1.
WT(1).0:WT(4).0:TD.0:.245.Y'...16..(...W
L.3.TS.0..".. ........":." .OPTIONAL.":.
". ........".G(...".. TARGET WEIGHT : ."
;:X.WT(1):.97:.Y$;:.118.X(...TS.4.TD.0..
.F(...TS.4.228..(...:.". TO ACHIEVE THIS
, YOU NEED TO LOSE":X.WT.WT(1):.97.I(...
". ."Y$;:.WM..2.X.E(Y$):.120:.H$;.W(...T
S.3.228..)..WT(4).0.5:RL$."0.5 POUNDS":.
WM.1.RL$."0.2 KILOS".5)...:.".. AT A RAT
E OF "RL$" PER WEEK,".L)...". YOU 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..)..ND.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.P*..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.T*..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$.F+..
C$.J(C$,2):.E(C$).10.C$."0".C$.L+..A$.A$
."/".B$."/".C$:.EN.1.WL..5...+..TD$.A$:
.EN.1....+..."."TD$:.TS.4....+...12..+..
.TS.0..275..+...D..4..16..+...".. YOUR W
EIGHT : .";SW$;:.118..,...".. TARGET
WEIGHT : .";:.WT(1).0.251.J,..."NONE":T
S.1:.WL.2..".. YOUR PRESENT WEIGHT IS ID
EAL.":.253..,...".. YOU HAVE CHOSEN TO S
TAY AS YOU ARE. . GOOD FOR YOU!":.253
.Q,..X.WT(1):.97:.Y$;:.118:.".. RATE OF
LOSS : ."RL$" PER WEEK"..,...".. TARGE
T DATE : ."TD$..-..TS.0:.EN.1...?-..T
S$(1)."ANY OF THESE FIGURES":TS$(2)."THE
TARGET WEIGHT".V-..TS$(3)."THE RATE OF
LOSS":TS$(4)."THE TARGET DATE"..-..TS.TS
.1:.TS.4..275:.264.K-..WW.0:R1.15:.8:R.1
5:C.0:.9:.". DO YOU WANT TO CHANGE"..-..
.". "TS$(TS)"? ";:.90:.RK$."N".RK$."N".2
61......TS.1.256......312. ....TS.1.TS.4
.7....TS.2.WT(4).0.TS.4.@....256.P....TD
.183.287......16:NA$."*".NA$:.".. YOU WI
LL FIND IT EASIER TO STICK TO"......". T
HE PROGRAMME IF YOU HAVE A MORE"......".
IMMEDIATE TARGET. THE INITIAL TARGET"..
/...". WEIGHT IS THEREFORE GIVEN AS THE"
.>/...". EXPECTED WEIGHT AFTER SIX MONTH
S, AT".M/...". YOUR CHOSEN RATE OF LOSS.
IF YOU WANT"../...". TO LOSE STILL MORE
WEIGHT, USE PROGRAM".W/...". 1 TO SET U
P ANOTHER PLAN AFTER SIX . MONTHS.".
.0...12:.16:WT(1).WT(1).(WT(4).(TD.182).
7).)0..TD.182:DY.TD:EN.1:.231:TD$.A$:.28
7._0...(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....G0...16:.".
. IT MAY BE QUITE DIFFICULT TO ACHIEVE".
.1...". "TS$(TS)" YOU HAVE CHOSEN.":.".
YOU SHOULD SERIOUSLY CONSIDER".A1...". A
CCEPTING THE FIRST SUGGESTED FIGURE.":.1
2.G1....Y1...16:.". DO NOT BE TOO SURPRI
SED IF THIS PLAN"..1...". DOES NOT WORK
FOR YOU - THE FIGURES".S1...". YOU HAVE
CHOSEN MAY BE DIFFICULT TO"..2...". ACHI
EVE. HOWEVER, IF YOU WANT TO TRY"..2..."
. IT, GO AHEAD - AND GOOD LUCK!":.12:..Q
2..EN.1:.246:.D.4..4: 4:D.D1:.287.C2 ..1
8:.EF.1.287.|2!..RK$."P".RK$."P".287..2"
.Q$(1)."THE SECOND PART OF THE PROGRAM M
UST"..2#.Q$(2)."NOW BE LOADED. ARE YOU L
OADING FROM ":QL.2:OP$(1)."DISK?".-3$.OP
$(2)."TAPE?":LM.2:.115:.:D.1:.CH.1.D.8:.
109:.EF.1.290.B3%..16:."... PLEASE WAIT
WHILE 'PARTB' IS LOADING.".O3&..D.8.297.
.3'..". THIS WILL TAKE JUST OVER 1 MINUT
E."..3)..450:.12:."...... ";:."PARTB",D.
.3*..".. THIS GIVES A TARGET DATE OF":."
. ";:.230:..>4+..".. THIS COULD LEAD TO
ILL-HEALTH AND IS . THEREFORE UNACCEPT
ABLE.".H4,..12:...4-..".. OKAY - TRY IT
YOUR WAY. AND GOOD LUCK . TO YOU!"..4..
.12:...4/..".. HOW ABOUT A COMPROMISE -
":.". "Y$:...40..".. WILL YOU ACCEPT THI
S? ";:.90:...51..".. IT IS ADVISABLE TO
LOSE WEIGHT SLOWLY.":.12:.16.P52..".. WE
SUGGEST A RATE OF "TS$:.". PER WEEK.":.
.R53..".. PLEASE TRY AGAIN.":.12:...54..
TW.2.WM.1.TW.2.205..55.TS$.D(TW):TS$.J(T
S$,2):X.TW:.97:TS$.Y$.Y56.X.E(TS$):.WM..
2..120:TS$.TS$.H$..57....58..TS.2.349..6
9..16:.WL.2.WW.0.318.46:..".. YOUR PRESE
NT WEIGHT IS IDEAL. ARE YOU".`6;..". SUR
E YOU WANT TO LOSE WEIGHT?.":.90..6<..RK
$."N".RK$."N".TS.4:WT(1).0:WT(4).0:TD.0:
.245..6=..16..6>.."... PRESENT TARGET WE
IGHT : .";:X.WT(1):.X.0.."NONE":.320..6?
..97:.Y$;:.118..7@.WW.1:.:.".. REQUESTED
TARGET WEIGHT ".M7A..WM..2.." .("WM$")
: ";:LM.500:.147:TW$.RK$:.323.H7B..144:T
W$.TW$.RK$."LBS"..7C..:Y$.TW$:.104:RQ.Y:
.WT.RQ..1.327..7D..WT.RQ..0.327.P7E.."..
YOU EITHER WANT TO LOSE SOME WEIGHT OR"
..8F..". YOU DON'T. NO HALF MEASURES, PL
EASE!":.12:.317.-8G..RQ.WT(2).(WT(3).WT(
2))..299:.317.=8H..RQ..WT.331.L8I..".. Y
OUR CHOSEN TARGET WEIGHT IS GREATER"..8J
..". THAN YOUR CURRENT WEIGHT.":.307:.31
7..8K..RQ..WT(2).342..8L..".. YOU SHOULD
NOT WEIGH LESS THAN":.". "A1$;..8M.TW.W
T(2):.118:.304:.339..9N.R1.16:.8:R.16:C.
0:.9.-9O..WW.4.X..1..301:.347.F9P.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.T
W:.347.N9T.WW.WW.1:.WW.2.TW.RQ..9U.X.TW:
.334..9V..RQ..WT(5).347..:W..".. YOU ARE
OVERWEIGHT AND NEED TO LOSE".I:X..". SO
ME WEIGHT. THE COMPUTER WILL NOT"..:Y.."
. ACCEPT A TARGET WEIGHT GREATER THAN":X
.WT(5):RQ.X:.97..:Z..". "Y$;:.118:.12.K:
[.WT(1).RQ:.WT.RQ.WT(1).0:WT(4).0:TD.0:.
245.T:\..219..:].X$.RL$..:^..TS.3.388.(;
_..16:.".. PRESENT RATE OF LOSS : ."X$:.
.23)". PER WEEK".X;`..".. DESIRED RATE (
";:.WM.1.."POUNDS";:.354.F;A.."KILOS";..
;B.." PER WEEK) : ";:ZE.1:LM.10:DP.1:RK.
2:.36:.:RQ.E(RK$).D;C.TS$.RK$:.WM.1.Y$.R
K$:.104:RQ.Y.T;D..RQ.0.2.359..<E..".. YO
U COULD EASILY LOSE WEIGHT AT A".*<F..".
FASTER RATE.":TW.0.5:.12:.16:.367.9<G..
RQ..6.362.Y<H..299:TW.WT.WT(1):.TW.2.TW.
2.F<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 WEIGHT TO
LOSE SO . WHY RUSH?"..=M.TW.WT.WT(1):.T
W.0.5.TW.0.5..=N..12:.16.C=O.TD.0:.308:.
306:WT(4).TW:RL$.TS$:WW.0:.TS.3.369.L=P.
.298.J=Q..304:.RK$."N".RK$."N".350.X=R..
TS.3.219..=S..387..=T..(WM.1.E(RQ$).1).(
WM.1.E(RQ$).2).374..=U..12:TD$.TW$:.386.
M=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.E>{.TW..(((RQ.((RQ.TW).2)
).10).0.5).10.O>|..308:.TS.4..((WT.WT(1)
).TW).1.WK.WW.3..>}..WW.3.TD$.TW$:.301:.
386..>~.Y$.TS$." PER WEEK.":.303..>..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.Q
?..TS$."CHOSEN TARGET DATE":.79:TW$.DA$:
...?..A.E(I(TW$,2)).10000.E(J(TW$,4,2)).
100.E(H(TW$,2))..?..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)).=@..I.E(J(S
D$,4,2)):J.E(J(TW$,4,2)):.I.J.A.B.401.W@
..J.J.1:.J.0.J.12:A.A.1.P@..ND..B(I).E(H
(SD$,2))..@...I.J.A.B.402..@..I.I.1:.I.1
3.I.1:B.B.1..@..ND.ND..B(I).D@...I.2..L(
B).0.ND.ND.1.M@...396..@..ND.E(H(TW$,2))
.E(H(SD$,2)):.403..A..ND.ND.E(H(TW$,2)).
)A..TD.ND:WK..(TD.7):.WK.TD.7.406.JA..ND
.WK.7.7:WK.ND.7:DY.ND:TD.ND:.".. WEEK EN
DING DATE: ";:.231.YA..TW$.A$:.12..A...2
19:.".. YOU HAVE ";:X.WT.WT(1):.97:.Y$;:
.WM.2.408.GA..X.E(Y$):.120:.H$;..A..." T
O LOSE IN"TD:.". DAYS."..B..A..((WT.WT(1
)).WK.10.0.5).10..B..TW.A:.309.*B...E(TS
$).0.1.413.AB...".. THIS WOULD GIVE A RA
TE OF "TS$:.". PER WEEK.".WB..RQ.A:RQ$.T
S$:.356..B...94,107,124,97,108,126,98,11
0,128,98,110,127.YB...100,111,130,101,11
3,132,101,113,130,103,114..C ..133,104,1
16,135,104,116,133,106,118,136,108.;C...
120,138,107,119,136,110,122,140,112,124,
142.LC...109,122,139,113,126,143,114,128
,145,112,125..C...143,117,130,148,118,13
2,150,115,128,146,120.NC...134,152,122,1
35,154,118,131,150,124,138,157..C...126,
140,157,120,134,153,127,142,161,129,144.
0D...163,123,137,156,131,146,166,133,148
,168,126.AD...140,159,134,150,170,136,15
2,172,129,144,163..D...138,154,175,141,1
57,177,131,146,166,141,157.CD...179,144,
160,180,134,150,170,145,162,184,148..D..
.165,185,137,152,173,148,165,188,151,168
,189.%E...140,156,177,151,169,192,154,17
2,195,143,160.VE...180,155,172,195,158,1
75,197,146,163,184,158..E...175,200,160,
178,202,149,167,188,161,179,203..E...164
,182,205,152,171,193,164,183,207,168,186
,209..E...78,87,99,78,87,99,80,89,100,82
,91,103,82,91,103,84,93,105.<F...85,94,1
07,85,94,107,87,96,109,87,97,111,87,97,1
11,89,99,113.XF...90,101,115,90,101,115,
92,102,117,92,104,118,94,104,119..F...95
,106,120,94,106,121,97,108,123,98,110,12
5,97,109,124..F...100,111,127,102,113,12
9,100,112,127,103,115,131,105,117,134.6G
...103,115,130,106,118,135,109,120,138,1
06,118,133,109,122,139.WG...111,124,142,
109,121,136,112,125,143,114,127,146,112,
124,139..G...115,129,147,117,131,149,115
,127,144,119,132,151,121,134,153..G...11
8,130,146,122,136,154,124,139,156,121,13
3,148,125,140,158.:H...126,142,159,124,1
36,152,129,144,162,130,145,163,127,140,1
55.{H...133,148,166,134,149,166,130,144,
158,137,152,170,137,153,170..H...132,147
,162,140,156,174,141,157,174,135,150,165
,143,159,177..H...144,160,178,138,154,16
9,145,163,181,146,164,180.&IB.MEM.49152:
PO$.NA$:.460:PO$.SW$:.460:PO$.SD$:.460.E
IG..A.1.4:NU.WT(A):.465:.A:NU.AG:.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.M
EM.A.1:...IQ.NU.NU.100:.MEM,NU.255:.MEM.
1,.(NU.256):MEM.MEM.2:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL