Československá literární komunita

Tak jako generace autorů před vámi, publikujte svoji psanou tvorbu. Podělte se o svoje názory a sbírejte zpětnou vazbu na svoje díla. Inspirujte se a učte od nejlepších.

Přidejte se

~ Tilda ~

02. 05. 2007
0
6
950

v slovnik.txt su riadky SLOVNIKA: termin = preklad termin vo frazeologickom spojeni = preklad vo fs ..... ..... atd. skript nahradi totozne slovo v nasledujucom riadku tildou (~) ako je v slovnikoch zvykom dufam ze vam to pripada ako POEZIA, seriem sa s tym hodinu TAK DAJTE NEJAKE TIPY! PROSIM!

set thefile [open "slovnik.txt" r]
set outfile [open "vlno.rtf" w]
set pslovo 0

    while {1} {

    set c [gets $thefile line]

    if { $c < 0} {
    break
    }

    set c [string first " " $line]
    set a [expr $c]
    set nslovo [string range $line 0 $a]

    if { $nslovo == $pslovo} {
    set pslovo $line
    set out ~
    set konec [string range $line $c end]
    append out $konec
    puts $outfile $out
    set pslovo $nslovo
    } else {
    puts $outfile $line
    set pslovo $nslovo
    }
   
    }
close $thefile
close $outfile

6 názorů

Noe1
02. 05. 2007
Dát tip
slovo tilda je moc pěkné pozval jsem ma~ na horskou na Kvildu !!!

Honzyk
02. 05. 2007
Dát tip
..dobrej napad)))

jde jenom o prach. vsichni jsme prach. mozna ne:-) good night, du to vypnout

Honzyk
02. 05. 2007
Dát tip
...nejde jen o prach))))-----------

my zasadne neuklizime. otevreme vokno a prach je vyvat ven.

Honzyk
02. 05. 2007
Dát tip
...to si hodim jako cteni pred spanim (pokud ovsem nekdo neprijde nebo nepudu spat jinam....zn.: jarni uklid)...a propos...takle doma to u mne ted vypada.---- --mozna hur...)))

Na psaní názorů musíte mít ověřený email.
Sdílení
Nahoru