home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PROGRAMS / UTILS / MEMORIA / MEMXD.ZIP / EMS40.BAS < prev    next >
Encoding:
BASIC Source File  |  1989-03-21  |  18.0 KB  |  237 lines
  1. 100 REM - BASIC PROGRAM TO CREATE EMS40NEW.COM
  2. 110 CLS:PRINT "Creating EMS40NEW.COM": OPEN "EMS40NEW.COM" AS #1 LEN = 1
  3. 120 FIELD #1, 1 AS A$: CHECKSUM#=0
  4. 130 FOR I = 1 TO   218
  5. 140  LINESUM#=0: LOCATE 2,3: PRINT "Countdown: "   218 - I ;
  6. 150  FOR J = 1 TO  16: READ BYTE$: BYTE = VAL("&H" + BYTE$)
  7. 160   CHECKSUM# = CHECKSUM# + BYTE: LINESUM# = LINESUM# + BYTE
  8. 170   IF (BYTE < 256) THEN LSET A$=CHR$(BYTE): PUT #1
  9. 180  NEXT J
  10. 190  READ LINETOT$: LINECHECK# = VAL("&H"+LINETOT$)
  11. 200  IF LINECHECK# = LINESUM# THEN GOTO 220
  12. 210  LOCATE 4,2: PRINT "Error in line #"  ;  260 +  10 * I: GOTO 260
  13. 220 NEXT I
  14. 230 CLOSE: READ FILETOT$ : FILECHECK# = VAL(FILETOT$)
  15. 240 IF CHECKSUM# <> FILECHECK# THEN GOTO 260
  16. 250 PRINT: PRINT "EMS40NEW.COM created successfully": SYSTEM
  17. 260 PRINT: PRINT "EMS40NEW.COM is not valid!": END
  18. 270 DATA FF, FF, FF, FF,  0, 80, 98,  0, A3,  0, 45, 4D, 4D, 58, 58, 58,   79E
  19. 280 DATA 58, 30, 1B,  B, 45, 4D, 53, 20, 34, 2E, 30, 20, 53, 69, 6D, 75,   403
  20. 290 DATA 6C, 61, 74, 6F, 72, 20, 28, 43, 29, 20, 31, 39, 38, 39, 20, 5A,   44B
  21. 300 DATA 69, 66, 66, 20, 43, 6F, 6D, 6D, 75, 6E, 69, 63, 61, 74, 69, 6F,   63D
  22. 310 DATA 6E, 73,  D,  A, 50, 43, 20, 4D, 61, 67, 61, 7A, 69, 6E, 65, 20,   4F7
  23. 320 DATA FE, 20, 44, 6F, 75, 67, 6C, 61, 73, 20, 42, 6F, 6C, 69, 6E, 67,   668
  24. 330 DATA  D,  A, 24, 1A,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,    55
  25. 340 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0, 40,  0,  0,  0, 93,  0,  0,    D3
  26. 350 DATA  0, 40,  0,  0,  0, 93,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,    D3
  27. 360 DATA  0,  0,  0,  0,  0,  0,  0,  0, 2E, 89, 1E, 64,  0, 2E, 8C,  6,   1F9
  28. 370 DATA 66,  0, CB, 9C, 50, 53, 51, 52, 57, 56, 1E,  6,  E, 1F, FC, C4,   5D1
  29. 380 DATA 3E, 64,  0, 26, 8A, 5D,  2, 80, FB,  0, 75,  5, E8, 5D,  B, EB,   5E1
  30. 390 DATA  8, 80, FB, 10, 76,  3, B8,  3, 80,  D,  0,  1, 26, 89, 45,  3,   44C
  31. 400 DATA  7, 1F, 5E, 5F, 5A, 59, 5B, 58, 9D, CB,  0,  0,  0,  0,  0,  0,   3B1
  32. 410 DATA  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,     1
  33. 420 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 18,  0,    18
  34. 430 DATA FF,  0,  0,  0,  0,  0,  0,  0,  0, 80, FC, 88, 74,  5, 2E, FF,   4A9
  35. 440 DATA 2E, DA,  0, 2E, A1, DE,  0, F8, CA,  2,  0, 95,  1, 98,  1, 9F,   647
  36. 450 DATA  1, AD,  1, B9,  1, E1,  1,  6,  2,  A,  2, 43,  2, 21,  A, 21,   2F0
  37. 460 DATA  A, 67,  2, 7F,  2, 9A,  2, C7,  2, 2A,  3, A2,  3, E8,  3,  C,   422
  38. 470 DATA  4, 33,  4, 84,  4, 13,  5, 39,  5, B8,  5, 66,  8, 95,  8, CC,   3AD
  39. 480 DATA  8, 19,  9, 21,  A, BA,  9, 55, 8B, EC, FB, FC, 51, 57, 56, 1E,   5F7
  40. 490 DATA  6,  E, 1F, 80, FC, 5D, 77, 29, 80, FC, 40, 7C, 24, BF, 8A,  1,   652
  41. 500 DATA 57, 50, 80, EC, 40, 8A, C4, 32, E4, D1, E0,  5, 1B,  1, 8B, F8,   80C
  42. 510 DATA 58, FF, 35, 8B, 7E, FC, E8, 71,  9, C3,  7, 1F, 5E, 5F, 59, 5D,   74F
  43. 520 DATA CF, B4, 84, EB, F5, 33, C0, C3, 8B, 1E, E9,  0, 33, C0, C3, 33,   918
  44. 530 DATA D2, 4A, F8, E8, D9,  0, 8B, 16, FE,  0, 33, C0, C3,  B, DB, 74,   884
  45. 540 DATA  4, E8, 18,  7, C3, B4, 89, EB, FB, 53, 52, 72, 1D, 3C,  3, 7F,   6E3
  46. 550 DATA 1C, 83, FB, FF, 75,  8, 8A, D8, 33, C0, 33, D2, EB,  7, 50, E8,   89A
  47. 560 DATA 72,  8, 5B, 72,  5, E8, 43,  9, 33, C0, 5A, 5B, C3, B4, 8B, EB,   715
  48. 570 DATA F9, 53, 52, 72, 1E, B3, FF, E8, DC,  8,  A, D2, 74, 13,  E,  7,   724
  49. 580 DATA 8B, 3E,  4,  1, 8B, C2, B9,  9,  0, F7, E1,  3, F8, 32, C0, F3,   795
  50. 590 DATA AA, 33, C0, 5A, 5B, C3, B8, 40,  0, C3, 53, 52, 72, 32, 8B, 36,   6DA
  51. 600 DATA  6,  1, B9,  3,  0, 33, DB, 83, C6, 12, 83, 3C,  0, 75,  4, 8B,   4EF
  52. 610 DATA FE, EB,  E, 39, 14, 75,  4, B4, 8D, EB, 15, E2, EA, B4, 8C, EB,   8F5
  53. 620 DATA  F,  E,  7, 8B, 36,  6,  1, 89, 14, B9,  9,  0, F3, A5, 33, C0,   4D6
  54. 630 DATA 5A, 5B, C3, 53, 52, 72, 1D, 8B, 36,  6,  1, B9,  3,  0, 83, C6,   579
  55. 640 DATA 12, 39, 14, 74,  6, E2, F7, B4, 8E, EB,  9, C7,  4,  0,  0, E8,   69B
  56. 650 DATA 96,  0, 33, C0, 5A, 5B, C3, 8B, 3E,  4,  1, 33, DB, 8B,  E,  0,   576
  57. 660 DATA  1, 3A, 3D, 74,  2, FE, C3, 83, C7,  9, E2, F5, 33, C0, C3, 57,   7E6
  58. 670 DATA 72, 16, 8B, 3E,  2,  1, 8B,  E, FE,  0, 33, DB, 3A, 15, 75,  1,   4BE
  59. 680 DATA 43, 83, C7,  3, E2, F6, 33, C0, 5F, C3, 52, 33, D2, 33, F6, E8,   8E5
  60. 690 DATA 58,  8, E8, DA, FF, 72,  8, 46, 26, 89, 15, 26, 89, 5D,  2, 42,   5F5
  61. 700 DATA 83, C7,  4, 3B, 16,  0,  1, 7C, E6, 8B, DE, 33, C0, 5A, C3, E6,   761
  62. 710 DATA  2, F8,  2, 15,  3, 20,  3, 53, 52, 1E, 8E, 5E, F8, 3C,  3, 77,   494
  63. 720 DATA 11, 32, E4, 8B, D8, D1, E3, 81, C3, BF,  2, 2E, FF, 17, 1F, 5A,   800
  64. 730 DATA 5B, C3, B4, 8F, EB, F8, 56, 1E,  E, 1F, 8B, 36,  6,  1, B9,  9,   66F
  65. 740 DATA  0, F3, A5, 32, E4, 1F, 5E, C3, 56, 33, DB, 83, C6,  2, 8B,  4,   72C
  66. 750 DATA 8B, 54,  2, 53, E8, 14,  8, 5B, 83, C6,  4, 43, 80, FB,  3, 7E,   61F
  67. 760 DATA ED, 32, E4, 5E, C3, 57, E8, CD, FF, 5F, E8, DB, FF, 32, E4, C3,   B29
  68. 770 DATA B8, 12,  0, C3, 49,  3, 80,  3, 96,  3, 53, 52, 1E, 8E, 5E, F8,   59C
  69. 780 DATA 32, E4, 3C,  2, 77,  F, 8B, F8, D1, E7, 81, C7, 24,  3, 2E, FF,   7B1
  70. 790 DATA 15, 1F, 5A, 5B, C3, B4, 8F, EB, F8, 8B, 7E, FC, 8B,  C, 26, 89,   81D
  71. 800 DATA  D, 8B, 44,  2, E8, CD,  6, 72, 26, 26, 89, 5D,  2, D1, E3, D1,   6C4
  72. 810 DATA E3, 2E,  3, 1E,  6,  1, 2E, 8B, 47,  2, 26, 89, 45,  4, 2E, 8B,   3EC
  73. 820 DATA 47,  4, 26, 89, 45,  6, 83, C7,  6, 46, 46, E2, D4, 33, C0, C3,   68D
  74. 830 DATA 8B,  C, 8B, 5C,  2, 8B, 44,  4, 8B, 54,  6, E8, 8D,  7, 83, C6,   5FD
  75. 840 DATA  6, E2, EF, 33, C0, C3, 8B, C3, B4,  6, F6, E4,  5,  2,  0, 32,   7A8
  76. 850 DATA E4, C3, 8E, 46, F8, E8,  1,  0, C3, 53, 52, 72, 30, 3C,  1, 77,   71A
  77. 860 DATA 2F, 83, F9,  4, 77, 2E, 8A, E8, 26, 8B, 44,  2,  A, ED, 74,  7,   62F
  78. 870 DATA E8, 61,  6, 72, 18, 8A, C3, 26, 8B, 1C, F8, 51, E8, EA, FD, 59,   864
  79. 880 DATA  A, E4, 75,  9, 83, C6,  4, FE, C9, 75, DD, 33, C0, 5A, 5B, C3,   83D
  80. 890 DATA B4, 8F, EB, F9, B4, 8B, EB, F5, 53, 52, 72, 11, 8B, FB, 53, E8,   A2F
  81. 900 DATA 8D, FE, 8B, CB, 5B, 2B, D9, 7F,  7, 7C,  A, 32, E4, 5A, 5B, C3,   7DA
  82. 910 DATA E8, 7C,  6, EB, F8, F7, DB, E8, BC,  6, EB, F1, 3C,  1, 74,  7,   95D
  83. 920 DATA 3C,  2, 7F, 13, 33, C0, C3, E8, E0,  6, 72,  F, 80, FB,  1, 7F,   6D0
  84. 930 DATA  E, 7C, F1, B4, 91, EB, EF, B4, 8F, EB, EB, B4, 83, EB, E7, B4,   B70
  85. 940 DATA 90, EB, E3, 53, 52, 1E, 72, 3A, 50, 8C, CB, 8B, C2, B4,  9, F6,   874
  86. 950 DATA E4, 8B, D0,  3, 16,  4,  1, 42, 58,  A, C0, 75,  4, 8B, F2, EB,   6A2
  87. 960 DATA 1A, 3C,  1, 75, 21, 8E, 5E, F8, 56, 52, E8, 71,  0, 5A, 5E, 80,   60A
  88. 970 DATA E4, FE, 80, FC, A0, 75, 13, 8B, FA,  E,  7, B9,  8,  0, F3, A4,   878
  89. 980 DATA 33, C0, 1F, 5A, 5B, C3, B4, 8F, EB, F8, B4, A1, EB, F4, 9F,  4,   987
  90. 990 DATA CE,  4,  B,  5, 1E, 8E, 5E, F8, 3C,  2, 77,  F, 32, E4, 8B, F8,   641
  91. 1000 DATA D1, E7, 81, C7, 7E,  4, 2E, FF, 15, 1F, C3, B4, 8F, EB, FA, 52,   920
  92. 1010 DATA  E, 1F, 8B, 36,  4,  1, 8B, 7E, FC, 33, C0, 8B, D0, 80, 3C,  0,   602
  93. 1020 DATA 74, 10, 26, 89, 15, 46, 83, C7,  2, B9,  8,  0, F3, A4, FE, C0,   6F0
  94. 1030 DATA EB,  3, 83, C6,  9, 42, 3B, 16,  0,  1, 72, E1, 5A, C3, 53, 1E,   5B5
  95. 1040 DATA  7, 8B, FE, B9,  8,  0, 32, C0, F3, AE, 74, 2B, 2E, 8B,  E,  0,   64A
  96. 1050 DATA  1,  E,  7, 8B, DE, 2E, A1,  4,  1, 40, 33, D2, 8B, F8, 8B, F3,   699
  97. 1060 DATA 51, B9,  8,  0, F3, A6, 59, 74,  A,  5,  9,  0, 42, E2, ED, B4,   655
  98. 1070 DATA A0, EB,  2, 32, E4, 5B, C3, B4, A1, EB, FA, 2E, 8B, 1E,  0,  1,   7D3
  99. 1080 DATA 33, C0, C3, 72, 23, 8B, FE, 8E, 46, F8, 26, 8B, 35, 89, 76,  2,   787
  100. 1090 DATA 26, 8B, 75,  2, 89, 76,  4, 26, 8B, 75,  5, 26, 8E, 45,  7, 26,   47C
  101. 1100 DATA 8A, 4D,  4, 32, ED, E8, 71, FE, C3, 72,  9, 3C,  2, 75,  8, BB,   705
  102. 1110 DATA 1C,  0, 32, E4, EB, 71, 90, 50, 8B, FE, 8E, 46, F8,  6, 57, 32,   752
  103. 1120 DATA ED, 26, 8A, 4D,  4, 26, 8B, 75,  5, 26, 8E, 45,  7, 50, F8, E8,   649
  104. 1130 DATA 47, FE,  A, E4, 58, 75, 50, 8B, 46,  6, 50, 9D, 8E, 46, F6, 8E,   76C
  105. 1140 DATA 5E, F8, 8B, 76, FA, 8B, 7E, FC, 8B, 7E, FE, 55, 8B, 6E,  0, B8,   963
  106. 1150 DATA  0,  0, FF, 1C, 58, 55, 8B, E8, 58, 9C, 8C, 46, F6, 8C, 5E, F8,   7D9
  107. 1160 DATA 89, 76, FA, 89, 7E, FC, 89, 4E, FE, 59, 89, 4E,  6, 89, 46,  0,   7D6
  108. 1170 DATA  E, 1F, 5F,  7, 32, ED, 26, 8A, 4D,  9, 26, 8B, 75,  A, 26, 8E,   49C
  109. 1180 DATA 45,  C, F8, 58, E8, F2, FD, C3, 53, 52, 8E, 46, F8,  6, 56, 55,   85D
  110. 1190 DATA 8B, EC, 83, EC, 12, 88, 46, FF, C6, 46, F1,  0, 26, 8B,  4, 26,   79D
  111. 1200 DATA 8B, 54,  2, 83, FA, 10, 72,  5, B4, 96, E9, 70,  1, 89, 46, FA,   752
  112. 1210 DATA 89, 56, FC, B9,  0, 40, F7, F1, 8A, E8, 8A, CA, 83, C6,  4, BF,   98E
  113. 1220 DATA F6, FF, E8, EB,  1, 72,  F, 50, 52, 83, C6,  7, BF, F2, FF, E8,   9D4
  114. 1230 DATA DE,  1, 5F, 5B, 73,  3, E9, 44,  1, C6, 46, FE,  0, 26, 8A,  C,   603
  115. 1240 DATA 26,  2, 4C, F9, 80, F9,  1, 74, 77, 72, 3B, 26, 8B, 4C,  1, 26,   5A3
  116. 1250 DATA 3B, 4C, FA, 75, 6B, 26, 8B, 4C, FE, 26, 3B, 4C,  5, 72, 17, 77,   60E
  117. 1260 DATA  A, 26, 8B, 4C, FC, 26, 3B, 4C,  3, 72,  B, 8B, D8, 8B, FA, 83,   69B
  118. 1270 DATA EE,  7, C6, 46, FE,  1, 26, 3B, 7C,  5, 72, 44, 77, 33, 26, 3B,   5A3
  119. 1280 DATA 5C,  3, 72, 3C, EB, 2B, 3B, D7, 72, 19, 77,  4, 3B, C3, 72, 13,   5BE
  120. 1290 DATA BE, F2, FF, E8, F0,  0, 87, FA, 93, BE, F6, FF, E8, E7,  0, C6,   BE3
  121. 1300 DATA 46, FE,  1, 2B, 5E, FA, 1B, 7E, FC, 3B, D7, 72, 13, 3B, C3, 76,   768
  122. 1310 DATA  F, C6, 46, F1, 92, 80, 7E, FF,  0, 74,  5, B4, 97, E9, BD,  0,   805
  123. 1320 DATA 8B, 1E,  6,  1, FF, 77,  8, FF, 77,  6, FF, 77,  4, FF, 77,  2,   69C
  124. 1330 DATA FD, 80, 7E, FE,  0, 75, 1D, FC, 26, 8B, 44, FC, 26, 8B, 54, FE,   87B
  125. 1340 DATA 89, 46, F6, 89, 56, F8, 26, 8B, 44,  3, 26, 8B, 54,  5, 89, 46,   66D
  126. 1350 DATA F2, 89, 56, F4, 33, C9, 8E, 46,  4, 8B, 5E,  2, 8C, C2, 8B, C1,   81E
  127. 1360 DATA 83, C3,  4, 33, F6, E8, 91,  0,  6, 57, 91, 8E, C2, 83, C3,  7,   777
  128. 1370 DATA BE,  1,  0, E8, 83,  0, 5E, 5B, 3B, C1, 77,  2, 8B, C8, 8B, 46,   67C
  129. 1380 DATA FA, 8B, 56, FC,  B, D2, 75,  6, 3B, C1, 77,  2, 8B, C8, 2B, C1,   7E3
  130. 1390 DATA 83, DA,  0, 51, 50, 52, 80, 7E, FF,  1, 8E, DB, 74,  4, F3, A4,   7C6
  131. 1400 DATA EB, 14, 26, 8A, 1D, A4, 80, 7E, FE,  0, 75,  5, 88, 5C, FF, EB,   7B4
  132. 1410 DATA  3, 88, 5C,  1, E2, EC,  E, 1F, 5A, 58, 59, 89, 46, FA, 89, 56,   696
  133. 1420 DATA FC,  B, D2, 75,  4,  B, C0, 7E,  2, EB, 8B, 33, DB, 58, 5A, E8,   7BB
  134. 1430 DATA D9,  3, BB,  1,  0, 58, 5A, E8, D1,  3, 8A, 66, F1, 83, C4, 12,   740
  135. 1440 DATA 5D, 5E,  7, 5A, 5B, C3, 50, 52, B9,  0, 40, F7, F1, 89, 12, B1,   709
  136. 1450 DATA  A, D3, E0, 89, 42,  2, 5A, 58, C3, 50, 53, 52, 8B, D6, BE, F6,   809
  137. 1460 DATA FF,  B, D2, 74,  3, 83, EE,  4, 26, 8A, 37, B8, FF, 3F, BF,  1,   765
  138. 1470 DATA  0,  A, F6, 75,  3, BF,  0,  4, 80, 7E, FE,  0, 74,  F, 29,  A,   4ED
  139. 1480 DATA 73,  5, 89,  2, 29, 7A,  2, 8B,  A, 41, EB, 13, 90,  1,  A, 39,   450
  140. 1490 DATA  2, 76,  7, C7,  2,  0,  0,  1, 7A,  2, 8B, C8, 2B,  A, 41,  A,   398
  141. 1500 DATA F6, 74, 26, 51, 52, 8A, C2, 26, 8B, 57,  1, 8B, 5A,  2, 9C, FC,   707
  142. 1510 DATA F8, E8, F5, F9, 9D, 5A, 59, A1, E9,  0,  A, D2, 74,  3,  5,  0,   800
  143. 1520 DATA  4, 8E, C0, 8B, 3A, 5A, 5B, 58, C3, 8B, 7A,  2, 8E, C7, EB, F3,   821
  144. 1530 DATA 53, 51, 57, 33, C0, 8A, C5, 8B, F8, 32, ED, 26, 8B, 44,  5, 26,   6FF
  145. 1540 DATA 8B, 5C,  3, 26, 8A, 14,  A, D2, 74, 4B, 80, FA,  1, 74,  5, B4,   5F1
  146. 1550 DATA 98, EB, 5C, 90, 81, FB, FF, 3F, 77, 53, 26, 8B, 54,  1, 51, E8,   832
  147. 1560 DATA E8,  2, E8, 6A, FA, 59,  A, E4, 75, 45, 8B, D3, 26, 8B, 5C,  5,   7A7
  148. 1570 DATA 8B, C7,  3, C3, 26,  3, 4C,  3, 49, 81, F9,  0, 40, 7C,  5, 40,   554
  149. 1580 DATA 81, E9,  0, 40, 3B, C2, 7F, 2A, 8B, D1, 92, F8, 5F, 89,  3, 89,   7AA
  150. 1590 DATA 53,  2, 59, 5B, C3, B9, 10,  0, F7, E1,  3, C3, 83, D2,  0,  3,   68B
  151. 1600 DATA 46, FA, 13, 56, FC, 2D,  1,  0, 83, DA,  0, EB, DE, B4, 95, F9,   83B
  152. 1610 DATA EB, DA, B4, 93, EB, F9,  A, C0, 74,  B, 3C,  1, 75, 23, C7, 46,   81B
  153. 1620 DATA FE,  4,  0, EB, 19, A1, E9,  0, 33, C9, 26, 89,  5, 26, 89, 4D,   63C
  154. 1630 DATA  2,  5,  0,  4, 83, C7,  4, 41, 83, F9,  3, 7E, ED, 41, 33, C0,   5B8
  155. 1640 DATA C3, B4, 8F, EB, FB, 80, 3E, E0,  0,  1, 75, 28, 3C,  1, 72,  7,   6DE
  156. 1650 DATA 77, 26, E8, FA, F8, EB, 1C, 33, C9, 26, C7,  5,  0,  4, 26, 89,   71F
  157. 1660 DATA 4D,  2, E8, 6B, FA, 26, 89, 45,  4, 26, 89, 4D,  6, 26, 89, 4D,   592
  158. 1670 DATA  8, 33, C0, C3, B4, A4, EB, FB, B4, 8F, EB, F7, 53, 3B, 1E, FE,   9CB
  159. 1680 DATA  0, 7E,  4, B4, 87, EB, 2E, 53, 33, D2, 4A, F8, E8, A0, F9, 59,   84A
  160. 1690 DATA 3B, D9, 7C, 23, 8B, 3E,  4,  1, 33, C0, 8B, D0, 3A,  5, 74,  E,   590
  161. 1700 DATA 83, C7,  9, 42, 3B, 16,  0,  1, 72, F2, B4, 85, EB,  7, FE,  D,   681
  162. 1710 DATA 8B, D9, E8, 7A,  1, 5B, C3, B4, 88, EB, FA, 42,  9, 66,  9, 93,   853
  163. 1720 DATA  9, 99,  9, 9E,  9, 99,  9, AF,  9, 80, 3E, E0,  0,  1, 75, 1A,   4DA
  164. 1730 DATA 3C,  8, 77, 1A, 3C,  6, 7E,  2, B0,  6, 32, E4, 8B, F8, D1, E7,   69E
  165. 1740 DATA 81, C7,  B,  9, 33, C0, 2E, FF, 15, C3, B4, A4, EB, FB, B4, 8F,   8D5
  166. 1750 DATA EB, F7, 52, 8E,  6, E5,  0, 8B, 3E, E7,  0, 89, 7E, FC, 8C, 46,   832
  167. 1760 DATA F6,  B, FF, 75,  8, 8C, C1,  B, C9, 33, C0, 74,  5, 57, E8, 85,   7CE
  168. 1770 DATA F9, 5F, 32, DB, 5A, C3, 53, 52,  A, DB, 75, 23, 8B, 7E, FC, 8C,   835
  169. 1780 DATA  6, E5,  0, 89, 3E, E7,  0,  B, FF, 75,  6, 8C, C1,  B, C9, 74,   6B3
  170. 1790 DATA  B, 1E, 8C, C6, 8E, DE, 8B, F7, E8, 6D, F9, 1F, 5A, 5B, C3, B4,   902
  171. 1800 DATA 9C, EB, A6, E8, 8A, F9, 8B, D0, C3, 32, DB, 33, C0, C3,  A, DB,   A5E
  172. 1810 DATA 75,  9, 33, C0, A3, E5,  0, A3, E7,  0, C3, B4, 9C, EB, FB,  A,   886
  173. 1820 DATA DB, 75,  3, 33, C0, C3, B4, 9C, EB, FB, 52, 83, 3E, E1,  0,  0,   833
  174. 1830 DATA 75,  7, 83, 3E, E3,  0,  0, 74,  E, 39, 1E, E1,  0, 75, 4A, 39,   4D2
  175. 1840 DATA  E, E3,  0, 75, 44, EB, 17, 50, 32, E4, CD, 1A, 8B, C2, 41, F7,   77E
  176. 1850 DATA E1, A3, E1,  0, 89, 16, E3,  0, 8B, D8, 89, 56, FE, 58, 3C,  2,   7BD
  177. 1860 DATA 75,  F, 33, C0, A3, E1,  0, A3, E3,  0, C6,  6, E0,  0,  1, EB,   719
  178. 1870 DATA 14, 3C,  1, 75,  7, C6,  6, E0,  0,  0, EB,  9,  A, C0, 75,  D,   4B9
  179. 1880 DATA C6,  6, E0,  0,  1, 33, C0, 5A, C3, B4, A4, EB, FA, B4, 8F, EB,   928
  180. 1890 DATA F6, B4, 91, C3, 51, 52, 33, DB, 2E, 8B, 16, E9,  0, B9,  4,  0,   724
  181. 1900 DATA 3B, C2, 74,  C, 81, C2,  0,  4, 43, E2, F5, B4, 8B, F9, EB,  1,   802
  182. 1910 DATA F8, 5A, 59, C3, 57, 8B, 3E,  2,  1, 8B,  E, FE,  0, 38, 15, 75,   5EA
  183. 1920 DATA  5, 39, 5D,  1, 74,  A, 83, C7,  3, E2, F2, B4, 8A, F9, EB, 1D,   77A
  184. 1930 DATA 2B, 3E,  2,  1, 8B, C7, 33, D2, B9,  3,  0, F7, F1, B9,  0, 40,   660
  185. 1940 DATA F7, E1,  3,  6, FB,  0, 12, 16, FD,  0, 32, F6, F8, 5F, C3, 3B,   77E
  186. 1950 DATA  6, FE,  0, 7F, 38, 52, 53, BA, FF, FF, F8, E8, F1, F7, 58, 5A,   992
  187. 1960 DATA 3B, D8, 7C, 24, 50, F8, E8, E6, F7, 58, 8B, 3E,  2,  1, 8B,  E,   77D
  188. 1970 DATA FE,  0, 41,  B, C0, 74, 1B, 80, 3D, FF, 75,  7, 88, 15, 89, 5D,   654
  189. 1980 DATA  1, 43, 48, 83, C7,  3, E2, EB, B4, 88, F9, EB,  8, B4, 87, F9,   902
  190. 1990 DATA EB,  3, F8, 33, C0, C3, 80, FB, FF, 75,  4, 33, DB, EB,  A, 32,   8C4
  191. 2000 DATA FF, 53, F8, E8, A9, F7, 58, 2B, D8, 8B, 3E,  2,  1, 8B,  E, FE,   890
  192. 2010 DATA  0, 38, 15, 75,  D, 39, 5D,  1, 72,  8, C6,  5, FF, C7, 45,  1,   4B7
  193. 2020 DATA FF, FF, 83, C7,  3, E2, EA, 32, E4, C3, 52, 53,  A, F6, 75, 16,   920
  194. 2030 DATA 92, B4,  9, F6, E4, 8B, D8,  3, 1E,  4,  1, 8B, C2, 80, 3F,  0,   6BE
  195. 2040 DATA 74,  4, F8, 5B, 5A, C3, B4, 83, F9, EB, F8, 51, 56, 1E,  6,  E,   7D4
  196. 2050 DATA 1F,  E,  7, FF, 36, 82,  0, FF, 36, 7A,  0, 8A, 3E, 84,  0, 53,   539
  197. 2060 DATA 8A, 3E, 7C,  0, 53, 50, 52, 32, FF, D1, E3, D1, E3, BF, EB,  0,   87C
  198. 2070 DATA 8B, 36,  6,  1, 46, 46, 53, B6, FF, 33, DB, B9,  4,  0, 3B,  0,   562
  199. 2080 DATA 75,  5, 3A, 50,  2, 74,  7, 83, C3,  4, E2, F2, EB,  7, 8B,  0,   61C
  200. 2090 DATA 8A, 50,  2, 8A, F3, 5B, 3A, DE, 75,  5, 83, C4,  4, EB, 33, 50,   6FF
  201. 2100 DATA 52, 8B,  0, 8A, 50,  2,  B, C0, 75,  4,  A, D2, 74,  8, 8B,  9,   4E9
  202. 2110 DATA 8A, 71,  2, E8, 34,  0, 5A, 59, 8A, F2, FA, 58, 88, 40,  2, 58,   6BC
  203. 2120 DATA 89,  0,  B, C9, 75,  4,  A, F6, 74,  8, 8B,  1, 8A, 51,  2, E8,   5A3
  204. 2130 DATA 18,  0, FB, 5B, 88, 3E, 7C,  0, 5B, 88, 3E, 84,  0, 8F,  6, 7A,   564
  205. 2140 DATA  0, 8F,  6, 82,  0,  7, 1F, 5E, 59, C3, 56, BE, 68,  0, A3, 82,   558
  206. 2150 DATA  0, 88, 16, 84,  0, 89,  E, 7A,  0, 88, 36, 7C,  0, B4, 87, B9,   561
  207. 2160 DATA  0, 20, CD, 15, 5E, C3, 8B, 3E,  2,  1, A1, FE,  0, BA,  3,  0,   54B
  208. 2170 DATA F7, E2, 8B, C8, 33, C0, 48, F3, AA, A1,  0,  1, B4,  9, F6, E4,   93D
  209. 2180 DATA 8B, C8, 83, C1, 24, 33, C0, F3, AB, 8B, 3E,  4,  1, FE,  D, C3,   7E8
  210. 2190 DATA 56, 44, 49, 53, 4B, 20, 20, 56, 4E, 6F, 74, 20, 65, 6E, 6F, 75,   51F
  211. 2200 DATA 67, 68, 20, 6D, 65, 6D, 6F, 72, 79,  D,  A, 24,  E,  7, C5, 36,   4D3
  212. 2210 DATA 64,  0, C5, 74, 12, B7,  1, B9, 50,  0, E8, 47,  1,  A, E4, 75,   603
  213. 2220 DATA 36, 32, FF, E8, 3E,  1,  A, E4, 75, 2D, 4E, B9,  5,  0, 33, C0,   61D
  214. 2230 DATA BF,  A,  0, 8A, 1C, 46, 80, EB, 30, 72,  D, 80, FB,  9, 77,  8,   5D2
  215. 2240 DATA 32, FF, F7, E7,  3, C3, E2, EB, 33, D2, BF, 10,  0, F7, F7,  B,   96F
  216. 2250 DATA C0, 74,  4, 2E, A3, FE,  0,  E, 1F, B8, 19, 35, CD, 21, BF, 12,   5F9
  217. 2260 DATA  0, BE,  0,  C, B9,  8,  0, 33, DB, F3, A6, 75, 16, BE, 2C,  0,   5A7
  218. 2270 DATA 26, 8B,  4, 26, 8A, 54,  2, 80, EA, 10, 32, F6, BB,  0, 40, F7,   64F
  219. 2280 DATA F3, 8B, D8,  E,  7, B4, 88, F8, CD, 15, 72,  E, B1,  4, D3, F8,   881
  220. 2290 DATA 2B,  6, FE,  0, 7C,  4, 3B, C3, 7D,  3, E9, 99,  0,  E,  7, B1,   575
  221. 2300 DATA  4, D3, E0, A3, DE,  0, B9,  0,  4, F7, E1, 80, C2, 10, A3, FB,   8BD
  222. 2310 DATA  0, 88, 16, FD,  0, BB,  0,  C, 89, 1E,  2,  1, A1, FE,  0, BA,   565
  223. 2320 DATA  3,  0, F7, E2,  3, C3, A3,  4,  1, 8B, C8, A1,  0,  1, B4,  9,   5FC
  224. 2330 DATA F6, E4,  3, C1, A3,  6,  1,  5, 57,  0, B1,  4, D3, E8, 8C, CB,   76B
  225. 2340 DATA  3, C3, A3, E9,  0, 50, BA, 10,  0, F7, E2, BF, EB,  0, B9,  4,   7AC
  226. 2350 DATA  0, 89,  5, 89, 55,  2,  5,  0, 40, 83, D2,  0, 83, C7,  4, E2,   538
  227. 2360 DATA F0, 5B, 81, C3,  0, 10, 33, C0,  6, E8, 4B,  0,  7, BA, 14,  0,   5A0
  228. 2370 DATA B4,  9, CD, 21,  6, B8, 15, 35, CD, 21, 89, 1E, DA,  0, 8C,  6,   5B4
  229. 2380 DATA DC,  0,  7, B8, 15, 25, BA,  9,  1, CD, 21, B8, 67, 25, BA, 57,   5DC
  230. 2390 DATA  1, CD, 21, E9, 90, FE, BA,  8,  C, B4,  9, CD, 21, B8,  0, 30,   6C7
  231. 2400 DATA CD, 21, 86, C4, 3D, 1E,  3, B8, DA,  0, 8C, CB, 72,  2, 33, C0,   6E6
  232. 2410 DATA E8,  4,  0, B8, 42, 1F, C3, C4, 3E, 64,  0, 26, 89, 45,  E, 26,   556
  233. 2420 DATA 89, 5D, 10, C3, 32, E4, AC,  A, FF, 74,  6, 3C, 20, 7E, 12, EB,   6D5
  234. 2430 DATA  4, 3C, 20, 7F,  C, 3C,  D, 74,  6, 3C,  A, 74,  2, E2, E7, FE,   531
  235. 2440 DATA C4, C3,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   187
  236. 2450 DATA 374865
  237.