reproducir_musica:

    ld      a,[IDBYTE1]
    bit     7,a                 ;0 = 60Hz, 1 = 50Hz
    jr      z,maquina_60hz      ;esta a 60hz, saltamos al contador
    jr      rout_play           ;esta a 50hz, reproducimos

maquina_60hz:

    ld      a,[contador_60hz]       ;cargamos el contador
    dec     a                       ;decrementmos
    ld      [contador_60hz],a       ;guardamos
    jp      nz,rout_play            ;si no ha legado a cero, saltamos a reproducir
    ld      a,6                     ;ha llegado a cero
    ld      [contador_60hz],a       ;reseteamos contador

    ret                             ;salimos

rout_play:

    di
    call    PT3_ROUT
    call    PT3_PLAY
    ei

    ret