A Small correction, not een sutre if its important, how ever I dont think it fixes what ever is causing your problem. If it does it does, however if it DOES NOT, then please supply a listing of the files
TEAMS1.TXT and CREWS1.TXT as without this i cant text it, (well i can but id rather have real test data)

Code:
draw {
  var %time = 0
  while ($read(Teams1.txt)) {
    var %team = $read(Teams1.txt) | write -dl $+ $readn Teams1.txt
    var %crew = $read(Crews1.txt) | write -dl $+ $readn Crews1.txt
    write loting1.txt %team voor %crew
    inc %time 1.5 | .timer 1 %time msg #woc %team 0,1is for :
    inc %time 1.5 | .timer 1 %time msg #woc ...
    inc %time 1.5 | .timer 1 %time msg #woc ..
    inc %time 1.5 | .timer 1 %time msg #woc .
    inc %time 1.5 | .timer 1 %time msg #woc %crew
    inc %time 1.5 | .timer 1 %time msg #woc _____________
    inc %time 1.5 | .timer 1 %time msg #woc 
    inc %time 0   | .timer 1 %time msg #woc 
  }
}