The application to be developed is based on the current game of Figures and Letters. Specifically, it must exclusively implement the part of the game called Final Round: The contestant will have 3
minutes to find 12 words related to a topic (from a list of topical words defined in advance). Each word to be guessed will be in a group of 10 letters and the number will be given
of letters that the word in question has. If you have the key you can use it by saying the word “key”
and in that case the word that is being played at that moment will be automatically guessed. By
Each correct word will add 100 euros. If 11 words are correct, 1500 euros and if the
12 words you get the jackpot, which starts at €3,000 and increases by €1,500 each day you don’t win.
get.
I already have this code but i really does not work all together, but the timer goes alone.
i also have to .txt files where i have my word for the theme, but i dont know if i should open them with trap #51.
ORG $1000
START:
MOVE.L #CADENA,A0
MOVE.L #14,D0
MOVE.L #MSJ1,A1
TRAP #15
MOVE.L #2,D0
MOVE.L #CADENA,A1
TRAP #15
MOVE.B #0,(A1)
CLR.L D1
ENCONTRARTEMA
MOVE.B (A1)+,D1
CMP.B #0,D1
BEQ FIN_CADENA
MOVE.B (A1)+,D1
CMP.B #'F',D1
BEQ ENCONTRARTEMA
CMP.B #'R',D1
BEQ ENCONTRARTEMA
CMP.B #'U',D1
BEQ BFRUTAS
CMP.B #'A',D1
BEQ ENCONTRARTEMA
CMP.B #'N',D1
BEQ ENCONTRARTEMA
CMP.B #'I',D1
BEQ BANIMALES
FIN_CADENA
MOVE.L #14, D1
MOVE.L #NOTEMA,A1
TRAP #15
BFRUTAS
LEA FRUTAS,A1
MOVE.B #3,D0
TRAP #15
MOVE.W D1,D7
MOVE.B #5,D0
MOVE.W D7,D1
TRAP #15
TST.B D1
BEQ FINAL
LEA FRUTAS, A1
MOVE.B (A1)+, D1
ADDQ.L #1,A1
MOVE.B (A1),D2
MOVE.B D2,-2(A1)
ADDQ.L #2,A1
MOVE.B D1,(A1)
BRA FINAL
TST.B D1
BEQ FINAL
BANIMALES:
LEA ANIMALES,A1
MOVE.B #3,D0
TRAP #15
MOVE.W D1,D7
MOVE.B #5,D0
MOVE.W D7,D1
TRAP #15
TST.B D1
BEQ FINAL
LEA CADENA, A1
MOVE.B (A1)+, D1
ADDQ.L #1,A1
MOVE.B (A1),D2
MOVE.B D2,-2(A1)
ADDQ.L #2,A1
MOVE.B D1,(A1)
JMP FINAL
CLR.L D0
CLR.L D1
MOVE.L #PALABRA1,A1
ORG $64
DC.L TIEMPO
NO_FIN
NOP
NOP
CMP.B #1,JUEGO_ACABADO
BEQ FIN_PROGRAMA
JMP NO_FIN
FIN_PROGRAMA
MOVE.L #11,D0
MOVE.W #$0509,D1
TRAP #15
MOVE.L #14,D0
MOVE.L #MSGFIN,A1
TRAP #15
MOVE.L #11,D0
MOVE.W #$0610,D1
TRAP #15
MOVE.B #14,D0
MOVE.L #MSJFIN,A1
TRAP #15
MOVE.L #CADENA,A1
TRAP #15
FINAL
SIMHALT
TIEMPO
SUB.B #1,TEMPORIZADOR
CMP.B #0,TEMPORIZADOR
BEQ TEMP_FIN
MOVE.L #11,D0
MOVE.W #$0507,D1
TRAP #15
CLR.L D1
CLR.L D2
MOVE.B TEMPORIZADOR,D2
DIVU #10,D2
MOVE.B D2,DEC
SWAP D2
MOVE.B D2,UNI
MOVE.L #3,D0
MOVE.B DEC,D1
TRAP #15
MOVE.B UNI,D1 *ESCRIBIMOS LAS UNIDADES EN PANTALLA
TRAP #15
RTE
TEMP_FIN
MOVE.B #1,JUEGO_ACABADO
RTE *RETORNO EXCEPCION
ORG $2000
MSJFIN DC.B 'LA SOLUCIÓN ES:',$A,$D,0
MSJ1 DC.B 'Elija entre el tema de FRUTAS o ANIMALES: ',$A,$D,0
FRUTAS INCBIN 'FRUTAS.txt'
DC.B 0
ANIMALES INCBIN 'ANIMALES.txt'
DC.B 0
FINJUEGO DC.B '¡SE HA ACABADO EL TIMEPO!',0
NOTEMA DC.B 'NO SE HA ENCONTRADO EL TEMA, INTRODUZCA UN TEMA ENTRE LAS OPCIONES',0
PALABRA1 DC.B 'QUE PALABRA QUIERES DESORDENAR:',0
RESPUESTA DC.B 'LA PALABRA DESORDENADA ES: ',0
CADENA DS.B 20
******TEMPORIZADOR ******
TEMPORIZADOR DC.B 180 *3 MINUTOS PARA QUE SE DETENGA EL JUEGO
MSGFIN DC.B '¡SE HA ACABADO EL TIEMPO!',0
UNI DS.B 10
DEC DS.B 10
JUEGO_ACABADO DC.B 0
*************************
END START
newyorkbaby55 is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.