Página 1 de 1

Teste de QI

Enviado: 25 Fev 2016 03:08
por JoséQuintas
Vi na internet, foi chamado de teste de QI.

Consegui montar em Harbour, console, pra uso com o mouse.
Falta melhorar o visual, tá ruim.
Ficou interessante.

Teste de QI

Enviado: 25 Fev 2016 13:31
por Euclides
Lagal, JoséQuintas!
Eu brinquei com algo assim há mais ou menos 25 anos... (o programa BASIC deve estar em algum disquete meu de 5,1/4)
Se tiver algum tempo no fim de semana talvez o converta para FiveWin (um xBrwose c/ array ficaria 'beleza' na primeira parte)
Mas... será que não está faltando um enunciado? ( o primeiro seria: "O Norueguês vive na primeira casa.")
Ela poderia ser eliminada mas aí teria mais "tentativas e erro".
Só que neste caso (no seu programa), a consistência (o "X") de "O Norueguês vive ao lado da casa Azul." deve aceitar ao lado",
tanto à direita quanto à esquerda. (no programa só coloca "x" se o "Norueguês" estiver à esquerda).
Tamusai, Euclides

Teste de QI

Enviado: 25 Fev 2016 17:38
por JoséQuintas
Item 9

Código: Selecionar todos

      @ Row() + 1, 0 SAY "(" + acOpcao[ 9 ]  + ") O norueguês vive na primeira casa"
Checagem do Norueguês do lado da casa azul, está errado mesmo:

Código: Selecionar todos

      IF ( acCasa[ nNumCasa, CASA_NACIONALIDADE ] == "Norueguês" .AND. acCasa[ nNumCasa + 1, CASA_COR ] == "Azul" ) .OR. ;
         ( acCasa[ nNumCasa, CASA_NACIONALIDADE + 1 ] == "Norueguês" .AND. acCasa[ nNumCasa, CASA_COR ] == "Azul" )
         acOpcao[ 14 ] := "X"
      ENDIF
Na segunda linha é nNumCasa + 1, e não, CASA_NACIONALIDADE + 1

Teste de QI

Enviado: 27 Fev 2016 21:36
por Euclides
... para não dizer que não falei das flores...
O programa está em FiveWin (fácimente convertível para HMG)
Para compilar, BUILDH.BAT ou BUILDX.BAT da pasta SAMPLES
É isso aí...
Euclides
testiqh.rar
(988.93 KiB) Baixado 98 vezes

Teste de QI

Enviado: 28 Fev 2016 07:39
por JoséQuintas
Acho que vai acabar tendo mais variações.
Só pra registrar os visuais até agora.
Lembrando que cada LIB tem mais opções de visuais e cores.

Tela console
testeqiconsole.png
Tela fivewin
testeqifw.png

Teste de QI

Enviado: 28 Fev 2016 07:40
por JoséQuintas
Um leve toque da gtwvg - pushbutton
testeqiwvg.png

Teste de QI

Enviado: 28 Fev 2016 09:24
por JoséQuintas
Tudo usando pushbutton.
Mas agora, as pistas somem/reaparecem, dependendo se estão resolvidas ou não.
testeqi.png
Como tudo faz parte do Harbour padrão, não anexei o EXE.

Tive que mover a seleção pra parte sem pushbutton, porque texto não cobre pushbutton, e sem ver opção não dá pra selecionar... rs

Nota: seria mais interessante usar o controle estilo achoice, existe na wvg, mas não faz parte do meu uso normal.