auto deft involve data with shell

#!/bin/bash
autodef R29.13.50 R29.13.55 dbload_13.50 135.1.68.98

#!/bin/bash 

####################################
#define the param
####################################

data=$3
host=$4
username="lss"
password="lss"
####################################
#put the zip file to host
####################################
function ftp_put
{
ftp -v -n $1<<EOF
user lss lss
binary
hash
cd /storage/zachary/
prompt
mput $2
bye
EOF

}
####################################
#get file from the host
####################################
function ftp_get
{
ftp -v -n $1<<EOF
user lss lss
binary
hash
cd /storage/zachary/
prompt
mget $2.zip
bye
EOF

}



####################################
#only one deft
####################################
function single_def
{
cp /home/imsci/CI_loads/$5/ATCA/deft_ISC${1#*R}_ISC${2#*R}.zip .
deft_name="deft_ISC${1#*R}_ISC${2#*R}.zip"
ftp_put $host $deft_name
echo "$deft_name"
deftolab $1 $2 $3 $4 $deft_name
}
####################################
#start main function 
####################################
#zip -r $data.zip $data
fload=${1##*.}
tload=${2##*.}
t=$(($tload-$fload))
i=0
for((i=0;i<=$t;i++)) 
do
load_name[$i]="${1%*$fload}$((fload+i))"
echo ${load_name[$i]}
echo $path_temp
done

for((i=0;i<$t;i++))
do
echo ${load_name[$i]}
path_temp="R2913.$((fload+i+1))"
if(($i==0))
then
single_def ${load_name[$i]} ${load_name[$((i+1))]} $3 $4 $path_temp
else
single_def ${load_name[$i]} ${load_name[$((i+1))]} ${load_name[$i]} $4 $path_temp
fi
done

#!/opt/exptools/bin/expect
set fload [lindex $argv 0]
set tload [lindex $argv 1]
set fload_data [lindex $argv 2]
set rhost [lindex $argv 3]
set def_name [lindex $argv 4]
set timeout 4
spawn telnet $rhost
expect "login:"
send "lss\r"
expect "Password:"
send "lss\r"
expect "day:"
send "\r\r"
expect "/home/lss:"
send "cd /storage/zachary/\r"
expect "/storage/zachary:"
send "unzip $def_name\r"
expect "/storage/zachary:"
send "./DeftEvolve -i $fload_data -o $tload\r"
expect "/storage/zachary:"
send "rm -rf DeftEvolve  checkEvolve exportData  importData  ip_check  resynchData  zip_installer deftchainData  evolveData deft.info diam.info validateData evolve_admin\r"
expect "/storage/zachary:"
send "exit\r"
interact