2 lines
209 B
Plaintext
2 lines
209 B
Plaintext
{} {set garbage [list]; for {set i 0} {$i < 5} {incr i} {if [expr $i % 2] {lappend garbage [. Week $i: [lindex_random $::hard_book]]} {lappend ::garbage [. Week $i: [lindex_random $::easy_book]]}};. $garbage}
|