if ($sock($sockname).rq >= 4096) {
      var %x 1
      while (%x <= $ceil($calc($sock($sockname).rq) / 4096)) {
        sockread 4096 &ebaytemp 
        bwrite ebayfile -1 -1 &ebaytemp
        inc %x
      }
      bread ebayfile 1 $lof(ebayfile) &ebay
    }
    else {
      sockread &ebay
    }