diff --git a/blk/081 b/blk/081
index e216810..c894fc6 100644
--- a/blk/081
+++ b/blk/081
@@ -1,6 +1,6 @@
 RAMSTART  FUTURE USES          +3c       BLK(*
-+02       CURRENT              +3e       XYPOS
-+04       HERE                 +40       FUTURE USES
++02       CURRENT              +3e       FUTURE USES
++04       HERE                 
 +06       C<?                  +51       CURRENTPTR
 +08       C<* override         +53       (emit) override
 +0a       NLPTR                +55       (key) override
diff --git a/blk/083 b/blk/083
index a3afc08..a45d747 100644
--- a/blk/083
+++ b/blk/083
@@ -7,8 +7,8 @@ WORDBUF is the buffer used by WORD
 BOOT C< PTR is used when Forth boots from in-memory
 source. See "Initialization sequence" below.
 
-XYPOS Current position of the cursor on screen. The meaning of
-the pos in terms of row and cols is driver-dependent.
+
+
 
 
 
diff --git a/blk/393 b/blk/393
index 10a69c9..d176462 100644
--- a/blk/393
+++ b/blk/393
@@ -3,7 +3,6 @@
 : HERE 0x04 RAM+ ;
 : CURRENT* 0x51 RAM+ ;
 : CURRENT CURRENT* @ ;
-: XYPOS 0x40 RAM+ ;
 
 ( w -- a f )
 : FIND CURRENT @ SWAP _find ;
diff --git a/blk/623 b/blk/623
index bea85cc..63cfd76 100644
--- a/blk/623
+++ b/blk/623
@@ -1,3 +1,4 @@
+: XYPOS [ VDP_MEM LITN ] ;
 CODE _ctl ( a -- sends LSB then MSB )
     HL POPqq, chkPS,
     A L LDrr, VDP_CTLPORT OUTnA,
diff --git a/emul/forth.bin b/emul/forth.bin
index 45b66a1..04694fd 100644
Binary files a/emul/forth.bin and b/emul/forth.bin differ
diff --git a/recipes/sms/xcomp.fs b/recipes/sms/xcomp.fs
index 9353fe6..e3fa460 100644
--- a/recipes/sms/xcomp.fs
+++ b/recipes/sms/xcomp.fs
@@ -3,6 +3,7 @@
 0xdd00 CONSTANT RS_ADDR
 ( Memory register at the end of RAM. Must not overwrite )
 0xddca CONSTANT PS_ADDR
+RAMSTART 0x70 + CONSTANT VDP_MEM
 0xbf   CONSTANT VDP_CTLPORT
 0xbe   CONSTANT VDP_DATAPORT
 32     CONSTANT VDP_COLS