From f589f559612c2bbc257ef759f1f90bd76839bbea Mon Sep 17 00:00:00 2001
From: g012 <leclerc.pascal@gmail.com>
Date: Sun, 22 Oct 2017 09:49:53 +0200
Subject: [PATCH] Fixed VCS init function: used tsx instead of txs.

---
 CMakeLists.txt | 2 +-
 vcs.l65        | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/CMakeLists.txt b/CMakeLists.txt
index 0c2050e..28ed32b 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -9,7 +9,7 @@ set(L65_BINARY_DIR ${PROJECT_BINARY_DIR})
 
 set(L65_VERSION_MAJOR "1")
 set(L65_VERSION_MINOR "2")
-set(L65_VERSION_REVISION "0")
+set(L65_VERSION_REVISION "1")
 set(L65_VERSION "${L65_VERSION_MAJOR}.${L65_VERSION_MINOR}.${L65_VERSION_REVISION}")
 configure_file("${L65_SOURCE_DIR}/l65cfg.lua.in" "${L65_BINARY_DIR}/l65cfg.lua")
 
diff --git a/vcs.l65 b/vcs.l65
index 9f8c683..a834aac 100644
--- a/vcs.l65
+++ b/vcs.l65
@@ -167,7 +167,7 @@ PAL = {
 }
 TV = PAL
 
-init = function() cld ldx#0 txa local l=label() dex tsx pha bne l end
+init = function() cld ldx#0 txa local l=label() dex txs pha bne l end
 wait = function() local l=label() lda INTIM bne l end
 overscan_begin = function() sta WSYNC lda#2 sta VBLANK lda#TV.TIM_OVERSCAN sta TIM64T end
 overscan_end = wait