diff --git a/Atari/textproc.asm b/Atari/textproc.asm
index 7feb777..6b9d8cf 100644
--- a/Atari/textproc.asm
+++ b/Atari/textproc.asm
@@ -1966,27 +1966,24 @@ NoShieldEnergy
     ;=========================
     mwa Wind temp
     lda #space
-    bit Wind+3 ; highest byte of 4 byte wind
-    bmi DisplayLeftWind
     sta statusBuffer+80+17    ; (space) char
-    lda #char_TAB  ; (tab) char
-    sta statusBuffer+80+20
-    bne DisplayWindValue
-DisplayLeftWind
     sta statusBuffer+80+20    ; (space) char
+    :4 lsrw temp ;divide by 16 to have a nice value on a screen
+    lda temp
+    beq DisplayWindValuex
+    bit Wind+3 ; highest byte of 4 byte wind
+    bmi DisplayLeftWindx
+    ldx #char_TAB  ; (tab) char
+    stx statusBuffer+80+20
+    bne DisplayWindValuex
+DisplayLeftWindx
     lda #char_DEL  ;(del) char
     sta statusBuffer+80+17
       sec  ; Wind = -Wind
       lda #$00
       sbc temp
       sta temp
-      lda #$00
-      sbc temp+1
-      sta temp+1
-DisplayWindValue
-    :4 lsrw temp ;divide by 16 to have a nice value on a screen
-    lda temp
-    ;sta decimal
+DisplayWindValuex
     mwx #statusBuffer+80+18 displayposition
     jsr displaybyte
 
diff --git a/game.asm b/game.asm
index 90dfa5a..8960acf 100644
--- a/game.asm
+++ b/game.asm
@@ -745,11 +745,11 @@ NotNegativeShieldEnergy
     mva #$00 Wind+1
     sta Wind+2
     sta Wind+3
-    lda random
-    cmp MaxWind
-    bcs GetRandomWind ; if more than MaxWind then randomize again
+@   lda random
     sta Wind
-    beq noWind
+    beq noWind    ; if 0 then nothing to do
+    cmp MaxWind
+    bcs @- ; if more than MaxWind then randomize again
     ; multiply Wind by 16
     ; two bytes of Wind are treated as a decimal part of vx variable
     :4 aslw Wind
diff --git a/scorch.bin b/scorch.bin
index 1441a65..c08fe54 100644
Binary files a/scorch.bin and b/scorch.bin differ
diff --git a/scorch.car b/scorch.car
index 815f966..6db6def 100644
Binary files a/scorch.car and b/scorch.car differ
diff --git a/scorch.xex b/scorch.xex
index d5afc4f..367ca2a 100644
Binary files a/scorch.xex and b/scorch.xex differ
diff --git a/scorchC64.prg b/scorchC64.prg
index 777e6d0..c3b022a 100644
Binary files a/scorchC64.prg and b/scorchC64.prg differ
diff --git a/scorch_cart.xex b/scorch_cart.xex
index 4fdc79d..dc88895 100644
Binary files a/scorch_cart.xex and b/scorch_cart.xex differ