Shave a few more bytes with BIT skips

No functional changes

Author: inexorabletash

src/desk.acc/control.panel.s

@@ -771,7 +771,7 @@ shortcut_table_addr_hi:
         and     mask1,x
         beq     :+
         lda     #0
-        beq     @store          ; always
+        SKIP_NEXT_2_BYTE_INSTRUCTION
 :       lda     #$FF
 @store: sta     flag
 
@@ -1288,7 +1288,8 @@ yloop:  copy    #0, xpos
 xloop:  ror     row
         bcc     zero
         lda     #MGTK::pencopy
-        bpl     store           ; always
+        SKIP_NEXT_2_BYTE_INSTRUCTION
+        .assert MGTK::notpencopy <> $C0, error, "Bad BIT skip"
 zero:   lda     #MGTK::notpencopy
 store:  cmp     mode
         beq     :+

src/toolkits/lbtk.s

@@ -329,7 +329,8 @@ repeat:
         cmp     lbr_copy + LBTK::ListBoxRecord::num_rows
         bcs     :+
         lda     #0
-        beq     do              ; always
+        SKIP_NEXT_2_BYTE_INSTRUCTION
+        .assert lbr_copy + LBTK::ListBoxRecord::num_rows <> $C0, error, "bad BIT skip"
 :       sbc     lbr_copy + LBTK::ListBoxRecord::num_rows
 do:     jsr     update
         lda     #MGTK::Part::page_up