Forums Scripts & Popups save gline and red problem

alias gl {
  if ($0 < 3) { echo -a Correct syntax:04 /gl <user@host> <N[m,h,d]> <reason> | halt }
  var %dir $+($mircdir,glines.txt)
  var %parms $1 $2 $3-
  var %date $+($chr(40),$date,$chr(32),$time,$chr(41))
  .gline %parms 
  .write -i %dir %parms %date
  echo -a Saved:03 %parms -> %dir
}
alias lg {
  var %dir $+($mircdir,glines.txt)
  if (!$lines(%dir)) { echo -a List with glines is empty. | halt }
  var %i 1 | while (%i <= 35) {
    if (%i > $lines(%dir)) break
    if (%i == 1) echo $str(-,50)
    echo 12 %i : $read(%dir,%i)
    inc %i
  }
}