diff --git a/cuenta/main.asm b/cuenta/main.asm
index 9b4e3a2..6651040 100755
--- a/cuenta/main.asm
+++ b/cuenta/main.asm
@@ -42,9 +42,6 @@ Start:
     clrf LATE
     clrf TRISE
 
-    movlw 0x06
-    movwf PORTE
-
     clrf CUENTA
 
 
@@ -99,8 +96,7 @@ rl: CALL Delay               ; Delay
     return
 
 right:
-    infsnz CUENTA, W
-    return
+    incf CUENTA, W
     daw
     movwf CUENTA
     call splitDigit