home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: InfoMgt / InfoMgt.zip / WAKEUP.ZIP / WAKEUP.BAS < prev    next >
BASIC Source File  |  1988-04-26  |  9KB  |  154 lines

  1. 100 REM -- BASIC PROGRAM TO CREATE WAKEUP.EXE
  2. 110 OPEN "WAKEUP.EXE" AS #1 LEN = 1
  3. 120 FIELD #1,1 AS A$
  4. 130 CHECKSUM = 0
  5. 140 FOR I% = 1 TO 134
  6. 150    LINESUM% = 0
  7. 160    FOR J% = 1 TO 8
  8. 170       READ BYTE%
  9. 180       CHECKSUM = CHECKSUM + BYTE%
  10. 190       LINESUM% = LINESUM% + BYTE%
  11. 200       LSET A$ = CHR$(BYTE%)
  12. 210       PUT #1
  13. 220    NEXT J%
  14. 230    READ LINECHECK%
  15. 240    IF LINECHECK% <> LINESUM% THEN PRINT "Error in Line"; 280 + 10 * I%
  16. 250 NEXT I%
  17. 260 CLOSE
  18. 270 IF CHECKSUM = 71623 THEN PRINT "Successful Completion!" : END
  19. 280 PRINT "EXE file is not valid!" : END
  20. 290 DATA    77,   90,   41,    0,    3,    0,    0,    0,  211
  21. 300 DATA     4,    0,    0,    0,  255,  255,    0,    0,  514
  22. 310 DATA   184,    0,    0,    0,    0,    0,    0,    0,  184
  23. 320 DATA    64,    0,    0,    0,    0,    0,    0,    0,   64
  24. 330 DATA     0,    0,    0,    0,    0,    0,    0,    0,    0
  25. 340 DATA     0,    0,    0,    0,    0,    0,    0,    0,    0
  26. 350 DATA     0,    0,    0,    0,    0,    0,    0,    0,    0
  27. 360 DATA     0,    0,    0,    0,  128,    0,    0,    0,  128
  28. 370 DATA    14,   31,  186,   14,    0,  180,    9,  205,  639
  29. 380 DATA    33,  184,    1,   76,  205,   33,   84,  104,  720
  30. 390 DATA   105,  115,   32,  112,  114,  111,  103,  114,  806
  31. 400 DATA    97,  109,   32,   99,   97,  110,  110,  111,  765
  32. 410 DATA   116,   32,   98,  101,   32,  114,  117,  110,  720
  33. 420 DATA    32,  105,  110,   32,   68,   79,   83,   32,  541
  34. 430 DATA   109,  111,  100,  101,   46,   13,   10,   36,  526
  35. 440 DATA     0,    0,    0,    0,    0,    0,    0,    0,    0
  36. 450 DATA    78,   69,    5,    0,  205,    0,    2,    0,  359
  37. 460 DATA   181,  117,   74,   88,    2,    0,    2,    0,  464
  38. 470 DATA     0,    0,    0,    0,   16,    0,    1,    0,   17
  39. 480 DATA     0,    3,    2,    0,    2,    0,    3,    0,   10
  40. 490 DATA    14,    0,   64,    0,   80,    0,   80,    0,  238
  41. 500 DATA    90,    0,   96,    0,   79,    1,    0,    0,  266
  42. 510 DATA     0,    0,    4,    0,    0,    0,    0,    0,    4
  43. 520 DATA     0,    0,    0,    0,    0,    0,    0,    0,    0
  44. 530 DATA    22,    0,  127,    1,    0,   13,  127,    1,  291
  45. 540 DATA    53,    0,  217,    0,    1,   12,    0,    3,  286
  46. 550 DATA     6,   87,   65,   75,   69,   85,   80,    0,  467
  47. 560 DATA     0,    0,    1,    0,   10,    0,   44,    0,   55
  48. 570 DATA     0,    8,   68,   79,   83,   67,   65,   76,  446
  49. 580 DATA    76,   83,    8,   75,   66,   68,   67,   65,  508
  50. 590 DATA    76,   76,   83,    9,   75,   66,   68,   67,  520
  51. 600 DATA    72,   65,   82,   73,   78,   14,   75,   66,  525
  52. 610 DATA    68,   70,   76,   85,   83,   72,   66,   85,  605
  53. 620 DATA    70,   70,   69,   82,    8,   86,   73,   79,  537
  54. 630 DATA    67,   65,   76,   76,   83,   12,   86,   73,  538
  55. 640 DATA    79,   83,   69,   84,   67,   85,   82,   80,  629
  56. 650 DATA    79,   83,   11,   86,   73,   79,   87,   82,  580
  57. 660 DATA    84,   78,   65,   84,   84,   82,    9,   86,  572
  58. 670 DATA    73,   79,   87,   82,   84,   84,   84,   89,  662
  59. 680 DATA     8,   86,   73,   79,   80,   79,   80,   85,  570
  60. 690 DATA    80,   11,   86,   73,   79,   69,   78,   68,  544
  61. 700 DATA    80,   79,   80,   85,   80,    0,    0,   10,  414
  62. 710 DATA    87,   65,   75,   69,   85,   80,   46,   69,  576
  63. 720 DATA    88,   69,    0,    0,    0,    0,    0,    0,  157
  64. 730 DATA     0,    0,    0,    0,    0,    0,    0,    0,    0
  65. 740 DATA     0,    0,    0,    0,    0,    0,    0,    0,    0
  66. 750 DATA    30,    7,  142,  216,  139,  243,   42,  228, 1047
  67. 760 DATA   172,   10,  192,  117,  251,  172,   10,  192, 1116
  68. 770 DATA   116,   66,  191,  208,    0,  185,    5,    0,  771
  69. 780 DATA   242,  174,  116,  241,  232,  129,    0,  139, 1273
  70. 790 DATA   208,  172,   60,   58,  116,   18,  232,  119,  983
  71. 800 DATA     0,  107,  210,   10,    2,  208,  128,  250,  915
  72. 810 DATA    24,  115,   33,  172,   60,   58,  117,   28,  607
  73. 820 DATA   107,  210,   60,  172,  232,   97,    0,  107,  985
  74. 830 DATA   192,   10,  138,  224,  172,  232,   88,    0, 1056
  75. 840 DATA     2,  196,   60,   60,  115,    6,   42,  228,  709
  76. 850 DATA     3,  208,  235,   85,    6,   31,  185,  145,  898
  77. 860 DATA     0,  106,    1,   30,  104,    0,    0,   81,  322
  78. 870 DATA    30,  104,  218,    0,  154,  255,  255,    0, 1016
  79. 880 DATA     0,  129,  249,  180,    0,  116,   20,   11,  705
  80. 890 DATA   192,  116,   36,   30,  104,  213,    0,  106,  797
  81. 900 DATA     0,  154,  255,  255,    0,    0,  185,  180, 1029
  82. 910 DATA     0,  235,  214,   30,  104,  231,    0,  106,  920
  83. 920 DATA     0,  106,    0,  154,  255,  255,    0,    0,  770
  84. 930 DATA   106,    0,  154,  255,  255,    0,    0,  106,  876
  85. 940 DATA     1,  106,    1,  154,  255,  255,    0,    0,  772
  86. 950 DATA    44,   48,  114,  176,   60,    9,  119,  172,  742
  87. 960 DATA   195,    6,   31,   30,  104,  220,    0,  154,  740
  88. 970 DATA   255,  255,    0,    0,  160,  220,    0,   42,  932
  89. 980 DATA   228,  107,  192,   60,    2,    6,  221,    0,  816
  90. 990 DATA   128,  212,    0,  146,   43,  194,  115,    3,  841
  91. 1000 DATA    5,  160,    5,  186,   96,  234,  247,  226, 1159
  92. 1010 DATA   82,   80,  154,  255,  255,    0,    0,   30,  856
  93. 1020 DATA  104,  213,    0,  106,    0,  154,  138,    0,  715
  94. 1030 DATA    0,    0,  184,   80,    0,   45,   28,    0,  337
  95. 1040 DATA  209,  232,  106,   12,   80,  106,    0,  154,  899
  96. 1050 DATA  255,  255,    0,    0,   30,  104,  180,    0,  824
  97. 1060 DATA  106,   28,  106,    0,  154,  255,  255,    0,  904
  98. 1070 DATA    0,  106,    0,  154,  255,  255,    0,    0,  770
  99. 1080 DATA  184,    0,    0,  187,    0,    2,  186,    0,  559
  100. 1090 DATA    4,  232,   50,    0,  184,    1,    0,  187,  658
  101. 1100 DATA    0,    4,  186,    0,    8,  232,   38,    0,  468
  102. 1110 DATA   30,  104,  231,    0,  106,    1,  106,    0,  578
  103. 1120 DATA  154,  156,    0,    0,    0,  160,  231,    0,  701
  104. 1130 DATA   10,    6,  232,    0,  116,  210,  106,    0,  680
  105. 1140 DATA  154,  163,    0,    0,    0,  106,    1,  106,  530
  106. 1150 DATA    0,  154,  172,    0,    0,    0,    5,  215,  546
  107. 1160 DATA    0,   30,   80,  104,  208,    7,  106,    0,  535
  108. 1170 DATA  106,    0,  106,    0,  154,  255,  255,    0,  876
  109. 1180 DATA    0,  185,   10,    0,   83,  106,   50,  154,  588
  110. 1190 DATA  255,  255,    0,    0,   82,  106,   50,  154,  902
  111. 1200 DATA  112,    1,    0,    0,  226,  238,  195,   12,  784
  112. 1210 DATA    0,    3,    1,   82,    1,    1,    0,    5,   93
  113. 1220 DATA    0,    3,    1,  117,    0,    1,    0,  138,  260
  114. 1230 DATA    0,    3,    2,   57,    1,    2,    0,   19,   84
  115. 1240 DATA    0,    3,    1,  227,    0,    1,    0,   32,  264
  116. 1250 DATA    0,    3,    1,  192,    0,    1,    0,   33,  230
  117. 1260 DATA    0,    3,    2,   20,    1,    2,    0,   29,   57
  118. 1270 DATA    0,    3,    1,  120,    1,    1,    0,   50,  176
  119. 1280 DATA    0,    3,    2,    0,    1,    3,    0,   53,   62
  120. 1290 DATA    0,    3,    2,  101,    1,    3,    0,   66,  176
  121. 1300 DATA    0,    3,    2,   13,    1,    3,    0,   78,  100
  122. 1310 DATA    0,    3,    2,  238,    0,    3,    0,   88,  334
  123. 1320 DATA    0,    3,    2,   73,    1,    3,    0,   97,  179
  124. 1330 DATA    0,    0,    0,    0,    0,    0,    0,    0,    0
  125. 1340 DATA    0,    0,    0,    0,    0,    0,    0,    0,    0
  126. 1350 DATA   13,   10,   83,  121,  110,  116,   97,  120,  670
  127. 1360 DATA   58,   32,   68,   69,   84,   65,   67,   72,  515
  128. 1370 DATA   32,   87,   65,   75,   69,   85,   80,   32,  525
  129. 1380 DATA  104,  111,  117,  114,   58,  109,  105,  110,  828
  130. 1390 DATA  117,  116,  101,   13,   10,   10,    9,   85,  461
  131. 1400 DATA  115,  101,   32,   50,   52,   45,  104,  111,  610
  132. 1410 DATA  117,  114,   32,  116,  105,  109,  101,   32,  726
  133. 1420 DATA  102,  111,  114,  109,   97,  116,   46,   13,  708
  134. 1430 DATA   10,   10,   40,   67,   41,   32,   49,   57,  306
  135. 1440 DATA   56,   56,   44,   32,   90,  105,  102,  102,  587
  136. 1450 DATA   45,   68,   97,  118,  105,  115,   32,   67,  647
  137. 1460 DATA  111,  109,  109,  117,  110,  105,   99,   97,  857
  138. 1470 DATA  116,  105,  111,  110,  115,   32,   67,  111,  767
  139. 1480 DATA   46,   13,   10,   80,  114,  111,  103,  114,  591
  140. 1490 DATA   97,  109,  109,  101,  100,   32,   98,  121,  767
  141. 1500 DATA   32,   67,  104,   97,  114,  108,  101,  115,  738
  142. 1510 DATA   32,   80,  101,  116,  122,  111,  108,  100,  770
  143. 1520 DATA   44,   32,   49,   50,   47,   56,   55,   13,  346
  144. 1530 DATA   10,   10,   80,  114,  101,  115,  115,   32,  577
  145. 1540 DATA   97,  110,  121,   32,  107,  101,  121,   32,  721
  146. 1550 DATA  116,  111,   32,  114,  101,  116,  117,  114,  821
  147. 1560 DATA  110,   32,  116,  111,   32,   79,   83,   47,  610
  148. 1570 DATA   50,   46,   46,   46,   87,   65,   75,   69,  484
  149. 1580 DATA   32,   85,   80,   33,   32,   32,   87,   65,  446
  150. 1590 DATA   75,   69,   32,   85,   80,   33,   32,   32,  438
  151. 1600 DATA   87,   65,   75,   69,   32,   85,   80,   33,  526
  152. 1610 DATA    9,   32,   44,   59,   61,    1,    0,   79,  285
  153. 1620 DATA  116,    0,    0,    0,    0,    0,    0,    0,  116
  154.