!7

cmodule2 Celebrate > DynBigNumber {
  Long num;
  
  start {
    setDescription("COMPUTERS");
    doEveryAndNow(60.0, r updateIt);
  }
  
  void updateIt enter {
    bool hadNum = num != null;
    bool change = setField(num := numberOfComputers()) && hadNum;
    setValue(num);
    if (change) celebrate();
  }
  
  void celebrate enter {
    infoBoxForever(n2(num, "computer") + "!!!");
    applause();
  }
}