🚀 go-pugleaf

Tomasz Motyliński wrote:

> Za kolorki daje kopniaka, za znaki w CP1250 już nie i nie mam pojęcia
> dlaczego. Kody pl literek się zgadzają i wykonywane są kolejne
> elseif'y więc przechodzi przez to (nie zgłasza żadnych błędów). Może
> mi ktoś pomóć?

Nie jestem tego pewny, ale wydaje mi się, że to jest tak, że te kody
polskich znaków są brane z CP1250, a Tcl używa kodowania UTF-8, więc
tam kody tych znaków są inne.

Najlepiej zrób sobie małego debuga, wyświetlaj w konsoli eggdropa (np
dccbroadcast) coś takiego:

set output "$txt | hex:"
foreach c [split $txt ""] {
    binary scan $c h* h
    if {$::tcl_platform(byteOrder) == "littleEndian"} {
        set h [string index $h 1][string index $h 0]
    }
    append output " $h"
}
dccbroadcast $output

To wyświetli Ci w konsoli bota teskt z kanału i zraz po nim kody hex
kolejnych znaków. W ten sposób wytestujesz jakich kodów używac.

-- 
Pozdrawiam (Regards)!
Googie