diff --git a/src/sysen1/pdset.115 b/src/sysen1/pdset.116
similarity index 99%
rename from src/sysen1/pdset.115
rename to src/sysen1/pdset.116
index f8864377..cb6a7b13 100755
--- a/src/sysen1/pdset.115
+++ b/src/sysen1/pdset.116
@@ -448,12 +448,12 @@ SBKUP:	.RDTIME A,	;SEE HOW LONG IT'S BEEN SINCE . TYPED
 	CMD "C,CENSET,SET CENTURY (precede by NN, for example 20C)
 
 CENSET:	PUSHJ P,ARGET	;GET CENTURY (-1)
-	MOVEI A,19.	;NO ARG, RESET TO DEFAULT
+	MOVEI A,20.	;NO ARG, RESET TO DEFAULT
 	IMULI A,100.	;CONVERT TO YEAR
 	MOVEM A,CENTURY	;SET CENTURY
 	POPJ P,
 
-CENTURY:	1900.	;CENTURY (FOR FIRST TWO DIGITS OF YEAR)
+CENTURY:	2000.	;CENTURY (FOR FIRST TWO DIGITS OF YEAR)
 
 	CMD "A,AM
 	CMD "P,PM