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 
}