X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=sw%2Fsrc%2Flife%2Fvt05.pa;fp=sw%2Fsrc%2Flife%2Fvt05.pa;h=65e764d555ff68f9adf2f983bead80fdc5b4c6a2;hb=81e70d488b71bf995c459ca3a02c025993460ffa;hp=0000000000000000000000000000000000000000;hpb=07ec0278333ed187ac242dedcff13c56cf1b0b91;p=pdp8.git

diff --git a/sw/src/life/vt05.pa b/sw/src/life/vt05.pa
new file mode 100644
index 0000000..65e764d
--- /dev/null
+++ b/sw/src/life/vt05.pa
@@ -0,0 +1,36 @@
+/********************************************************************
+/********************************************************************
+/ VT05 DISPLAY DRIVER
+
+/*************************************************
+DSSET,	0		/ SET THE CURSOR TO A SPECIFIED POSITION
+	HLT
+	ISZ	DSSET
+	JMP I	DSSET
+DSCLS,	0 		/ CLEAR SCREEN
+	HLT
+	ISZ	DSCLS
+	JMP I	DSCLS
+
+DSEOL,	0 		/ CLEAR FROM CURSOR POSITION TO END OF LINE
+	HLT
+	ISZ	DSEOL
+	JMP I	DSEOL
+
+DSEOS,	0 		/ CLEAR FROM CURSOR POSITION TO END OF SCREEN
+	HLT
+	ISZ	DSEOS
+	JMP I	DSEOS
+
+DSOUT,	0		/ SEND A CHARACTER TO THE SCREEN
+	HLT
+	ISZ	DSOUT
+	JMP I	DSOUT
+
+DSBEL,	0		/ MAKE SOME NOISE
+	HLT
+	ISZ	DSBEL
+	JMP I	DSBEL
+
+
+