diff --git a/src/version.c b/src/version.c
new file mode 100644
index 000000000..8155511f1
--- /dev/null
+++ b/src/version.c
@@ -0,0 +1,162 @@
+/*	SCCS Id: @(#)version.c	3.3	1999/12/01	*/
+/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
+/* NetHack may be freely redistributed.  See license for details. */
+
+#include "hack.h"
+#include "date.h"
+/*
+ * All the references to the contents of patchlevel.h have been moved
+ * into makedefs....
+ */
+#ifdef SHORT_FILENAMES
+#include "patchlev.h"
+#else
+#include "patchlevel.h"
+#endif
+
+/* fill and return the given buffer with the nethack version string */
+char *
+getversionstring(buf)
+char *buf;
+{
+	return strcpy(buf, VERSION_ID);
+}
+
+int
+doversion()
+{
+	char buf[BUFSZ];
+
+	pline(getversionstring(buf));
+	return 0;
+}
+
+int
+doextversion()
+{
+	display_file(OPTIONS_USED, TRUE);
+	return 0;
+}
+
+#ifdef MICRO
+boolean
+comp_times(filetime)
+long filetime;
+{
+	return((boolean)(filetime < BUILD_TIME));
+}
+#endif
+
+boolean
+check_version(version_data, filename, complain)
+struct version_info *version_data;
+const char *filename;
+boolean complain;
+{
+	if (
+#ifdef VERSION_COMPATIBILITY
+	    version_data->incarnation < VERSION_COMPATIBILITY ||
+	    version_data->incarnation > VERSION_NUMBER
+#else
+	    version_data->incarnation != VERSION_NUMBER
+#endif
+	  ) {
+	    if (complain)
+		pline("Version mismatch for file \"%s\".", filename);
+	    return FALSE;
+	} else if (version_data->feature_set != VERSION_FEATURES ||
+		   version_data->entity_count != VERSION_SANITY1 ||
+		   version_data->struct_sizes != VERSION_SANITY2) {
+	    if (complain)
+		pline("Configuration incompatibility for file \"%s\".",
+		      filename);
+	    return FALSE;
+	}
+	return TRUE;
+}
+
+/* this used to be based on file date and somewhat OS-dependant,
+   but now examines the initial part of the file's contents */
+boolean
+uptodate(fd, name)
+int fd;
+const char *name;
+{
+    int rlen;
+    struct version_info vers_info;
+    boolean verbose = name ? TRUE : FALSE;
+
+    rlen = read(fd, (genericptr_t) &vers_info, sizeof vers_info);
+    minit();		/* ZEROCOMP */
+    if (rlen == 0) {
+	if (verbose) {
+	    pline("File \"%s\" is empty?", name);
+	    wait_synch();
+	}
+	return FALSE;
+    }
+    if (!check_version(&vers_info, name, verbose)) {
+	if (verbose) wait_synch();
+	return FALSE;
+    }
+    return TRUE;
+}
+
+void
+store_version(fd)
+int fd;
+{
+	static struct version_info version_data = {
+			VERSION_NUMBER, VERSION_FEATURES,
+			VERSION_SANITY1, VERSION_SANITY2
+	};
+
+	bufoff(fd);
+	/* bwrite() before bufon() uses plain write() */
+	bwrite(fd,(genericptr_t)&version_data,(unsigned)(sizeof version_data));
+	bufon(fd);
+	return;
+}
+
+#ifdef AMIGA
+const char amiga_version_string[] = AMIGA_VERSION_STRING;
+#endif
+
+unsigned long
+get_feature_notice_ver(str)
+char *str;
+{
+	char buf[BUFSZ];
+	int ver_maj, ver_min, patch;
+	char *istr[3];
+	int j = 0;
+
+	if (!str) return 0L;
+	str = strcpy(buf, str);
+	istr[j] = str;
+	while (*str) {
+		if (*str == '.') {
+			*str++ = '\0';
+			j++;
+			istr[j] = str;
+			if (j == 2) break;
+		} else if (index("0123456789", *str) != 0) {
+			str++;
+		} else 
+			return 0L;
+	}
+	if (j != 2) return 0L;
+	ver_maj = atoi(istr[0]);
+	ver_min = atoi(istr[1]);
+	patch = atoi(istr[2]);
+	return FEATURE_NOTICE_VER(ver_maj,ver_min,patch);
+	/* macro from hack.h */
+}
+
+unsigned long
+get_current_feature_ver()
+{
+	return FEATURE_NOTICE_VER(VERSION_MAJOR,VERSION_MINOR,PATCHLEVEL);
+}
+
+/*version.c*/