diff --git a/libsrc/apple2/Makefile b/libsrc/apple2/Makefile
index ccbe19f15..75addc827 100644
--- a/libsrc/apple2/Makefile
+++ b/libsrc/apple2/Makefile
@@ -37,6 +37,7 @@ OBJS=	_scrsize.o	\
 	crt0.o		\
 	ctype.o		\
 	cvline.o	\
+        get_ostype.o    \
         getenv.o        \
         joy_stddrv.o    \
 	kbhit.o		\
diff --git a/libsrc/apple2/get_ostype.s b/libsrc/apple2/get_ostype.s
new file mode 100644
index 000000000..b686cbb79
--- /dev/null
+++ b/libsrc/apple2/get_ostype.s
@@ -0,0 +1,20 @@
+;
+; Stefan Haubenthal, Jul 12 2003
+;
+; unsigned char get_ostype(void)
+;
+; $23 ProDOS 2.0.3
+;
+
+	.export		_get_ostype
+
+.proc	_get_ostype
+
+	lda	#0
+	ldx	$bf00
+	cpx	#$4c	; JMP opcode
+	bne	nopdos
+	lda	$bfff
+nopdos:	rts
+
+.endproc