Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1. #define MEMSIZE 4096*200
  2.  
  3. #include "../lib/window.h"
  4. #include "../lib/array.h"
  5.  
  6. window win1=0;
  7. void main()
  8. {
  9.         win1.background = 0xFFFFFF;
  10.         win1.left = 200;
  11.         win1.top = 200;
  12.         win1.caption = "Stress test";
  13.         win1.ondraw = #draw_window;
  14.         win1.create();
  15. }
  16.  
  17. Array a = {0};
  18. Dictionary b = {0};
  19. void draw_window()
  20. {
  21.         dword size = 10000;
  22.         dword i = 0;
  23.         dword y = 10;
  24.         i = size;
  25.         /* ints */
  26.         a.init(0);
  27.         while(i){
  28.                 a.set(i,i);
  29.                 i--;
  30.         }
  31.         a.set(120,222);
  32.         a.set(9990,345);
  33.         i = size;
  34.         while(i){
  35.                 if (a.get(i) != i)
  36.                 {
  37.                         WriteText(15, y, 0x81, 0xFF0000, itoa(i));
  38.                         WriteText(95, y, 0x81, 0xFF0000, itoa(a.get(i)));
  39.                         y += 25;
  40.                 }
  41.                 i--;
  42.         }
  43.         /* strs */
  44.         b.init(0);
  45.         i = size;
  46.         while(i){
  47.                 b.set(itoa(i),i);
  48.                 i--;
  49.         }
  50.         b.set("123","Okey");
  51.         i = size;
  52.         while(i){
  53.                 if (b.get(itoa(i)) != i)
  54.                 {
  55.                         WriteText(15, y, 0x81, 0xFF0000, itoa(i));
  56.                         WriteText(95, y, 0x81, 0xFF0000, b.get(itoa(i)));
  57.                         y += 25;
  58.                 }
  59.                 i--;
  60.         }
  61. }
  62.