$$chkpeeloutspindash:
    move.b  (Charge_Delay).w,d0
    andi.b  #$F,d0
    beq.s   $$notinit
    addq.b  #1,(Charge_Delay).w
    andi.b  #$CF,(Charge_Delay).w

$$notinit:
    btst    #7,(Charge_Delay).w
    bne.w   $$lookup
    btst    #6,(Charge_Delay).w
    bne.w   $$checkforspindash
    btst    #button_down,(Ctrl_1_Logical.held).w
    bne.w   $$checkforspindash
    andi.b  #$F,(Charge_Delay).w
    beq.s   $chkuppress
    btst    #button_up,(Ctrl_1_Logical.press).w
    beq.s   $$checkupheld
    bset    #7,(Charge_Delay).w
    bra.w   $$updatespeed