home *** CD-ROM | disk | FTP | other *** search
/ ftp.whtech.com / ftp.whtech.com.tar / ftp.whtech.com / club100 / pg / pgxos / xmaday.200 < prev    next >
Text File  |  2006-10-19  |  3KB  |  73 lines
  1. XMADAY.200   copyright (c) 1989 
  2.                by Paul Globman
  3.                   Wilson Van Alst
  4.  
  5. XMADAY.200 is the cross bank version of Wilson Van Alst's MAYDAY.200 and 
  6. incorporates Van's BRRSET.200 for resetting the DAY, DATE, and TIME.
  7.  
  8. It was designed to recover .DO files that were lost to a system cold restart.
  9.  
  10. The advantage of XMADAY over MAYDAY is that XMADAY does not have to be moved 
  11. into the recently cold started bank, thereby preserving RAM in that bank for
  12. data recovery.
  13.  
  14. The program starts by requesting DAY, DATE, and TIME input.  A <CR> will 
  15. politely bypass the current prompt while an improper input will return to the 
  16. T200 menu.
  17.  
  18. The final prompt "Destination Bank" requires the user to enter the bank to 
  19. be recovered.  A response other than "2" or "3" will be interpretted as "1".
  20.  
  21. The program returns to the bank from which it was run, and upon entering the
  22. recovered bank, the file FOUND.DO will be on the menu, and will be 18500 bytes
  23. in size.
  24.  
  25. The users should remove non ascii data from the beginning and end of this file
  26. before separating the individual .DO files.  The character GRPH-l is inserted
  27. between individual .DO files so you can use F1(Find) to locate the end of each 
  28. file.  Use CUT/PASTE to create new TEXT files for each block of text found 
  29. between the GRPH-l characters.
  30.  
  31. Run the following BASIC loader program to create XMADAY.CO.
  32.  
  33. 1 '************************
  34. 2 '*  XMADAY.CO           *
  35. 3 '*    by Paul Globman   *
  36. 4 '*  Copyright (c) 1989  *
  37. 5 '************************
  38. 10 FOR I = 63574 TO 63786 
  39. 20 READ X:POKE I,X:SM=SM+X
  40. 30 NEXT
  41. 40 IF SM = 26972 THEN 60
  42. 50 PRINT"error in data":STOP
  43. 60 SAVEM"XMADAY.CO",63574,63786,63617
  44. 1000 DATA 62,0,211,216,33,27,111,205
  45. 1010 DATA 115,45,1,68,72,205,168,130
  46. 1020 DATA 218,125,248,229,9,235,225,126
  47. 1030 DATA 254,26,204,84,65,254,127,204
  48. 1040 DATA 84,65,35,223,218,109,248,175
  49. 1050 DATA 195,153,3,33,164,103,34,52
  50. 1060 DATA 239,33,1,249,205,165,248,196
  51. 1070 DATA 103,27,33,11,249,205,165,248
  52. 1080 DATA 196,35,27,33,26,249,205,165
  53. 1090 DATA 248,196,19,27,195,189,248,205
  54. 1100 DATA 158,103,62,7,50,7,239,205
  55. 1110 DATA 246,84,215,200,17,43,249,205
  56. 1120 DATA 183,121,33,41,249,182,201,49
  57. 1130 DATA 255,255,33,3,105,205,204,17
  58. 1140 DATA 205,247,18,231,214,48,71,62
  59. 1150 DATA 1,135,5,194,207,248,230,12
  60. 1160 DATA 50,238,248,50,87,248,33,86
  61. 1170 DATA 248,17,86,248,1,103,0,243
  62. 1180 DATA 205,236,248,195,86,248,197,6
  63. 1190 DATA 0,213,86,227,205,176,155,209
  64. 1200 DATA 235,193,35,19,11,121,176,194
  65. 1210 DATA 236,248,201,68,97,121,58,32
  66. 1220 DATA 32,95,95,95,0,68,97,116
  67. 1230 DATA 101,58,32,109,109,47,100,100
  68. 1240 DATA 47,121,121,0,84,105,109,101
  69. 1250 DATA 58,32,104,104,58,109,109,58
  70. 1260 DATA 115,115,0,221,34
  71. 1270 REM       END OF DATA
  72.  
  73.