tests/arrays.qc

   1 void     print(...)   = #1;
   2 string   ftos (float) = #2;
   3 entity() spawn = #3;
   4
   5 float  glob[7];
   6
   7 .float above;
   8 .float flds[6];
   9 .float below;
  10
  11 void main() {
  12     float loc[6];
  13
  14     loc[0] = 1000;
  15     loc[1] = 1100;
  16     loc[2] = 1200;
  17     loc[3] = 1300;
  18     loc[4] = 1400;
  19     loc[5] = 1500;
  20
  21     float i;
  22
  23     for (i = 0; i < 6; i += 1)
  24         loc[i] += 1;
  25     for (i = 0; i < 5; i += 1)
  26         print(ftos(loc[i]), " ");
  27     print(ftos(loc[i]), "\n");
  28
  29     glob[0] = 1000;
  30     glob[1] = 1100;
  31     glob[2] = 1200;
  32     glob[3] = 1300;
  33     glob[4] = 1400;
  34     glob[5] = 1500;
  35     glob[6] = 1600;
  36     for (i = 0; i < 7; i += 1)
  37         glob[i] += 1;
  38     for (i = 0; i < 6; i += 1)
  39         print(ftos(glob[i]), " ");
  40     print(ftos(glob[i]), "\n");
  41
  42     entity e = spawn();
  43     e.above = 7777;
  44     e.below = 9999;
  45     e.flds[0] = 1000;
  46     e.flds[1] = 1100;
  47     e.flds[2] = 1200;
  48     e.flds[3] = 1300;
  49     e.flds[4] = 1400;
  50     e.flds[5] = 1500;
  51     for (i = 0; i < 6; i += 1)
  52         e.flds[i] += 1;
  53     for (i = 0; i < 5; i += 1)
  54         print(ftos(e.flds[i]), " ");
  55     print(ftos(e.flds[i]), "\n");
  56 }