All pastes #77935 Raw Edit

Someone

public text v1 · immutable
·published 2006-07-03 16:10 UTC
rendered paste body
ON *:SOCKREAD:price.*:{
  VAR %i = $Right($SockName,-6)
  SockRead -f %priceread
  IF ($SockErr) {
    %price.target. [ $+ [ %i ] ] Socket error: $SockErr $+ , while looking up %price.search. [ $+ [ %i ] ]
    UNSET %price.*. [ $+ [ %i ] ]
  }
  ELSE {
    :NextRead
    SockRead -f %priceread
    IF ($SockBr) {
      IF ((zybez.net IsIn %priceread) && ($NumTok(%priceread,44) > 1)) {
      }
      ELSEIF (%priceread == zybez.net) { %price.target. [ $+ [ %i ] ] Unable to find a match for $qt(%price.search. [ $+ [ %i ] ] ) }
    }
    ELSE SockClose $SockName
  }
}