diff --git a/scorch.bin b/scorch.bin
index 7b99faf..d1efd87 100644
Binary files a/scorch.bin and b/scorch.bin differ
diff --git a/scorch.xex b/scorch.xex
index 5532562..33483f5 100644
Binary files a/scorch.xex and b/scorch.xex differ
diff --git a/textproc.asm b/textproc.asm
index 1984f92..f1ecb58 100644
--- a/textproc.asm
+++ b/textproc.asm
@@ -2047,14 +2047,21 @@ NextChar02
     iny
     cpy #$08
     bne NextChar02
-	; memory !!!!
+    ;=========================
+	; displaying number of active controller port or AI level
+    ;=========================
 	ldx TankNr
 	ldy #$5e	; Computer symbol
 	lda SkillTable,x
+	tax
 	bne ThisIsAI
 	ldy #$0a	; Joystick symbol
+	ldx JoystickNumber
+	inx 	; tricky
 ThisIsAI
 	sty statusBuffer+16
+	lda digits,x
+	sta statusBuffer+17
 ;    rts
 .endp
 ;-------------------------------------------------
@@ -2062,15 +2069,6 @@ ThisIsAI
 ;-------------------------------------------------
 
     ldx TankNr
-    ;=========================
-	; displaying number of active controller port
-    ;=========================
-	ldy SkillTable,x
-	bne LevelOfAI
-	ldy JoystickNumber
-LevelOfAI
-	lda digits+1,y
-	sta statusBuffer+17
 	
     ;=========================
     ;displaying symbol of the weapon