YOU SAID:

proc ::tclmon::putprivmsg {targ mod msg {tn {}}} { variable reporthost if {$tn == {}} {set targnick ""} {set targnick [format {%s%s%s } [getconf precomma] $tn [getconf comma]]} set line [string map [list %c "\x03" %b "\x02" %o "\x0f" %h $reporthost %u

INTO JAPANESE

proc ::tclmon::putprivmsg {targ mod msg {tn {}}} { variable reporthost if {$tn == {}} {set targnick ""} {set targnick [format {%s%s%s } [getconf precomma] $tn [getconf カンマ]]} set line [string map [list %c "\x03" %b "\x02" %o "\x0f" %h $reporthost %u

BACK INTO ENGLISH

proc ::tclmon::putprivmsg {targ mod msg {tn {}}} { variable reporthost if {$tn == {}} {set targnick ""} {set targnick [format {%s%s%s } [getconf precomma] $tn [getconf カンマ]]} set line [string map [list %c "\x03" %b "\x02" %o "\x0f" %h $reporthost %u

INTO JAPANESE

proc ::tclmon::putprivmsg {targ mod msg {tn {}}} { variable reporthost if {$tn == {}} {set targnick ""} {set targnick [format {%s%s%s } [getconf precomma] $tn [getconf カンマ]]} set line [string map [list %c "\x03" %b "\x02" %o "\x0f" %h $reporthost %u

BACK INTO ENGLISH

proc ::tclmon::putprivmsg {targ mod msg {tn {}}} { variable reporthost if {$tn == {}} {set targnick ""} {set targnick [format {%s%s%s } [getconf precomma] $tn [getconf カンマ]]} set line [string map [list %c "\x03" %b "\x02" %o "\x0f" %h $reporthost %u