Modularizar el programa principal

[ContraVeneno]

ByIvan, estoy seguro que en este lugar siempre se ayuda a quien lo necesita; sin hacer distinción de ningún tipo. Y te lo digo porque ya tengo un buen tiempecito por este club y siempre he encontrado solución a mis problemas.

Lo único que se pide a cambio es que se cumplan un pequeño número de normas de convivencia (que nisiquiera son reglas estrictas), vamos pues, que lo único que se pide es que se sigua una guía de estilo. Y desafortunamente, a pesar de que has dicho que ya la leíste, a mi me parece que no lo has hecho porque sigues haciendo cosas que van en contra de esta guía. Entonces pues, te invito a que la leas nuevamente.

Y te invito a que conozcas tambien la posibilidad de utilizar etiquetas vb para encerrar tu código y sea mas legible para todos nosotros. Edito: Este párrafo ya no es necesario ya que Marcos ha modificado tu mensaje

Ahora bien, dicho lo que se tenía que decir, mencionas que no tienes ningún error de sintaxis. Entonces, si nos dices que es lo que sale mal y en que parte de tu código esto no se realiza como debe de ser, tal vez este club te pueda dar una idea de como resolver ese problema específico.

A mi me parece que lo que requieres son dos procedimientos más (uno que realize lo que tienes en bloque 1 y 2, y otro que realize lo que tienes en el bloque 3 y 4), este procedimiento recibiendo un parámetro que indique que jugador es para hacer la distinción correspondiente.

Pero como te mencioné, si nos dices que es lo que sale mal, y en que parte de tu código las cosas no se hacen como se supone, tal vez pueda tener una mejor idea.

Saludos.

[byivan]

Joer pues parala proxima vez, me anoto lo del código para que sea mas legible, lo siento.

El porblema es que al meter en un procedure el bloque 3 4 y 5 me produce un problema en tiempo de ejecucion (el compilador lo pasa)
por tanto me gustaria que me escribieseis como serian los procedures del bloque 3 4 y 5.

Muchas gracias!

[ContraVeneno]

Empezado por byivan

El porblema es que al meter en un procedure el bloque 3 4 y 5 me produce un problema en tiempo de ejecucion...

No creo que sea conveniente meter el bloque 3, 4 y 5 en un solo procedure porque no realizan lo mismo. El bloque 1 y 2 si hacen lo mismo, eso si se puede hacer en otro procedimiento, el bloque 3 y 4 tambien hacen lo mismo, por lo que se pueden meter en un solo procedimiento, el 5 ya no porque no hace lo mismo.

No, yo no te voy a escribir ningún código porque no es mi trabajo hacer tu trabajo.

Saludos.

[byivan]

Pues así entocnes no resuelvo nada, dado que ya intente esta mañana meter un procedure por bloke, y aun así solo funcionaban los 2 primeros, por eso pido ke me escribieseis como pasariais vosotros los 3 restantes.

No veo otra forma de que podais ayudarme, y tampoco hay que escribir mucho...

Todo lo que as sugerido ya lo he intentado esta mañana.

[Onti]

Esto te dara una idea de como hacerlo

Código Delphi [-]
Procedure InicioJugada(NomJugador:String;Dado:TValorDados;Jugador:TMano);
   Begin
     writeln(NomJugador);
     readln;
     LeeDados(Dado);
     LeeMano(Dado,Jugador);
     EscribeMano(Jugador);
   End;