alias gndr { clear -s | sockclose up | sockopen up1 www.hizliresim.com 80 }
on *:sockopen:up1: {
  var %a "D:\mırc\1.PNG"
  sockwrite -n up1 POST /upload.php HTTP/1.1
  sockwrite -n up1 Accept: text/html, application/xhtml+xml, */*
  sockwrite -n up1 User-Agent: Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/5.0)
  sockwrite -n up1 Content-Type: multipart/form-data; boundary=---------------------------7dc1a3233807cc
  sockwrite -n up1 Accept-Encoding: gzip, deflate
  sockwrite -n up1  host: b.hizliresim.com
  sockwrite -n up1 Content-Length: $calc($len(%a) + 1)
  sockwrite -n up1
  sockwrite -n $sockname %a
}

on *:SOCKREAD:up1: { 
  var %a1
  sockread %a1
  echo -a $htmlfree(%a1)  . 
}
alias htmlfree { 
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) 
  return %x 
}