proc fillques {nick uhost hand chan text} {
set data [split $text]
set ::ncurrent 0
set ::namount [lindex $data 1]
set waittime [lindex $data 0]
set filename [ini_read "mp3leech.ini" "mp3" "mp3leech_list"]
set channel [ini_read "mp3leech.ini" "mp3" "mp3leech_channel"]
set current [ini_read "mp3leech.ini" "mp3" "mp3leech_line"]
set total [ini_read "mp3leech.ini" "mp3" "mp3leech_total"]
set data [split [read [open $filename]] \n]
set total [llength $data]
every $waittime "makereq $channel \[lindex $data \$::ncurrent\] ; if {\[incr ::ncurrent\] == \$::total} {return}"
close $filename
}