home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / magazine / pcmagazi / 1990 / 01 / pcremote.bas < prev    next >
BASIC Source File  |  1989-11-27  |  15KB  |  193 lines
  1. 100 REM - BASIC PROGRAM TO CREATE PCREMOTE.COM
  2. 110 CLS:PRINT "Creating PCREMOTE.COM": OPEN "PCREMOTE.COM" AS #1 LEN = 1
  3. 120 FIELD #1, 1 AS A$: CHECKSUM#=0
  4. 130 FOR I = 1 TO   174
  5. 140  LINESUM#=0: LOCATE 2,3: PRINT "Countdown: "   174 - 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 "PCREMOTE.COM created successfully": SYSTEM
  17. 260 PRINT: PRINT "PCREMOTE.COM is not valid!": END
  18. 270 DATA E9, 7E,  6, 50, 43, 52, 45, 4D, 4F, 54, 45, 20, 56, 65, 72, 73,   58C
  19. 280 DATA 69, 6F, 6E, 20, 31, 2E, 30, 20, 28, 63, 29, 20, 31, 39, 38, 39,   3C4
  20. 290 DATA 20, 5A, 69, 66, 66, 20, 43, 6F, 6D, 6D, 75, 6E, 69, 63, 61, 74,   5DF
  21. 300 DATA 69, 6F, 6E, 73, 20, 43, 6F, 2E,  D,  A, 50, 43, 20, 4D, 61, 67,   498
  22. 310 DATA 61, 7A, 69, 6E, 65, 20, FE, 20, 62, 79, 20, 54, 65, 72, 72, 79,   666
  23. 320 DATA 20, 4C, 61, 68, 6D, 61, 6E,  D,  A, 24, 1A,  0,  0,  0,  0,  0,   2C6
  24. 330 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 81,  8,  0,    89
  25. 340 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 60,  0,    60
  26. 350 DATA 30,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,    30
  27. 360 DATA  0,  0,  0,  0,  0,  0,  0,  D, 41, 54,  D,  0, 41, 54, 45, 30,   1B9
  28. 370 DATA 20, 53, 31, 32, 3D, 34, 30, 20, 51, 30, 20, 56, 30, 20, 58, 31,   367
  29. 380 DATA 20, 53, 30, 3D, 30,  D,  0, 41, 54, 45, 30, 20, 53, 31, 32, 3D,   33A
  30. 390 DATA 34, 30, 20, 51, 31, 53, 30, 3D, 32,  D,  0, 41, 54, 26, 43, 31,   334
  31. 400 DATA  D,  0, 41, 54, 48, 30,  D,  0, 2B, 2B, 2B,  0, 41, 54, 44, 54,   2D5
  32. 410 DATA  0, 45, 6E, 74, 65, 72, 20, 70, 61, 73, 73, 77, 6F, 72, 64, 3A,   5CB
  33. 420 DATA  0,  B,  0, 50, 43, 20, 4D, 41, 47, 41, 5A, 49, 4E, 45,  0,  0,   30A
  34. 430 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,     0
  35. 440 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 2D, 1E,  E, 1F,    78
  36. 450 DATA 9C, FF, 1E, 5D,  1, FA, 80, 3E, 5C,  1,  0, 75, 1F, FE,  6, 5C,   620
  37. 460 DATA  1, FB, E8, 83,  0, 80, 3E, 5B,  1,  0, 75,  6, E8, C5,  0, EB,   694
  38. 470 DATA  4, 90, E8, 7E,  1, E8, 9E,  0, FE,  E, 5C,  1, FB, 1F, CF, 1E,   6F1
  39. 480 DATA 52, 53, 50,  E, 1F, 8B, 16, 63,  1, 42, 42, EC, 3C,  2, 74, 21,   46A
  40. 490 DATA 4A, 4A, EC, 8B, 1E, 83,  1, 88,  7, 43, 39, 1E, 87,  1, 75,  4,   4D7
  41. 500 DATA 8B, 1E, 85,  1, 3B, 1E, 81,  1, 74,  4, 89, 1E, 83,  1, EB, 27,   4BF
  42. 510 DATA 90, 4A, 4A, 8B, 1E, 89,  1, 3B, 1E, 8B,  1, 74, 15, 8A,  7, 43,   499
  43. 520 DATA 39, 1E, 8F,  1, 75,  4, 8B, 1E, 8D,  1, 89, 1E, 89,  1, EE, EB,   5A1
  44. 530 DATA  6, 90, C6,  6, 65,  1,  0, 42, 42, EC, A8,  1, 74, AE, B0, 20,   5D3
  45. 540 DATA E6, 20, FB, 58, 5B, 5A, 1F, CF, 2E, 89, 1E, 73,  1, 5B, 50, FA,   6EA
  46. 550 DATA 8C, D0, 2E, A3, 6F,  1, 8B, C4, 2E, A3, 71,  1, 8C, C8, 8E, D0,   7E1
  47. 560 DATA 2E, A1, 6D,  1, 8B, E0, FB, 51, 52, 56, 57, 1E,  6, 55, 8C, C8,   6C0
  48. 570 DATA 8E, D8, 8E, C0, 53, C3, 5B, 5D,  7, 1F, 5F, 5E, 5A, 59, FA, 2E,   740
  49. 580 DATA A1, 71,  1, 8B, E0, 2E, A1, 6F,  1, 8E, D0, FB, 58, 53, 2E, 8B,   77A
  50. 590 DATA 1E, 73,  1, C3, 8B, EC, E8, 74,  3, 75,  3, EB, 5A, 90, E8, F6,   856
  51. 600 DATA  2, 32, E4, B9,  A,  0, C6,  6, 96,  1,  5, E8, 5F,  3, 75,  3,   505
  52. 610 DATA E9, A1,  1, E8, 5F,  2, 73, F3, 3C,  D, 75,  6, FE,  E, 96,  1,   6A1
  53. 620 DATA 74,  9, E2, E7, 32, C0, E8, D6,  3, EB, D3, C6,  6, 5B,  1,  1,   7E0
  54. 630 DATA B9,  3,  0, BE, E1,  1, E8, 6E,  3, E8, 1C,  0, E8, 64,  0, 74,   679
  55. 640 DATA  A, E2, F0, B0,  1, E8, C5,  2, EB,  D, 90, B4,  1, 32, C0, B9,   824
  56. 650 DATA  5,  0, E8, 4A,  2, E2, FB, C3, 51, BF,  7,  2, B9, 14,  0, 32,   5F1
  57. 660 DATA C0, FC, F3, AA, BF,  7,  2, B9, 14,  0, E8,  0,  3, 75,  3, E9,   73A
  58. 670 DATA 42,  1, E8, FA,  0, E8, 3F,  3, 74, F0, 3C, 60, 7C,  2, 24, 5F,   650
  59. 680 DATA 3C,  D, 74, 1D, 3C,  8, 75,  E, 41, 81, FF,  7,  2, 74, 10, 4F,   43E
  60. 690 DATA C6,  5,  0, EB,  5, 90, FC, AA, B0, 2A, B4,  1, E8,  0,  2, E2,   74C
  61. 700 DATA C9, 59, C3, 51, BE,  7,  2, BF, F3,  1, 8B,  E, F1,  1, FC, F3,   82A
  62. 710 DATA A6, 59, C3, 8B, EC, E8, B7,  0, A1, 89,  1, 8B, 1E, 8B,  1, B9,   7F1
  63. 720 DATA 12,  0, 3B, C3, 74,  F, 40, 39,  6, 8F,  1, 75,  3, A1, 8D,  1,   449
  64. 730 DATA E2, F0, E9, 99,  0, C7,  6, 77,  1,  0,  0, C6,  6, 91,  1,  0,   5F7
  65. 740 DATA 1E, 8B, 36, 77,  1, 8B, 3E, 94,  1, A1, 6A,  1, 8E, D8, B9, 10,   5F0
  66. 750 DATA  0, FC, 2E, 80, 3E, 67,  1,  0, 74, 17, D1, E1, BA, DA,  3, EC,   710
  67. 760 DATA A8,  1, 75, FB, FA, EC, A8,  1, 74, FB, A4, FB, E2, F1, EB,  3,   A77
  68. 770 DATA 90, F3, A5, 1F, B9, 20,  0, 8B, 36, 94,  1, 8B, 3E, 68,  1,  3,   5AB
  69. 780 DATA 3E, 77,  1, F3, A6, 75, 1B, A1, 77,  1,  5, 20,  0, A3, 77,  1,   538
  70. 790 DATA FE,  6, 91,  1, 3D, A0,  F, 75, A7, C7,  6, 77,  1,  0,  0, EB,   5CE
  71. 800 DATA  8, 90, 41, 83, E1,  1, E8, C8,  0, B8, 40,  0, 8E, C0, 26, 8B,   6E5
  72. 810 DATA 1E, 50,  0, 3B, 1E, 75,  1, 74, 15, 89, 1E, 75,  1, B0, D2, B4,   519
  73. 820 DATA  1, E8, 3B,  1, 8A, C3, E8, 36,  1, 8A, C7, E8, 31,  1, C3, 50,   70F
  74. 830 DATA 52,  6, B8, 40,  0, 8E, C0, 80, 3E, 5B,  1,  0, 74,  5, E8, EC,   605
  75. 840 DATA  1, 74, 31, B4,  0, E8, ED,  0, 72,  3, E9, 80,  0, 80, 3E, 79,   644
  76. 850 DATA  1,  0, 74, 51, 80, 3E, 79,  1,  1, 75,  9, A2, 7B,  1, FE,  6,   49F
  77. 860 DATA 79,  1, EB, D3, A2, 7C,  1, A0, 7B,  1, 8A, 26, 7C,  1, 3B,  6,   5E1
  78. 870 DATA 1B,  2, 75, 27, E8, 40,  1, E8, 48,  1, C6,  6, 65,  1,  0, E8,   52D
  79. 880 DATA 7C,  2, FA, C6,  6, 5B,  1,  0, C6,  6, 79,  1,  0, C6,  6, 7A,   52C
  80. 890 DATA  1,  0, 26, C6,  6, 17,  0,  0, 8B, E5, C3, E8, 6A,  0, C6,  6,   55B
  81. 900 DATA 79,  1,  0, EB, 92, 80, 3E, 7A,  1,  0, 74,  B, 26, A2, 17,  0,   48E
  82. 910 DATA C6,  6, 7A,  1,  0, EB, 80, 3C, FE, 75,  7, FE,  6, 79,  1, E9,   6CF
  83. 920 DATA 75, FF, 3C, FD, 75,  4, FE,  6, 7A,  1, E9, 6A, FF,  7, 5A, 58,   7B0
  84. 930 DATA C3,  B, C9, 74,  5, B0, FF, EB,  3, 90, B0, FE, B4,  1, E8, 7E,   906
  85. 940 DATA  0, A0, 91,  1, B4,  1, E8, 76,  0, 8B, 36, 94,  1,  3, F1, 8B,   61A
  86. 950 DATA 3E, 68,  1,  3, 3E, 77,  1,  3, F9, B9, 10,  0, FC, AD, B4,  1,   583
  87. 960 DATA E8, 5C,  0, AA, 47, E2, F6, C3, 53, 56, 57, BE, 1A,  0, FA, 26,   7C8
  88. 970 DATA 8B, 1E, 1C,  0, 8B, FB, 43, 43, 83, FB, 3E, 75,  3, BB, 1E,  0,   5DE
  89. 980 DATA 26, 3B, 1E, 1A,  0, 74,  9, 26, 89,  5, 26, 89, 1E, 1C,  0, F9,   3AC
  90. 990 DATA 5F, 5E, 5B, FB, C3, 53, 56, 80, FC,  0, 75,  6, BE, 81,  1, EB,   7A1
  91. 1000 DATA  4, 90, BE, 89,  1, FA, 8B, 1C, 3B, 5C,  2, 74,  E, 8A,  7, 43,   56C
  92. 1010 DATA 39, 5C,  6, 75,  3, 8B, 5C,  4, 89, 1C, F9, 5E, 5B, FB, C3, 50,   663
  93. 1020 DATA 53, 52, 56, 57, 1E,  E, 1F, 80, FC,  0, 75,  6, BE, 81,  1, EB,   5BF
  94. 1030 DATA  4, 90, BE, 89,  1, FA, 8B, 5C,  2, 8B, FB, 43, 39, 5C,  6, 75,   698
  95. 1040 DATA  3, 8B, 5C,  4, 3B, 1C, 74,  6, 88,  5, 89, 5C,  2, F9, 9C, 80,   548
  96. 1050 DATA 3E, 65,  1,  0, 75, 18, A1, 89,  1, 3B,  6, 8B,  1, 74,  F, C6,   472
  97. 1060 DATA  6, 65,  1,  1, B4,  1, E8, 8C, FF, 8B, 16, 63,  1, EE, FB, 9D,   720
  98. 1070 DATA 1F, 5F, 5E, 5A, 5B, 58, C3, 50, FA, A1, 83,  1, A3, 81,  1, FB,   73B
  99. 1080 DATA 58, C3, 50, FA, A1, 8B,  1, A3, 89,  1, FB, 58, C3, 56, 52, 50,   7CD
  100. 1090 DATA 80, 3E, 5B,  1,  0, 74, 23, E8, E8, FF, C6,  6, 5B,  1,  0, B0,   658
  101. 1100 DATA  1, E8, 58,  0, BE, D8,  1, E8, 7D,  0, B0,  2, E8, 4D,  0, BE,   6E2
  102. 1110 DATA D2,  1, E8, 72,  0, B0,  1, E8, 42,  0, A0, 66,  1, E8, BF,  0,   6B6
  103. 1120 DATA BE, 97,  1, E8, 61,  0, B0,  1, E8, 31,  0, 58, 3C,  0, 75,  6,   578
  104. 1130 DATA BE, 9C,  1, EB,  4, 90, BE, B7,  1, E8, 4B,  0, B0,  1, E8, 1B,   737
  105. 1140 DATA  0, BE, CB,  1, E8, 40,  0, E8, 8D, FF, 5A, 5E, C3, 50, 52, 8B,   7CE
  106. 1150 DATA 16, 63,  1, 83, C2,  6, EC, A8, 80, 5A, 58, C3, 51, 52, 57, 50,   698
  107. 1160 DATA 32, E4, CD, 1A, 8B, FA, 8B, F1, 58, 50, 33, C9, 8A, C8, 83, C7,   93E
  108. 1170 DATA 13, 83, D6,  0, E2, F8, 32, E4, CD, 1A, 3B, F1, 75, F8, 3B, FA,   911
  109. 1180 DATA 7D, F4, 58, 5F, 5A, 59, C3, 50, B4,  1, FC, AC, 3C,  0, 74,  5,   700
  110. 1190 DATA E8, EC, FE, EB, F6, 58, C3, B4,  1, CD, 16, 74,  6, 9C, 32, E4,   992
  111. 1200 DATA CD, 16, 9D, C3, BB, 81,  1, 89,  F, 89, 4F,  2, 89, 4F,  4, 81,   64F
  112. 1210 DATA C1,  0,  2, 89, 4F,  6, BB, 89,  1, 89,  F, 89, 4F,  2, 89, 4F,   530
  113. 1220 DATA  4, 81, C1,  0,  2, 89, 4F,  6, C3, B8,  8, 35, CD, 21, 89, 1E,   573
  114. 1230 DATA 5D,  1, 8C,  6, 5F,  1, B8,  8, 25, BA, 1D,  2, CD, 21, C3, 52,   511
  115. 1240 DATA 53, 56, 50, 8B, 16, 63,  1, 83, C2,  3, B0, 83, EE, 83, EA,  2,   6D6
  116. 1250 DATA 58, 50, 32, E4, 8B, F0, D1, E6, BB, 7D,  1, 8A,  0, EE, 4A, 8A,   875
  117. 1260 DATA 40,  1, EE, 83, C2,  3, B0,  3, EE, 58, 5E, 5B, 5A, C3, E8,  D,   73B
  118. 1270 DATA  0, E8, B5, FF, 8B, 16, 68,  1, 81, C2, A0,  F, CD, 27,  6, B9,   74B
  119. 1280 DATA 81,  7, 81, C1,  0,  1, E8, 7B, FF, 41, 89,  E, 94,  1, 83, C1,   6DE
  120. 1290 DATA 20, 89,  E, 68,  1,  E,  7, 8B, 3E, 68,  1, B8, 20,  7, FC, B9,   4FB
  121. 1300 DATA D0,  7, F3, AB, C7,  6, 75,  1, FF, FF, B0,  1, E8, 9E, FE,  7,   8F2
  122. 1310 DATA C3, BA,  3,  1, B4,  9, CD, 21, C6,  6,  0,  1,  0, 33, DB, 8C,   593
  123. 1320 DATA C8, FC, 43, 3B, C3, 74, 17, 8E, C3, BE,  0,  1, 8B, FE, B9, 10,   7F2
  124. 1330 DATA  0, F3, A6, 75, ED, B4,  9, BA, C4,  8, CD, 21, CD, 20,  E,  7,   72E
  125. 1340 DATA BB, 80,  0, 8A, 27,  A, E4, 74, 3C, 43, 8A,  7, FE, CC, 3C, 2F,   693
  126. 1350 DATA 75, F3,  A, E4, 74, 2F, 43, 8A,  7, FE, CC, 3C, 32, 75,  6, FE,   77E
  127. 1360 DATA  6, 62,  1, EB, E0,  C, 20, 3C, 6D, 75,  6, FE,  6, 61,  1, EB,   5D5
  128. 1370 DATA D4, 3C, 66, 75,  6, FE,  6, 66,  1, EB, CA, 3C, 64, 75, C6, FE,   7EA
  129. 1380 DATA  6, 67,  1, EB, C0, 1E, 33, DB, 8A, 1E, 62,  1, 8B, F3, D1, E6,   785
  130. 1390 DATA B8, 40,  0, 8E, D8, 33, DB, 8B,  0, 1F, A3, 63,  1, FA, 8B, 16,   6B8
  131. 1400 DATA 63,  1, 83, C2,  4, B0,  B, EE, A0, 66,  1, E8, F1, FE, 80, 3E,   7F2
  132. 1410 DATA 62,  1,  0, 74,  7, B0,  B, B3, F7, EB,  5, 90, B0,  C, B3, EF,   721
  133. 1420 DATA B4, 25, BA, 4F,  2, CD, 21, E4, 21, 22, C3, E6, 21, 8B, 16, 63,   6C7
  134. 1430 DATA  1, 42, B0,  3, EE, 4A, B9,  7,  0, EC, 42, E2, FC, B4,  F, CD,   78A
  135. 1440 DATA 10, 3C,  7, 74,  9, C7,  6, 6A,  1,  0, B8, EB,  7, 90, C7,  6,   50F
  136. 1450 DATA 6A,  1,  0, B0, 80, 3E, 61,  1,  0, 75,  3, E9, D0, FE, B9, D4,   6F7
  137. 1460 DATA  B, E8, 60, FE, A1, 6A,  1, 8E, C0, E9, A4,  0,  0, FF,  0,  0,   737
  138. 1470 DATA  0,  D,  A,  D,  A, 45, 6E, 74, 65, 72, 20, 70, 68, 6F, 6E, 65,   466
  139. 1480 DATA 20, 6E, 75, 6D, 62, 65, 72, 3A, 24,  D,  A, 4E, 6F, 20, 63, 61,   4BF
  140. 1490 DATA 72, 72, 69, 65, 72, 2E, 24,  D,  A, 45, 72, 72, 6F, 72, 2E, 24,   4E9
  141. 1500 DATA  D,  A, 52, 65, 74, 75, 72, 6E, 69, 6E, 67, 20, 74, 6F, 20, 44,   53C
  142. 1510 DATA 4F, 53, 2E, 24,  D,  A, 50, 43, 52, 45, 4D, 4F, 54, 45, 20, 69,   3F3
  143. 1520 DATA 73, 20, 61, 6C, 72, 65, 61, 64, 79, 20, 72, 65, 73, 69, 64, 65,   611
  144. 1530 DATA 6E, 74, 2E, 24, C9, CD, CD, CD, CD, CD, CD, CD, CD, CD, CD, CD,   ACC
  145. 1540 DATA CD, CD, CD, CD, CD, CD, CD, BB, BA, 20, 4F, 4B, 20, 74, 6F, 20,   8ED
  146. 1550 DATA 45, 58, 49, 54, 3F, 20, 28, 59, 2F, 4E, 29, BA, C8, CD, CD, CD,   6A9
  147. 1560 DATA CD, CD, CD, CD, CD, CD, CD, CD, CD, CD, CD, CD, CD, CD, CD, BC,   CBF
  148. 1570 DATA 32, C0, E8, F8, FC, BA, 81,  8, B4,  9, CD, 21, BA, C3,  3, 8B,   8C7
  149. 1580 DATA DA, C6,  7, 28, B4,  A, CD, 21, B0,  1, E8, 4F, FD, BE, C3,  3,   7E4
  150. 1590 DATA 46, 33, C0, FC, AC,  A, C0, 75,  3, E9, 92,  1, 56, BE, DC,  1,   790
  151. 1600 DATA E8, 64, FD, 5E,  3, F0, 46, C6,  4,  0, 4E, 2B, F0, E8, 57, FD,   84F
  152. 1610 DATA B0,  1, E8, 27, FD, E8, 9F, FC, E8, 12, FD, 74,  B, E8, A6,  1,   945
  153. 1620 DATA C6,  6, 5B,  1,  1, EB, 26, 90, B4,  0, E8,  8, FC, 73, E9, 3C,   702
  154. 1630 DATA 33, 75,  9, BA, 99,  8, B4,  9, CD, 21, EB, 94, 3C, 38, 74, F3,   711
  155. 1640 DATA 3C, 34, 75, D4, BA, A7,  8, B4,  9, CD, 21, EB, 83, B0,  1, E8,   7D4
  156. 1650 DATA EA, FC, C6,  6, 96,  1, 14, E8, D3, FC, 75,  3, E9, 2F,  1, A1,   846
  157. 1660 DATA 8B,  1, 3B,  6, 89,  1, 75,  D, B0,  D, B4,  1, E8, F0, FB, FE,   71C
  158. 1670 DATA  E, 96,  1, 74, D8, B4,  0, E8, BB, FB, 73, DB, 3C, 40, 7C, D7,   860
  159. 1680 DATA 3C,  0, 75,  6, E8, 3F,  1, EB, 2E, 90, 8A, D0, B4,  2, CD, 21,   686
  160. 1690 DATA E8, 9A, FC, 75,  3, E9, F6,  0, E8, DC, FC, 74, 11, 3B,  6, 1B,   876
  161. 1700 DATA  2, 75,  8, E8, 59,  1, 75,  6, E9, E3,  0, E8, BC,  1, B4,  0,   661
  162. 1710 DATA E8, 82, FB, 73, DB, EB, C9, E8, 73, FC, 75,  3, E9, CF,  0, B4,   AA2
  163. 1720 DATA  2, CD, 16, 38,  6, 6C,  1, 74, 10, A2, 6C,  1, B0, FD, B4,  1,   585
  164. 1730 DATA E8, 8C, FB, A0, 6C,  1, E8, 86, FB, E8, 9B, FC, 74, 11, 3B,  6,   92A
  165. 1740 DATA 1B,  2, 75,  8, E8, 18,  1, 75,  6, E9, A2,  0, E8, 7B,  1, B4,   5B9
  166. 1750 DATA  0, E8, 41, FB, 72,  3, E9, 92,  0, 80, 3E, 7D,  8, FF, 74, 38,   702
  167. 1760 DATA 83, 3E, 77,  1, FF, 75, 14, C6,  6, 7C,  8, 10, BB, 20,  0, F7,   5F3
  168. 1770 DATA E3,  2,  6, 7D,  8, A3, 77,  1, EB, 71, 90, 8B, 3E, 77,  1, E8,   6A0
  169. 1780 DATA BD,  0, 47, 89, 3E, 77,  1, FE,  E, 7C,  8, 74,  3, EB, 5C, 90,   621
  170. 1790 DATA C6,  6, 7D,  8, FF, EB, 54, 90, 80, 3E, 7E,  8,  0, 74, 28, 33,   632
  171. 1800 DATA DB, 8A, 1E, 7E,  8, BF, 7E,  8, 88,  1, FE, C3, 88, 1E, 7E,  8,   6C4
  172. 1810 DATA 80, FB,  3, 75, 36, B7,  0, 8B, 16, 7F,  8, B4,  2, CD, 10, C6,   661
  173. 1820 DATA  6, 7E,  8,  0, EB, 25, 90, 50, 24, FE, 3C, FE, 75,  F, 58, 24,   5D8
  174. 1830 DATA  1, A2, 7D,  8, C7,  6, 77,  1, FF, FF, EB,  F, 90, 3C, D2, 75,   778
  175. 1840 DATA  9, 58, C6,  6, 7E,  8,  1, EB,  2, 90, 58, E9, 29, FF, A1, 1B,   656
  176. 1850 DATA  2, E8, D6,  0, E8, 2F,  0, BA, B0,  8, B4,  9, CD, 21, 32, C0,   6E6
  177. 1860 DATA E8, 2A, FB, B0,  1, E8, 94, FB, 8B, 16, 63,  1, 42, 32, C0, EE,   85C
  178. 1870 DATA 80, 3E, 62,  1,  0, 74,  5, B3,  8, EB,  3, 90, B3, 10, E4, 21,   59B
  179. 1880 DATA  A, C3, E6, 21, CD, 20, BB,  0,  0, BA,  0,  0, B4,  2, CD, 10,   5C9
  180. 1890 DATA B8,  0,  7, B7,  7, B9,  0,  0, B6, 18, B2, 4F, CD, 10, C3, 53,   5F8
  181. 1900 DATA 52, 80, 3E, 67,  1,  0, 74, 12, FC, 8A, D8, BA, DA,  3, FA, EC,   7D9
  182. 1910 DATA A8,  1, 75, FB, EC, A8,  1, 74, FB, 93, AA, FB, 5A, 5B, C3, 50,   91D
  183. 1920 DATA A1, 89,  1, 3B,  6, 8B,  1, 75, F7, E8, 59,  0, 26, 8B, 3E, 8D,   621
  184. 1930 DATA  1, BE,  0,  0, B9,  3,  0, 51, B9, 14,  0, F2, A5, 83, C6, 78,   5F1
  185. 1940 DATA 59, E2, F4, E8, 3F,  0, BF,  0,  0, BE, E4,  8, B9,  3,  0, 51,   6CC
  186. 1950 DATA B9, 14,  0, AC, E8, A8, FF, B0,  7, E8, A3, FF, E2, F5, 83, C7,   A6A
  187. 1960 DATA 78, 59, E2, EB, E8, 30, FB, 74, FB,  C, 20, 8B, 36, 8D,  1, BF,   85A
  188. 1970 DATA  0,  0, B9,  3,  0, 51, B9, 14,  0, F2, A5, 83, C7, 78, 59, E2,   66E
  189. 1980 DATA F4, 3C, 79, 58, C3,  6, 1E,  7, 1F, C3, 50, B4,  1, B0, FE, E8,   76C
  190. 1990 DATA ED, F9, 58, 50, B4,  1, E8, E6, F9, 58, 50, 8A, C4, B4,  1, E8,   99D
  191. 2000 DATA DD, F9, 58, C3,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,   2F1
  192. 2010 DATA 284270
  193.