/ScriptServ

;====================================================================================
;                                                                 NetLand §¢®Ipt V2.0
;                                                                       ßÿ GoodNews 
;                                           We made everything here and it is professional
;                                          so you dont need to touch or change  anything 
;                                     cause it can cause a malfunction to the script .Thx !!!!!!
;                                                               Long Live #NetLand
;=====================================================================================
stats {
  if (($idle >= $minutes(%away.idle)) && (%away.away == no)) {
    xaway idle
  }
  if ($dialog(about) == $null) {
    splay stop
  }
}
core {
  if ($1 == stats) {
    .timerstats 0 3 stats
  }
}
checkque {
  if ($send(0) < %fserve.maxdownloads) {
    if ($lines(queueb.txt) != 0) {
      .set %m.queuea $read -l1 queuea.txt
      .set %m.queueb $read -l1 queueb.txt
      .dcc send %m.queuea " $+ %m.queueb $+ "
      .write -dl1 queuea.txt
      .write -dl1 queueb.txt
      .unset %m.queuea
      .unset %m.queueb
      //set %queue.getnum $calc(%queue.getnum - 1)
    }
  }
}
minutes { return $calc($1 * 60) }
seconds { return $calc($1 / 60) }