G0:
    ldi TONE,$1C ; length of tone
LOOPG0:
; EDIT
    sbi PORTB,5 ; bitset, y = bit
; /EDIT
    ldi RWAIT,$3A ; frequency
    ldi RWAIT2,$0E
    rcall WAIT ; waits
; EDIT
    cbi PORTB, 5; clears bit
; /EDIT
    ldi RWAIT,$3A ; frequency
    ldi RWAIT2,$0E
    rcall WAIT ; waits
    subi TONE,$1; maintains tonelength
    brne LOOPG0;
ret