jogo genius exemplo de programação portugol studio

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

programa
{
	inclua biblioteca Graficos--> g
	inclua biblioteca Util --> u
	inclua biblioteca Mouse --> m
	inclua biblioteca Sons --> s
	inteiro som1, som2, som3, som4 
	
	funcao inicio()
	
	{
		g.iniciar_modo_grafico(verdadeiro)
		fundo()
		g.renderizar()
			
		inteiro seq[10]
		para (inteiro x=0; x<10; x++){
			seq[x] = u.sorteia(1,4)
		}
		para( inteiro x=0; x<10;x++){
			para (inteiro y=0; y<=x; y++){
				escreva(seq[y], ,",")
				brilhar(seq[y])
				
		
			
			}
			u.aguarde(1000)
			escreva("\n")
			inteiro m==m.ler_botao()
		}
		
		
		enquanto (verdadeiro) {
			
			inteiro botao = m.ler_botao()
			escreva(botao,"\n")
			escreva(corClicada(),"\n")
			se(corClicada() == "Vermelho") {
				brilharvermelho()
			}senao{
			}	se(corClicada() == "Verde") {
					brilharverde()
				}senao{
				}	se(corClicada() == "Amarelo") {
					brilharamarelo()
					}senao{
					}	se(corClicada() == "Azul") {
						brilharazul()
						}
			
			
			
			
		} 
		
	}
	
	funcao fundo() {
		g.definir_cor(g.COR_VERMELHO)
		g.desenhar_retangulo(50, 50, 200, 200, verdadeiro, verdadeiro)
		g.definir_cor(g.COR_VERDE)
		g.desenhar_retangulo(250, 50, 200, 200, verdadeiro, verdadeiro)
		g.definir_cor(g.COR_AMARELO)
		g.desenhar_retangulo(250, 250, 200, 200, verdadeiro, verdadeiro)
		g.definir_cor(g.COR_AZUL)
		g.desenhar_retangulo(50, 250, 200, 200, verdadeiro, verdadeiro)
		
	}
	funcao brilharvermelho(){
		fundo()
		g.definir_gradiente(g.GRADIENTE_INFERIOR_DIREITO, g.COR_VERMELHO, g.COR_BRANCO)
		g.desenhar_retangulo(50, 50, 200, 200, verdadeiro, verdadeiro)
		g.renderizar()
		
		u.aguarde(1000)
		fundo()
		g.renderizar()
		
	}
	funcao brilharverde(){
		fundo()
		g.definir_gradiente(g.GRADIENTE_INFERIOR_ESQUERDO, g.COR_VERDE, g.COR_BRANCO)
		g.desenhar_retangulo(250, 50, 200, 200, verdadeiro, verdadeiro)
		g.renderizar()
		
		u.aguarde(1000)
		fundo()
		g.renderizar()
		
	}
	funcao brilharamarelo(){
		fundo()
		g.definir_gradiente(g.GRADIENTE_SUPERIOR_ESQUERDO, g.COR_AMARELO, g.COR_BRANCO)
		g.desenhar_retangulo(250, 250, 200, 200, verdadeiro, verdadeiro)
		g.renderizar()
		
		u.aguarde(1000)
		fundo()
		g.renderizar()
		
	}
	funcao brilharazul(){
		fundo()
		g.definir_gradiente(g.GRADIENTE_SUPERIOR_DIREITO, g.COR_AZUL, g.COR_BRANCO)
		g.desenhar_retangulo(50, 250, 200, 200, verdadeiro, verdadeiro)
		g.renderizar()
		
		u.aguarde(1000)
		fundo()
		g.renderizar()
		
	}
	funcao cadeia corClicada() {
		cadeia retorno = "nehhuma"
		se(m.posicao_x()>=50 e m.posicao_x()<= 250 e 
		 m.posicao_y()>=50 e m.posicao_y()<= 250) {
		 	retorno = "Vermelho"
		 }senao
		 	se(m.posicao_x()>=251 e m.posicao_x()<= 500 e 
		 	 m.posicao_y()>=50 e m.posicao_y()<= 250) {
		 		 retorno = "Verde"
		 }senao
		 	 se(m.posicao_x()>=251 e m.posicao_x()<= 500 e 
		 		m.posicao_y()>=251 e m.posicao_y()<= 500) {
		 			retorno = "Amarelo"
		 }senao
		 		 se(m.posicao_x()>=50 e m.posicao_x()<= 250 e 
		 		 m.posicao_y()>=251 e m.posicao_y()<= 500) {
		 				retorno = "Azul"
		 }
							retorne retorno
	} 
	funcao brilhar (inteiro cor){
		se(cor==1){
			brilharvermelho()
		
		}
		se(cor==2){
			brilharverde()
		
		}
		se(cor==3){
			brilharazul()
		
		}
		se(cor==4){
			brilharamarelo()
		
		}
	}
}
/* $$$ Portugol Studio $$$ 
 * 
 * Esta seção do arquivo guarda informações do Portugol Studio.
 * Você pode apagá-la se estiver utilizando outro editor.
 * 
 * @POSICAO-CURSOR = 1627; 
 * @PONTOS-DE-PARADA = ;
 * @SIMBOLOS-INSPECIONADOS = ;
 * @FILTRO-ARVORE-TIPOS-DE-DADO = inteiro, real, logico, cadeia, caracter, vazio;
 * @FILTRO-ARVORE-TIPOS-DE-SIMBOLO = variavel, vetor, matriz, funcao;
 */