Os acentos se transformaram em alguma língua asiática!

Oi gente não achei nenhum tópico sobre este assunto então lá vamos nós:

Basicamente o portugol não está reconhecendo mais acentos de nenhum tipo ele está transformando tudo para uma língua asiática. Obviamente estou falando de termos escritos em português com acentos no tipo primitivo cadeia.

Olhem só:

programa
{
	
	funcao inicio()
	{
        // VARIﾃ〃EIS:
           real num,num2,ADICAO,SUBTRACAO,MULTIPLICACAO,DIVISAO 
	      inteiro opcao
           inteiro adicao,subtracao,multiplicacao,divisao
           
           // MENU DE OPﾃ�ﾃ髭S:
		escreva("============================\n")
		escreva(" ADIﾃ�ﾃグ = 1\t\n")
		escreva(" SUBTRAﾃ�ﾃグ = 2\t\n")
		escreva(" MULTIPLICAﾃ�ﾃグ = 3\t\n")
		escreva(" DIVISﾃグ = 4\t\n")
		escreva("============================")

          //INFORMAﾃ�ﾃ髭S PARA O SISTEMA:

          adicao = 1 
		subtracao = 2
		multiplicacao = 3
		divisao = 4
           
           //PRIMEIRO COMANDO DO USUﾃヽIO:
          escreva("\nDigite sua operaﾃｧﾃ｣o desejada: ")
		leia(opcao)
           escolha(opcao){
             caso 1:
             escreva("Vocﾃｪ escolheu adiﾃｧﾃ｣o! ")
           
             pare
             
             caso 2:
             escreva("Vocﾃｪ escolheu subtraﾃｧﾃ｣o! ")
        
             pare
             
             caso 3:
             escreva("Vocﾃｪ escolheu multiplicaﾃｧﾃ｣o! ")
        
             pare
             
             caso 4:
             escreva("Vocﾃｪ escolheu divisﾃ｣o! ")
         
             pare
             
             caso contrario:
             escreva("Erro ")
             pare

           // SEGUNDO COMANDO DO USUﾃヽIO:
           
           escreva("Digite um valor qualquer: ")
           leia(num)
           escreva("Digite outro valor a sua escolha: ")
           leia(num2)

		// Cﾃ´CULOS: 
		
		ADICAO = num+num2
		SUBTRACAO = num-num2
		MULTIPLICACAO = num*num2
		DIVISAO = num/num2
	
		
          // RESPOSTA DOS Cﾃ´CULOS:
          
          escreva("\nO nﾃｺmero ",num," mais o nﾃｺmero ",num2," ﾃｩ igual a: ", ADICAO)
          escreva("\nO nﾃｺmero ",num," menos o nﾃｺmero ",num2," ﾃｩ igual a: ", SUBTRACAO)
          escreva("\nO nﾃｺmero ",num," multiplicado pelo nﾃｺmero ",num2," ﾃｩ igual a: ", MULTIPLICACAO)
          escreva("\nO nﾃｺmero ",num," dividido pelo nﾃｺmero ",num2," ﾃｩ igual a: ", DIVISAO)
           }   
	}
}