Miguel A. Huertas - Convertir seudocódigo de pseint a codigo de c+

Necesito pasar el siguiente seudocódigo de pseint a codigo c++ esto deberia ser antes del lunes 13 de diciembre a las 10:00 pm
El seudocodigo es el siguiente:
Algoritmo sin_titulo
    Definir palabr,palabra,casillas Como Caracter
    Definir aciertos,turnos Como Real
    Escribir '      *Menú*'
    Escribir '  1. Nivel Bàsico'
    Escribir '  2. Nivel Medio'
    Escribir '  3.

Salir '
    Escribir '  Ingrese su opciòn (1-3)'
    Leer OP
    Segun OP  Hacer
        1:
            p_tb <- 20
            oportunidades <- 8
            Dimension palabra[p_tb]
            palabra[0] <- 'duda'
            palabra[1] <- 'ojo'
            palabra[2] <- 'anima'
            palabra[3] <- 'duro'
            palabra[4] <- 'pua'
            palabra[5] <- 'ahoga'
            palabra[6] <- 'dije'
            palabra[7] <- 'vos'
            palabra[8] <- 'acero'
            palabra[9] <- 'echo'
            palabra[10] <- 'uso'
            palabra[11] <- 'apoye'
            palabra[12] <- 'cuña'
            palabra[13] <- 'rie'
            palabra[14] <- 'almas'
            palabra[15] <- 'gota'
            palabra[16] <- 'via'
            palabra[17] <- 'amigo'
            palabra[18] <- 'copo'
        
            a_ <- ' '
            h_ <- ' '
            o_ <- ' '
            r_ <- ' '
            c_ <- ' '
            ax <- ' '
            d_ <- ' '
            ox <- ' '
            turnos <- 0
            aciertos <- 0
            palabr <- palabra[azar(p_tb)+1]
            n <- Longitud(palabr)
            Dimension casillas[n]
            Para x<-1 Hasta n Hacer
                casillas[x] <- '_'
            FinPara
            Repetir
                Escribir ''
                Escribir 'Oportuniddes restantes: ',oportunidades-turnos
                Para x<-1 Hasta n Hacer
                    Escribir ' ',casillas[x] Sin Saltar
                FinPara
                Escribir ' '
                Escribir 'Escriba la letra: ' Sin Saltar
                Leer letra
                encontrando <- Falso
                Para x<-1 Hasta n Hacer
                    chr <- Subcadena(palabr,x,x)
                    Si Mayusculas(letra)=Mayusculas(chr) Entonces
                        encontrando <- Verdadero
                        Si casillas[x]='_' Entonces
                            casillas[x] <- chr
                            aciertos <- aciertos+1
                        FinSi
                    FinSi
                FinPara
                Si  NO encontrando Entonces
                    turnos <- turnos+1
                    Escribir 'Letra no encontrada.'
                    Segun turnos  Hacer
                        1:
                            a_ <- 'A'
                        2:
                            h_ <- 'H'
                        3:
                            o_ <- 'O'
                        4:
                            r_ <- 'R'
                        5:
                            c_ <- 'C'
                        6:
                            ax <- 'A'
                        7:
                            d_ <- 'D'
                        8:
                            ox <- 'O'
                    FinSegun
                FinSi
                Escribir '',a_
                Escribir '',h_
                Escribir '',o_
                Escribir '',r_
                Escribir '',c_
                Escribir '',ax
                Escribir '',d_
                Escribir '',ox
            Hasta Que turnos>=oportunidades O aciertos>=n
            Si aciertos=n Entonces
                Escribir 'Felicidades, has ganado'
            SiNo
                Escribir 'Has perdido.'
            FinSi
            Escribir 'La palabra secreta es: ',palabr
            Escribir 'Aciertos: ',aciertos,'  Fallos: ',turnos
            Escribir 'presione cualquier tecla para continuar'
            esperar tecla
        2:
            p_tb <- 20
            oportunidades <- 8
            dimension palabra[p_tb]
            palabra[1] <- 'fabricado'
            palabra[2] <- 'camiseta'
            palabra[3] <- 'ninguno'
            palabra[4] <- 'zapato'
            palabra[5] <- 'habaneros'
            palabra[6] <- 'cabellera'
            palabra[7] <- 'celular'
            palabra[8] <- 'cobija'
            palabra[9] <- 'habilidad'
            palabra[10] <- 'eliminar'
            palabra[11] <- 'galleta'
            palabra[12] <- 'alarma'
            palabra[13] <- 'vacilados'
            palabra[14] <- 'bolsillo'
            palabra[15] <- 'archivo'
            palabra[16] <- 'espejo'
            palabra[17] <- 'compilado'
            palabra[18] <- 'celebrar'
            palabra[19] <- 'rebotar'
            // palabra[20]<-"adorno"
            a_ <- ' '
            h_ <- ' '
            o_ <- ' '
            r_ <- ' '
            c_ <- ' '
            ax <- ' '
            d_ <- ' '
            ox <- ' '
            turnos <- 0
            aciertos <- 0
            // fallos<-0
            palabr <- palabra[azar(p_tb)+1]
            n <- longitud(palabr)
            dimension casillas[n]
            para x<-1 hasta n hacer
                casillas[x] <- '_'
            finpara
            repetir
                escribir ''
                or <- oportunidades-turnos
                escribir 'oportuniddes restantes: ',or
                para x<-1 hasta n hacer
                    escribir ' ',casillas[x] sin saltar
                finpara
                escribir ' '
                escribir 'escriba la letra: ' sin saltar
                leer letra
                encontrando <- falso
                para x<-1 hasta n hacer
                    chr <- subcadena(palabr,x,x)
                    si mayusculas(letra)=mayusculas(chr) entonces
                        encontrando <- verdadero
                        si casillas[x]='_' entonces
                            casillas[x] <- nose
                            aciertos <- aciertos+1
                        finsi
                    finsi
                finpara
                si  no encontrando entonces
                    turnos <- turnos+1
                    escribir 'letra no encontrada.'
                    Segun turnos  Hacer
                        1:
                            a_ <- 'A'
                        2:
                            h_ <- 'H'
                        3:
                            o_ <- 'O'
                        4:
                            r_ <- 'R'
                        5:
                            c_ <- 'C'
                        6:
                            ax <- 'A'
                        7:
                            d_ <- 'D'
                        8:
                            ox <- 'O'
                    FinSegun
                FinSi
                Escribir '',a_
                Escribir '',h_
                Escribir '',o_
                Escribir '',r_
                Escribir '',c_
                Escribir '',ax
                Escribir '',d_
                Escribir '',ox
            Hasta Que turnos>=oportunidades O aciertos>=n
            Si aciertos=n Entonces
                Escribir 'Felicidades, has ganado'
            SiNo
                Escribir 'Has perdido.'
            FinSi
            Escribir 'La palabra secreta es: ',palabr
            Escribir 'Aciertos: ',aciertos,'  Fallos: ',fallos,'  Intentos: ',intentos
        3:
            Escribir 'Usted ha salido del juego'
        De Otro Modo:
            Escribir 'Obcion no valida'
    FinSegun
    Escribir 'PRESIONE CUALQUIER TECLA PARA CONTINUAR'
    Esperar Tecla
FinAlgoritmo