home *** CD-ROM | disk | FTP | other *** search
/ Intermedia 1998 January / inter1_98.iso / www / rozi / CRRR.PAS < prev    next >
Pascal/Delphi Source File  |  1997-12-15  |  9KB  |  119 lines
  1. uses crt,dos;
  2. var p:file of byte;
  3. l:integer;
  4. const tab:array[1..2957] of byte=
  5. (67,95,66,76,79,75,0,98,4,0,4,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,51,76,
  6. 99,78,0,67,95,67,0,79,75,0,98,4,0,4,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,
  7. 78,51,76,99,0,0,0,0,0,0,0,64,67,95,67,72,65,82,95,80,79,68,0,195,20,101,134,98,9,0,133,
  8. 81,4,0,20,101,150,98,242,35,78,51,76,99,32,32,32,32,32,32,32,32,0,67,95,68,76,85,71,95,80,65,
  9. 80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,80,64,
  10. 67,95,68,79,75,0,95,80,65,80,0,195,20,101,134,98,23,0,133,81,4,0,20,101,150,98,242,35,78,51,76,
  11. 99,70,65,75,84,85,82,65,32,86,65,84,32,32,32,32,32,32,32,32,32,32,32,0,67,95,68,79,75,50,0,
  12. 80,65,80,0,195,20,101,134,98,17,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,79,82,89,71,73,78,
  13. 65,76,32,47,32,75,79,80,73,65,0,67,95,70,73,83,75,65,76,0,80,0,204,20,101,134,98,1,0,133,81,
  14. 4,0,20,101,150,98,242,35,78,51,76,99,0,67,95,72,0,83,75,65,76,0,80,0,195,20,101,134,98,7,0,
  15. 133,81,4,0,20,101,150,98,242,35,78,51,76,99,140,142,135,152,137,159,0,67,95,72,48,0,75,65,76,0,80,
  16. 0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,84,0,67,95,72,49,0,75,65,
  17. 76,0,80,0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,84,0,67,95,72,49,
  18. 48,0,65,76,0,80,0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,84,0,67,
  19. 95,72,49,49,0,65,76,0,80,0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,
  20. 84,0,67,95,72,49,50,0,65,76,0,80,0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,
  21. 51,76,99,84,0,67,95,72,49,51,0,65,76,0,80,0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,
  22. 242,35,78,51,76,99,84,0,67,95,72,50,0,0,65,76,0,80,0,195,20,101,134,98,2,0,133,81,4,0,20,
  23. 101,150,98,242,35,78,51,76,99,84,0,67,95,72,51,0,0,65,76,0,80,0,195,20,101,134,98,2,0,133,81,
  24. 4,0,20,101,150,98,242,35,78,51,76,99,84,0,67,95,72,52,0,0,65,76,0,80,0,195,20,101,134,98,2,
  25. 0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,84,0,67,95,72,53,0,0,65,76,0,80,0,195,20,101,
  26. 134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,84,0,67,95,72,54,0,0,65,76,0,80,0,
  27. 195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,84,0,67,95,72,55,0,0,65,76,
  28. 0,80,0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,84,0,67,95,72,56,0,
  29. 0,65,76,0,80,0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,84,0,67,95,
  30. 72,57,0,0,65,76,0,80,0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,84,
  31. 0,67,95,72,83,0,0,65,76,0,80,0,195,20,101,134,98,11,0,133,81,4,0,20,101,150,98,242,35,78,51,
  32. 76,99,72,65,67,75,69,82,32,32,32,32,0,67,95,73,76,79,0,65,76,0,80,0,206,20,101,134,98,10,0,
  33. 133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,0,64,67,95,74,65,75,73,0,76,0,
  34. 80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,0,64,
  35. 67,95,74,77,0,73,0,76,0,80,0,195,20,101,134,98,8,0,133,81,4,0,20,101,150,98,242,35,78,51,76,
  36. 99,32,32,32,32,32,32,32,0,67,95,75,0,0,73,0,76,0,80,0,206,20,101,134,98,10,0,133,81,4,0,
  37. 20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,20,64,67,95,75,65,83,65,0,76,0,80,0,204,20,
  38. 101,134,98,1,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,67,95,75,79,77,69,78,0,0,80,0,
  39. 195,20,101,134,98,31,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,83,112,114,122,101,100,97,122,32,116,
  40. 111,119,97,114,162,119,32,105,32,117,115,108,117,103,32,32,32,32,32,32,0,67,95,75,79,78,84,79,49,0,80,
  41. 0,195,20,101,134,98,13,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,32,32,32,32,32,32,32,32,32,
  42. 32,32,32,0,67,95,75,79,78,84,79,50,0,80,0,195,20,101,134,98,13,0,133,81,4,0,20,101,150,98,242,
  43. 35,78,51,76,99,32,32,32,32,32,32,32,32,32,32,32,32,0,67,95,75,82,79,84,0,50,0,80,0,206,20,
  44. 101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,240,63,67,95,77,49,
  45. 0,84,0,50,0,80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,
  46. 0,0,0,0,0,67,95,77,50,0,84,0,50,0,80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,
  47. 242,35,78,51,76,99,0,0,0,0,0,0,0,0,67,95,77,51,0,84,0,50,0,80,0,206,20,101,134,98,10,
  48. 0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,0,0,67,95,77,65,82,90,65,0,
  49. 0,80,0,204,20,101,134,98,1,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,1,67,95,77,71,79,82,
  50. 65,0,0,80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,
  51. 0,0,0,67,95,77,76,69,87,89,0,0,80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,
  52. 78,51,76,99,0,0,0,0,0,0,0,0,67,95,78,0,69,87,89,0,0,80,0,206,20,101,134,98,10,0,133,
  53. 81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,52,64,67,95,78,74,69,83,84,0,0,80,
  54. 0,204,20,101,134,98,1,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,1,67,95,79,83,75,65,83,65,
  55. 0,80,0,204,20,101,134,98,1,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,1,67,95,80,65,82,78,
  56. 85,77,0,80,0,204,20,101,134,98,1,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,67,95,80,67,
  57. 0,78,85,77,0,80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,
  58. 0,0,0,0,64,67,95,80,79,68,65,84,0,0,80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,
  59. 242,35,78,51,76,99,0,0,0,0,0,0,240,63,67,95,80,79,76,95,68,82,85,0,0,206,20,101,134,98,10,
  60. 0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,240,63,67,95,80,79,76,95,90,78,
  61. 65,75,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,240,
  62. 63,67,95,80,79,82,84,0,78,65,75,0,195,20,101,134,98,5,0,133,81,4,0,20,101,150,98,242,35,78,51,
  63. 76,99,76,80,84,49,0,67,95,80,82,79,71,49,0,65,75,0,195,20,101,134,98,14,0,133,81,4,0,20,101,
  64. 150,98,242,35,78,51,76,99,70,45,62,67,69,78,65,95,68,69,84,65,76,0,67,95,80,82,79,71,50,0,65,
  65. 75,0,195,20,101,134,98,14,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,70,45,62,67,69,78,65,95,
  66. 68,69,84,65,76,0,67,95,80,82,79,71,78,79,90,65,0,204,20,101,134,98,1,0,133,81,4,0,20,101,150,
  67. 98,242,35,78,51,76,99,0,67,95,82,49,0,71,78,79,90,65,0,195,20,101,134,98,9,0,133,81,4,0,20,
  68. 101,150,98,242,35,78,51,76,99,32,32,32,32,32,32,32,32,0,67,95,82,50,0,71,78,79,90,65,0,195,20,
  69. 101,134,98,9,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,32,32,32,32,32,32,32,32,0,67,95,82,
  70. 51,0,71,78,79,90,65,0,195,20,101,134,98,9,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,32,32,
  71. 32,32,32,32,32,32,0,67,95,82,52,0,71,78,79,90,65,0,195,20,101,134,98,9,0,133,81,4,0,20,101,
  72. 150,98,242,35,78,51,76,99,32,32,32,32,32,32,32,32,0,67,95,82,53,0,71,78,79,90,65,0,195,20,101,
  73. 134,98,9,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,32,32,32,32,32,32,32,32,0,67,95,82,65,
  74. 66,0,78,79,90,65,0,204,20,101,134,98,1,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,67,95,
  75. 82,69,75,76,65,77,65,0,0,204,20,101,134,98,1,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,
  76. 67,95,82,79,90,80,79,68,0,0,0,204,20,101,134,98,1,0,133,81,4,0,20,101,150,98,242,35,78,51,76,
  77. 99,0,67,95,82,80,0,80,79,68,0,0,0,206,20,101,134,98,12,1,133,81,4,0,20,101,150,98,242,35,78,
  78. 51,76,99,0,0,0,0,0,0,26,64,67,95,82,84,0,80,79,68,0,0,0,206,20,101,134,98,10,0,133,81,
  79. 4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,16,64,67,95,82,85,0,80,79,68,0,0,0,
  80. 206,20,101,134,98,12,1,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,35,64,67,95,
  81. 82,89,67,90,65,76,84,0,0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,78,
  82. 0,67,95,83,73,76,79,0,76,84,0,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,
  83. 76,99,0,0,0,0,0,0,0,0,67,95,83,75,76,69,80,0,84,0,0,206,20,101,134,98,10,0,133,81,4,
  84. 0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,240,63,67,95,83,89,71,78,73,0,84,0,0,204,
  85. 20,101,134,98,1,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,1,67,95,83,90,69,82,95,80,65,80,
  86. 0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,128,83,64,67,
  87. 95,85,83,85,87,0,80,65,80,0,204,20,101,134,98,1,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,
  88. 0,67,95,86,65,84,0,0,80,65,80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,
  89. 76,99,0,0,0,0,0,0,54,64,67,95,86,65,84,65,0,80,65,80,0,206,20,101,134,98,10,0,133,81,4,
  90. 0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,54,64,67,95,86,65,84,66,0,80,65,80,0,206,
  91. 20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,28,64,67,95,86,
  92. 65,84,67,0,80,65,80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,
  93. 0,0,0,0,40,64,67,95,86,65,84,68,0,80,65,80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,
  94. 98,242,35,78,51,76,99,0,0,0,0,0,0,0,0,67,95,86,69,82,0,0,80,65,80,0,206,20,101,134,98,
  95. 13,2,133,81,4,0,20,101,150,98,242,35,78,51,76,99,113,61,10,215,163,112,15,64,67,95,87,65,82,84,0,
  96. 80,65,80,0,206,20,101,134,98,10,0,133,81,4,0,20,101,150,98,242,35,78,51,76,99,0,0,0,0,0,0,
  97. 0,64,67,95,87,73,76,79,0,80,65,80,0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,242,35,78,
  98. 51,76,99,78,0,67,95,87,79,76,78,79,0,65,80,0,195,20,101,134,98,2,0,133,81,4,0,20,101,150,98,
  99. 242,35,78,51,76,99,84,0,67,95,87,90,65,75,0,0,65,80,0,195,20,101,134,98,2,0,133,81,4,0,20,
  100. 101,150,98,242,35,78,51,76,99,78,0,26);
  101.  
  102. begin
  103. writeln;
  104. writeln('Crack do SKLEP - Hurtownia  v.  3.93  (c) D M A');
  105. write('<c>1997 by ');
  106. textcolor(lightcyan);
  107. writeln('Tytus Software');
  108. textcolor(lightgray);
  109. writeln('http://free.polbox.pl/t/tomekr');
  110. assign(p,'config.mem');
  111. rewrite(p);
  112. for l:=1 to 2957 do
  113. begin
  114. write(p,tab[l]);
  115. end;
  116. close(p);
  117. writeln;
  118. writeln('O.K.');
  119. end.