Soccer 7 (UK) (1990) [Original] [TAPE].cdt
HexaDumpAscii only
000000: 5A 58 54 61 70 65 21 1A 01 0D 20 10 EE 11 66 09 ZXTape!... ...f.
000010: F6 04 57 04 ED 04 62 09 01 10 08 10 00 07 01 00 ..W...b.........
000020: 2C 53 4F 43 37 00 00 00 00 00 00 00 00 00 00 00 ,SOC7...........
000030: 00 01 FF 00 86 00 70 01 FF 86 00 00 00 00 00 00 ......p.........
000040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 71 42 FF FF FF FF 11 66 09 F6 04 57 04 F2 04 .qB.....f...W...
000130: 4E 09 01 10 08 E3 28 07 01 00 16 79 00 0A 00 AD N.....(....y....
000140: 20 0E 01 8A 01 82 20 0E 01 9E 20 0D 00 00 F8 EF ..... ... .....
000150: 0E 20 EC 20 19 0F 01 C3 20 0D 00 00 E1 01 A2 20 . . .... ......
000160: 0D 00 00 F8 2C 0D 00 00 E1 01 B0 20 0D 00 00 F8 ....,...... ....
000170: 01 A8 22 21 73 6F 63 63 65 72 37 2E 62 69 6E 22 .."!soccer7.bin"
000180: 2C 1C 00 C0 01 8C 20 30 2C 33 2C 36 2C 39 2C 31 ,..... 0,3,6,9,1
000190: 38 2C 31 39 2C 31 36 2C 31 35 2C 32 2C 31 2C 32 8,19,16,15,2,1,2
0001A0: 34 2C 32 35 2C 31 33 2C 31 32 2C 31 32 2C 32 35 4,25,13,12,12,25
0001B0: 2C 32 36 00 0B 00 14 00 CA 22 21 53 4F 43 00 00 ,26......"!SOC..
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000200: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000210: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000220: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000230: 00 00 00 00 00 00 00 00 00 00 00 8C C4 FF FF FF ................
000240: FF 11 67 09 F6 04 57 04 EF 04 5B 09 01 10 08 10 ..g...W...[.....
000250: 00 07 01 00 2C 53 4F 43 43 45 52 37 2E 42 49 4E ....,SOCCER7.BIN
000260: 00 00 00 00 00 01 00 02 00 08 00 C0 FF 00 40 00 ..............@.
000270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000280: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0002A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0002B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0002C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0002D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0002E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0002F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000300: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000310: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000320: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000330: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000340: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000350: 00 00 00 00 00 55 CB FF FF FF FF 11 67 09 F6 04 .....U......g...
000360: 57 04 F4 04 50 09 01 10 08 16 0A 15 08 00 16 30 W...P..........0
000370: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000380: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000390: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0003A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0003B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0003C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0003D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0003E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0003F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000400: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000410: 30 30 30 30 30 20 C0 C0 00 00 20 C0 C0 80 20 C0 00000 .... ... .
000420: C0 80 20 C0 C0 80 20 C0 C0 80 40 C0 C0 80 30 30 .. ... ...@...00
000430: 30 30 30 20 C0 80 30 30 30 30 30 30 30 30 30 30 000 ..0000000000
000440: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000450: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000460: 30 30 30 30 30 40 C0 C0 80 40 C0 C0 80 40 C0 10 00000@...@...@..
000470: 19 C0 80 40 C0 C0 80 40 C0 C0 80 40 C0 10 30 30 ...@...@...@..00
000480: 30 30 30 20 C0 80 30 30 30 30 30 30 30 30 30 30 000 ..0000000000
000490: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0004A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0004B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0004C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0004D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0004E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0004F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000500: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000510: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000520: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000530: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000540: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000550: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000560: 30 30 30 30 30 30 30 30 30 30 30 82 00 00 00 10 00000000000.....
000570: 30 A1 15 30 30 30 30 30 30 30 30 30 30 30 30 30 0..0000000000000
000580: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000590: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0005A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0005B0: 30 30 30 30 30 30 30 30 30 30 30 30 61 00 C0 94 000000000000a...
0005C0: C0 30 30 30 30 30 30 30 30 30 30 61 00 00 00 30 .0000000000a...0
0005D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0005E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0005F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000600: 30 30 30 30 30 30 30 30 30 61 C3 03 43 33 C0 3C 000000000a..C3.<
000610: 63 C3 03 03 92 30 30 30 30 30 30 C2 C0 68 C0 41 c....000000..h.A
000620: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000630: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000640: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000650: 30 30 30 30 30 30 30 61 03 03 43 83 03 03 83 C3 0000000a..C.....
000660: 03 27 C3 03 03 C2 3C 3C 38 30 3C 68 68 C0 90 30 .'....<<80<hh..0
000670: 30 30 30 6D 5D 30 30 30 30 30 30 30 30 30 30 30 000m]00000000000
000680: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000690: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0006A0: 30 30 30 30 30 30 30 30 3C 3C 92 30 C3 C3 03 03 00000000<<.0....
0006B0: 03 03 03 03 C3 30 30 71 B7 3F 7B B7 3F 3B 00 BF .....00q.?{.?;..
0006C0: 3F B7 B2 30 30 30 30 30 30 30 30 30 30 30 30 30 ?..0000000000000
0006D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0006E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0006F0: 30 30 30 30 30 30 30 3C 3C 38 30 30 C3 C3 03 C3 0000000<<800....
000700: C3 03 03 43 30 34 3C 51 F3 F3 B7 3F 3F 3F 3F 3F ...C04<Q...?????
000710: 7F B7 3F B2 30 30 30 30 30 30 30 30 30 30 30 30 ..?.000000000000
000720: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000730: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000740: 30 30 30 30 30 34 94 C0 90 30 30 30 3C 3C 3C 29 000004...000<<<)
000750: 03 43 03 43 34 68 90 30 30 B7 3F 3F 3F 7B B7 3F .C.C4h.00.???{.?
000760: 7B 33 33 B6 30 30 30 30 30 30 30 30 30 30 30 30 {33.000000000000
000770: 30 30 30 30 30 38 3E 30 30 30 30 30 30 30 30 30 000008>000000000
000780: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000790: 30 30 30 30 30 30 30 60 30 30 30 30 30 C3 83 03 0000000`00000...
0007A0: 03 C3 03 03 C3 30 30 30 30 30 30 F3 3F 3F F3 3F .....000000.??.?
0007B0: 3F B7 B2 30 60 3C 3C 3C 30 30 30 30 30 30 30 30 ?..0`<<<00000000
0007C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0007D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0007E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 83 03 00000000000000..
0007F0: 03 83 43 83 92 30 30 30 30 30 83 03 03 03 03 53 ..C..00000.....S
000800: F3 B2 30 30 30 30 30 94 3C 90 30 30 30 30 30 30 ..00000.<.000000
000810: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000820: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000830: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 82 00 00000000000000..
000840: 43 C0 69 30 30 77 FF FF FF 63 83 43 43 03 43 03 C.i00w...c.CC.C.
000850: 83 03 92 30 30 30 30 30 30 94 C0 30 30 30 30 30 ...000000..00000
000860: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000870: 30 30 30 30 30 30 30 E6 86 30 30 30 30 30 30 30 0000000..0000000
000880: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 60 000000000000000`
000890: 82 00 41 3C 30 30 77 FF FF FF BB 33 3C 3C C3 C3 ..A<00w....3<<..
0008A0: C3 96 3C 3C 7C 30 30 30 30 30 30 30 30 30 30 30 ..<<|00000000000
0008B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0008C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0008D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 C3 C0 94 0000000000000...
0008E0: 3C 3C 38 30 30 30 30 77 33 33 33 90 30 30 30 30 <<80000w333.0000
0008F0: 30 30 94 3C 3C 7C 30 30 30 30 30 30 30 30 30 30 00.<<|0000000000
000900: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000910: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000920: 30 30 30 30 30 30 30 30 30 61 C3 83 03 03 43 96 000000000a....C.
000930: 30 30 30 30 30 FF 14 3C 90 30 30 30 30 30 30 30 00000..<.0000000
000940: 30 30 33 C0 3C 3C B8 30 30 30 30 30 30 30 30 30 003.<<.000000000
000950: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000960: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000970: 30 30 30 30 30 30 30 30 61 D6 C0 77 41 92 30 30 00000000a..wA.00
000980: 30 30 30 30 30 B7 3F 7B 30 30 30 30 30 30 30 30 00000.?{00000000
000990: 30 71 B7 3F 7B B2 30 30 30 30 30 30 30 30 30 30 0q.?{.0000000000
0009A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0009B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0009C0: 30 30 30 30 30 30 30 30 30 30 82 41 30 30 30 30 0000000000.A0000
0009D0: 30 30 30 A2 00 7B 30 30 30 30 30 30 30 30 30 30 000..{0000000000
0009E0: 82 00 C3 30 30 30 30 30 30 30 30 30 30 30 30 30 ...0000000000000
0009F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000A00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000A10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000A20: 30 61 00 63 CC CC CC CC CC CC CC CC CC CC CC CC 0a.c............
000A30: CC CC 82 41 CC 30 30 30 30 30 30 30 30 30 30 30 ...A.00000000000
000A40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000A50: 30 20 00 00 00 00 10 30 30 30 30 30 30 30 30 30 0 .....000000000
000A60: 30 30 30 30 30 64 CC CC CC CC CC CC CC CC CC CC 00000d..........
000A70: 30 30 30 30 30 30 30 30 30 30 30 31 BF 30 30 30 000000000001.000
000A80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000A90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 20 00 00000000000000 .
000AA0: 00 10 11 33 22 00 C0 00 00 11 33 FF 10 30 30 20 ...3".....3..00
000AB0: 10 10 00 20 30 30 30 30 30 30 30 30 30 30 30 30 ... 000000000000
000AC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000AD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000AE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 40 80 AA 0000000000000@..
000AF0: 20 C0 00 33 22 00 C0 11 40 C0 80 77 10 30 20 30 ..3"...@..w.0 0
000B00: 20 30 20 00 10 30 30 30 30 30 30 30 30 30 30 30 0 ..00000000000
000B10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000B20: 30 30 30 30 30 30 30 30 30 30 30 30 30 18 24 30 0000000000000.$0
000B30: 18 24 30 30 24 24 24 24 24 24 24 30 30 40 C0 00 .$00$$$$$$$00@..
000B40: 00 C0 40 80 40 80 C0 40 40 80 22 40 80 00 00 00 ..@.@..@@."@....
000B50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000B60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000B70: 00 00 00 00 00 00 00 00 00 00 00 00 00 4F B1 FF .............O..
000B80: FF FF FF 11 65 09 A6 04 A6 04 EC 04 57 09 01 10 ....e.......W...
000B90: 08 10 00 07 01 00 2C 53 4F 43 43 45 52 37 2E 42 ......,SOCCER7.B
000BA0: 49 4E 00 00 00 00 00 02 00 02 00 08 00 C8 00 00 IN..............
000BB0: 40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 @...............
000BC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000BD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000BE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000BF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000C00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000C10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000C20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000C30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000C40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000C50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000C60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000C70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000C80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000C90: 00 00 00 00 00 00 00 F5 78 FF FF FF FF 11 65 09 ........x.....e.
000CA0: F6 04 57 04 F3 04 4F 09 01 10 08 11 0A 15 08 00 ..W...O.........
000CB0: 16 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 .000000000000000
000CC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000CD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000CE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000CF0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000D00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000D10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000D20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000D30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000D40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000D50: 30 30 30 30 30 30 30 20 C0 80 00 30 40 C0 C0 80 0000000 ...0@...
000D60: 40 C0 C0 10 40 C0 C0 10 40 C0 C0 80 C0 C0 C0 80 @...@...@.......
000D70: 30 30 30 30 30 40 C0 10 30 30 30 30 30 30 30 30 00000@..00000000
000D80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000D90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000DA0: 30 30 30 30 30 30 30 40 C0 C0 10 40 C0 C0 10 40 0000000@...@...@
000DB0: C0 6B 9E C0 10 40 C0 C0 10 40 C0 C0 10 40 C0 10 .k...@...@...@..
000DC0: 30 30 30 30 30 20 C0 80 30 30 30 30 30 30 30 30 00000 ..00000000
000DD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000DE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000DF0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000E00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000E10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000E20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000E30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000E40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000E50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000E60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000E70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000E80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000E90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000EA0: 30 30 30 30 30 30 30 30 30 30 30 30 61 00 00 00 000000000000a...
000EB0: 00 10 30 A7 FA 30 30 30 30 30 30 30 30 30 30 30 ..0..00000000000
000EC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000ED0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000EE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000EF0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 61 00 00000000000000a.
000F00: 3C 94 94 30 30 30 30 30 30 30 30 30 30 20 00 00 <..0000000000 ..
000F10: 00 92 30 30 30 30 30 30 30 30 30 30 30 30 30 30 ..00000000000000
000F20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000F30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000F40: 30 30 30 30 30 30 30 30 30 30 30 C3 83 03 C3 11 00000000000.....
000F50: C2 C0 63 C3 43 03 43 30 30 30 30 30 30 96 C0 68 ..c.C.C000000..h
000F60: 68 10 30 30 30 30 30 30 30 30 30 30 30 30 30 30 h.00000000000000
000F70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000F80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000F90: 30 30 30 30 30 30 30 30 30 83 03 03 43 43 03 03 000000000...CC..
000FA0: 83 83 03 1B C3 83 03 C2 3C 3C 3C 3C 68 94 94 3C ........<<<<h..<
000FB0: 90 30 30 30 30 64 E0 30 30 30 30 30 30 30 30 30 .0000d.000000000
000FC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000FD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
000FE0: 30 30 30 30 30 30 30 30 30 30 3C 3C 30 30 C3 C3 0000000000<<00..
000FF0: 43 03 03 03 03 03 C3 30 30 71 3F 3F 7B B7 3F 3B C......00q??{.?;
001000: FF BF 3F B7 7B 30 30 30 30 30 30 30 30 30 30 30 ..?.{00000000000
001010: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001020: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001030: 30 30 30 30 30 30 30 30 30 3C 3C 30 30 30 C3 C3 000000000<<000..
001040: C3 C3 83 03 03 43 30 3C 3C 79 B2 F3 B7 3F 3F 3F .....C0<<y...???
001050: 3F 3F 7F B7 3F B2 30 30 30 30 30 30 30 30 30 30 ??..?.0000000000
001060: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001070: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001080: 30 30 30 30 30 30 30 3C 94 C0 30 30 30 30 3C 3C 0000000<..0000<<
001090: 3C 29 03 43 03 43 30 C0 30 30 30 B7 3F 3F 3F 3F <).C.C0.000.????
0010A0: B7 3F 7B 31 73 3C 30 30 30 30 30 30 30 30 30 30 .?{1s<0000000000
0010B0: 30 30 30 30 30 30 30 4D 1A 30 30 30 30 30 30 30 0000000M.0000000
0010C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0010D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 C3 000000000000000.
0010E0: 83 03 03 C3 03 03 C3 30 30 30 30 30 30 F3 3F 3F .......000000.??
0010F0: 7B 3F 3F F3 B2 30 30 94 3C 3C 30 30 30 30 30 30 {??..00.<<000000
001100: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001110: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001120: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001130: 83 03 03 83 43 03 92 30 30 30 30 30 83 03 03 03 ....C..00000....
001140: 03 03 03 43 30 30 30 30 30 60 3C 68 30 30 30 30 ...C00000`<h0000
001150: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001160: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001170: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001180: 82 00 C2 C0 69 30 31 FF FF FF FF 36 83 03 C3 83 ....i01....6....
001190: C3 03 83 03 92 30 30 30 30 30 30 60 90 30 30 30 .....000000`.000
0011A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0011B0: 30 30 30 30 30 30 30 30 30 39 F1 30 30 30 30 30 0000000009.00000
0011C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0011D0: 30 60 93 11 41 3C 30 30 77 FF FF FF BB 33 3C 68 0`..A<00w....3<h
0011E0: C0 92 C3 96 94 3C 3C B8 30 30 30 30 30 30 30 30 .....<<.00000000
0011F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001200: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001210: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 61 C3 00000000000000a.
001220: 94 3C 3C 3C 30 30 30 30 60 91 33 33 62 30 30 30 .<<<0000`.33b000
001230: 30 30 30 30 94 3C 3C 7C 30 30 30 30 30 30 30 30 0000.<<|00000000
001240: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001250: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001260: 30 30 30 30 30 30 30 30 30 30 30 82 C3 83 03 03 00000000000.....
001270: 43 92 30 30 30 30 71 FF 14 3C 90 30 30 30 30 30 C.0000q..<.00000
001280: 30 30 30 71 B3 EA 94 3C 30 30 30 30 30 30 30 30 000q...<00000000
001290: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0012A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0012B0: 30 30 30 30 30 30 30 30 30 30 61 00 3F 55 11 30 0000000000a.?U.0
0012C0: 30 30 30 30 30 30 30 B7 3F 7B 30 30 30 30 30 30 0000000.?{000000
0012D0: 30 30 30 71 B7 3F 7B B2 30 30 30 30 30 30 30 30 000q.?{.00000000
0012E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0012F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001300: 30 30 30 30 30 30 30 30 30 30 30 30 82 00 30 30 000000000000..00
001310: 30 30 30 30 30 82 15 7B 30 30 30 30 30 30 30 30 00000..{00000000
001320: 30 30 61 00 41 30 30 30 30 30 30 30 30 30 30 30 00a.A00000000000
001330: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001340: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001350: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001360: 30 30 64 C9 41 C6 CC CC CC CC CC CC CC CC CC CC 00d.A...........
001370: CC CC CC CC 82 41 CC 98 30 30 30 30 30 30 30 30 .....A..00000000
001380: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001390: 30 30 20 55 FF FF FF FF AA 30 30 30 30 30 30 30 00 U.....0000000
0013A0: 30 30 30 30 30 30 64 CC CC CC CC CC CC CC CC CC 000000d.........
0013B0: CC CC CC 30 30 30 30 30 30 30 30 30 30 0D F4 30 ...0000000000..0
0013C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0013D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0013E0: 55 AA 11 AA 20 00 10 20 C0 00 EA 80 77 AA 30 30 U... .. ....w.00
0013F0: 20 20 30 20 20 20 30 30 30 30 30 30 30 30 30 30 0 0000000000
001400: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001410: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001420: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 40 000000000000000@
001430: 80 AA 11 00 40 80 62 80 C0 11 40 C0 80 77 10 30 ....@.b...@..w.0
001440: 00 30 30 00 00 30 30 30 30 30 30 30 30 30 30 30 .00..00000000000
001450: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001460: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 18 000000000000000.
001470: 24 30 18 24 30 30 24 24 24 24 24 24 24 30 30 40 $0.$00$$$$$$$00@
001480: C0 C0 C0 C0 40 80 40 80 C0 C0 40 80 10 40 80 00 ....@.@...@..@..
001490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 52 ...............R
0014C0: 1B FF FF FF FF 11 62 09 A6 04 A6 04 EC 04 52 09 ......b.......R.
0014D0: 01 10 08 10 00 07 01 00 2C 53 4F 43 43 45 52 37 ........,SOCCER7
0014E0: 2E 42 49 4E 00 00 00 00 00 03 00 02 00 08 00 D0 .BIN............
0014F0: 00 00 40 00 00 00 00 00 00 00 00 00 00 00 00 00 ..@.............
001500: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001510: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001520: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001530: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001540: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001550: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001560: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001570: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0015A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0015B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0015C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0015D0: 00 00 00 00 00 00 00 00 00 A4 E7 FF FF FF FF 11 ................
0015E0: 62 09 F6 04 57 04 F2 04 50 09 01 10 08 16 0A 15 b...W...P.......
0015F0: 08 00 16 30 30 30 30 30 30 30 30 30 30 30 30 30 ...0000000000000
001600: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001610: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001620: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001630: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001640: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001650: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001660: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001670: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001680: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001690: 30 30 30 30 30 30 30 30 30 30 40 C0 C0 00 C0 80 0000000000@.....
0016A0: C0 80 C0 C0 00 20 C0 80 00 20 C0 80 C0 80 C0 80 ..... ... ......
0016B0: C0 80 30 30 30 30 20 C0 80 30 30 30 30 30 30 30 ..0000 ..0000000
0016C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0016D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0016E0: 30 30 30 30 30 30 30 30 30 20 00 00 30 20 00 00 000000000 ..0 ..
0016F0: 30 20 00 1D 43 00 30 20 00 00 30 20 00 00 30 00 0 ..C.0 ..0 ..0.
001700: 00 10 30 30 30 30 30 20 00 00 30 30 30 30 30 30 ..00000 ..000000
001710: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001720: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001730: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001740: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001750: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001760: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001770: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001780: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001790: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0017A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0017B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0017C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0017D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0017E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 61 00 00000000000000a.
0017F0: 00 14 28 10 30 02 51 30 30 30 30 30 30 30 30 30 ..(.0.Q000000000
001800: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001810: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001820: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001830: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001840: 61 82 3C 3C 94 30 30 30 30 30 30 30 30 30 30 82 a.<<.0000000000.
001850: 41 00 00 92 30 30 30 30 30 30 30 30 30 30 30 30 A...000000000000
001860: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001870: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001880: 30 30 30 30 30 30 30 30 30 30 30 30 30 83 03 03 0000000000000...
001890: 83 13 EA D5 C3 C3 C3 03 43 30 30 30 30 30 30 96 ........C000000.
0018A0: C0 68 94 90 30 30 30 30 30 30 30 30 30 30 30 30 .h..000000000000
0018B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0018C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0018D0: 30 30 30 30 30 30 30 30 30 30 30 83 03 03 C3 43 00000000000....C
0018E0: 03 43 43 83 03 0F C3 C3 C3 94 3C 3C 3C 3C C0 C0 .CC.......<<<<..
0018F0: 94 3C 90 30 30 30 30 3D 9B 30 30 30 30 30 30 30 .<.0000=.0000000
001900: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001910: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001920: 30 30 30 30 30 30 30 30 30 30 30 30 3C 3C 30 30 000000000000<<00
001930: C3 C3 43 03 03 83 03 03 C3 30 30 A2 3F 3F F3 3F ..C......00.??.?
001940: 3F 3F FF 3F 7B B7 7B 30 30 30 30 30 30 30 30 30 ??.?{.{000000000
001950: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001960: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001970: 30 30 30 30 30 30 30 30 30 30 30 3C 3C 30 30 30 00000000000<<000
001980: 61 C3 C3 03 03 03 03 43 30 28 3C 68 B2 F3 F3 3F a......C0(<h...?
001990: 3F 3F 3F 3F FF B7 3F 7B 30 30 30 30 30 30 30 30 ????..?{00000000
0019A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0019B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0019C0: 30 30 30 30 30 30 30 30 30 68 94 C0 30 30 30 61 000000000h..000a
0019D0: 3C 3C 3C 69 83 43 83 92 30 38 30 30 30 B7 3F 3F <<<i.C..08000.??
0019E0: 3F 3F F3 3F B2 31 C0 C0 38 30 30 30 30 30 30 30 ??.?.1..80000000
0019F0: 30 30 30 30 30 30 30 30 30 FD E5 30 30 30 30 30 000000000..00000
001A00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001A10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001A20: 30 C3 83 03 03 C3 03 03 C3 30 30 30 30 30 30 F3 0........000000.
001A30: 3F 3F 7B B7 3F 7B B2 30 30 94 3C 3C 30 30 30 30 ??{.?{.00.<<0000
001A40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001A50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001A60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001A70: 30 30 83 03 03 83 83 03 92 30 30 30 30 61 83 83 00.......0000a..
001A80: 03 03 03 03 03 43 30 30 30 30 30 60 3C 3C 90 30 .....C00000`<<.0
001A90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001AA0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001AB0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001AC0: 30 30 82 00 C3 94 3C 30 31 FF FF FF FF 36 69 03 00....<01....6i.
001AD0: C3 83 83 43 83 03 92 30 30 30 30 30 30 30 30 30 ...C...000000000
001AE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001AF0: 30 30 30 30 30 30 30 30 30 30 30 6D E7 30 30 30 00000000000m.000
001B00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001B10: 30 30 30 60 93 11 11 3C 30 30 77 FF FF FF BB 33 000`...<00w....3
001B20: 3C C0 C0 30 C3 3C 94 3C 3C B8 30 30 30 30 30 30 <..0.<.<<.000000
001B30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001B40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001B50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001B60: 61 83 94 3C 3C 3C 30 30 30 30 3C C0 33 33 90 30 a..<<<0000<.33.0
001B70: 30 30 30 30 30 30 60 3C 94 7C 30 30 30 30 30 30 000000`<.|000000
001B80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001B90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001BA0: 30 30 30 30 30 30 30 30 30 30 30 30 30 82 C3 03 0000000000000...
001BB0: 03 03 43 30 30 30 30 30 71 55 AA 68 30 30 30 30 ..C00000qU.h0000
001BC0: 30 30 30 30 30 71 F7 FF 94 3C 30 30 30 30 30 30 00000q...<000000
001BD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001BE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001BF0: 30 30 30 30 30 30 30 30 30 30 30 30 61 2F 1B 00 000000000000a/..
001C00: 11 30 30 30 30 30 30 30 71 3F 3F B2 30 30 30 30 .0000000q??.0000
001C10: 30 30 30 30 30 F3 3F 3F F3 30 30 30 30 30 30 30 00000.??.0000000
001C20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001C30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001C40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 61 92 00000000000000a.
001C50: 30 30 30 30 30 30 30 00 82 B2 30 30 30 30 30 30 0000000...000000
001C60: 30 30 30 30 61 00 33 30 30 30 30 30 30 30 30 30 0000a.3000000000
001C70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001C80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001C90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001CA0: 30 30 30 30 CC CC C6 CC CC CC CC CC CC CC CC CC 0000............
001CB0: CC CC CC 30 CC CC C9 41 CC 98 30 30 30 30 30 30 ...0...A..000000
001CC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001CD0: 30 30 30 30 11 33 33 33 33 77 AA 30 30 30 30 30 0000.3333w.00000
001CE0: 30 30 30 30 30 30 30 30 64 CC CC CC CC CC CC CC 00000000d.......
001CF0: CC CC CC 98 30 30 30 30 30 30 30 30 30 30 30 C5 ....00000000000.
001D00: 0A 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 .000000000000000
001D10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001D20: 30 20 33 AA 80 77 00 77 AA 20 C0 11 40 80 33 55 0 3..w.w. ..@.3U
001D30: 10 30 10 20 30 20 30 20 30 30 30 30 30 30 30 30 .0. 0 0 00000000
001D40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001D50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001D60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001D70: 30 40 80 AA 11 77 40 80 62 80 C0 11 40 80 00 77 0@...w@.b...@..w
001D80: 10 20 10 30 20 00 30 30 30 30 30 30 30 30 30 30 . .0 .0000000000
001D90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001DA0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001DB0: 30 18 24 30 30 24 30 30 24 30 0C 30 0C 24 24 30 0.$00$00$0.0.$$0
001DC0: 30 20 C0 C0 C0 80 40 C0 C0 80 C0 C0 00 C0 00 C0 0 ....@.........
001DD0: 10 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001DE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001DF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001E00: 00 CD 06 FF FF FF FF 11 65 09 A6 04 A6 04 ED 04 ........e.......
001E10: 56 09 01 10 08 10 00 07 01 00 2C 53 4F 43 43 45 V.........,SOCCE
001E20: 52 37 2E 42 49 4E 00 00 00 00 00 04 00 02 00 08 R7.BIN..........
001E30: 00 D8 00 00 40 00 00 00 00 00 00 00 00 00 00 00 ....@...........
001E40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001E50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001E60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001E70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001E80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001E90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001EA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001EB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001EC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001ED0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001EE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001EF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001F00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001F10: 00 00 00 00 00 00 00 00 00 00 00 AC 07 FF FF FF ................
001F20: FF 11 66 09 A6 04 A6 04 F4 04 52 09 01 10 08 16 ..f.......R.....
001F30: 0A 15 08 00 16 30 30 30 30 30 30 30 30 30 30 30 .....00000000000
001F40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001F50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001F60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001F70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001F80: 30 30 30 30 30 30 30 30 30 30 30 30 30 20 00 00 0000000000000 ..
001F90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001FA0: 30 30 30 30 30 30 30 30 00 00 00 00 10 30 30 30 00000000.....000
001FB0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001FC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
001FD0: 30 30 30 30 30 30 30 30 30 30 30 30 40 C0 C0 80 000000000000@...
001FE0: C0 80 C0 80 C0 80 30 20 C0 80 30 20 C0 80 C0 80 ......0 ..0 ....
001FF0: C0 80 C0 80 30 30 30 30 20 C0 80 30 30 30 30 30 ....0000 ..00000
002000: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002010: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002020: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002030: 30 30 30 30 30 91 10 30 30 30 30 30 30 30 30 30 00000..000000000
002040: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002050: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002060: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002070: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002080: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002090: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0020A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0020B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0020C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0020D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0020E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0020F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002100: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002110: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002120: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002130: 61 00 14 3C 28 10 30 86 DF 30 30 30 30 30 30 30 a..<(.0..0000000
002140: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002150: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002160: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002170: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002180: 30 30 C3 C2 3C 68 94 C3 92 30 30 30 30 30 30 30 00..<h...0000000
002190: 30 00 41 00 00 41 30 30 30 30 30 30 30 30 30 30 0.A..A0000000000
0021A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0021B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0021C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 61 83 00000000000000a.
0021D0: 03 43 83 03 EB D5 83 43 C3 03 43 92 30 30 30 30 .C.....C..C.0000
0021E0: 30 C0 3C 68 94 90 30 30 30 30 30 30 30 30 30 30 0.<h..0000000000
0021F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002200: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002210: 30 30 30 30 30 30 30 30 30 30 30 30 61 83 03 03 000000000000a...
002220: 83 03 03 43 43 03 03 0F C3 30 C3 94 3C 3C 3C 68 ...CC....0..<<<h
002230: C0 3C 94 68 90 30 30 30 30 81 18 30 30 30 30 30 .<.h.0000..00000
002240: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002250: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002260: 30 30 30 30 30 30 30 30 30 30 30 30 30 34 3C 3C 00000000000004<<
002270: 30 30 C3 C3 C3 03 03 83 03 03 92 30 30 B7 3F 3F 00.........00.??
002280: B7 3F 3F 3F FF 3F 7B F3 7B 30 30 30 30 30 30 30 .???.?{.{0000000
002290: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0022A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0022B0: 30 30 30 30 30 30 30 30 30 30 30 30 34 3C 3C 30 0000000000004<<0
0022C0: 30 30 61 96 69 83 43 83 03 43 34 C0 14 C0 30 F3 00a.i.C..C4...0.
0022D0: F3 3F 3F 3F 3F 3F FF B7 3F 7B 30 30 30 30 30 30 .?????..?{000000
0022E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0022F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002300: 30 30 30 30 30 30 30 30 30 30 34 40 94 90 30 30 00000000004@..00
002310: 30 61 3C 3C 3C 43 43 03 83 92 30 30 30 30 30 B7 0a<<<CC...00000.
002320: 3F 3F 3F 3F F3 3F B2 71 C0 94 38 30 30 30 30 30 ????.?.q..800000
002330: 30 30 30 30 30 30 30 30 30 30 30 4E AF 30 30 30 00000000000N.000
002340: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002350: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002360: 30 30 30 C3 83 03 03 83 03 03 C3 30 30 30 30 30 000........00000
002370: 30 F3 B7 3F 3F B7 3F 7B B2 30 30 60 3C 3C 38 30 0..??.?{.00`<<80
002380: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002390: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0023A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0023B0: 30 30 30 30 83 03 03 83 83 43 30 30 30 30 30 61 0000.....C00000a
0023C0: 03 43 03 03 03 03 03 43 30 30 30 30 30 60 68 94 .C.....C00000`h.
0023D0: 68 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 h000000000000000
0023E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0023F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002400: 30 30 30 30 93 11 41 94 3C 30 31 FF FF FF FF 36 0000..A.<01....6
002410: 69 83 C3 83 83 C3 03 03 92 30 30 30 30 30 30 30 i........0000000
002420: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002430: 30 30 30 30 30 30 30 30 30 30 30 30 30 6C 7F 30 0000000000000l.0
002440: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002450: 30 30 30 30 30 94 82 00 41 38 30 30 77 FF FF FF 00000...A800w...
002460: 33 33 68 90 30 30 60 94 94 3C 3C B8 30 30 30 30 33h.00`..<<.0000
002470: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002480: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002490: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0024A0: 30 30 C3 83 3C 3C 3C 3C 30 30 30 30 3C 3C C0 C0 00..<<<<0000<<..
0024B0: 90 30 30 30 30 30 30 30 60 68 94 3C B8 30 30 30 .0000000`h.<.000
0024C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0024D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0024E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 82 000000000000000.
0024F0: 83 03 03 03 92 30 30 30 30 30 B7 7F 33 C0 30 30 .....00000..3.00
002500: 30 30 30 30 30 30 30 F3 3F FF BB 36 30 30 30 30 0000000.?..60000
002510: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002520: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002530: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 82 76 00000000000000.v
002540: 11 77 C3 30 30 30 30 30 30 30 71 3F 3F B2 30 30 .w.0000000q??.00
002550: 30 30 30 30 30 30 71 B7 3F 3F F3 30 30 30 30 30 000000q.??.00000
002560: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002570: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002580: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002590: 30 30 30 30 30 30 30 30 61 00 A2 30 30 30 30 30 00000000a..00000
0025A0: 30 30 30 30 30 30 30 82 22 92 30 30 30 30 30 30 0000000.".000000
0025B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0025C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0025D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0025E0: 30 30 30 30 30 30 30 CC CC CC CC CC CC CC CC CC 0000000.........
0025F0: CC CC CC 98 30 30 64 CC CC C6 CC 30 30 30 30 30 ....00d....00000
002600: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002610: 30 30 30 00 00 20 33 33 33 33 33 77 FF 10 30 00 000.. 33333w..0.
002620: 30 30 30 30 30 30 30 30 30 30 CC 98 30 CC CC CC 0000000000..0...
002630: CC CC CC CC 30 30 30 30 30 30 30 30 30 30 30 30 ....000000000000
002640: 30 B5 10 30 30 30 30 30 30 30 30 30 30 30 30 30 0..0000000000000
002650: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002660: 30 30 30 20 22 C0 C0 80 11 33 AA 20 C0 11 40 80 000 "....3. ..@.
002670: 00 77 10 20 30 10 20 20 30 20 30 30 30 30 30 30 .w. 0. 0 000000
002680: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002690: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0026A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0026B0: 30 30 30 40 80 AA 11 77 40 80 62 80 C0 11 40 80 000@...w@.b...@.
0026C0: 22 77 10 30 30 20 10 30 30 30 30 30 30 30 30 30 "w.00 .000000000
0026D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0026E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0026F0: 30 30 30 18 24 30 18 24 30 30 24 30 24 30 24 24 000.$0.$00$0$0$$
002700: 24 30 30 30 40 C0 C0 10 20 C0 C0 00 C0 C0 00 C0 $000@... .......
002710: C0 80 30 00 00 00 00 00 00 00 00 00 00 00 00 00 ..0.............
002720: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002730: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002740: 00 00 00 67 70 FF FF FF FF 11 67 09 F6 04 57 04 ...gp.....g...W.
002750: EF 04 56 09 01 10 08 10 00 07 01 00 2C 53 4F 43 ..V.........,SOC
002760: 43 45 52 37 2E 42 49 4E 00 00 00 00 00 05 00 02 CER7.BIN........
002770: 00 08 00 E0 00 00 40 00 00 00 00 00 00 00 00 00 ......@.........
002780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002800: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002810: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002820: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002830: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002840: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002850: 00 00 00 00 00 00 00 00 00 00 00 00 00 AB 96 FF ................
002860: FF FF FF 11 69 09 F6 04 57 04 F5 04 53 09 01 10 ....i...W...S...
002870: 08 19 0A 15 08 00 16 30 30 30 30 30 30 30 30 30 .......000000000
002880: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002890: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0028A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0028B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0028C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 40 000000000000000@
0028D0: C0 C0 10 30 30 30 30 30 30 30 30 30 30 30 30 30 ...0000000000000
0028E0: 30 30 30 30 30 30 30 30 30 30 40 C0 C0 C0 10 30 0000000000@....0
0028F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002900: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002910: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 20 00 00000000000000 .
002920: C0 80 C0 80 C0 80 C0 80 30 20 C0 80 30 20 C0 C0 ........0 ..0 ..
002930: C0 80 C0 80 00 00 30 30 30 30 40 C0 10 30 30 30 ......0000@..000
002940: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002950: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002960: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002970: 30 30 30 30 30 30 30 72 0A 30 30 30 30 30 30 30 0000000r.0000000
002980: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002990: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0029A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0029B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0029C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0029D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0029E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0029F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002A00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002A10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002A20: 30 30 30 30 20 00 10 30 30 30 30 30 30 30 30 30 0000 ..000000000
002A30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002A40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002A50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002A60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002A70: 30 30 61 00 14 3C 28 10 30 5A 60 30 30 30 30 30 00a..<(.0Z`00000
002A80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002A90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002AA0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002AB0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002AC0: 30 30 30 61 C3 C0 3C 3C 3C 83 43 30 30 30 30 30 000a..<<<.C00000
002AD0: 30 30 30 00 C3 3C 00 41 30 30 30 30 30 30 30 30 000..<.A00000000
002AE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002AF0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002B00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002B10: C3 03 03 C3 83 03 FF FF 83 43 C3 03 03 92 30 30 .........C....00
002B20: 30 30 30 94 3C C0 3C 90 30 30 30 30 30 30 30 30 000.<.<.00000000
002B30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002B40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002B50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 34 C3 000000000000004.
002B60: 03 C3 83 83 83 C3 83 03 03 07 C3 30 C3 94 3C 3C ...........0..<<
002B70: 3C 68 68 C0 C0 C0 73 30 30 30 30 20 4C 30 30 30 <hh...s0000 L000
002B80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002B90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002BA0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 34 0000000000000004
002BB0: 3C 3C 30 30 C3 C3 83 03 C3 83 03 43 92 30 34 B7 <<00.......C.04.
002BC0: 3F 3F B7 3F 3F 3F 3F 3F 3F F3 7B B2 30 30 30 30 ??.??????.{.0000
002BD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002BE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002BF0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 34 3C 000000000000004<
002C00: 3C 30 30 30 61 3C 3C 83 C3 03 03 43 3C C0 28 C0 <000a<<....C<.(.
002C10: 30 F3 F3 B7 3F 3F 3F 3F FF B7 3F 7B 30 30 30 30 0...????..?{0000
002C20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002C30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002C40: 30 30 30 30 30 30 30 30 30 30 30 30 34 68 68 30 0000000000004hh0
002C50: 30 30 30 61 3C 3C 3C 43 03 83 C3 92 30 30 30 30 000a<<<C....0000
002C60: 30 B7 3F 7B 3F 3F 7B 3F B2 30 C0 94 3C 30 30 30 0.?{??{?.0..<000
002C70: 30 30 30 30 30 30 30 30 30 30 30 30 30 B6 68 30 0000000000000.h0
002C80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002C90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002CA0: 30 30 30 30 30 C3 83 03 03 83 43 03 C3 30 30 30 00000.....C..000
002CB0: 30 30 30 F3 B7 3F 3F F3 3F 7B 30 30 30 30 94 3C 000..??.?{0000.<
002CC0: 38 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 8000000000000000
002CD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002CE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002CF0: 30 30 30 30 30 30 83 03 43 C3 03 43 30 30 30 30 000000..C..C0000
002D00: 30 83 03 43 03 03 03 03 03 43 30 30 30 30 30 30 0..C.....C000000
002D10: C0 C0 68 30 30 30 30 30 30 30 30 30 30 30 30 30 ..h0000000000000
002D20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002D30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002D40: 30 30 30 30 30 30 93 11 41 3C 3C 30 77 FF FF FF 000000..A<<0w...
002D50: FF 33 3C C3 83 C3 C3 C3 03 C3 92 30 30 30 30 30 .3<........00000
002D60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002D70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 DC 000000000000000.
002D80: 45 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 E000000000000000
002D90: 30 30 30 30 30 30 30 94 69 00 41 38 30 30 31 FF 0000000.i.A8001.
002DA0: FF FF 33 36 C0 30 30 30 30 94 94 3C 3C B8 30 30 ..36.0000..<<.00
002DB0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002DC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002DD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002DE0: 30 30 30 30 C3 03 3C 3C 3C 38 30 30 30 34 3C 3C 0000..<<<80004<<
002DF0: 68 90 30 30 30 30 30 30 30 30 30 C0 3C 3C B8 30 h.000000000.<<.0
002E00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002E10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002E20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002E30: 61 00 83 03 03 C3 30 30 30 30 30 30 B7 3F 33 90 a.....000000.?3.
002E40: 30 30 30 30 30 30 30 30 30 F3 3F FF 33 32 30 30 000000000.?.3200
002E50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002E60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002E70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002E80: 82 F5 52 55 82 30 30 30 30 30 30 30 B7 3F 7B 30 ..RU.0000000.?{0
002E90: 30 30 30 30 30 30 30 30 71 3F 3F 7B B2 30 30 30 00000000q??{.000
002EA0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002EB0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002EC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002ED0: 30 30 30 30 30 30 30 30 30 30 61 AA 82 30 30 30 0000000000a..000
002EE0: 30 30 30 30 30 30 30 30 64 93 00 92 30 30 30 30 00000000d...0000
002EF0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002F00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002F10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002F20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002F30: 64 CC CC CC 30 30 30 30 30 64 CC CC 30 30 30 30 d...00000d..0000
002F40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002F50: 30 30 30 30 20 33 FF 00 33 33 33 33 33 77 FF 10 0000 3..33333w..
002F60: 20 FF 10 30 30 30 30 30 30 10 30 30 30 30 64 CC ..000000.0000d.
002F70: CC 98 CC 64 30 30 30 30 30 30 30 30 30 30 30 30 ...d000000000000
002F80: 30 30 30 99 EF 30 30 30 30 30 30 30 30 30 30 30 000..00000000000
002F90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002FA0: 30 30 30 30 30 30 40 C0 C0 80 11 33 AA 20 C0 11 000000@....3. ..
002FB0: 40 80 AA 77 10 20 30 10 00 20 30 30 10 30 30 30 @..w. 0.. 00.000
002FC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002FD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002FE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
002FF0: 30 30 30 30 30 40 80 AA 11 77 40 80 62 80 C0 11 00000@...w@.b...
003000: 40 80 22 22 80 30 30 00 30 30 30 30 30 30 30 30 @."".00.00000000
003010: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003020: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003030: 30 30 30 30 30 18 24 30 18 24 30 30 24 30 24 30 00000.$0.$00$0$0
003040: 24 24 24 30 30 30 20 40 C0 10 20 C0 C0 10 40 80 $$$000 @.. ...@.
003050: 30 40 C0 10 30 00 00 00 00 00 00 00 00 00 00 00 0@..0...........
003060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003080: 00 00 00 00 00 F4 67 FF FF FF FF 11 6A 09 F6 04 ......g.....j...
003090: 57 04 EF 04 59 09 01 10 08 10 00 07 01 00 2C 53 W...Y.........,S
0030A0: 4F 43 43 45 52 37 2E 42 49 4E 00 00 00 00 00 06 OCCER7.BIN......
0030B0: 00 02 00 08 00 E8 00 00 40 00 00 00 00 00 00 00 ........@.......
0030C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0030D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0030E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0030F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0F ................
0031A0: 39 FF FF FF FF 11 69 09 F6 04 57 04 F5 04 54 09 9.....i...W...T.
0031B0: 01 10 08 1A 0A 15 08 00 16 30 30 30 30 30 30 30 .........0000000
0031C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0031D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0031E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0031F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003200: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003210: 20 C0 C0 C0 10 30 30 30 30 30 30 30 30 30 30 30 ....00000000000
003220: 30 30 30 30 30 30 30 30 30 30 30 30 40 C0 C0 C0 000000000000@...
003230: 10 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 .000000000000000
003240: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003250: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 20 000000000000000
003260: 00 40 C0 C0 C0 40 C0 40 C0 10 30 40 C0 10 30 40 .@...@.@..0@..0@
003270: C0 C0 C0 40 C0 10 30 30 30 30 30 20 C0 80 30 30 ...@..00000 ..00
003280: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003290: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0032A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0032B0: 30 30 30 30 30 30 30 30 30 B0 A4 30 30 30 30 30 000000000..00000
0032C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0032D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0032E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0032F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003300: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003310: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003320: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003330: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003340: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003350: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003360: 30 30 30 30 30 20 00 00 00 30 30 30 30 30 30 30 00000 ...0000000
003370: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003380: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003390: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0033A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0033B0: 30 30 30 30 20 00 3C 3C 3C 92 30 53 8F 30 30 30 0000 .<<<.0S.000
0033C0: 30 30 30 30 30 30 20 00 92 30 30 30 30 30 30 30 000000 ..0000000
0033D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0033E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0033F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003400: 30 30 30 30 30 61 93 C0 3C C0 91 83 03 92 30 30 00000a..<.....00
003410: 30 30 30 30 30 00 96 3C 3C 41 30 30 30 30 30 30 00000..<<A000000
003420: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003430: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003440: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003450: 30 30 83 03 03 C3 03 03 57 EB 83 43 C3 03 03 92 00......W..C....
003460: 30 30 30 30 30 94 68 C0 68 30 30 30 30 30 30 30 00000.h.h0000000
003470: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003480: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003490: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0034A0: 34 69 03 C3 C3 C3 83 83 83 03 03 07 C3 30 61 C0 4i...........0a.
0034B0: C0 C0 C0 94 68 3C 00 91 7B B2 30 30 30 AC 7C 30 ....h<..{.000.|0
0034C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0034D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0034E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0034F0: 30 34 3C 38 30 30 C3 C3 83 C3 83 03 03 43 92 30 04<800.......C.0
003500: 34 F3 3F 7B B7 3F 3F 3F 3F 3F 3F F3 3F B2 30 30 4.?{.??????.?.00
003510: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003520: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003530: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003540: 34 3C 90 30 30 30 34 3C 3C C3 83 03 03 43 3C C0 4<.0004<<....C<.
003550: C0 90 30 F3 F3 B7 3F 7B 3F 3F FF B7 3F FF 30 30 ..0...?{??..?.00
003560: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003570: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003580: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 60 14 00000000000000`.
003590: 68 30 30 30 30 C3 3C 3C 3C 43 03 43 C3 30 30 30 h0000.<<<C.C.000
0035A0: 30 30 30 B7 3F 7B B7 3F 7B 3F B2 30 C0 3C 3C 38 000.?{.?{?.0.<<8
0035B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 C0 000000000000000.
0035C0: DC 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 .000000000000000
0035D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0035E0: 30 30 30 30 30 30 30 C3 83 03 03 83 83 03 C3 30 0000000........0
0035F0: 30 30 30 30 61 03 F3 B7 3F 7B 3F 7B 30 30 30 30 0000a...?{?{0000
003600: 94 3C 3C 30 30 30 30 30 30 30 30 30 30 30 30 30 .<<0000000000000
003610: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003620: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003630: 30 30 30 30 30 30 30 30 83 03 43 83 03 92 30 30 00000000..C...00
003640: 33 33 30 83 03 43 C3 03 03 03 03 43 30 30 30 30 330..C.....C0000
003650: 30 30 94 C0 C0 90 30 30 30 30 30 30 30 30 30 30 00....0000000000
003660: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003670: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003680: 30 30 30 30 30 30 30 30 82 00 41 3C 38 30 77 FF 00000000..A<80w.
003690: FF FF FF 33 3C 69 C3 C3 C3 83 C3 96 7C 30 30 30 ...3<i......|000
0036A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0036B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0036C0: 30 1E 41 30 30 30 30 30 30 30 30 30 30 30 30 30 0.A0000000000000
0036D0: 30 30 30 30 30 30 30 30 60 3C 3C 93 63 30 30 30 00000000`<<.c000
0036E0: 31 FF FF FF 33 62 30 30 30 30 30 94 68 3C 3C B8 1...3b00000.h<<.
0036F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003700: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003710: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003720: 30 30 30 30 30 61 83 03 3C 3C 3C 38 30 30 30 34 00000a..<<<80004
003730: 3C 3C 3C 90 30 30 30 30 30 30 30 30 30 C0 3C 3C <<<.000000000.<<
003740: B8 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 .000000000000000
003750: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003760: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003770: 30 30 61 00 C3 03 43 30 30 30 30 30 30 71 3F 3F 00a...C000000q??
003780: 7B 30 30 30 30 30 30 30 30 30 71 B7 3F 3F 33 30 {000000000q.??30
003790: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0037A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0037B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0037C0: 30 30 82 9E AE 00 82 30 30 30 30 30 30 30 B7 3F 00.....0000000.?
0037D0: 7B 30 30 30 30 30 30 30 30 30 82 3F 7B F3 30 30 {000000000.?{.00
0037E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0037F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003800: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003810: 30 30 30 30 30 30 30 30 30 30 30 30 D7 11 92 30 000000000000...0
003820: 30 30 30 30 30 30 30 30 30 30 64 82 11 63 30 30 0000000000d..c00
003830: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003840: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003850: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003860: 30 30 30 30 30 CC CC CC 30 30 30 30 30 30 30 30 00000...00000000
003870: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003880: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003890: 30 30 30 30 30 30 11 33 77 AA 33 33 33 33 00 33 000000.3w.3333.3
0038A0: 77 10 11 FF 10 30 30 30 30 30 20 10 30 30 30 30 w....00000 .0000
0038B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0038C0: 30 30 30 30 30 82 33 30 30 30 30 30 30 30 30 30 00000.3000000000
0038D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0038E0: 30 30 30 30 30 30 30 20 C0 80 C0 C0 11 33 22 20 0000000 .....3"
0038F0: C0 11 40 80 22 77 10 00 00 10 20 20 30 30 30 30 ..@."w.... 0000
003900: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003910: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003920: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003930: 30 30 30 30 30 30 30 40 80 22 11 77 40 80 62 80 0000000@.".w@.b.
003940: C0 11 40 80 22 40 80 30 30 30 30 30 30 30 30 30 ..@."@.000000000
003950: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003960: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003970: 30 30 30 30 30 30 30 24 30 0C 30 18 30 30 24 30 0000000$0.0.00$0
003980: 24 30 24 30 18 24 30 30 30 20 00 30 30 00 00 30 $0$0.$000 .00..0
003990: 20 10 30 20 00 30 30 00 00 00 00 00 00 00 00 00 .0 .00.........
0039A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0039B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0039C0: 00 00 00 00 00 00 00 0D E4 FF FF FF FF 11 69 09 ..............i.
0039D0: A6 04 A6 04 F0 04 62 09 01 10 08 10 00 07 01 00 ......b.........
0039E0: 2C 53 4F 43 43 45 52 37 2E 42 49 4E 00 00 00 00 ,SOCCER7.BIN....
0039F0: 00 07 00 02 00 08 00 F0 00 00 40 00 00 00 00 00 ..........@.....
003A00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AE0: 00 5E A6 FF FF FF FF 11 6A 09 F6 04 57 04 F6 04 .^......j...W...
003AF0: 56 09 01 10 08 18 0A 15 08 00 16 30 30 30 30 30 V..........00000
003B00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003B10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003B20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003B30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003B40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003B50: 30 30 40 C0 40 C0 10 30 30 30 30 30 30 30 30 30 00@.@..000000000
003B60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 00 00 00000000000000..
003B70: 40 C0 10 30 30 30 30 30 30 30 30 30 30 30 30 30 @..0000000000000
003B80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003B90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003BA0: 30 40 C0 40 C0 40 C0 40 C0 40 C0 10 30 40 C0 10 0@.@.@.@.@..0@..
003BB0: 30 40 C0 00 00 40 C0 10 30 30 30 30 30 20 C0 80 0@...@..00000 ..
003BC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003BD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003BE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003BF0: 30 30 30 30 30 30 30 30 30 30 30 82 17 30 30 30 00000000000..000
003C00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003C10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003C20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003C30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003C40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003C50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003C60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003C70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003C80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003C90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003CA0: 30 30 30 30 30 30 30 20 00 00 00 10 30 30 30 30 0000000 ....0000
003CB0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003CC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003CD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003CE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003CF0: 30 30 30 30 30 30 61 00 3C 3C C0 30 30 6C E6 30 000000a.<<.00l.0
003D00: 30 30 30 30 30 30 30 30 00 00 10 30 30 30 30 30 00000000...00000
003D10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003D20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003D30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003D40: 30 30 30 30 30 30 30 C3 13 63 68 94 91 C3 03 43 0000000..ch....C
003D50: 30 30 30 30 30 30 30 00 3C 3C 3C 41 30 30 30 30 0000000.<<<A0000
003D60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003D70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003D80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003D90: 30 30 30 61 83 03 03 83 03 03 43 C3 03 43 83 03 000a......C..C..
003DA0: 03 41 3C 38 30 30 30 94 68 C0 68 30 30 30 30 30 .A<8000.h.h00000
003DB0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003DC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003DD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003DE0: 30 30 34 69 C3 92 C3 C3 83 43 03 03 03 43 C3 30 004i.....C...C.0
003DF0: 30 30 71 6A 95 C0 68 C0 00 11 7B 7B 30 30 30 9A 00qj..h...{{000.
003E00: A0 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 .000000000000000
003E10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003E20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003E30: 30 30 30 34 3C 38 30 30 C3 C3 C3 83 03 C3 03 43 0004<800.......C
003E40: 92 30 28 F3 3F F3 B7 3F 3F 3F 3F 3F 3F F3 3F B2 .0(.?..??????.?.
003E50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003E60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003E70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003E80: 30 30 3C 3C 90 30 30 30 3C 3C 3C C3 C3 83 03 43 00<<.000<<<....C
003E90: 68 3C C0 30 30 F3 3F B7 3F 7B 3F 3F FB B7 7F FF h<.00.?.?{??....
003EA0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003EB0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003EC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003ED0: 34 00 68 30 30 30 30 C3 96 03 16 C3 03 03 C3 30 4.h0000........0
003EE0: 30 30 30 30 30 B7 3F 3F B7 3F 7B B7 B2 30 80 3C 00000.??.?{..0.<
003EF0: 3C 38 30 30 30 30 30 30 30 30 30 30 30 30 30 30 <800000000000000
003F00: 30 14 67 30 30 30 30 30 30 30 30 30 30 30 30 30 0.g0000000000000
003F10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003F20: 30 30 30 30 30 30 30 30 30 61 83 03 03 83 83 03 000000000a......
003F30: C3 30 30 30 30 30 C3 03 03 F3 B7 7B B7 7B 30 30 .00000.....{.{00
003F40: 30 30 60 3C 3C 30 30 30 30 30 30 30 30 30 30 30 00`<<00000000000
003F50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003F60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003F70: 30 30 30 30 30 30 30 30 30 30 C3 03 43 C3 03 92 0000000000..C...
003F80: 30 31 FF FF 32 83 03 83 C3 03 03 03 03 43 30 30 01..2........C00
003F90: 30 30 30 30 60 68 C0 90 30 30 30 30 30 30 30 30 0000`h..00000000
003FA0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003FB0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003FC0: 30 30 30 30 30 30 30 30 30 30 82 22 22 3C 38 30 0000000000.""<80
003FD0: 77 FF FF FF FF 33 3C 69 43 C3 C3 C3 96 3C 7C 30 w....3<iC....<|0
003FE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
003FF0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004000: 30 30 30 DA FC 30 30 30 30 30 30 30 30 30 30 30 000..00000000000
004010: 30 30 30 30 30 30 30 30 30 30 60 3C 3C C3 C3 30 0000000000`<<..0
004020: 30 30 31 FF FF BB 33 62 30 30 30 30 30 C0 68 3C 001...3b00000.h<
004030: 3C B8 30 30 30 30 30 30 30 30 30 30 30 30 30 30 <.00000000000000
004040: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004050: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004060: 30 30 30 30 30 30 30 C3 83 03 14 3C 3C 30 30 30 0000000....<<000
004070: 30 B6 3C 3C 68 30 30 30 30 30 30 30 30 30 31 C0 0.<<h0000000001.
004080: 3C 3C B8 30 30 30 30 30 30 30 30 30 30 30 30 30 <<.0000000000000
004090: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0040A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0040B0: 30 30 30 30 61 00 C3 03 92 30 30 30 30 30 30 71 0000a....000000q
0040C0: 3F 3F B2 30 30 30 30 30 30 30 30 30 71 3F 3F 7B ??.000000000q??{
0040D0: 32 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 2000000000000000
0040E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0040F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004100: 30 30 30 30 82 47 1D 00 93 30 30 30 30 30 30 20 0000.G...000000
004110: B7 3F B2 30 30 30 30 30 30 30 30 30 82 3F 7B B2 .?.000000000.?{.
004120: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004130: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004140: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004150: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 D7 00 00000000000000..
004160: 92 30 30 30 30 30 CC CC CC CC 30 30 CC 41 11 41 .00000....00.A.A
004170: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004180: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004190: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0041A0: 30 30 30 30 30 64 CC CC CC CC 98 30 30 30 30 30 00000d.....00000
0041B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0041C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0041D0: 30 30 30 30 30 30 30 30 11 33 77 AA 33 33 33 22 00000000.3w.333"
0041E0: C0 11 22 20 33 FF 10 30 30 30 30 00 20 20 30 30 .." 3..0000. 00
0041F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004200: 30 30 30 30 30 30 30 F9 72 30 30 30 30 30 30 30 0000000.r0000000
004210: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004220: 30 30 30 30 30 30 30 30 30 20 C0 10 40 C0 11 33 000000000 ..@..3
004230: 22 20 C0 11 40 80 00 77 10 30 20 10 00 20 30 30 " ..@..w.0 .. 00
004240: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004250: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004260: 30 30 30 30 30 30 30 30 30 30 30 30 30 18 30 30 0000000000000.00
004270: 0C 30 0C 30 0C 30 18 30 30 40 80 22 20 40 40 80 .0.0.0.00@." @@.
004280: 62 80 C0 11 40 80 22 40 80 30 30 30 30 30 30 30 b...@."@.0000000
004290: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0042A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0042B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0042C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0042D0: 30 30 30 30 30 30 30 30 30 00 00 00 00 00 00 00 000000000.......
0042E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0042F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004300: 00 00 00 00 00 00 00 00 00 2E AC FF FF FF FF 11 ................
004310: 69 09 A6 04 A6 04 EF 04 57 09 01 10 08 11 00 07 i.......W.......
004320: 01 00 2C 53 4F 43 43 45 52 37 2E 42 49 4E 00 00 ..,SOCCER7.BIN..
004330: 00 00 00 08 FF 02 00 08 00 F8 00 00 40 00 00 00 ............@...
004340: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004350: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004360: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004370: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0043A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0043B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0043C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0043D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0043E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0043F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004400: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004410: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004420: 00 00 00 97 29 FF FF FF FF 11 6A 09 F6 04 57 04 ....).....j...W.
004430: F5 04 53 09 01 10 08 49 29 15 08 00 16 30 30 30 ..S....I)....000
004440: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004450: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004460: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004470: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004480: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004490: 30 30 30 20 C0 C0 40 C0 10 00 00 10 30 00 00 10 000 ..@.....0...
0044A0: 30 00 00 10 30 00 00 10 20 00 00 10 30 30 30 30 0...0... ...0000
0044B0: 30 30 40 C0 10 30 30 30 30 30 30 30 30 30 30 30 00@..00000000000
0044C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0044D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0044E0: 30 30 30 40 C0 40 C0 40 C0 40 C0 40 C0 00 10 40 000@.@.@.@.@...@
0044F0: C0 00 40 40 C0 00 10 40 C0 10 30 30 30 30 30 20 ..@@...@..00000
004500: C0 80 30 30 30 30 30 30 30 30 30 30 30 30 30 30 ..00000000000000
004510: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004520: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004530: 30 30 30 30 30 30 30 30 30 30 30 30 30 06 70 30 0000000000000.p0
004540: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004550: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004560: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004570: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004580: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004590: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0045A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0045B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0045C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0045D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0045E0: 30 30 30 30 30 30 30 30 30 82 00 00 00 10 30 30 000000000.....00
0045F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004600: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004610: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004620: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004630: 30 30 30 30 30 30 30 30 61 00 C0 C0 C0 30 30 18 00000000a....00.
004640: AC 30 30 30 30 30 30 30 30 30 00 00 00 30 30 30 .000000000...000
004650: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004660: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004670: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004680: 30 30 30 30 30 30 30 30 C3 83 03 63 C0 3C 33 C3 00000000...c.<3.
004690: 03 03 92 30 30 30 30 30 30 41 3C 3C 3C 41 30 30 ...000000A<<<A00
0046A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0046B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0046C0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0046D0: 30 30 30 30 30 61 03 03 03 83 03 03 C3 43 03 0F 00000a.......C..
0046E0: 83 03 03 C3 3C 3C 30 30 30 60 3C 68 68 30 30 30 ....<<000`<hh000
0046F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004700: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004710: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004720: 30 30 30 30 3C 3C C3 30 C3 C3 03 43 03 03 03 03 0000<<.0...C....
004730: C3 30 30 30 B7 3F 3F F3 C0 C0 00 BB 7B B7 B2 30 .000.??.....{..0
004740: 30 6D A9 30 30 30 30 30 30 30 30 30 30 30 30 30 0m.0000000000000
004750: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004760: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004770: 30 30 30 30 30 3C 3C 38 30 30 C3 83 C3 03 43 83 00000<<800....C.
004780: 03 43 92 30 3C F3 3F F3 B7 3F 3F 3F 3F 3F 3F F3 .C.0<.?..??????.
004790: 3F B2 30 30 30 30 30 30 30 30 30 30 30 30 30 30 ?.00000000000000
0047A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0047B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0047C0: 30 30 30 34 3C 3C 90 30 30 30 3C 3C 3C 29 03 83 0004<<.000<<<)..
0047D0: 03 43 14 94 C0 30 30 B7 3F B7 3F 7B 3F 3F 7B B7 .C...00.?.?{??{.
0047E0: 77 FB 30 30 30 30 30 30 30 30 30 30 30 30 30 30 w.00000000000000
0047F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004800: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004810: 30 30 30 94 90 30 30 30 30 C3 83 03 03 C3 03 03 000..0000.......
004820: C3 30 30 30 30 30 30 B7 3F 3F B7 3F 3F B7 B2 30 .000000.??.??..0
004830: 60 3C 3C 3C 30 30 30 30 30 30 30 30 30 30 30 30 `<<<000000000000
004840: 30 30 30 95 28 30 30 30 30 30 30 30 30 30 30 30 000.(00000000000
004850: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004860: 30 30 30 30 30 30 30 30 30 30 30 61 83 03 03 C3 00000000000a....
004870: 83 83 C3 30 30 30 30 30 83 03 03 03 F3 F3 F3 F3 ...00000........
004880: 30 30 30 30 60 3C 3C 30 30 30 30 30 30 30 30 30 0000`<<000000000
004890: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0048A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0048B0: 30 30 30 30 30 30 30 30 30 30 30 30 C3 C3 43 C0 000000000000..C.
0048C0: 83 92 30 77 FF FF BB C3 03 C3 C3 03 03 03 03 43 ..0w...........C
0048D0: 30 30 30 30 30 30 30 94 94 30 30 30 30 30 30 30 0000000..0000000
0048E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0048F0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004900: 30 30 30 30 30 30 30 30 30 30 30 30 82 22 63 3C 000000000000."c<
004910: 30 30 77 FF FF FF FF 33 3C 3C 83 C3 C3 C3 3C 3C 00w....3<<....<<
004920: 7C 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 |000000000000000
004930: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004940: 30 30 30 30 30 4C 47 30 30 30 30 30 30 30 30 30 00000LG000000000
004950: 30 30 30 30 30 30 30 30 30 30 30 30 C0 94 3C 69 000000000000..<i
004960: 92 30 30 30 30 77 FF 33 33 90 30 30 30 30 30 60 .0000w.33.00000`
004970: 68 94 3C 7C 30 30 30 30 30 30 30 30 30 30 30 30 h.<|000000000000
004980: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004990: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0049A0: 30 30 30 30 30 30 30 61 C3 C3 03 03 96 14 3C 30 0000000a......<0
0049B0: 30 30 30 AA 3C 3C 68 30 30 30 30 30 30 30 30 30 000.<<h000000000
0049C0: 33 C0 3C 3C B8 30 30 30 30 30 30 30 30 30 30 30 3.<<.00000000000
0049D0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0049E0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
0049F0: 30 30 30 30 30 30 61 00 41 C3 30 30 30 30 30 30 000000a.A.000000
004A00: 30 B7 3F 3F B2 30 30 30 30 30 30 30 30 30 F3 3F 0.??.000000000.?
004A10: 3F F3 30 30 30 30 30 30 30 30 30 30 30 30 30 30 ?.00000000000000
004A20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004A30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004A40: 30 30 30 30 30 30 82 C6 8E 00 92 30 30 30 30 30 000000.....00000
004A50: 30 20 15 7B B2 30 30 30 30 30 30 30 30 30 82 15 0 .{.000000000..
004A60: F3 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 .000000000000000
004A70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004A80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004A90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 61 000000000000000a
004AA0: 00 22 C6 CC CC 30 CC CC CC CC CC CC CC CC CC C9 ."...0..........
004AB0: 00 41 98 30 30 30 30 30 30 30 30 30 30 30 30 30 .A.0000000000000
004AC0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004AD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004AE0: 30 30 30 64 CC CC CC CC CC CC CC CC CC CC 98 30 000d...........0
004AF0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004B00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004B10: 30 30 30 30 30 30 30 30 30 30 11 33 33 AA 11 33 0000000000.33..3
004B20: 33 22 C0 11 22 11 33 FF 10 30 30 30 10 00 00 20 3"..".3..000...
004B30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004B40: 30 30 30 30 30 30 30 30 30 7C 81 30 30 30 30 30 000000000|.00000
004B50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004B60: 30 30 30 30 30 30 30 30 30 30 30 40 C0 10 20 C0 00000000000@.. .
004B70: 11 33 22 20 C0 11 40 C0 80 77 10 30 20 20 00 20 .3" ..@..w.0 .
004B80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004B90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004BA0: 30 30 30 30 30 30 30 30 30 30 30 24 30 0C 30 24 00000000000$0.0$
004BB0: 30 30 24 24 24 24 24 24 24 30 30 40 80 10 20 C0 00$$$$$$$00@.. .
004BC0: 40 80 62 80 C0 00 40 80 22 40 80 30 30 30 30 30 @.b...@."@.00000
004BD0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004BE0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004BF0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004C00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0000000000000000
004C10: 30 30 30 30 30 30 30 30 30 30 30 00 00 00 00 00 00000000000.....
004C20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004C30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004C40: 00 00 00 00 00 00 00 00 00 00 00 1F E9 FF FF FF ................
004C50: FF 11 6C 09 F6 04 57 04 EF 04 61 09 01 10 08 11 ..l...W...a.....
004C60: 00 07 01 00 2C 53 4F 43 00 00 00 00 00 00 00 00 ....,SOC........
004C70: 00 00 00 00 00 01 00 16 00 08 7C 9E FF 00 00 00 ..........|.....
004C80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004C90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004CA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004CB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004CC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004CD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004CE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004CF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D60: 00 00 00 00 00 E5 6C FF FF FF FF 11 6B 09 F6 04 ......l.....k...
004D70: 57 04 FD 04 50 09 01 10 08 28 0B 15 08 00 16 31 W...P....(.....1
004D80: 30 20 4F 50 45 4E 4F 55 54 20 22 21 44 22 3A 4D 0 OPENOUT "!D":M
004D90: 45 4D 4F 52 59 20 48 49 4D 45 4D 2D 31 3A 43 4C EMORY HIMEM-1:CL
004DA0: 4F 53 45 4F 55 54 0D 0A 32 30 20 52 41 4E 44 4F OSEOUT..20 RANDO
004DB0: 4D 49 5A 45 20 54 49 4D 45 0D 0A 33 30 20 44 49 MIZE TIME..30 DI
004DC0: 4D 20 53 28 38 29 3A 44 49 4D 20 58 28 32 2C 34 M S(8):DIM X(2,4
004DD0: 2C 38 29 3A 44 49 4D 20 4C 28 38 2C 31 30 29 3A ,8):DIM L(8,10):
004DE0: 46 4F 52 20 4A 3D 31 20 54 4F 20 38 3A 46 4F 52 FOR J=1 TO 8:FOR
004DF0: 20 4E 3D 31 20 54 4F 20 31 30 3A 4C 28 4A 2C 4E N=1 TO 10:L(J,N
004E00: 29 3D 4E 3A 4E 45 58 54 20 4E 3A 4E 45 58 54 20 )=N:NEXT N:NEXT
004E10: 4A 3A 44 49 4D 20 59 28 32 2C 32 37 29 3A 44 49 J:DIM Y(2,27):DI
004E20: 4D 20 4D 28 38 29 3A 0D 0A 34 30 20 20 44 49 4D M M(8):..40 DIM
004E30: 20 49 28 38 2C 31 30 29 0D 0A 35 30 20 44 49 4D I(8,10)..50 DIM
004E40: 20 4F 28 31 33 29 2C 50 28 31 33 29 2C 56 28 31 O(13),P(13),V(1
004E50: 33 29 2C 57 28 31 33 29 0D 0A 36 30 20 4C 45 47 3),W(13)..60 LEG
004E60: 4F 3D 30 3A 46 4F 52 20 61 3D 31 20 54 4F 20 34 O=0:FOR a=1 TO 4
004E70: 3A 78 28 31 2C 61 2C 38 29 3D 61 3A 78 28 32 CB :x(1,a,8)=a:x(2.
004E80: 8C 2C 61 2C 38 29 3D 61 2B 34 3A 4E 45 58 54 20 .,a,8)=a+4:NEXT
004E90: 61 0D 0A 37 30 20 44 49 4D 20 6A 24 28 38 29 3A a..70 DIM j$(8):
004EA0: 73 65 73 3D 31 3A 44 49 4D 20 71 28 35 29 3A 44 ses=1:DIM q(5):D
004EB0: 49 4D 20 68 28 32 2C 38 2C 31 30 29 3A 44 49 4D IM h(2,8,10):DIM
004EC0: 20 67 28 32 2C 32 37 29 3A 44 49 4D 20 6B 24 28 g(2,27):DIM k$(
004ED0: 38 2C 31 30 29 3A 44 49 4D 20 6B 28 38 2C 31 30 8,10):DIM k(8,10
004EE0: 29 3A 44 49 4D 20 7A 28 38 2C 31 30 29 3A 46 4F ):DIM z(8,10):FO
004EF0: 52 20 6E 3D 31 20 54 4F 20 38 3A 6A 24 28 6E 29 R n=1 TO 8:j$(n)
004F00: 3D 22 37 35 22 3A 46 4F 52 20 6A 3D 31 20 54 4F ="75":FOR j=1 TO
004F10: 20 31 30 3A 4B 28 4E 2C 4A 29 3D 31 30 30 3A 4E 10:K(N,J)=100:N
004F20: 45 58 54 3A 4E 45 58 54 0D 0A 38 30 20 46 4F 52 EXT:NEXT..80 FOR
004F30: 20 61 3D 31 20 54 4F 20 38 3A 46 4F 52 20 62 3D a=1 TO 8:FOR b=
004F40: 31 20 54 4F 20 31 30 3A 6B 24 28 61 2C 62 29 3D 1 TO 10:k$(a,b)=
004F50: 22 2E 22 3A 4E 45 58 54 20 62 2C 61 20 0D 0A 39 ".":NEXT b,a ..9
004F60: 30 20 46 4F 52 20 6E 3D 31 20 54 4F 20 35 3A 71 0 FOR n=1 TO 5:q
004F70: 28 6E 29 3D 49 4E 54 28 52 4E 44 2A 38 29 2B 31 (n)=INT(RND*8)+1
004F80: 3A CD 03 4E 45 58 54 0D 0A 31 30 30 20 44 49 4D :..NEXT..100 DIM
004F90: 20 76 24 28 32 34 29 3A 44 49 4D 20 67 24 28 38 v$(24):DIM g$(8
004FA0: 2C 31 30 29 3A 44 49 4D 20 4E 24 28 38 2C 31 30 ,10):DIM N$(8,10
004FB0: 29 3A 44 49 4D 20 54 24 28 38 29 3A 44 49 4D 20 ):DIM T$(8):DIM
004FC0: 52 24 28 38 29 0D 0A 31 31 30 20 20 4D 4F 44 45 R$(8)..110 MODE
004FD0: 20 31 3A 42 4F 52 44 45 52 20 30 3A 49 4E 4B 20 1:BORDER 0:INK
004FE0: 30 2C 30 3A 49 4E 4B 20 31 2C 32 3A 49 4E 4B 20 0,0:INK 1,2:INK
004FF0: 32 2C 36 3A 49 4E 4B 20 33 2C 38 3A 49 4E 4B 20 2,6:INK 3,8:INK
005000: 34 2C 31 38 3A 49 4E 4B 20 35 2C 32 30 3A 49 4E 4,18:INK 5,20:IN
005010: 4B 20 36 2C 32 34 3A 49 4E 4B 20 37 2C 32 36 3A K 6,24:INK 7,26:
005020: 50 41 50 45 52 20 30 3A 50 45 4E 20 37 20 0D 0A PAPER 0:PEN 7 ..
005030: 31 32 30 20 4C 4F 43 41 54 45 20 35 2C 31 30 3A 120 LOCATE 5,10:
005040: 50 52 49 4E 54 22 44 4F 20 59 4F 55 20 57 41 4E PRINT"DO YOU WAN
005050: 54 20 54 4F 20 4C 4F 41 44 20 41 20 53 41 56 45 T TO LOAD A SAVE
005060: 44 20 47 41 4D 45 22 3A 4C 4F 43 41 54 45 20 31 D GAME":LOCATE 1
005070: 38 2C 31 31 3A 50 52 49 4E 54 22 28 59 2F 4E 29 8,11:PRINT"(Y/N)
005080: 22 0D 0A 27 5E 31 33 30 20 6C 24 3D 22 22 3A 57 "..'^130 l$="":W
005090: 48 49 4C 45 20 6C 24 3D 22 22 3A 6C 24 3D 55 50 HILE l$="":l$=UP
0050A0: 50 45 52 24 28 49 4E 4B 45 59 24 29 3A 57 45 4E PER$(INKEY$):WEN
0050B0: 44 0D 0A 31 34 30 20 49 46 20 6C 24 3D 22 59 22 D..140 IF l$="Y"
0050C0: 20 54 48 45 4E 20 47 4F 53 55 42 20 34 37 30 3A THEN GOSUB 470:
0050D0: 47 4F 54 4F 20 37 32 30 0D 0A 31 35 30 20 49 46 GOTO 720..150 IF
0050E0: 20 6C 24 3D 22 4E 22 20 54 48 45 4E 20 47 4F 54 l$="N" THEN GOT
0050F0: 4F 20 31 36 30 20 45 4C 53 45 20 47 4F 54 4F 20 O 160 ELSE GOTO
005100: 31 33 30 0D 0A 31 36 30 20 47 4F 53 55 42 20 34 130..160 GOSUB 4
005110: 36 30 0D 0A 31 37 30 20 71 3D 31 0D 0A 31 38 30 60..170 q=1..180
005120: 20 42 4F 52 44 45 52 20 30 3A 49 4E 4B 20 30 2C BORDER 0:INK 0,
005130: 30 3A 49 4E 4B 20 31 2C 32 3A 49 4E 4B 20 32 2C 0:INK 1,2:INK 2,
005140: 36 3A 49 4E 4B 20 33 2C 38 3A 49 4E 4B 20 34 2C 6:INK 3,8:INK 4,
005150: 31 38 3A 49 4E 4B 20 35 2C 32 30 3A 49 4E 4B 20 18:INK 5,20:INK
005160: 36 2C 32 34 3A 49 4E 4B 20 37 2C 32 36 3A 50 41 6,24:INK 7,26:PA
005170: 50 45 52 20 30 3A 50 45 4E 20 37 0D 0A 31 39 30 PER 0:PEN 7..190
005180: 20 43 4C 53 3A C9 C7 4C 4F 43 41 54 45 20 31 35 CLS:..LOCATE 15
005190: 2C 32 3A 50 52 49 4E 54 22 4E 45 57 20 53 45 41 ,2:PRINT"NEW SEA
0051A0: 53 4F 4E 22 0D 0A 32 30 30 20 67 65 6D 3D 30 3A SON"..200 gem=0:
0051B0: 50 45 4E 20 36 3A 4C 4F 43 41 54 45 20 31 32 2C PEN 6:LOCATE 12,
0051C0: 36 3A 50 52 49 4E 54 20 22 50 52 45 56 49 4F 55 6:PRINT "PREVIOU
0051D0: 53 20 57 49 4E 4E 45 52 53 3A 22 3A 46 4F 52 20 S WINNERS:":FOR
0051E0: 6E 3D 31 20 54 4F 20 35 3A 4C 4F 43 41 54 45 20 n=1 TO 5:LOCATE
0051F0: 31 32 2C 6E 2B 38 3A 50 45 4E 20 32 3A 50 52 49 12,n+8:PEN 2:PRI
005200: 4E 54 20 31 39 38 39 2B 73 65 73 2D 37 2B 6E 3A NT 1989+ses-7+n:
005210: 4C 4F 43 41 54 45 20 31 38 2C 6E 2B 38 3A 50 45 LOCATE 18,n+8:PE
005220: 4E 20 36 3A 50 52 49 4E 54 20 74 24 28 71 28 6E N 6:PRINT t$(q(n
005230: 29 29 0D 0A 32 31 30 20 4E 45 58 54 20 6E 0D 0A ))..210 NEXT n..
005240: 32 32 30 20 46 4F 52 20 6E 3D 31 20 54 4F 20 38 220 FOR n=1 TO 8
005250: 3A 6D 28 6E 29 3D 34 30 3A 4E 45 58 54 20 6E 0D :m(n)=40:NEXT n.
005260: 0A 32 33 30 20 4C 4F 43 41 54 45 20 31 35 2C 35 .230 LOCATE 15,5
005270: 3A 50 52 49 4E 54 22 53 45 41 53 4F 4E 3A 22 3A :PRINT"SEASON:":
005280: 50 45 4E 20 35 3A 4C B2 17 4F 43 41 54 45 20 32 PEN 5:L..OCATE 2
005290: 32 2C 35 3A 50 52 49 4E 54 20 73 65 73 0D 0A 32 2,5:PRINT ses..2
0052A0: 34 30 20 47 4F 53 55 42 20 34 35 30 0D 0A 32 35 40 GOSUB 450..25
0052B0: 30 20 43 4C 53 3A 4C 4F 43 41 54 45 20 31 32 2C 0 CLS:LOCATE 12,
0052C0: 31 30 3A 50 52 49 4E 54 20 22 48 4F 57 20 4D 41 10:PRINT "HOW MA
0052D0: 4E 59 20 50 4C 41 59 45 52 53 20 28 31 2D 38 29 NY PLAYERS (1-8)
0052E0: 20 22 3A 0D 0A 32 36 30 20 6C 24 3D 22 22 3A 57 ":..260 l$="":W
0052F0: 48 49 4C 45 20 6C 24 3D 22 22 3A 6C 24 3D 55 50 HILE l$="":l$=UP
005300: 50 45 52 24 28 49 4E 4B 45 59 24 29 3A 57 45 4E PER$(INKEY$):WEN
005310: 44 3A 49 46 20 56 41 4C 28 6C 24 29 3C 31 20 4F D:IF VAL(l$)<1 O
005320: 52 20 56 41 4C 28 6C 24 29 3E 38 20 54 48 45 4E R VAL(l$)>8 THEN
005330: 20 47 4F 54 4F 20 32 36 30 0D 0A 32 37 30 20 70 GOTO 260..270 p
005340: 6C 79 3D 56 41 4C 28 6C 24 29 0D 0A 32 38 30 20 ly=VAL(l$)..280
005350: 46 4F 52 20 4E 3D 31 20 54 4F 20 50 4C 59 0D 0A FOR N=1 TO PLY..
005360: 32 39 30 20 43 4C 53 3A 4C 4F 43 41 54 45 20 36 290 CLS:LOCATE 6
005370: 2C 31 3A 50 45 4E 20 33 3A 50 52 49 4E 54 22 50 ,1:PEN 3:PRINT"P
005380: 4C 45 41 53 45 20 53 45 4C 85 6F 45 43 54 20 54 LEASE SEL.oECT T
005390: 45 41 4D 20 54 4F 20 4D 41 4E 41 47 45 22 3A 46 EAM TO MANAGE":F
0053A0: 4F 52 20 4A 3D 31 20 54 4F 20 38 3A 4C 4F 43 41 OR J=1 TO 8:LOCA
0053B0: 54 45 20 31 33 2C 4A 2B 35 3A 50 52 49 4E 54 20 TE 13,J+5:PRINT
0053C0: 3B 4A 3B 22 2D 22 3B 54 24 28 4A 29 3A 4E 45 58 ;J;"-";T$(J):NEX
0053D0: 54 20 4A 0D 0A 33 30 30 20 46 4F 52 20 4A 3D 31 T J..300 FOR J=1
0053E0: 20 54 4F 20 50 4C 59 3A 49 46 20 53 28 4A 29 3C TO PLY:IF S(J)<
0053F0: 3E 30 20 54 48 45 4E 20 4C 4F 43 41 54 45 20 31 >0 THEN LOCATE 1
005400: 33 2C 28 35 2B 53 28 4A 29 29 3A 50 52 49 4E 54 3,(5+S(J)):PRINT
005410: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 "
005420: 20 22 3A 4E 45 58 54 20 4A 0D 0A 33 31 30 20 4C ":NEXT J..310 L
005430: 4F 43 41 54 45 20 31 36 2C 33 3A 50 45 4E 20 31 OCATE 16,3:PEN 1
005440: 3A 50 52 49 4E 54 22 50 4C 41 59 45 52 20 22 2B :PRINT"PLAYER "+
005450: 53 54 52 24 28 6E 29 0D 0A 33 32 30 20 4C 24 3D STR$(n)..320 L$=
005460: 22 22 3A 57 48 49 4C 45 20 4C 24 3D 22 22 3A 4C "":WHILE L$="":L
005470: 24 3D 55 50 50 45 52 24 28 49 4E 4B 45 59 24 29 $=UPPER$(INKEY$)
005480: 3A 57 45 4E 44 3A 49 46 20 56 41 5D 01 4C 28 4C :WEND:IF VA].L(L
005490: 24 29 3C 31 20 4F 52 20 56 41 4C 28 4C 24 29 3E $)<1 OR VAL(L$)>
0054A0: 38 20 54 48 45 4E 20 47 4F 54 4F 20 33 32 30 0D 8 THEN GOTO 320.
0054B0: 0A 33 33 30 20 54 53 54 3D 30 3A 46 4F 52 20 51 .330 TST=0:FOR Q
0054C0: 51 3D 31 20 54 4F 20 50 4C 59 3A 49 46 20 53 28 Q=1 TO PLY:IF S(
0054D0: 51 51 29 3D 56 41 4C 28 4C 24 29 20 54 48 45 4E QQ)=VAL(L$) THEN
0054E0: 20 54 53 54 3D 31 3A 4E 45 58 54 20 51 51 3A 0D TST=1:NEXT QQ:.
0054F0: 0A 33 34 30 20 49 46 20 54 53 54 3D 31 20 54 48 .340 IF TST=1 TH
005500: 45 4E 20 47 4F 54 4F 20 33 31 30 0D 0A 33 35 30 EN GOTO 310..350
005510: 20 49 46 20 54 53 54 3C 3E 31 20 54 48 45 4E 20 IF TST<>1 THEN
005520: 53 28 4E 29 3D 56 41 4C 28 4C 24 29 0D 0A 33 36 S(N)=VAL(L$)..36
005530: 30 20 50 45 4E 20 33 3A 4C 4F 43 41 54 45 20 31 0 PEN 3:LOCATE 1
005540: 32 2C 31 35 3A 50 52 49 4E 54 20 28 54 24 28 53 2,15:PRINT (T$(S
005550: 28 4E 29 29 29 3B 22 20 4D 41 4E 41 47 45 52 22 (N)));" MANAGER"
005560: 3A 4C 4F 43 41 54 45 20 31 30 2C 31 36 3A 50 52 :LOCATE 10,16:PR
005570: 49 4E 54 22 50 52 45 53 45 4E 54 20 4E 41 4D 45 INT"PRESENT NAME
005580: 3A 20 22 3B 28 52 24 28 53 28 4E 29 29 F2 61 FF : ";(R$(S(N)).a.
005590: FF FF FF 11 6A 09 A6 04 A6 04 F0 04 63 09 01 10 ....j.......c...
0055A0: 08 11 00 07 01 00 2C 53 4F 43 00 00 00 00 00 00 ......,SOC......
0055B0: 00 00 00 00 00 00 00 02 00 16 00 08 7C 9E 00 00 ............|...
0055C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0055D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0055E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0055F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005600: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005610: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005620: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005630: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005640: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005650: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0056A0: 00 00 00 00 00 00 00 D8 4C FF FF FF FF 11 6A 09 ........L.....j.
0056B0: A6 04 A6 04 FF 04 53 09 01 10 08 29 0B 15 08 00 ......S....)....
0056C0: 16 29 3A 4C 4F 43 41 54 45 20 31 35 2C 31 37 3A .):LOCATE 15,17:
0056D0: 50 45 4E 20 32 3A 50 52 49 4E 54 22 43 48 41 4E PEN 2:PRINT"CHAN
0056E0: 47 45 20 4E 41 4D 45 3F 22 0D 0A 33 37 30 20 4C GE NAME?"..370 L
0056F0: 4F 43 41 54 45 20 31 38 2C 31 38 3A 50 52 49 4E OCATE 18,18:PRIN
005700: 54 20 22 28 59 2F 4E 29 22 3A 4C 24 3D 22 22 3A T "(Y/N)":L$="":
005710: 57 48 49 4C 45 20 4C 24 3D 22 22 3A 4C 24 3D 55 WHILE L$="":L$=U
005720: 50 50 45 52 24 28 49 4E 4B 45 59 24 29 3A 57 45 PPER$(INKEY$):WE
005730: 4E 44 0D 0A 33 38 30 20 49 46 20 4C 24 3D 22 4E ND..380 IF L$="N
005740: 22 20 54 48 45 4E 20 47 4F 54 4F 20 34 33 30 0D " THEN GOTO 430.
005750: 0A 33 39 30 20 49 46 20 4C 24 3D 22 59 22 20 54 .390 IF L$="Y" T
005760: 48 45 4E 20 4C 4F 43 41 54 45 20 31 30 2C 31 36 HEN LOCATE 10,16
005770: 3A 50 52 49 4E 54 20 53 50 41 43 45 24 28 32 35 :PRINT SPACE$(25
005780: 29 3A 4C 4F 43 41 54 45 20 31 2C 32 34 3A 50 52 ):LOCATE 1,24:PR
005790: 49 4E 54 20 53 50 41 43 45 24 28 34 30 29 3A 4C INT SPACE$(40):L
0057A0: 4F 43 41 54 45 20 31 2C 32 34 3A 50 52 49 4E 54 OCATE 1,24:PRINT
0057B0: 22 4E 45 57 20 4E 41 4D 45 28 4D 41 58 20 31 30 "NEW NAME(MAX 10
0057C0: 29 E1 F2 22 3B 3A 49 4E 50 55 54 20 53 53 24 3A )..";:INPUT SS$:
0057D0: 49 46 20 4C 45 4E 28 53 53 24 29 20 3E 31 30 20 IF LEN(SS$) >10
0057E0: 54 48 45 4E 20 47 4F 54 4F 20 33 39 30 0D 0A 34 THEN GOTO 390..4
0057F0: 30 30 20 4C 4F 43 41 54 45 20 31 2C 32 34 3A 50 00 LOCATE 1,24:P
005800: 52 49 4E 54 20 53 50 41 43 45 24 28 34 30 29 0D RINT SPACE$(40).
005810: 0A 34 31 30 20 52 24 28 53 28 4E 29 29 3D 53 53 .410 R$(S(N))=SS
005820: 24 0D 0A 34 32 30 20 47 4F 54 4F 20 33 36 30 0D $..420 GOTO 360.
005830: 0A 34 33 30 20 4E 45 58 54 20 4E 0D 0A 34 34 30 .430 NEXT N..440
005840: 20 43 4C 53 3A 50 52 49 4E 54 22 4C 4F 41 44 49 CLS:PRINT"LOADI
005850: 4E 47 2E 2E 2E 2E 2E 2E 2E 2E 2E 22 3A 43 48 41 NG.........":CHA
005860: 49 4E 20 4D 45 52 47 45 20 22 53 4F 43 63 65 0D IN MERGE "SOCce.
005870: 0A 34 35 30 20 4C 4F 43 41 54 45 20 34 2C 32 34 .450 LOCATE 4,24
005880: 3A 50 52 49 4E 54 22 20 20 2A 2A 2A 50 52 45 53 :PRINT" ***PRES
005890: 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E S ANY KEY TO CON
0058A0: 54 49 4E 55 45 2A 2A 2A 22 3A 4C 24 3D 22 22 3A TINUE***":L$="":
0058B0: 57 48 49 4C 45 20 4C 24 3D 22 22 3A 4C 24 3D 49 WHILE L$="":L$=I
0058C0: 4E 4B 45 A2 8B 59 24 3A 57 45 4E 44 3A 52 45 54 NKE..Y$:WEND:RET
0058D0: 55 52 4E 0D 0A 34 36 30 20 3A 0D 0A 34 37 30 20 URN..460 :..470
0058E0: 46 4F 52 20 4E 3D 31 20 54 4F 20 32 3A 46 4F 52 FOR N=1 TO 2:FOR
0058F0: 20 4A 3D 31 20 54 4F 20 32 34 3A 52 45 41 44 20 J=1 TO 24:READ
005900: 59 28 4E 2C 4A 29 3A 4E 45 58 54 20 4A 3A 4E 45 Y(N,J):NEXT J:NE
005910: 58 54 20 4E 0D 0A 34 38 30 20 44 41 54 41 20 31 XT N..480 DATA 1
005920: 2C 35 2C 33 2C 37 2C 31 2C 35 2C 32 2C 36 2C 31 ,5,3,7,1,5,2,6,1
005930: 2C 35 2C 32 2C 36 2C 32 2C 36 2C 34 2C 38 2C 33 ,5,2,6,2,6,4,8,3
005940: 2C 37 2C 34 2C 38 2C 34 2C 38 2C 33 2C 37 0D 0A ,7,4,8,4,8,3,7..
005950: 34 39 30 20 44 41 54 41 20 32 2C 36 2C 34 2C 38 490 DATA 2,6,4,8
005960: 2C 33 2C 37 2C 34 2C 38 2C 34 2C 38 2C 33 2C 37 ,3,7,4,8,4,8,3,7
005970: 2C 31 2C 35 2C 33 2C 37 2C 31 2C 35 2C 32 2C 36 ,1,5,3,7,1,5,2,6
005980: 2C 31 2C 35 2C 32 2C 36 0D 0A 35 30 30 20 52 45 ,1,5,2,6..500 RE
005990: 53 54 4F 52 45 20 35 31 30 3A 46 4F 52 20 41 3D STORE 510:FOR A=
0059A0: 31 20 54 4F 20 32 31 3A 52 45 41 44 20 56 24 28 1 TO 21:READ V$(
0059B0: 41 29 3A 4E 45 58 54 20 41 0D 0A 35 31 30 20 44 A):NEXT A..510 D
0059C0: 41 54 41 20 6F 65 93 70 65 6E 20 67 6F 61 6C 2C ATA oe.pen goal,
0059D0: 73 69 6D 70 6C 65 20 74 61 70 20 69 6E 2C 65 61 simple tap in,ea
0059E0: 73 79 20 74 61 70 20 69 6E 2C 36 20 79 61 72 64 sy tap in,6 yard
0059F0: 20 66 69 6E 69 73 68 2C 63 68 65 73 74 65 64 20 finish,chested
005A00: 69 6E 2C 64 65 66 6C 65 63 74 65 64 20 66 72 6F in,deflected fro
005A10: 6D 20 31 30 20 79 64 73 2C 6F 6E 6C 79 20 68 61 m 10 yds,only ha
005A20: 64 20 6B 65 65 70 65 72 20 74 6F 20 62 65 61 74 d keeper to beat
005A30: 0D 0A 35 32 30 20 44 41 54 41 20 67 6F 61 6C 6D ..520 DATA goalm
005A40: 6F 75 74 68 20 73 63 72 61 62 6C 65 2C 67 6F 61 outh scrable,goa
005A50: 6C 6B 65 65 70 65 72 20 66 75 6D 62 6C 65 64 2C lkeeper fumbled,
005A60: 64 65 66 65 6E 73 69 76 65 20 6D 69 78 20 75 70 defensive mix up
005A70: 2C 68 65 61 64 20 69 6E 20 66 72 6F 6D 20 63 72 ,head in from cr
005A80: 6F 73 73 2C 64 72 69 62 62 6C 65 64 20 72 6F 75 oss,dribbled rou
005A90: 6E 64 20 31 20 61 6E 64 20 73 68 6F 74 2C 66 6C nd 1 and shot,fl
005AA0: 75 6B 65 20 32 30 20 79 61 72 64 73 2C 64 72 69 uke 20 yards,dri
005AB0: 62 62 6C 65 64 20 72 6F 75 6E 64 20 32 20 61 6E bbled round 2 an
005AC0: 64 20 73 68 6F 74 0D D7 91 0A 35 33 30 20 44 41 d shot....530 DA
005AD0: 54 41 20 67 6C 61 6E 63 69 6E 67 20 68 65 61 64 TA glancing head
005AE0: 65 72 2C 72 69 67 68 74 20 66 6F 6F 74 20 76 6F er,right foot vo
005AF0: 6C 6C 65 79 20 28 32 30 20 79 64 29 2C 6C 65 66 lley (20 yd),lef
005B00: 74 20 66 6F 6F 74 20 76 6F 6C 6C 65 79 20 28 32 t foot volley (2
005B10: 35 20 79 64 29 2C 63 75 72 6C 65 64 20 66 72 65 5 yd),curled fre
005B20: 65 20 6B 69 63 6B 20 72 6F 75 6E 64 20 77 61 6C e kick round wal
005B30: 6C 2C 64 69 76 69 6E 67 20 68 65 61 64 65 72 2C l,diving header,
005B40: 6F 76 65 72 68 65 61 64 20 73 63 69 73 73 6F 72 overhead scissor
005B50: 20 6B 69 63 6B 2C 62 6F 6D 62 65 72 20 73 70 65 kick,bomber spe
005B60: 63 69 61 6C 0D 0A 35 34 30 20 52 45 53 54 4F 52 cial..540 RESTOR
005B70: 45 20 35 35 30 3A 46 4F 52 20 41 3D 31 20 54 4F E 550:FOR A=1 TO
005B80: 20 38 3A 46 4F 52 20 42 3D 31 20 54 4F 20 31 30 8:FOR B=1 TO 10
005B90: 3A 52 45 41 44 20 47 24 28 41 2C 42 29 3A 4E 45 :READ G$(A,B):NE
005BA0: 58 54 20 42 2C 41 0D 0A 35 35 30 20 44 41 54 41 XT B,A..550 DATA
005BB0: 20 47 2C 44 2C 44 2C 4D 2C 4D 2C 41 2C 41 2C 44 G,D,D,M,M,A,A,D
005BC0: 2C 4D 2C 41 2C 47 2C 44 2C 13 A1 44 2C 4D 2C 4D ,M,A,G,D,..D,M,M
005BD0: 2C 41 2C 41 2C 44 2C 4D 2C 41 2C 47 2C 44 2C 44 ,A,A,D,M,A,G,D,D
005BE0: 2C 4D 2C 4D 2C 41 2C 41 2C 44 2C 4D 2C 41 2C 47 ,M,M,A,A,D,M,A,G
005BF0: 2C 44 2C 44 2C 4D 2C 4D 2C 41 2C 41 2C 44 2C 4D ,D,D,M,M,A,A,D,M
005C00: 2C 41 2C 47 2C 44 2C 44 2C 4D 2C 4D 2C 41 2C 41 ,A,G,D,D,M,M,A,A
005C10: 2C 44 2C 4D 2C 41 2C 47 2C 44 2C 44 2C 4D 2C 4D ,D,M,A,G,D,D,M,M
005C20: 2C 41 2C 41 2C 44 2C 4D 2C 41 2C 47 2C 44 2C 44 ,A,A,D,M,A,G,D,D
005C30: 2C 4D 2C 4D 2C 41 2C 41 2C 44 2C 4D 2C 41 2C 47 ,M,M,A,A,D,M,A,G
005C40: 2C 44 2C 44 2C 4D 2C 4D 2C 41 2C 41 2C 44 2C 4D ,D,D,M,M,A,A,D,M
005C50: 2C 41 0D 0A 35 36 30 20 52 45 53 54 4F 52 45 20 ,A..560 RESTORE
005C60: 35 37 30 3A 46 4F 52 20 41 3D 31 20 54 4F 20 38 570:FOR A=1 TO 8
005C70: 3A 46 4F 52 20 42 3D 31 20 54 4F 20 31 30 3A 52 :FOR B=1 TO 10:R
005C80: 45 41 44 20 4E 24 28 41 2C 42 29 3A 4E 45 58 54 EAD N$(A,B):NEXT
005C90: 20 42 2C 41 0D 0A 35 37 30 20 44 41 54 41 20 47 B,A..570 DATA G
005CA0: 52 4F 42 45 4C 41 41 52 2C 57 48 45 4C 41 4E 2C ROBELAAR,WHELAN,
005CB0: 4E 49 43 4F 4C 2C 4D 63 4D 41 48 4F 4E 2C 42 41 NICOL,McMAHON,BA
005CC0: 52 4E 45 53 2C 42 45 41 52 44 53 FC E2 4C 45 59 RNES,BEARDS..LEY
005CD0: 2C 52 55 53 48 2C 47 49 4C 4C 45 53 50 49 45 2C ,RUSH,GILLESPIE,
005CE0: 53 50 41 43 4B 4D 41 4E 2C 41 4C 44 52 49 44 47 SPACKMAN,ALDRIDG
005CF0: 45 0D 0A 35 38 30 20 44 41 54 41 20 4C 55 4B 49 E..580 DATA LUKI
005D00: 43 2C 54 48 4F 4D 41 53 2C 41 44 41 4D 53 2C 52 C,THOMAS,ADAMS,R
005D10: 4F 43 41 53 54 4C 45 2C 52 49 43 48 41 52 44 53 OCASTLE,RICHARDS
005D20: 4F 4E 2C 53 4D 49 54 48 2C 4D 41 52 57 4F 4F 44 ON,SMITH,MARWOOD
005D30: 2C 57 49 4E 54 45 52 2C 42 4F 55 4C 44 2C 4D 45 ,WINTER,BOULD,ME
005D40: 52 53 4F 4E 2C 4D 63 4B 4E 49 47 48 54 2C 50 4F RSON,McKNIGHT,PO
005D50: 54 54 53 2C 47 41 59 4C 45 2C 4B 45 45 4E 2C 4B TTS,GAYLE,KEEN,K
005D60: 45 4C 4C 59 2C 52 4F 53 45 4E 49 4F 52 2C 49 4E ELLY,ROSENIOR,IN
005D70: 43 45 2C 4D 41 52 54 49 4E 2C 57 41 52 44 2C 44 CE,MARTIN,WARD,D
005D80: 49 43 4B 45 4E 53 0D 0A 35 39 30 20 44 41 54 41 ICKENS..590 DATA
005D90: 20 47 55 4E 4E 2C 42 4F 57 45 4E 2C 42 55 54 54 GUNN,BOWEN,BUTT
005DA0: 45 52 2C 47 4F 52 44 4F 4E 2C 46 4C 45 43 4B 2C ER,GORDON,FLECK,
005DB0: 50 48 45 4C 41 4E 2C 50 55 54 4E 45 59 2C 43 55 PHELAN,PUTNEY,CU
005DC0: 4C 56 45 52 2C 54 4F 57 4E 53 45 4E 44 EA 4D 2C LVER,TOWNSEND.M,
005DD0: 41 4C 4C 45 4E 0D 0A 36 30 30 20 44 41 54 41 20 ALLEN..600 DATA
005DE0: 4C 45 49 47 48 54 4F 4E 2C 41 4E 44 45 52 53 4F LEIGHTON,ANDERSO
005DF0: 4E 2C 4D 63 47 52 41 54 48 2C 52 4F 42 53 4F 4E N,McGRATH,ROBSON
005E00: 2C 53 54 52 41 43 48 41 4E 2C 4D 63 43 4C 41 49 ,STRACHAN,McCLAI
005E10: 52 2C 48 55 47 48 45 53 2C 42 52 55 43 45 2C 4F R,HUGHES,BRUCE,O
005E20: 4C 53 45 4E 2C 57 48 49 54 45 53 49 44 45 0D 0A LSEN,WHITESIDE..
005E30: 36 31 30 20 44 41 54 41 20 4D 49 4D 4D 53 2C 46 610 DATA MIMMS,F
005E40: 45 4E 57 49 43 4B 2C 53 54 45 56 45 4E 53 2C 4D ENWICK,STEVENS,M
005E50: 41 42 42 55 54 2C 47 41 53 43 4F 49 47 4E 45 2C ABBUT,GASCOIGNE,
005E60: 57 41 44 44 4C 45 2C 53 54 45 57 41 52 54 2C 54 WADDLE,STEWART,T
005E70: 48 4F 4D 41 53 2C 4D 4F 52 41 4E 2C 53 41 4D 57 HOMAS,MORAN,SAMW
005E80: 41 59 53 0D 0A 36 32 30 20 44 41 54 41 20 53 4F AYS..620 DATA SO
005E90: 55 54 48 41 4C 4C 2C 52 41 54 43 4C 49 46 46 45 UTHALL,RATCLIFFE
005EA0: 2C 56 41 4E 20 44 45 4E 2C 48 41 55 57 45 2C 52 ,VAN DEN,HAUWE,R
005EB0: 45 49 44 2C 53 54 45 56 45 4E 2C 43 4F 54 54 45 EID,STEVEN,COTTE
005EC0: 45 2C 57 49 4C 53 4F 4E 2C 53 4E 4F 44 49 4E 47 E,WILSON,SNODING
005ED0: E2 FF FF FF FF 11 6D 09 A6 04 A6 04 F0 04 6E 09 ......m.......n.
005EE0: 01 10 08 10 00 07 01 00 2C 53 4F 43 00 00 00 00 ........,SOC....
005EF0: 00 00 00 00 00 00 00 00 00 03 FF 16 1A 06 7C 9E ..............|.
005F00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005F10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005F20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005F30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005F40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005F50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005F60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005F70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005F80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005F90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005FA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005FB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005FC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005FD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005FE0: 00 00 00 00 00 00 00 00 00 7B 8B FF FF FF FF 11 .........{......
005FF0: 6C 09 F6 04 57 04 FC 04 53 09 01 10 08 69 29 13 l...W...S....i).
006000: 07 00 16 2C 53 48 45 45 44 59 2C 53 48 41 52 50 ...,SHEEDY,SHARP
006010: 0D 0A 36 33 30 20 44 41 54 41 20 53 55 54 54 4F ..630 DATA SUTTO
006020: 4E 2C 50 45 41 52 43 45 2C 46 4F 53 54 45 52 2C N,PEARCE,FOSTER,
006030: 57 45 42 42 2C 48 4F 44 47 45 2C 43 4C 4F 55 47 WEBB,HODGE,CLOUG
006040: 48 2C 43 48 41 50 4D 41 4E 2C 43 48 45 54 54 4C H,CHAPMAN,CHETTL
006050: 45 2C 57 49 4C 53 4F 4E 2C 52 49 43 45 0D 0A 36 E,WILSON,RICE..6
006060: 34 30 20 52 45 53 54 4F 52 45 20 36 35 30 3A 46 40 RESTORE 650:F
006070: 4F 52 20 41 3D 31 20 54 4F 20 38 3A 52 45 41 44 OR A=1 TO 8:READ
006080: 20 54 24 28 41 29 3A 4E 45 58 54 20 41 0D 0A 36 T$(A):NEXT A..6
006090: 35 30 20 44 41 54 41 20 4C 49 56 45 52 50 4F 4F 50 DATA LIVERPOO
0060A0: 4C 2C 41 52 53 45 4E 41 4C 2C 57 45 53 54 20 48 L,ARSENAL,WEST H
0060B0: 41 4D 2C 4E 4F 52 57 49 43 48 2C 4D 41 4E 20 55 AM,NORWICH,MAN U
0060C0: 4E 49 54 45 44 2C 53 50 55 52 53 2C 45 56 45 52 NITED,SPURS,EVER
0060D0: 54 4F 4E 2C 4E 4F 54 54 53 20 46 4F 52 45 53 54 TON,NOTTS FOREST
0060E0: 0D 0A 36 36 30 20 52 45 53 54 4F 52 45 20 36 37 ..660 RESTORE 67
0060F0: 30 3A 46 4F 52 20 41 3D 31 20 54 4F 20 38 3A 52 0:FOR A=1 TO 8:R
006100: 45 41 44 B2 05 20 52 24 28 41 29 3A 4E 45 58 54 EAD.. R$(A):NEXT
006110: 20 41 0D 0A 36 37 30 20 44 41 54 41 20 43 2E 43 A..670 DATA C.C
006120: 48 41 50 4D 41 4E 2C 4A 2E 41 52 43 48 45 52 2C HAPMAN,J.ARCHER,
006130: 4D 2E 4E 45 57 54 4F 50 2C 47 2E 50 45 41 52 4D M.NEWTOP,G.PEARM
006140: 41 4E 2C 53 2E 42 52 49 47 47 53 2C 4A 2E 44 45 AN,S.BRIGGS,J.DE
006150: 20 53 41 4C 49 53 2C 54 2E 48 55 47 47 41 52 44 SALIS,T.HUGGARD
006160: 2C 53 2E 53 41 52 49 46 0D 0A 36 38 30 20 52 45 ,S.SARIF..680 RE
006170: 53 54 4F 52 45 20 36 39 30 3A 46 4F 52 20 4A 3D STORE 690:FOR J=
006180: 31 20 54 4F 20 38 3A 46 4F 52 20 49 3D 31 20 54 1 TO 8:FOR I=1 T
006190: 4F 20 31 30 3A 52 45 41 44 20 7A 28 4A 2C 49 29 O 10:READ z(J,I)
0061A0: 3A 68 28 31 2C 6A 2C 69 29 3D 7A 28 6A 2C 69 29 :h(1,j,i)=z(j,i)
0061B0: 3A 4E 45 58 54 20 49 3A 4E 45 58 54 20 4A 0D 0A :NEXT I:NEXT J..
0061C0: 36 39 30 20 44 41 54 41 20 31 32 2C 31 33 2C 31 690 DATA 12,13,1
0061D0: 34 2C 31 37 2C 31 39 2C 31 37 2C 31 38 2C 31 32 4,17,19,17,18,12
0061E0: 2C 31 37 2C 31 38 2C 31 38 2C 31 33 2C 31 38 2C ,17,18,18,13,18,
0061F0: 31 37 2C 31 35 2C 31 37 2C 31 38 2C 31 36 2C 31 17,15,17,18,16,1
006200: 37 2C 31 38 20 29 67 0D 0A 37 30 30 20 44 41 54 7,18 )g..700 DAT
006210: 41 20 31 30 2C 31 32 2C 32 30 2C 31 37 2C 31 36 A 10,12,20,17,16
006220: 2C 32 30 2C 31 33 2C 31 37 2C 31 33 2C 31 37 2C ,20,13,17,13,17,
006230: 31 36 2C 31 34 2C 31 38 2C 31 37 2C 32 30 2C 31 16,14,18,17,20,1
006240: 37 2C 31 31 2C 31 36 2C 31 36 2C 31 37 2C 31 32 7,11,16,16,17,12
006250: 2C 31 36 2C 31 39 2C 31 38 2C 31 38 2C 31 30 2C ,16,19,18,18,10,
006260: 31 38 2C 31 36 2C 31 32 2C 31 36 2C 31 37 2C 31 18,16,12,16,17,1
006270: 32 2C 31 36 2C 32 30 2C 31 32 2C 31 38 2C 31 38 2,16,20,12,18,18
006280: 2C 31 38 2C 31 37 2C 31 38 2C 31 36 2C 31 38 2C ,18,17,18,16,18,
006290: 31 37 2C 31 37 2C 31 39 2C 31 39 2C 31 38 2C 31 17,17,19,19,18,1
0062A0: 36 2C 31 38 2C 31 36 2C 31 39 2C 31 39 2C 31 36 6,18,16,19,19,16
0062B0: 2C 31 38 2C 31 39 2C 31 39 2C 31 38 2C 31 38 2C ,18,19,19,18,18,
0062C0: 31 37 2C 31 38 2C 31 36 2C 31 38 2C 31 38 2C 31 17,18,16,18,18,1
0062D0: 38 2C 31 37 2C 31 38 2C 31 36 2C 31 37 2C 31 37 8,17,18,16,17,17
0062E0: 2C 31 37 0D 0A 37 31 30 20 52 45 54 55 52 4E 0D ,17..710 RETURN.
0062F0: 0A 37 32 30 20 43 4C 53 3A 50 52 49 4E 54 22 50 .720 CLS:PRINT"P
006300: 4C 45 41 53 45 20 49 1C E2 4E 53 45 52 54 20 53 LEASE I..NSERT S
006310: 41 56 45 44 20 47 41 4D 45 20 54 41 50 45 22 3A AVED GAME TAPE":
006320: 43 4C 4F 53 45 49 4E 3A 4F 50 45 4E 49 4E 22 73 CLOSEIN:OPENIN"s
006330: 61 76 65 64 2E 67 6D 22 0D 0A 37 33 30 20 49 4E aved.gm"..730 IN
006340: 50 55 54 20 23 39 2C 71 3A 0D 0A 37 34 30 20 49 PUT #9,q:..740 I
006350: 4E 50 55 54 20 23 39 2C 70 6C 79 3A 0D 0A 37 35 NPUT #9,ply:..75
006360: 30 20 46 4F 52 20 61 3D 31 20 54 4F 20 70 6C 79 0 FOR a=1 TO ply
006370: 3A 49 4E 50 55 54 20 23 39 2C 73 28 61 29 3A 4E :INPUT #9,s(a):N
006380: 45 58 54 20 61 0D 0A 37 36 30 20 46 4F 52 20 61 EXT a..760 FOR a
006390: 3D 31 20 54 4F 20 38 3A 46 4F 52 20 62 3D 31 20 =1 TO 8:FOR b=1
0063A0: 54 4F 20 31 30 3A 49 4E 50 55 54 20 23 39 2C 6B TO 10:INPUT #9,k
0063B0: 28 61 2C 62 29 3A 4E 45 58 54 20 62 2C 61 0D 0A (a,b):NEXT b,a..
0063C0: 37 37 30 20 46 4F 52 20 61 3D 31 20 54 4F 20 38 770 FOR a=1 TO 8
0063D0: 3A 46 4F 52 20 62 3D 31 20 54 4F 20 31 30 3A 49 :FOR b=1 TO 10:I
0063E0: 4E 50 55 54 20 23 39 2C 7A 28 61 2C 62 29 3A 4E NPUT #9,z(a,b):N
0063F0: 45 58 54 20 62 2C 61 0D 0A 37 38 30 20 46 4F 52 EXT b,a..780 FOR
006400: 20 61 3D 31 20 54 4F 20 38 41 6E 3A 46 4F 52 20 a=1 TO 8An:FOR
006410: 62 3D 31 20 54 4F 20 31 30 3A 49 4E 50 55 54 20 b=1 TO 10:INPUT
006420: 23 39 2C 6C 28 61 2C 62 29 3A 4E 45 58 54 20 62 #9,l(a,b):NEXT b
006430: 2C 61 0D 0A 37 39 30 20 46 4F 52 20 61 3D 31 20 ,a..790 FOR a=1
006440: 54 4F 20 38 3A 49 4E 50 55 54 20 23 39 2C 72 24 TO 8:INPUT #9,r$
006450: 28 61 29 3A 4E 45 58 54 20 61 0D 0A 38 30 30 20 (a):NEXT a..800
006460: 46 4F 52 20 61 3D 31 20 54 4F 20 38 3A 49 4E 50 FOR a=1 TO 8:INP
006470: 55 54 20 23 39 2C 74 24 28 61 29 3A 4E 45 58 54 UT #9,t$(a):NEXT
006480: 20 61 0D 0A 38 31 30 20 46 4F 52 20 61 3D 31 20 a..810 FOR a=1
006490: 54 4F 20 38 3A 46 4F 52 20 62 3D 31 20 54 4F 20 TO 8:FOR b=1 TO
0064A0: 31 30 3A 49 4E 50 55 54 20 23 39 2C 6B 24 28 61 10:INPUT #9,k$(a
0064B0: 2C 62 29 3A 0D 0A 38 32 30 20 4E 45 58 54 20 62 ,b):..820 NEXT b
0064C0: 2C 61 0D 0A 38 33 30 20 46 4F 52 20 61 3D 31 20 ,a..830 FOR a=1
0064D0: 54 4F 20 31 30 3A 46 4F 52 20 62 3D 31 20 54 4F TO 10:FOR b=1 TO
0064E0: 20 32 3A 49 4E 50 55 54 20 23 39 2C 72 28 61 2C 2:INPUT #9,r(a,
0064F0: 62 29 3A 4E 45 58 54 20 62 2C 61 3A 0D 0A 38 34 b):NEXT b,a:..84
006500: 30 20 46 4F 52 20 61 3D 31 20 54 E4 51 4F 20 31 0 FOR a=1 T.QO 1
006510: 30 3A 46 4F 52 20 62 3D 31 20 54 4F 20 32 3A 49 0:FOR b=1 TO 2:I
006520: 4E 50 55 54 20 23 39 2C 75 28 61 2C 62 29 3A 4E NPUT #9,u(a,b):N
006530: 45 58 54 20 62 2C 61 0D 0A 38 35 30 20 46 4F 52 EXT b,a..850 FOR
006540: 20 41 3D 31 20 54 4F 20 32 3A 46 4F 52 20 42 3D A=1 TO 2:FOR B=
006550: 31 20 54 4F 20 32 34 3A 49 4E 50 55 54 20 23 39 1 TO 24:INPUT #9
006560: 2C 47 28 41 2C 42 29 3A 4E 45 58 54 20 42 2C 41 ,G(A,B):NEXT B,A
006570: 0D 0A 38 36 30 20 46 4F 52 20 41 3D 31 20 54 4F ..860 FOR A=1 TO
006580: 20 32 3A 46 4F 52 20 42 3D 31 20 54 4F 20 34 3A 2:FOR B=1 TO 4:
006590: 46 4F 52 20 43 3D 31 20 54 4F 20 38 3A 49 4E 50 FOR C=1 TO 8:INP
0065A0: 55 54 20 23 39 2C 58 28 41 2C 42 2C 43 29 3A 4E UT #9,X(A,B,C):N
0065B0: 45 58 54 20 43 2C 42 2C 41 0D 0A 38 37 30 20 46 EXT C,B,A..870 F
0065C0: 4F 52 20 41 3D 31 20 54 4F 20 38 3A 49 4E 50 55 OR A=1 TO 8:INPU
0065D0: 54 20 23 39 2C 4A 24 28 41 29 3A 4E 45 58 54 20 T #9,J$(A):NEXT
0065E0: 41 0D 0A 38 38 30 20 43 4C 4F 53 45 49 4E 0D 0A A..880 CLOSEIN..
0065F0: 38 39 30 20 50 52 49 4E 54 22 50 4C 45 41 53 45 890 PRINT"PLEASE
006600: 20 49 4E 53 45 52 54 20 4F 52 49 47 49 00 90 4F INSERT ORIGI..O
006610: 4E 41 4C 20 54 41 50 45 22 0D 0A 39 30 30 20 47 NAL TAPE"..900 G
006620: 4F 54 4F 20 34 34 30 0D 0A 00 00 00 00 00 00 00 OTO 440.........
006630: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006640: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006650: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0066F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006700: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5E ...............^
006710: 6E FF FF FF FF 11 71 09 A6 04 A6 04 F2 04 67 09 n.....q.......g.
006720: 01 10 08 10 00 07 01 00 2C 53 4F 43 43 45 00 00 ........,SOCCE..
006730: 00 00 00 00 00 00 00 00 00 01 00 16 00 08 7C 9E ..............|.
006740: FF 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006750: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006760: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0067A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0067B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0067C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0067D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0067E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0067F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006800: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006810: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006820: 00 00 00 00 00 00 00 00 00 19 14 FF FF FF FF 11 ................
006830: 72 09 A6 04 A6 04 01 05 59 09 01 10 08 38 0B 15 r.......Y....8..
006840: 08 00 16 31 30 20 43 4C 53 3A 52 50 4C 3D 30 3A ...10 CLS:RPL=0:
006850: 43 4F 54 3D 30 3A 52 44 3D 31 32 3A 47 4F 54 3D COT=0:RD=12:GOT=
006860: 31 30 38 36 3A 47 52 4F 55 3D 31 3A 47 52 4F 55 1086:GROU=1:GROU
006870: 50 3D 30 3A 4C 4F 43 41 54 45 20 31 30 2C 34 3A P=0:LOCATE 10,4:
006880: 50 52 49 4E 54 20 22 47 52 4F 55 50 20 4D 41 54 PRINT "GROUP MAT
006890: 43 48 45 53 22 0D 0A 32 30 20 52 50 4C 3D 30 3A CHES"..20 RPL=0:
0068A0: 4C 4F 43 41 54 45 20 31 35 2C 37 3A 50 52 49 4E LOCATE 15,7:PRIN
0068B0: 54 20 22 4E 45 58 54 20 4D 41 54 43 48 20 2D 22 T "NEXT MATCH -"
0068C0: 3A 50 45 4E 20 36 3A 4C 4F 43 41 54 45 20 31 35 :PEN 6:LOCATE 15
0068D0: 2C 39 3A 50 52 49 4E 54 20 54 24 28 59 28 31 2C ,9:PRINT T$(Y(1,
0068E0: 71 29 29 3B 22 20 56 20 22 3B 54 24 28 59 28 32 q));" V ";T$(Y(2
0068F0: 2C 71 29 29 3A 54 52 41 31 3D 35 3A 54 52 41 32 ,q)):TRA1=5:TRA2
006900: 3D 35 3A 47 4F 53 55 42 20 33 34 38 30 0D 0A 33 =5:GOSUB 3480..3
006910: 30 20 4E 55 3D 30 3A 4E 55 31 3D 30 3A 67 31 3D 0 NU=0:NU1=0:g1=
006920: 30 3A 67 32 3D 30 3A 46 50 3D 30 3A 46 4F 52 20 0:g2=0:FP=0:FOR
006930: 6E 3D 31 20 54 4F 20 70 6C 59 0D 0A 34 30 20 49 n=1 TO plY..40 I
006940: 46 20 59 7B 54 28 31 2C 51 29 3D 53 28 4E 29 20 F Y{T(1,Q)=S(N)
006950: 54 48 45 4E 20 47 31 3D 31 20 3A 4E 55 3D 73 28 THEN G1=1 :NU=s(
006960: 4E 29 0D 0A 35 30 20 49 46 20 59 28 32 2C 51 29 N)..50 IF Y(2,Q)
006970: 3D 53 28 4E 29 20 54 48 45 4E 20 47 32 3D 31 20 =S(N) THEN G2=1
006980: 3A 4E 55 31 3D 73 28 4E 29 0D 0A 36 30 20 4E 45 :NU1=s(N)..60 NE
006990: 58 54 20 6E 0D 0A 37 30 20 49 46 20 67 31 3D 31 XT n..70 IF g1=1
0069A0: 20 4F 52 20 47 32 3D 31 20 54 48 45 4E 20 47 4F OR G2=1 THEN GO
0069B0: 54 4F 20 32 33 33 30 0D 0A 38 30 20 20 46 4F 52 TO 2330..80 FOR
0069C0: 20 4E 3D 31 20 54 4F 20 35 3A 55 28 4E 2C 31 29 N=1 TO 5:U(N,1)
0069D0: 3D 30 3A 55 28 4E 2C 32 29 3D 30 3A 52 28 4E 2C =0:U(N,2)=0:R(N,
0069E0: 31 29 3D 30 3A 52 28 4E 2C 32 29 3D 30 3A 4E 45 1)=0:R(N,2)=0:NE
0069F0: 58 54 20 4E 0D 0A 39 30 20 46 4F 52 20 4E 3D 31 XT N..90 FOR N=1
006A00: 20 54 4F 20 39 0D 0A 31 30 30 20 4F 28 4E 29 3D TO 9..100 O(N)=
006A10: 4C 28 59 28 31 2C 51 29 2C 4E 29 3A 56 28 4E 29 L(Y(1,Q),N):V(N)
006A20: 3D 5A 28 59 28 31 2C 51 29 2C 4F 28 4E 29 29 3A =Z(Y(1,Q),O(N)):
006A30: 50 28 4E 29 3D 4C 28 59 28 32 2C 51 29 2C 4E 29 P(N)=L(Y(2,Q),N)
006A40: 3A 57 28 4E 29 B1 3E 3D 5A 28 59 28 32 2C 51 29 :W(N).>=Z(Y(2,Q)
006A50: 2C 50 28 4E 29 29 3A 4E 45 58 54 20 4E 20 0D 0A ,P(N)):NEXT N ..
006A60: 31 31 30 20 50 45 4E 20 31 3A 43 4C 53 3A 45 58 110 PEN 1:CLS:EX
006A70: 54 3D 30 3A 59 24 3D 54 24 28 59 28 31 2C 51 29 T=0:Y$=T$(Y(1,Q)
006A80: 29 3A 47 4F 41 4C 31 3D 30 3A 47 4F 41 4C 32 3D ):GOAL1=0:GOAL2=
006A90: 30 3A 48 31 3D 30 3A 48 32 3D 30 3A 43 50 31 3D 0:H1=0:H2=0:CP1=
006AA0: 35 3A 47 45 4D 3D 31 3A 43 50 32 3D 35 0D 0A 31 5:GEM=1:CP2=5..1
006AB0: 32 30 20 5A 24 3D 54 24 28 59 28 32 2C 51 29 29 20 Z$=T$(Y(2,Q))
006AC0: 0D 0A 31 33 30 20 4C 4F 43 41 54 45 20 31 2C 31 ..130 LOCATE 1,1
006AD0: 3A 50 52 49 4E 54 20 59 24 3A 46 4F 52 20 6E 3D :PRINT Y$:FOR n=
006AE0: 31 20 54 4F 20 37 3A 41 24 28 4E 29 3D 4E 24 28 1 TO 7:A$(N)=N$(
006AF0: 59 28 31 2C 51 29 2C 4F 28 6E 29 29 3A 4C 4F 43 Y(1,Q),O(n)):LOC
006B00: 41 54 45 20 31 2C 4E 2B 32 3A 50 52 49 4E 54 20 ATE 1,N+2:PRINT
006B10: 4E 3A 4C 4F 43 41 54 45 20 34 2C 4E 2B 32 3A 50 N:LOCATE 4,N+2:P
006B20: 52 49 4E 54 20 41 24 28 4E 29 3A 41 28 4E 29 3D RINT A$(N):A(N)=
006B30: 28 5A 28 59 28 31 2C 51 29 2C 4F 28 4E 29 29 2F (Z(Y(1,Q),O(N))/
006B40: 31 30 29 0D 0A 31 34 05 C1 30 20 52 4D 3D 30 3A 10)..14..0 RM=0:
006B50: 49 46 20 4B 24 28 59 28 31 2C 51 29 2C 4F 28 4E IF K$(Y(1,Q),O(N
006B60: 29 29 3D 22 2A 22 20 54 48 45 4E 20 4C 4F 43 41 ))="*" THEN LOCA
006B70: 54 45 20 31 34 2C 4E 2B 32 3A 50 52 49 4E 54 20 TE 14,N+2:PRINT
006B80: 22 2E 2E 2E 49 53 20 49 4E 4A 55 52 45 44 20 22 "...IS INJURED "
006B90: 3A 41 28 4E 29 3D 31 3A 52 4D 3D 31 0D 0A 31 35 :A(N)=1:RM=1..15
006BA0: 30 20 52 4D 32 3D 30 3A 49 46 20 4B 24 28 59 28 0 RM2=0:IF K$(Y(
006BB0: 31 2C 51 29 2C 4F 28 4E 29 29 3D 22 53 22 20 54 1,Q),O(N))="S" T
006BC0: 48 45 4E 20 4C 4F 43 41 54 45 20 31 34 2C 4E 2B HEN LOCATE 14,N+
006BD0: 32 3A 50 52 49 4E 54 20 22 2E 2E 2E 49 53 20 53 2:PRINT "...IS S
006BE0: 55 53 50 45 4E 44 45 44 22 3A 41 28 4E 29 3D 31 USPENDED":A(N)=1
006BF0: 3A 52 4D 32 3D 31 0D 0A 31 36 30 20 4E 45 58 54 :RM2=1..160 NEXT
006C00: 20 4E 0D 0A 31 37 30 20 4E 3D 31 0D 0A 31 38 30 N..170 N=1..180
006C10: 20 57 48 49 4C 45 20 4E 3C 3D 50 4C 59 0D 0A 31 WHILE N<=PLY..1
006C20: 39 30 20 49 46 20 53 28 4E 29 3D 59 28 31 2C 51 90 IF S(N)=Y(1,Q
006C30: 29 20 41 4E 44 20 52 4D 3D 31 20 54 48 45 4E 20 ) AND RM=1 THEN
006C40: 4C 4F 43 41 54 45 20 31 2C 1B E9 32 33 3A 50 52 LOCATE 1,..23:PR
006C50: 49 4E 54 22 59 4F 55 20 41 52 45 20 50 4C 41 59 INT"YOU ARE PLAY
006C60: 49 4E 47 20 57 49 54 48 20 41 4E 20 49 4E 4A 55 ING WITH AN INJU
006C70: 52 45 44 20 50 4C 41 59 45 52 2E 2E 2E 52 45 4C RED PLAYER...REL
006C80: 45 4C 45 43 54 20 54 45 41 4D 22 3A 4C 4F 43 41 ELECT TEAM":LOCA
006C90: 54 45 20 31 2C 32 34 3A 50 52 49 4E 54 22 20 20 TE 1,24:PRINT"
006CA0: 20 20 20 20 20 20 20 20 20 50 52 45 53 53 20 41 PRESS A
006CB0: 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E NY KEY TO CONTIN
006CC0: 55 45 22 3A 51 51 24 3D 22 22 3A 57 48 49 4C 45 UE":QQ$="":WHILE
006CD0: 20 51 51 24 3D 22 22 3A 51 51 24 3D 55 50 50 45 QQ$="":QQ$=UPPE
006CE0: 52 24 28 49 4E 4B 45 59 24 29 3A 57 45 4E 44 3A R$(INKEY$):WEND:
006CF0: 47 4F 54 4F 20 32 33 33 30 0D 0A 32 30 30 20 49 GOTO 2330..200 I
006D00: 46 20 53 28 4E 29 3D 59 28 31 2C 51 29 20 41 4E F S(N)=Y(1,Q) AN
006D10: 44 20 52 4D 32 3D 31 20 54 48 45 4E 20 4C 4F 43 D RM2=1 THEN LOC
006D20: 41 54 45 20 31 2C 32 33 3A 50 52 49 4E 54 22 59 ATE 1,23:PRINT"Y
006D30: 4F 55 20 41 52 45 20 50 4C 41 59 49 4E 47 20 57 OU ARE PLAYING W
006D40: 49 54 48 20 41 20 53 55 53 50 45 43 B3 4E 44 45 ITH A SUSPEC.NDE
006D50: 44 20 50 4C 41 59 45 52 2E 2E 52 45 53 45 4C 45 D PLAYER..RESELE
006D60: 43 54 20 54 45 41 4D 22 3A 4C 4F 43 41 54 45 20 CT TEAM":LOCATE
006D70: 31 2C 32 34 3A 50 52 49 4E 54 22 20 20 20 20 20 1,24:PRINT"
006D80: 20 20 20 20 20 20 50 52 45 53 53 20 41 4E 59 20 PRESS ANY
006D90: 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 KEY TO CONTINUE"
006DA0: 3A 51 51 24 3D 22 22 3A 57 48 49 4C 45 20 51 51 :QQ$="":WHILE QQ
006DB0: 24 3D 22 22 3A 51 51 24 3D 55 50 50 45 52 24 28 $="":QQ$=UPPER$(
006DC0: 49 4E 4B 45 59 24 29 3A 57 45 4E 44 3A 47 4F 54 INKEY$):WEND:GOT
006DD0: 4F 20 32 33 33 30 20 0D 0A 32 31 30 20 4E 3D 4E O 2330 ..210 N=N
006DE0: 2B 31 3A 57 45 4E 44 0D 0A 32 32 30 20 50 45 4E +1:WEND..220 PEN
006DF0: 31 3D 49 4E 54 28 52 4E 44 2A 36 29 3A 4E 3D 31 1=INT(RND*6):N=1
006E00: 0D 0A 32 33 30 20 57 48 49 4C 45 20 4E 3C 3D 20 ..230 WHILE N<=
006E10: 50 4C 59 0D 0A 32 34 30 20 49 46 20 53 28 4E 29 PLY..240 IF S(N)
006E20: 3D 59 28 31 2C 51 29 20 54 48 45 4E 20 4D 24 3D =Y(1,Q) THEN M$=
006E30: 22 50 45 4E 41 4C 54 59 20 54 41 4B 45 52 20 28 "PENALTY TAKER (
006E40: 4E 4F 2E 29 20 22 3A 47 4F 53 55 42 20 2C B6 33 NO.) ":GOSUB ,.3
006E50: 37 32 30 3A 50 45 4E 31 3D 56 41 4C 28 4C 24 29 720:PEN1=VAL(L$)
006E60: 3A 49 46 20 50 45 4E 31 3C 31 20 4F 52 20 50 45 :IF PEN1<1 OR PE
006E70: 4E 31 3E 36 20 54 48 45 4E 20 47 4F 54 4F 20 32 N1>6 THEN GOTO 2
006E80: 34 30 0D 0A 32 35 30 20 4E 3D 4E 2B 31 3A 57 45 40..250 N=N+1:WE
006E90: 4E 44 0D 0A 32 36 30 20 54 41 47 31 3D 49 4E 54 ND..260 TAG1=INT
006EA0: 28 52 4E 44 2A 36 29 2B 31 3A 46 4F 52 20 4E 3D (RND*6)+1:FOR N=
006EB0: 31 20 54 4F 20 50 4C 59 0D 0A 32 37 30 20 49 46 1 TO PLY..270 IF
006EC0: 20 53 28 4E 29 3D 59 28 31 2C 51 29 20 54 48 45 S(N)=Y(1,Q) THE
006ED0: 4E 20 4D 24 3D 22 54 45 41 4D 20 41 47 47 52 45 N M$="TEAM AGGRE
006EE0: 53 53 49 4F 4E 20 31 3D 44 45 4C 49 43 41 54 45 SSION 1=DELICATE
006EF0: 20 39 3D 48 41 52 44 20 22 3A 47 4F 53 55 42 20 9=HARD ":GOSUB
006F00: 33 37 32 30 3A 54 41 47 31 3D 56 41 4C 28 4C 24 3720:TAG1=VAL(L$
006F10: 29 0D 0A 32 38 30 20 49 46 20 73 28 6E 29 3D 59 )..280 IF s(n)=Y
006F20: 28 31 2C 51 29 20 54 48 45 4E 20 4D 24 3D 22 54 (1,Q) THEN M$="T
006F30: 45 41 4D 20 43 41 50 54 41 49 4E 20 28 4E 4F 2E EAM CAPTAIN (NO.
006F40: 29 3A 2D 20 22 3A 47 4F 53 55 42 20 33 37 32 BC ):- ":GOSUB 372.
006F50: 55 30 3A 43 50 31 3D 56 41 4C 28 4C 24 29 3A 20 U0:CP1=VAL(L$):
006F60: 49 46 20 63 70 31 3C 31 20 4F 52 20 43 50 31 3E IF cp1<1 OR CP1>
006F70: 37 20 54 48 45 4E 20 47 4F 54 4F 20 32 38 30 0D 7 THEN GOTO 280.
006F80: 0A 32 39 30 20 49 46 20 54 41 47 31 3C 31 20 4F .290 IF TAG1<1 O
006F90: 52 20 54 41 47 31 3E 39 20 54 48 45 4E 20 47 4F R TAG1>9 THEN GO
006FA0: 54 4F 20 32 37 30 0D 0A 33 30 30 20 4E 45 58 54 TO 270..300 NEXT
006FB0: 20 4E 0D 0A 33 31 30 20 41 28 43 50 31 29 3D 41 N..310 A(CP1)=A
006FC0: 28 43 50 31 29 2A 31 2E 35 3A 46 4F 52 20 4E 3D (CP1)*1.5:FOR N=
006FD0: 31 20 54 4F 20 39 3A 49 46 20 43 28 4E 29 3C 3E 1 TO 9:IF C(N)<>
006FE0: 45 28 4E 29 20 54 48 45 4E 20 41 28 4E 29 3D 41 E(N) THEN A(N)=A
006FF0: 28 4E 29 2D 32 0D 0A 33 32 30 20 4E 45 58 54 20 (N)-2..320 NEXT
007000: 4E 0D 0A 33 33 30 20 43 4C 53 3A 4C 4F 43 41 54 N..330 CLS:LOCAT
007010: 45 20 31 2C 31 3A 50 52 49 4E 54 20 5A 24 3A 46 E 1,1:PRINT Z$:F
007020: 4F 52 20 4E 3D 31 20 54 4F 20 37 3A 42 24 28 4E OR N=1 TO 7:B$(N
007030: 29 3D 4E 24 28 59 28 32 2C 51 29 2C 50 28 4E 29 )=N$(Y(2,Q),P(N)
007040: 29 3A 4C 4F 43 41 54 45 20 31 2C 4E 2B 32 3A 50 ):LOCATE 1,N+2:P
007050: 52 0E 88 FF FF FF FF 11 71 09 F6 04 57 04 F2 04 R.......q...W...
007060: 64 09 01 10 08 10 00 07 01 00 2C 53 4F 43 43 45 d.........,SOCCE
007070: 00 00 00 00 00 00 00 00 00 00 00 02 00 16 00 08 ................
007080: 7C 9E 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |...............
007090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007160: 00 00 00 00 00 00 00 00 00 00 00 24 34 FF FF FF ...........$4...
007170: FF 11 71 09 F6 04 57 04 02 05 58 09 01 10 08 58 ..q...W...X....X
007180: 0B 15 08 00 16 49 4E 54 20 4E 3A 4C 4F 43 41 54 .....INT N:LOCAT
007190: 45 20 34 2C 4E 2B 32 3A 50 52 49 4E 54 20 42 24 E 4,N+2:PRINT B$
0071A0: 28 4E 29 3B 3A 42 28 4E 29 3D 28 5A 28 59 28 32 (N);:B(N)=(Z(Y(2
0071B0: 2C 51 29 2C 50 28 4E 29 29 2F 31 30 29 0D 0A 33 ,Q),P(N))/10)..3
0071C0: 34 30 20 49 46 20 4B 24 28 59 28 32 2C 51 29 2C 40 IF K$(Y(2,Q),
0071D0: 50 28 4E 29 29 3D 22 2A 22 20 54 48 45 4E 20 50 P(N))="*" THEN P
0071E0: 52 49 4E 54 20 22 2E 2E 2E 20 49 53 20 49 4E 4A RINT "... IS INJ
0071F0: 55 52 45 44 22 3A 42 28 4E 29 3D 31 0D 0A 33 35 URED":B(N)=1..35
007200: 30 20 49 46 20 4B 24 28 59 28 32 2C 51 29 2C 50 0 IF K$(Y(2,Q),P
007210: 28 4E 29 29 3D 22 53 22 20 54 48 45 4E 20 50 52 (N))="S" THEN PR
007220: 49 4E 54 20 22 2E 2E 2E 20 49 53 20 53 55 53 50 INT "... IS SUSP
007230: 45 4E 44 45 44 22 3A 42 28 4E 29 3D 31 0D 0A 33 ENDED":B(N)=1..3
007240: 36 30 20 54 53 54 3D 30 3A 46 4F 52 20 51 51 3D 60 TST=0:FOR QQ=
007250: 31 20 54 4F 20 50 4C 59 3A 49 46 20 53 28 51 51 1 TO PLY:IF S(QQ
007260: 29 3D 56 41 4C 28 4C 24 29 20 54 48 45 4E 20 54 )=VAL(L$) THEN T
007270: 53 54 3D 31 3A 4E 45 58 54 20 51 51 3A 0D 0A 33 ST=1:NEXT QQ:..3
007280: 37 30 20 4E 45 01 97 58 54 20 4E 0D 0A 33 38 30 70 NE..XT N..380
007290: 20 4E 3D 31 0D 0A 33 39 30 20 57 48 49 4C 45 20 N=1..390 WHILE
0072A0: 4E 3C 3D 50 4C 59 0D 0A 34 30 30 20 49 46 20 53 N<=PLY..400 IF S
0072B0: 28 4E 29 3D 59 28 32 2C 51 29 20 54 48 45 4E 20 (N)=Y(2,Q) THEN
0072C0: 4C 4F 43 41 54 45 20 31 2C 32 34 3A 50 52 49 4E LOCATE 1,24:PRIN
0072D0: 54 22 44 6F 20 79 6F 75 20 77 61 6E 74 20 74 6F T"Do you want to
0072E0: 20 72 65 2D 73 65 6C 65 63 74 20 79 6F 75 72 20 re-select your
0072F0: 74 65 61 6D 20 28 59 2F 4E 29 22 3A 51 51 24 3D team (Y/N)":QQ$=
007300: 22 22 3A 57 48 49 4C 45 20 51 51 24 3D 22 22 3A "":WHILE QQ$="":
007310: 51 51 24 3D 55 50 50 45 52 24 28 49 4E 4B 45 59 QQ$=UPPER$(INKEY
007320: 24 29 3A 57 45 4E 44 3A 49 46 20 51 51 24 3D 22 $):WEND:IF QQ$="
007330: 59 22 20 54 48 45 4E 20 47 4F 54 4F 20 32 33 33 Y" THEN GOTO 233
007340: 30 0D 0A 34 31 30 20 4E 3D 4E 2B 31 3A 57 45 4E 0..410 N=N+1:WEN
007350: 44 0D 0A 34 32 30 20 61 67 31 3D 74 61 67 31 3A D..420 ag1=tag1:
007360: 50 45 4E 32 3D 36 3A 46 4F 52 20 4E 3D 31 20 54 PEN2=6:FOR N=1 T
007370: 4F 20 50 4C 59 3A 49 46 20 53 28 4E 29 3D 59 28 O PLY:IF S(N)=Y(
007380: 32 2C 51 29 20 54 48 5D 8A 45 4E 20 4D 24 3D 22 2,Q) TH].EN M$="
007390: 50 45 4E 41 4C 54 59 20 54 41 4B 45 52 20 28 4E PENALTY TAKER (N
0073A0: 4F 2E 29 20 22 3A 47 4F 53 55 42 20 33 37 32 30 O.) ":GOSUB 3720
0073B0: 3A 50 45 4E 32 3D 56 41 4C 28 4C 24 29 3A 49 46 :PEN2=VAL(L$):IF
0073C0: 20 50 45 4E 32 3C 31 20 4F 52 20 50 45 4E 32 3E PEN2<1 OR PEN2>
0073D0: 37 20 54 48 45 4E 20 4E 3D 39 38 0D 0A 34 33 30 7 THEN N=98..430
0073E0: 20 4E 45 58 54 20 4E 3A 49 46 20 4E 3D 39 39 20 NEXT N:IF N=99
0073F0: 54 48 45 4E 20 47 4F 54 4F 20 34 32 30 0D 0A 34 THEN GOTO 420..4
007400: 34 30 20 20 54 41 47 32 3D 49 4E 54 28 52 4E 44 40 TAG2=INT(RND
007410: 2A 36 29 2B 31 3A 46 4F 52 20 4E 3D 31 20 54 4F *6)+1:FOR N=1 TO
007420: 20 50 4C 59 0D 0A 34 35 30 20 20 49 46 20 53 28 PLY..450 IF S(
007430: 4E 29 3D 59 28 32 2C 51 29 20 54 48 45 4E 20 4D N)=Y(2,Q) THEN M
007440: 24 3D 22 54 45 41 4D 20 41 47 47 52 45 53 53 49 $="TEAM AGGRESSI
007450: 4F 4E 20 31 3D 44 45 4C 49 43 41 54 45 20 39 3D ON 1=DELICATE 9=
007460: 48 41 52 44 20 22 3A 47 4F 53 55 42 20 33 37 32 HARD ":GOSUB 372
007470: 30 3A 54 41 47 32 3D 56 41 4C 28 4C 24 29 3A 4D 0:TAG2=VAL(L$):M
007480: 24 3D 22 54 45 41 4D 20 43 8F 82 41 50 54 41 49 $="TEAM C..APTAI
007490: 4E 20 28 4E 4F 2E 29 3A 2D 22 3A 47 4F 53 55 42 N (NO.):-":GOSUB
0074A0: 20 33 37 32 30 3A 43 50 32 3D 56 41 4C 28 4C 24 3720:CP2=VAL(L$
0074B0: 29 0D 0A 34 36 30 20 20 49 46 20 54 41 47 32 3C )..460 IF TAG2<
0074C0: 31 20 4F 52 20 54 41 47 32 3E 39 20 4F 52 20 43 1 OR TAG2>9 OR C
0074D0: 50 32 3C 31 20 4F 52 20 43 50 32 3E 39 20 54 48 P2<1 OR CP2>9 TH
0074E0: 45 4E 20 47 4F 54 4F 20 34 34 30 0D 0A 34 37 30 EN GOTO 440..470
0074F0: 20 20 4E 45 58 54 20 4E 0D 0A 34 38 30 20 41 47 NEXT N..480 AG
007500: 32 3D 54 41 47 32 3A 42 28 43 50 32 29 3D 42 28 2=TAG2:B(CP2)=B(
007510: 43 50 32 29 2A 31 2E 35 3A 43 4C 53 3A 46 4F 52 CP2)*1.5:CLS:FOR
007520: 20 4E 3D 31 20 54 4F 20 39 3A 49 46 20 44 28 4E N=1 TO 9:IF D(N
007530: 29 3C 3E 46 28 4E 29 20 54 48 45 4E 20 42 28 4E )<>F(N) THEN B(N
007540: 29 3D 42 28 4E 29 2D 32 3A 4E 45 58 54 20 6E 0D )=B(N)-2:NEXT n.
007550: 0A 34 39 30 20 48 55 4E 3D 31 3A 43 4C 53 3A 53 .490 HUN=1:CLS:S
007560: 43 31 3D 30 3A 53 43 32 3D 30 3A 48 54 3D 31 3A C1=0:SC2=0:HT=1:
007570: 0D 0A 35 30 30 20 4C 4F 43 41 54 45 20 34 2C 38 ..500 LOCATE 4,8
007580: 3A 50 52 49 4E 54 20 59 24 3A 4C AF 77 4F 43 41 :PRINT Y$:L.wOCA
007590: 54 45 20 31 37 2C 38 3A 50 52 49 4E 54 20 53 43 TE 17,8:PRINT SC
0075A0: 31 3B 22 2D 22 3B 53 43 32 3A 4C 4F 43 41 54 45 1;"-";SC2:LOCATE
0075B0: 20 32 37 2C 38 3A 50 52 49 4E 54 20 7A 24 3A 47 27,8:PRINT z$:G
0075C0: 4F 53 55 42 20 33 34 35 30 0D 0A 35 31 30 20 47 OSUB 3450..510 G
0075D0: 4F 54 4F 20 35 35 30 0D 0A 35 32 30 20 4C 4F 43 OTO 550..520 LOC
0075E0: 41 54 45 20 31 37 2C 38 3A 50 52 49 4E 54 20 49 ATE 17,8:PRINT I
0075F0: 4E 54 28 47 4F 41 4C 31 29 3B 22 2D 22 3B 49 4E NT(GOAL1);"-";IN
007600: 54 28 47 4F 41 4C 32 29 3A 0D 0A 35 33 30 20 49 T(GOAL2):..530 I
007610: 46 20 45 58 54 3D 31 20 54 48 45 4E 20 4C 4F 43 F EXT=1 THEN LOC
007620: 41 54 45 20 34 2C 38 3A 50 52 49 4E 54 20 59 24 ATE 4,8:PRINT Y$
007630: 3A 4C 4F 43 41 54 45 20 31 37 2C 38 3A 50 52 49 :LOCATE 17,8:PRI
007640: 4E 54 20 49 4E 54 28 47 4F 41 4C 31 29 3B 22 2D NT INT(GOAL1);"-
007650: 22 3B 49 4E 54 28 47 4F 41 4C 32 29 3A 4C 4F 43 ";INT(GOAL2):LOC
007660: 41 54 45 20 32 35 2C 38 3A 50 52 49 4E 54 20 7A ATE 25,8:PRINT z
007670: 24 0D 0A 35 34 30 20 48 54 3D 32 3A 48 31 3D 47 $..540 HT=2:H1=G
007680: 4F 41 4C 31 3A 48 32 3D 47 4F 41 4C 32 D6 5E 0D OAL1:H2=GOAL2.^.
007690: 0A 35 35 30 20 46 4F 52 20 4E 3D 31 20 54 4F 20 .550 FOR N=1 TO
0076A0: 50 4C 59 3A 49 46 20 53 28 4E 29 3D 59 28 31 2C PLY:IF S(N)=Y(1,
0076B0: 51 29 20 54 48 45 4E 20 47 4F 54 4F 20 35 38 30 Q) THEN GOTO 580
0076C0: 0D 0A 35 36 30 20 4E 45 58 54 20 4E 0D 0A 35 37 ..560 NEXT N..57
0076D0: 30 20 47 4F 54 4F 20 36 33 30 0D 0A 35 38 30 20 0 GOTO 630..580
0076E0: 48 55 4E 3D 32 30 3A 47 4F 53 55 42 20 33 37 38 HUN=20:GOSUB 378
0076F0: 30 3A 4C 4F 43 41 54 45 20 31 2C 32 34 3A 50 52 0:LOCATE 1,24:PR
007700: 49 4E 54 20 59 24 3B 22 27 53 20 46 4F 52 4D 41 INT Y$;"'S FORMA
007710: 54 49 4F 4E 2D 22 3A 4C 49 4E 45 20 49 4E 50 55 TION-":LINE INPU
007720: 54 20 22 28 45 67 20 32 20 32 20 32 29 2D 22 3B T "(Eg 2 2 2)-";
007730: 63 24 0D 0A 35 39 30 20 49 46 20 56 41 4C 28 4D c$..590 IF VAL(M
007740: 49 44 24 28 43 24 2C 31 2C 31 29 29 2B 56 41 4C ID$(C$,1,1))+VAL
007750: 20 28 4D 49 44 24 28 43 24 2C 33 2C 31 29 29 2B (MID$(C$,3,1))+
007760: 56 41 4C 20 28 4D 49 44 24 28 43 24 2C 35 2C 31 VAL (MID$(C$,5,1
007770: 29 29 3C 3E 36 20 54 48 45 4E 20 47 4F 54 4F 20 ))<>6 THEN GOTO
007780: 35 38 30 0D 0A 36 30 30 20 47 4F 53 55 42 20 96 580..600 GOSUB .
007790: EE 33 37 38 30 3A 4D 24 3D 59 24 2B 22 53 20 4D .3780:M$=Y$+"S M
0077A0: 45 54 48 4F 44 20 31 2D 41 54 54 41 43 4B 20 32 ETHOD 1-ATTACK 2
0077B0: 2D 4D 4F 44 45 52 41 54 45 20 33 2D 44 45 46 45 -MODERATE 3-DEFE
0077C0: 4E 44 3A 2D 22 3A 47 4F 53 55 42 20 33 37 32 30 ND:-":GOSUB 3720
0077D0: 3A 50 31 3D 56 41 4C 28 4C 24 29 3A 49 46 20 50 :P1=VAL(L$):IF P
0077E0: 31 3C 31 20 4F 52 20 50 31 3E 33 20 54 48 45 4E 1<1 OR P1>3 THEN
0077F0: 20 47 4F 54 4F 20 36 30 30 0D 0A 36 31 30 20 47 GOTO 600..610 G
007800: 4F 53 55 42 20 33 37 38 30 3A 4D 24 3D 59 24 2B OSUB 3780:M$=Y$+
007810: 22 53 20 54 59 50 45 20 4F 46 20 50 4C 41 59 20 "S TYPE OF PLAY
007820: 31 2D 57 49 4E 47 45 52 53 20 32 2D 4C 4F 4E 47 1-WINGERS 2-LONG
007830: 42 41 4C 4C 20 33 2D 53 4C 4F 57 4C 59 3A 2D 22 BALL 3-SLOWLY:-"
007840: 3A 47 4F 53 55 42 20 33 37 32 30 3A 54 31 3D 56 :GOSUB 3720:T1=V
007850: 41 4C 28 4C 24 29 3A 49 46 20 54 31 3C 31 20 4F AL(L$):IF T1<1 O
007860: 52 20 54 31 3E 33 20 54 48 45 4E 20 47 4F 54 4F R T1>3 THEN GOTO
007870: 20 36 31 30 0D 0A 36 32 30 20 47 4F 53 55 42 20 610..620 GOSUB
007880: 33 37 38 30 3A 47 4F 54 4F 20 36 34 30 0D 0A 36 3780:GOTO 640..6
007890: 33 45 0F 30 20 53 31 3D 31 3A 43 24 3D 22 32 20 3E.0 S1=1:C$="2
0078A0: 32 20 32 22 3A 50 31 3D 49 4E 54 28 52 4E 44 28 2 2":P1=INT(RND(
0078B0: 33 29 29 2B 31 3A 54 31 3D 49 4E 54 28 52 4E 44 3))+1:T1=INT(RND
0078C0: 28 33 29 29 2B 31 0D 0A 36 34 30 20 46 4F 52 20 (3))+1..640 FOR
0078D0: 4E 3D 31 20 54 4F 20 50 4C 59 3A 49 46 20 53 28 N=1 TO PLY:IF S(
0078E0: 4E 29 3D 59 28 32 2C 51 29 20 54 48 45 4E 20 47 N)=Y(2,Q) THEN G
0078F0: 4F 54 4F 20 36 36 30 0D 0A 36 35 30 20 4E 45 58 OTO 660..650 NEX
007900: 54 20 4E 3A 47 4F 54 4F 20 37 39 30 0D 0A 36 36 T N:GOTO 790..66
007910: 30 20 4C 4F 43 41 54 45 20 31 2C 32 34 3A 50 52 0 LOCATE 1,24:PR
007920: 49 4E 54 20 53 50 41 43 45 24 28 34 30 29 3A 48 INT SPACE$(40):H
007930: 55 4E 3D 32 30 3A 47 4F 53 55 42 20 33 37 38 30 UN=20:GOSUB 3780
007940: 3A 4C 4F 43 41 54 45 20 31 2C 32 34 3A 50 52 49 :LOCATE 1,24:PRI
007950: 4E 54 20 7A 24 3B 22 53 20 46 4F 52 4D 41 54 49 NT z$;"S FORMATI
007960: 4F 4E 2D 22 3A 4C 49 4E 45 20 49 4E 50 55 54 20 ON-":LINE INPUT
007970: 22 28 45 67 20 32 20 32 20 32 29 2D 22 3B 64 24 "(Eg 2 2 2)-";d$
007980: 0D 0A 36 37 30 20 49 46 20 56 41 4C 28 4D 49 44 ..670 IF VAL(MID
007990: 24 28 64 EB 00 FF FF FF FF 11 73 09 F6 04 57 04 $(d.......s...W.
0079A0: F3 04 68 09 01 10 08 11 00 07 01 00 2C 53 4F 43 ..h.........,SOC
0079B0: 43 45 00 00 00 00 00 00 00 00 00 00 00 03 00 16 CE..............
0079C0: 00 08 7C 9E 00 00 00 00 00 00 00 00 00 00 00 00 ..|.............
0079D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0079E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0079F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007A00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007A10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007A20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007A30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007A40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007A50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 C3 3F FF ..............?.
007AB0: FF FF FF 11 71 09 A6 04 A6 04 02 05 59 09 01 10 ....q.......Y...
007AC0: 08 66 0B 15 08 00 16 24 2C 31 2C 31 29 29 2B 56 .f.....$,1,1))+V
007AD0: 41 4C 20 28 4D 49 44 24 28 64 24 2C 33 2C 31 29 AL (MID$(d$,3,1)
007AE0: 29 2B 56 41 4C 20 28 4D 49 44 24 28 64 24 2C 35 )+VAL (MID$(d$,5
007AF0: 2C 31 29 29 3C 3E 36 20 54 48 45 4E 20 47 4F 54 ,1))<>6 THEN GOT
007B00: 4F 20 36 36 30 0D 0A 36 38 30 20 47 4F 53 55 42 O 660..680 GOSUB
007B10: 20 33 37 38 30 3A 4D 24 3D 7A 24 2B 22 53 20 4D 3780:M$=z$+"S M
007B20: 45 54 48 4F 44 20 31 2D 41 54 54 41 43 4B 20 32 ETHOD 1-ATTACK 2
007B30: 2D 4D 4F 44 45 52 41 54 45 20 33 2D 44 45 46 45 -MODERATE 3-DEFE
007B40: 4E 44 3A 2D 22 3A 47 4F 53 55 42 20 33 37 32 30 ND:-":GOSUB 3720
007B50: 3A 50 32 3D 56 41 4C 28 4C 24 29 3A 49 46 20 50 :P2=VAL(L$):IF P
007B60: 32 3C 31 20 4F 52 20 50 32 3E 33 20 54 48 45 4E 2<1 OR P2>3 THEN
007B70: 20 47 4F 54 4F 20 36 38 30 0D 0A 36 39 30 20 4C GOTO 680..690 L
007B80: 4F 43 41 54 45 20 31 2C 32 34 3A 50 52 49 4E 54 OCATE 1,24:PRINT
007B90: 20 53 50 41 43 45 24 28 34 30 29 3A 20 47 4F 53 SPACE$(40): GOS
007BA0: 55 42 20 33 37 38 30 3A 6D 24 3D 7A 24 2B 22 53 UB 3780:m$=z$+"S
007BB0: 20 54 59 50 45 20 4F 46 20 50 4C 41 59 20 31 2D TYPE OF PLAY 1-
007BC0: 57 49 4E 47 45 52 53 71 C8 20 32 2D 4C 4F 4E 47 WINGERSq. 2-LONG
007BD0: 20 42 41 4C 4C 20 33 2D 53 4C 4F 57 4C 59 3A 2D BALL 3-SLOWLY:-
007BE0: 22 3A 47 4F 53 55 42 20 33 37 32 30 3A 54 32 3D ":GOSUB 3720:T2=
007BF0: 56 41 4C 28 4C 24 29 3A 49 46 20 54 32 3C 31 20 VAL(L$):IF T2<1
007C00: 4F 52 20 54 32 3E 33 20 54 48 45 4E 20 47 4F 54 OR T2>3 THEN GOT
007C10: 4F 20 36 39 30 0D 0A 37 30 30 20 47 4F 53 55 42 O 690..700 GOSUB
007C20: 20 33 37 38 30 3A 47 4F 54 4F 20 38 30 30 0D 0A 3780:GOTO 800..
007C30: 37 31 30 20 4C 4F 43 41 54 45 20 31 2C 32 33 3A 710 LOCATE 1,23:
007C40: 50 52 49 4E 54 20 53 50 41 43 45 24 28 34 30 29 PRINT SPACE$(40)
007C50: 3A 4C 4F 43 41 54 45 20 31 2C 32 34 3A 50 52 49 :LOCATE 1,24:PRI
007C60: 4E 54 20 53 50 41 43 45 24 28 34 30 29 0D 0A 37 NT SPACE$(40)..7
007C70: 32 30 20 49 4E 50 55 54 20 23 39 2C 71 0D 0A 37 20 INPUT #9,q..7
007C80: 33 30 20 49 4E 50 55 54 20 23 39 2C 70 6C 79 0D 30 INPUT #9,ply.
007C90: 0A 37 34 30 20 46 4F 52 20 61 3D 31 20 54 4F 20 .740 FOR a=1 TO
007CA0: 70 6C 79 3A 49 4E 50 55 54 20 23 39 2C 73 28 61 ply:INPUT #9,s(a
007CB0: 29 3A 4E 45 58 54 20 61 0D 0A 37 35 30 20 46 4F ):NEXT a..750 FO
007CC0: 52 20 61 3D 31 20 54 4F 20 8A C6 38 3A 46 4F 52 R a=1 TO ..8:FOR
007CD0: 20 62 3D 31 20 54 4F 20 31 30 3A 49 4E 50 55 54 b=1 TO 10:INPUT
007CE0: 20 23 39 2C 6B 28 61 2C 62 29 3A 4E 45 58 54 20 #9,k(a,b):NEXT
007CF0: 62 2C 61 3A 46 4F 52 20 61 3D 31 20 54 4F 20 38 b,a:FOR a=1 TO 8
007D00: 3A 46 4F 52 20 62 3D 31 20 54 4F 20 31 30 3A 49 :FOR b=1 TO 10:I
007D10: 4E 50 55 54 20 23 39 2C 6B 24 28 61 2C 62 29 3A NPUT #9,k$(a,b):
007D20: 4E 45 58 54 20 62 2C 61 3A 46 4F 52 20 61 3D 31 NEXT b,a:FOR a=1
007D30: 20 54 4F 20 38 3A 46 4F 52 20 62 3D 31 20 54 4F TO 8:FOR b=1 TO
007D40: 20 31 30 3A 49 4E 50 55 54 20 23 39 2C 7A 28 61 10:INPUT #9,z(a
007D50: 2C 62 29 3A 4E 45 58 54 20 62 2C 61 3A 46 4F 52 ,b):NEXT b,a:FOR
007D60: 20 61 3D 31 20 54 4F 20 38 3A 46 4F 52 20 62 3D a=1 TO 8:FOR b=
007D70: 31 20 54 4F 20 31 30 3A 49 4E 50 55 54 20 23 39 1 TO 10:INPUT #9
007D80: 2C 6C 28 61 2C 62 29 3A 4E 45 58 54 20 62 2C 61 ,l(a,b):NEXT b,a
007D90: 0D 0A 37 36 30 20 46 4F 52 20 61 3D 31 20 54 4F ..760 FOR a=1 TO
007DA0: 20 38 3A 49 4E 50 55 54 20 23 39 2C 72 24 28 61 8:INPUT #9,r$(a
007DB0: 29 3A 4E 45 58 54 20 61 3A 46 4F 52 20 61 3D 31 ):NEXT a:FOR a=1
007DC0: 20 54 4F 20 38 3A 49 4E 50 55 54 4C 96 20 23 39 TO 8:INPUTL. #9
007DD0: 2C 74 24 28 61 29 3A 4E 45 58 54 20 61 0D 0A 37 ,t$(a):NEXT a..7
007DE0: 37 30 20 46 4F 52 20 61 3D 31 20 54 4F 20 31 30 70 FOR a=1 TO 10
007DF0: 3A 46 4F 52 20 62 3D 31 20 54 4F 20 32 3A 49 4E :FOR b=1 TO 2:IN
007E00: 50 55 54 20 23 39 2C 72 28 61 2C 62 29 3A 4E 45 PUT #9,r(a,b):NE
007E10: 58 54 20 62 2C 61 3A 46 4F 52 20 61 3D 31 20 54 XT b,a:FOR a=1 T
007E20: 4F 20 31 30 3A 46 4F 52 20 62 3D 31 20 54 4F 20 O 10:FOR b=1 TO
007E30: 32 3A 49 4E 50 55 54 20 23 39 2C 75 28 61 2C 62 2:INPUT #9,u(a,b
007E40: 29 3A 4E 45 58 54 20 62 2C 61 0D 0A 37 38 30 20 ):NEXT b,a..780
007E50: 43 4C 4F 53 45 49 4E 0D 0A 37 39 30 20 53 32 3D CLOSEIN..790 S2=
007E60: 31 3A 44 24 3D 22 32 20 32 20 32 22 3A 50 32 3D 1:D$="2 2 2":P2=
007E70: 49 4E 54 28 52 4E 44 28 33 29 29 2B 31 3A 54 32 INT(RND(3))+1:T2
007E80: 3D 49 4E 54 28 52 4E 44 28 33 29 29 2B 31 0D 0A =INT(RND(3))+1..
007E90: 38 30 30 20 44 46 31 3D 56 41 4C 28 4D 49 44 24 800 DF1=VAL(MID$
007EA0: 28 43 24 2C 31 2C 31 29 29 3A 44 46 32 3D 56 41 (C$,1,1)):DF2=VA
007EB0: 4C 28 4D 49 44 24 28 44 24 2C 31 2C 31 29 29 3A L(MID$(D$,1,1)):
007EC0: 4D 44 31 3D 56 41 4C 28 4D 49 44 24 28 89 C9 43 MD1=VAL(MID$(..C
007ED0: 24 2C 33 2C 31 29 29 3A 4D 44 32 3D 56 41 4C 28 $,3,1)):MD2=VAL(
007EE0: 4D 49 44 24 28 44 24 2C 33 2C 31 29 29 3A 3A 46 MID$(D$,3,1))::F
007EF0: 44 31 3D 56 41 4C 28 4D 49 44 24 28 43 24 2C 35 D1=VAL(MID$(C$,5
007F00: 2C 31 29 29 3A 46 44 32 3D 56 41 4C 28 4D 49 44 ,1)):FD2=VAL(MID
007F10: 24 28 44 24 2C 35 2C 31 29 29 3A 47 31 3D 28 41 $(D$,5,1)):G1=(A
007F20: 28 31 29 2A 32 29 2B 54 41 47 31 3A 47 32 3D 28 (1)*2)+TAG1:G2=(
007F30: 42 28 31 29 2A 32 29 2B 54 41 47 32 0D 0A 38 31 B(1)*2)+TAG2..81
007F40: 30 20 44 31 3D 30 3A 44 32 3D 30 3A 46 4F 52 20 0 D1=0:D2=0:FOR
007F50: 4E 3D 31 20 54 4F 20 44 46 31 3A 44 31 3D 44 31 N=1 TO DF1:D1=D1
007F60: 2B 41 28 4E 2B 31 29 3A 4E 45 58 54 20 4E 3A 46 +A(N+1):NEXT N:F
007F70: 4F 52 20 4E 3D 31 20 54 4F 20 44 46 32 3A 44 32 OR N=1 TO DF2:D2
007F80: 3D 44 32 2B 42 28 4E 2B 31 29 3A 4E 45 58 54 20 =D2+B(N+1):NEXT
007F90: 4E 3A 4D 31 3D 30 3A 46 4F 52 20 4E 3D 44 46 31 N:M1=0:FOR N=DF1
007FA0: 20 54 4F 20 44 46 31 2B 4D 44 31 3A 4D 31 3D 4D TO DF1+MD1:M1=M
007FB0: 31 2B 41 28 4E 2B 31 29 3A 4E 45 58 54 20 4E 3A 1+A(N+1):NEXT N:
007FC0: 4D 32 3D 30 3A 46 4F 52 20 4E 3D 44 46 32 20 01 M2=0:FOR N=DF2 .
007FD0: 9A 54 4F 20 44 46 32 2B 4D 44 32 3A 4D 32 3D 4D .TO DF2+MD2:M2=M
007FE0: 32 2B 42 28 4E 2B 31 29 3A 4E 45 58 54 20 4E 0D 2+B(N+1):NEXT N.
007FF0: 0A 38 32 30 20 49 46 20 50 31 3D 31 20 54 48 45 .820 IF P1=1 THE
008000: 4E 20 44 31 3D 44 31 2A 30 2E 38 3A 4D 31 3D 4D N D1=D1*0.8:M1=M
008010: 31 2A 31 2E 32 0D 0A 38 33 30 20 49 46 20 50 32 1*1.2..830 IF P2
008020: 3D 31 20 54 48 45 4E 20 44 32 3D 44 32 2A 30 2E =1 THEN D2=D2*0.
008030: 38 3A 4D 32 3D 4D 32 2A 31 2E 32 0D 0A 38 34 30 8:M2=M2*1.2..840
008040: 20 46 32 3D 30 3A 46 4F 52 20 4E 3D 44 46 32 2B F2=0:FOR N=DF2+
008050: 4D 44 32 20 54 4F 20 44 46 32 2B 4D 44 32 2B 46 MD2 TO DF2+MD2+F
008060: 44 32 3A 46 32 3D 46 32 2B 42 28 4E 2B 31 29 3A D2:F2=F2+B(N+1):
008070: 4E 45 58 54 20 4E 3A 46 31 3D 30 3A 46 4F 52 20 NEXT N:F1=0:FOR
008080: 4E 3D 44 46 31 2B 4D 44 31 20 54 4F 20 44 46 31 N=DF1+MD1 TO DF1
008090: 2B 4D 44 31 2B 46 44 31 3A 46 31 3D 46 31 2B 41 +MD1+FD1:F1=F1+A
0080A0: 28 4E 2B 31 29 3A 4E 45 58 54 20 4E 0D 0A 38 35 (N+1):NEXT N..85
0080B0: 30 20 49 46 20 50 31 3D 33 20 54 48 45 4E 20 44 0 IF P1=3 THEN D
0080C0: 31 3D 44 31 2A 35 3A 46 31 3D 46 31 2A 34 2E 39 1=D1*5:F1=F1*4.9
0080D0: 0D FB 0B 0A 38 36 30 20 49 46 20 50 32 3D 33 20 ....860 IF P2=3
0080E0: 54 48 45 4E 20 44 32 3D 44 32 2A 35 3A 46 32 3D THEN D2=D2*5:F2=
0080F0: 46 32 2A 34 2E 39 0D 0A 38 37 30 20 49 46 20 50 F2*4.9..870 IF P
008100: 31 3D 31 20 54 48 45 4E 20 46 31 3D 46 31 2A 32 1=1 THEN F1=F1*2
008110: 2E 31 3A 44 31 3D 44 31 2A 30 2E 39 0D 0A 38 38 .1:D1=D1*0.9..88
008120: 30 20 49 46 20 50 32 3D 31 20 54 48 45 4E 20 46 0 IF P2=1 THEN F
008130: 32 3D 46 32 2A 32 2E 31 3A 44 32 3D 44 32 2A 30 2=F2*2.1:D2=D2*0
008140: 2E 39 0D 0A 38 39 30 20 45 4E 31 3D 30 3A 46 4F .9..890 EN1=0:FO
008150: 52 20 4E 3D 31 20 54 4F 20 37 3A 45 4E 31 3D 45 R N=1 TO 7:EN1=E
008160: 4E 31 2B 4B 28 5A 59 58 2C 4E 29 3A 4E 45 58 54 N1+K(ZYX,N):NEXT
008170: 20 4E 3A 45 4E 31 3D 45 4E 31 2F 37 30 30 0D 0A N:EN1=EN1/700..
008180: 39 30 30 20 45 4E 32 3D 30 3A 46 4F 52 20 4E 3D 900 EN2=0:FOR N=
008190: 31 20 54 4F 20 37 3A 45 4E 32 3D 45 4E 32 2B 4B 1 TO 7:EN2=EN2+K
0081A0: 28 59 5A 58 2C 4E 29 3A 4E 45 58 54 20 4E 3A 45 (YZX,N):NEXT N:E
0081B0: 4E 32 3D 45 4E 32 2F 37 30 30 0D 0A 39 31 30 20 N2=EN2/700..910
0081C0: 43 48 3D 41 47 31 2B 28 28 46 31 2B 4D 31 29 2A CH=AG1+((F1+M1)*
0081D0: 33 29 2B C3 D5 47 31 2B 45 4E 31 0D 0A 39 32 30 3)+..G1+EN1..920
0081E0: 20 43 48 32 3D 41 47 32 2B 28 28 46 32 2B 4D 32 CH2=AG2+((F2+M2
0081F0: 29 2A 33 29 2B 47 32 2B 45 4E 32 0D 0A 39 33 30 )*3)+G2+EN2..930
008200: 20 49 46 20 48 54 20 3C 3E 20 31 20 54 48 45 4E IF HT <> 1 THEN
008210: 20 47 4F 54 4F 20 31 31 38 30 0D 0A 39 34 30 20 GOTO 1180..940
008220: 53 43 31 3D 30 3A 46 4F 52 20 4E 3D 31 20 54 4F SC1=0:FOR N=1 TO
008230: 20 49 4E 54 28 41 42 53 28 43 48 29 2F 33 29 0D INT(ABS(CH)/3).
008240: 0A 39 35 30 20 41 41 3D 49 4E 54 28 52 4E 44 2A .950 AA=INT(RND*
008250: 31 30 29 3A 49 46 20 41 41 3D 37 20 54 48 45 4E 10):IF AA=7 THEN
008260: 20 53 43 31 3D 53 43 31 2B 30 2E 35 0D 0A 39 36 SC1=SC1+0.5..96
008270: 30 20 4E 45 58 54 20 6E 0D 0A 39 37 30 20 46 4F 0 NEXT n..970 FO
008280: 52 20 4E 3D 31 20 54 4F 20 38 3A 46 4F 52 20 42 R N=1 TO 8:FOR B
008290: 3D 31 20 54 4F 20 31 30 3A 4B 24 28 4E 2C 42 29 =1 TO 10:K$(N,B)
0082A0: 3D 22 20 22 3A 4E 45 58 54 20 42 2C 4E 0D 0A 39 =" ":NEXT B,N..9
0082B0: 38 30 20 53 43 32 3D 30 3A 46 4F 52 20 4E 3D 31 80 SC2=0:FOR N=1
0082C0: 20 54 4F 20 49 4E 54 28 41 42 53 28 43 48 32 29 TO INT(ABS(CH2)
0082D0: 2F 33 29 0D 0A AE 26 FF FF FF FF 11 74 09 F6 04 /3)...&.....t...
0082E0: 57 04 F3 04 63 09 01 10 08 11 00 07 01 00 2C 53 W...c.........,S
0082F0: 4F 43 43 45 00 00 00 00 00 00 00 00 00 00 00 04 OCCE............
008300: 00 16 00 08 7C 9E 00 00 00 00 00 00 00 00 00 00 ....|...........
008310: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008320: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008330: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008340: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008350: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008360: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008370: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0083A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0083B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0083C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0083D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0083E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 56 ...............V
0083F0: 4C FF FF FF FF 11 71 09 F6 04 57 04 03 05 59 09 L.....q...W...Y.
008400: 01 10 08 5F 0B 15 08 00 16 39 39 30 20 41 41 3D ..._.....990 AA=
008410: 49 4E 54 28 52 4E 44 2A 31 30 29 3A 49 46 20 41 INT(RND*10):IF A
008420: 41 3D 37 20 54 48 45 4E 20 53 43 32 3D 53 43 32 A=7 THEN SC2=SC2
008430: 2B 30 2E 35 0D 0A 31 30 30 30 20 4E 45 58 54 20 +0.5..1000 NEXT
008440: 4E 3A 0D 0A 31 30 31 30 20 61 61 3D 49 4E 54 28 N:..1010 aa=INT(
008450: 52 4E 44 2A 31 30 29 3A 49 46 20 41 41 3D 38 20 RND*10):IF AA=8
008460: 54 48 45 4E 20 53 43 31 3D 53 43 31 2B 30 2E 35 THEN SC1=SC1+0.5
008470: 0D 0A 31 30 32 30 20 49 46 20 53 43 31 3E 35 20 ..1020 IF SC1>5
008480: 54 48 45 4E 20 53 43 31 3D 35 0D 0A 31 30 33 30 THEN SC1=5..1030
008490: 20 49 46 20 53 43 32 3E 35 20 54 48 45 4E 20 53 IF SC2>5 THEN S
0084A0: 43 32 3D 35 0D 0A 31 30 34 30 20 46 4F 52 20 4E C2=5..1040 FOR N
0084B0: 3D 31 20 54 4F 20 53 43 32 3A 0D 0A 31 30 35 30 =1 TO SC2:..1050
0084C0: 20 41 41 3D 49 4E 54 28 52 4E 44 2A 39 30 29 0D AA=INT(RND*90).
0084D0: 0A 31 30 36 30 20 4A 4A 3D 30 3A 46 4F 52 20 4A .1060 JJ=0:FOR J
0084E0: 3D 53 43 32 20 54 4F 20 31 20 53 54 45 50 20 2D =SC2 TO 1 STEP -
0084F0: 31 3A 49 46 20 41 41 3D 55 28 4A 2C 31 29 20 54 1:IF AA=U(J,1) T
008500: 48 45 4E 20 4A 4A 3D 31 0D F6 CE 0A 31 30 37 30 HEN JJ=1....1070
008510: 20 4E 45 58 54 20 4A 3A 49 46 20 4A 4A 3D 31 20 NEXT J:IF JJ=1
008520: 54 48 45 4E 20 47 4F 54 4F 20 31 30 35 30 0D 0A THEN GOTO 1050..
008530: 31 30 38 30 20 55 28 4E 2C 31 29 3D 41 41 3A 0D 1080 U(N,1)=AA:.
008540: 0A 31 30 39 30 20 41 41 3D 49 4E 54 28 52 4E 44 .1090 AA=INT(RND
008550: 2A 36 29 2B 31 3A 55 28 4E 2C 32 29 3D 41 41 0D *6)+1:U(N,2)=AA.
008560: 0A 31 31 30 30 20 4E 45 58 54 20 4E 20 0D 0A 31 .1100 NEXT N ..1
008570: 31 31 30 20 46 4F 52 20 4E 3D 31 20 54 4F 20 53 110 FOR N=1 TO S
008580: 43 31 3A 0D 0A 31 31 32 30 20 41 41 3D 49 4E 54 C1:..1120 AA=INT
008590: 28 52 4E 44 2A 39 30 29 3A 0D 0A 31 31 33 30 20 (RND*90):..1130
0085A0: 4A 4A 3D 30 3A 46 4F 52 20 4A 3D 53 43 31 20 54 JJ=0:FOR J=SC1 T
0085B0: 4F 20 31 20 53 54 45 50 20 2D 31 3A 49 46 20 41 O 1 STEP -1:IF A
0085C0: 41 3D 52 28 4A 2C 31 29 20 54 48 45 4E 20 4A 4A A=R(J,1) THEN JJ
0085D0: 3D 31 3A 0D 0A 31 31 34 30 20 4E 45 58 54 20 4A =1:..1140 NEXT J
0085E0: 3A 49 46 20 4A 4A 3D 31 20 54 48 45 4E 20 47 4F :IF JJ=1 THEN GO
0085F0: 54 4F 20 31 31 32 30 0D 0A 31 31 35 30 20 52 28 TO 1120..1150 R(
008600: 4E 2C 31 29 3D 41 41 3A 41 41 3D 42 76 49 4E 54 N,1)=AA:AA=BvINT
008610: 28 52 4E 44 2A 36 29 2B 31 3A 52 28 4E 2C 32 29 (RND*6)+1:R(N,2)
008620: 3D 41 41 3A 4E 45 58 54 20 4E 0D 0A 31 31 36 30 =AA:NEXT N..1160
008630: 20 46 4F 52 20 4E 3D 31 20 54 4F 20 53 43 31 3A FOR N=1 TO SC1:
008640: 41 41 3D 49 4E 54 28 52 4E 44 2A 39 30 29 3A 52 AA=INT(RND*90):R
008650: 28 4E 2C 31 29 3D 41 41 3A 41 41 3D 49 4E 54 28 (N,1)=AA:AA=INT(
008660: 52 4E 44 2A 36 29 2B 31 3A 52 28 4E 2C 32 29 3D RND*6)+1:R(N,2)=
008670: 41 41 3A 4E 45 58 54 20 4E 0D 0A 31 31 37 30 20 AA:NEXT N..1170
008680: 4C 4F 43 41 54 45 20 31 2C 32 34 3A 50 45 4E 20 LOCATE 1,24:PEN
008690: 32 3A 50 52 49 4E 54 20 53 50 41 43 45 24 28 34 2:PRINT SPACE$(4
0086A0: 30 29 3A 0D 0A 31 31 38 30 20 46 4F 52 20 4E 3D 0):..1180 FOR N=
0086B0: 28 48 54 2D 31 29 2A 34 35 20 54 4F 20 48 54 2A (HT-1)*45 TO HT*
0086C0: 34 35 3A 49 46 20 4E 3D 30 20 54 48 45 4E 20 6E 45:IF N=0 THEN n
0086D0: 3D 6E 2B 31 0D 0A 31 31 39 30 20 46 4F 52 20 4A =n+1..1190 FOR J
0086E0: 3D 31 20 54 4F 20 53 43 31 0D 0A 31 32 30 30 20 =1 TO SC1..1200
0086F0: 49 46 20 52 28 4A 2C 31 29 3D 4E 20 54 48 45 4E IF R(J,1)=N THEN
008700: 20 47 4F 53 55 42 20 34 31 30 30 0D 0A 3B B1 31 GOSUB 4100..;.1
008710: 32 31 30 20 4E 45 58 54 20 4A 0D 0A 31 32 32 30 210 NEXT J..1220
008720: 20 46 4F 52 20 4A 3D 31 20 54 4F 20 53 43 32 0D FOR J=1 TO SC2.
008730: 0A 31 32 33 30 20 49 46 20 55 28 4A 2C 31 29 3D .1230 IF U(J,1)=
008740: 4E 20 54 48 45 4E 20 47 4F 53 55 42 20 34 30 36 N THEN GOSUB 406
008750: 30 20 0D 0A 31 32 34 30 20 4E 45 58 54 20 4A 3A 0 ..1240 NEXT J:
008760: 0D 0A 31 32 35 30 20 4C 4F 43 41 54 45 20 31 35 ..1250 LOCATE 15
008770: 2C 34 3A 50 41 50 45 52 20 33 3A 50 45 4E 20 30 ,4:PAPER 3:PEN 0
008780: 3A 50 52 49 4E 54 20 22 54 49 4D 45 3A 22 3B 6E :PRINT "TIME:";n
008790: 3A 50 41 50 45 52 20 30 3A 50 45 4E 20 31 0D 0A :PAPER 0:PEN 1..
0087A0: 31 32 36 30 20 4E 45 58 54 20 4E 0D 0A 31 32 37 1260 NEXT N..127
0087B0: 30 20 49 46 20 48 54 3D 31 20 54 48 45 4E 20 4C 0 IF HT=1 THEN L
0087C0: 4F 43 41 54 45 20 31 35 2C 31 3A 50 52 49 4E 54 OCATE 15,1:PRINT
0087D0: 3B 22 48 41 4C 46 20 54 49 4D 45 22 3A 4C 4F 43 ;"HALF TIME":LOC
0087E0: 41 54 45 20 31 37 2C 38 3A 50 52 49 4E 54 20 49 ATE 17,8:PRINT I
0087F0: 4E 54 28 47 4F 41 4C 31 29 3A 4C 4F 43 41 54 45 NT(GOAL1):LOCATE
008800: 20 32 31 2C 38 3A 50 52 49 4E 54 20 49 4E 54 1C 21,8:PRINT INT.
008810: 9B 28 47 4F 41 4C 32 29 3A 47 4F 54 4F 20 35 32 .(GOAL2):GOTO 52
008820: 30 0D 0A 31 32 38 30 20 48 31 3D 49 4E 54 28 48 0..1280 H1=INT(H
008830: 31 29 3A 48 32 3D 49 4E 54 28 48 32 29 0D 0A 31 1):H2=INT(H2)..1
008840: 32 39 30 20 53 43 4F 52 3D 47 4F 41 4C 31 3A 53 290 SCOR=GOAL1:S
008850: 43 4F 3D 47 4F 41 4C 32 3A 0D 0A 31 33 30 30 20 CO=GOAL2:..1300
008860: 56 41 4A 31 3D 56 41 4C 20 28 4A 24 28 5A 59 58 VAJ1=VAL (J$(ZYX
008870: 29 29 3A 56 41 4A 32 3D 56 41 4C 28 4A 24 28 59 )):VAJ2=VAL(J$(Y
008880: 5A 58 29 29 3A 49 46 20 53 43 4F 52 3E 53 43 4F ZX)):IF SCOR>SCO
008890: 20 54 48 45 4E 20 56 41 4A 31 3D 56 41 4A 31 2B THEN VAJ1=VAJ1+
0088A0: 35 3A 56 41 4A 32 3D 56 41 4A 32 2D 37 0D 0A 31 5:VAJ2=VAJ2-7..1
0088B0: 33 31 30 20 56 41 4A 31 3D 56 41 4C 20 28 4A 24 310 VAJ1=VAL (J$
0088C0: 28 5A 59 58 29 29 3A 56 41 4A 32 3D 56 41 4C 28 (ZYX)):VAJ2=VAL(
0088D0: 4A 24 28 59 5A 58 29 29 3A 49 46 20 53 43 4F 52 J$(YZX)):IF SCOR
0088E0: 3C 53 43 4F 20 54 48 45 4E 20 56 41 4A 31 3D 56 <SCO THEN VAJ1=V
0088F0: 41 4A 31 2D 37 3A 56 41 4A 32 3D 56 41 4A 32 2B AJ1-7:VAJ2=VAJ2+
008900: 35 0D 0A 31 33 32 30 20 49 46 20 53 43 4F 52 3D 5..1320 IF SCOR=
008910: 53 D5 7C 43 4F 20 54 48 45 4E 20 56 41 4A 31 3D S.|CO THEN VAJ1=
008920: 56 41 4A 31 2D 32 3A 56 41 4A 32 3D 56 41 4A 32 VAJ1-2:VAJ2=VAJ2
008930: 2D 32 0D 0A 31 33 33 30 20 47 4F 53 55 42 20 33 -2..1330 GOSUB 3
008940: 31 34 30 3A 4A 24 28 5A 59 58 29 3D 53 54 52 24 140:J$(ZYX)=STR$
008950: 28 56 41 4A 31 29 3A 4A 24 28 59 5A 58 29 3D 53 (VAJ1):J$(YZX)=S
008960: 54 52 24 28 56 41 4A 32 29 3A 4C 4F 43 41 54 45 TR$(VAJ2):LOCATE
008970: 20 31 35 2C 31 3A 50 52 49 4E 54 20 22 46 55 4C 15,1:PRINT "FUL
008980: 4C 20 54 49 4D 45 22 3A 4C 4F 43 41 54 45 20 31 L TIME":LOCATE 1
008990: 35 2C 39 3A 50 52 49 4E 54 20 22 28 22 3B 48 31 5,9:PRINT "(";H1
0089A0: 3B 22 29 2D 28 22 3B 48 32 3B 22 29 22 3A 47 4F ;")-(";H2;")":GO
0089B0: 53 55 42 20 32 39 31 30 0D 0A 31 33 34 30 20 47 SUB 2910..1340 G
0089C0: 28 31 2C 51 29 3D 53 43 4F 52 3A 47 28 32 2C 51 (1,Q)=SCOR:G(2,Q
0089D0: 29 3D 53 43 4F 0D 0A 31 33 35 30 20 49 46 20 51 )=SCO..1350 IF Q
0089E0: 3E 3D 32 35 20 54 48 45 4E 20 47 4F 54 4F 20 31 >=25 THEN GOTO 1
0089F0: 34 37 30 0D 0A 31 33 36 30 20 27 49 46 20 47 4F 470..1360 'IF GO
008A00: 54 3D 31 30 38 38 20 4F 52 20 47 4F 54 3D 34 35 T=1088 OR GOT=45
008A10: 30 30 20 4F DC 54 48 45 4E 20 47 4F 54 4F 20 33 00 O.THEN GOTO 3
008A20: 30 39 30 0D 0A 31 33 37 30 20 52 41 3D 28 51 2F 090..1370 RA=(Q/
008A30: 32 29 3A 52 42 3D 49 4E 54 28 52 41 29 3A 49 46 2):RB=INT(RA):IF
008A40: 20 52 41 2D 52 42 3E 30 20 54 48 45 4E 20 47 55 RA-RB>0 THEN GU
008A50: 3D 31 3A 45 4C 53 45 20 47 55 3D 32 0D 0A 31 33 =1:ELSE GU=2..13
008A60: 38 30 20 46 4F 52 20 4C 50 3D 31 20 54 4F 20 34 80 FOR LP=1 TO 4
008A70: 3A 49 46 20 59 28 31 2C 51 29 3D 58 28 47 55 2C :IF Y(1,Q)=X(GU,
008A80: 4C 50 2C 38 29 20 54 48 45 4E 20 52 41 3D 4C 50 LP,8) THEN RA=LP
008A90: 3A 0D 0A 31 33 39 30 20 4E 45 58 54 20 4C 50 0D :..1390 NEXT LP.
008AA0: 0A 31 34 30 30 20 46 4F 52 20 4C 50 3D 31 20 54 .1400 FOR LP=1 T
008AB0: 4F 20 34 3A 49 46 20 59 28 32 2C 51 29 3D 58 28 O 4:IF Y(2,Q)=X(
008AC0: 47 55 2C 4C 50 2C 38 29 20 54 48 45 4E 20 52 42 GU,LP,8) THEN RB
008AD0: 3D 4C 50 3A 0D 0A 31 34 31 30 20 4E 45 58 54 20 =LP:..1410 NEXT
008AE0: 4C 50 0D 0A 31 34 32 30 20 58 28 47 55 2C 52 42 LP..1420 X(GU,RB
008AF0: 2C 31 29 3D 58 28 47 55 2C 52 42 2C 31 29 2B 31 ,1)=X(GU,RB,1)+1
008B00: 3A 58 28 47 55 2C 52 41 2C 31 29 3D 58 28 47 55 :X(GU,RA,1)=X(GU
008B10: 2C 52 41 2C 31 11 11 29 2B 31 3A 58 28 47 55 2C ,RA,1..)+1:X(GU,
008B20: 52 41 2C 35 29 3D 58 28 47 55 2C 52 41 2C 35 29 RA,5)=X(GU,RA,5)
008B30: 2B 53 43 4F 52 3A 58 28 47 55 2C 52 41 2C 36 29 +SCOR:X(GU,RA,6)
008B40: 3D 58 28 47 55 2C 52 41 2C 36 29 2B 53 43 4F 3A =X(GU,RA,6)+SCO:
008B50: 58 28 47 55 2C 52 42 2C 35 29 3D 58 28 47 55 2C X(GU,RB,5)=X(GU,
008B60: 52 42 2C 35 29 2B 53 43 4F 3A 58 28 47 55 2C 52 RB,5)+SCO:X(GU,R
008B70: 42 2C 36 29 3D 58 28 47 55 2C 52 42 2C 36 29 2B B,6)=X(GU,RB,6)+
008B80: 53 43 4F 52 0D 0A 31 34 33 30 20 27 0D 0A 31 34 SCOR..1430 '..14
008B90: 34 30 20 49 46 20 53 43 4F 52 3E 53 43 4F 20 54 40 IF SCOR>SCO T
008BA0: 48 45 4E 20 58 28 47 55 2C 52 41 2C 32 29 3D 58 HEN X(GU,RA,2)=X
008BB0: 28 47 55 2C 52 41 2C 32 29 2B 31 3A 58 28 47 55 (GU,RA,2)+1:X(GU
008BC0: 2C 52 41 2C 37 29 3D 58 28 47 55 2C 52 41 2C 37 ,RA,7)=X(GU,RA,7
008BD0: 29 2B 33 3A 58 28 47 55 2C 52 42 2C 34 29 3D 58 )+3:X(GU,RB,4)=X
008BE0: 28 47 55 2C 52 42 2C 34 29 2B 31 3A 0D 0A 31 34 (GU,RB,4)+1:..14
008BF0: 35 30 20 49 46 20 53 43 4F 3E 53 43 4F 52 20 54 50 IF SCO>SCOR T
008C00: 48 45 4E 20 58 28 47 55 2C 52 42 2C 32 29 3D 58 HEN X(GU,RB,2)=X
008C10: 28 47 55 2C 52 42 2C 81 A7 FF FF FF FF 11 76 09 (GU,RB,.......v.
008C20: F6 04 57 04 F5 04 67 09 01 10 08 10 00 07 01 00 ..W...g.........
008C30: 2C 53 4F 43 43 45 00 00 00 00 00 00 00 00 00 00 ,SOCCE..........
008C40: 00 05 00 16 00 08 7C 9E 00 00 00 00 00 00 00 00 ......|.........
008C50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008C60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008C70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008C80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008C90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008D00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008D10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008D20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008D30: 00 B1 47 FF FF FF FF 11 76 09 F6 04 57 04 04 05 ..G.....v...W...
008D40: 59 09 01 10 08 53 0B 15 08 00 16 32 29 2B 31 3A Y....S.....2)+1:
008D50: 58 28 47 55 2C 52 42 2C 37 29 3D 58 28 47 55 2C X(GU,RB,7)=X(GU,
008D60: 52 42 2C 37 29 2B 33 3A 58 28 47 55 2C 52 41 2C RB,7)+3:X(GU,RA,
008D70: 34 29 3D 58 28 47 55 2C 52 41 2C 34 29 2B 31 3A 4)=X(GU,RA,4)+1:
008D80: 0D 0A 31 34 36 30 20 49 46 20 53 43 4F 52 3D 53 ..1460 IF SCOR=S
008D90: 43 4F 20 54 48 45 4E 20 58 28 47 55 2C 52 41 2C CO THEN X(GU,RA,
008DA0: 33 29 3D 58 28 47 55 2C 52 41 2C 33 29 2B 31 3A 3)=X(GU,RA,3)+1:
008DB0: 58 28 47 55 2C 52 42 2C 33 29 3D 58 28 47 55 2C X(GU,RB,3)=X(GU,
008DC0: 52 42 2C 33 29 2B 31 3A 78 28 67 75 2C 52 41 2C RB,3)+1:x(gu,RA,
008DD0: 37 29 3D 58 28 47 55 2C 52 41 2C 37 29 2B 31 3A 7)=X(GU,RA,7)+1:
008DE0: 78 28 67 75 2C 52 42 2C 37 29 3D 58 28 47 55 2C x(gu,RB,7)=X(GU,
008DF0: 52 42 2C 37 29 2B 31 0D 0A 31 34 37 30 20 47 4F RB,7)+1..1470 GO
008E00: 53 55 42 20 33 34 38 30 3A 43 4C 53 3A 50 45 4E SUB 3480:CLS:PEN
008E10: 20 32 3A 20 47 4F 53 55 42 20 33 34 35 30 3A 4C 2: GOSUB 3450:L
008E20: 4F 43 41 54 45 20 37 2C 32 3A 50 52 49 4E 54 20 OCATE 7,2:PRINT
008E30: 22 20 20 20 20 4D 41 54 43 48 20 50 45 52 46 4F " MATCH PERFO
008E40: 52 4D 41 4E 43 45 22 3A 50 45 4E 62 21 20 33 3A RMANCE":PENb! 3:
008E50: 4C 4F 43 41 54 45 20 31 2C 38 3A 50 52 49 4E 54 LOCATE 1,8:PRINT
008E60: 20 54 24 28 59 28 31 2C 51 29 29 3A 4C 4F 43 41 T$(Y(1,Q)):LOCA
008E70: 54 45 20 32 35 2C 38 3A 50 52 49 4E 54 20 54 24 TE 25,8:PRINT T$
008E80: 28 59 28 32 2C 51 29 29 3A 50 45 4E 20 31 0D 0A (Y(2,Q)):PEN 1..
008E90: 31 34 38 30 20 46 4F 52 20 4E 3D 31 20 54 4F 20 1480 FOR N=1 TO
008EA0: 37 0D 0A 31 34 39 30 20 49 46 20 4B 24 28 5A 59 7..1490 IF K$(ZY
008EB0: 58 2C 4F 28 4E 29 29 3C 3E 22 53 22 20 54 48 45 X,O(N))<>"S" THE
008EC0: 4E 20 4C 4F 43 41 54 45 20 31 2C 4E 2B 39 3A 50 N LOCATE 1,N+9:P
008ED0: 52 49 4E 54 20 4E 24 28 5A 59 58 2C 4F 28 4E 29 RINT N$(ZYX,O(N)
008EE0: 29 3B 3A 52 41 3D 49 4E 54 28 52 4E 44 2A 31 30 );:RA=INT(RND*10
008EF0: 29 2B 31 0D 0A 31 35 30 30 20 49 46 20 52 41 3E )+1..1500 IF RA>
008F00: 35 20 54 48 45 4E 20 56 28 4E 29 3D 56 28 4E 29 5 THEN V(N)=V(N)
008F10: 2B 49 4E 54 28 52 4E 44 2A 32 29 0D 0A 31 35 31 +INT(RND*2)..151
008F20: 30 20 49 46 20 52 41 3C 36 20 54 48 45 4E 20 56 0 IF RA<6 THEN V
008F30: 28 4E 29 3D 56 28 4E 29 2D 49 4E 54 28 52 4E 44 (N)=V(N)-INT(RND
008F40: 2A 32 29 0D 0A 31 35 32 30 20 4C 4F 43 87 61 41 *2)..1520 LOC.aA
008F50: 54 45 20 31 36 2C 4E 2B 39 3A 50 52 49 4E 54 20 TE 16,N+9:PRINT
008F60: 56 28 4E 29 3A 48 28 31 2C 5A 59 58 2C 4F 28 4E V(N):H(1,ZYX,O(N
008F70: 29 29 3D 56 28 4E 29 0D 0A 31 35 33 30 20 49 46 ))=V(N)..1530 IF
008F80: 20 4B 24 28 59 5A 58 2C 50 28 4E 29 29 3C 3E 22 K$(YZX,P(N))<>"
008F90: 53 22 20 54 48 45 4E 20 4C 4F 43 41 54 45 20 32 S" THEN LOCATE 2
008FA0: 35 2C 4E 2B 39 3A 50 52 49 4E 54 20 4E 24 28 59 5,N+9:PRINT N$(Y
008FB0: 5A 58 2C 50 28 4E 29 29 3A 52 41 3D 49 4E 54 28 ZX,P(N)):RA=INT(
008FC0: 52 4E 44 2A 31 30 29 2B 31 3A 0D 0A 31 35 34 30 RND*10)+1:..1540
008FD0: 20 49 46 20 52 41 3E 35 20 54 48 45 4E 20 57 28 IF RA>5 THEN W(
008FE0: 4E 29 3D 57 28 4E 29 2B 49 4E 54 28 52 4E 44 2A N)=W(N)+INT(RND*
008FF0: 32 29 0D 0A 31 35 35 30 20 49 46 20 52 41 3C 36 2)..1550 IF RA<6
009000: 20 54 48 45 4E 20 57 28 4E 29 3D 57 28 4E 29 2D THEN W(N)=W(N)-
009010: 49 4E 54 28 52 4E 44 2A 32 29 0D 0A 31 35 36 30 INT(RND*2)..1560
009020: 20 4C 4F 43 41 54 45 20 33 37 2C 4E 2B 39 3A 50 LOCATE 37,N+9:P
009030: 52 49 4E 54 20 57 28 4E 29 3A 48 28 31 2C 59 5A RINT W(N):H(1,YZ
009040: 58 2C 50 28 4E 29 29 3D 57 28 4E 29 0D 0A 31 89 X,P(N))=W(N)..1.
009050: B1 35 37 30 20 49 46 20 4B 24 28 59 5A 58 2C 50 .570 IF K$(YZX,P
009060: 28 4E 29 29 3C 3E 22 53 22 20 54 48 45 4E 20 48 (N))<>"S" THEN H
009070: 28 32 2C 59 5A 58 2C 50 28 4E 29 29 3D 48 28 32 (2,YZX,P(N))=H(2
009080: 2C 59 5A 58 2C 50 28 4E 29 29 2B 31 0D 0A 31 35 ,YZX,P(N))+1..15
009090: 38 30 20 49 46 20 4B 24 28 5A 59 58 2C 4F 28 4E 80 IF K$(ZYX,O(N
0090A0: 29 29 3C 3E 22 53 22 20 54 48 45 4E 20 48 28 32 ))<>"S" THEN H(2
0090B0: 2C 5A 59 58 2C 4F 28 4E 29 29 3D 48 28 32 2C 5A ,ZYX,O(N))=H(2,Z
0090C0: 59 58 2C 4F 28 4E 29 29 2B 31 0D 0A 31 35 39 30 YX,O(N))+1..1590
0090D0: 20 4E 45 58 54 20 4E 0D 0A 31 36 30 30 20 46 4F NEXT N..1600 FO
0090E0: 52 20 4E 3D 31 20 54 4F 20 31 30 3A 4B 24 28 5A R N=1 TO 10:K$(Z
0090F0: 59 58 2C 4E 29 3D 22 20 22 3A 4B 24 28 59 5A 58 YX,N)=" ":K$(YZX
009100: 2C 4E 29 3D 22 20 22 3A 4E 45 58 54 20 4E 0D 0A ,N)=" ":NEXT N..
009110: 31 36 31 30 20 47 4F 53 55 42 20 33 34 38 30 3A 1610 GOSUB 3480:
009120: 43 4C 53 3A 50 45 4E 20 32 3A 4C 4F 43 41 54 45 CLS:PEN 2:LOCATE
009130: 20 31 35 2C 31 3A 50 52 49 4E 54 20 22 49 4E 4A 15,1:PRINT "INJ
009140: 55 52 49 45 53 22 3A 4C 4F 43 41 54 45 20 31 35 URIES":LOCATE 15
009150: 2C 45 F0 32 3A 50 52 49 4E 54 20 22 2D 2D 2D 2D ,E.2:PRINT "----
009160: 2D 2D 2D 2D 22 0D 0A 31 36 32 30 20 51 51 3D 36 ----"..1620 QQ=6
009170: 3A 4C 4F 43 41 54 45 20 31 33 2C 34 3A 50 52 49 :LOCATE 13,4:PRI
009180: 4E 54 20 22 4D 49 4E 4F 52 20 49 4E 4A 55 52 49 NT "MINOR INJURI
009190: 45 53 3A 2D 22 3A 50 45 4E 20 33 0D 0A 31 36 33 ES:-":PEN 3..163
0091A0: 30 20 46 4F 52 20 4E 3D 31 20 54 4F 20 31 30 3A 0 FOR N=1 TO 10:
0091B0: 49 3D 49 4E 54 28 52 4E 44 2A 28 32 30 2D 54 41 I=INT(RND*(20-TA
0091C0: 47 31 29 29 3A 49 46 20 49 3D 32 20 54 48 45 4E G1)):IF I=2 THEN
0091D0: 20 4C 4F 43 41 54 45 20 31 33 2C 51 51 3A 50 52 LOCATE 13,QQ:PR
0091E0: 49 4E 54 20 4E 24 28 5A 59 58 2C 4E 29 3B 22 20 INT N$(ZYX,N);"
0091F0: 2D 20 22 3B 54 24 28 5A 59 58 29 3A 51 51 3D 51 - ";T$(ZYX):QQ=Q
009200: 51 2B 31 0D 0A 31 36 34 30 20 4E 45 58 54 20 4E Q+1..1640 NEXT N
009210: 0D 0A 31 36 35 30 20 46 4F 52 20 4E 3D 31 20 54 ..1650 FOR N=1 T
009220: 4F 20 31 30 3A 49 3D 49 4E 54 28 52 4E 44 2A 28 O 10:I=INT(RND*(
009230: 32 30 2D 54 41 47 32 29 29 3A 49 46 20 49 3D 32 20-TAG2)):IF I=2
009240: 20 54 48 45 4E 20 4C 4F 43 41 54 45 20 31 33 2C THEN LOCATE 13,
009250: 51 51 3A 87 90 50 52 49 4E 54 20 4E 24 28 59 5A QQ:..PRINT N$(YZ
009260: 58 2C 4E 29 3B 22 20 2D 20 22 3B 54 24 28 59 5A X,N);" - ";T$(YZ
009270: 58 29 3A 51 51 3D 51 51 2B 31 0D 0A 31 36 36 30 X):QQ=QQ+1..1660
009280: 20 4E 45 58 54 20 4E 0D 0A 31 36 37 30 20 50 45 NEXT N..1670 PE
009290: 4E 20 32 3A 4C 4F 43 41 54 45 20 31 33 2C 31 33 N 2:LOCATE 13,13
0092A0: 3A 50 52 49 4E 54 20 22 4D 41 4A 4F 52 20 49 4E :PRINT "MAJOR IN
0092B0: 4A 55 52 49 45 53 3A 2D 22 3A 50 45 4E 20 33 3A JURIES:-":PEN 3:
0092C0: 51 51 3D 31 35 0D 0A 31 36 38 30 20 46 4F 52 20 QQ=15..1680 FOR
0092D0: 4E 3D 31 20 54 4F 20 31 30 3A 49 3D 49 4E 54 28 N=1 TO 10:I=INT(
0092E0: 52 4E 44 2A 28 32 37 2D 54 41 47 31 29 29 3A 49 RND*(27-TAG1)):I
0092F0: 46 20 49 3D 32 20 54 48 45 4E 20 4C 4F 43 41 54 F I=2 THEN LOCAT
009300: 45 20 31 33 2C 51 51 3A 50 52 49 4E 54 20 4E 24 E 13,QQ:PRINT N$
009310: 28 5A 59 58 2C 4E 29 3B 22 20 2D 20 22 3B 54 24 (ZYX,N);" - ";T$
009320: 28 5A 59 58 29 3A 4B 24 28 5A 59 58 2C 4E 29 3D (ZYX):K$(ZYX,N)=
009330: 22 2A 22 3A 4B 28 5A 59 58 2C 4E 29 3D 4B 28 5A "*":K(ZYX,N)=K(Z
009340: 59 58 2C 4E 29 2D 34 30 3A 51 51 3D 51 51 2B 31 YX,N)-40:QQ=QQ+1
009350: 0D 0A 31 36 39 AF EE 30 20 4E 45 58 54 20 4E 0D ..169..0 NEXT N.
009360: 0A 31 37 30 30 20 46 4F 52 20 4E 3D 31 20 54 4F .1700 FOR N=1 TO
009370: 20 31 30 3A 49 3D 49 4E 54 28 52 4E 44 2A 28 32 10:I=INT(RND*(2
009380: 37 2D 54 41 47 32 29 29 3A 49 46 20 49 3D 32 20 7-TAG2)):IF I=2
009390: 54 48 45 4E 20 4C 4F 43 41 54 45 20 31 33 2C 51 THEN LOCATE 13,Q
0093A0: 51 3A 50 52 49 4E 54 20 4E 24 28 59 5A 58 2C 4E Q:PRINT N$(YZX,N
0093B0: 29 3B 22 20 2D 20 22 3B 54 24 28 59 5A 58 29 3A );" - ";T$(YZX):
0093C0: 4B 24 28 59 5A 58 2C 4E 29 3D 22 2A 22 3A 4B 28 K$(YZX,N)="*":K(
0093D0: 59 5A 58 2C 4E 29 3D 4B 28 59 5A 58 2C 4E 29 2D YZX,N)=K(YZX,N)-
0093E0: 34 30 3A 51 51 3D 51 51 2B 31 0D 0A 31 37 31 30 40:QQ=QQ+1..1710
0093F0: 20 4E 45 58 54 20 4E 3A 4C 4F 43 41 54 45 20 31 NEXT N:LOCATE 1
009400: 2C 32 32 3A 50 45 4E 20 31 3A 50 52 49 4E 54 20 ,22:PEN 1:PRINT
009410: 22 4E 2E 42 2E 4D 49 4E 4F 52 20 49 4E 4A 55 52 "N.B.MINOR INJUR
009420: 45 44 20 50 4C 41 59 45 52 53 20 43 41 4E 20 50 ED PLAYERS CAN P
009430: 4C 41 59 20 49 4E 22 3A 50 52 49 4E 54 22 59 4F LAY IN":PRINT"YO
009440: 55 52 20 4E 45 58 54 20 47 41 4D 45 20 41 53 20 UR NEXT GAME AS
009450: 4E 4F 52 4D 41 4C 22 44 C1 0D 0A 31 37 32 30 20 NORMAL"D...1720
009460: 47 4F 53 55 42 20 33 34 38 30 3A 50 45 4E 20 32 GOSUB 3480:PEN 2
009470: 3A 43 4C 53 3A 4C 4F 43 41 54 45 20 31 30 2C 31 :CLS:LOCATE 10,1
009480: 3A 50 52 49 4E 54 20 22 44 49 53 49 50 4C 49 4E :PRINT "DISIPLIN
009490: 41 52 59 20 41 43 54 49 4F 4E 22 0D 0A 31 37 33 ARY ACTION"..173
0094A0: 30 20 51 51 3D 35 0D 0A 31 37 34 30 20 4C 4F 43 0 QQ=5..1740 LOC
0094B0: 41 54 45 20 31 35 2C 33 3A 50 52 49 4E 54 22 42 ATE 15,3:PRINT"B
0094C0: 4F 4F 4B 49 4E 47 53 3A 2D 22 0D 0A 31 37 35 30 OOKINGS:-"..1750
0094D0: 20 50 45 4E 20 33 0D 0A 31 37 36 30 20 46 4F 52 PEN 3..1760 FOR
0094E0: 20 4E 3D 31 20 54 4F 20 37 3A 49 3D 49 4E 54 28 N=1 TO 7:I=INT(
0094F0: 52 4E 44 2A 28 32 30 2D 54 41 47 31 29 29 3A 49 RND*(20-TAG1)):I
009500: 46 20 49 3D 32 20 54 48 45 4E 20 4C 4F 43 41 54 F I=2 THEN LOCAT
009510: 45 20 31 33 2C 51 51 3A 50 52 49 4E 54 20 4E 24 E 13,QQ:PRINT N$
009520: 28 5A 59 58 2C 4E 29 3B 22 20 2D 20 22 3B 54 24 (ZYX,N);" - ";T$
009530: 28 5A 59 58 29 3A 51 51 3D 51 51 2B 31 0D 0A 31 (ZYX):QQ=QQ+1..1
009540: 37 37 30 20 4E 45 58 54 20 4E 0D 0A 31 37 38 30 770 NEXT N..1780
009550: 20 46 4F 52 20 4E 3D 31 20 91 BC FF FF FF FF 11 FOR N=1 .......
009560: 74 09 A6 04 A6 04 F5 04 6C 09 01 10 08 10 00 07 t.......l.......
009570: 01 00 2C 53 4F 43 43 45 00 00 00 00 00 00 00 00 ..,SOCCE........
009580: 00 00 00 06 00 16 00 08 7C 9E 00 00 00 00 00 00 ........|.......
009590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009600: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009610: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009620: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009630: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009640: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009650: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009670: 00 00 00 88 7B FF FF FF FF 11 75 09 F6 04 57 04 ....{.....u...W.
009680: 03 05 5C 09 01 10 08 62 0B 15 08 00 16 54 4F 20 ..\....b.....TO
009690: 37 3A 49 3D 49 4E 54 28 52 4E 44 2A 28 32 30 2D 7:I=INT(RND*(20-
0096A0: 54 41 47 32 29 29 3A 49 46 20 49 3D 32 20 54 48 TAG2)):IF I=2 TH
0096B0: 45 4E 20 4C 4F 43 41 54 45 20 31 33 2C 51 51 3A EN LOCATE 13,QQ:
0096C0: 50 52 49 4E 54 20 4E 24 28 59 5A 58 2C 4E 29 3B PRINT N$(YZX,N);
0096D0: 22 20 22 3B 54 24 28 59 5A 58 29 3A 51 51 3D 51 " ";T$(YZX):QQ=Q
0096E0: 51 2B 31 0D 0A 31 37 39 30 20 4E 45 58 54 20 4E Q+1..1790 NEXT N
0096F0: 0D 0A 31 38 30 30 20 50 45 4E 20 32 0D 0A 31 38 ..1800 PEN 2..18
009700: 31 30 20 4C 4F 43 41 54 45 20 31 35 2C 31 35 3A 10 LOCATE 15,15:
009710: 50 52 49 4E 54 20 22 53 55 53 50 45 4E 53 49 4F PRINT "SUSPENSIO
009720: 4E 53 3A 2D 22 0D 0A 31 38 32 30 20 51 51 3D 31 NS:-"..1820 QQ=1
009730: 37 0D 0A 31 38 33 30 20 50 45 4E 20 33 0D 0A 31 7..1830 PEN 3..1
009740: 38 34 30 20 46 4F 52 20 4E 3D 31 20 54 4F 20 37 840 FOR N=1 TO 7
009750: 3A 49 3D 49 4E 54 28 52 4E 44 2A 28 32 37 2D 54 :I=INT(RND*(27-T
009760: 41 47 31 29 29 3A 49 46 20 49 3D 32 20 54 48 45 AG1)):IF I=2 THE
009770: 4E 20 4C 4F 43 41 54 45 20 31 33 2C 51 51 3A 50 N LOCATE 13,QQ:P
009780: 52 49 4E 54 20 4E 24 28 5A 59 58 2C 4E 4C F1 29 RINT N$(ZYX,NL.)
009790: 3B 22 20 2D 20 22 3B 54 24 28 5A 59 58 29 3A 4B ;" - ";T$(ZYX):K
0097A0: 24 28 5A 59 58 2C 4E 29 3D 22 53 22 3A 51 51 3D $(ZYX,N)="S":QQ=
0097B0: 51 51 2B 31 0D 0A 31 38 35 30 20 4E 45 58 54 20 QQ+1..1850 NEXT
0097C0: 4E 0D 0A 31 38 36 30 20 46 4F 52 20 4E 3D 31 20 N..1860 FOR N=1
0097D0: 54 4F 20 37 3A 49 3D 49 4E 54 28 52 4E 44 2A 28 TO 7:I=INT(RND*(
0097E0: 32 37 2D 54 41 47 32 29 29 3A 49 46 20 49 3D 32 27-TAG2)):IF I=2
0097F0: 20 54 48 45 4E 20 4C 4F 43 41 54 45 20 31 33 2C THEN LOCATE 13,
009800: 51 51 3A 50 52 49 4E 54 20 4E 24 28 59 5A 58 2C QQ:PRINT N$(YZX,
009810: 4E 29 3B 22 20 2D 20 22 3B 54 24 28 59 5A 58 29 N);" - ";T$(YZX)
009820: 3A 4B 24 28 59 5A 58 2C 4E 29 3D 22 53 22 3A 51 :K$(YZX,N)="S":Q
009830: 51 3D 51 51 2B 31 0D 0A 31 38 37 30 20 4E 45 58 Q=QQ+1..1870 NEX
009840: 54 20 4E 3A 50 45 4E 20 31 3A 4C 4F 43 41 54 45 T N:PEN 1:LOCATE
009850: 20 31 2C 32 32 3A 50 52 49 4E 54 22 4E 2E 42 2E 1,22:PRINT"N.B.
009860: 42 4F 4F 4B 45 44 20 50 4C 41 59 45 52 53 20 43 BOOKED PLAYERS C
009870: 41 4E 20 50 4C 41 59 20 49 4E 20 59 4F 55 52 20 AN PLAY IN YOUR
009880: 4E 45 58 54 20 47 41 4D 45 20 41 53 20 4E 4F 8C NEXT GAME AS NO.
009890: 74 52 4D 41 4C 22 0D 0A 31 38 38 30 20 46 4F 52 tRMAL"..1880 FOR
0098A0: 20 4E 3D 31 20 54 4F 20 37 3A 4B 28 5A 59 58 2C N=1 TO 7:K(ZYX,
0098B0: 4F 28 4E 29 29 3D 4B 28 5A 59 58 2C 4F 28 4E 29 O(N))=K(ZYX,O(N)
0098C0: 29 2D 28 49 4E 54 28 52 4E 44 2A 31 30 29 2B 31 )-(INT(RND*10)+1
0098D0: 29 3A 49 46 20 4B 28 5A 59 58 2C 4F 28 4E 29 29 ):IF K(ZYX,O(N))
0098E0: 3C 3D 30 20 54 48 45 4E 20 4B 28 5A 59 58 2C 4F <=0 THEN K(ZYX,O
0098F0: 28 4E 29 29 3D 31 0D 0A 31 38 39 30 20 4E 45 58 (N))=1..1890 NEX
009900: 54 20 4E 0D 0A 31 39 30 30 20 46 4F 52 20 4E 3D T N..1900 FOR N=
009910: 31 20 54 4F 20 37 3A 4B 28 59 5A 58 2C 50 28 4E 1 TO 7:K(YZX,P(N
009920: 29 29 3D 4B 28 59 5A 58 2C 50 28 4E 29 29 2D 28 ))=K(YZX,P(N))-(
009930: 49 4E 54 28 52 4E 44 2A 31 30 29 2B 31 29 3A 49 INT(RND*10)+1):I
009940: 46 20 4B 28 59 5A 58 2C 50 28 4E 29 29 3C 3D 30 F K(YZX,P(N))<=0
009950: 20 54 48 45 4E 20 4B 28 59 5A 58 2C 50 28 4E 29 THEN K(YZX,P(N)
009960: 29 3D 31 0D 0A 31 39 31 30 20 4E 45 58 54 20 4E )=1..1910 NEXT N
009970: 0D 0A 31 39 32 30 20 49 46 20 51 3C 32 35 20 54 ..1920 IF Q<25 T
009980: 48 45 4E 20 47 4F 53 55 42 20 33 35 30 30 3A 47 HEN GOSUB 3500:G
009990: 4F 04 B6 53 55 42 20 33 38 34 30 0D 0A 31 39 33 O..SUB 3840..193
0099A0: 30 20 49 46 20 51 3E 3D 32 35 20 41 4E 44 20 53 0 IF Q>=25 AND S
0099B0: 43 4F 52 3D 53 43 4F 20 41 4E 44 20 52 50 4C 3D COR=SCO AND RPL=
0099C0: 30 20 54 48 45 4E 20 43 4C 53 3A 4C 4F 43 41 54 0 THEN CLS:LOCAT
0099D0: 45 20 31 32 2C 31 30 3A 50 52 49 4E 54 20 22 52 E 12,10:PRINT "R
0099E0: 20 45 20 50 20 4C 20 41 20 59 22 3A 52 50 4C 3D E P L A Y":RPL=
0099F0: 31 3A 47 4F 53 55 42 20 33 34 38 30 3A 47 4F 54 1:GOSUB 3480:GOT
009A00: 4F 20 38 30 0D 0A 31 39 34 30 20 49 46 20 51 3E O 80..1940 IF Q>
009A10: 3D 32 35 20 41 4E 44 20 53 43 4F 52 3D 53 43 4F =25 AND SCOR=SCO
009A20: 20 41 4E 44 20 52 50 4C 3D 31 20 54 48 45 4E 20 AND RPL=1 THEN
009A30: 47 4F 53 55 42 20 34 32 35 30 0D 0A 31 39 35 30 GOSUB 4250..1950
009A40: 20 71 3D 71 2B 31 0D 0A 31 39 36 30 20 49 46 20 q=q+1..1960 IF
009A50: 51 3D 32 35 20 54 48 45 4E 20 47 4F 54 4F 20 34 Q=25 THEN GOTO 4
009A60: 31 33 30 0D 0A 31 39 37 30 20 49 46 20 51 3D 32 130..1970 IF Q=2
009A70: 36 20 54 48 45 4E 20 47 4F 54 4F 20 34 32 32 30 6 THEN GOTO 4220
009A80: 0D 0A 31 39 38 30 20 49 46 20 51 3D 32 37 20 54 ..1980 IF Q=27 T
009A90: 48 45 4E 07 5F 20 47 4F 54 4F 20 34 32 30 30 0D HEN._ GOTO 4200.
009AA0: 0A 31 39 39 30 20 49 46 20 51 3D 32 38 20 54 48 .1990 IF Q=28 TH
009AB0: 45 4E 20 47 4F 54 4F 20 34 34 30 30 0D 0A 32 30 EN GOTO 4400..20
009AC0: 30 30 20 47 4F 53 55 42 20 33 34 38 30 0D 0A 32 00 GOSUB 3480..2
009AD0: 30 31 30 20 47 4F 54 4F 20 31 30 0D 0A 32 30 32 010 GOTO 10..202
009AE0: 30 20 52 45 50 3D 30 3A 43 4C 53 3A 46 4F 52 20 0 REP=0:CLS:FOR
009AF0: 4E 3D 31 20 54 4F 20 31 30 0D 0A 32 30 33 30 20 N=1 TO 10..2030
009B00: 50 45 4E 20 37 3A 4C 4F 43 41 54 45 20 31 2C 31 PEN 7:LOCATE 1,1
009B10: 3A 50 52 49 4E 54 20 54 24 28 54 6D 4E 29 3A 4C :PRINT T$(TmN):L
009B20: 4F 43 41 54 45 20 32 30 2C 31 3A 50 52 49 4E 54 OCATE 20,1:PRINT
009B30: 20 22 20 20 20 20 20 45 4E 45 52 47 59 20 20 20 " ENERGY
009B40: 50 45 52 46 4F 52 4D 22 0D 0A 32 30 34 30 20 4C PERFORM"..2040 L
009B50: 4F 43 41 54 45 20 31 2C 4E 2B 32 3A 50 52 49 4E OCATE 1,N+2:PRIN
009B60: 54 20 4E 3A 4C 4F 43 41 54 45 20 35 2C 4E 2B 32 T N:LOCATE 5,N+2
009B70: 3A 50 52 49 4E 54 20 47 24 28 54 4D 4E 2C 4E 29 :PRINT G$(TMN,N)
009B80: 3A 4C 4F 43 41 54 45 20 39 2C 4E 2B 32 3A 50 52 :LOCATE 9,N+2:PR
009B90: 49 4E 54 20 4E 61 41 24 28 54 6D 4E 2C 4E 29 3A INT NaA$(TmN,N):
009BA0: 4C 4F 43 41 54 45 20 32 35 2C 4E 2B 32 3A 50 52 LOCATE 25,N+2:PR
009BB0: 49 4E 54 20 49 4E 54 28 4B 28 54 6D 4E 2C 4E 29 INT INT(K(TmN,N)
009BC0: 29 3A 4C 4F 43 41 54 45 20 33 32 2C 4E 2B 32 3A ):LOCATE 32,N+2:
009BD0: 50 52 49 4E 54 20 49 4E 54 28 48 28 31 2C 54 6D PRINT INT(H(1,Tm
009BE0: 4E 2C 4E 29 29 0D 0A 32 30 35 30 20 49 46 20 4B N,N))..2050 IF K
009BF0: 24 28 54 6D 4E 2C 4E 29 3D 22 2A 22 20 4F 52 20 $(TmN,N)="*" OR
009C00: 4B 24 28 54 6D 4E 2C 4E 29 3D 22 53 22 20 54 48 K$(TmN,N)="S" TH
009C10: 45 4E 20 4C 4F 43 41 54 45 20 37 2C 4E 2B 32 3A EN LOCATE 7,N+2:
009C20: 50 52 49 4E 54 20 4B 24 28 54 6D 4E 2C 4E 29 0D PRINT K$(TmN,N).
009C30: 0A 32 30 36 30 20 49 46 20 4E 3C 3E 31 30 20 54 .2060 IF N<>10 T
009C40: 48 45 4E 20 4C 4F 43 41 54 45 20 32 30 2C 4E 2B HEN LOCATE 20,N+
009C50: 32 3A 50 52 49 4E 54 20 22 50 22 3B 4E 0D 0A 32 2:PRINT "P";N..2
009C60: 30 37 30 20 49 46 20 4E 3D 38 20 4F 52 20 4E 3D 070 IF N=8 OR N=
009C70: 39 20 54 48 45 4E 20 4C 4F 43 41 54 45 20 32 30 9 THEN LOCATE 20
009C80: 2C 4E 2B 32 3A 50 52 49 4E 54 20 22 53 22 3B 4E ,N+2:PRINT "S";N
009C90: 2D 37 0D 0A 32 30 38 01 0E 30 20 4E 45 58 54 20 -7..208..0 NEXT
009CA0: 4E 3A 4C 4F 43 41 54 45 20 31 2C 32 30 3A 50 52 N:LOCATE 1,20:PR
009CB0: 49 4E 54 20 22 2A 20 2D 20 49 4E 4A 55 52 45 44 INT "* - INJURED
009CC0: 20 50 4C 41 59 45 52 20 20 20 50 31 20 2D 20 50 PLAYER P1 - P
009CD0: 4C 41 59 45 52 53 20 4E 4F 2E 22 3A 4C 4F 43 41 LAYERS NO.":LOCA
009CE0: 54 45 20 31 2C 32 31 3A 50 52 49 4E 54 22 53 20 TE 1,21:PRINT"S
009CF0: 2D 20 53 55 53 50 45 4E 44 45 44 20 50 4C 41 59 - SUSPENDED PLAY
009D00: 45 52 20 53 31 20 2D 20 53 55 42 53 49 54 55 54 ER S1 - SUBSITUT
009D10: 45 20 4E 4F 2E 22 0D 0A 32 30 39 30 20 49 46 20 E NO."..2090 IF
009D20: 52 45 50 3C 3E 30 20 54 48 45 4E 20 4C 4F 43 41 REP<>0 THEN LOCA
009D30: 54 45 20 31 2C 31 33 3A 49 4E 56 45 52 53 45 20 TE 1,13:INVERSE
009D40: 31 3A 50 52 49 4E 54 22 53 45 4C 45 43 54 20 50 1:PRINT"SELECT P
009D50: 4C 41 59 45 52 20 54 4F 20 52 45 50 4C 41 43 45 LAYER TO REPLACE
009D60: 20 22 54 41 42 28 31 29 4E 24 28 54 57 4E 2C 52 "TAB(1)N$(TWN,R
009D70: 45 50 29 3A 47 4F 54 4F 20 32 31 38 30 0D 0A 32 EP):GOTO 2180..2
009D80: 31 30 30 20 4C 4F 43 41 54 45 20 31 2C 32 33 3A 100 LOCATE 1,23:
009D90: 49 4E 50 55 54 22 43 48 41 BE C7 4E 47 45 20 54 INPUT"CHA..NGE T
009DA0: 45 41 4D 20 28 59 2F 4E 29 22 3B 4C 24 3A 4C 24 EAM (Y/N)";L$:L$
009DB0: 3D 55 50 50 45 52 24 28 4C 24 29 0D 0A 32 31 31 =UPPER$(L$)..211
009DC0: 30 20 49 46 20 4C 24 3D 22 59 22 20 54 48 45 4E 0 IF L$="Y" THEN
009DD0: 20 47 4F 54 4F 20 32 31 37 30 0D 0A 32 31 32 30 GOTO 2170..2120
009DE0: 20 49 46 20 4C 24 3D 22 4E 22 20 54 48 45 4E 20 IF L$="N" THEN
009DF0: 47 4F 54 4F 20 32 33 33 30 0D 0A 32 31 33 30 20 GOTO 2330..2130
009E00: 47 4F 54 4F 20 32 31 30 30 0D 0A 32 31 34 30 20 GOTO 2100..2140
009E10: 49 46 20 47 31 3D 31 20 41 4E 44 20 46 50 3D 30 IF G1=1 AND FP=0
009E20: 20 54 48 45 4E 20 46 50 3D 31 3A 49 46 20 47 32 THEN FP=1:IF G2
009E30: 3D 31 20 54 48 45 4E 20 54 52 4E 3D 30 3A 47 4F =1 THEN TRN=0:GO
009E40: 54 4F 20 32 33 33 30 0D 0A 32 31 35 30 20 49 46 TO 2330..2150 IF
009E50: 20 47 32 3D 31 20 41 4E 44 20 46 50 3D 31 20 54 G2=1 AND FP=1 T
009E60: 48 45 4E 20 47 4F 54 4F 20 38 30 0D 0A 32 31 36 HEN GOTO 80..216
009E70: 30 20 47 4F 54 4F 20 38 30 0D 0A 32 31 37 30 20 0 GOTO 80..2170
009E80: 4D 24 3D 22 4E 55 4D 42 45 52 3A 2D 22 3A 47 4F M$="NUMBER:-":GO
009E90: 53 55 42 20 33 37 32 30 3A 4E 55 42 77 FF FF FF SUB 3720:NUBw...
009EA0: FF 11 76 09 F6 04 57 04 F5 04 6A 09 01 10 08 11 ..v...W...j.....
009EB0: 00 07 01 00 2C 53 4F 43 43 45 00 00 00 00 00 00 ....,SOCCE......
009EC0: 00 00 00 00 00 07 00 16 00 08 7C 9E 00 00 00 00 ..........|.....
009ED0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009EE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009EF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009F00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009F10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009F20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009F30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009F40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009F50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009F60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009F70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009F80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009F90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009FA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009FB0: 00 00 00 00 00 6F 70 FF FF FF FF 11 75 09 A6 04 .....op.....u...
009FC0: A6 04 03 05 59 09 01 10 08 66 0B 15 08 00 16 4D ....Y....f.....M
009FD0: 3D 56 41 4C 28 4C 24 29 3A 49 46 20 4E 55 4D 3C =VAL(L$):IF NUM<
009FE0: 31 20 4F 52 20 4E 55 4D 3E 31 30 20 54 48 45 4E 1 OR NUM>10 THEN
009FF0: 20 47 4F 54 4F 20 32 31 37 30 0D 0A 32 31 38 30 GOTO 2170..2180
00A000: 20 4D 24 3D 22 4E 55 4D 42 45 52 20 4F 46 20 4E M$="NUMBER OF N
00A010: 45 57 20 4D 41 4E 3A 2D 22 3A 47 4F 53 55 42 20 EW MAN:-":GOSUB
00A020: 33 37 32 30 3A 53 4E 55 4D 3D 56 41 4C 28 4C 24 3720:SNUM=VAL(L$
00A030: 29 3A 49 46 20 53 4E 55 4D 3C 31 20 4F 52 20 53 ):IF SNUM<1 OR S
00A040: 4E 55 4D 3E 31 30 20 54 48 45 4E 20 47 4F 54 4F NUM>10 THEN GOTO
00A050: 20 32 31 38 30 0D 0A 32 31 39 30 20 49 46 20 53 2180..2190 IF S
00A060: 4E 55 4D 3D 4E 55 4D 20 54 48 45 4E 20 47 4F 54 NUM=NUM THEN GOT
00A070: 4F 20 32 31 37 30 0D 0A 32 32 30 30 20 4E 4E 24 O 2170..2200 NN$
00A080: 3D 4E 24 28 54 4D 4E 2C 4E 55 4D 29 3A 4E 4E 31 =N$(TMN,NUM):NN1
00A090: 24 3D 4E 24 28 54 4D 4E 2C 53 4E 55 4D 29 3A 4E $=N$(TMN,SNUM):N
00A0A0: 24 28 54 4D 4E 2C 53 4E 55 4D 29 3D 4E 4E 24 3A $(TMN,SNUM)=NN$:
00A0B0: 4E 24 28 54 4D 4E 2C 4E 55 4D 29 3D 4E 4E 31 24 N$(TMN,NUM)=NN1$
00A0C0: 0D 0A 32 32 31 30 20 4E 4E 24 3D 4B 24 28 54 7D ..2210 NN$=K$(T}
00A0D0: 64 4D 4E 2C 4E 55 4D 29 3A 4E 4E 31 24 3D 4B 24 dMN,NUM):NN1$=K$
00A0E0: 28 54 4D 4E 2C 53 4E 55 4D 29 3A 4B 24 28 54 4D (TMN,SNUM):K$(TM
00A0F0: 4E 2C 53 4E 55 4D 29 3D 4E 4E 24 3A 4B 24 28 54 N,SNUM)=NN$:K$(T
00A100: 4D 4E 2C 4E 55 4D 29 3D 4E 4E 31 24 0D 0A 32 32 MN,NUM)=NN1$..22
00A110: 32 30 20 4E 4E 3D 68 28 31 2C 54 4D 4E 2C 4E 55 20 NN=h(1,TMN,NU
00A120: 4D 29 3A 4E 4E 31 3D 68 28 31 2C 54 4D 4E 2C 53 M):NN1=h(1,TMN,S
00A130: 4E 55 4D 29 3A 68 28 31 2C 54 4D 4E 2C 53 4E 55 NUM):h(1,TMN,SNU
00A140: 4D 29 3D 4E 4E 3A 68 28 31 2C 54 4D 4E 2C 4E 55 M)=NN:h(1,TMN,NU
00A150: 4D 29 3D 4E 4E 31 3A 0D 0A 32 32 33 30 20 4E 4E M)=NN1:..2230 NN
00A160: 24 3D 67 24 28 54 4D 4E 2C 4E 55 4D 29 3A 4E 4E $=g$(TMN,NUM):NN
00A170: 31 24 3D 67 24 28 54 4D 4E 2C 53 4E 55 4D 29 3A 1$=g$(TMN,SNUM):
00A180: 67 24 28 54 4D 4E 2C 53 4E 55 4D 29 3D 4E 4E 24 g$(TMN,SNUM)=NN$
00A190: 3A 67 24 28 54 4D 4E 2C 4E 55 4D 29 3D 4E 4E 31 :g$(TMN,NUM)=NN1
00A1A0: 24 0D 0A 32 32 34 30 20 4E 4E 3D 4B 28 54 4D 4E $..2240 NN=K(TMN
00A1B0: 2C 4E 55 4D 29 3A 4E 4E 31 3D 4B 28 54 4D 4E 2C ,NUM):NN1=K(TMN,
00A1C0: 53 4E 55 4D 29 3A 4B 28 54 4D 4E 2C 53 4E 55 4D SNUM):K(TMN,SNUM
00A1D0: 29 0E D3 3D 4E 4E 3A 4B 28 54 4D 4E 2C 4E 55 4D )..=NN:K(TMN,NUM
00A1E0: 29 3D 4E 4E 31 0D 0A 32 32 35 30 20 46 4F 52 20 )=NN1..2250 FOR
00A1F0: 4E 3D 31 20 54 4F 20 31 30 3A 49 46 20 4C 28 4E N=1 TO 10:IF L(N
00A200: 4F 55 2C 4E 29 3D 53 4E 55 4D 20 54 48 45 4E 20 OU,N)=SNUM THEN
00A210: 54 52 4E 32 3D 4E 0D 0A 32 32 36 30 20 4E 45 58 TRN2=N..2260 NEX
00A220: 54 20 4E 0D 0A 32 32 37 30 20 4C 28 4E 4F 55 2C T N..2270 L(NOU,
00A230: 54 52 4E 31 29 3D 53 4E 55 4D 0D 0A 32 32 38 30 TRN1)=SNUM..2280
00A240: 20 4C 28 4E 4F 55 2C 54 52 4E 32 29 3D 4E 55 4D L(NOU,TRN2)=NUM
00A250: 0D 0A 32 32 39 30 20 49 46 20 47 4F 4E 3D 31 20 ..2290 IF GON=1
00A260: 54 48 45 4E 20 4F 28 4E 55 4D 29 3D 53 4E 55 4D THEN O(NUM)=SNUM
00A270: 0D 0A 32 33 30 30 20 49 46 20 47 4F 4E 3D 32 20 ..2300 IF GON=2
00A280: 54 48 45 4E 20 50 28 4E 55 4D 29 3D 53 4E 55 4D THEN P(NUM)=SNUM
00A290: 0D 0A 32 33 31 30 20 47 4F 54 4F 20 32 30 32 30 ..2310 GOTO 2020
00A2A0: 0D 0A 32 33 32 30 20 47 4F 54 4F 20 32 30 38 30 ..2320 GOTO 2080
00A2B0: 0D 0A 32 33 33 30 20 50 45 4E 20 37 3A 43 4C 53 ..2330 PEN 7:CLS
00A2C0: 3A 47 45 4D 3D 31 0D 0A 32 33 34 30 20 49 46 20 :GEM=1..2340 IF
00A2D0: 46 50 3D 13 FC 30 20 41 4E 44 20 47 31 3D 31 20 FP=..0 AND G1=1
00A2E0: 54 48 45 4E 20 54 4D 4E 3D 4E 55 3A 0D 0A 32 33 THEN TMN=NU:..23
00A2F0: 35 30 20 49 46 20 47 32 3D 31 20 41 4E 44 20 46 50 IF G2=1 AND F
00A300: 50 3D 31 20 54 48 45 4E 20 54 4D 4E 3D 4E 55 31 P=1 THEN TMN=NU1
00A310: 20 0D 0A 32 33 36 30 20 49 46 20 47 31 3D 30 20 ..2360 IF G1=0
00A320: 41 4E 44 20 47 32 3D 31 20 41 4E 44 20 46 50 3D AND G2=1 AND FP=
00A330: 30 20 54 48 45 4E 20 54 4D 4E 3D 4E 55 31 0D 0A 0 THEN TMN=NU1..
00A340: 32 33 37 30 20 4C 4F 43 41 54 45 20 31 2C 32 34 2370 LOCATE 1,24
00A350: 3A 50 52 49 4E 54 22 20 20 20 20 20 20 20 20 20 :PRINT"
00A360: 20 20 20 20 50 4C 45 41 53 45 20 57 41 49 54 22 PLEASE WAIT"
00A370: 3A 51 51 3D 46 52 45 28 22 22 29 3A 43 4C 53 0D :QQ=FRE(""):CLS.
00A380: 0A 32 33 38 30 20 50 45 4E 20 32 3A 4C 4F 43 41 .2380 PEN 2:LOCA
00A390: 54 45 20 31 39 2C 31 30 3A 50 52 49 4E 54 20 22 TE 19,10:PRINT "
00A3A0: 54 45 41 4D 3A 22 3A 50 45 4E 20 33 3A 4C 4F 43 TEAM:":PEN 3:LOC
00A3B0: 41 54 45 20 32 37 2C 31 30 3A 50 52 49 4E 54 20 ATE 27,10:PRINT
00A3C0: 54 24 28 54 6D 4E 29 3A 50 45 4E 20 32 3A 4C 4F T$(TmN):PEN 2:LO
00A3D0: 43 41 54 45 20 52 37 31 39 2C 31 36 3A 50 52 49 CATE R719,16:PRI
00A3E0: 4E 54 20 22 4D 4F 52 41 4C 45 3A 22 3A 50 45 4E NT "MORALE:":PEN
00A3F0: 20 33 3A 4C 4F 43 41 54 45 20 32 37 2C 31 36 3A 3:LOCATE 27,16:
00A400: 50 52 49 4E 54 20 4A 24 28 74 6D 6E 29 3A 50 45 PRINT J$(tmn):PE
00A410: 4E 20 32 3A 4C 4F 43 41 54 45 20 31 39 2C 31 33 N 2:LOCATE 19,13
00A420: 3A 50 52 49 4E 54 22 4E 41 4D 45 3A 22 3A 50 45 :PRINT"NAME:":PE
00A430: 4E 20 33 3A 4C 4F 43 41 54 45 20 32 37 2C 31 33 N 3:LOCATE 27,13
00A440: 3A 50 52 49 4E 54 20 52 24 28 54 4D 4E 29 0D 0A :PRINT R$(TMN)..
00A450: 32 33 39 30 20 49 4E 4B 20 31 2C 32 34 3A 4C 4F 2390 INK 1,24:LO
00A460: 43 41 54 45 20 31 2C 31 3A 50 52 49 4E 54 22 31 CATE 1,1:PRINT"1
00A470: 2D 43 48 41 4E 47 45 20 54 45 41 4D 22 54 41 42 -CHANGE TEAM"TAB
00A480: 28 31 29 22 20 22 54 41 42 28 31 29 22 32 2D 54 (1)" "TAB(1)"2-T
00A490: 52 41 49 4E 49 4E 47 22 54 41 42 28 31 29 22 20 RAINING"TAB(1)"
00A4A0: 22 54 41 42 28 31 29 22 33 2D 50 4C 41 59 20 4D "TAB(1)"3-PLAY M
00A4B0: 41 54 43 48 22 54 41 42 28 31 29 22 20 22 54 41 ATCH"TAB(1)" "TA
00A4C0: 42 28 31 29 22 34 2D 54 52 41 44 45 20 50 4C 41 B(1)"4-TRADE PLA
00A4D0: 59 45 52 53 22 0D 0A 61 23 32 34 30 30 20 50 52 YERS"..a#2400 PR
00A4E0: 49 4E 54 20 54 41 42 28 31 29 22 20 22 54 41 42 INT TAB(1)" "TAB
00A4F0: 28 31 29 22 22 54 41 42 28 31 29 22 20 22 54 41 (1)""TAB(1)" "TA
00A500: 42 28 31 29 22 36 2D 49 4E 4A 55 52 49 45 53 22 B(1)"6-INJURIES"
00A510: 54 41 42 28 31 29 22 20 22 54 41 42 28 31 29 22 TAB(1)" "TAB(1)"
00A520: 37 2D 46 49 58 54 55 52 45 20 4C 49 53 54 22 54 7-FIXTURE LIST"T
00A530: 41 42 28 31 29 22 20 22 54 41 42 28 31 29 22 30 AB(1)" "TAB(1)"0
00A540: 2D 4D 41 4E 41 47 45 52 20 52 41 54 49 4E 47 53 -MANAGER RATINGS
00A550: 22 54 41 42 28 31 29 22 20 22 54 41 42 28 31 29 "TAB(1)" "TAB(1)
00A560: 22 4C 2D 43 48 45 43 4B 20 4C 45 41 47 55 45 53 "L-CHECK LEAGUES
00A570: 22 54 41 42 28 31 29 22 20 22 54 41 42 28 31 29 "TAB(1)" "TAB(1)
00A580: 22 38 2D 53 41 56 45 20 47 41 4D 45 22 0D 0A 32 "8-SAVE GAME"..2
00A590: 34 32 30 20 6C 24 3D 49 4E 4B 45 59 24 3A 49 46 420 l$=INKEY$:IF
00A5A0: 20 4C 24 3D 22 22 20 54 48 45 4E 20 32 34 32 30 L$="" THEN 2420
00A5B0: 0D 0A 32 34 33 30 20 53 4F 55 4E 44 20 31 2C 32 ..2430 SOUND 1,2
00A5C0: 33 39 2C 36 0D 0A 32 34 34 30 20 49 46 20 4C 24 39,6..2440 IF L$
00A5D0: 3D 22 31 22 20 54 48 45 4E 2E 2F 20 47 4F 54 4F ="1" THEN./ GOTO
00A5E0: 20 32 30 32 30 0D 0A 32 34 35 30 20 49 46 20 4C 2020..2450 IF L
00A5F0: 24 3D 22 32 22 20 41 4E 44 20 54 4E 3D 30 20 54 $="2" AND TN=0 T
00A600: 48 45 4E 20 47 4F 54 4F 20 32 35 34 30 0D 0A 32 HEN GOTO 2540..2
00A610: 34 36 30 20 49 46 20 4C 24 3D 22 33 22 20 54 48 460 IF L$="3" TH
00A620: 45 4E 20 43 4C 53 3A 4C 45 47 4F 3D 30 3A 47 45 EN CLS:LEGO=0:GE
00A630: 4D 3D 31 3A 47 4F 54 4F 20 32 31 34 30 0D 0A 32 M=1:GOTO 2140..2
00A640: 34 37 30 20 49 46 20 55 50 50 45 52 24 28 4C 24 470 IF UPPER$(L$
00A650: 29 3D 22 4C 22 20 41 4E 44 20 47 45 4D 3D 31 20 )="L" AND GEM=1
00A660: 54 48 45 4E 20 47 4F 53 55 42 20 33 38 33 30 3A THEN GOSUB 3830:
00A670: 47 4F 54 4F 20 32 33 33 30 0D 0A 32 34 38 30 20 GOTO 2330..2480
00A680: 61 3D 46 52 45 28 22 22 29 3A 49 46 20 4C 24 3D a=FRE(""):IF L$=
00A690: 22 38 22 20 54 48 45 4E 20 47 4F 54 4F 20 34 35 "8" THEN GOTO 45
00A6A0: 31 30 0D 0A 32 34 39 30 20 49 46 20 4C 24 3D 22 10..2490 IF L$="
00A6B0: 36 22 20 54 48 45 4E 20 47 4F 54 4F 20 32 37 37 6" THEN GOTO 277
00A6C0: 30 0D 0A 32 35 30 30 20 49 46 20 4C 24 3D 22 30 0..2500 IF L$="0
00A6D0: 22 20 54 48 45 4E 20 47 4F 53 55 18 10 42 20 33 " THEN GOSU..B 3
00A6E0: 30 31 30 3A 47 4F 54 4F 20 32 33 33 30 0D 0A 32 010:GOTO 2330..2
00A6F0: 35 31 30 20 49 46 20 4C 24 3D 22 37 22 20 54 48 510 IF L$="7" TH
00A700: 45 4E 20 47 4F 54 4F 20 32 38 32 30 0D 0A 32 35 EN GOTO 2820..25
00A710: 32 30 20 49 46 20 4C 24 3D 22 34 22 20 54 48 45 20 IF L$="4" THE
00A720: 4E 20 47 4F 54 4F 20 33 31 39 30 0D 0A 32 35 33 N GOTO 3190..253
00A730: 30 20 47 4F 54 4F 20 32 34 32 30 0D 0A 32 35 34 0 GOTO 2420..254
00A740: 30 20 43 4C 53 3A 4C 4F 43 41 54 45 20 31 33 2C 0 CLS:LOCATE 13,
00A750: 32 3A 50 52 49 4E 54 22 54 52 41 49 4E 49 4E 47 2:PRINT"TRAINING
00A760: 22 54 41 42 28 31 29 22 20 22 54 41 42 28 31 32 "TAB(1)" "TAB(12
00A770: 29 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 0D 0A 32 35 )"---------"..25
00A780: 35 30 20 50 45 4E 20 35 3A 4C 4F 43 41 54 45 20 50 PEN 5:LOCATE
00A790: 31 2C 35 3A 50 52 49 4E 54 22 50 52 45 53 53 3A 1,5:PRINT"PRESS:
00A7A0: 2D 22 0D 0A 32 35 36 30 20 50 45 4E 20 36 3A 4C -"..2560 PEN 6:L
00A7B0: 4F 43 41 54 45 20 33 2C 37 3A 50 52 49 4E 54 22 OCATE 3,7:PRINT"
00A7C0: 33 2D 57 4F 52 4B 20 4F 4E 20 46 49 54 4E 45 53 3-WORK ON FITNES
00A7D0: 53 22 3A 50 52 49 4E 54 3A 50 52 49 4E 1F BC FF S":PRINT:PRIN...
00A7E0: FF FF FF 11 76 09 F6 04 57 04 F5 04 6D 09 01 10 ....v...W...m...
00A7F0: 08 10 00 07 01 00 2C 53 4F 43 43 45 00 00 00 00 ......,SOCCE....
00A800: 00 00 00 00 00 00 00 08 00 16 00 08 7C 9E 00 00 ............|...
00A810: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A820: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A830: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A840: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A850: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A860: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A870: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A880: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8F0: 00 00 00 00 00 00 00 B2 BC FF FF FF FF 11 77 09 ..............w.
00A900: F6 04 57 04 05 05 5C 09 01 10 08 64 0B 15 08 00 ..W...\....d....
00A910: 16 54 20 54 41 42 28 33 29 22 34 2D 57 4F 52 4B .T TAB(3)"4-WORK
00A920: 20 4F 4E 20 47 45 4E 45 52 41 4C 20 53 4B 49 4C ON GENERAL SKIL
00A930: 4C 22 3A 50 45 4E 20 33 3A 4C 4F 43 41 54 45 20 L":PEN 3:LOCATE
00A940: 33 2C 31 36 3A 50 52 49 4E 54 22 59 4F 55 20 48 3,16:PRINT"YOU H
00A950: 41 56 45 20 22 3B 4D 28 54 6D 4E 29 3B 22 20 48 AVE ";M(TmN);" H
00A960: 4F 55 52 53 20 4F 46 20 54 52 41 49 4E 49 4E 47 OURS OF TRAINING
00A970: 20 4C 45 46 54 22 0D 0A 32 35 37 30 20 4C 24 3D LEFT"..2570 L$=
00A980: 22 22 3A 57 48 49 4C 45 20 4C 24 3D 22 22 3A 4C "":WHILE L$="":L
00A990: 24 3D 49 4E 4B 45 59 24 3A 57 45 4E 44 3A 49 46 $=INKEY$:WEND:IF
00A9A0: 20 4C 24 3D 22 34 22 20 4F 52 20 4C 24 3D 22 33 L$="4" OR L$="3
00A9B0: 22 20 54 48 45 4E 20 47 4F 54 4F 20 32 35 38 30 " THEN GOTO 2580
00A9C0: 20 45 4C 53 45 20 47 4F 54 4F 20 32 35 37 30 0D ELSE GOTO 2570.
00A9D0: 0A 32 35 38 30 20 49 46 20 4C 24 3D 22 33 22 20 .2580 IF L$="3"
00A9E0: 54 48 45 4E 20 54 52 4E 3D 33 3A 45 4C 53 45 20 THEN TRN=3:ELSE
00A9F0: 54 52 4E 3D 34 0D 0A 32 35 39 30 20 4D 24 3D 22 TRN=4..2590 M$="
00AA00: 48 4F 57 20 4D 41 4E 59 20 48 4F 55 52 53 20 4F HOW MANY HOURS O
00AA10: 46 A2 A2 20 54 52 41 49 4E 49 4E 47 20 28 30 20 F.. TRAINING (0
00AA20: 2D 22 2B 53 54 52 24 28 4D 28 54 4D 4E 29 29 2B -"+STR$(M(TMN))+
00AA30: 22 29 20 22 3A 47 4F 53 55 42 20 33 37 32 30 3A ") ":GOSUB 3720:
00AA40: 54 52 3D 56 41 4C 28 4C 24 29 3A 49 46 20 54 52 TR=VAL(L$):IF TR
00AA50: 3C 30 20 4F 52 20 54 52 3E 4D 28 54 4D 4E 29 20 <0 OR TR>M(TMN)
00AA60: 54 48 45 4E 20 47 4F 54 4F 20 32 35 39 30 0D 0A THEN GOTO 2590..
00AA70: 32 36 30 30 20 49 46 20 54 52 4E 3D 34 20 54 48 2600 IF TRN=4 TH
00AA80: 45 4E 20 47 4F 53 55 42 20 32 36 35 30 0D 0A 32 EN GOSUB 2650..2
00AA90: 36 31 30 20 49 46 20 54 52 4E 3D 33 20 54 48 45 610 IF TRN=3 THE
00AAA0: 4E 20 47 4F 53 55 42 20 32 37 31 30 0D 0A 32 36 N GOSUB 2710..26
00AAB0: 32 30 20 4D 28 54 4D 4E 29 3D 4D 28 54 4D 4E 29 20 M(TMN)=M(TMN)
00AAC0: 2D 54 52 0D 0A 32 36 33 30 20 49 46 20 4D 28 54 -TR..2630 IF M(T
00AAD0: 4D 4E 29 3D 30 20 54 48 45 4E 20 54 4E 3D 31 3A MN)=0 THEN TN=1:
00AAE0: 43 4C 53 3A 4C 4F 43 41 54 45 20 31 35 2C 31 30 CLS:LOCATE 15,10
00AAF0: 3A 50 52 49 4E 54 22 54 52 41 49 4E 49 4E 47 20 :PRINT"TRAINING
00AB00: 43 4F 4D 50 4C 45 54 45 44 2E 2E 2E 2E 2E 2E 2E COMPLETED.......
00AB10: 2E 2E 2E 31 1E 2E 2E 2E 22 0D 0A 32 36 34 30 20 ...1...."..2640
00AB20: 54 52 3D 30 3A 4C 4F 43 41 54 45 20 31 2C 32 34 TR=0:LOCATE 1,24
00AB30: 3A 50 52 49 4E 54 20 53 50 41 43 45 24 28 34 30 :PRINT SPACE$(40
00AB40: 29 3A 47 4F 53 55 42 20 33 34 38 30 3A 47 4F 54 ):GOSUB 3480:GOT
00AB50: 4F 20 32 33 33 30 0D 0A 32 36 35 30 20 46 4F 52 O 2330..2650 FOR
00AB60: 20 4E 3D 31 20 54 4F 20 31 30 3A 0D 0A 32 36 36 N=1 TO 10:..266
00AB70: 30 20 72 61 3D 49 4E 54 28 52 4E 44 2A 31 30 29 0 ra=INT(RND*10)
00AB80: 2B 31 0D 0A 32 36 37 30 20 49 46 20 52 41 3C 33 +1..2670 IF RA<3
00AB90: 20 54 48 45 4E 20 48 28 31 2C 54 6D 4E 2C 4E 29 THEN H(1,TmN,N)
00ABA0: 3D 48 28 31 2C 54 6D 4E 2C 4E 29 2D 28 49 4E 54 =H(1,TmN,N)-(INT
00ABB0: 28 54 52 2F 31 30 29 29 3A 49 46 20 48 28 31 2C (TR/10)):IF H(1,
00ABC0: 54 6D 4E 2C 4E 29 3C 30 20 54 48 45 4E 20 48 28 TmN,N)<0 THEN H(
00ABD0: 31 2C 54 6D 4E 2C 4E 29 3D 31 0D 0A 32 36 38 30 1,TmN,N)=1..2680
00ABE0: 20 49 46 20 52 41 3E 37 20 54 48 45 4E 20 48 28 IF RA>7 THEN H(
00ABF0: 31 2C 54 6D 4E 2C 4E 29 3D 48 28 31 2C 54 6D 4E 1,TmN,N)=H(1,TmN
00AC00: 2C 4E 29 2B 28 49 4E 54 28 54 52 2F 31 30 29 29 ,N)+(INT(TR/10))
00AC10: 3A 0D 0A 32 36 D1 0D 39 30 20 4E 45 58 54 20 4E :..26..90 NEXT N
00AC20: 0D 0A 32 37 30 30 20 52 45 54 55 52 4E 0D 0A 32 ..2700 RETURN..2
00AC30: 37 31 30 20 46 4F 52 20 4E 3D 31 20 54 4F 20 31 710 FOR N=1 TO 1
00AC40: 30 3A 0D 0A 32 37 32 30 20 52 41 3D 49 4E 54 28 0:..2720 RA=INT(
00AC50: 52 4E 44 2A 31 30 29 0D 0A 32 37 33 30 20 49 46 RND*10)..2730 IF
00AC60: 20 52 41 3C 33 20 54 48 45 4E 20 4B 28 54 6D 4E RA<3 THEN K(TmN
00AC70: 2C 4E 29 3D 4B 28 54 6D 4E 2C 4E 29 2B 28 49 4E ,N)=K(TmN,N)+(IN
00AC80: 54 28 54 52 2F 31 30 29 29 3A 49 46 20 4B 28 54 T(TR/10)):IF K(T
00AC90: 4D 4E 2C 4E 29 3E 31 30 30 20 54 48 45 4E 20 4B MN,N)>100 THEN K
00ACA0: 28 54 4D 4E 2C 4E 29 3D 31 30 30 3A 0D 0A 32 37 (TMN,N)=100:..27
00ACB0: 34 30 20 49 46 20 52 41 3E 37 20 54 48 45 4E 20 40 IF RA>7 THEN
00ACC0: 4B 28 54 6D 4E 2C 4E 29 3D 4B 28 54 6D 4E 2C 4E K(TmN,N)=K(TmN,N
00ACD0: 29 2D 28 49 4E 54 28 54 52 2F 31 30 29 29 3A 49 )-(INT(TR/10)):I
00ACE0: 46 20 4B 28 54 4D 4E 2C 4E 29 3C 31 20 54 48 45 F K(TMN,N)<1 THE
00ACF0: 4E 20 4B 28 54 4D 4E 2C 4E 29 3D 31 20 0D 0A 32 N K(TMN,N)=1 ..2
00AD00: 37 35 30 20 4E 45 58 54 20 4E 0D 0A 32 37 36 30 750 NEXT N..2760
00AD10: 20 52 45 54 55 52 4E 44 2F 0D 0A 32 37 37 30 20 RETURND/..2770
00AD20: 43 4C 53 3A 4C 4F 43 41 54 45 20 31 30 2C 31 3A CLS:LOCATE 10,1:
00AD30: 50 52 49 4E 54 22 49 4E 4A 55 52 59 20 4C 49 53 PRINT"INJURY LIS
00AD40: 54 22 27 54 41 42 28 39 29 3B 22 2D 2D 2D 2D 2D T"'TAB(9);"-----
00AD50: 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 3F 3A 3F 0D 0A 32 --------":?:?..2
00AD60: 37 38 30 20 50 52 49 4E 54 3A 50 52 49 4E 54 3A 780 PRINT:PRINT:
00AD70: 50 52 49 4E 54 0D 0A 32 37 39 30 20 46 4F 52 20 PRINT..2790 FOR
00AD80: 4E 3D 31 20 54 4F 20 38 3A 46 4F 52 20 4A 3D 31 N=1 TO 8:FOR J=1
00AD90: 20 54 4F 20 31 30 3A 49 46 20 4B 24 28 4E 2C 4A TO 10:IF K$(N,J
00ADA0: 29 3D 22 2A 22 20 54 48 45 4E 20 50 45 4E 20 37 )="*" THEN PEN 7
00ADB0: 3A 50 52 49 4E 54 22 3E 3E 20 22 3B 3A 50 45 4E :PRINT">> ";:PEN
00ADC0: 20 32 3A 50 52 49 4E 54 20 4E 24 28 4E 2C 4A 29 2:PRINT N$(N,J)
00ADD0: 3B 3A 50 45 4E 20 37 3A 50 52 49 4E 54 22 20 2D ;:PEN 7:PRINT" -
00ADE0: 20 22 3B 54 24 28 4E 29 3A 50 52 49 4E 54 0D 0A ";T$(N):PRINT..
00ADF0: 32 38 30 30 20 4E 45 58 54 20 4A 3A 4E 45 58 54 2800 NEXT J:NEXT
00AE00: 20 4E 0D 0A 32 38 31 30 20 47 4F 53 55 42 20 33 N..2810 GOSUB 3
00AE10: 34 38 30 3A 47 4F 54 4F 20 B4 13 32 33 33 30 0D 480:GOTO ..2330.
00AE20: 0A 32 38 32 30 20 4C 45 47 3D 31 3A 43 4C 53 3A .2820 LEG=1:CLS:
00AE30: 4C 4F 43 41 54 45 20 31 30 2C 31 3A 50 52 49 4E LOCATE 10,1:PRIN
00AE40: 54 22 46 49 58 54 55 52 45 20 4C 49 53 54 53 22 T"FIXTURE LISTS"
00AE50: 54 41 42 28 31 29 22 20 22 54 41 42 28 31 30 20 TAB(1)" "TAB(10
00AE60: 29 20 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ) "-------------
00AE70: 22 0D 0A 32 38 33 30 20 50 52 49 4E 54 3A 50 52 "..2830 PRINT:PR
00AE80: 49 4E 54 22 3E 48 41 4C 46 20 31 22 3A 72 64 3D INT">HALF 1":rd=
00AE90: 31 32 3A 46 4F 52 20 6A 3D 31 20 54 4F 20 72 64 12:FOR j=1 TO rd
00AEA0: 3A 4C 4F 43 41 54 45 20 31 2C 6A 2B 35 3A 50 52 :LOCATE 1,j+5:PR
00AEB0: 49 4E 54 20 6C 65 67 20 41 4E 44 20 72 64 3D 31 INT leg AND rd=1
00AEC0: 32 3B 3A 50 52 49 4E 54 20 22 20 2D 20 22 3B 74 2;:PRINT " - ";t
00AED0: 24 28 79 28 31 2C 6A 29 29 54 41 42 28 32 30 29 $(y(1,j))TAB(20)
00AEE0: 22 20 20 56 20 20 22 3B 74 24 28 79 28 32 2C 6A " V ";t$(y(2,j
00AEF0: 29 29 3A 49 46 20 6C 65 67 3D 31 20 54 48 45 4E )):IF leg=1 THEN
00AF00: 20 6C 65 67 3D 32 3A 47 4F 54 4F 20 32 38 35 30 leg=2:GOTO 2850
00AF10: 0D 0A 32 38 34 30 20 6C 65 67 3D 41 E4 31 0D 0A ..2840 leg=A.1..
00AF20: 32 38 35 30 20 49 46 20 6A 3C 71 20 54 48 45 4E 2850 IF j<q THEN
00AF30: 20 50 45 4E 20 32 3A 4C 4F 43 41 54 45 20 31 37 PEN 2:LOCATE 17
00AF40: 2C 6A 2B 35 3A 50 52 49 4E 54 20 67 28 31 2C 6A ,j+5:PRINT g(1,j
00AF50: 29 3B 22 2D 22 3B 67 28 32 2C 6A 29 3A 50 45 4E );"-";g(2,j):PEN
00AF60: 20 31 0D 0A 32 38 36 30 20 4E 45 58 54 20 6A 0D 1..2860 NEXT j.
00AF70: 0A 32 38 37 30 20 49 46 20 72 64 3D 31 32 20 54 .2870 IF rd=12 T
00AF80: 48 45 4E 20 47 4F 53 55 42 20 33 34 38 30 3A 43 HEN GOSUB 3480:C
00AF90: 4C 53 3A 50 52 49 4E 54 20 22 3E 48 41 4C 46 20 LS:PRINT ">HALF
00AFA0: 32 22 3A 46 4F 52 20 6A 3D 31 33 20 54 4F 20 32 2":FOR j=13 TO 2
00AFB0: 34 3A 4C 4F 43 41 54 45 20 31 2C 6A 2D 37 3A 50 4:LOCATE 1,j-7:P
00AFC0: 45 4E 20 32 3A 50 52 49 4E 54 20 6C 65 67 3A 4C EN 2:PRINT leg:L
00AFD0: 4F 43 41 54 45 20 33 2C 6A 2D 37 3A 50 52 49 4E OCATE 3,j-7:PRIN
00AFE0: 54 22 2D 22 3B 74 24 28 79 28 31 2C 6A 29 29 54 T"-";t$(y(1,j))T
00AFF0: 41 42 28 31 38 29 22 20 20 56 20 20 22 3B 74 24 AB(18)" V ";t$
00B000: 28 79 28 32 2C 6A 29 29 3A 49 46 20 6C 65 67 3D (y(2,j)):IF leg=
00B010: 31 20 54 48 45 4E 20 6C 65 67 3D 32 3A 5F 1A 47 1 THEN leg=2:_.G
00B020: 4F 54 4F 20 32 38 39 30 0D 0A 32 38 38 30 20 6C OTO 2890..2880 l
00B030: 65 67 3D 31 0D 0A 32 38 39 30 20 49 46 20 6A 3C eg=1..2890 IF j<
00B040: 71 20 54 48 45 4E 20 50 45 4E 20 32 3A 3A 4C 4F q THEN PEN 2::LO
00B050: 43 41 54 45 20 31 36 2C 4A 2D 37 3A 50 52 49 4E CATE 16,J-7:PRIN
00B060: 54 20 67 28 31 2C 6A 29 3B 22 2D 22 3B 67 28 32 T g(1,j);"-";g(2
00B070: 2C 6A 29 3A 50 45 4E 20 31 0D 0A 32 39 30 30 20 ,j):PEN 1..2900
00B080: 4E 45 58 54 20 6A 3A 47 4F 53 55 42 20 33 34 38 NEXT j:GOSUB 348
00B090: 30 3A 47 4F 54 4F 20 32 33 33 30 0D 0A 32 39 31 0:GOTO 2330..291
00B0A0: 30 20 52 45 54 55 52 4E 0D 0A 32 39 32 30 20 53 0 RETURN..2920 S
00B0B0: 54 4F 50 0D 0A 32 39 33 30 20 47 4F 53 55 42 20 TOP..2930 GOSUB
00B0C0: 33 35 30 30 3A 47 4F 53 55 42 20 33 34 38 30 0D 3500:GOSUB 3480.
00B0D0: 0A 32 39 34 30 20 47 4F 53 55 42 20 33 38 34 30 .2940 GOSUB 3840
00B0E0: 0D 0A 32 39 35 30 20 49 46 20 73 63 6F 72 3D 73 ..2950 IF scor=s
00B0F0: 63 6F 20 54 48 45 4E 20 4C 4F 43 41 54 45 20 31 co THEN LOCATE 1
00B100: 31 2C 31 3A 50 52 49 4E 54 22 52 45 4C 41 59 20 1,1:PRINT"RELAY
00B110: 20 20 22 3A 47 4F 54 4F 20 31 31 30 0D 0A 32 70 ":GOTO 110..2p
00B120: CD FF FF FF FF 11 76 09 F6 04 57 04 F7 04 6C 09 ......v...W...l.
00B130: 01 10 08 11 00 07 01 00 2C 53 4F 43 43 45 00 00 ........,SOCCE..
00B140: 00 00 00 00 00 00 00 00 00 09 00 16 00 08 7C 9E ..............|.
00B150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B200: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B210: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B220: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B230: 00 00 00 00 00 00 00 00 00 55 B7 FF FF FF FF 11 .........U......
00B240: 77 09 F6 04 57 04 02 05 5C 09 01 10 08 63 0B 15 w...W...\....c..
00B250: 08 00 16 39 36 30 20 49 46 20 71 3D 31 20 54 48 ...960 IF q=1 TH
00B260: 45 4E 20 49 46 20 73 63 6F 72 3E 73 63 6F 20 54 EN IF scor>sco T
00B270: 48 45 4E 20 66 69 31 3D 61 31 0D 0A 32 39 37 30 HEN fi1=a1..2970
00B280: 20 49 46 20 71 3D 31 20 54 48 45 4E 20 49 46 20 IF q=1 THEN IF
00B290: 73 63 6F 72 3C 73 63 6F 20 54 48 45 4E 20 66 69 scor<sco THEN fi
00B2A0: 31 3D 62 32 0D 0A 32 39 38 30 20 49 46 20 71 3D 1=b2..2980 IF q=
00B2B0: 32 20 54 48 45 4E 20 49 46 20 73 63 6F 72 3E 73 2 THEN IF scor>s
00B2C0: 63 6F 20 54 48 45 4E 20 66 69 32 3D 61 32 0D 0A co THEN fi2=a2..
00B2D0: 32 39 39 30 20 49 46 20 71 3D 32 20 54 48 45 4E 2990 IF q=2 THEN
00B2E0: 20 49 46 20 73 63 6F 72 3C 73 63 6F 20 54 48 45 IF scor<sco THE
00B2F0: 4E 20 66 69 32 3D 62 31 0D 0A 33 30 30 30 20 47 N fi2=b1..3000 G
00B300: 4F 54 4F 20 31 34 39 30 0D 0A 33 30 31 30 20 43 OTO 1490..3010 C
00B310: 4C 53 3A 50 41 50 45 52 20 32 3A 50 45 4E 20 30 LS:PAPER 2:PEN 0
00B320: 3A 4C 4F 43 41 54 45 20 35 2C 31 3A 50 52 49 4E :LOCATE 5,1:PRIN
00B330: 54 20 22 4D 20 41 20 4E 20 41 20 47 20 45 20 52 T "M A N A G E R
00B340: 20 53 20 20 20 20 52 20 41 20 54 20 49 20 4E 20 S R A T I N
00B350: 47 20 53 8F 14 22 3A 50 45 4E 20 32 3A 50 41 50 G S..":PEN 2:PAP
00B360: 45 52 20 30 0D 0A 33 30 32 30 20 46 4F 52 20 6E ER 0..3020 FOR n
00B370: 3D 31 20 54 4F 20 34 0D 0A 33 30 33 30 20 50 45 =1 TO 4..3030 PE
00B380: 4E 20 35 3A 4C 4F 43 41 54 45 20 35 2C 6E 2A 32 N 5:LOCATE 5,n*2
00B390: 2B 32 3A 4E 4F 3D 58 28 31 2C 4E 2C 38 29 3A 50 +2:NO=X(1,N,8):P
00B3A0: 52 49 4E 54 20 74 24 28 6E 4F 29 3A 50 45 4E 20 RINT t$(nO):PEN
00B3B0: 37 3A 4C 4F 43 41 54 45 20 32 30 2C 4E 2A 32 2B 7:LOCATE 20,N*2+
00B3C0: 32 3A 50 52 49 4E 54 20 72 24 28 6E 4F 29 0D 0A 2:PRINT r$(nO)..
00B3D0: 33 30 34 30 20 72 61 74 3D 35 30 2B 28 28 78 28 3040 rat=50+((x(
00B3E0: 31 2C 6E 2C 35 29 2D 78 28 31 2C 6E 2C 36 29 29 1,n,5)-x(1,n,6))
00B3F0: 2A 32 29 2B 28 78 28 31 2C 6E 2C 37 29 2D 31 29 *2)+(x(1,n,7)-1)
00B400: 2A 33 3A 49 46 20 72 61 74 3E 31 30 30 20 54 48 *3:IF rat>100 TH
00B410: 45 4E 20 72 61 74 3D 31 30 30 0D 0A 33 30 35 30 EN rat=100..3050
00B420: 20 49 46 20 72 61 74 3C 31 20 54 48 45 4E 20 72 IF rat<1 THEN r
00B430: 61 74 3D 31 0D 0A 33 30 36 30 20 50 45 4E 20 33 at=1..3060 PEN 3
00B440: 3A 4C 4F 43 41 54 45 20 33 31 2C 4E 2A 32 2B 32 :LOCATE 31,N*2+2
00B450: 3A 50 52 49 4E 23 6B 54 20 52 41 54 22 20 25 22 :PRIN#kT RAT" %"
00B460: 0D 0A 33 30 37 30 20 4E 45 58 54 20 6E 0D 0A 33 ..3070 NEXT n..3
00B470: 30 38 30 20 46 4F 52 20 6E 3D 31 20 54 4F 20 34 080 FOR n=1 TO 4
00B480: 0D 0A 33 30 39 30 20 50 45 4E 20 35 3A 4C 4F 43 ..3090 PEN 5:LOC
00B490: 41 54 45 20 35 2C 28 6E 2B 34 29 2A 32 2B 32 3A ATE 5,(n+4)*2+2:
00B4A0: 4E 4F 3D 58 28 32 2C 4E 2C 38 29 3A 50 52 49 4E NO=X(2,N,8):PRIN
00B4B0: 54 20 74 24 28 4E 4F 29 3A 50 45 4E 20 37 3A 4C T t$(NO):PEN 7:L
00B4C0: 4F 43 41 54 45 20 32 30 2C 28 4E 2B 34 29 2A 32 OCATE 20,(N+4)*2
00B4D0: 2B 32 3A 50 52 49 4E 54 20 72 24 28 4E 4F 29 0D +2:PRINT r$(NO).
00B4E0: 0A 33 31 30 30 20 72 61 74 3D 35 30 2B 28 28 78 .3100 rat=50+((x
00B4F0: 28 32 2C 6E 2C 35 29 2D 78 28 32 2C 6E 2C 36 29 (2,n,5)-x(2,n,6)
00B500: 29 2A 32 29 2B 28 78 28 32 2C 6E 2C 37 29 2D 31 )*2)+(x(2,n,7)-1
00B510: 29 2A 33 3A 49 46 20 72 61 74 3E 31 30 30 20 54 )*3:IF rat>100 T
00B520: 48 45 4E 20 72 61 74 3D 31 30 30 0D 0A 33 31 31 HEN rat=100..311
00B530: 30 20 49 46 20 72 61 74 3C 31 20 54 48 45 4E 20 0 IF rat<1 THEN
00B540: 72 61 74 3D 31 0D 0A 33 31 32 30 20 50 45 4E 20 rat=1..3120 PEN
00B550: 33 3A 4C 4F 43 41 54 36 89 45 20 33 31 2C 28 4E 3:LOCAT6.E 31,(N
00B560: 2B 34 29 2A 32 2B 32 3A 50 52 49 4E 54 20 52 41 +4)*2+2:PRINT RA
00B570: 54 22 20 25 22 0D 0A 33 31 33 30 20 4E 45 58 54 T" %"..3130 NEXT
00B580: 20 6E 3A 47 4F 53 55 42 20 33 34 38 30 3A 52 45 n:GOSUB 3480:RE
00B590: 54 55 52 4E 0D 0A 33 31 34 30 20 49 46 20 76 61 TURN..3140 IF va
00B5A0: 6A 31 3E 31 30 30 20 54 48 45 4E 20 76 61 6A 31 j1>100 THEN vaj1
00B5B0: 3D 31 30 30 0D 0A 33 31 35 30 20 49 46 20 76 61 =100..3150 IF va
00B5C0: 6A 31 3C 31 20 54 48 45 4E 20 76 61 6A 31 3D 31 j1<1 THEN vaj1=1
00B5D0: 0D 0A 33 31 36 30 20 49 46 20 76 61 6A 32 3E 31 ..3160 IF vaj2>1
00B5E0: 30 30 20 54 48 45 4E 20 76 61 6A 32 3D 31 30 30 00 THEN vaj2=100
00B5F0: 0D 0A 33 31 37 30 20 49 46 20 76 61 6A 32 3C 31 ..3170 IF vaj2<1
00B600: 20 54 48 45 4E 20 76 61 6A 32 3D 31 0D 0A 33 31 THEN vaj2=1..31
00B610: 38 30 20 52 45 54 55 52 4E 0D 0A 33 31 39 30 20 80 RETURN..3190
00B620: 43 4C 53 3A 50 52 49 4E 54 20 54 24 28 54 4D 4E CLS:PRINT T$(TMN
00B630: 29 3B 22 20 20 20 50 45 52 46 4F 52 4D 41 4E 43 );" PERFORMANC
00B640: 45 22 3A 46 4F 52 20 4E 3D 31 20 54 4F 20 31 30 E":FOR N=1 TO 10
00B650: 3A 4C 4F 43 41 54 45 20 31 98 AD 2C 4E 2B 34 3A :LOCATE 1..,N+4:
00B660: 50 52 49 4E 54 20 4E 3B 22 20 2D 20 22 4E 24 28 PRINT N;" - "N$(
00B670: 54 4D 4E 2C 4E 29 3B 54 41 42 28 31 38 29 3B 49 TMN,N);TAB(18);I
00B680: 4E 54 28 48 28 31 2C 54 4D 4E 2C 4E 29 29 3A 4E NT(H(1,TMN,N)):N
00B690: 45 58 54 20 4E 0D 0A 33 32 30 30 20 4D 24 3D 22 EXT N..3200 M$="
00B6A0: 53 45 4C 45 43 54 20 50 4C 41 59 45 52 20 54 4F SELECT PLAYER TO
00B6B0: 20 54 52 41 44 45 20 57 49 54 48 3A 2D 22 3A 47 TRADE WITH:-":G
00B6C0: 4F 53 55 42 20 33 37 32 30 3A 74 64 3D 56 41 4C OSUB 3720:td=VAL
00B6D0: 28 6C 24 29 0D 0A 33 32 31 30 20 49 46 20 74 64 (l$)..3210 IF td
00B6E0: 3C 31 20 4F 52 20 74 64 3E 31 30 20 54 48 45 4E <1 OR td>10 THEN
00B6F0: 20 47 4F 54 4F 20 33 32 30 30 0D 0A 33 32 32 30 GOTO 3200..3220
00B700: 20 65 24 3D 6E 24 28 74 77 6E 2C 74 64 29 0D 0A e$=n$(twn,td)..
00B710: 33 32 33 30 20 43 4C 53 3A 46 4F 52 20 6E 3D 31 3230 CLS:FOR n=1
00B720: 20 54 4F 20 38 3A 4C 4F 43 41 54 45 20 31 2C 6E TO 8:LOCATE 1,n
00B730: 2B 34 3A 50 52 49 4E 54 20 6E 3B 22 2D 22 3B 74 +4:PRINT n;"-";t
00B740: 24 28 6E 29 3A 4E 45 58 54 20 6E 0D 0A 33 32 34 $(n):NEXT n..324
00B750: 30 20 6D 24 3D 22 53 45 4C 45 43 C0 7E 54 20 54 0 m$="SELEC.~T T
00B760: 45 41 4D 20 54 4F 20 54 4F 20 54 52 41 44 45 20 EAM TO TO TRADE
00B770: 57 49 54 48 3A 2D 22 3A 47 4F 53 55 42 20 33 37 WITH:-":GOSUB 37
00B780: 32 30 3A 54 52 3D 56 41 4C 28 4C 24 29 3A 49 46 20:TR=VAL(L$):IF
00B790: 20 54 52 3C 31 20 4F 52 20 54 52 3E 38 20 54 48 TR<1 OR TR>8 TH
00B7A0: 45 4E 20 47 4F 54 4F 20 33 32 34 30 0D 0A 33 32 EN GOTO 3240..32
00B7B0: 35 30 20 49 46 20 54 52 3D 53 28 54 4D 4E 29 20 50 IF TR=S(TMN)
00B7C0: 54 48 45 4E 20 47 4F 54 4F 20 33 32 34 30 0D 0A THEN GOTO 3240..
00B7D0: 33 32 36 30 20 4C 4F 43 41 54 45 20 31 2C 31 3A 3260 LOCATE 1,1:
00B7E0: 50 52 49 4E 54 20 54 24 28 54 52 29 3B 22 20 20 PRINT T$(TR);"
00B7F0: 50 45 52 46 4F 52 4D 41 4E 43 45 22 3A 46 4F 52 PERFORMANCE":FOR
00B800: 20 4E 3D 31 20 54 4F 20 31 30 3A 4C 4F 43 41 54 N=1 TO 10:LOCAT
00B810: 45 20 31 2C 4E 2B 33 3A 50 52 49 4E 54 20 4E 3B E 1,N+3:PRINT N;
00B820: 22 20 2D 20 22 3B 4E 24 28 54 52 2C 4E 29 3B 54 " - ";N$(TR,N);T
00B830: 41 42 28 31 36 29 3B 49 4E 54 28 48 28 31 2C 54 AB(16);INT(H(1,T
00B840: 52 2C 4E 29 29 3A 4E 45 58 54 20 4E 0D 0A 33 32 R,N)):NEXT N..32
00B850: 37 30 20 4D 24 3D 22 53 45 4C 45 43 54 23 F2 20 70 M$="SELECT#.
00B860: 50 4C 41 59 45 52 20 54 4F 20 54 52 41 44 45 20 PLAYER TO TRADE
00B870: 22 2B 45 24 2B 22 20 57 49 54 48 20 28 4F 3D 43 "+E$+" WITH (O=C
00B880: 41 4E 43 45 4C 29 22 3A 47 4F 53 55 42 20 33 37 ANCEL)":GOSUB 37
00B890: 32 30 3A 53 45 3D 56 41 4C 28 4C 24 29 0D 0A 33 20:SE=VAL(L$)..3
00B8A0: 32 38 30 20 49 46 20 53 45 3C 30 20 4F 52 20 53 280 IF SE<0 OR S
00B8B0: 45 3E 31 30 20 54 48 45 4E 20 47 4F 54 4F 20 33 E>10 THEN GOTO 3
00B8C0: 32 37 30 0D 0A 33 32 39 30 20 49 46 20 53 45 3D 270..3290 IF SE=
00B8D0: 30 20 54 48 45 4E 20 47 4F 54 4F 20 32 33 33 30 0 THEN GOTO 2330
00B8E0: 0D 0A 33 33 30 30 20 49 3D 35 3A 49 3D 49 4E 54 ..3300 I=5:I=INT
00B8F0: 28 52 4E 44 28 31 2B 28 48 28 31 2C 54 4D 4E 2C (RND(1+(H(1,TMN,
00B900: 54 44 29 29 29 29 0D 0A 33 33 31 30 20 49 46 20 TD))))..3310 IF
00B910: 48 28 31 2C 54 52 2C 53 45 29 3D 30 20 54 48 45 H(1,TR,SE)=0 THE
00B920: 4E 20 49 3D 31 0D 0A 33 33 32 30 20 43 4C 53 3A N I=1..3320 CLS:
00B930: 4C 4F 43 41 54 45 20 39 2C 31 3A 50 52 49 4E 54 LOCATE 9,1:PRINT
00B940: 20 22 50 4F 53 53 49 42 4C 45 20 44 45 41 4C 22 "POSSIBLE DEAL"
00B950: 54 41 42 28 38 29 22 2D 2D 2D 2D 2D 2D 2D 2D 63 TAB(8)"--------c
00B960: 0D 2D 2D 2D 2D 2D 2D 22 3A 4C 4F 43 41 54 45 20 .------":LOCATE
00B970: 31 30 2C 33 3A 3A 50 52 49 4E 54 20 4E 24 28 54 10,3::PRINT N$(T
00B980: 4D 4E 2C 54 44 29 3B 22 20 4F 46 20 22 3B 54 24 MN,TD);" OF ";T$
00B990: 28 54 4D 4E 29 3A 4C 4F 43 41 54 45 20 31 35 2C (TMN):LOCATE 15,
00B9A0: 35 3A 50 52 49 4E 54 20 22 46 4F 52 22 3A 4C 4F 5:PRINT "FOR":LO
00B9B0: 43 41 54 45 20 31 30 2C 37 3A 50 52 49 4E 54 20 CATE 10,7:PRINT
00B9C0: 4E 24 28 54 52 2C 53 45 29 3B 22 20 4F 46 20 22 N$(TR,SE);" OF "
00B9D0: 3B 54 24 28 54 52 29 0D 0A 33 33 33 30 20 46 4F ;T$(TR)..3330 FO
00B9E0: 52 20 4E 3D 31 20 54 4F 20 50 4C 59 3A 49 46 20 R N=1 TO PLY:IF
00B9F0: 53 28 4E 29 3D 54 52 20 54 48 45 4E 20 49 3D 31 S(N)=TR THEN I=1
00BA00: 3A 50 52 49 4E 54 20 28 52 24 28 54 52 29 29 54 :PRINT (R$(TR))T
00BA10: 41 42 28 31 29 22 44 4F 20 59 4F 55 20 41 43 43 AB(1)"DO YOU ACC
00BA20: 45 50 54 20 54 48 49 53 20 44 45 41 4C 28 59 2F EPT THIS DEAL(Y/
00BA30: 4E 29 22 54 41 42 28 31 29 22 3A 2D 22 3A 49 4E N)"TAB(1)":-":IN
00BA40: 50 55 54 20 4C 24 3A 49 46 20 4C 24 3D 22 59 22 PUT L$:IF L$="Y"
00BA50: 20 4F 52 20 4C 24 3D 22 79 22 20 54 48 45 4E 20 OR L$="y" THEN
00BA60: 49 36 31 FF FF FF FF 11 78 09 A6 04 A6 04 F7 04 I61.....x.......
00BA70: 6E 09 01 10 08 10 00 07 01 00 2C 53 4F 43 43 45 n.........,SOCCE
00BA80: 00 00 00 00 00 00 00 00 00 00 00 0A 00 16 00 08 ................
00BA90: 7C 9E 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |...............
00BAA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BAB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BAC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BAD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BAE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BAF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB70: 00 00 00 00 00 00 00 00 00 00 00 6C 8B FF FF FF ...........l....
00BB80: FF 11 78 09 F6 04 57 04 03 05 5B 09 01 10 08 64 ..x...W...[....d
00BB90: 0B 15 08 00 16 3D 30 3A 47 4F 54 4F 20 33 33 35 .....=0:GOTO 335
00BBA0: 30 20 0D 0A 33 33 34 30 20 4E 45 58 54 20 4E 0D 0 ..3340 NEXT N.
00BBB0: 0A 33 33 35 30 20 47 4F 53 55 42 20 33 34 38 30 .3350 GOSUB 3480
00BBC0: 3A 49 46 20 49 3C 31 20 54 48 45 4E 20 43 4C 53 :IF I<1 THEN CLS
00BBD0: 3A 4C 4F 43 41 54 45 20 31 33 2C 35 3A 50 52 49 :LOCATE 13,5:PRI
00BBE0: 4E 54 22 54 48 45 20 44 45 41 4C 22 3A 50 52 49 NT"THE DEAL":PRI
00BBF0: 4E 54 3A 50 52 49 4E 54 20 54 41 42 28 31 32 29 NT:PRINT TAB(12)
00BC00: 22 48 41 53 20 42 45 45 4E 22 3A 50 52 49 4E 54 "HAS BEEN":PRINT
00BC10: 3A 50 52 49 4E 54 20 54 41 42 28 31 32 29 22 41 :PRINT TAB(12)"A
00BC20: 43 43 45 50 54 45 44 22 3A 47 4F 54 4F 20 33 33 CCEPTED":GOTO 33
00BC30: 37 30 0D 0A 33 33 36 30 20 43 4C 53 3A 4C 4F 43 70..3360 CLS:LOC
00BC40: 41 54 45 20 31 33 2C 35 3A 50 52 49 4E 54 22 2E ATE 13,5:PRINT".
00BC50: 53 4F 52 52 59 2E 2E 22 54 41 42 28 31 33 29 22 SORRY.."TAB(13)"
00BC60: 54 48 45 20 44 45 41 4C 22 54 41 42 28 31 34 29 THE DEAL"TAB(14)
00BC70: 22 41 53 20 4E 4F 54 22 54 41 42 28 31 35 29 22 "AS NOT"TAB(15)"
00BC80: 42 45 45 4E 22 54 41 42 28 31 33 29 22 41 43 43 BEEN"TAB(13)"ACC
00BC90: 45 50 54 45 44 70 71 22 3A 47 4F 53 55 42 20 33 EPTEDpq":GOSUB 3
00BCA0: 34 38 30 3A 47 4F 54 4F 20 32 33 33 30 0D 0A 33 480:GOTO 2330..3
00BCB0: 33 37 30 20 46 24 3D 4E 24 28 54 52 2C 53 45 29 370 F$=N$(TR,SE)
00BCC0: 3A 48 24 3D 4B 24 28 54 4D 4E 2C 54 44 29 3A 49 :H$=K$(TMN,TD):I
00BCD0: 24 3D 4B 24 28 54 52 2C 53 45 29 3A 50 45 46 3D $=K$(TR,SE):PEF=
00BCE0: 48 28 31 2C 54 4D 4E 2C 54 44 29 3A 50 4F 46 3D H(1,TMN,TD):POF=
00BCF0: 48 28 31 2C 54 52 2C 53 45 29 3A 47 47 47 3D 49 H(1,TR,SE):GGG=I
00BD00: 28 54 4D 4E 2C 54 44 29 3A 47 47 4A 3D 49 28 54 (TMN,TD):GGJ=I(T
00BD10: 52 2C 53 45 29 0D 0A 33 33 38 30 20 53 4B 49 31 R,SE)..3380 SKI1
00BD20: 3D 5A 28 54 4D 4E 2C 54 44 29 3A 53 4B 49 32 3D =Z(TMN,TD):SKI2=
00BD30: 5A 28 54 52 2C 53 45 29 3A 5A 28 54 52 2C 53 45 Z(TR,SE):Z(TR,SE
00BD40: 29 3D 53 4B 49 31 3A 5A 28 54 4D 4E 2C 54 44 29 )=SKI1:Z(TMN,TD)
00BD50: 3D 53 4B 49 32 0D 0A 33 33 39 30 20 50 45 46 32 =SKI2..3390 PEF2
00BD60: 3D 48 28 32 2C 54 4D 4E 2C 54 44 29 3A 50 4F 46 =H(2,TMN,TD):POF
00BD70: 32 3D 48 28 32 2C 54 52 2C 53 45 29 0D 0A 33 34 2=H(2,TR,SE)..34
00BD80: 30 30 20 45 47 3D 4B 28 54 4D 4E 2C 54 44 29 3A 00 EG=K(TMN,TD):
00BD90: 45 4A 3D 4B 28 54 52 0C 14 2C 53 45 29 3A 4F 24 EJ=K(TR..,SE):O$
00BDA0: 3D 47 24 28 54 4D 4E 2C 54 44 29 3A 50 24 3D 47 =G$(TMN,TD):P$=G
00BDB0: 24 28 54 52 2C 53 45 29 0D 0A 33 34 31 30 20 4E $(TR,SE)..3410 N
00BDC0: 24 28 54 52 2C 53 45 29 3D 45 24 3A 4E 24 28 54 $(TR,SE)=E$:N$(T
00BDD0: 4D 4E 2C 54 44 29 3D 46 24 3A 4B 24 28 54 4D 4E MN,TD)=F$:K$(TMN
00BDE0: 2C 54 44 29 3D 49 24 3A 4B 24 28 54 52 2C 53 45 ,TD)=I$:K$(TR,SE
00BDF0: 29 3D 48 24 3A 48 28 31 2C 54 57 4E 2C 54 44 29 )=H$:H(1,TWN,TD)
00BE00: 3D 50 4F 46 3A 48 28 31 2C 54 52 2C 53 45 29 3D =POF:H(1,TR,SE)=
00BE10: 50 45 46 3A 49 28 54 57 4E 2C 54 44 29 3D 47 47 PEF:I(TWN,TD)=GG
00BE20: 4A 3A 49 28 54 52 2C 53 45 29 3D 47 47 47 0D 0A J:I(TR,SE)=GGG..
00BE30: 33 34 32 30 20 4B 28 54 4D 4E 2C 54 44 29 3D 45 3420 K(TMN,TD)=E
00BE40: 4A 3A 4B 28 54 52 2C 53 45 29 3D 45 47 3A 47 24 J:K(TR,SE)=EG:G$
00BE50: 28 54 4D 4E 2C 54 44 29 3D 50 24 3A 47 24 28 54 (TMN,TD)=P$:G$(T
00BE60: 52 2C 53 45 29 3D 4F 24 0D 0A 33 34 33 30 20 48 R,SE)=O$..3430 H
00BE70: 28 32 2C 54 4D 4E 2C 54 44 29 3D 50 4F 46 32 3A (2,TMN,TD)=POF2:
00BE80: 48 28 32 2C 54 52 2C 53 45 29 3D 50 45 46 32 0D H(2,TR,SE)=PEF2.
00BE90: 0A 33 34 34 30 20 47 4F 53 C7 16 55 42 20 33 34 .3440 GOS..UB 34
00BEA0: 38 30 3A 47 4F 54 4F 20 32 33 33 30 0D 0A 33 34 80:GOTO 2330..34
00BEB0: 35 30 20 48 41 31 3D 31 3A 48 41 32 3D 31 3A 5A 50 HA1=1:HA2=1:Z
00BEC0: 59 58 3D 79 28 31 2C 51 29 3A 59 5A 58 3D 59 28 YX=y(1,Q):YZX=Y(
00BED0: 32 2C 51 29 3A 52 45 54 55 52 4E 0D 0A 33 34 36 2,Q):RETURN..346
00BEE0: 30 20 43 4C 53 3A 46 4F 52 20 4E 3D 31 20 54 4F 0 CLS:FOR N=1 TO
00BEF0: 20 31 30 3A 4C 4F 43 41 54 45 20 31 2C 4E 2B 32 10:LOCATE 1,N+2
00BF00: 3A 50 52 49 4E 54 20 4E 3B 54 41 42 28 35 29 3B :PRINT N;TAB(5);
00BF10: 4E 24 28 54 4D 4E 2C 4E 29 3B 47 24 28 54 4D 4E N$(TMN,N);G$(TMN
00BF20: 2C 4E 29 3B 54 41 42 28 31 36 29 3B 4B 28 54 4D ,N);TAB(16);K(TM
00BF30: 4E 2C 4E 29 3A 4E 45 58 54 20 4E 0D 0A 33 34 37 N,N):NEXT N..347
00BF40: 30 20 4C 4F 43 41 54 45 20 31 2C 31 3A 50 52 49 0 LOCATE 1,1:PRI
00BF50: 4E 54 22 4E 4F 20 20 22 3B 54 24 28 54 4D 4E 29 NT"NO ";T$(TMN)
00BF60: 3B 54 41 42 28 31 37 29 22 50 53 22 54 41 42 28 ;TAB(17)"PS"TAB(
00BF70: 31 29 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 1)"-------------
00BF80: 2D 2D 2D 2D 2D 2D 22 3A 47 4F 53 55 42 20 33 34 ------":GOSUB 34
00BF90: 38 30 3A 52 45 54 55 52 4E 0D 0A 6E 2A 33 34 38 80:RETURN..n*348
00BFA0: 30 20 4C 4F 43 41 54 45 20 31 2C 32 34 3A 50 52 0 LOCATE 1,24:PR
00BFB0: 49 4E 54 20 53 50 41 43 45 24 28 34 30 29 3A 53 INT SPACE$(40):S
00BFC0: 4F 55 4E 44 20 31 2C 32 33 39 2C 36 3A 50 41 50 OUND 1,239,6:PAP
00BFD0: 45 52 20 34 3A 50 45 4E 20 31 3A 4C 4F 43 41 54 ER 4:PEN 1:LOCAT
00BFE0: 45 20 38 2C 32 34 3A 50 52 49 4E 54 22 50 52 45 E 8,24:PRINT"PRE
00BFF0: 53 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F SS ANY KEY TO CO
00C000: 4E 54 49 4E 55 45 22 3A 57 48 49 4C 45 20 49 4E NTINUE":WHILE IN
00C010: 4B 45 59 24 3D 22 22 3A 57 45 4E 44 0D 0A 33 34 KEY$="":WEND..34
00C020: 39 30 20 52 45 54 55 52 4E 0D 0A 33 35 30 30 20 90 RETURN..3500
00C030: 46 4F 52 20 4E 3D 31 20 54 4F 20 34 3A 46 4F 52 FOR N=1 TO 4:FOR
00C040: 20 4A 3D 31 20 54 4F 20 34 0D 0A 33 35 31 30 20 J=1 TO 4..3510
00C050: 49 46 20 58 28 31 2C 4E 2C 37 29 3E 58 28 31 2C IF X(1,N,7)>X(1,
00C060: 4A 2C 37 29 20 54 48 45 4E 20 4A 28 4E 29 3D 4A J,7) THEN J(N)=J
00C070: 28 4E 29 2B 31 3A 47 4F 54 4F 20 33 35 34 30 0D (N)+1:GOTO 3540.
00C080: 0A 33 35 32 30 20 49 46 20 78 28 31 2C 6E 2C 37 .3520 IF x(1,n,7
00C090: 29 3D 78 28 31 2C 4A 2C 37 29 20 41 4E 8F 8F 44 )=x(1,J,7) AN..D
00C0A0: 20 28 58 28 31 2C 4E 2C 35 29 2D 58 28 31 2C 4E (X(1,N,5)-X(1,N
00C0B0: 2C 36 29 29 3E 28 58 28 31 2C 4A 2C 35 29 2D 58 ,6))>(X(1,J,5)-X
00C0C0: 28 31 2C 4A 2C 36 29 29 20 54 48 45 4E 20 4A 28 (1,J,6)) THEN J(
00C0D0: 4E 29 3D 4A 28 4E 29 2B 31 3A 47 4F 54 4F 20 33 N)=J(N)+1:GOTO 3
00C0E0: 35 34 30 0D 0A 33 35 33 30 20 49 46 20 58 28 31 540..3530 IF X(1
00C0F0: 2C 4E 2C 37 29 3D 58 28 31 2C 4A 2C 37 29 20 41 ,N,7)=X(1,J,7) A
00C100: 4E 44 20 58 28 31 2C 4E 2C 35 29 3E 58 28 31 2C ND X(1,N,5)>X(1,
00C110: 4A 2C 35 29 20 54 48 45 4E 20 4A 28 4E 29 3D 4A J,5) THEN J(N)=J
00C120: 28 4E 29 2B 31 0D 0A 33 35 34 30 20 4E 45 58 54 (N)+1..3540 NEXT
00C130: 20 4A 3A 4E 45 58 54 20 4E 0D 0A 33 35 35 30 20 J:NEXT N..3550
00C140: 46 4F 52 20 4E 3D 31 20 54 4F 20 34 3A 46 4F 52 FOR N=1 TO 4:FOR
00C150: 20 4A 3D 31 20 54 4F 20 34 3A 49 46 20 58 28 32 J=1 TO 4:IF X(2
00C160: 2C 4E 2C 37 29 3E 58 28 32 2C 4A 2C 37 29 20 54 ,N,7)>X(2,J,7) T
00C170: 48 45 4E 20 4E 28 4E 29 3D 4E 28 4E 29 2B 31 3A HEN N(N)=N(N)+1:
00C180: 47 4F 54 4F 20 33 35 38 30 0D 0A 33 35 36 30 20 GOTO 3580..3560
00C190: 49 46 20 58 28 32 2C 4E 2C 37 29 3D 58 28 32 32 IF X(2,N,7)=X(22
00C1A0: 05 2C 4A 2C 37 29 20 41 4E 44 20 28 58 28 32 2C .,J,7) AND (X(2,
00C1B0: 4E 2C 35 29 2D 58 28 32 2C 4E 2C 36 29 29 3E 28 N,5)-X(2,N,6))>(
00C1C0: 58 28 32 2C 4A 2C 35 29 2D 58 28 32 2C 4A 2C 36 X(2,J,5)-X(2,J,6
00C1D0: 29 29 20 54 48 45 4E 20 4E 28 4E 29 3D 4E 28 4E )) THEN N(N)=N(N
00C1E0: 29 2B 31 3A 47 4F 54 4F 20 33 35 38 30 0D 0A 33 )+1:GOTO 3580..3
00C1F0: 35 37 30 20 49 46 20 58 28 32 2C 4E 2C 37 29 3D 570 IF X(2,N,7)=
00C200: 58 28 32 2C 4A 2C 37 29 20 41 4E 44 20 58 28 32 X(2,J,7) AND X(2
00C210: 2C 4E 2C 35 29 3E 58 28 32 2C 4A 2C 35 29 20 54 ,N,5)>X(2,J,5) T
00C220: 48 45 4E 20 4E 28 4E 29 3D 4E 28 4E 29 2B 31 0D HEN N(N)=N(N)+1.
00C230: 0A 33 35 38 30 20 4E 45 58 54 20 4A 3A 4E 45 58 .3580 NEXT J:NEX
00C240: 54 20 4E 0D 0A 33 35 39 30 20 47 4F 54 4F 20 33 T N..3590 GOTO 3
00C250: 36 39 30 0D 0A 33 36 30 30 20 46 4F 52 20 4E 3D 690..3600 FOR N=
00C260: 31 20 54 4F 20 34 3A 49 46 20 4A 28 4E 29 3D 31 1 TO 4:IF J(N)=1
00C270: 20 54 48 45 4E 20 41 31 3D 4E 0D 0A 33 36 31 30 THEN A1=N..3610
00C280: 20 4E 45 58 54 20 4E 0D 0A 33 36 32 30 20 46 4F NEXT N..3620 FO
00C290: 52 20 4E 3D 31 20 54 4F 20 34 3A 49 46 20 4A 28 R N=1 TO 4:IF J(
00C2A0: 4E 43 02 29 3D 32 20 54 48 45 4E 20 41 32 3D 4E NC.)=2 THEN A2=N
00C2B0: 0D 0A 33 36 33 30 20 4E 45 58 54 20 4E 0D 0A 33 ..3630 NEXT N..3
00C2C0: 36 34 30 20 46 4F 52 20 4E 3D 31 20 54 4F 20 34 640 FOR N=1 TO 4
00C2D0: 3A 49 46 20 4E 28 4E 29 3D 31 20 54 48 45 4E 20 :IF N(N)=1 THEN
00C2E0: 42 31 3D 4E 2B 34 0D 0A 33 36 35 30 20 4E 45 58 B1=N+4..3650 NEX
00C2F0: 54 20 4E 0D 0A 33 36 36 30 20 46 4F 52 20 4E 3D T N..3660 FOR N=
00C300: 31 20 54 4F 20 34 3A 4E 28 4E 29 3D 32 20 54 48 1 TO 4:N(N)=2 TH
00C310: 45 4E 20 42 32 3D 4E 2B 34 0D 0A 33 36 37 30 20 EN B2=N+4..3670
00C320: 4E 45 58 54 20 4E 0D 0A 33 36 38 30 20 52 45 54 NEXT N..3680 RET
00C330: 55 52 4E 0D 0A 33 36 39 30 20 46 4F 52 20 4E 3D URN..3690 FOR N=
00C340: 31 20 54 4F 20 34 3A 4A 28 4E 29 3D 34 2D 4A 28 1 TO 4:J(N)=4-J(
00C350: 4E 29 3A 4E 45 58 54 20 4E 0D 0A 33 37 30 30 20 N):NEXT N..3700
00C360: 46 4F 52 20 4E 3D 31 20 54 4F 20 34 3A 4E 28 4E FOR N=1 TO 4:N(N
00C370: 29 3D 34 2D 4E 28 4E 29 3A 4E 45 58 54 20 4E 0D )=4-N(N):NEXT N.
00C380: 0A 33 37 31 30 20 52 45 54 55 52 4E 0D 0A 33 37 .3710 RETURN..37
00C390: 32 30 20 4C 4F 43 41 54 45 20 31 2C 32 34 3A 50 20 LOCATE 1,24:P
00C3A0: 52 49 4E 16 67 FF FF FF FF 11 76 09 F6 04 57 04 RIN.g.....v...W.
00C3B0: F6 04 6A 09 01 10 08 11 00 07 01 00 2C 53 4F 43 ..j.........,SOC
00C3C0: 43 45 00 00 00 00 00 00 00 00 00 00 00 0B 00 16 CE..............
00C3D0: 00 08 7C 9E 00 00 00 00 00 00 00 00 00 00 00 00 ..|.............
00C3E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C3F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C400: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C410: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C420: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C430: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C440: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C450: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C4A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C4B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 8B 80 FF ................
00C4C0: FF FF FF 11 78 09 F6 04 57 04 04 05 5D 09 01 10 ....x...W...]...
00C4D0: 08 58 0B 15 08 00 16 54 20 53 50 41 43 45 24 28 .X.....T SPACE$(
00C4E0: 34 30 29 3A 4C 4F 43 41 54 45 20 31 2C 32 34 3A 40):LOCATE 1,24:
00C4F0: 50 52 49 4E 54 20 6D 24 3B 3A 49 4E 50 55 54 20 PRINT m$;:INPUT
00C500: 6C 24 3A 49 46 20 55 50 50 45 52 24 28 4C 24 29 l$:IF UPPER$(L$)
00C510: 3D 22 22 20 54 48 45 4E 20 47 4F 54 4F 20 33 37 ="" THEN GOTO 37
00C520: 32 30 0D 0A 33 37 33 30 20 46 4F 52 20 49 3D 31 20..3730 FOR I=1
00C530: 20 54 4F 20 4C 45 4E 28 4C 24 29 3A 6D 61 72 6B TO LEN(L$):mark
00C540: 24 3D 4D 49 44 24 28 6C 24 2C 69 2C 31 29 3A 49 $=MID$(l$,i,1):I
00C550: 46 20 41 53 43 28 6D 61 72 6B 24 29 3C 34 38 20 F ASC(mark$)<48
00C560: 4F 52 20 41 53 43 28 6D 61 72 6B 24 29 3E 35 37 OR ASC(mark$)>57
00C570: 20 54 48 45 4E 20 49 3D 39 38 0D 0A 33 37 34 30 THEN I=98..3740
00C580: 20 4E 45 58 54 20 49 3A 49 46 20 49 3D 39 39 20 NEXT I:IF I=99
00C590: 54 48 45 4E 20 47 4F 54 4F 20 33 37 32 30 0D 0A THEN GOTO 3720..
00C5A0: 33 37 35 30 20 52 45 54 55 52 4E 0D 0A 33 37 36 3750 RETURN..376
00C5B0: 30 20 49 4E 50 55 54 20 4C 24 3A 49 46 20 4C 45 0 INPUT L$:IF LE
00C5C0: 4E 28 4C 24 29 3E 4C 45 20 54 48 45 4E 20 33 37 N(L$)>LE THEN 37
00C5D0: 36 30 0D 0A 33 37 37 F8 34 30 20 52 45 54 55 52 60..377.40 RETUR
00C5E0: 4E 0D 0A 33 37 38 30 20 4C 4F 43 41 54 45 20 31 N..3780 LOCATE 1
00C5F0: 2C 32 34 3A 50 52 49 4E 54 20 53 50 43 28 34 30 ,24:PRINT SPC(40
00C600: 29 3A 4C 4F 43 41 54 45 20 31 2C 32 35 3A 50 52 ):LOCATE 1,25:PR
00C610: 49 4E 54 20 53 50 43 28 33 39 29 3A 52 45 54 55 INT SPC(39):RETU
00C620: 52 4E 0D 0A 33 37 39 30 20 44 41 54 41 20 41 31 RN..3790 DATA A1
00C630: 2C 42 32 2C 41 32 2C 42 31 0D 0A 33 38 30 30 20 ,B2,A2,B1..3800
00C640: 44 41 54 41 20 46 49 31 2C 46 49 32 0D 0A 33 38 DATA FI1,FI2..38
00C650: 31 30 20 52 45 54 55 52 4E 0D 0A 33 38 32 30 20 10 RETURN..3820
00C660: 53 54 4F 50 0D 0A 33 38 33 30 20 3A 0D 0A 33 38 STOP..3830 :..38
00C670: 34 30 20 54 53 54 3D 31 0D 0A 33 38 35 30 20 46 40 TST=1..3850 F
00C680: 4F 52 20 42 3D 31 20 54 4F 20 33 0D 0A 33 38 36 OR B=1 TO 3..386
00C690: 30 20 49 46 20 58 28 31 2C 42 2C 37 29 3C 58 28 0 IF X(1,B,7)<X(
00C6A0: 31 2C 28 42 2B 31 29 2C 37 29 20 54 48 45 4E 20 1,(B+1),7) THEN
00C6B0: 46 4F 52 20 41 3D 31 20 54 4F 20 38 3A 4D 56 3D FOR A=1 TO 8:MV=
00C6C0: 58 28 31 2C 42 2C 41 29 3A 4D 56 31 3D 58 28 31 X(1,B,A):MV1=X(1
00C6D0: 2C 42 2B 31 2C 41 29 3A 58 D0 66 28 31 2C 42 2B ,B+1,A):X.f(1,B+
00C6E0: 31 2C 41 29 3D 4D 56 3A 58 28 31 2C 42 2C 41 29 1,A)=MV:X(1,B,A)
00C6F0: 3D 4D 56 31 3A 4E 45 58 54 20 41 3A 54 53 54 3D =MV1:NEXT A:TST=
00C700: 30 0D 0A 33 38 37 30 20 4E 45 58 54 20 42 0D 0A 0..3870 NEXT B..
00C710: 33 38 38 30 20 49 46 20 54 53 54 3D 30 20 54 48 3880 IF TST=0 TH
00C720: 45 4E 20 47 4F 54 4F 20 33 38 34 30 0D 0A 33 38 EN GOTO 3840..38
00C730: 39 30 20 43 4C 53 3A 50 45 4E 20 33 3A 50 52 49 90 CLS:PEN 3:PRI
00C740: 4E 54 20 22 47 52 4F 55 50 20 31 22 3A 50 41 50 NT "GROUP 1":PAP
00C750: 45 52 20 31 30 3A 50 45 4E 20 30 3A 4C 4F 43 41 ER 10:PEN 0:LOCA
00C760: 54 45 20 31 2C 32 3A 50 52 49 4E 54 22 54 45 41 TE 1,2:PRINT"TEA
00C770: 4D 20 20 20 20 20 20 20 20 20 20 20 20 50 20 20 M P
00C780: 57 20 20 44 20 20 4C 20 20 46 20 20 41 20 50 54 W D L F A PT
00C790: 53 22 0D 0A 33 39 30 30 20 50 41 50 45 52 20 30 S"..3900 PAPER 0
00C7A0: 3A 50 45 4E 20 33 0D 0A 33 39 31 30 20 46 4F 52 :PEN 3..3910 FOR
00C7B0: 20 42 3D 31 20 54 4F 20 34 0D 0A 33 39 32 30 20 B=1 TO 4..3920
00C7C0: 4C 4F 43 41 54 45 20 31 2C 62 2B 35 3A 50 52 49 LOCATE 1,b+5:PRI
00C7D0: 4E 54 20 74 24 28 58 28 31 2C 42 FC 60 2C 38 29 NT t$(X(1,B.`,8)
00C7E0: 29 3A 4C 4F 43 41 54 45 20 31 35 2C 62 2B 35 3A ):LOCATE 15,b+5:
00C7F0: 46 4F 52 20 6A 3D 31 20 54 4F 20 37 3A 50 52 49 FOR j=1 TO 7:PRI
00C800: 4E 54 20 55 53 49 4E 47 20 22 23 23 23 22 3B 78 NT USING "###";x
00C810: 28 31 2C 62 2C 6A 29 3B 3A 4E 45 58 54 20 6A 0D (1,b,j);:NEXT j.
00C820: 0A 33 39 33 30 20 4E 45 58 54 20 42 0D 0A 33 39 .3930 NEXT B..39
00C830: 34 30 20 54 53 54 3D 31 0D 0A 33 39 35 30 20 46 40 TST=1..3950 F
00C840: 4F 52 20 42 3D 31 20 54 4F 20 33 0D 0A 33 39 36 OR B=1 TO 3..396
00C850: 30 20 49 46 20 58 28 32 2C 42 2C 37 29 3C 58 28 0 IF X(2,B,7)<X(
00C860: 32 2C 28 42 2B 31 29 2C 37 29 20 54 48 45 4E 20 2,(B+1),7) THEN
00C870: 46 4F 52 20 41 3D 31 20 54 4F 20 38 3A 4D 56 3D FOR A=1 TO 8:MV=
00C880: 58 28 32 2C 42 2C 41 29 3A 4D 56 31 3D 58 28 32 X(2,B,A):MV1=X(2
00C890: 2C 42 2B 31 2C 41 29 3A 58 28 32 2C 42 2B 31 2C ,B+1,A):X(2,B+1,
00C8A0: 41 29 3D 4D 56 3A 58 28 32 2C 42 2C 41 29 3D 4D A)=MV:X(2,B,A)=M
00C8B0: 56 31 3A 4E 45 58 54 20 41 3A 54 53 54 3D 30 0D V1:NEXT A:TST=0.
00C8C0: 0A 33 39 37 30 20 4E 45 58 54 20 42 0D 0A 33 39 .3970 NEXT B..39
00C8D0: 38 30 20 49 46 20 54 53 54 3D 30 20 54 AF 4B 48 80 IF TST=0 T.KH
00C8E0: 45 4E 20 47 4F 54 4F 20 33 39 34 30 0D 0A 33 39 EN GOTO 3940..39
00C8F0: 39 30 20 4C 4F 43 41 54 45 20 31 2C 31 31 3A 50 90 LOCATE 1,11:P
00C900: 45 4E 20 33 3A 50 52 49 4E 54 20 22 47 52 4F 55 EN 3:PRINT "GROU
00C910: 50 20 32 22 3A 50 41 50 45 52 20 31 30 3A 50 45 P 2":PAPER 10:PE
00C920: 4E 20 30 3A 4C 4F 43 41 54 45 20 31 2C 31 32 3A N 0:LOCATE 1,12:
00C930: 50 52 49 4E 54 22 54 45 41 4D 20 20 20 20 20 20 PRINT"TEAM
00C940: 20 20 20 20 20 20 50 20 20 57 20 20 44 20 20 4C P W D L
00C950: 20 20 46 20 20 41 20 50 54 53 22 3A 50 45 4E 20 F A PTS":PEN
00C960: 33 3A 50 41 50 45 52 20 30 0D 0A 34 30 30 30 20 3:PAPER 0..4000
00C970: 46 4F 52 20 67 3D 31 20 54 4F 20 34 0D 0A 34 30 FOR g=1 TO 4..40
00C980: 31 30 20 4C 4F 43 41 54 45 20 31 2C 47 2B 31 34 10 LOCATE 1,G+14
00C990: 3A 50 52 49 4E 54 20 74 24 28 58 28 32 2C 47 2C :PRINT t$(X(2,G,
00C9A0: 38 29 29 3A 4C 4F 43 41 54 45 20 31 35 2C 47 2B 8)):LOCATE 15,G+
00C9B0: 31 34 3A 46 4F 52 20 6A 3D 31 20 54 4F 20 37 3A 14:FOR j=1 TO 7:
00C9C0: 50 52 49 4E 54 20 55 53 49 4E 47 20 22 23 23 23 PRINT USING "###
00C9D0: 22 3B 78 28 32 2C 67 2C 6A 29 3B 3A 4E 45 58 7B ";x(2,g,j);:NEX{
00C9E0: DC 54 20 4A 0D 0A 34 30 32 30 20 4E 45 58 54 20 .T J..4020 NEXT
00C9F0: 67 0D 0A 34 30 33 30 20 47 4F 53 55 42 20 33 34 g..4030 GOSUB 34
00CA00: 38 30 0D 0A 34 30 34 30 20 52 45 54 55 52 4E 0D 80..4040 RETURN.
00CA10: 0A 34 30 35 30 20 4C 4F 43 41 54 45 20 31 2C 32 .4050 LOCATE 1,2
00CA20: 33 3A 50 52 49 4E 54 22 20 20 20 20 20 20 20 20 3:PRINT"
00CA30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00CA40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A ":
00CA50: 52 45 54 55 52 4E 0D 0A 34 30 36 30 20 4C 4F 43 RETURN..4060 LOC
00CA60: 41 54 45 20 32 33 2C 47 4F 41 4C 32 2B 31 30 3A ATE 23,GOAL2+10:
00CA70: 50 52 49 4E 54 20 4E 3B 22 20 2D 20 22 3B 42 24 PRINT N;" - ";B$
00CA80: 28 55 28 4A 2C 32 29 29 0D 0A 34 30 37 30 20 50 (U(J,2))..4070 P
00CA90: 45 4E 20 32 3A 4C 4F 43 41 54 45 20 31 2C 31 39 EN 2:LOCATE 1,19
00CAA0: 3A 50 52 49 4E 54 20 53 50 41 43 45 24 28 34 30 :PRINT SPACE$(40
00CAB0: 29 3A 4C 4F 43 41 54 45 20 31 35 2C 31 39 3A 50 ):LOCATE 15,19:P
00CAC0: 52 49 4E 54 20 22 3E 3E 22 3B 42 24 28 55 28 4A RINT ">>";B$(U(J
00CAD0: 2C 32 29 29 3B 22 3C 3C 22 3A 4C 4F 43 41 54 45 ,2));"<<":LOCATE
00CAE0: 20 6F 8E 31 2C 32 31 3A 50 52 49 4E 54 20 53 50 o.1,21:PRINT SP
00CAF0: 41 43 45 24 28 34 30 29 3A 4C 4F 43 41 54 45 20 ACE$(40):LOCATE
00CB00: 31 32 2C 32 31 3A 50 52 49 4E 54 20 56 24 28 49 12,21:PRINT V$(I
00CB10: 4E 54 28 52 4E 44 28 57 28 55 28 47 4F 41 4C 32 NT(RND(W(U(GOAL2
00CB20: 2B 31 2C 32 29 29 29 29 2B 31 29 3A 50 45 4E 20 +1,2))))+1):PEN
00CB30: 31 0D 0A 34 30 38 30 20 67 6F 61 6C 32 3D 67 6F 1..4080 goal2=go
00CB40: 61 6C 32 2B 31 3A 4C 4F 43 41 54 45 20 32 31 2C al2+1:LOCATE 21,
00CB50: 38 3A 50 45 4E 20 31 3A 50 52 49 4E 54 20 67 6F 8:PEN 1:PRINT go
00CB60: 61 6C 32 0D 0A 34 30 39 30 20 52 45 54 55 52 4E al2..4090 RETURN
00CB70: 0D 0A 34 31 30 30 20 4C 4F 43 41 54 45 20 34 2C ..4100 LOCATE 4,
00CB80: 47 4F 41 4C 31 2B 31 30 3A 50 52 49 4E 54 3B 4E GOAL1+10:PRINT;N
00CB90: 3B 22 20 2D 20 22 3B 41 24 28 52 28 4A 2C 32 29 ;" - ";A$(R(J,2)
00CBA0: 29 3A 4C 4F 43 41 54 45 20 31 2C 31 39 3A 50 52 ):LOCATE 1,19:PR
00CBB0: 49 4E 54 20 53 50 41 43 45 24 28 34 30 29 3A 4C INT SPACE$(40):L
00CBC0: 4F 43 41 54 45 20 31 35 2C 31 39 3A 50 45 4E 20 OCATE 15,19:PEN
00CBD0: 32 3A 50 52 49 4E 54 22 3E 3E 22 3B 41 24 28 52 2:PRINT">>";A$(R
00CBE0: 28 4A 2C CA C4 32 29 29 3B 22 3C 3C 22 3A 4C 4F (J,..2));"<<":LO
00CBF0: 43 41 54 45 20 31 2C 32 31 3A 50 52 49 4E 54 20 CATE 1,21:PRINT
00CC00: 53 50 41 43 45 24 28 34 30 29 3A 4C 4F 43 41 54 SPACE$(40):LOCAT
00CC10: 45 20 31 32 2C 32 31 3A 50 52 49 4E 54 20 56 24 E 12,21:PRINT V$
00CC20: 28 49 4E 54 28 52 4E 44 2A 20 32 31 29 2B 31 29 (INT(RND* 21)+1)
00CC30: 3A 47 4F 41 4C 31 3D 47 4F 41 4C 31 2B 31 3A 4C :GOAL1=GOAL1+1:L
00CC40: 4F 43 41 54 45 20 31 37 2C 38 3A 50 45 4E 20 31 OCATE 17,8:PEN 1
00CC50: 3A 50 52 49 4E 54 20 47 4F 41 4C 31 0D 0A 34 31 :PRINT GOAL1..41
00CC60: 31 30 20 50 45 4E 20 31 3A 49 28 5A 59 58 2C 4F 10 PEN 1:I(ZYX,O
00CC70: 28 52 28 4A 2C 32 29 29 29 3D 49 28 5A 59 58 2C (R(J,2)))=I(ZYX,
00CC80: 4F 28 52 28 4A 2C 32 29 29 29 2B 31 3A 49 28 5A O(R(J,2)))+1:I(Z
00CC90: 59 58 2C 4F 28 52 28 4A 2C 32 29 29 29 3D 49 28 YX,O(R(J,2)))=I(
00CCA0: 5A 59 58 2C 4F 28 52 28 4A 2C 32 29 29 29 2B 31 ZYX,O(R(J,2)))+1
00CCB0: 0D 0A 34 31 32 30 20 52 45 54 55 52 4E 0D 0A 34 ..4120 RETURN..4
00CCC0: 31 33 30 20 59 28 31 2C 32 35 29 3D 58 28 31 2C 130 Y(1,25)=X(1,
00CCD0: 31 2C 38 29 3A 59 28 32 2C 32 35 29 3D 58 28 32 1,8):Y(2,25)=X(2
00CCE0: 2C 32 2C 38 29 F4 91 FF FF FF FF 11 7A 09 F6 04 ,2,8).......z...
00CCF0: 57 04 F7 04 70 09 01 10 08 10 00 07 01 00 2C 53 W...p.........,S
00CD00: 4F 43 43 45 00 00 00 00 00 00 00 00 00 00 00 0C OCCE............
00CD10: 00 16 00 08 7C 9E 00 00 00 00 00 00 00 00 00 00 ....|...........
00CD20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CD30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CD40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CD50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CD60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CD70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CD80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CD90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CDA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CDB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CDC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CDD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CDE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CDF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1E ................
00CE00: F3 FF FF FF FF 11 7B 09 F6 04 57 04 05 05 5F 09 ......{...W..._.
00CE10: 01 10 08 6C 0B 15 08 00 16 3A 59 28 31 2C 32 36 ...l.....:Y(1,26
00CE20: 29 3D 58 28 31 2C 32 2C 38 29 3A 59 28 32 2C 32 )=X(1,2,8):Y(2,2
00CE30: 36 29 3D 58 28 32 2C 31 2C 38 29 0D 0A 34 31 34 6)=X(2,1,8)..414
00CE40: 30 20 43 4C 53 3A 4C 4F 43 41 54 45 20 35 2C 34 0 CLS:LOCATE 5,4
00CE50: 3A 50 45 4E 20 32 3A 50 52 49 4E 54 20 22 53 4F :PEN 2:PRINT "SO
00CE60: 43 43 45 52 20 37 27 53 20 53 45 4D 49 2D 46 49 CCER 7'S SEMI-FI
00CE70: 4E 41 4C 53 22 3A 50 45 4E 20 33 0D 0A 34 31 35 NALS":PEN 3..415
00CE80: 30 20 4C 4F 43 41 54 45 20 31 30 2C 36 3A 50 52 0 LOCATE 10,6:PR
00CE90: 49 4E 54 20 54 24 28 59 28 31 2C 32 35 29 29 3B INT T$(Y(1,25));
00CEA0: 22 20 56 20 22 3B 54 24 28 59 28 32 2C 32 35 29 " V ";T$(Y(2,25)
00CEB0: 29 0D 0A 34 31 36 30 20 4C 4F 43 41 54 45 20 31 )..4160 LOCATE 1
00CEC0: 30 2C 31 30 3A 50 52 49 4E 54 20 54 24 28 59 28 0,10:PRINT T$(Y(
00CED0: 31 2C 32 36 29 29 3B 22 20 56 20 22 3B 54 24 28 1,26));" V ";T$(
00CEE0: 59 28 32 2C 32 36 29 29 0D 0A 34 31 37 30 20 47 Y(2,26))..4170 G
00CEF0: 4F 53 55 42 20 33 34 38 30 0D 0A 34 31 38 30 20 OSUB 3480..4180
00CF00: 43 4C 53 3A 4C 4F 43 41 54 45 20 31 30 2C 34 3A CLS:LOCATE 10,4:
00CF10: 50 52 49 4E 54 20 22 53 45 00 48 4D 49 2D 46 49 PRINT "SE.HMI-FI
00CF20: 4E 41 4C 53 22 0D 0A 34 31 39 30 20 47 4F 54 4F NALS"..4190 GOTO
00CF30: 20 32 30 0D 0A 34 32 30 30 20 43 4C 53 3A 4C 4F 20..4200 CLS:LO
00CF40: 43 41 54 45 20 31 30 2C 34 3A 50 52 49 4E 54 20 CATE 10,4:PRINT
00CF50: 22 53 4F 43 43 45 52 20 37 20 46 49 4E 41 4C 53 "SOCCER 7 FINALS
00CF60: 22 0D 0A 34 32 31 30 20 47 4F 54 4F 20 32 30 0D "..4210 GOTO 20.
00CF70: 0A 34 32 32 30 20 49 46 20 47 28 31 2C 32 35 29 .4220 IF G(1,25)
00CF80: 3E 47 28 32 2C 32 35 29 20 54 48 45 4E 20 59 28 >G(2,25) THEN Y(
00CF90: 31 2C 32 37 29 3D 59 28 31 2C 32 35 29 20 45 4C 1,27)=Y(1,25) EL
00CFA0: 53 45 20 59 28 31 2C 32 37 29 3D 59 28 32 2C 32 SE Y(1,27)=Y(2,2
00CFB0: 35 29 0D 0A 34 32 33 30 20 49 46 20 47 28 31 2C 5)..4230 IF G(1,
00CFC0: 32 36 29 3E 47 28 32 2C 32 36 29 20 54 48 45 4E 26)>G(2,26) THEN
00CFD0: 20 59 28 32 2C 32 37 29 3D 59 28 31 2C 32 36 29 Y(2,27)=Y(1,26)
00CFE0: 20 45 4C 53 45 20 59 28 32 2C 32 37 29 3D 59 28 ELSE Y(2,27)=Y(
00CFF0: 32 2C 32 36 29 0D 0A 34 32 34 30 20 47 4F 54 4F 2,26)..4240 GOTO
00D000: 20 34 32 30 30 0D 0A 34 32 35 30 20 43 4C 53 3A 4200..4250 CLS:
00D010: 50 45 4E 20 32 3A 4C 4F 43 41 54 EA CD 45 20 31 PEN 2:LOCAT..E 1
00D020: 34 2C 35 3A 50 52 49 4E 54 22 50 45 4E 41 4C 54 4,5:PRINT"PENALT
00D030: 49 45 53 22 3A 50 45 4E 20 31 0D 0A 34 32 36 30 IES":PEN 1..4260
00D040: 20 50 45 4E 53 31 3D 41 28 50 45 4E 31 29 2B 41 PENS1=A(PEN1)+A
00D050: 28 31 29 3A 50 45 4E 53 32 3D 42 28 50 45 4E 32 (1):PENS2=B(PEN2
00D060: 29 2B 42 28 31 29 3A 0D 0A 34 32 37 30 20 27 41 )+B(1):..4270 'A
00D070: 41 3D 31 3A 42 42 3D 31 0D 0A 34 32 38 30 20 49 A=1:BB=1..4280 I
00D080: 46 20 50 45 4E 53 32 3E 50 45 4E 53 31 20 4F 52 F PENS2>PENS1 OR
00D090: 20 50 45 4E 53 32 3D 50 45 4E 53 31 20 54 48 45 PENS2=PENS1 THE
00D0A0: 4E 20 42 42 3D 49 4E 54 28 52 4E 44 2A 33 29 2B N BB=INT(RND*3)+
00D0B0: 31 0D 0A 34 32 39 30 20 49 46 20 50 45 4E 53 31 1..4290 IF PENS1
00D0C0: 3E 50 45 4E 53 32 20 54 48 45 4E 20 41 41 3D 49 >PENS2 THEN AA=I
00D0D0: 4E 54 28 52 4E 44 2A 33 29 2B 31 3A 0D 0A 34 33 NT(RND*3)+1:..43
00D0E0: 30 30 20 49 46 20 41 41 3E 33 20 54 48 45 4E 20 00 IF AA>3 THEN
00D0F0: 41 41 3D 32 20 20 20 0D 0A 34 33 31 30 20 49 46 AA=2 ..4310 IF
00D100: 20 42 42 3E 33 20 54 48 45 4E 20 42 42 3D 32 0D BB>3 THEN BB=2.
00D110: 0A 34 33 32 30 20 49 46 20 41 41 3D 42 A4 9A 42 .4320 IF AA=B..B
00D120: 20 54 48 45 4E 20 41 41 3D 41 41 2B 31 0D 0A 34 THEN AA=AA+1..4
00D130: 33 33 30 20 4C 4F 43 41 54 45 20 35 2C 31 30 3A 330 LOCATE 5,10:
00D140: 50 52 49 4E 54 20 54 24 28 59 28 31 2C 51 29 29 PRINT T$(Y(1,Q))
00D150: 3A 4C 4F 43 41 54 45 20 32 35 2C 31 30 3A 50 52 :LOCATE 25,10:PR
00D160: 49 4E 54 20 54 24 28 59 28 32 2C 51 29 29 0D 0A INT T$(Y(2,Q))..
00D170: 34 33 34 30 20 4C 4F 43 41 54 45 20 35 2C 31 32 4340 LOCATE 5,12
00D180: 3A 50 52 49 4E 54 20 22 53 43 4F 52 45 44 20 22 :PRINT "SCORED "
00D190: 3B 41 41 3A 4C 4F 43 41 54 45 20 35 2C 31 33 3A ;AA:LOCATE 5,13:
00D1A0: 50 52 49 4E 54 20 22 50 45 4E 41 4C 54 49 45 53 PRINT "PENALTIES
00D1B0: 22 3A 4C 4F 43 41 54 45 20 32 35 2C 31 32 3A 50 ":LOCATE 25,12:P
00D1C0: 52 49 4E 54 22 53 43 4F 52 45 44 20 22 3B 42 42 RINT"SCORED ";BB
00D1D0: 3A 4C 4F 43 41 54 45 20 32 35 2C 31 33 3A 50 52 :LOCATE 25,13:PR
00D1E0: 49 4E 54 20 22 50 45 4E 41 4C 54 49 45 53 22 0D INT "PENALTIES".
00D1F0: 0A 34 33 35 30 20 47 4F 53 55 42 20 33 34 38 30 .4350 GOSUB 3480
00D200: 3A 43 4C 53 3A 50 45 4E 20 32 3A 4C 4F 43 41 54 :CLS:PEN 2:LOCAT
00D210: 45 20 31 35 2C 35 3A 50 52 49 4E 54 22 46 49 46 E 15,5:PRINT"FIF
00D220: EF 4E 41 4C 20 53 43 4F 52 45 22 3A 50 45 4E 20 .NAL SCORE":PEN
00D230: 31 0D 0A 34 33 36 30 20 53 43 4F 3D 53 43 4F 2B 1..4360 SCO=SCO+
00D240: 41 41 3A 53 43 4F 52 3D 53 43 4F 52 2B 42 42 0D AA:SCOR=SCOR+BB.
00D250: 0A 34 33 37 30 20 4C 4F 43 41 54 45 20 38 2C 31 .4370 LOCATE 8,1
00D260: 30 3A 50 52 49 4E 54 20 54 24 28 59 28 31 2C 51 0:PRINT T$(Y(1,Q
00D270: 29 29 3A 4C 4F 43 41 54 45 20 32 35 2C 31 30 3A )):LOCATE 25,10:
00D280: 50 52 49 4E 54 20 54 24 28 59 28 32 2C 51 29 29 PRINT T$(Y(2,Q))
00D290: 0D 0A 34 33 38 30 20 4C 4F 43 41 54 45 20 38 2C ..4380 LOCATE 8,
00D2A0: 31 31 3A 50 52 49 4E 54 20 53 43 4F 3A 4C 4F 43 11:PRINT SCO:LOC
00D2B0: 41 54 45 20 32 36 2C 31 31 3A 50 52 49 4E 54 20 ATE 26,11:PRINT
00D2C0: 53 43 4F 52 0D 0A 34 33 39 30 20 52 45 54 55 52 SCOR..4390 RETUR
00D2D0: 4E 0D 0A 34 34 30 30 20 49 4E 4B 20 31 2C 32 30 N..4400 INK 1,20
00D2E0: 2C 32 3A 53 50 45 45 44 20 49 4E 4B 20 32 30 2C ,2:SPEED INK 20,
00D2F0: 32 30 3A 50 45 4E 20 31 3A 43 4C 53 3A 50 52 49 20:PEN 1:CLS:PRI
00D300: 4E 54 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A NT"*************
00D310: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00D320: 2A F0 25 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 20 *.%***********
00D330: 20 20 20 43 20 4F 20 4E 20 47 20 52 20 41 20 54 C O N G R A T
00D340: 20 55 20 4C 20 41 20 54 20 49 20 4F 20 4E 20 53 U L A T I O N S
00D350: 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ************
00D360: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00D370: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 0D 0A *************"..
00D380: 34 34 31 30 20 50 45 4E 20 32 0D 0A 34 34 32 30 4410 PEN 2..4420
00D390: 20 49 46 20 73 63 6F 72 3E 53 43 4F 20 54 48 45 IF scor>SCO THE
00D3A0: 4E 20 4B 3D 59 28 31 2C 32 37 29 20 45 4C 53 45 N K=Y(1,27) ELSE
00D3B0: 20 4B 3D 59 28 32 2C 32 37 29 0D 0A 34 34 33 30 K=Y(2,27)..4430
00D3C0: 20 46 4F 52 20 41 3D 35 20 54 4F 20 31 30 3A 4C FOR A=5 TO 10:L
00D3D0: 4F 43 41 54 45 20 36 2B 41 2C 41 3A 50 52 49 4E OCATE 6+A,A:PRIN
00D3E0: 54 20 54 24 28 4B 29 3A 4E 45 58 54 20 41 3A 4C T T$(K):NEXT A:L
00D3F0: 4F 43 41 54 45 20 31 30 2C 31 32 3A 50 52 49 4E OCATE 10,12:PRIN
00D400: 54 22 57 48 4F 20 57 41 53 20 4D 41 4E 41 47 45 T"WHO WAS MANAGE
00D410: 44 20 42 59 22 3A 4C 4F 43 41 54 45 20 31 34 2C D BY":LOCATE 14,
00D420: 31 33 3A 18 AE 50 52 49 4E 54 20 52 24 28 4B 29 13:..PRINT R$(K)
00D430: 0D 0A 34 34 34 30 20 4C 4F 43 41 54 45 20 31 2C ..4440 LOCATE 1,
00D440: 31 35 3A 50 52 49 4E 54 22 2A 2A 2A 2A 2A 20 59 15:PRINT"***** Y
00D450: 4F 55 20 20 41 52 45 20 20 53 4F 43 43 45 52 20 OU ARE SOCCER
00D460: 37 27 53 20 20 57 49 4E 4E 45 52 20 2A 2A 2A 2A 7'S WINNER ****
00D470: 2A 22 0D 0A 34 34 35 30 20 47 4F 53 55 42 20 33 *"..4450 GOSUB 3
00D480: 34 38 30 0D 0A 34 34 36 30 20 49 4E 4B 20 31 2C 480..4460 INK 1,
00D490: 32 30 2C 32 3A 53 50 45 45 44 20 49 4E 4B 20 32 20,2:SPEED INK 2
00D4A0: 30 2C 32 30 3A 50 45 4E 20 31 3A 4C 4F 43 41 54 0,20:PEN 1:LOCAT
00D4B0: 45 20 31 2C 31 35 3A 43 4C 53 3A 50 52 49 4E 54 E 1,15:CLS:PRINT
00D4C0: 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A "***************
00D4D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00D4E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 20 44 4F 20 59 ********** DO Y
00D4F0: 4F 55 20 57 41 4E 54 20 54 4F 20 50 4C 41 59 20 OU WANT TO PLAY
00D500: 41 4E 4F 54 48 45 52 20 53 45 41 53 4F 4E 3F 20 ANOTHER SEASON?
00D510: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00D520: 2A 2A 2A 2A 2A D7 4C 2A 2A 2A 2A 2A 2A 2A 2A 2A *****.L*********
00D530: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 20 0D 0A 34 ***********" ..4
00D540: 34 37 30 20 51 51 24 3D 22 22 3A 57 48 49 4C 45 470 QQ$="":WHILE
00D550: 20 51 51 24 3D 22 22 3A 51 51 24 3D 55 50 50 45 QQ$="":QQ$=UPPE
00D560: 52 24 28 49 4E 4B 45 59 24 29 3A 57 45 4E 44 0D R$(INKEY$):WEND.
00D570: 0A 34 34 38 30 20 49 46 20 51 51 24 3D 22 59 22 .4480 IF QQ$="Y"
00D580: 20 54 48 45 4E 20 51 3D 31 3A 53 45 53 3D 53 45 THEN Q=1:SES=SE
00D590: 53 2B 31 3A 57 57 3D 31 3A 47 4F 54 4F 20 34 35 S+1:WW=1:GOTO 45
00D5A0: 31 30 0D 0A 34 34 39 30 20 49 46 20 51 51 24 3D 10..4490 IF QQ$=
00D5B0: 22 4E 22 20 54 48 45 4E 20 43 4C 53 3A 50 52 49 "N" THEN CLS:PRI
00D5C0: 4E 54 22 4F 4B 2E 2E 2E 54 48 41 4E 4B 20 59 4F NT"OK...THANK YO
00D5D0: 55 20 46 4F 52 20 50 4C 41 59 49 4E 47 2E 2E 2E U FOR PLAYING...
00D5E0: 22 3A 45 4E 44 0D 0A 34 35 30 30 20 47 4F 54 4F ":END..4500 GOTO
00D5F0: 20 34 34 37 30 0D 0A 34 35 31 30 20 49 46 20 71 4470..4510 IF q
00D600: 3E 3D 32 35 20 41 4E 44 20 57 57 3D 30 20 54 48 >=25 AND WW=0 TH
00D610: 45 4E 20 43 4C 53 3A 50 52 49 4E 54 22 53 4F 52 EN CLS:PRINT"SOR
00D620: 52 59 20 21 21 20 4E F6 FD FF FF FF FF 11 78 09 RY !! N.......x.
00D630: A6 04 A6 04 F6 04 6B 09 01 10 08 10 00 07 01 00 ......k.........
00D640: 2C 53 4F 43 43 45 00 00 00 00 00 00 00 00 00 00 ,SOCCE..........
00D650: 00 0D FF 16 9D 03 7C 9E 00 00 00 00 00 00 00 00 ......|.........
00D660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D6A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D6B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D6C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D6D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D6E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D6F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D700: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D710: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D720: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D730: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D740: 00 CF 2A FF FF FF FF 11 77 09 A6 04 A6 04 02 05 ..*.....w.......
00D750: 5D 09 01 10 08 1C 24 0D 04 00 16 4F 20 53 41 56 ].....$....O SAV
00D760: 49 4E 47 20 41 46 54 45 52 20 57 45 45 4B 20 32 ING AFTER WEEK 2
00D770: 34 20 21 21 22 3A 47 4F 53 55 42 20 33 34 38 30 4 !!":GOSUB 3480
00D780: 3A 47 4F 54 4F 20 32 33 37 30 0D 0A 34 35 32 30 :GOTO 2370..4520
00D790: 20 43 4C 4F 53 45 4F 55 54 3A 4F 50 45 4E 4F 55 CLOSEOUT:OPENOU
00D7A0: 54 22 21 73 61 76 65 64 2E 67 6D 22 0D 0A 34 35 T"!saved.gm"..45
00D7B0: 33 30 20 50 52 49 4E 54 20 23 39 2C 71 3A 0D 0A 30 PRINT #9,q:..
00D7C0: 34 35 34 30 20 50 52 49 4E 54 20 23 39 2C 70 6C 4540 PRINT #9,pl
00D7D0: 79 3A 0D 0A 34 35 35 30 20 46 4F 52 20 61 3D 31 y:..4550 FOR a=1
00D7E0: 20 54 4F 20 70 6C 79 3A 50 52 49 4E 54 20 23 39 TO ply:PRINT #9
00D7F0: 2C 73 28 61 29 3A 4E 45 58 54 20 61 0D 0A 34 35 ,s(a):NEXT a..45
00D800: 36 30 20 46 4F 52 20 61 3D 31 20 54 4F 20 38 3A 60 FOR a=1 TO 8:
00D810: 46 4F 52 20 62 3D 31 20 54 4F 20 31 30 3A 50 52 FOR b=1 TO 10:PR
00D820: 49 4E 54 20 23 39 2C 6B 28 61 2C 62 29 3A 4E 45 INT #9,k(a,b):NE
00D830: 58 54 20 62 2C 61 0D 0A 34 35 37 30 20 46 4F 52 XT b,a..4570 FOR
00D840: 20 61 3D 31 20 54 4F 20 38 3A 46 4F 52 20 62 3D a=1 TO 8:FOR b=
00D850: 31 20 54 4F 20 31 30 3A 50 52 49 F7 F2 4E 54 20 1 TO 10:PRI..NT
00D860: 23 39 2C 7A 28 61 2C 62 29 3A 4E 45 58 54 20 62 #9,z(a,b):NEXT b
00D870: 2C 61 0D 0A 34 35 38 30 20 46 4F 52 20 61 3D 31 ,a..4580 FOR a=1
00D880: 20 54 4F 20 38 3A 46 4F 52 20 62 3D 31 20 54 4F TO 8:FOR b=1 TO
00D890: 20 31 30 3A 50 52 49 4E 54 20 23 39 2C 6C 28 61 10:PRINT #9,l(a
00D8A0: 2C 62 29 3A 4E 45 58 54 20 62 2C 61 0D 0A 34 35 ,b):NEXT b,a..45
00D8B0: 39 30 20 46 4F 52 20 61 3D 31 20 54 4F 20 38 3A 90 FOR a=1 TO 8:
00D8C0: 50 52 49 4E 54 20 23 39 2C 72 24 28 61 29 3A 4E PRINT #9,r$(a):N
00D8D0: 45 58 54 20 61 0D 0A 34 36 30 30 20 46 4F 52 20 EXT a..4600 FOR
00D8E0: 61 3D 31 20 54 4F 20 38 3A 50 52 49 4E 54 20 23 a=1 TO 8:PRINT #
00D8F0: 39 2C 74 24 28 61 29 3A 4E 45 58 54 20 61 0D 0A 9,t$(a):NEXT a..
00D900: 34 36 31 30 20 46 4F 52 20 61 3D 31 20 54 4F 20 4610 FOR a=1 TO
00D910: 38 3A 46 4F 52 20 62 3D 31 20 54 4F 20 31 30 3A 8:FOR b=1 TO 10:
00D920: 0D 0A 34 36 32 30 20 50 52 49 4E 54 20 23 39 2C ..4620 PRINT #9,
00D930: 6B 24 28 61 2C 62 29 3A 4E 45 58 54 20 62 2C 61 k$(a,b):NEXT b,a
00D940: 0D 0A 34 36 33 30 20 46 4F 52 20 61 3D 31 20 54 ..4630 FOR a=1 T
00D950: 4F 20 31 30 3A 46 4F 52 20 62 3D 31 20 09 72 54 O 10:FOR b=1 .rT
00D960: 4F 20 32 3A 50 52 49 4E 54 20 23 39 2C 72 28 61 O 2:PRINT #9,r(a
00D970: 2C 62 29 3A 4E 45 58 54 20 62 2C 61 3A 0D 0A 34 ,b):NEXT b,a:..4
00D980: 36 34 30 20 46 4F 52 20 61 3D 31 20 54 4F 20 31 640 FOR a=1 TO 1
00D990: 30 3A 46 4F 52 20 62 3D 31 20 54 4F 20 32 3A 50 0:FOR b=1 TO 2:P
00D9A0: 52 49 4E 54 20 23 39 2C 75 28 61 2C 62 29 3A 4E RINT #9,u(a,b):N
00D9B0: 45 58 54 20 62 2C 61 0D 0A 34 36 35 30 20 46 4F EXT b,a..4650 FO
00D9C0: 52 20 41 3D 31 20 54 4F 20 32 3A 46 4F 52 20 42 R A=1 TO 2:FOR B
00D9D0: 3D 31 20 54 4F 20 32 34 3A 50 52 49 4E 54 20 23 =1 TO 24:PRINT #
00D9E0: 39 2C 47 28 41 2C 42 29 3A 4E 45 58 54 20 42 2C 9,G(A,B):NEXT B,
00D9F0: 41 0D 0A 34 36 36 30 20 46 4F 52 20 41 3D 31 20 A..4660 FOR A=1
00DA00: 54 4F 20 32 3A 46 4F 52 20 42 3D 31 20 54 4F 20 TO 2:FOR B=1 TO
00DA10: 34 3A 46 4F 52 20 43 3D 31 20 54 4F 20 38 3A 50 4:FOR C=1 TO 8:P
00DA20: 52 49 4E 54 20 23 39 2C 58 28 41 2C 42 2C 43 29 RINT #9,X(A,B,C)
00DA30: 3A 4E 45 58 54 20 43 2C 42 2C 41 0D 0A 34 36 37 :NEXT C,B,A..467
00DA40: 30 20 46 4F 52 20 41 3D 31 20 54 4F 20 38 3A 50 0 FOR A=1 TO 8:P
00DA50: 52 49 4E 54 20 23 39 2C 4A 24 28 41 29 3A 4E C3 RINT #9,J$(A):N.
00DA60: AA 45 58 54 20 41 0D 0A 34 36 38 30 20 43 4C 4F .EXT A..4680 CLO
00DA70: 53 45 4F 55 54 0D 0A 34 36 39 30 20 49 46 20 57 SEOUT..4690 IF W
00DA80: 57 3D 30 20 54 48 45 4E 20 47 4F 54 4F 20 32 33 W=0 THEN GOTO 23
00DA90: 37 30 20 45 4C 53 45 20 47 4F 54 4F 20 34 37 30 70 ELSE GOTO 470
00DAA0: 30 0D 0A 34 37 30 30 20 43 4C 53 3A 4C 4F 43 41 0..4700 CLS:LOCA
00DAB0: 54 45 20 31 2C 32 3A 50 52 49 4E 54 22 4E 4F 57 TE 1,2:PRINT"NOW
00DAC0: 20 52 45 4C 4F 41 44 20 59 4F 55 52 20 4F 52 49 RELOAD YOUR ORI
00DAD0: 47 49 4F 4E 41 4C 20 54 41 50 45 2C 20 50 52 45 GIONAL TAPE, PRE
00DAE0: 53 53 49 4E 47 59 20 54 4F 20 4C 4F 41 44 20 41 SSINGY TO LOAD A
00DAF0: 20 53 41 56 45 44 20 47 41 4D 45 22 0D 0A 00 00 SAVED GAME"....
00DB00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB60: 00 FD 0C FF FF FF FF .......
RESULT OF SEARCH :
PRO=0 CHEA=0 COD=0 MUSI=0 COP=0 GRA=1 WRIT=0 198=2 199=1 STARTER=0 KBI=0 CAAV=0 L.TOURNIER=0
PRO=0 CHEA=0 COD=0 MUSI=0 COP=0 GRA=1 WRIT=0 198=2 199=1 STARTER=0 KBI=0 CAAV=0 L.TOURNIER=0
fWb,SOC7pqBfWN(y , "!soccer7.bin", 0,3,6,9,18,19,16,15,2,1,24,25,1
3,12,12,25,26"!SOCgW,SOCCER7.BINUgWP 0000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000 00000 00000000000000000000000000
00000000000000000000000000 00000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000a0000000000a0000000000000000000000000000000000000000000000000000000000
aC3c000000hA0000000000000000000000000000000000000000000000000000000aC'80hh0000m0
00000000000000000000000000000000000000000000000000000q00000000000000000000000000
00000000000000000000000000800C04Q00000000000000000000000000000000000000000000000
004000)CC4h003300000000000000000800000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000C00000S0000000000000000000000
00000000000000000000000000000000000Ci00wcCCC000000000000000000000000000000000000
00000000000000000000A00w30000000000000000000000000000000000000000000000000000000
080000w333000000000000000000000000000000000000000000000000000000000aC00000000000
00030000000000000000000000000000000000000000000000000awA0000000000000000q0000000
000000000000000000000000000000000000000000000A0000000000000000000000000000000000
000000000000000000000000000000000000000000000acA0000000000000000000000000000 000
00000000000d000000000001000000000000000000000000000000000 3"300 000000000000000
000000000000000000000000000000000000000000 3"w0 0 0 0000000000000000000000000000
000000000000$0$00$$$$$$$00"OeW,SOCCER7.BINxeWO 000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000 00000000000000000000000000
000000000000000000000000000k00000 0000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000a000000000000000000000000000000000000000000000000000000000
00000000000000000a0000000000 000000000000000000000000000000000000000000000000000
000000cCC000000hh0000000000000000000000000000000000000000000000000000000CCh0000d
00000000000000000000000000000000000000000000000000000C00q00000000000000000000000
00000000000000000000000000000000C0y000000000000000000000000000000000000000000000
00000000)CC00001s00000000000000000M000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000C00000C00000h000000000000
0000000000000000000000000000000000000000i016000000000000000000000000000000000090
000000000000000000000A00w3h00000000000000000000000000000000000000000000000000000
0a000033b0000000000000000000000000000000000000000000000000000000000C0000q0000000
0q00000000000000000000000000000000000000000000000000aU00000000000000000q00000000
0000000000000000000000000000000000000000000000000000000000000aA00000000000000000
00000000000000000000000000000000000000000000dAA00000000000000000000000000 U00000
00000000d0000000000 000000000000000000000000000000000U w00 0 000000000000000
000000000000000000000000000000000000000000bw000000000000000000000000000000000000
000000000$0$00$$$$$$$00RbR,SOCCER7.BINbWP 00000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000 0000 000000000000000000000000
000000000000000000000000 0 0 C0 0 000000 000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000a(0Q00000000000000000000000000000000000000000000000
00000000000000000000000000a0000000000A000000000000000000000000000000000000000000
000000000000000C000000h0000000000000000000000000000000000000000000000000000000CC
C000000000000000000000000000000000000000000000000000000000C000000000000000000000
000000000000000000000000000000000000aC0(h000000000000000000000000000000000000000
0000000000h000aiC080001800000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000aC00000000000000
000000000000000000000000000000000000000000016iC000000000000000000000000000000000
000m000000000000000000000000w300000000000000000000000000000000000000000000000000
00000a0000330000000000000000000000000000000000000000000000000000000000C00000qUh0
00000000q00000000000000000000000000000000000000000000000000a/0000000q00000000000
000000000000000000000000000000000000000000000000000a00000000000000000a3000000000
00000000000000000000000000000000000000000000000000000A00000000000000000000000000
3333w0000000000000d00000000000 00000000000000000000000000000000 3ww 3U0 0 0 0000
00000000000000000000000000000000000000000000000000000wbw 0 000000000000000000000
0000000000000000000000$00$00$00$$00 eV,SOCCER7.BINfR 000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000 000000000000000000
000000000000000000000000000000000000000000000000000000 0 0000 000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000a(00000000000000000000000000000
000000000000000000000000000000000000000000000h00000000AA000000000000000000000000
00000000000000000000000000000000aCCC00000h00000000000000000000000000000000000000
0000000000000000aCC0hh0000000000000000000000000000000000000000000000000000004000
00000000000000000000000000000000000000000000000000004000aiCC40000000000000000000
0000000000000000000000000000004000aCC00000q80000000000000000N0000000000000000000
00000000000000000000000000080000000000000000000000000000000000000000000000000000
0C00000aCC00000hh000000000000000000000000000000000000000000000000000A016i0000000
00000000000000000000000000000l0000000000000000000000A800w33h00000000000000000000
00000000000000000000000000000000000000000000000h00000000000000000000000000000000
00000000000000000000000300000000060000000000000000000000000000000000000000000000
0000vw0000000q00000000q000000000000000000000000000000000000000000000000000000000
0000a000000000000"00000000000000000000000000000000000000000000000000000000000000
0d000000000000000000000000 33333w00000000000000000000000000000000000000000000000
0000000000 "3 w 0 0 000000000000000000000000000000000000000000000000000000000wb
"w00 00000000000000000000000000000000000000000000$0$00$0$0$$$000 0gpgWV,SOCCER7.
BINiWS 0000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000 0 0 00000000000000000000000000000000000000000000000000000000000000r 000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000 00000000000000000000000000000000000000000000000000000000000000000000000000
0a(0Z000000000000000000000000000000000000000000000000000000000000000000000000aC0
0000000A00000000000000000000000000000000000000000000000000000000C000000000000000
0000000000000000000000000000000000000000000040hhs0000 L0000000000000000000000000
0000000000000000000000000400C040000000000000000000000000000000000000000000000000
04000aC(00000000000000000000000000000000000000000000000004hh0000aC00000000000000
00000000h00000000000000000000000000000000000000C00000000008000000000000000000000
00000000000000000000000000000000CC00000CC000000h00000000000000000000000000000000
0000000000000000000A0w3000000000000000000000000000000000000E00000000000000000000
00iA800136000000000000000000000000000000000000000000000000000000000080004h000000
0000000000000000000000000000000000000000000000000000a000000300000000032000000000
00000000000000000000000000000000000000000RU0000000000000000q00000000000000000000
00000000000000000000000000000000000000000a00000000000d00000000000000000000000000
000000000000000000000000000000000000000000d00000d000000000000000000000000 333333
w 0000000000dd0000000000000000000000000000000000000000000000003 w 0 000000000000
0000000000000000000000000000000000000000000000wb""000000000000000000000000000000
00000000000000000$0$00$0$0$$$000 00gjWY,SOCCER7.BIN9iWT 00000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000 000000000000000
000000000000000000000000000000000000000000000000000000 0000000 00000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000 000000000000000000000000000
000000000000000000000000000000000000000000000000 0S000000000 0000000000000000000
00000000000000000000000000000000000000000a0000000A000000000000000000000000000000
00000000000000000000000000WC00000hh000000000000000000000000000000000000000000000
00000000004i0ah000000000000000000000000000000000000000000000000000004800C0400000
00000000000000000000000000000000000000000000040004C00000000000000000000000000000
00000000000000000000h0000CC00000008000000000000000000000000000000000000000000000
0000000000000a000000000000000000000000000000000000000000000000000000000C00330CC0
0000000000000000000000000000000000000000000000000000000A80w3i0000000000000000000
00000000000000000A000000000000000000000c00013b00000h0000000000000000000000000000
0000000000000000000000000a800040000000000000000000000000000000000000000000000000
000000000aC000000q000000000q3000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
000000000dc000000000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000003w33333w00000 0000000000000000000000000300000000
000000000000000000000000 3" "w 000000000000000000000000000000000000000000000000
00000000000"wb"000000000000000000000000000000000000000000000000$0000$0$0$0$000 0
00 0 00 ib,SOCCER7.BINjWV 000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000 00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000 000000000000000000000000000000000000000000000000000000000000
00000000000000a00l00000000000000000000000000000000000000000000000000000000000000
0000000chC0000000A0000000000000000000000000000000000000000000000000000000aCCA800
0hh00000000000000000000000000000000000000000000000000000004iCC000qjh000000000000
000000000000000000000000000000000000000004800C0(00000000000000000000000000000000
000000000000000000000Ch000000000000000000000000000000000000000000000000004h00000
0000008000000000000000g00000000000000000000000000000000000000a000000000000000000
00000000000000000000000000000000000000000000C012C000000h000000000000000000000000
00000000000000000000000000""80w3iC0000000000000000000000000000000000000000000000
0000000000000013b00000h000000000000000000000000000000000000000000000000000000000
h00000000010000000000000000000000000000000000000000000000000a000000q000000000q20
00000000000000000000000000000000000000000000000000G000000 0000000000000000000000
00000000000000000000000000000000000000000000000000000000AA0000000000000000000000
0000000000000000000000000000000d0000000000000000000000000000000000000000000003w3
33"" 30000 0000000000000000000000000r00000000000000000000000000000000 3" w0 00
0000000000000000000000000000000000000000000000000000" b"000000000000000000000000
00000000000000000000000000000000000000000000000000000000.iW,SOCCER7.BIN)jWSI)000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
000 000 000000000000000000000000000000000000000000000000000000000 00000000000000
000000000000000000000000000000000000000000000p0000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000a00000000000000000000000000000
00000000000000000000000000000000000000000c3000000AA00000000000000000000000000000
00000000000000000000000000aC000hh00000000000000000000000000000000000000000000000
000000000C00000m00000000000000000000000000000000000000000000000000800CC000000000
000000000000000000000000000000000000000004000)C00w000000000000000000000000000000
000000000000000000000000000000000000000000000(0000000000000000000000000000000000
0000a00000000000000000000000000000000000000000000000000000000000000C0wC000000000
0000000000000000000000000000000000000000000000000"c00w30000000000000000000000000
00000000000LG000000000000000000000i0000w3300000h00000000000000000000000000000000
0000000000000000000a0000h0000000003000000000000000000000000000000000000000000000
0000aA00000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000a"0A0000
00000000000000000000000000000000000000000000d00000000000000000000000000000000000
000000003333""3000 000000000000000000000000000000000000000000000000000000000 3"
w0 0000000000000000000000000000000000000000000$00$00$$$$$$$00 b"00000000000000
000000000000000000000000000000000000000000000000000000000000000000lWa,SOClkWP(10
OPENOUT "!D"MEMORY HIMEM-1CLOSEOUT 20 RANDOMIZE TIME 30 DIM S(8)DIM X(2,4,8)D
IM L(8,10)FOR J1 TO 8FOR N1 TO 10L(J,N)NNEXT NNEXT JDIM Y(2,27)DIM M(8) 40 DIM
I(8,10) 50 DIM O(13),P(13),V(13),W(13) 60 LEGO0FOR a1 TO 4x(1,a,8)ax(2,a,8)a+
4NEXT a 70 DIM j$(8)ses1DIM q(5)DIM h(2,8,10)DIM g(2,27)DIM k$(8,10)DIM k(8,10)
DIM z(8,10)FOR n1 TO 8j$(n)"75"FOR j1 TO 10K(N,J)100NEXTNEXT 80 FOR a1 TO 8FOR
b1 TO 10k$(a,b)"."NEXT b,a 90 FOR n1 TO 5q(n)INT(RND*8)+1NEXT 100 DIM v$(24)D
IM g$(8,10)DIM N$(8,10)DIM T$(8)DIM R$(8) 110 MODE 1BORDER 0INK 0,0INK 1,2INK
2,6INK 3,8INK 4,18INK 5,20INK 6,24INK 7,26PAPER 0PEN 7 120 LOCATE 5,10PRINT"DO
YOU WANT TO LOAD A SAVED GAME"LOCATE 18,11PRINT"(Y/N)" '130 l$""WHILE l$""l$UP
PER$(INKEY$)WEND 140 IF l$"Y" THEN GOSUB 470GOTO 720 150 IF l$"N" THEN GOTO 16
0 ELSE GOTO 130 160 GOSUB 460 170 q1 180 BORDER 0INK 0,0INK 1,2INK 2,6INK 3,8
INK 4,18INK 5,20INK 6,24INK 7,26PAPER 0PEN 7 190 CLSLOCATE 15,2PRINT"NEW SEASON
" 200 gem0PEN 6LOCATE 12,6PRINT "PREVIOUS WINNERS"FOR n1 TO 5LOCATE 12,n+8PEN 2
PRINT 1989+ses-7+nLOCATE 18,n+8PEN 6PRINT t$(q(n)) 210 NEXT n 220 FOR n1 TO 8m
(n)40NEXT n 230 LOCATE 15,5PRINT"SEASON"PEN 5LOCATE 22,5PRINT ses 240 GOSUB 45
0 250 CLSLOCATE 12,10PRINT "HOW MANY PLAYERS (1-8) " 260 l$""WHILE l$""l$UPPER
$(INKEY$)WENDIF VAL(l$)1 OR VAL(l$)8 THEN GOTO 260 270 plyVAL(l$) 280 FOR N1 T
O PLY 290 CLSLOCATE 6,1PEN 3PRINT"PLEASE SELoECT TEAM TO MANAGE"FOR J1 TO 8LOCA
TE 13,J+5PRINT J"-"T$(J)NEXT J 300 FOR J1 TO PLYIF S(J)0 THEN LOCATE 13,(5+S(J)
)PRINT" "NEXT J 310 LOCATE 16,3PEN 1PRINT"PLAYER "+STR$(n) 320
L$""WHILE L$""L$UPPER$(INKEY$)WENDIF VAL(L$)1 OR VAL(L$)8 THEN GOTO 320 330 TST
0FOR QQ1 TO PLYIF S(QQ)VAL(L$) THEN TST1NEXT QQ 340 IF TST1 THEN GOTO 310 350
IF TST1 THEN S(N)VAL(L$) 360 PEN 3LOCATE 12,15PRINT (T$(S(N)))" MANAGER"LOCATE
10,16PRINT"PRESENT NAME "(R$(S(N))ajc,SOCLjS))LOCATE 15,17PEN 2PRINT"CHANGE NAME
" 370 LOCATE 18,18PRINT "(Y/N)"L$""WHILE L$""L$UPPER$(INKEY$)WEND 380 IF L$"N"
THEN GOTO 430 390 IF L$"Y" THEN LOCATE 10,16PRINT SPACE$(25)LOCATE 1,24PRINT S
PACE$(40)LOCATE 1,24PRINT"NEW NAME(MAX 10)"INPUT SS$IF LEN(SS$) 10 THEN GOTO 390
400 LOCATE 1,24PRINT SPACE$(40) 410 R$(S(N))SS$ 420 GOTO 360 430 NEXT N 44
0 CLSPRINT"LOADING........."CHAIN MERGE "SOCce 450 LOCATE 4,24PRINT" ***PRESS
ANY KEY TO CONTINUE***"L$""WHILE L$""L$INKEY$WENDRETURN 460 470 FOR N1 TO 2FO
R J1 TO 24READ Y(N,J)NEXT JNEXT N 480 DATA 1,5,3,7,1,5,2,6,1,5,2,6,2,6,4,8,3,7,
4,8,4,8,3,7 490 DATA 2,6,4,8,3,7,4,8,4,8,3,7,1,5,3,7,1,5,2,6,1,5,2,6 500 RESTO
RE 510FOR A1 TO 21READ V$(A)NEXT A 510 DATA oepen goal,simple tap in,easy tap i
n,6 yard finish,chested in,deflected from 10 yds,only had keeper to beat 520 DA
TA goalmouth scrable,goalkeeper fumbled,defensive mix up,head in from cross,drib
bled round 1 and shot,fluke 20 yards,dribbled round 2 and shot 530 DATA glancin
g header,right foot volley (20 yd),left foot volley (25 yd),curled free kick rou
nd wall,diving header,overhead scissor kick,bomber special 540 RESTORE 550FOR A
1 TO 8FOR B1 TO 10READ G$(A,B)NEXT B,A 550 DATA G,D,D,M,M,A,A,D,M,A,G,D,D,M,M,A
,A,D,M,A,G,D,D,M,M,A,A,D,M,A,G,D,D,M,M,A,A,D,M,A,G,D,D,M,M,A,A,D,M,A,G,D,D,M,M,A
,A,D,M,A,G,D,D,M,M,A,A,D,M,A,G,D,D,M,M,A,A,D,M,A 560 RESTORE 570FOR A1 TO 8FOR
B1 TO 10READ N$(A,B)NEXT B,A 570 DATA GROBELAAR,WHELAN,NICOL,McMAHON,BARNES,BEA
RDSLEY,RUSH,GILLESPIE,SPACKMAN,ALDRIDGE 580 DATA LUKIC,THOMAS,ADAMS,ROCASTLE,RI
CHARDSON,SMITH,MARWOOD,WINTER,BOULD,MERSON,McKNIGHT,POTTS,GAYLE,KEEN,KELLY,ROSEN
IOR,INCE,MARTIN,WARD,DICKENS 590 DATA GUNN,BOWEN,BUTTER,GORDON,FLECK,PHELAN,PUT
NEY,CULVER,TOWNSENDM,ALLEN 600 DATA LEIGHTON,ANDERSON,McGRATH,ROBSON,STRACHAN,M
cCLAIR,HUGHES,BRUCE,OLSEN,WHITESIDE 610 DATA MIMMS,FENWICK,STEVENS,MABBUT,GASCO
IGNE,WADDLE,STEWART,THOMAS,MORAN,SAMWAYS 620 DATA SOUTHALL,RATCLIFFE,VAN DEN,HA
UWE,REID,STEVEN,COTTEE,WILSON,SNODINGmn,SOClWSi),SHEEDY,SHARP 630 DATA SUTTON,P
EARCE,FOSTER,WEBB,HODGE,CLOUGH,CHAPMAN,CHETTLE,WILSON,RICE 640 RESTORE 650FOR A
1 TO 8READ T$(A)NEXT A 650 DATA LIVERPOOL,ARSENAL,WEST HAM,NORWICH,MAN UNITED,S
PURS,EVERTON,NOTTS FOREST 660 RESTORE 670FOR A1 TO 8READ R$(A)NEXT A 670 DATA
C.CHAPMAN,J.ARCHER,M.NEWTOP,G.PEARMAN,S.BRIGGS,J.DE SALIS,T.HUGGARD,S.SARIF 680
RESTORE 690FOR J1 TO 8FOR I1 TO 10READ z(J,I)h(1,j,i)z(j,i)NEXT INEXT J 690 DA
TA 12,13,14,17,19,17,18,12,17,18,18,13,18,17,15,17,18,16,17,18 )g 700 DATA 10,1
2,20,17,16,20,13,17,13,17,16,14,18,17,20,17,11,16,16,17,12,16,19,18,18,10,18,16,
12,16,17,12,16,20,12,18,18,18,17,18,16,18,17,17,19,19,18,16,18,16,19,19,16,18,19
,19,18,18,17,18,16,18,18,18,17,18,16,17,17,17 710 RETURN 720 CLSPRINT"PLEASE I
NSERT SAVED GAME TAPE"CLOSEINOPENIN"saved.gm" 730 INPUT #9,q 740 INPUT #9,ply
750 FOR a1 TO plyINPUT #9,s(a)NEXT a 760 FOR a1 TO 8FOR b1 TO 10INPUT #9,k(a,b
)NEXT b,a 770 FOR a1 TO 8FOR b1 TO 10INPUT #9,z(a,b)NEXT b,a 780 FOR a1 TO 8An
FOR b1 TO 10INPUT #9,l(a,b)NEXT b,a 790 FOR a1 TO 8INPUT #9,r$(a)NEXT a 800 FO
R a1 TO 8INPUT #9,t$(a)NEXT a 810 FOR a1 TO 8FOR b1 TO 10INPUT #9,k$(a,b) 820
NEXT b,a 830 FOR a1 TO 10FOR b1 TO 2INPUT #9,r(a,b)NEXT b,a 840 FOR a1 TQO 10F
OR b1 TO 2INPUT #9,u(a,b)NEXT b,a 850 FOR A1 TO 2FOR B1 TO 24INPUT #9,G(A,B)NEX
T B,A 860 FOR A1 TO 2FOR B1 TO 4FOR C1 TO 8INPUT #9,X(A,B,C)NEXT C,B,A 870 FOR
A1 TO 8INPUT #9,J$(A)NEXT A 880 CLOSEIN 890 PRINT"PLEASE INSERT ORIGIONAL TAP
E" 900 GOTO 440 nqg,SOCCErY810 CLSRPL0COT0RD12GOT1086GROU1GROUP0LOCATE 10,4PRI
NT "GROUP MATCHES" 20 RPL0LOCATE 15,7PRINT "NEXT MATCH -"PEN 6LOCATE 15,9PRINT
T$(Y(1,q))" V "T$(Y(2,q))TRA15TRA25GOSUB 3480 30 NU0NU10g10g20FP0FOR n1 TO plY
40 IF YT(1,Q)S(N) THEN G11 NUs(N) 50 IF Y(2,Q)S(N) THEN G21 NU1s(N) 60 NEXT n
70 IF g11 OR G21 THEN GOTO 2330 80 FOR N1 TO 5U(N,1)0U(N,2)0R(N,1)0R(N,2)0NE
XT N 90 FOR N1 TO 9 100 O(N)L(Y(1,Q),N)V(N)Z(Y(1,Q),O(N))P(N)L(Y(2,Q),N)W(N)Z(
Y(2,Q),P(N))NEXT N 110 PEN 1CLSEXT0Y$T$(Y(1,Q))GOAL10GOAL20H10H20CP15GEM1CP25
120 Z$T$(Y(2,Q)) 130 LOCATE 1,1PRINT Y$FOR n1 TO 7A$(N)N$(Y(1,Q),O(n))LOCATE 1
,N+2PRINT NLOCATE 4,N+2PRINT A$(N)A(N)(Z(Y(1,Q),O(N))/10) 140 RM0IF K$(Y(1,Q),O
(N))"*" THEN LOCATE 14,N+2PRINT "...IS INJURED "A(N)1RM1 150 RM20IF K$(Y(1,Q),O
(N))"S" THEN LOCATE 14,N+2PRINT "...IS SUSPENDED"A(N)1RM21 160 NEXT N 170 N1
180 WHILE NPLY 190 IF S(N)Y(1,Q) AND RM1 THEN LOCATE 1,23PRINT"YOU ARE PLAYING
WITH AN INJURED PLAYER...RELELECT TEAM"LOCATE 1,24PRINT" PRESS ANY KEY
TO CONTINUE"QQ$""WHILE QQ$""QQ$UPPER$(INKEY$)WENDGOTO 2330 200 IF S(N)Y(1,Q) A
ND RM21 THEN LOCATE 1,23PRINT"YOU ARE PLAYING WITH A SUSPECNDED PLAYER..RESELECT
TEAM"LOCATE 1,24PRINT" PRESS ANY KEY TO CONTINUE"QQ$""WHILE QQ$""QQ$U
PPER$(INKEY$)WENDGOTO 2330 210 NN+1WEND 220 PEN1INT(RND*6)N1 230 WHILE N PLY
240 IF S(N)Y(1,Q) THEN M$"PENALTY TAKER (NO.) "GOSUB ,3720PEN1VAL(L$)IF PEN11
OR PEN16 THEN GOTO 240 250 NN+1WEND 260 TAG1INT(RND*6)+1FOR N1 TO PLY 270 IF
S(N)Y(1,Q) THEN M$"TEAM AGGRESSION 1DELICATE 9HARD "GOSUB 3720TAG1VAL(L$) 280 I
F s(n)Y(1,Q) THEN M$"TEAM CAPTAIN (NO.)- "GOSUB 372U0CP1VAL(L$) IF cp11 OR CP17
THEN GOTO 280 290 IF TAG11 OR TAG19 THEN GOTO 270 300 NEXT N 310 A(CP1)A(CP1)
*1.5FOR N1 TO 9IF C(N)E(N) THEN A(N)A(N)-2 320 NEXT N 330 CLSLOCATE 1,1PRINT Z
$FOR N1 TO 7B$(N)N$(Y(2,Q),P(N))LOCATE 1,N+2PRqWd,SOCCE$4qWXXINT NLOCATE 4,N+2PR
INT B$(N)B(N)(Z(Y(2,Q),P(N))/10) 340 IF K$(Y(2,Q),P(N))"*" THEN PRINT "... IS I
NJURED"B(N)1 350 IF K$(Y(2,Q),P(N))"S" THEN PRINT "... IS SUSPENDED"B(N)1 360
TST0FOR QQ1 TO PLYIF S(QQ)VAL(L$) THEN TST1NEXT QQ 370 NEXT N 380 N1 390 WHIL
E NPLY 400 IF S(N)Y(2,Q) THEN LOCATE 1,24PRINT"Do you want to re-select your te
am (Y/N)"QQ$""WHILE QQ$""QQ$UPPER$(INKEY$)WENDIF QQ$"Y" THEN GOTO 2330 410 NN+1
WEND 420 ag1tag1PEN26FOR N1 TO PLYIF S(N)Y(2,Q) THEN M$"PENALTY TAKER (NO.) "GO
SUB 3720PEN2VAL(L$)IF PEN21 OR PEN27 THEN N98 430 NEXT NIF N99 THEN GOTO 420 4
40 TAG2INT(RND*6)+1FOR N1 TO PLY 450 IF S(N)Y(2,Q) THEN M$"TEAM AGGRESSION 1D
ELICATE 9HARD "GOSUB 3720TAG2VAL(L$)M$"TEAM CAPTAIN (NO.)-"GOSUB 3720CP2VAL(L$)
460 IF TAG21 OR TAG29 OR CP21 OR CP29 THEN GOTO 440 470 NEXT N 480 AG2TAG2B
(CP2)B(CP2)*1.5CLSFOR N1 TO 9IF D(N)F(N) THEN B(N)B(N)-2NEXT n 490 HUN1CLSSC10S
C20HT1 500 LOCATE 4,8PRINT Y$LwOCATE 17,8PRINT SC1"-"SC2LOCATE 27,8PRINT z$GOSU
B 3450 510 GOTO 550 520 LOCATE 17,8PRINT INT(GOAL1)"-"INT(GOAL2) 530 IF EXT1
THEN LOCATE 4,8PRINT Y$LOCATE 17,8PRINT INT(GOAL1)"-"INT(GOAL2)LOCATE 25,8PRINT
z$ 540 HT2H1GOAL1H2GOAL2 550 FOR N1 TO PLYIF S(N)Y(1,Q) THEN GOTO 580 560 NEX
T N 570 GOTO 630 580 HUN20GOSUB 3780LOCATE 1,24PRINT Y$"'S FORMATION-"LINE INP
UT "(Eg 2 2 2)-"c$ 590 IF VAL(MID$(C$,1,1))+VAL (MID$(C$,3,1))+VAL (MID$(C$,5,1
))6 THEN GOTO 580 600 GOSUB 3780M$Y$+"S METHOD 1-ATTACK 2-MODERATE 3-DEFEND-"GO
SUB 3720P1VAL(L$)IF P11 OR P13 THEN GOTO 600 610 GOSUB 3780M$Y$+"S TYPE OF PLAY
1-WINGERS 2-LONGBALL 3-SLOWLY-"GOSUB 3720T1VAL(L$)IF T11 OR T13 THEN GOTO 610
620 GOSUB 3780GOTO 640 63E0 S11C$"2 2 2"P1INT(RND(3))+1T1INT(RND(3))+1 640 FOR
N1 TO PLYIF S(N)Y(2,Q) THEN GOTO 660 650 NEXT NGOTO 790 660 LOCATE 1,24PRINT
SPACE$(40)HUN20GOSUB 3780LOCATE 1,24PRINT z$"S FORMATION-"LINE INPUT "(Eg 2 2 2)
-"d$ 670 IF VAL(MID$(dsWh,SOCCEqYf$,1,1))+VAL (MID$(d$,3,1))+VAL (MID$(d$,5,1))
6 THEN GOTO 660 680 GOSUB 3780M$z$+"S METHOD 1-ATTACK 2-MODERATE 3-DEFEND-"GOSU
B 3720P2VAL(L$)IF P21 OR P23 THEN GOTO 680 690 LOCATE 1,24PRINT SPACE$(40) GOSU
B 3780m$z$+"S TYPE OF PLAY 1-WINGERSq 2-LONG BALL 3-SLOWLY-"GOSUB 3720T2VAL(L$)I
F T21 OR T23 THEN GOTO 690 700 GOSUB 3780GOTO 800 710 LOCATE 1,23PRINT SPACE$(
40)LOCATE 1,24PRINT SPACE$(40) 720 INPUT #9,q 730 INPUT #9,ply 740 FOR a1 TO
plyINPUT #9,s(a)NEXT a 750 FOR a1 TO 8FOR b1 TO 10INPUT #9,k(a,b)NEXT b,aFOR a1
TO 8FOR b1 TO 10INPUT #9,k$(a,b)NEXT b,aFOR a1 TO 8FOR b1 TO 10INPUT #9,z(a,b)N
EXT b,aFOR a1 TO 8FOR b1 TO 10INPUT #9,l(a,b)NEXT b,a 760 FOR a1 TO 8INPUT #9,r
$(a)NEXT aFOR a1 TO 8INPUTL #9,t$(a)NEXT a 770 FOR a1 TO 10FOR b1 TO 2INPUT #9,
r(a,b)NEXT b,aFOR a1 TO 10FOR b1 TO 2INPUT #9,u(a,b)NEXT b,a 780 CLOSEIN 790 S
21D$"2 2 2"P2INT(RND(3))+1T2INT(RND(3))+1 800 DF1VAL(MID$(C$,1,1))DF2VAL(MID$(D
$,1,1))MD1VAL(MID$(C$,3,1))MD2VAL(MID$(D$,3,1))FD1VAL(MID$(C$,5,1))FD2VAL(MID$(D
$,5,1))G1(A(1)*2)+TAG1G2(B(1)*2)+TAG2 810 D10D20FOR N1 TO DF1D1D1+A(N+1)NEXT NF
OR N1 TO DF2D2D2+B(N+1)NEXT NM10FOR NDF1 TO DF1+MD1M1M1+A(N+1)NEXT NM20FOR NDF2
TO DF2+MD2M2M2+B(N+1)NEXT N 820 IF P11 THEN D1D1*0.8M1M1*1.2 830 IF P21 THEN D
2D2*0.8M2M2*1.2 840 F20FOR NDF2+MD2 TO DF2+MD2+FD2F2F2+B(N+1)NEXT NF10FOR NDF1+
MD1 TO DF1+MD1+FD1F1F1+A(N+1)NEXT N 850 IF P13 THEN D1D1*5F1F1*4.9 860 IF P23
THEN D2D2*5F2F2*4.9 870 IF P11 THEN F1F1*2.1D1D1*0.9 880 IF P21 THEN F2F2*2.1D
2D2*0.9 890 EN10FOR N1 TO 7EN1EN1+K(ZYX,N)NEXT NEN1EN1/700 900 EN20FOR N1 TO 7
EN2EN2+K(YZX,N)NEXT NEN2EN2/700 910 CHAG1+((F1+M1)*3)+G1+EN1 920 CH2AG2+((F2+M
2)*3)+G2+EN2 930 IF HT 1 THEN GOTO 1180 940 SC10FOR N1 TO INT(ABS(CH)/3) 950
AAINT(RND*10)IF AA7 THEN SC1SC1+0.5 960 NEXT n 970 FOR N1 TO 8FOR B1 TO 10K$(
N,B)" "NEXT B,N 980 SC20FOR N1 TO INT(ABS(CH2)/3) &tWc,SOCCEVLqWY990 AAINT(RND
*10)IF AA7 THEN SC2SC2+0.5 1000 NEXT N 1010 aaINT(RND*10)IF AA8 THEN SC1SC1+0.
5 1020 IF SC15 THEN SC15 1030 IF SC25 THEN SC25 1040 FOR N1 TO SC2 1050 AAIN
T(RND*90) 1060 JJ0FOR JSC2 TO 1 STEP -1IF AAU(J,1) THEN JJ1 1070 NEXT JIF JJ1
THEN GOTO 1050 1080 U(N,1)AA 1090 AAINT(RND*6)+1U(N,2)AA 1100 NEXT N 1110 F
OR N1 TO SC1 1120 AAINT(RND*90) 1130 JJ0FOR JSC1 TO 1 STEP -1IF AAR(J,1) THEN
JJ1 1140 NEXT JIF JJ1 THEN GOTO 1120 1150 R(N,1)AAAABvINT(RND*6)+1R(N,2)AANEXT
N 1160 FOR N1 TO SC1AAINT(RND*90)R(N,1)AAAAINT(RND*6)+1R(N,2)AANEXT N 1170 LO
CATE 1,24PEN 2PRINT SPACE$(40) 1180 FOR N(HT-1)*45 TO HT*45IF N0 THEN nn+1 119
0 FOR J1 TO SC1 1200 IF R(J,1)N THEN GOSUB 4100 1210 NEXT J 1220 FOR J1 TO SC
2 1230 IF U(J,1)N THEN GOSUB 4060 1240 NEXT J 1250 LOCATE 15,4PAPER 3PEN 0PR
INT "TIME"nPAPER 0PEN 1 1260 NEXT N 1270 IF HT1 THEN LOCATE 15,1PRINT"HALF TIM
E"LOCATE 17,8PRINT INT(GOAL1)LOCATE 21,8PRINT INT(GOAL2)GOTO 520 1280 H1INT(H1)
H2INT(H2) 1290 SCORGOAL1SCOGOAL2 1300 VAJ1VAL (J$(ZYX))VAJ2VAL(J$(YZX))IF SCOR
SCO THEN VAJ1VAJ1+5VAJ2VAJ2-7 1310 VAJ1VAL (J$(ZYX))VAJ2VAL(J$(YZX))IF SCORSCO
THEN VAJ1VAJ1-7VAJ2VAJ2+5 1320 IF SCORSCO THEN VAJ1VAJ1-2VAJ2VAJ2-2 1330 GOSUB
3140J$(ZYX)STR$(VAJ1)J$(YZX)STR$(VAJ2)LOCATE 15,1PRINT "FULL TIME"LOCATE 15,9PR
INT "("H1")-("H2")"GOSUB 2910 1340 G(1,Q)SCORG(2,Q)SCO 1350 IF Q25 THEN GOTO 1
470 1360 'IF GOT1088 OR GOT4500 OTHEN GOTO 3090 1370 RA(Q/2)RBINT(RA)IF RA-RB0
THEN GU1ELSE GU2 1380 FOR LP1 TO 4IF Y(1,Q)X(GU,LP,8) THEN RALP 1390 NEXT LP
1400 FOR LP1 TO 4IF Y(2,Q)X(GU,LP,8) THEN RBLP 1410 NEXT LP 1420 X(GU,RB,1)X(
GU,RB,1)+1X(GU,RA,1)X(GU,RA,1)+1X(GU,RA,5)X(GU,RA,5)+SCORX(GU,RA,6)X(GU,RA,6)+SC
OX(GU,RB,5)X(GU,RB,5)+SCOX(GU,RB,6)X(GU,RB,6)+SCOR 1430 ' 1440 IF SCORSCO THEN
X(GU,RA,2)X(GU,RA,2)+1X(GU,RA,7)X(GU,RA,7)+3X(GU,RB,4)X(GU,RB,4)+1 1450 IF SCO
SCOR THEN X(GU,RB,2)X(GU,RB,vWg,SOCCEGvWYS2)+1X(GU,RB,7)X(GU,RB,7)+3X(GU,RA,4)X(
GU,RA,4)+1 1460 IF SCORSCO THEN X(GU,RA,3)X(GU,RA,3)+1X(GU,RB,3)X(GU,RB,3)+1x(g
u,RA,7)X(GU,RA,7)+1x(gu,RB,7)X(GU,RB,7)+1 1470 GOSUB 3480CLSPEN 2 GOSUB 3450LOC
ATE 7,2PRINT " MATCH PERFORMANCE"PENb! 3LOCATE 1,8PRINT T$(Y(1,Q))LOCATE 25,8
PRINT T$(Y(2,Q))PEN 1 1480 FOR N1 TO 7 1490 IF K$(ZYX,O(N))"S" THEN LOCATE 1,N
+9PRINT N$(ZYX,O(N))RAINT(RND*10)+1 1500 IF RA5 THEN V(N)V(N)+INT(RND*2) 1510
IF RA6 THEN V(N)V(N)-INT(RND*2) 1520 LOCaATE 16,N+9PRINT V(N)H(1,ZYX,O(N))V(N)
1530 IF K$(YZX,P(N))"S" THEN LOCATE 25,N+9PRINT N$(YZX,P(N))RAINT(RND*10)+1 15
40 IF RA5 THEN W(N)W(N)+INT(RND*2) 1550 IF RA6 THEN W(N)W(N)-INT(RND*2) 1560 L
OCATE 37,N+9PRINT W(N)H(1,YZX,P(N))W(N) 1570 IF K$(YZX,P(N))"S" THEN H(2,YZX,P(
N))H(2,YZX,P(N))+1 1580 IF K$(ZYX,O(N))"S" THEN H(2,ZYX,O(N))H(2,ZYX,O(N))+1 1
590 NEXT N 1600 FOR N1 TO 10K$(ZYX,N)" "K$(YZX,N)" "NEXT N 1610 GOSUB 3480CLSP
EN 2LOCATE 15,1PRINT "INJURIES"LOCATE 15,E2PRINT "--------" 1620 QQ6LOCATE 13,4
PRINT "MINOR INJURIES-"PEN 3 1630 FOR N1 TO 10IINT(RND*(20-TAG1))IF I2 THEN LOC
ATE 13,QQPRINT N$(ZYX,N)" - "T$(ZYX)QQQQ+1 1640 NEXT N 1650 FOR N1 TO 10IINT(R
ND*(20-TAG2))IF I2 THEN LOCATE 13,QQPRINT N$(YZX,N)" - "T$(YZX)QQQQ+1 1660 NEXT
N 1670 PEN 2LOCATE 13,13PRINT "MAJOR INJURIES-"PEN 3QQ15 1680 FOR N1 TO 10IIN
T(RND*(27-TAG1))IF I2 THEN LOCATE 13,QQPRINT N$(ZYX,N)" - "T$(ZYX)K$(ZYX,N)"*"K(
ZYX,N)K(ZYX,N)-40QQQQ+1 1690 NEXT N 1700 FOR N1 TO 10IINT(RND*(27-TAG2))IF I2
THEN LOCATE 13,QQPRINT N$(YZX,N)" - "T$(YZX)K$(YZX,N)"*"K(YZX,N)K(YZX,N)-40QQQQ+
1 1710 NEXT NLOCATE 1,22PEN 1PRINT "N.B.MINOR INJURED PLAYERS CAN PLAY IN"PRINT
"YOUR NEXT GAME AS NORMAL"D 1720 GOSUB 3480PEN 2CLSLOCATE 10,1PRINT "DISIPLINAR
Y ACTION" 1730 QQ5 1740 LOCATE 15,3PRINT"BOOKINGS-" 1750 PEN 3 1760 FOR N1 T
O 7IINT(RND*(20-TAG1))IF I2 THEN LOCATE 13,QQPRINT N$(ZYX,N)" - "T$(ZYX)QQQQ+1
1770 NEXT N 1780 FOR N1 tl,SOCCEuWbTO 7IINT(RND*(20-TAG2))IF I2 THEN LOCATE 13,
QQPRINT N$(YZX,N)" "T$(YZX)QQQQ+1 1790 NEXT N 1800 PEN 2 1810 LOCATE 15,15PRI
NT "SUSPENSIONS-" 1820 QQ17 1830 PEN 3 1840 FOR N1 TO 7IINT(RND*(27-TAG1))IF
I2 THEN LOCATE 13,QQPRINT N$(ZYX,NL)" - "T$(ZYX)K$(ZYX,N)"S"QQQQ+1 1850 NEXT N
1860 FOR N1 TO 7IINT(RND*(27-TAG2))IF I2 THEN LOCATE 13,QQPRINT N$(YZX,N)" - "T
$(YZX)K$(YZX,N)"S"QQQQ+1 1870 NEXT NPEN 1LOCATE 1,22PRINT"N.B.BOOKED PLAYERS CA
N PLAY IN YOUR NEXT GAME AS NOtRMAL" 1880 FOR N1 TO 7K(ZYX,O(N))K(ZYX,O(N))-(IN
T(RND*10)+1)IF K(ZYX,O(N))0 THEN K(ZYX,O(N))1 1890 NEXT N 1900 FOR N1 TO 7K(YZ
X,P(N))K(YZX,P(N))-(INT(RND*10)+1)IF K(YZX,P(N))0 THEN K(YZX,P(N))1 1910 NEXT N
1920 IF Q25 THEN GOSUB 3500GOSUB 3840 1930 IF Q25 AND SCORSCO AND RPL0 THEN C
LSLOCATE 12,10PRINT "R E P L A Y"RPL1GOSUB 3480GOTO 80 1940 IF Q25 AND SCORSCO
AND RPL1 THEN GOSUB 4250 1950 qq+1 1960 IF Q25 THEN GOTO 4130 1970 IF Q26 THE
N GOTO 4220 1980 IF Q27 THEN GOTO 4200 1990 IF Q28 THEN GOTO 4400 2000 GOSUB
3480 2010 GOTO 10 2020 REP0CLSFOR N1 TO 10 2030 PEN 7LOCATE 1,1PRINT T$(TmN)L
OCATE 20,1PRINT " ENERGY PERFORM" 2040 LOCATE 1,N+2PRINT NLOCATE 5,N+2PRI
NT G$(TMN,N)LOCATE 9,N+2PRINT NaA$(TmN,N)LOCATE 25,N+2PRINT INT(K(TmN,N))LOCATE
32,N+2PRINT INT(H(1,TmN,N)) 2050 IF K$(TmN,N)"*" OR K$(TmN,N)"S" THEN LOCATE 7,
N+2PRINT K$(TmN,N) 2060 IF N10 THEN LOCATE 20,N+2PRINT "P"N 2070 IF N8 OR N9 T
HEN LOCATE 20,N+2PRINT "S"N-7 2080 NEXT NLOCATE 1,20PRINT "* - INJURED PLAYER
P1 - PLAYERS NO."LOCATE 1,21PRINT"S - SUSPENDED PLAYER S1 - SUBSITUTE NO." 209
0 IF REP0 THEN LOCATE 1,13INVERSE 1PRINT"SELECT PLAYER TO REPLACE "TAB(1)N$(TWN,
REP)GOTO 2180 2100 LOCATE 1,23INPUT"CHANGE TEAM (Y/N)"L$L$UPPER$(L$) 2110 IF L
$"Y" THEN GOTO 2170 2120 IF L$"N" THEN GOTO 2330 2130 GOTO 2100 2140 IF G11 A
ND FP0 THEN FP1IF G21 THEN TRN0GOTO 2330 2150 IF G21 AND FP1 THEN GOTO 80 2160
GOTO 80 2170 M$"NUMBER-"GOSUB 3720NUBwvWj,SOCCEopuYfMVAL(L$)IF NUM1 OR NUM10 T
HEN GOTO 2170 2180 M$"NUMBER OF NEW MAN-"GOSUB 3720SNUMVAL(L$)IF SNUM1 OR SNUM1
0 THEN GOTO 2180 2190 IF SNUMNUM THEN GOTO 2170 2200 NN$N$(TMN,NUM)NN1$N$(TMN,
SNUM)N$(TMN,SNUM)NN$N$(TMN,NUM)NN1$ 2210 NN$K$(TdMN,NUM)NN1$K$(TMN,SNUM)K$(TMN,
SNUM)NN$K$(TMN,NUM)NN1$ 2220 NNh(1,TMN,NUM)NN1h(1,TMN,SNUM)h(1,TMN,SNUM)NNh(1,T
MN,NUM)NN1 2230 NN$g$(TMN,NUM)NN1$g$(TMN,SNUM)g$(TMN,SNUM)NN$g$(TMN,NUM)NN1$ 2
240 NNK(TMN,NUM)NN1K(TMN,SNUM)K(TMN,SNUM)NNK(TMN,NUM)NN1 2250 FOR N1 TO 10IF L(
NOU,N)SNUM THEN TRN2N 2260 NEXT N 2270 L(NOU,TRN1)SNUM 2280 L(NOU,TRN2)NUM 2
290 IF GON1 THEN O(NUM)SNUM 2300 IF GON2 THEN P(NUM)SNUM 2310 GOTO 2020 2320
GOTO 2080 2330 PEN 7CLSGEM1 2340 IF FP0 AND G11 THEN TMNNU 2350 IF G21 AND FP
1 THEN TMNNU1 2360 IF G10 AND G21 AND FP0 THEN TMNNU1 2370 LOCATE 1,24PRINT"
PLEASE WAIT"QQFRE("")CLS 2380 PEN 2LOCATE 19,10PRINT "TEAM"PEN 3LOC
ATE 27,10PRINT T$(TmN)PEN 2LOCATE R719,16PRINT "MORALE"PEN 3LOCATE 27,16PRINT J$
(tmn)PEN 2LOCATE 19,13PRINT"NAME"PEN 3LOCATE 27,13PRINT R$(TMN) 2390 INK 1,24LO
CATE 1,1PRINT"1-CHANGE TEAM"TAB(1)" "TAB(1)"2-TRAINING"TAB(1)" "TAB(1)"3-PLAY MA
TCH"TAB(1)" "TAB(1)"4-TRADE PLAYERS" a#2400 PRINT TAB(1)" "TAB(1)""TAB(1)" "TAB
(1)"6-INJURIES"TAB(1)" "TAB(1)"7-FIXTURE LIST"TAB(1)" "TAB(1)"0-MANAGER RATINGS"
TAB(1)" "TAB(1)"L-CHECK LEAGUES"TAB(1)" "TAB(1)"8-SAVE GAME" 2420 l$INKEY$IF L$
"" THEN 2420 2430 SOUND 1,239,6 2440 IF L$"1" THEN./ GOTO 2020 2450 IF L$"2"
AND TN0 THEN GOTO 2540 2460 IF L$"3" THEN CLSLEGO0GEM1GOTO 2140 2470 IF UPPER$
(L$)"L" AND GEM1 THEN GOSUB 3830GOTO 2330 2480 aFRE("")IF L$"8" THEN GOTO 4510
2490 IF L$"6" THEN GOTO 2770 2500 IF L$"0" THEN GOSUB 3010GOTO 2330 2510 IF L
$"7" THEN GOTO 2820 2520 IF L$"4" THEN GOTO 3190 2530 GOTO 2420 2540 CLSLOCAT
E 13,2PRINT"TRAINING"TAB(1)" "TAB(12)"---------" 2550 PEN 5LOCATE 1,5PRINT"PRES
S-" 2560 PEN 6LOCATE 3,7PRINT"3-WORK ON FITNESS"PRINTPRINvWm,SOCCEwWdT TAB(3)"4
-WORK ON GENERAL SKILL"PEN 3LOCATE 3,16PRINT"YOU HAVE "M(TmN)" HOURS OF TRAINING
LEFT" 2570 L$""WHILE L$""L$INKEY$WENDIF L$"4" OR L$"3" THEN GOTO 2580 ELSE GOT
O 2570 2580 IF L$"3" THEN TRN3ELSE TRN4 2590 M$"HOW MANY HOURS OF TRAINING (0
-"+STR$(M(TMN))+") "GOSUB 3720TRVAL(L$)IF TR0 OR TRM(TMN) THEN GOTO 2590 2600 I
F TRN4 THEN GOSUB 2650 2610 IF TRN3 THEN GOSUB 2710 2620 M(TMN)M(TMN)-TR 2630
IF M(TMN)0 THEN TN1CLSLOCATE 15,10PRINT"TRAINING COMPLETED..........1..." 2640
TR0LOCATE 1,24PRINT SPACE$(40)GOSUB 3480GOTO 2330 2650 FOR N1 TO 10 2660 raIN
T(RND*10)+1 2670 IF RA3 THEN H(1,TmN,N)H(1,TmN,N)-(INT(TR/10))IF H(1,TmN,N)0 TH
EN H(1,TmN,N)1 2680 IF RA7 THEN H(1,TmN,N)H(1,TmN,N)+(INT(TR/10)) 26 90 NEXT N
2700 RETURN 2710 FOR N1 TO 10 2720 RAINT(RND*10) 2730 IF RA3 THEN K(TmN,N)K
(TmN,N)+(INT(TR/10))IF K(TMN,N)100 THEN K(TMN,N)100 2740 IF RA7 THEN K(TmN,N)K(
TmN,N)-(INT(TR/10))IF K(TMN,N)1 THEN K(TMN,N)1 2750 NEXT N 2760 RETURND/ 277
0 CLSLOCATE 10,1PRINT"INJURY LIST"'TAB(9)"-------------" 2780 PRINTPRINTPRINT
2790 FOR N1 TO 8FOR J1 TO 10IF K$(N,J)"*" THEN PEN 7PRINT" "PEN 2PRINT N$(N,J)PE
N 7PRINT" - "T$(N)PRINT 2800 NEXT JNEXT N 2810 GOSUB 3480GOTO 2330 2820 LEG1C
LSLOCATE 10,1PRINT"FIXTURE LISTS"TAB(1)" "TAB(10 ) "-------------" 2830 PRINTPR
INT"HALF 1"rd12FOR j1 TO rdLOCATE 1,j+5PRINT leg AND rd12PRINT " - "t$(y(1,j))TA
B(20)" V "t$(y(2,j))IF leg1 THEN leg2GOTO 2850 2840 legA1 2850 IF jq THEN PE
N 2LOCATE 17,j+5PRINT g(1,j)"-"g(2,j)PEN 1 2860 NEXT j 2870 IF rd12 THEN GOSUB
3480CLSPRINT "HALF 2"FOR j13 TO 24LOCATE 1,j-7PEN 2PRINT legLOCATE 3,j-7PRINT"-
"t$(y(1,j))TAB(18)" V "t$(y(2,j))IF leg1 THEN leg2GOTO 2890 2880 leg1 2890 I
F jq THEN PEN 2LOCATE 16,J-7PRINT g(1,j)"-"g(2,j)PEN 1 2900 NEXT jGOSUB 3480GOT
O 2330 2910 RETURN 2920 STOP 2930 GOSUB 3500GOSUB 3480 2940 GOSUB 3840 2950
IF scorsco THEN LOCATE 11,1PRINT"RELAY "GOTO 110 2pvWl,SOCCEUwWc960 IF q1 TH
EN IF scorsco THEN fi1a1 2970 IF q1 THEN IF scorsco THEN fi1b2 2980 IF q2 THEN
IF scorsco THEN fi2a2 2990 IF q2 THEN IF scorsco THEN fi2b1 3000 GOTO 1490 3
010 CLSPAPER 2PEN 0LOCATE 5,1PRINT "M A N A G E R S R A T I N G S"PEN 2PAPER
0 3020 FOR n1 TO 4 3030 PEN 5LOCATE 5,n*2+2NOX(1,N,8)PRINT t$(nO)PEN 7LOCATE 2
0,N*2+2PRINT r$(nO) 3040 rat50+((x(1,n,5)-x(1,n,6))*2)+(x(1,n,7)-1)*3IF rat100
THEN rat100 3050 IF rat1 THEN rat1 3060 PEN 3LOCATE 31,N*2+2PRIN#kT RAT" %" 3
070 NEXT n 3080 FOR n1 TO 4 3090 PEN 5LOCATE 5,(n+4)*2+2NOX(2,N,8)PRINT t$(NO)
PEN 7LOCATE 20,(N+4)*2+2PRINT r$(NO) 3100 rat50+((x(2,n,5)-x(2,n,6))*2)+(x(2,n,
7)-1)*3IF rat100 THEN rat100 3110 IF rat1 THEN rat1 3120 PEN 3LOCAT6E 31,(N+4)
*2+2PRINT RAT" %" 3130 NEXT nGOSUB 3480RETURN 3140 IF vaj1100 THEN vaj1100 31
50 IF vaj11 THEN vaj11 3160 IF vaj2100 THEN vaj2100 3170 IF vaj21 THEN vaj21
3180 RETURN 3190 CLSPRINT T$(TMN)" PERFORMANCE"FOR N1 TO 10LOCATE 1,N+4PRINT
N" - "N$(TMN,N)TAB(18)INT(H(1,TMN,N))NEXT N 3200 M$"SELECT PLAYER TO TRADE WITH
-"GOSUB 3720tdVAL(l$) 3210 IF td1 OR td10 THEN GOTO 3200 3220 e$n$(twn,td) 32
30 CLSFOR n1 TO 8LOCATE 1,n+4PRINT n"-"t$(n)NEXT n 3240 m$"SELECT TEAM TO TO TR
ADE WITH-"GOSUB 3720TRVAL(L$)IF TR1 OR TR8 THEN GOTO 3240 3250 IF TRS(TMN) THEN
GOTO 3240 3260 LOCATE 1,1PRINT T$(TR)" PERFORMANCE"FOR N1 TO 10LOCATE 1,N+3PR
INT N" - "N$(TR,N)TAB(16)INT(H(1,TR,N))NEXT N 3270 M$"SELECT# PLAYER TO TRADE "
+E$+" WITH (OCANCEL)"GOSUB 3720SEVAL(L$) 3280 IF SE0 OR SE10 THEN GOTO 3270 32
90 IF SE0 THEN GOTO 2330 3300 I5IINT(RND(1+(H(1,TMN,TD)))) 3310 IF H(1,TR,SE)0
THEN I1 3320 CLSLOCATE 9,1PRINT "POSSIBLE DEAL"TAB(8)"--------c ------"LOCATE
10,3PRINT N$(TMN,TD)" OF "T$(TMN)LOCATE 15,5PRINT "FOR"LOCATE 10,7PRINT N$(TR,SE
)" OF "T$(TR) 3330 FOR N1 TO PLYIF S(N)TR THEN I1PRINT (R$(TR))TAB(1)"DO YOU AC
CEPT THIS DEAL(Y/N)"TAB(1)"-"INPUT L$IF L$"Y" OR L$"y" THEN I61xn,SOCCE lxWd0GOT
O 3350 3340 NEXT N 3350 GOSUB 3480IF I1 THEN CLSLOCATE 13,5PRINT"THE DEAL"PRI
NTPRINT TAB(12)"HAS BEEN"PRINTPRINT TAB(12)"ACCEPTED"GOTO 3370 3360 CLSLOCATE 1
3,5PRINT".SORRY.."TAB(13)"THE DEAL"TAB(14)"AS NOT"TAB(15)"BEEN"TAB(13)"ACCEPTEDp
q"GOSUB 3480GOTO 2330 3370 F$N$(TR,SE)H$K$(TMN,TD)I$K$(TR,SE)PEFH(1,TMN,TD)POFH
(1,TR,SE)GGGI(TMN,TD)GGJI(TR,SE) 3380 SKI1Z(TMN,TD)SKI2Z(TR,SE)Z(TR,SE)SKI1Z(TM
N,TD)SKI2 3390 PEF2H(2,TMN,TD)POF2H(2,TR,SE) 3400 EGK(TMN,TD)EJK(TR,SE)O$G$(TM
N,TD)P$G$(TR,SE) 3410 N$(TR,SE)E$N$(TMN,TD)F$K$(TMN,TD)I$K$(TR,SE)H$H(1,TWN,TD)
POFH(1,TR,SE)PEFI(TWN,TD)GGJI(TR,SE)GGG 3420 K(TMN,TD)EJK(TR,SE)EGG$(TMN,TD)P$G
$(TR,SE)O$ 3430 H(2,TMN,TD)POF2H(2,TR,SE)PEF2 3440 GOSUB 3480GOTO 2330 3450 H
A11HA21ZYXy(1,Q)YZXY(2,Q)RETURN 3460 CLSFOR N1 TO 10LOCATE 1,N+2PRINT NTAB(5)N$
(TMN,N)G$(TMN,N)TAB(16)K(TMN,N)NEXT N 3470 LOCATE 1,1PRINT"NO "T$(TMN)TAB(17)"
PS"TAB(1)"-------------------"GOSUB 3480RETURN n*3480 LOCATE 1,24PRINT SPACE$(4
0)SOUND 1,239,6PAPER 4PEN 1LOCATE 8,24PRINT"PRESS ANY KEY TO CONTINUE"WHILE INKE
Y$""WEND 3490 RETURN 3500 FOR N1 TO 4FOR J1 TO 4 3510 IF X(1,N,7)X(1,J,7) THE
N J(N)J(N)+1GOTO 3540 3520 IF x(1,n,7)x(1,J,7) AND (X(1,N,5)-X(1,N,6))(X(1,J,5)
-X(1,J,6)) THEN J(N)J(N)+1GOTO 3540 3530 IF X(1,N,7)X(1,J,7) AND X(1,N,5)X(1,J,
5) THEN J(N)J(N)+1 3540 NEXT JNEXT N 3550 FOR N1 TO 4FOR J1 TO 4IF X(2,N,7)X(2
,J,7) THEN N(N)N(N)+1GOTO 3580 3560 IF X(2,N,7)X(22,J,7) AND (X(2,N,5)-X(2,N,6)
)(X(2,J,5)-X(2,J,6)) THEN N(N)N(N)+1GOTO 3580 3570 IF X(2,N,7)X(2,J,7) AND X(2,
N,5)X(2,J,5) THEN N(N)N(N)+1 3580 NEXT JNEXT N 3590 GOTO 3690 3600 FOR N1 TO
4IF J(N)1 THEN A1N 3610 NEXT N 3620 FOR N1 TO 4IF J(NC)2 THEN A2N 3630 NEXT N
3640 FOR N1 TO 4IF N(N)1 THEN B1N+4 3650 NEXT N 3660 FOR N1 TO 4N(N)2 THEN B
2N+4 3670 NEXT N 3680 RETURN 3690 FOR N1 TO 4J(N)4-J(N)NEXT N 3700 FOR N1 TO
4N(N)4-N(N)NEXT N 3710 RETURN 3720 LOCATE 1,24PRINgvWj,SOCCExWXT SPACE$(40)LO
CATE 1,24PRINT m$INPUT l$IF UPPER$(L$)"" THEN GOTO 3720 3730 FOR I1 TO LEN(L$)m
ark$MID$(l$,i,1)IF ASC(mark$)48 OR ASC(mark$)57 THEN I98 3740 NEXT IIF I99 THEN
GOTO 3720 3750 RETURN 3760 INPUT L$IF LEN(L$)LE THEN 3760 37740 RETURN 3780
LOCATE 1,24PRINT SPC(40)LOCATE 1,25PRINT SPC(39)RETURN 3790 DATA A1,B2,A2,B1
3800 DATA FI1,FI2 3810 RETURN 3820 STOP 3830 3840 TST1 3850 FOR B1 TO 3 3
860 IF X(1,B,7)X(1,(B+1),7) THEN FOR A1 TO 8MVX(1,B,A)MV1X(1,B+1,A)Xf(1,B+1,A)MV
X(1,B,A)MV1NEXT ATST0 3870 NEXT B 3880 IF TST0 THEN GOTO 3840 3890 CLSPEN 3PR
INT "GROUP 1"PAPER 10PEN 0LOCATE 1,2PRINT"TEAM P W D L F A PTS"
3900 PAPER 0PEN 3 3910 FOR B1 TO 4 3920 LOCATE 1,b+5PRINT t$(X(1,B,8))LOCATE
15,b+5FOR j1 TO 7PRINT USING "###"x(1,b,j)NEXT j 3930 NEXT B 3940 TST1 3950 F
OR B1 TO 3 3960 IF X(2,B,7)X(2,(B+1),7) THEN FOR A1 TO 8MVX(2,B,A)MV1X(2,B+1,A)
X(2,B+1,A)MVX(2,B,A)MV1NEXT ATST0 3970 NEXT B 3980 IF TST0 TKHEN GOTO 3940 39
90 LOCATE 1,11PEN 3PRINT "GROUP 2"PAPER 10PEN 0LOCATE 1,12PRINT"TEAM
P W D L F A PTS"PEN 3PAPER 0 4000 FOR g1 TO 4 4010 LOCATE 1,G+14PRINT t$(
X(2,G,8))LOCATE 15,G+14FOR j1 TO 7PRINT USING "###"x(2,g,j)NEXT J 4020 NEXT g
4030 GOSUB 3480 4040 RETURN 4050 LOCATE 1,23PRINT"
"RETURN 4060 LOCATE 23,GOAL2+10PRINT N" - "B$(U(J,2)) 4070 PEN 2LOCA
TE 1,19PRINT SPACE$(40)LOCATE 15,19PRINT ""B$(U(J,2))""LOCATE o1,21PRINT SPACE$(
40)LOCATE 12,21PRINT V$(INT(RND(W(U(GOAL2+1,2))))+1)PEN 1 4080 goal2goal2+1LOCA
TE 21,8PEN 1PRINT goal2 4090 RETURN 4100 LOCATE 4,GOAL1+10PRINTN" - "A$(R(J,2)
)LOCATE 1,19PRINT SPACE$(40)LOCATE 15,19PEN 2PRINT""A$(R(J,2))""LOCATE 1,21PRINT
SPACE$(40)LOCATE 12,21PRINT V$(INT(RND* 21)+1)GOAL1GOAL1+1LOCATE 17,8PEN 1PRINT
GOAL1 4110 PEN 1I(ZYX,O(R(J,2)))I(ZYX,O(R(J,2)))+1I(ZYX,O(R(J,2)))I(ZYX,O(R(J,
2)))+1 4120 RETURN 4130 Y(1,25)X(1,1,8)Y(2,25)X(2,2,8)zWp,SOCCEWlY(1,26)X(1,2,
8)Y(2,26)X(2,1,8) 4140 CLSLOCATE 5,4PEN 2PRINT "SOCCER 7'S SEMI-FINALS"PEN 3 4
150 LOCATE 10,6PRINT T$(Y(1,25))" V "T$(Y(2,25)) 4160 LOCATE 10,10PRINT T$(Y(1,
26))" V "T$(Y(2,26)) 4170 GOSUB 3480 4180 CLSLOCATE 10,4PRINT "SEHMI-FINALS"
4190 GOTO 20 4200 CLSLOCATE 10,4PRINT "SOCCER 7 FINALS" 4210 GOTO 20 4220 IF
G(1,25)G(2,25) THEN Y(1,27)Y(1,25) ELSE Y(1,27)Y(2,25) 4230 IF G(1,26)G(2,26) T
HEN Y(2,27)Y(1,26) ELSE Y(2,27)Y(2,26) 4240 GOTO 4200 4250 CLSPEN 2LOCATE 14,5
PRINT"PENALTIES"PEN 1 4260 PENS1A(PEN1)+A(1)PENS2B(PEN2)+B(1) 4270 'AA1BB1 42
80 IF PENS2PENS1 OR PENS2PENS1 THEN BBINT(RND*3)+1 4290 IF PENS1PENS2 THEN AAIN
T(RND*3)+1 4300 IF AA3 THEN AA2 4310 IF BB3 THEN BB2 4320 IF AABB THEN AAA
A+1 4330 LOCATE 5,10PRINT T$(Y(1,Q))LOCATE 25,10PRINT T$(Y(2,Q)) 4340 LOCATE 5
,12PRINT "SCORED "AALOCATE 5,13PRINT "PENALTIES"LOCATE 25,12PRINT"SCORED "BBLOCA
TE 25,13PRINT "PENALTIES" 4350 GOSUB 3480CLSPEN 2LOCATE 15,5PRINT"FIFNAL SCORE"
PEN 1 4360 SCOSCO+AASCORSCOR+BB 4370 LOCATE 8,10PRINT T$(Y(1,Q))LOCATE 25,10PR
INT T$(Y(2,Q)) 4380 LOCATE 8,11PRINT SCOLOCATE 26,11PRINT SCOR 4390 RETURN 44
00 INK 1,20,2SPEED INK 20,20PEN 1CLSPRINT"******************************%*******
**** C O N G R A T U L A T I O N S **************************************
***" 4410 PEN 2 4420 IF scorSCO THEN KY(1,27) ELSE KY(2,27) 4430 FOR A5 TO 10
LOCATE 6+A,APRINT T$(K)NEXT ALOCATE 10,12PRINT"WHO WAS MANAGED BY"LOCATE 14,13PR
INT R$(K) 4440 LOCATE 1,15PRINT"***** YOU ARE SOCCER 7'S WINNER *****" 4450
GOSUB 3480 4460 INK 1,20,2SPEED INK 20,20PEN 1LOCATE 1,15CLSPRINT"************
***************************** DO YOU WANT TO PLAY ANOTHER SEASON **************
*******L********************" 4470 QQ$""WHILE QQ$""QQ$UPPER$(INKEY$)WEND 4480
IF QQ$"Y" THEN Q1SESSES+1WW1GOTO 4510 4490 IF QQ$"N" THEN CLSPRINT"OK...THANK
YOU FOR PLAYING..."END 4500 GOTO 4470 4510 IF q25 AND WW0 THEN CLSPRINT"SORRY
!! Nxk,SOCCE *w$ O SAVING AFTER WEEK 24 !!"GOSUB 3480GOTO 2370 4520 CLOSEOUTOPE
NOUT"!saved.gm" 4530 PRINT #9,q 4540 PRINT #9,ply 4550 FOR a1 TO plyPRINT #9,
s(a)NEXT a 4560 FOR a1 TO 8FOR b1 TO 10PRINT #9,k(a,b)NEXT b,a 4570 FOR a1 TO
8FOR b1 TO 10PRINT #9,z(a,b)NEXT b,a 4580 FOR a1 TO 8FOR b1 TO 10PRINT #9,l(a,b
)NEXT b,a 4590 FOR a1 TO 8PRINT #9,r$(a)NEXT a 4600 FOR a1 TO 8PRINT #9,t$(a)N
EXT a 4610 FOR a1 TO 8FOR b1 TO 10 4620 PRINT #9,k$(a,b)NEXT b,a 4630 FOR a1
TO 10FOR b1 rTO 2PRINT #9,r(a,b)NEXT b,a 4640 FOR a1 TO 10FOR b1 TO 2PRINT #9,u
(a,b)NEXT b,a 4650 FOR A1 TO 2FOR B1 TO 24PRINT #9,G(A,B)NEXT B,A 4660 FOR A1
TO 2FOR B1 TO 4FOR C1 TO 8PRINT #9,X(A,B,C)NEXT C,B,A 4670 FOR A1 TO 8PRINT #9,
J$(A)NEXT A 4680 CLOSEOUT 4690 IF WW0 THEN GOTO 2370 ELSE GOTO 4700 4700 CLSL
OCATE 1,2PRINT"NOW RELOAD YOUR ORIGIONAL TAPE, PRESSINGY TO LOAD A SAVED GAME"
Tous droits réservés. Reproduction sans autorisation interdite. © Kukulcan