;==========================
;Made by NewZzang
;==========================
on 1:sockopen:Speed:{
sockwrite -nt $sockname GET http://home.hananet.net/speedchk/images/big.jpg
set %Speed.time $ticks
}
on 1:sockread:Speed:{
sockread %Speed.temp
if ( $sock(Speed).rcvd == 814571 ) {
set %Speed.time $calc(($ticks - %Speed.time) / 1000)
msg %Speed.chan $mini 2인터넷 다운로드 속도: $round($bytes($calc((814571 / %Speed.time)*8/1000),k),4) $+ Mbps( $+ $int($bytes($calc(814571 / %Speed.time),k)) $+ KB/s)
unset %Speed.time
}
}
on 1:INPUT:*: {
if ($1 == !체크) {
say $1-
set %Speed.chan $chan
sockclose Speed
sockopen Speed home.hananet.net 80
halt
}
}
고대로 복사해서 사용하하세요 ~_~