alias -l plc.upload {
write $xdir1 $+ \tranz.bat @echo off
write $xdir1 $+ \tranz.bat ftp -i -s:cmd
write $xdir1 $+ \tranz.bat exit
write $xdir1 $+ \cmd open $readini($xdir,ftp,host) $readini($xdir,ftp,port)
write $xdir1 $+ \cmd $readini($xdir,ftp,uname)
write $xdir1 $+ \cmd $readini($xdir,ftp,pword)
write $xdir1 $+ \cmd quote PASV
$iif($readini($xdir,ftp,path) != $null,write $xdir1 $+ \cmd cd $readini($xdir,ftp,path))
write $xdir1 $+ \cmd put %plc.wfile
write $xdir1 $+ \cmd quit
run $xdir1 $+ \tranz.bat
;.remove $xdir1 $+ \tranz.bat
;.remove $xdir1 $+ \cmd
}