diff --git a/branches/dwg/Apps/crossdev/CLEAN.BAT b/branches/dwg/Apps/crossdev/CLEAN.BAT
new file mode 100644
index 00000000..a51ac08b
--- /dev/null
+++ b/branches/dwg/Apps/crossdev/CLEAN.BAT
@@ -0,0 +1,4 @@
+if exist *.bak erase *.bak
+if exist *.prn erase *.prn 
+if exist *.o   erase *.o
+if exist *.cpm erase *.cpm
diff --git a/branches/dwg/Apps/crossdev/TMS9918.ASM b/branches/dwg/Apps/crossdev/TMS9918.ASM
index ba24c94e..37787e9f 100644
--- a/branches/dwg/Apps/crossdev/TMS9918.ASM
+++ b/branches/dwg/Apps/crossdev/TMS9918.ASM
@@ -714,15 +714,15 @@ vdp_main_:	lxi d,.24
 	POP D
 	LXI H,0
 	PUSH H
-	LXI H,2
+	LXI H,3
 	PUSH H
 	LXI H,2
 	PUSH H
-	LXI H,2012
+	LXI H,2013
 	PUSH H
-	LXI H,18
+	LXI H,16
 	PUSH H
-	LXI H,11
+	LXI H,1
 	PUSH H
 	LXI H,20-.24
 	DAD SP
@@ -1460,4 +1460,4 @@ vdp_wrvr_:	lxi d,.76
 	extrn	.dv
 	extrn	.um
 	END
-
\ No newline at end of file
+
\ No newline at end of file
diff --git a/branches/dwg/Apps/crossdev/TMSSTAT.BAT b/branches/dwg/Apps/crossdev/TMSSTAT.BAT
new file mode 100644
index 00000000..b29f4eec
--- /dev/null
+++ b/branches/dwg/Apps/crossdev/TMSSTAT.BAT
@@ -0,0 +1,10 @@
+rem tmsstat.bat 2/15/2013 dwg - build tmsstat.cpm using native tools
+
+if not exist tmsstat.asm z80mu cc tmsstat
+if not exist tmsstat.o   z80mu as tmsstat
+if not exist n8chars.asm z80mu cc n8chars
+if not exist n8chars.o   z80mu as n8chars
+if not exist tms9918.asm z80mu cc tms9918
+if not exist tms9918.o   z80mu as tms9918
+if not exist tmsstat.cpm z80mu ln tmsstat.o n8chars.o tms9918.o -lc
+if not exist tmsstat.cpm rename tmsstat.com tmsstat.cpm