add rscript