diff --git a/libsrc/atari5200/conioscreen.s b/libsrc/atari5200/conioscreen.s
index ba47866ce..412dd582d 100644
--- a/libsrc/atari5200/conioscreen.s
+++ b/libsrc/atari5200/conioscreen.s
@@ -1,3 +1,6 @@
+; setup default CONIO screen (20x24, Antic mode 6, BASIC mode 1)
+;
+; 28-May-2014, Christian Groessler <chris@groessler.org>
.include "atari5200.inc"
diff --git a/libsrc/atari5200/setcursor.s b/libsrc/atari5200/setcursor.s
index 00195f1cf..4cf8ebac7 100644
--- a/libsrc/atari5200/setcursor.s
+++ b/libsrc/atari5200/setcursor.s
@@ -1,49 +1,11 @@
+; Dummy version, there is no visible cursor in the default CONIO screen
+;
+; 28-May-2014, Christian Groessler <chris@groessler.org>
-
- .include "atari5200.inc"
- .export setcursor
- .import cursor ; from conio/_cursor.s
-
-
+ .export setcursor
.proc setcursor
- rts
-
-.if 0
- ldy #0
-
- lda ROWCRS_5200
- jsr mul20
- clc
-; adc SAVMSC ; add start of screen memory
-; sta OLDADR
- txa
-; adc SAVMSC+1
-; sta OLDADR+1
- lda COLCRS_5200
-; adc OLDADR
-; sta OLDADR
- bcc nc
-; inc OLDADR+1
-nc:;;; lda (OLDADR),y
-; sta OLDCHR
-
- ldx cursor ; current cursor setting as requested by the user
- beq off
- ldx #0
- beq cont
-
-off: inx
-cont:;;; stx CRSINH ; update system variable
-
- beq turnon
- and #$7f ; clear high bit / inverse flag
-finish: ;;;sta (OLDADR),y ; update on-screen display
rts
-turnon: ora #$80 ; set high bit / inverse flag
- bne finish
-.endif
-
.endproc