!7

static long timeout = 60000;
static long networkLatency = 10000;

sclass ConnectToServer extends DynBigNumber {
  long count;
  
  void start {
    super.start();
    thread "Connect" {
      while licensed {
        withMinTime(1000, r {
          pcall-short {
            S s = loadPageWithTimeout(butterBotURL(#1016548) + "/" + randomID() /* avoid spam block */ + hquery(+count), timeout+networkLatency);
            if (s == null) ret;
            setField(count := parseInt(s));
            setValue(count);
          }
        });
      }
    }
  }
}