Added new program, UPTINI, to create .temp.;UPTIME DATA. A future

commit can run this program, create the file, and copy to bawden
directory rather than using a pre-built version.

Resolves #1471.

src/ejs/uptini.1

@@ -0,0 +1,41 @@
+title UPTINI - Create UPTIME DATA
+
+chdsko=10
+
+flose=.lose %lsfil
+
+data:
+	IRP M,,[DB,NO,UP,ES,LC]
+        sixbit/M/		; sixbit host name
+	0			; sixbit date
+	0			; sixbit time
+	TERMIN
+	0	;; end of data
+dataln==.-data
+
+datptr: -dataln,,data
+
+go:	.call [ setz
+		sixbit /open/
+		[.bio,,chdsko]
+		dbdev
+		dbfn1
+		dbfn2
+		setz dbdir ]
+	 flose
+	.call [ setz
+		sixbit /iot/
+	        %climm,,chdsko
+		setz datptr ]
+	 flose
+	.close chdsko,
+	.logout 1,
+
+dbdev:	sixbit /dsk/
+dbdir:	sixbit /.temp./
+dbfn1:	sixbit /uptime/
+dbfn2:	sixbit /data/
+
+cnstnt:	constants
+
+end go