HANGMATH
FILE INFORMATION
FILENAME(S): HANGMATH
FILE TYPE(S): PRG
FILE SIZE: 5K
FIRST SEEN: 2025-11-30 01:08:06
APPEARS ON: 1 disk(s)
FILE HASH
1f2eba5eecbdd2bd3de8f85b04f6a86fb38f7f1e9e0e9cb385ad629e95c67df9
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | HANGMATH | PRG | Treasure Chest - Wolfgang Rauprich | 30 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 28 04 0A 00 8F 20 2A 2A 20 53 45 45 20 54 |..(.... ** SEE T|
00000010: 49 54 4C 45 20 50 41 47 45 20 46 4F 52 20 43 52 |ITLE PAGE FOR CR|
00000020: 45 44 49 54 53 20 2A 2A 00 4F 04 14 00 8F 20 2A |EDITS **.O.... *|
00000030: 2A 20 20 20 55 53 45 20 4F 4E 4C 59 20 20 4E 4F |* USE ONLY NO|
00000040: 54 20 46 4F 52 20 53 41 4C 45 20 20 20 2A 2A 00 |T FOR SALE **.|
00000050: 5B 04 28 00 9C 3A 8D 32 30 30 30 00 8D 04 32 00 |[.(..:.2000...2.|
00000060: 58 58 24 B2 22 91 20 20 20 20 20 20 20 20 20 20 |XX$.". |
00000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 A2 04 | "...|
00000090: 3C 00 53 24 B2 22 13 11 11 11 11 11 11 11 11 11 |<.S$."..........|
000000A0: 11 22 00 D4 04 46 00 86 20 41 28 34 2C 35 29 2C |."...F.. A(4,5),|
000000B0: 42 28 34 2C 35 29 2C 43 28 34 2C 35 29 2C 45 24 |B(4,5),C(4,5),E$|
000000C0: 28 34 2C 35 29 2C 48 4D 24 28 31 32 29 2C 50 24 |(4,5),HM$(12),P$|
000000D0: 28 31 33 29 00 EA 04 48 00 81 4A B2 31 A4 31 32 |(13)...H..J.1.12|
000000E0: 3A 87 48 4D 24 28 4A 29 3A 82 00 33 05 49 00 83 |:.HM$(J):..3.I..|
000000F0: 20 22 48 45 41 44 22 2C 22 55 50 50 45 52 20 42 | "HEAD","UPPER B|
00000100: 4F 44 59 22 2C 22 4C 4F 57 45 52 20 42 4F 44 59 |ODY","LOWER BODY|
00000110: 22 2C 22 4C 45 46 54 20 41 52 4D 22 2C 22 52 49 |","LEFT ARM","RI|
00000120: 47 48 54 20 41 52 4D 22 2C 22 4C 45 46 54 20 4C |GHT ARM","LEFT L|
00000130: 45 47 22 00 77 05 4A 00 83 20 22 52 49 47 48 54 |EG".w.J.. "RIGHT|
00000140: 20 4C 45 47 22 2C 22 4C 45 46 54 20 48 41 4E 44 | LEG","LEFT HAND|
00000150: 22 2C 22 52 49 47 48 54 20 48 41 4E 44 22 2C 22 |","RIGHT HAND","|
00000160: 4C 45 46 54 20 46 4F 4F 54 22 2C 22 52 49 47 48 |LEFT FOOT","RIGH|
00000170: 54 20 46 4F 4F 54 22 00 A0 05 4B 00 83 20 22 20 |T FOOT"...K.. " |
00000180: 20 20 20 20 20 20 2A 2A 2A 2A 2A 20 59 4F 55 27 | ***** YOU'|
00000190: 52 45 20 48 55 4E 47 21 21 20 2A 2A 2A 2A 2A 22 |RE HUNG!! *****"|
000001A0: 00 E9 05 4C 00 50 24 28 30 29 B2 22 9D 9D 9D 9D |...L.P$(0)."....|
000001B0: 9D 9D 9D 9D 9D 9D 9D 9D 12 C0 C0 C0 B1 C0 C0 C0 |................|
000001C0: C0 C0 C0 C0 C0 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
000001D0: 9D 11 20 20 48 41 4E 47 4D 41 54 48 20 20 9D 9D |.. HANGMATH ..|
000001E0: 9D 9D 9D 9D 9D 9D 9D 91 22 00 1F 06 4D 00 50 24 |........"...M.P$|
000001F0: 28 30 29 B2 50 24 28 30 29 AA 22 91 DD 91 9D DD |(0).P$(0).".....|
00000200: 91 9D DD 91 9D DD 91 9D DD 91 9D DD 91 9D DD 91 |................|
00000210: 9D DD 91 9D B0 C0 C0 C0 C0 AE 92 11 9D DD 22 00 |..............".|
00000220: 38 06 4E 00 50 24 28 31 29 B2 22 9D 9D 9D 9D 91 |8.N.P$(1).".....|
00000230: 91 91 91 91 91 91 D7 22 00 50 06 4F 00 50 24 28 |.......".P.O.P$(|
00000240: 32 29 B2 22 9D 9D 9D 9D 91 91 91 91 91 91 DB 22 |2)."..........."|
00000250: 00 67 06 50 00 50 24 28 33 29 B2 22 9D 9D 9D 9D |.g.P.P$(3)."....|
00000260: 91 91 91 91 91 B1 22 00 80 06 51 00 50 24 28 34 |......"...Q.P$(4|
00000270: 29 B2 22 9D 9D 9D 9D 9D 91 91 91 91 91 91 AD 22 |)."............"|
00000280: 00 97 06 52 00 50 24 28 35 29 B2 22 9D 9D 9D 91 |...R.P$(5)."....|
00000290: 91 91 91 91 91 BD 22 00 AF 06 53 00 50 24 28 36 |......"...S.P$(6|
000002A0: 29 B2 22 9D 9D 9D 9D 9D 91 91 91 91 91 D5 22 00 |)."...........".|
000002B0: C5 06 54 00 50 24 28 37 29 B2 22 9D 9D 9D 91 91 |..T.P$(7).".....|
000002C0: 91 91 91 C9 22 00 DF 06 55 00 50 24 28 38 29 B2 |...."...U.P$(8).|
000002D0: 22 9D 9D 9D 9D 9D 91 91 91 91 91 91 91 BB 22 00 |".............".|
000002E0: F7 06 56 00 50 24 28 39 29 B2 22 9D 9D 9D 91 91 |..V.P$(9).".....|
000002F0: 91 91 91 91 91 AC 22 00 0F 07 57 00 50 24 28 31 |......"...W.P$(1|
00000300: 30 29 B2 22 9D 9D 9D 9D 9D 91 91 91 91 BE 22 00 |0)."..........".|
00000310: 25 07 58 00 50 24 28 31 31 29 B2 22 9D 9D 9D 91 |%.X.P$(11)."....|
00000320: 91 91 91 BC 22 00 5B 07 59 00 50 24 28 31 32 29 |....".[.Y.P$(12)|
00000330: B2 22 9D 9D 9D 9D 9D 91 91 91 91 91 91 AC DD BB |."..............|
00000340: 11 9D 9D 9D AD DB BD 11 9D 9D 9D D5 B1 C9 11 9D |................|
00000350: 9D 9D BC 20 BE 11 11 11 1D 1D 22 00 A3 07 5A 00 |... ......"...Z.|
00000360: 50 24 28 31 33 29 B2 22 9D 9D 9D 9D 9D 91 91 91 |P$(13)."........|
00000370: 91 91 91 91 20 1D 20 11 9D 9D 9D 20 DD 20 11 9D |.... . .... . ..|
00000380: 9D 9D 20 20 20 11 9D 9D 9D 20 20 20 11 9D 9D 9D |.. .... ....|
00000390: 20 20 20 11 11 11 1D 1D 22 3A 97 35 39 34 36 38 | .....":.59468|
000003A0: 2C 31 32 00 BC 07 5B 00 99 22 93 20 53 45 54 54 |,12...[..". SETT|
000003B0: 49 4E 47 20 55 50 20 2E 2E 2E 2E 22 00 E5 07 5C |ING UP ...."...\|
000003C0: 00 81 42 B2 30 A4 31 30 3A 4B 28 42 29 B2 AB 31 |..B.0.10:K(B)..1|
000003D0: 3A 51 24 28 42 29 B2 22 22 3A 43 4B 24 28 42 29 |:Q$(B)."":CK$(B)|
000003E0: B2 22 22 3A 82 00 F6 07 5E 00 99 53 24 3B 22 11 |."":....^..S$;".|
000003F0: 11 11 11 11 11 22 00 0E 08 64 00 57 B2 30 3A 46 |....."...d.W.0:F|
00000400: 24 B2 22 22 3A 52 31 B2 BB 28 AB 54 49 29 00 22 |$."":R1..(.TI)."|
00000410: 08 6E 00 43 24 B2 22 41 42 43 44 45 46 47 48 49 |.n.C$."ABCDEFGHI|
00000420: 4A 22 00 38 08 78 00 52 B2 B5 28 C3 28 43 24 29 |J".8.x.R..(.(C$)|
00000430: AC BB 28 31 29 AA 31 29 00 52 08 7D 00 4E 24 B2 |..(1).1).R.}.N$.|
00000440: CA 28 43 24 2C 52 2C 31 29 3A 46 24 B2 46 24 AA |.(C$,R,1):F$.F$.|
00000450: 4E 24 00 6D 08 82 00 8B 52 B1 31 A7 54 24 B2 C8 |N$.m....R.1.T$..|
00000460: 28 43 24 2C 52 AB 31 29 3A 89 31 35 30 00 77 08 |(C$,R.1):.150.w.|
00000470: 8C 00 54 24 B2 22 22 00 8B 08 96 00 43 24 B2 54 |..T$."".....C$.T|
00000480: 24 AA CA 28 43 24 2C 52 AA 31 29 00 9C 08 A0 00 |$..(C$,R.1).....|
00000490: 8B C3 28 43 24 29 B1 30 A7 31 32 30 00 AF 08 AA |..(C$).0.120....|
000004A0: 00 8B C3 28 46 24 29 B3 B1 31 30 A7 31 30 30 00 |...(F$)..10.100.|
000004B0: C8 08 D2 00 4E 28 30 29 B2 31 30 30 AA B5 28 BB |....N(0).100..(.|
000004C0: 28 31 29 AC 39 30 30 29 00 DF 08 DC 00 4E 28 31 |(1).900).....N(1|
000004D0: 29 B2 31 30 AA B5 28 BB 28 31 29 AC 39 30 29 00 |).10..(.(1).90).|
000004E0: 02 09 E6 00 4E 28 32 29 B2 4E 28 30 29 AC 28 4E |....N(2).N(0).(N|
000004F0: 28 31 29 AB 31 30 AC B5 28 4E 28 31 29 AD 31 30 |(1).10..(N(1).10|
00000500: 29 29 00 1B 09 F0 00 4E 28 33 29 B2 4E 28 30 29 |)).....N(3).N(0)|
00000510: AC B5 28 4E 28 31 29 AD 31 30 29 00 2E 09 FA 00 |..(N(1).10).....|
00000520: 4E 28 34 29 B2 4E 28 30 29 AC 4E 28 31 29 00 4A |N(4).N(0).N(1).J|
00000530: 09 FF 00 8B 31 30 AC B5 28 4E 28 31 29 AD 31 30 |....10..(N(1).10|
00000540: 29 B2 4E 28 31 29 A7 32 32 30 00 60 09 04 01 81 |).N(1).220.`....|
00000550: 58 B2 30 A4 34 3A 43 B2 30 3A 81 59 B2 31 A4 35 |X.0.4:C.0:.Y.1.5|
00000560: 00 7F 09 0E 01 41 28 58 2C 59 29 B2 B5 28 4E 28 |.....A(X,Y)..(N(|
00000570: 58 29 AD B5 28 31 30 AE 28 35 AB 59 29 29 29 00 |X)..(10.(5.Y))).|
00000580: 93 09 10 01 42 28 58 2C 59 29 B2 41 28 58 2C 59 |....B(X,Y).A(X,Y|
00000590: AB 31 29 00 D3 09 12 01 43 28 58 2C 59 29 B2 41 |.1).....C(X,Y).A|
000005A0: 28 58 2C 59 29 AB 31 30 AC 42 28 58 2C 59 29 3A |(X,Y).10.B(X,Y):|
000005B0: 45 24 28 58 2C 59 29 B2 CA 28 46 24 2C 43 28 58 |E$(X,Y)..(F$,C(X|
000005C0: 2C 59 29 AA 31 2C 31 29 3A 43 B2 43 AA 43 28 58 |,Y).1,1):C.C.C(X|
000005D0: 2C 59 29 00 E7 09 18 01 8B 43 B2 30 A7 45 24 28 |,Y)......C.0.E$(|
000005E0: 58 2C 59 29 B2 22 22 00 FF 09 22 01 82 3A 4C 28 |X,Y).""..."..:L(|
000005F0: 58 29 B2 C3 28 C4 28 4E 28 58 29 29 29 3A 82 00 |X)..(.(N(X))):..|
00000600: 1D 0A 90 01 99 22 13 48 41 4E 47 4D 41 54 48 20 |.....".HANGMATH |
00000610: 20 20 20 20 20 20 20 11 2A 91 9D 22 3B 00 34 0A | .*..";.4.|
00000620: 92 01 81 58 B2 30 A4 34 3A 81 59 B2 31 A4 35 3A |...X.0.4:.Y.1.5:|
00000630: 54 B2 32 30 00 42 0A 94 01 8B 58 B2 33 A7 54 B2 |T.20.B....X.3.T.|
00000640: 31 38 00 5D 0A 9A 01 99 A3 54 AB 4C 28 58 29 29 |18.].....T.L(X))|
00000650: 3B 45 24 28 58 2C 59 29 3B 22 20 22 3B 00 83 0A |;E$(X,Y);" ";...|
00000660: A4 01 82 3A 8B 58 B2 31 B0 58 B2 33 A7 99 3A 99 |...:.X.1.X.3..:.|
00000670: A3 31 33 29 3B 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.13);"..........|
00000680: C0 91 22 00 8D 0A AE 01 99 3A 82 3A 99 00 9C 0A |.."......:.:....|
00000690: B8 01 8B 57 B2 30 A7 8D 35 30 30 30 00 C8 0A F4 |...W.0..5000....|
000006A0: 01 54 B2 31 3A 8D 33 32 30 30 3A 8B 46 A7 99 22 |.T.1:.3200:.F.."|
000006B0: 9D 12 51 55 49 54 22 3A 57 B2 31 32 3A 8D 35 30 |..QUIT":W.12:.50|
000006C0: 30 30 3A 89 31 30 30 30 00 06 0B F5 01 81 4A B2 |00:.1000......J.|
000006D0: 30 A4 31 30 3A 8B 5A 24 B2 43 4B 24 28 4A 29 A7 |0.10:.Z$.CK$(J).|
000006E0: 4D 24 B2 5A 24 AA 22 20 3D 22 AA C4 28 4A 29 AA |M$.Z$." ="..(J).|
000006F0: 22 2C 20 54 48 49 4E 4B 21 21 22 3A 8D 33 35 30 |", THINK!!":.350|
00000700: 30 3A 89 35 30 30 00 38 0B F7 01 82 3A 8B 4E B2 |0:.500.8....:.N.|
00000710: 4B 28 4E 29 A7 4D 24 B2 CA 28 46 24 2C 4E AA 31 |K(N).M$..(F$,N.1|
00000720: 2C 31 29 AA 22 20 3D 22 AA C4 28 4E 29 3A 8D 33 |,1)." ="..(N):.3|
00000730: 35 30 30 3A 89 35 30 30 00 6E 0B F8 01 8B 5A 24 |500:.500.n....Z$|
00000740: B2 51 24 28 4E 29 A7 4D 24 B2 22 59 4F 55 20 47 |.Q$(N).M$."YOU G|
00000750: 55 45 53 53 45 44 20 54 48 41 54 20 42 45 46 4F |UESSED THAT BEFO|
00000760: 52 45 22 3A 8D 33 35 30 30 3A 89 35 30 30 00 86 |RE":.3500:.500..|
00000770: 0B 08 02 8B 5A 24 B2 CA 28 46 24 2C 4E AA 31 2C |....Z$..(F$,N.1,|
00000780: 31 29 A7 36 30 30 00 9F 0B 12 02 57 B2 57 AA 31 |1).600.....W.W.1|
00000790: 3A 51 24 28 4E 29 B2 5A 24 3A 8D 35 30 30 30 00 |:Q$(N).Z$:.5000.|
000007A0: E0 0B 13 02 8B 57 B2 31 A7 20 99 22 91 91 20 20 |.....W.1. .".. |
000007B0: 20 20 20 20 20 20 20 20 20 20 59 4F 55 52 20 47 | YOUR G|
000007C0: 55 45 53 53 45 53 11 9D 9D 9D 9D 9D 9D 9D 9D 9D |UESSES..........|
000007D0: 9D 9D 9D A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 |..............."|
000007E0: 00 FA 0B 14 02 99 A3 57 AC 31 30 AB 31 30 29 3B |.......W.10.10);|
000007F0: 5A 24 3B 22 20 3D 22 3B 4E 3B 00 09 0C 15 02 8B |Z$;" =";N;......|
00000800: 57 B2 31 32 A7 31 30 30 30 00 12 0C 17 02 89 35 |W.12.1000......5|
00000810: 30 30 00 2A 0C 58 02 4E 31 B2 35 30 3A 81 58 B2 |00.*.X.N1.50:.X.|
00000820: 30 A4 34 3A 81 59 B2 31 A4 35 00 5C 0C 62 02 8B |0.4:.Y.1.5.\.b..|
00000830: 45 24 28 58 2C 59 29 B2 5A 24 A7 45 24 28 58 2C |E$(X,Y).Z$.E$(X,|
00000840: 59 29 B2 22 9D 22 AA C4 28 4E 29 3A 43 4B 24 28 |Y)."."..(N):CK$(|
00000850: 4E 29 B2 5A 24 3A 4B 28 4E 29 B2 4E 00 70 0C 6C |N).Z$:K(N).N.p.l|
00000860: 02 8B 45 24 28 58 2C 59 29 B2 22 22 A7 36 38 30 |..E$(X,Y)."".680|
00000870: 00 81 0C 76 02 4D B2 C6 28 45 24 28 58 2C 59 29 |...v.M..(E$(X,Y)|
00000880: 29 00 90 0C 78 02 8B 4D B2 31 35 37 A7 4D B2 30 |)...x..M.157.M.0|
00000890: 00 9F 0C 80 02 8B 4D B1 4E 31 A7 4E 31 B2 4D 00 |......M.N1.N1.M.|
000008A0: A9 0C A8 02 82 59 3A 82 58 00 B8 0C AA 02 8B 4E |.....Y:.X......N|
000008B0: 31 B3 36 30 A7 37 30 30 00 C3 0C B2 02 99 3A 89 |1.60.700......:.|
000008C0: 34 30 30 00 F3 0C BC 02 99 22 11 20 20 20 20 20 |400......". |
000008D0: 20 20 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A 2A | *******|
000008E0: 2A 2A 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 |*** |
000008F0: 20 11 22 00 27 0D BE 02 99 22 20 20 20 20 20 20 | .".'...." |
00000900: 20 20 20 20 20 20 20 20 59 4F 55 20 47 4F 54 20 | YOU GOT |
00000910: 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |IT |
00000920: 22 3A 89 31 30 34 32 00 56 0D C6 02 99 22 91 20 |":.1042.V....". |
00000930: 20 20 20 20 20 20 20 20 20 59 4F 55 20 48 41 44 | YOU HAD|
00000940: 22 57 22 4D 49 53 54 41 4B 45 53 20 20 20 20 20 |"W"MISTAKES |
00000950: 20 20 20 20 20 22 00 72 0D D0 02 54 31 B2 54 31 | ".r...T1.T1|
00000960: AA 57 3A 55 B2 55 AA 31 3A 54 32 B2 54 32 AA 57 |.W:U.U.1:T2.T2.W|
00000970: AC 57 00 B2 0D DA 02 99 22 11 20 20 20 20 20 41 |.W......". A|
00000980: 56 45 52 41 47 45 20 41 46 54 45 52 20 22 55 22 |VERAGE AFTER "U"|
00000990: 47 41 4D 45 28 53 29 20 49 53 22 B5 28 28 54 31 |GAME(S) IS".((T1|
000009A0: AD 55 29 AA 2E 35 29 22 9D 20 20 20 11 22 3B 58 |.U)..5)". .";X|
000009B0: 58 24 00 D6 0D EE 02 99 22 20 20 20 20 20 20 20 |X$......" |
000009C0: 20 20 20 20 20 41 4E 4F 54 48 45 52 20 47 41 4D | ANOTHER GAM|
000009D0: 45 20 3F 20 22 3B 00 E0 0D F3 02 8D 33 30 30 30 |E ? ";......3000|
000009E0: 00 EF 0D F8 02 8B 41 24 B2 22 59 22 A7 39 31 00 |......A$."Y".91.|
000009F0: 00 0E FC 02 8B 41 24 B3 B1 22 4E 22 A7 37 35 35 |.....A$.."N".755|
00000A00: 00 20 0E 02 03 99 53 24 3B 22 11 53 4F 20 4C 4F |. ....S$;".SO LO|
00000A10: 4E 47 20 21 21 20 20 20 20 20 20 20 20 22 3A 80 |NG !! ":.|
00000A20: 00 3A 0E E8 03 8F 20 53 4F 4C 55 54 49 4F 4E 20 |.:.... SOLUTION |
00000A30: 53 55 42 52 4F 55 54 49 4E 45 00 56 0E E9 03 99 |SUBROUTINE.V....|
00000A40: 22 13 12 53 4F 4C 55 54 49 4F 4E 92 20 20 20 20 |"..SOLUTION. |
00000A50: 20 20 1D 1D 22 3B 00 6D 0E EA 03 81 58 B2 30 A4 | ..";.m....X.0.|
00000A60: 34 3A 81 59 B2 31 A4 35 3A 54 B2 32 30 00 7B 0E |4:.Y.1.5:T.20.{.|
00000A70: EB 03 8B 58 B2 33 A7 54 B2 31 38 00 95 0E EC 03 |...X.3.T.18.....|
00000A80: 45 24 28 58 2C 59 29 B2 22 9D 22 AA C4 28 43 28 |E$(X,Y)."."..(C(|
00000A90: 58 2C 59 29 29 00 B6 0E ED 03 8B 43 28 58 2C 59 |X,Y))......C(X,Y|
00000AA0: 29 B2 30 AF 58 B3 32 AF 59 B3 34 A7 45 24 28 58 |).0.X.2.Y.4.E$(X|
00000AB0: 2C 59 29 B2 22 22 00 D7 0E EE 03 8B 43 28 58 2C |,Y).""......C(X,|
00000AC0: 59 29 B2 30 AF 58 B2 32 AF 59 B3 33 A7 45 24 28 |Y).0.X.2.Y.3.E$(|
00000AD0: 58 2C 59 29 B2 22 22 00 F8 0E EF 03 8B 43 28 58 |X,Y).""......C(X|
00000AE0: 2C 59 29 B2 30 AF 58 B2 33 AF 59 B3 33 A7 45 24 |,Y).0.X.3.Y.3.E$|
00000AF0: 28 58 2C 59 29 B2 22 22 00 19 0F F0 03 8B 43 28 |(X,Y).""......C(|
00000B00: 58 2C 59 29 B2 30 AF 58 B2 34 AF 59 B2 31 A7 45 |X,Y).0.X.4.Y.1.E|
00000B10: 24 28 58 2C 59 29 B2 22 22 00 34 0F F2 03 99 A3 |$(X,Y)."".4.....|
00000B20: 54 AB 4C 28 58 29 29 3B 45 24 28 58 2C 59 29 3B |T.L(X));E$(X,Y);|
00000B30: 22 20 22 3B 00 5A 0F FC 03 82 3A 8B 58 B2 31 B0 |" ";.Z....:.X.1.|
00000B40: 58 B2 33 A7 99 3A 99 A3 31 33 29 3B 22 C0 C0 C0 |X.3..:..13);"...|
00000B50: C0 C0 C0 C0 C0 C0 C0 C0 91 22 00 64 0F 06 04 99 |.........".d....|
00000B60: 3A 82 3A 99 00 80 0F 0E 04 99 22 13 11 11 11 11 |:.:.......".....|
00000B70: 11 11 11 11 11 11 11 11 11 11 20 20 20 20 22 3B |.......... ";|
00000B80: 00 C9 0F 10 04 99 22 23 23 23 23 23 23 23 23 23 |......"#########|
00000B90: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################|
00000BA0: 23 23 23 23 23 23 23 20 20 20 20 20 20 20 20 20 |####### |
00000BB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000BC0: 20 20 20 20 20 20 20 20 22 00 F7 0F 11 04 99 22 | "......"|
00000BD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 59 4F 55 | YOU|
00000BE0: 20 4D 49 53 53 45 44 20 49 54 20 20 20 20 20 20 | MISSED IT |
00000BF0: 20 20 20 20 20 20 22 00 15 10 12 04 81 4A B2 31 | "......J.1|
00000C00: A4 34 3A 99 22 11 22 3B 58 58 24 3B 3A 82 3A 99 |.4:.".";XX$;:.:.|
00000C10: 22 91 91 91 22 00 1E 10 1A 04 89 37 31 30 00 31 |"..."......710.1|
00000C20: 10 D0 07 8F 20 49 4E 53 54 52 55 43 54 49 4F 4E |.... INSTRUCTION|
00000C30: 53 00 5C 10 DA 07 97 35 39 34 36 38 2C 31 34 3A |S.\....59468,14:|
00000C40: 99 22 93 22 3B A3 31 35 29 3B 22 11 11 12 20 C8 |.".";.15);"... .|
00000C50: C1 CE C7 CD C1 D4 C8 20 92 11 11 22 00 97 10 DB |....... ..."....|
00000C60: 07 99 22 20 20 20 20 CF 52 49 47 49 4E 41 4C 20 |.." .RIGINAL |
00000C70: C1 55 54 48 4F 52 53 3A 20 D0 48 49 4C 20 C6 45 |.UTHORS: .HIL .E|
00000C80: 4C 44 4D 41 4E 11 9D 9D 9D 9D 9D 9D 9D 9D D4 4F |LDMAN..........O|
00000C90: 4D 20 D2 55 47 47 22 00 C1 10 DC 07 99 22 11 20 |M .UGG"......". |
00000CA0: 20 20 20 C1 50 52 49 4C 2C 20 31 39 37 37 20 20 | .PRIL, 1977 |
00000CB0: CB 49 4C 4F 42 41 55 44 2C 20 50 47 2E 20 31 31 |.ILOBAUD, PG. 11|
00000CC0: 32 00 04 11 DE 07 99 22 11 20 20 20 20 CD 4F 44 |2......". .OD|
00000CD0: 49 46 49 43 41 54 49 4F 4E 53 20 42 59 3A 20 20 |IFICATIONS BY: |
00000CE0: C7 52 45 47 4F 52 59 20 D9 4F 42 11 9D 9D 9D 9D |.REGORY .OB.....|
00000CF0: 9D 9D 9D 9D 9D 9D 9D D0 41 55 4C 20 C1 47 4F 53 |........AUL .GOS|
00000D00: 54 41 11 22 00 34 11 E4 07 99 22 11 11 20 20 20 |TA.".4....".. |
00000D10: 20 C4 4F 20 59 4F 55 20 4E 45 45 44 20 49 4E 53 | .O YOU NEED INS|
00000D20: 54 52 55 43 54 49 4F 4E 53 20 3F 20 22 3B 3A 8D |TRUCTIONS ? ";:.|
00000D30: 33 30 30 30 00 43 11 EE 07 8B 41 24 B3 B1 22 59 |3000.C....A$.."Y|
00000D40: 22 A7 8E 00 6A 11 F8 07 99 22 93 20 20 20 20 20 |"...j....". |
00000D50: 20 20 20 C8 C1 CE C7 CD C1 D4 C8 A0 C9 CE D3 D4 | .............|
00000D60: D2 D5 C3 D4 C9 CF CE D3 20 22 00 97 11 02 08 99 |........ "......|
00000D70: 22 11 11 20 20 C8 41 4E 47 4D 41 54 48 20 57 49 |".. .ANGMATH WI|
00000D80: 4C 4C 20 50 52 45 53 45 4E 54 53 20 59 4F 55 20 |LL PRESENTS YOU |
00000D90: 57 49 54 48 20 41 22 00 C2 11 0C 08 99 22 4D 55 |WITH A"......"MU|
00000DA0: 4C 54 49 50 4C 49 43 41 54 49 4F 4E 20 50 52 4F |LTIPLICATION PRO|
00000DB0: 42 4C 45 4D 20 57 48 49 43 48 20 48 41 53 20 54 |BLEM WHICH HAS T|
00000DC0: 48 45 00 E4 11 16 08 99 22 44 49 47 49 54 53 20 |HE......"DIGITS |
00000DD0: 52 45 50 4C 41 43 45 44 20 42 59 20 4C 45 54 54 |REPLACED BY LETT|
00000DE0: 45 52 53 2E 00 FA 11 20 08 99 22 11 C6 4F 52 20 |ERS.... .."..OR |
00000DF0: 45 58 41 4D 50 4C 45 3A 11 22 00 1E 12 2A 08 99 |EXAMPLE:."...*..|
00000E00: 22 20 20 20 20 20 20 20 20 41 20 42 20 46 20 20 |" A B F |
00000E10: 20 20 20 20 20 20 20 20 20 34 20 35 20 36 00 42 | 4 5 6.B|
00000E20: 12 34 08 99 22 20 20 20 20 20 20 20 2A 20 20 45 |.4.." * E|
00000E30: 20 44 20 20 20 20 20 20 20 20 20 20 2A 20 20 33 | D * 3|
00000E40: 20 32 00 66 12 3E 08 99 22 20 20 20 20 20 20 20 | 2.f.>.." |
00000E50: C0 C0 C0 C0 C0 C0 20 20 20 20 20 20 20 20 20 20 |...... |
00000E60: C0 C0 C0 C0 C0 C0 00 8A 12 48 08 99 22 20 20 20 |.........H.." |
00000E70: 20 20 20 20 20 48 20 43 20 44 20 20 20 20 20 20 | H C D |
00000E80: 20 20 20 20 20 39 20 31 20 32 00 AC 12 52 08 99 | 9 1 2...R..|
00000E90: 22 20 20 20 20 43 20 45 20 46 20 49 20 20 20 20 |" C E F I |
00000EA0: 20 20 20 20 20 31 20 33 20 36 20 38 00 D0 12 5C | 1 3 6 8...\|
00000EB0: 08 99 22 20 20 20 20 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.." .........|
00000EC0: 20 20 20 20 20 20 20 C0 C0 C0 C0 C0 C0 C0 C0 C0 | .........|
00000ED0: 00 F4 12 66 08 99 22 20 20 20 20 43 20 41 20 42 |...f.." C A B|
00000EE0: 20 48 20 44 20 20 20 20 20 20 20 31 20 34 20 35 | H D 1 4 5|
00000EF0: 20 39 20 32 00 22 13 70 08 99 22 11 11 20 20 20 | 9 2.".p..".. |
00000F00: C8 45 52 45 20 54 48 45 20 4C 45 54 54 45 52 20 |.ERE THE LETTER |
00000F10: 27 C1 27 20 49 53 20 54 48 45 20 44 49 47 49 54 |'.' IS THE DIGIT|
00000F20: 20 34 00 58 13 7A 08 99 22 54 48 45 20 4C 45 54 | 4.X.z.."THE LET|
00000F30: 54 45 52 20 27 C8 27 20 49 53 20 54 48 45 20 44 |TER '.' IS THE D|
00000F40: 49 47 49 54 20 39 20 41 4E 44 20 53 4F 20 4F 4E |IGIT 9 AND SO ON|
00000F50: 2E 22 3A 8D 33 31 30 30 00 80 13 98 08 99 22 93 |.":.3100......".|
00000F60: 11 11 20 20 20 20 20 20 2D C9 CE D3 D4 D2 D5 C3 |.. -.......|
00000F70: D4 C9 CF CE D3 A0 C3 CF CE D4 C9 CE D5 C5 C4 2D |...............-|
00000F80: 00 AB 13 A2 08 99 22 11 11 20 20 D4 4F 20 45 4E |......".. .O EN|
00000F90: 54 45 52 20 41 20 47 55 45 53 53 2C 20 4A 55 53 |TER A GUESS, JUS|
00000FA0: 54 20 54 59 50 45 20 54 48 45 22 00 D7 13 AC 08 |T TYPE THE".....|
00000FB0: 99 22 4C 45 54 54 45 52 20 41 4E 44 20 4E 55 4D |."LETTER AND NUM|
00000FC0: 42 45 52 2E 20 20 C6 4F 52 20 45 58 41 4D 50 4C |BER. .OR EXAMPL|
00000FD0: 45 2C 20 27 C1 34 27 00 03 14 B6 08 99 22 41 4E |E, '.4'......"AN|
00000FE0: 44 20 27 34 C1 27 20 57 49 4C 4C 20 42 4F 54 48 |D '4.' WILL BOTH|
00000FF0: 20 57 4F 52 4B 20 46 4F 52 20 4D 41 54 43 48 49 | WORK FOR MATCHI|
00001000: 4E 47 22 00 2C 14 C0 08 99 22 54 48 45 20 4C 45 |NG".,...."THE LE|
00001010: 54 54 45 52 20 27 C1 27 20 57 49 54 48 20 54 48 |TTER '.' WITH TH|
00001020: 45 20 44 49 47 49 54 20 27 34 27 2E 00 5B 14 CA |E DIGIT '4'..[..|
00001030: 08 99 22 11 20 20 D9 4F 55 20 57 49 4C 4C 20 42 |..". .OU WILL B|
00001040: 45 20 47 49 56 45 4E 20 31 32 20 43 48 41 4E 43 |E GIVEN 12 CHANC|
00001050: 45 53 20 54 4F 20 53 4F 4C 56 45 00 95 14 D4 08 |ES TO SOLVE.....|
00001060: 99 22 54 48 45 20 50 55 5A 5A 4C 45 20 42 45 46 |."THE PUZZLE BEF|
00001070: 4F 52 45 20 54 48 45 20 53 4F 4C 55 54 49 4F 4E |ORE THE SOLUTION|
00001080: 20 49 53 20 20 20 20 20 20 20 44 49 53 50 4C 41 | IS DISPLA|
00001090: 59 45 44 2E 22 00 D7 14 DE 08 99 22 11 20 20 C9 |YED."......". .|
000010A0: 46 20 59 4F 55 20 50 52 45 53 53 20 27 51 27 2C |F YOU PRESS 'Q',|
000010B0: 20 54 48 45 20 53 4F 4C 55 54 49 4F 4E 20 57 49 | THE SOLUTION WI|
000010C0: 4C 4C 20 20 20 42 45 20 47 49 56 45 4E 2E 22 3A |LL BE GIVEN.":|
000010D0: 8D 33 31 30 30 3A 8E 00 F1 14 B8 0B 8F 20 2A 20 |.3100:....... * |
000010E0: 49 4E 50 55 54 20 43 48 41 52 41 43 54 45 52 20 |INPUT CHARACTER |
000010F0: 2A 00 08 15 C2 0B 99 22 12 BF 9D 22 3B 3A 81 4A |*......"...";:.J|
00001100: B2 31 A4 33 35 30 3A 82 00 1F 15 CC 0B 99 22 92 |.1.350:.......".|
00001110: BF 9D 22 3B 3A 81 4A B2 31 A4 33 35 30 3A 82 00 |..";:.J.1.350:..|
00001120: 33 15 D6 0B A1 41 24 3A 8B 41 24 B2 22 22 A7 33 |3....A$:.A$."".3|
00001130: 30 31 30 00 39 15 E0 0B 8E 00 68 15 1C 0C 99 22 |010.9.....h...."|
00001140: 11 11 20 20 20 20 20 20 50 52 45 53 53 20 12 53 |.. PRESS .S|
00001150: 50 41 43 45 20 42 41 52 92 20 54 4F 20 43 4F 4E |PACE BAR. TO CON|
00001160: 54 49 4E 55 45 20 22 3B 00 74 15 26 0C 8D 33 30 |TINUE ";.t.&..30|
00001170: 30 30 3A 8E 00 86 15 80 0C 8F 20 47 55 45 53 53 |00:....... GUESS|
00001180: 20 45 4E 54 52 59 00 8E 15 8F 0C 99 53 24 00 A2 | ENTRY......S$..|
00001190: 15 94 0C 46 B2 30 3A 5A 24 B2 22 40 22 3A 4E B2 |...F.0:Z$."@":N.|
000011A0: AB 31 00 BB 15 9E 0C 99 22 59 4F 55 52 20 47 55 |.1......"YOUR GU|
000011B0: 45 53 53 3A 20 20 20 9D 9D 22 3B 00 C6 15 A8 0C |ESS: ..";.....|
000011C0: 81 4B B2 31 A4 32 00 FA 15 B2 0C 8D 33 30 30 30 |.K.1.2......3000|
000011D0: 3A 8B 41 24 B2 C7 28 31 33 29 B0 41 24 B2 C7 28 |:.A$..(13).A$..(|
000011E0: 31 37 29 B0 41 24 B2 C7 28 31 39 29 B0 41 24 B2 |17).A$..(19).A$.|
000011F0: C7 28 32 39 29 A7 33 32 35 30 00 03 16 B7 0C 99 |.(29).3250......|
00001200: 41 24 3B 00 16 16 BC 0C 8B 41 24 B2 22 51 22 A7 |A$;......A$."Q".|
00001210: 20 46 B2 31 3A 8E 00 26 16 C6 0C 8F 20 46 4F 52 | F.1:..&.... FOR|
00001220: 4D 20 5A 24 2C 4E 00 3E 16 D0 0C 8B 41 24 B1 22 |M Z$,N.>....A$."|
00001230: 40 22 A7 5A 24 B2 41 24 3A 89 33 33 30 30 00 4D |@".Z$.A$:.3300.M|
00001240: 16 DA 0C 4E B2 C6 28 41 24 29 AB 34 38 00 54 16 |...N..(A$).48.T.|
00001250: E4 0C 82 4B 00 69 16 EE 0C 8F 20 43 48 45 43 4B |...K.i.... CHECK|
00001260: 20 56 41 4C 49 44 49 54 59 00 7B 16 F8 0C 8B 4E | VALIDITY.{....N|
00001270: B3 30 B0 4E B1 39 A7 33 33 35 30 00 93 16 02 0D |.0.N.9.3350.....|
00001280: 8B 5A 24 B3 22 41 22 B0 5A 24 B1 22 4A 22 A7 33 |.Z$."A".Z$."J".3|
00001290: 33 35 30 00 9B 16 0C 0D 99 3A 8E 00 BA 16 16 0D |350......:......|
000012A0: 99 3A 99 22 91 42 41 44 20 4E 55 4D 42 45 52 20 |.:.".BAD NUMBER |
000012B0: 4F 52 20 4C 45 54 54 45 52 22 00 C9 16 20 0D 81 |OR LETTER"... ..|
000012C0: 4A B2 31 A4 38 30 30 3A 82 00 D2 16 2A 0D 99 58 |J.1.800:....*..X|
000012D0: 58 24 00 E2 16 34 0D 99 22 91 22 3B 3A 89 33 32 |X$...4..".";:.32|
000012E0: 32 30 00 FD 16 AC 0D 8F 20 54 45 4D 50 20 4D 45 |20...... TEMP ME|
000012F0: 53 53 41 47 45 20 44 49 53 50 4C 41 59 00 0E 17 |SSAGE DISPLAY...|
00001300: C0 0D 99 53 24 3B 22 11 11 11 22 3B 4D 24 00 20 |...S$;"...";M$. |
00001310: 17 CA 0D 81 4A B2 31 A4 54 AC 31 30 30 30 3A 82 |....J.1.T.1000:.|
00001320: 00 29 17 D4 0D 99 58 58 24 00 33 17 DE 0D 99 22 |.)....XX$.3...."|
00001330: 11 11 22 00 39 17 E8 0D 8E 00 4F 17 88 13 8F 20 |..".9.....O.... |
00001340: 4D 49 53 53 20 53 55 42 52 4F 55 54 49 4E 45 00 |MISS SUBROUTINE.|
00001350: 5F 17 89 13 8B 57 B3 B1 31 32 A7 35 30 30 35 00 |_....W..12.5005.|
00001360: 68 17 8A 13 99 53 24 3B 00 94 17 8B 13 81 4A B2 |h....S$;......J.|
00001370: 31 A4 33 3A 99 50 24 28 31 33 29 3B 22 11 22 3B |1.3:.P$(13);".";|
00001380: 3A 99 50 24 28 31 32 29 3B 3A 81 4B B2 31 A4 32 |:.P$(12);:.K.1.2|
00001390: 35 3A 82 4B 00 AE 17 8C 13 82 3A 54 B2 35 3A 4D |5:.K......:T.5:M|
000013A0: 24 B2 48 4D 24 28 57 29 3A 89 35 30 35 30 00 C0 |$.HM$(W):.5050..|
000013B0: 17 8D 13 99 53 24 3B 50 24 28 57 29 3A 54 B2 33 |....S$;P$(W):T.3|
000013C0: 00 CB 17 8E 13 8B 57 B2 30 A7 8E 00 F2 17 92 13 |......W.0.......|
000013D0: 4D 24 B2 22 2A 2A 20 57 52 4F 4E 47 20 2A 2A 20 |M$."** WRONG ** |
000013E0: 20 44 52 41 57 20 54 48 45 20 22 AA 48 4D 24 28 | DRAW THE ".HM$(|
000013F0: 57 29 00 FE 17 BA 13 8D 33 35 30 30 3A 8E 00 00 |W)......3500:...|
00001400: 00 |. |
..(.... ** SEE TITLE PAGE FOR CREDITS **
.O.... ** USE ONLY NOT FOR SALE **.
[.(..:.2000...2.XX$.".
"...<.S$."..........
.".T.F.. A(4,5),B(4,5),C(4,5),E$(4,5),HM
$(12),P$(13)...H..J.1.12:.HM$(J):..3.I..
"HEAD","UPPER BODY","LOWER BODY","LEFT
ARM","RIGHT ARM","LEFT LEG".W.J.. "RIGHT
LEG","LEFT HAND","RIGHT HAND","LEFT FOO
T","RIGHT FOOT". .K.. " ***** YOU'
RE HUNG!! *****"...L.P$(0)."............
.......................... HANGMATH ..
........"...M.P$(0).P$(0).".............
......................".8.N.P$(1).".....
......W".P.O.P$(2)."...........".G.P.P$(
3).".........."...Q.P$(4)."............"
...R.P$(5).".........."...S.P$(6).".....
.....U".E.T.P$(7)."........I"...U.P$(8).
"............."...V.P$(9)."...........".
..W.P$(10)."..........".%.X.P$(11)."....
....".[.Y.P$(12)."......................
...U.I..... ......"...Z.P$(13)."........
.... . .... . .... .... .... .....
":.59468,12...[..". SETTING UP ...."...\
..B.0.10:K(B)..1:Q$(B)."":CK$(B)."":....
^..S$;"......"...D.W.0:F$."":R1..(.TI)."
.N.C$."ABCDEFGHIJ".8.X.R..(C(C$)..(1).1)
.R.}.N$.J(C$,R,1):F$.F$.N$.M....R.1.T$.H
(C$,R.1):.150.W...T$."".....C$.T$.J(C$,R
.1)... ..C(C$).0.120......C(F$)..10.100.
H.R.N(0).100..(.(1).900).....N(1).10..(.
(1).90).....N(2).N(0).(N(1).10..(N(1).10
)).....N(3).N(0)..(N(1).10).....N(4).N(0
).N(1).J....10..(N(1).10).N(1).220.`....
X.0.4:C.0:.Y.1.5....A(X,Y)..(N(X)..(10.
(5.Y))).....B(X,Y).A(X,Y.1).S...C(X,Y).A
(X,Y).10.B(X,Y):E$(X,Y).J(F$,C(X,Y).1,1)
:C.C.C(X,Y)......C.0.E$(X,Y).""..."..:L(
X).C(D(N(X))):.......".HANGMATH .
*..";.4....X.0.4:.Y.1.5:T.20.B....X.3.T.
18.].....T.L(X));E$(X,Y);" ";......:.X.1
.X.3..:..13);"............"......:.:....
...W.0..5000.H...T.1:.3200:.F.."..QUIT":
W.12:.5000:.1000......J.0.10:.Z$.CK$(J).
M$.Z$." =".D(J).", THINK!!":.3500:.500.8
....:.N.K(N).M$.J(F$,N.1,1)." =".D(N):.3
500:.500.N....Z$.Q$(N).M$."YOU GUESSED T
HAT BEFORE":.3500:.500......Z$.J(F$,N.1,
1).600.....W.W.1:Q$(N).Z$:.5000......W.1
. .".. YOUR GUESSES..........
...............".......W.10.10);Z$;" =";
N;......W.12.1000......500.*.X.N1.50:.X.
0.4:.Y.1.5.\.B..E$(X,Y).Z$.E$(X,Y).".".D
(N):CK$(N).Z$:K(N).N.P.L..E$(X,Y)."".680
...V.M.F(E$(X,Y))...X..M.157.M.0......M.
N1.N1.M......Y:.X......N1.60.700.C....:.
400......". **********
.".'...." YOU GOT
IT ":.1042.V.F..".
YOU HAD"W"MISTAKES ".R.P.T1.T1
.W:U.U.1:T2.T2.W.W...Z..". AVERAGE A
FTER "U"GAME(S) IS".((T1.U)..5)". .";X
X$.V...." ANOTHER GAME ? ";..
....3000......A$."Y".91......A$.."N".755
. ....S$;".SO LONG !! ":..:.... S
OLUTION SUBROUTINE.V...."..SOLUTION.
..";.M....X.0.4:.Y.1.5:T.20.{....X.3.T
.18.....E$(X,Y).".".D(C(X,Y))......C(X,Y
).0.X.2.Y.4.E$(X,Y)."".W....C(X,Y).0.X.2
.Y.3.E$(X,Y).""......C(X,Y).0.X.3.Y.3.E$
(X,Y).""......C(X,Y).0.X.4.Y.1.E$(X,Y)."
".4.....T.L(X));E$(X,Y);" ";.Z....:.X.1.
X.3..:..13);"............".D....:.:.....
.."............... ";.I...."#########
#######################
"......" YOU
MISSED IT "......J.1.4:.".";
XX$;:.:."..."......710.1.P.. INSTRUCTION
S.\.Z..59468,14:.".";.15);"... HANGMATH
..."......" ORIGINAL AUTHORS: PHIL FE
LDMAN.........TOM RUGG".A....". APRIL
, 1977 KILOBAUD, PG. 112......". MOD
IFICATIONS BY: GREGORY YOB............P
AUL AGOSTA.".4....".. DO YOU NEED INS
TRUCTIONS ? ";:.3000.C....A$.."Y"...J...
.". HANGMATH INSTRUCTIONS "......
".. HANGMATH WILL PRESENTS YOU WITH A".
B...."MULTIPLICATION PROBLEM WHICH HAS T
HE......"DIGITS REPLACED BY LETTERS....
..".FOR EXAMPLE:."...*.." A B F
4 5 6.B.4.." * E D
* 3 2.F.>.." ......
.........H.." H C D 9 1
2...R.." C E F I 1 3 6 8.P.\
.." ......... ............F.."
C A B H D 1 4 5 9 2.".P.."..
HERE THE LETTER 'A' IS THE DIGIT 4.X.Z..
"THE LETTER 'H' IS THE DIGIT 9 AND SO ON
.":.3100......"... -INSTRUCTIONS CO
NTINUED-......".. TO ENTER A GUESS, JUS
T TYPE THE".W...."LETTER AND NUMBER. FO
R EXAMPLE, 'A4'......"AND '4A' WILL BOTH
WORK FOR MATCHING".,...."THE LETTER 'A'
WITH THE DIGIT '4'..[.J..". YOU WILL B
E GIVEN 12 CHANCES TO SOLVE...T.."THE PU
ZZLE BEFORE THE SOLUTION IS DISPLA
YED.".W....". IF YOU PRESS 'Q', THE SOL
UTION WILL BE GIVEN.":.3100:....... *
INPUT CHARACTER *...B.."...";:.J.1.350:.
...L.."...";:.J.1.350:..3.V..A$:.A$."".3
010.9.....H....".. PRESS .SPACE BAR
. TO CONTINUE ";.T.&..3000:....... GUESS
ENTRY......S$.....F.0:Z$."@":N..1......
"YOUR GUESS: ..";.F....K.1.2......3000
:.A$.G(13).A$.G(17).A$.G(19).A$.G(29).32
50......A$;......A$."Q". F.1:..&.F.. FOR
M Z$,N.>.P..A$."@".Z$.A$:.3300.M.Z.N.F(A
$).48.T....K.I.... CHECK VALIDITY.{....N
.0.N.9.3350......Z$."A".Z$."J".3350.....
.:.......:.".BAD NUMBER OR LETTER".I. ..
J.1.800:..R.*..XX$...4..".";:.3220......
TEMP MESSAGE DISPLAY......S$;"...";M$.
.J..J.1.T.1000:..).T..XX$.3...."..".9...
..O.... MISS SUBROUTINE._....W..12.5005.
H....S$;......J.1.3:.P$(13);".";:.P$(12)
;:.K.1.25:.K......:T.5:M$.HM$(W):.5050..
....S$;P$(W):T.3.K....W.0.......M$."** W
RONG ** DRAW THE ".HM$(W)......3500:...
.
> CLICK IMAGE PREVIEW FOR FULL MODAL