Page 3 of 7
Re: JUEGO BINGO
Posted: Sat Feb 03, 2024 3:03 pm
by LOUIS
Hola Sr Brunello
Gracias por su interés en participar ...
Veo que sus cartones tienen 10 columnas ... El Amigo Mustafa diseñó los cartones a 9 Columnas, por lo que se hizo fácil agrupar las 3 primeras para los números del 1 al 25, las columnas de la 4ta a la 6ta para los números del 26 al 50 y para las últimas 3 columnas del número 51 al 75.
Mi modesta opinión sería reajustar sus cartones a 9 columnas ... o ... dejarlos en 10 columnas y agrupar así:
Columnas 1 y 2 del número 1 al 15
Columnas 3 y 4 del número 16 al 30
Columnas 5 y 6 del número 31 al 45
Columnas 7 y 8 del número 46 al 60
Columnas 9 y 10 del número 61 al 75
Con su amable colaboración tendríamos un prg adicional para generar cartones a 10 columnas.
De antemano muchas gracias.
Saludos
Louis
Re: JUEGO BINGO
Posted: Sun Feb 04, 2024 11:59 am
by mustafa
Hola amigo Louis:
Aquí la última modificación con tus acertados cambios, en especial los de la voz.
Hay una nueva pantalla en la generación de cartones para modificar los números
que salen repetidos y así poder crear cartones con números diferentes.
He utilizado en comando Browse porque las modificaciones son inmediatas y luego
pulsar él [ Botón Corregir ] y se modifica el Cartón y si no queremos modificar
mediante CHECKBOX nos pregunta '«- ¿Modificar Número Cartones?' si desmarcamos
saldrá como siempre sin poder corregir el Cartón.
Con estas aportaciones creo que podremos jugar al Bingo,
Saludos/Regars/Salam
Mustafa
Re: JUEGO BINGO
Posted: Sun Feb 04, 2024 6:34 pm
by LOUIS
Hola Amigo Mustafa
Su aporte es magnífico como siempre ... de Ud por lo menos Yo, aprendo muchísimo.
Gracias al cubo (Gracias³)
Saludos
Louis
Re: JUEGO BINGO
Posted: Mon Feb 05, 2024 2:58 pm
by mustafa
Hola Louis:
Una nueva modificación en el menú de Corrección de Cartones
la modificación está en el cambio de color si se introduce
un número diferente de los que previamente están autorizados.
Cartón Izquierda (1-25), Cartón Centro (26-50), Cartón Izquierdo (51-75)
Es solo un aviso, no altera el número que hemos introducido, pero
sirve de alerta si te equivocas al introducir el número.
Si no se corrige en Browse, en el Cartón saldrá el mismo número
Erróneo
Saludos/Regards/Salam
Mustafa
PD: solo cambien el fichero "Cartones.prg" y procedan a compilar
de nuevo la aplicación "Bingo.hbp" ---> BINGO10.ZIP
Re: JUEGO BINGO
Posted: Mon Feb 05, 2024 6:49 pm
by LOUIS
Hola Amigo Mustafa
Gracias nuevamente por su importante aporte al código ... sabe sigo con la inquietud de cómo hacerle hablar a mi laptop en Español, ya que aquí en mi PC por default el idioma español está primero en la lista (tengo 2), pero en la Laptop, la tengo como # 3 ... o será que tendré que borrar los 2 primeros narradores, para que quede igual por default el primero en la lista del "SAPI.SpVoice"
Así tengo en Mi Pc de Escritorio:
---------------------------------------
Microsoft Helena Desktop - Spanish (Spain)
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Speech\Voices\Tokens\TTS_MS_ES-ES_HELENA_11.0
Microsoft Zira Desktop - English (United States)
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Speech\Voices\Tokens\TTS_MS_EN-US_ZIRA_11.0
Pero en la Laptop, la narradora Helena Desktop - Spanish (Spain) no está primera, sino tercera y por eso en la laptop me sale en inglés
Bueno Maestro, nuevamente gracias y ojalá alguien solucione esto para que el juego quede más óptimo.
Saludos
Louis
Re: JUEGO BINGO
Posted: Tue Feb 06, 2024 2:05 am
by AUGE_OHR
hi Louis,
LOUIS wrote: ↑Mon Feb 05, 2024 6:49 pm
... sabe sigo con la inquietud de cómo hacerle hablar a mi laptop en Español, ya que aquí en mi PC por default el idioma español está primero en la lista (tengo 2), pero en la Laptop, la tengo como # 3 ... o será que tendré que borrar los 2 primeros narradores, para que quede igual por default el primero en la lista del "SAPI.SpVoice"
as i wrote here
https://www.hmgforum.com/viewtopic.php?t=7505 that there is a BUG in harbour
you need a NEW hbwin.a to assign a Voice
Code: Select all
oVoices:Voice := oVoices:GetVoices():Item(cnVar -1)
Re: JUEGO BINGO
Posted: Tue Feb 06, 2024 12:52 pm
by danielmaximiliano
Hola Jimmy , tendrías la amabilidad de hablar con Antonio Linares y pedirle el fuente con la corrección de olecore.c
Re: JUEGO BINGO
Posted: Tue Feb 06, 2024 1:02 pm
by LOUIS
Hola Jimmy y Daniel
Muchas gracias por sus respuestas ... quisiera si no es pedir mucho, y para salir del inconveniente, me indiquen como puedo eliminar los 2 primeros narradores que ya están incorporados en la Laptop ... si es de hacerlo manualmente o por código.
Si es manualmente, igual pueden indicar cómo hacerlo ?
De antemano muchas gracias.
Saludos
Louis
Re: JUEGO BINGO
Posted: Tue Feb 06, 2024 9:17 pm
by danielmaximiliano
LOUIS wrote: ↑Tue Feb 06, 2024 1:02 pm
Hola Jimmy y Daniel
Muchas gracias por sus respuestas ... quisiera si no es pedir mucho, y para salir del inconveniente, me indiquen como puedo eliminar los 2 primeros narradores que ya están incorporados en la Laptop ... si es de hacerlo manualmente o por código.
Si es manualmente, igual pueden indicar cómo hacerlo ?
De antemano muchas gracias.
Saludos
Louis
Hola Louis : ejecutar REGEDIT en modo administrador ve a la clave
Code: Select all
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Speech\Voices\Tokens
borra las claves manualmente (modo sucio de hacerlo) sino desde el panel de control (un poco mas tedioso)
Re: JUEGO BINGO
Posted: Sun Feb 11, 2024 1:45 pm
by mustafa
Hola amigos:
Una nueva modificación estética de Pantalla, aparecen
los números dentro de Bolas de Colores o si lo prefieren
la misma Bola de color Verde Oscuro.
Al compilar dentro del Fichero -> Bingo.hbp , cambiar
_Bolas1.prg para bolas de color o _Bolas2.prg para bolas
verdes antes de compilar.
¡¡¡ A Jugar !!!
Saludos-Regard-Salam
Mustafa