diff --git a/RBBGCMuso/R/changeMuso.R~ b/RBBGCMuso/R/changeMuso.R~
new file mode 100644
index 0000000..539453a
--- /dev/null
+++ b/RBBGCMuso/R/changeMuso.R~
@@ -0,0 +1,22 @@
+
+#' This is the function which is capable change multiple specific lines to other using their row numbers.
+#'
+#' he function uses the previous changspecline function to operate.
+         ##From now changespecline is in the forarcheologist file, because its no longer needed
+#' 
+#' @author Roland Hollós
+
+changemulline <- function(filename,calibrationpar,contents){
+                                        #This is the function which is capable change multiple specific lines to other using their row numbers.
+                                        #The function uses the previous changspecline function to operate.
+         ##From now changespecline is in the forarcheologist file, because its no longer needed
+        varnum <- length(calibrationpar)
+        if(length(contents)!=varnum)
+        {
+            cat("Error: number of the values is not the same as the number of the changed parameters")
+        }
+
+        TOT=readLines(filename,-1)
+        TOT[calibrationpar]<-contents
+        writeLines(TOT,filename)
+    }
diff --git a/RBBGCMuso/R/stamplog.R~ b/RBBGCMuso/R/stamplog.R~
new file mode 100644
index 0000000..0af7cb2
--- /dev/null
+++ b/RBBGCMuso/R/stamplog.R~
@@ -0,0 +1,31 @@
+#' This function returns only the starting numbers of a string
+#' 
+#' This function returns only the starting numbers of a string
+#' @author Roland Hollós
+
+numcut<-function(string){
+    #This function returns only the starting numbers of a string
+    unlist(strsplit(grep("^[0-9]",string,value = TRUE),"[aAzZ-]"))[1]
+}
+
+#' numcutall
+#'
+#' apply numcut for all elements of a string vector
+#' @author Roland Hollós
+numcutall<-function(vector){
+    #numcall apply numcut for all elements of a string vector
+as.numeric(unlist(apply(as.matrix(vector),1,numcut)))
+}
+
+#' It gives back a stamp wich is the maximum number of the output numcall
+#'
+#' It gives back a stamp wich is the maximum number of the output numcall
+#' @author Roland Hollós
+#' 
+stamp<-function(path="./"){
+    #It gives back a stamp wich is the maximum number of the output numcall
+    numbers<-numcutall(list.files(path))
+    if(length(numbers)==0){
+        return (0)} else {
+                   return(max(numbers))}
+}
diff --git a/RBBGCMuso_0.2.0.0-1.tar.gz.bck b/RBBGCMuso_0.2.0.0-1.tar.gz.bck
new file mode 100644
index 0000000..237deb6
Binary files /dev/null and b/RBBGCMuso_0.2.0.0-1.tar.gz.bck differ
diff --git a/RBBGCMuso_0.3.0.0-1.tar.gz b/RBBGCMuso_0.3.0.0-1.tar.gz
new file mode 100644
index 0000000..5dce1f5
Binary files /dev/null and b/RBBGCMuso_0.3.0.0-1.tar.gz differ
diff --git a/TODOS.org b/TODOS.org
new file mode 100644
index 0000000..24d9063
--- /dev/null
+++ b/TODOS.org
@@ -0,0 +1,10 @@
+* Tervek
+** Dokumentáció
+   1) 
+      1) 
+      2) 
+	 1) 
+	 2) 
+      3) 
+   2) 
+** Programozás
diff --git a/TODOS~ b/TODOS~
new file mode 100644
index 0000000..c19e715
--- /dev/null
+++ b/TODOS~
@@ -0,0 +1,26 @@
+DOCUMENTATIONS
+===========================================================
+1. Rewriting some of the man pages (for better english)
+2. Description for the functions
+3. Details for the functions
+4. Vignettes...
+
+PROGRAMING
+===========================================================
+1. Automatic handle for executable files
+2. Fix the spinumMuso, and the normalMuso functions
+3. Fix the export functions.
+4. Build in the mtclim43 to RBBGCMuso
+
+TESTING
+===========================================================
+1. Jasca
+2. Kiskun
+3. HHS
+4. Bugac
+
+CALIBRATION AND OTHERS
+============================================================
+1. Local sensitivity analysis
+2. Morriss sensitivity analysis
+3. MCMC
\ No newline at end of file