Interrupção no pino B com PIC 16F877A

Código feito em CCS C Compiler

#include <16F877A.h>

#use delay(clock = 20M)

byte i;

#INT_RB

void rb_isr(void){

   i = input_b();

   output_d(i >> 4);

}

void main(){ 

   set_tris_b(0xff);

   clear_interrupt(INT_RB);

   enable_interrupts(INT_RB);

   enable_interrupts(GLOBAL);

}

Créditos para: http://ccspicc.blogspot.com/2016/03/pic16f877a-portb-change-interrupt.html

View com SQL Server #144

--VIEW CANAL DE VENDAS

CREATE VIEW V_CRM_CANAL_VENDAS

AS

SELECT *FROM MINIERP.DBO.V_CANAL_VENDAS

--VIEW CONTAS A PAGAR

CREATE VIEW V_CRM_CONTAS_RECEBER

AS

SELECT *FROM MINIERP.DBO.V_CONTAS_RECEBER

--VIEW PEDIDO VENDAS DETALHE

CREATE VIEW V_CRM_PED_VENDAS_DETALHE

AS

SELECT A.NUM_PEDIDO, A.DATA_PEDIDO, A.ID_CLIENTE, B.RAZAO_CLIENTE,

A.TOTAL_PEDIDO, A.SITUACAO,

CASE WHEN A.SITUACAO = 'F' THEN 'FATURADO'

WHEN A.SITUACAO = 'P' THEN 'PLANEJADO'

END SITUA

FROM MINIERP.DBO.PED_VENDAS A

INNER JOIN MINIERP.DBO.CLIENTES B

ON A.ID_CLIENTE = B.ID_CLIENTE

Decodificador display multiplexado com PIC 16F877A

Objetivo: Receber as entradas nos pinos e decodifica -lás no display 7 segmentos (interface do LCD é importante).

Código feito em CCS C Compiler

#include <16F877A.h>

#device adc = 8

#fuses XT, NOWDT, BROWNOUT, NOLVP

#use delay(clock = 20MHz)

#include <math.h>

#use fast_io(b)

#include <lcd.c>

int v1[] = {0b00111111, 0b00000110, 0b01011011,

   0b01001111, 0b01100110, 0b01101101, 0b01111101, 

   0b00000111, 0b01111111, 0b11100111};

   

unsigned int8 a, b, c, d, e, f;   

byte decimal;

unsigned int8 aux, dezena, unidade;

void main(void){

   lcd_init();

   

   while(TRUE){

      

      a = input(PIN_B0);

      b = input(PIN_B1);

      c = input(PIN_B2);

      d = input(PIN_B3);

      e = input(PIN_B4);

      f = input(PIN_B5);

      decimal = (a<<5)|(b<<4)|(c<<3)|(d<<2)|(e<<1)|(f<<0);

      

      aux = decimal/10;           

      dezena = (int)floor(aux);

      

      aux = (decimal)-(10*dezena);

      unidade = (int)floor(aux);

            

      printf(lcd_putc,"\fBINARIO = %u%u%u%u%u%u \nDECIMAL = %u"a, b, c, d, e, f, decimal);

      delay_ms(100);

      

      for(int i = 0; i < 10; i++){

         output_a(0b0000010);

         output_c(v1[dezena]);

         delay_ms(50);

         

         output_a(0b000001);

         output_c(v1[unidade]);

         delay_ms(50);

      }

   }

}

Decodificador BCD com PIC 16F877A

Objetivo: Receber através de entrada por bits que codifique sua saída para um display de 7 segmentos e exiba seu bit em binário.

CÓDIGO FEITO EM CCS C COMPILER

#include <16F877A.h>

#device adc = 8

#use delay(clock = 20MHz)

#use fast_io(b)

#include <lcd.c>

unsigned int8 a, b, c, d;   

byte decimal;

void main(void){

   lcd_init();

   

   while(TRUE){

      

      a = input(PIN_B0);     

      b = input(PIN_B1);

      c = input(PIN_B2);

      d = input(PIN_B3);

                                    

      decimal = (a<<3)|(b<<2)|(c<<1)|(d<<0);

            

      output_c(decimal);

            

      printf(lcd_putc,"\fBINARIO = %u%u%u%u  \nDECIMAL = %u"a, b, c, d, decimal);

      delay_ms(200);

            

   }

}

Saída gerada no Proteus 7.9

Pull-up para interrupção na saída - PIC 16F877A

 Objetivo: Os terminais RB1 são configurados como saída e RBO como entrada. (com resistor de pull-up). A saída deve ter o mesmo valor que a entrada. Usa -se um interruptor na entrada e um led na saída

Código feito em CCS C Compiler

#include <16F877A.h>
#fuses XT, NOWDT
#use delay (clock = 4MHz)
#BYTE TRISB = 0x86   //TRISB em 86h
#BYTE PORTB = 0x06   //PORTB em 06h
#BYTE OPTION_REG = 0x81    //em 81h

void main(){
   bit_clear(OPTION_REG, 7);  //habilita Pull-up
   bit_set(TRISB, 0);         //B0 como entrada
   bit_clear(TRISB, 1);       //B1 como saída
   bit_clear(PORTB, 1);       //Apaga led
   
   while(TRUE){
      if(bit_test(portb, 0)== 1)    //se RB0 == 1, apaga led
         bit_clear(portb, 1);
      else
         bit_set(portb, 1);         //se RB0 == 0, acende led
   }
}
/*
CÓDIGO REESCRITO 
#include <16F877A.h>
#fuses XT, NOWDT
#use delay (clock = 4MHz)
#use fixed_io(b_outputs = pin_b1)
void main(){
   port_b_pullups(TRUE);
   output_low(PIN_B1);
   
   while (TRUE){
      if(input(PIN_B0) == 1)
         output_low(PIN_B1);
      else
         output_high(PIN_B1);
   }
}
#include <16F877A.h>
#fuses XT, NOWDT
#use delay (clock = 4MHz)
//ponteiros
#define TRISB (int*) 0x86
#define PORTB (int*) 0x06
#define OPTION (int*) 0x81
void main() {
   *option &= 0b01111111;
   *trisb = 0x01;
   *portb = 0x00;
   
   while(TRUE){
      if(*portb & 0x01)    //le RB0 se é 1
         *portb = 0x00;
      else
         *portb = 0x02;    // se é 0 entao acende led (RB1 == 1)
   }
}*/

Check List DBA no SQL Server #119

As atividades de rotina de um DBA podem ser muito repetitivas e monótonas e podem

ser automatizadas !

Desta forma o DBA investe mais seu tempo em análise que na própria execução das

tarefas e com mais disponibilidade para tarefas intermitentes que possam surgir no dia a dia.

CREATE DATABASE CKLIST 

go

USE CKLIST

--Gerando a tabela para armazenar dados de discos

CREATE TABLE dbo.ESPACO_DISCO(

volume nvarchar(256) NULL,

disk_total_size_GB numeric (18, 2) NULL,

disk_free_size_GB numeric (18, 2) NULL,

disk_usado_size_GB numeric (18, 2) NULL,

disk_ocupado_sql_MB numeric (18, 2) NULL,

data_log datetime NOT NULL

)

--Gerando tabelas para armazenar tamanhos de arquivos

CREATE TABLE dbo.TAMANHO_ARQUIVOS (

volume_mount_point nvarchar(256) NULL,

db_nome sysname NOT NULL,

tipo_arquivo nvarchar (60) NULL,

nome_logico sysname NOT NULL,

path nvarchar (260) NOT NULL,

status nvarchar (60) NULL,

tamanho_arquivo_MB numeric (18, 2) NULL,

data_log datetime NOT NULL

)

--Armazena analise de log

CREATE TABLE dbo.ANALISE_LOG (

db_nome varchar (50),

Log_Size numeric (15, 2),

Log_Space_Used_pct numeric (15, 2),

status_log int,

data_log datetime default getdate()

)

--Armazena histórico de backup

CREATE TABLE dbo.LOG_BACKUP (

db_nome NVARCHAR(256),

nome NVARCHAR(256),

backup_start_date DATETIME,

tempo INT,

server_name NVARCHAR(256),

recovery_model NVARCHAR(120),

tamanho NUMERIC (15, 2)

)

--Armazena historico database

USE curso

CREATE TABLE dbo.TAMANHO_DB(

name sysname NOT NULL,

Tamanho numeric (10, 2) NULL,

Tamanho_2 varchar (13) NULL,

data_log datetime NOT NULL

)

--Armazena log de jobs

CREATE TABLE dbo.LOG_JOBS(

name sysname NOT NULL,

step_id int NOT NULL,

message nvarchar (4000) NULL,

Run_duration int NOT NULL,

run_status int NOT NULL,

Status varchar (19) NULL,

data_log datetime NOT NULL

)

--Armazena histórico de tabelas 

CREATE TABLE dbo.HIST_TABELAS (

Tabela nvarchar (128) NULL,

Linhas bigint NULL,

Reservado bigint NULL,

Dados bigint NULL,

Indice bigint NULL,

NaoUtilizado bigint NULL,

data_log datetime NOT NULL

)

--Verifica utilização de log 

CREATE PROCEDURE dbo.Proc_analise_log

as

DBCC SQLPERF (LOGSPACE)

Fixed DataBase Roles #118

DBA - Segurança-Security

Sysad: Poderes totais sobre os objetos do servidor

Securiyadmin: Pode gerenciar logins do servidor

Serveradmin: Pode configurar a maioria das opções do servidor

Diskadmin: Gerencia os arquivos de um banco de dados

Dbcreator: Cria e altera Banco de Dados.

Processadmin: Gerencia processos rodando no SQL Server

Stupadmin: Pode gerenciar e configurar a reaplicação entre servidores

SQL Server e extender store procedure

db_owner: Tem poderes totais sobe o banco de dados

db_accessadmin: Pode adicionar e remover usuários ao Banco de Dados

db_datareader: Pode ler dados em todas as tabelas de usuário do BD

db_datawriter: Pode adicionar, alterar ou excluir dados em todas as tabelas

de usuário do BD

db_ddladmin: Pode adicionar, modificar ou excluir objetos do BD

db_securityadmin: Pode gerenciar roles e adionar ou excluir usuários às roles do BD

db_backupoperator: Pode fazer o backup do BD

db_denydatareader: Não pode consultar dados em nenhuma das tabelas do BD, mas pode efetuar

alterações na estrutura do BD e de seus objetos.

db_denydatawriter: Não pode alterar dados no BD.

Schema DBA no SQL Server #117, #118

DBA - Segurança-Security

Principal: Um principal é considerado qualquer objeto que possa solicitar acesso a recursos

do SQL Server, por exemplo, usuários e grupos do windows, logins e roles do SQL Server, e aplicativos

roles.

Schema: Um schema é um conjunto de objetos, sendo que todos os objetos pertencentes a um shema 

têm como dono o mesmo principal. No SQL Server todos os objetos de um Banco de Dados têm com dono 

um schema.

Servidor.Banco_de_Dados.Schema.Objeto

INFINITY\SQLEXPRESS.CURSO.DBO.CLIENTES

Resumo:

Um schema é um container para objetos

Todo objeto pertence a um schema

Todos os objetos de um schema têm o mesmo dono, que é o dono do schema

As permissões podem ser atribuídas para o schema e também para os objetos dentro do schema

*********

Para criar um schema chamado fin e adm, dentro do banco de dados Curso, da instância INFINITY

para isso, siga os passos a seguir

1. Abra o SQL Server Mangement Studio

2. Na janela Object Explorer, navegue até o Banco de Dados Curso.

3. Clique no sinal de + ao lado do Banco de Dados Curso

4. Clique no sinal de + ao lado de Security

5. Clique no sinal de + ao lado de Schema e observe a lista de schemas definidos

6. Clique com o botão direito do mouse na opção Schema e selecione New Schema

--Gerando Schema para a área de Financeira

USE curso

CREATE SCHEMA fin GO

--Gerando Schema para a área de administrativa

CREATE SCHEMA adm GO

--Gerando tabela fluxo_de_caixa no Schema FIN

CREATE TABLE FIN.fluxo(

id int NULL,

clif_for varchar (50) NULL,

valor decimal (18, 0) NULL,

data date NULL

)

--Teste de select no Schema Fin

SELECT * FROM FIN.fluxo_de_caixa

--DROP SCHEMAS

drop schema FIN

DROP SCHEMA ADM

--DROP TABLE

DROP TABLE ADM.fluxo_de_caixa

--VERIFICANDO TODOS SCHEMAS

SELECT *FROM sys.schemas

Administração de usuários no SQL Server #115

--Listagem 1. Comando para verificar logins de instância

SELECT * FROM sys.sql_logins

SELECT * FROM sys.syslogins

SELECT * FROM sys.sysremotelogins

SELECT * FROM sys.remote_logins

SELECT * FROM sys.linked_logins

--Listagem 2. Comando para verificar acessos concedidos a usuários.

SELECT

S.name,

S.LOGINNAME,

S.denylogin,

S.hasaccess,

S.isntname,

S.isntgroup,

S.isntuser,

S.yssadmin,

S.securityadmin,

S.serveradmin,

S.diskadmin,

S.diskamin,

S.processadmin,

S.diskadmin,

S.dbcreator,

S.bulkadmin

FROM sys.syslogins S 

  LEFT JOIN

  sys.sql_logins L

  ON S.sid = L.sid

--Listagem 3. Comando para verificar informações básicas de usuários 

Sp_helplogins

Sp_helplogins 'TESTEADM'

Sp_helplogins 'infinity\andre'

Pulso com PIC 16F877A

Ciclo de trabalho para PWM:

set_pwmx_duty(valor);

valor: dados de 8 ou 16 bits que determinam o ciclo de trabalho. Esse valor, juntamente com o valor do TMR2 preescaler, determina o valor do ciclo de trabalho. Na configuração T1MER2, o pós-aquecimento deve ser 1.

Exemplo 1: Meça a largura de um pulso usando o módulo CCP. Componentes ISIS: Utiliza-se o modo de captura do CCP, configurando-o para detectar a borda de subida ou descida do pulso a ser medido. 

Toda vez que ocorre uma detecção de borda, o valor de TMRl irá para o registro do módulo CCP.

CÓDIGO FEITO EM CCS C Compiler

#include <16F877A.h>

#fuses XT, NOWDT

#use delay(clock = 4MHz)

#ifndef lcd_enable

   #define lcd_enable   pin_E1 // pino enable do LCD

   #define lcd_rs       pin_E2 // pino rs do LCD

   //#define lcd_rw       pin_e2 // pino rw do LCD

   #define lcd_d4       pin_D4 // pino de dados d4 do LCD

   #define lcd_d5       pin_D5 // pino de dados d5 do LCD

   #define lcd_d6       pin_D6 // pino de dados d6 do LCD

   #define lcd_d7       pin_D7 // pino de dados d7 do LCD

#endif

#include <mod_lcd.c>

#byte PIR1 = 0x0C

int1 nuevopulso = 0;

int16 TFB = 0, TFS = 0, TF = 0;

float AP = 0.0, frequencia;

int1 cambio = 0;

#int_ccp1

void ccp1_int(){

   if(cambio == 0){

      TFS = CCP_1;

      setup_ccp1(CCP_CAPTURE_RE);

      cambio = 1;

   }else{

      TFB = CCP_1;

      setup_ccp1(CCP_CAPTURE_RE);

      cambio = 0;

      

      if(nuevopulso == 0){

         nuevopulso = 1;

      }

   }

}

void main(){

   lcd_ini();

   

   setup_timer_1(T1_INTERNAL);

   setup_ccp1(CCP_CAPTURE_RE);

   cambio = 0;

   enable_interrupts(int_ccp1);

   enable_interrupts(global);

   

   while(TRUE){

      if(nuevopulso >= 1){

         TF = (TFB - TFS);

         AP = TF * 1.0 / 1000.0;

         frequencia = 1.0 / (AP/1000.0);

         printf(lcd_escreve,"\f Pulso = %f ms\n Freq = %01.2f Hz",AP, frequencia);

         nuevopulso = 0;

         //delay_ms(100);

      }

   }

}

Saída de frequência usando CI 555

Observação: O oscilador astável com CI 555 não é preciso, logo haverá inconsistência nos resultados.

Logo, usando um outro exemplo com clock fixo verá que a precisão é siguinificativa.

Administração de usuários no SQL Server 'DBA' #114

USER curso

SEUSER 'TESTEADM'

select SYSTEM_USER

--testando select

select *from funcionarios

--testando insert

insert into funcionarios values ('Jack', 800, 'RH')

--testando update

update FUNCIONARIOS set salario = salario * 1.5

--voltar no usuario que logou

SELECT SYSTEM_USER

SETUSER 'TESTEADM'

SQLCMD #112

DBA - Utilitário SQLCMD

O sqlcmd utilitário permite que você insira instruções Transact-SQL, procediemntos

do sistema e arquivos de script no prompt de comando

htpps://docs.microsoft.com/pt-br/sql/tools/sqlcmd-utility

-d db_name

-i input_file

-o output_file

-p password

-q "cmdline query"

-Q "cmdline query" (and exit)

-S [protocol:]server[instance_name][,port]

-U Login_id

 

DBA - DBCC no Microsoft SQL Server #108 #109 #110

DBA - DBCC (DataBase Console Comamands)

DBCC: São comandos que fazem a consitência lógica e física do banco de dados.

Apesar da maioria dos comandos ser somante para retornar informações sobre o banco

existem alguns comandos que podem ajudar a resolver problemas.

DBCC - Manutenção

DBCC TABLE CHECK: A consitência lógica e física dos objetos no banco de dados é verificada

nessa fase.

DBCC TABLE REPAIR: As correções de banco de dados são executadas nessa fase, se REPAIR_FAST,

REPAIR_REBUILD ou REPAIR_ALLOW_DATA_LOSS for especificado e houver erros de objeto que

precisem ser corrigidos.

DBCC SYS CHECK: As tabelas do sistema de banco de dados são verificadas nessa fase.

DBCC SYS REPAIR: As correções de banco de dados são realizadas nessa fase se REPAIR_FAST, REAPIR_REBUILD 

ou REPAIR_ALLOW_DATA_LOSS for especificado e houver erros de tabelas do sistema que 

precisem ser corrigidos.

DBCC FREEPROCCACHE: Limpa cache de procedures

DBCC - Diversas Miscellneous

DBCC HELP: Retorna informações de sintaxe para o comando especificado DBCC.

DBCC dilname(FREE): Descarrega o procedimento armazenado estendido DLL especificado da memória

DBCC TRACEON: Habilita os sinalizadores de rastreamento especificados

DBCC TRACEOFF: Desabilita os sinalizadores de rastreamento especificados.

DBCC - Informações

DBCC SHOWCONTIG: Exibe informaçções de fragmentação para os dados e índices da tabela ou exibição especificada

DBCC SHOW_STATISTICS: Exibe as estatísticas de otimização de consulta atuais de uma tabela ou exibição indexada

DBCC PROCCACHE: Exibe informações em um formato de tabela sobre o cache de procedimento

DBCC OPENTRAN: Ajuda a identificar as transações ativas que podem impedir o truncamento do log

DBCC - Validação

DBCC CHECKDB: Verifica a integridade lógica e física de todos os objetos do banco de dados especificando com

execução das seguintes operações

DBCC CHECKTABLE: Verifica a integridade de todas as páginas e estruturas que compõe a tabela ou a exibição

indexada

DBCC CHECKCONSTRAINTS: Inspeciona a integridade de uma restrição especificada ou de todas as restrições em

uma tabela especificada no banco de dados atual.

DBCC CHECKALLOC: Verifica a consitência de estruturas de alocação de espaço em disco para um banco de dados

especificado

_______________ DBCC PARA OBTER INFORMAÇÕES ____________________

--Link de apoio: https://msdn.microsoft.com/pt-br/library/ms188796(v=sql.120).aspx

USE MASTER

DBCC HELP('?'); -- exibe os comandos para execução

DBCC HELP (SHOW_STATISTICS) --(checkdb),(

--Exibe informações de fragmentação para os dados e índices da tabela ou exibição específica

use curso

DBCC SHOWCONTIG (cidades)

--Exibe as estatísticas de otimização de consulta atuais de uma tabela ou exibição indexada

DBCC SHOW_STATISTICS (cidades)

--Exibe as informações em um formato de tabela sobre o cache de procedimento

DBCC PROCCACHE

--Ajuda a indetificar as transações ativas que podem impedir o truncamento do log

DBCC OPENTRAN

#109_______________DBCC PARA DIVERSOS __________________

--Retorna informações de sintaxe para o comando específico DBCC.

DBCC HELL (?)

DBCC HELP (TRACEON) --(CHECKALLOC)

--Descarrega o procedimento armazenado estendido DLL especificado da memória

DBCC dllname (FREE)

--select *from sys.session

--Habilita os sinalizadores de rastreamento especificados

DBCC TRACEON

--Exibe o status de sinalizadores de rastreamento

DBCC TRACESTATUS

--Desabilita os sinalizadores de rastreamento especificados.

DBCC TRACEOFF

--apoio

--Conexões ativas

SELECT *FROM sys.dm_exec_connections

--Verificando arquivo trave

SELECT TextData,

SPID, 

LoginName,

NTUserName,

NTDomainName,

HostName,

ApplicatinName,

StarTime, ServerName,

DatabaseName,

EventClass,

ObjectType

FROM fn_trace_gettable('C:\Program Files\Microsoft SQL Server\MSSQL12.SQLEXPRESS\MSSQL\Log\log_19.trc',default)

#110____________________

--Verifica a integridade lógica e física de todos os objetos do banco de dados

--especificado com a execução das seguintes operações:

ALTER DATABASE curso SET SINGLE_USER

USE curso

DBCC CHECKDB (curso, REPAIR_FAST)

DBCC CHECKDB (curso, REPAIR_REBUILD)

DBCC CHECKDB (curso, REPAIR_ALLOW_DATA_LOSS)

--Verifica a integridade de todas as páginas e estruturas que compõem

--a tabela ou a exibição indexada

DBCC CHECKTABLE (cidades)

--Inspeciona a integridade de uma restrição especificada ou de todas

--as restrições em uma tabela especificada no banco de dados atual

DBCC CHECKCONSTRAINTS

--Verifica a consistencia de estruturas de alocação de espaço em disco

--para um banco de dados específíco

_____________DBCC DE MANUTENÇÃO____________________

DBCC HELP ('?');

DBCC HELP ('CHECKTABLE');

--A consistência lógica e física dos objetos no banco de dados é 

--verificada nessa fase.

use curso

DBCC CHECTABLE ('pedidos');

--As correções de banco de dados são executados nessa fase, se REPAIR_FAST,

--REPAIR_REBUILD ou REPAIR_ALLOW_DATA_LOSS

--for especificado e houver erros de objeto que precisem ser corrígidos

--DBCC TABLE REPAIR

USE MASTER

ALTER DATABASE curso SET SINGLE_USER;

DBCC CHECKTABLE ('cidades', REPAIR_FAST)

DBCC CHECKTABLE ('cidades', REPAIR_REBUILD)

DBCC CHECKTABLE ('cidades', REPAIR_ALLOW_DATA_LOSS)

DBCC CHECKSYS --As tabelas são verificadas nessa fase

Status de porta com PIC 16F877A

Objetivo: Visualizar em um LCD o status das entradas PORTA . Temos os componentes ISIS: PIC16F877A, RESPACK8, LG M I264IBSIR e SW-SPST-M OM

#include <16F877A.h>

#fuses HS, NOWDT, NOPROTECT, NOLVP

#use delay(clock = 20MHz)

#include <HDM64GS12.c>

#include <graphics.c>

#use standard_io(a)

void main(){

   CHAR A5[] = "A5";

   CHAR A4[] = "A4";

   CHAR A3[] = "A3";

   CHAR A2[] = "A2";

   CHAR A1[] = "A1";

   CHAR A0[] = "A0";

   CHAR IN[] = "PORTA A";

   glcd_init(ON);

   glcd_text57(33, 30, A5, 1, 1);

   glcd_text57(49, 30, A4, 1, 1);

   glcd_text57(65, 30, A3, 1, 1);

   glcd_text57(81, 30, A2, 1, 1);

   glcd_text57(97, 30, A1, 1, 1);

   glcd_text57(113, 30, A0, 1, 1);

   glcd_text57(30, 5, IN, 2, 1);

   

   while(TRUE){

      if (input_state(PIN_A5) == 0){

         glcd_rect(32, 40, 46, 60, 1, 1);

      }else{

         glcd_rect(32, 40, 46, 60, 1, 0);

         glcd_rect(32, 40, 46, 60, 0, 1);

      }

      

      if (input_state(PIN_A4) == false){

         glcd_rect(48, 40, 62, 60, 1, 1);

      }else{

         glcd_rect(48, 40, 62, 60, 1, 0);

         glcd_rect(48, 40, 62, 60, 0, 1);

      }

      

      if (input_state(PIN_A3) == false){

         glcd_rect(64, 40, 78, 60, 1, 1);

      }else{

         glcd_rect(64, 40, 78, 60, 1, 0);

         glcd_rect(64, 40, 78, 60, 0, 1);

      }

      

      if (input_state(PIN_A2) == false){

         glcd_rect(80, 40, 94, 60, 1, 1);

      }else{

         glcd_rect(80, 40, 94, 60, 1, 0);

         glcd_rect(80, 40, 94, 60, 0, 1);

      }

      

      if (input_state(PIN_A1) == false){

         glcd_rect(96, 40, 110, 60, 1, 1);

      }else{

         glcd_rect(96, 40, 110, 60, 1, 0);

         glcd_rect(96, 40, 110, 60, 0, 1);

      }

      

      if (input_state(PIN_A0) == false){

         glcd_rect(112, 40, 126, 60, 1, 1);

      }else{

         glcd_rect(112, 40, 126, 60, 1, 0);

         glcd_rect(112, 40, 126, 60, 0, 1);

      }

      

      delay_ms(400);

   }

}

Contador multiplexado com PIC 16F876

Código feito no CCS C Compiler

//PÁGINA 63

#include <16F876.h>

#USE DELAY(CLOCK = 4MHz)

#FUSES XT, NOWDT, NOPROTECT, NOPUT

#USE fast_IO (B)

#USE fast_IO (A)

byte CONST DISPLAY[10] = {0x3f, 0x06, 0x5b, 0x4f, 0x66, 

         0x6d, 0x7d, 0x07, 0x7f, 0x6f};

         

void main(){

   byte ud = 0, dec = 0;

   SET_TRIS_B(0x00);

   SET_TRIS_A(0x00);

   OUTPUT_B(0);

   

   for( ;; ){

      for(dec = 0; dec < 10; dec++){

         for(ud = 0; ud < 10; ud++){

            output_a(0x02);

            output_b(DISPLAY[ud]);

            delay_ms(50);

            

            if (dec == 0) output_a(0x03);

            else output_a(0x01);

                                    //cat_D_ = acender

            OUTPUT_B(DISPLAY[dec]);//digito dezenas

            delay_ms(50);     //para evitar paralelos

         }

      }

   }

}

SUSPECT no SQL Server #107

SUSPECT (Recuperando de um Desastre)

Este estado no Banco de Dados acontece quando alguns dos arquivos do grupo de

Banco de Dados estão corrompidos. Na inicialização do SQL Server, este verifica

se os arquivos estão íntegros.

Se ele encontra -se com algum problema nesses arquivos, ele coloca o banco de dados no

estado 'SUSPECT', 'RECOVERY_PENDING'. Esse estado necessita da ação direta do Administrador

de Banco de Dados.

--SET BACKUP FULL

ALTER DATABASE desastre SET recovery full --opcional

--Realiza backup

BACKUP DATABASE desastre TO disk=N'C:\LOCAL ARMAZENADO.NOME.bak'

--Recuperando do BD

--1 colocar BD em emergency

ALTER DATABASE desastre SET EMERGENCY

--2 Fazer um backup do log de transações mesmo o banco estando como suspect

--(lembrando que o log de transações deve estar íntegro em outra unidade de disco);

--BACKUP DO ARQUIVO !!!

--3 Em alguns casos é necessário a exclusão do banco de dados marcado como 'Suspect';

--4 Restaurar o último backup full;

--  DROP DATABASE DESASTRE 

RESTORE DATABASE DESASTRE FROM disk=N'C:\LOCAL DO BD\desastre.bak'

WITH RECOVERY, REPLACE --REPLACE substitui esses arquivos

--Verificando base

SELECT *FROM MATERIAL

DBA - LINKED SERVER #106

LINKED SERVER é utilizado para realizarem consultas em outros servidores.

Essa "ponte" de comunicação é possível entre fontes OLE BD, como Excel, Acces,

servidores SQL Server e até servidores como outro SGBDs como Oracle, Mysql, Sybase.

As principais vantagens de se utilizar Linked Server é a facilidade de executar consultas

distribuídas, comandos de atualizações que envolvem diversas bases em servidores diferentes.

SIMULANDO LINKED SERVER

Para simular o Linked Server em ação, será necessário no minimo duas instâncias, 

onde elas podem estar ou não no mesmo servidor. Vamos criar un banco de dados e uma

tabela, a qual será utilizada para realizar consultas e manipulação através do

Linked Server.

--Verificando se existe LINKED SERVER NO BD

SELECT *FROM sys.servers

A instancia SERVER1 conterá o banco de dados DB_LK, que será acessado pela instancia

SERVER2

Configuration Manager Pipes Nomeado e TCP/IP -> Habilitados

Configurações Firewall -> Portas 1433, 1434 -> Liberadas, Regras.

Conexão Remota na Instancia -> Permitir

Conexão entre as redes -> Funcionando

--Verificando se exeiste LINKED SERVER NO BD

SELECT * FROM sys.servers

--CRIANDO LINKED SERVER

EXEC sp_addlinkedserver

@server = 'INFINITY', --servidor/IP infinity

@srvproduct = '',

@provider = 'SQLNCLI',

@datasrc = 'INFINITY\SQLEXPRESS2'--data serce 'instancia sqlexpress2

--Gerando usuário do LINKED SERVER

EXEC sp_addlinkedsrvlogin

@rmtsrvname = 'INFINITY'

@useself = 'true',

@locallogin = 'INFINITY\andre',

@rmtuser = NULL,

@rmtpassword = 'SUA SENHA'.. --senha remota do computador

--Selecionando dados através do LINKED SERVER

SELECT *FROM INFINITY.TESTE_LINK.dbo.PESSOAS --nomedoprovedor.nomedoBD.dbo.nomedaTabela

--ATUALIZANDO DADOS ATRAVES DO LINKED SERVER

UPDATE INFINITY.TESTE_LINK.dbo.PESSOAS SET NOME = 'TESTE UPADATE' WHWRE ID = 5

--Inserindo dados atraves do LINKED SERVER

INSERT INTO INFINITY.TESTE_LINK.dbo.PESSOAS (NOME) VALUES ('JACK')

ATTACH no SQL Server #105

ATTACH/DETACH

É possível anexar ou desanexar ou banco de dados através do recurso de administração do SQLSERVER, através do modo Gráfico ou linha de comando.

Exemplos gráfico (Demonstração);

Exemplos linha de comando abaixo:

--DETACH/DESANEXANDO BD

USE master;

GO EXEC sp_detach_bd @dbname = N'CURSO';

GO

--ATTACH/ANEXANDO BD

USE master;

GO

CREATE DATABASE curso --Gera o arquivo com bases dados

ON (FILENAME = 'C:\local do diretório\arquivo1.mdf'),

   (FILENAME = 'C:\local do diretório\arquivo2.ldf')

FOR ATTACH;

GO

SHRINK no SQL Server #104

DBA - REDUZIR - SHRINK

SHRINK: São comandos/tarefas utilizadas para redução do tamanho

de banco de dados ou arquivos. 

É possível reduzer cada arquivo dentro de um banco de dados para remover

páginas sem utilização. Embora o Mecanismo de Banco de Dados

reutilize efetivamente os espaços, há momentos em que um 

arquivo não necessita mais ser tão grande quanto era.

--Quando a opção AUTO_SHRINK do banco de dados estiver definida como ON /redução automática

ALTER DATABASE nome_bd SET AUTO_SHRINK OFF --Desliga

ALTER DATABASE nome_bd SET AUTO_SHRINK ON --Liga

--Reduzindo um banco de dados e especificando uma porcentagem de espaço livre

DBCC SHRINKDATABASE (AdventureWorks2014, 10); -- 10%

--Truncando un banco de dados

DBCC SHRINKDATABASE (AdventureWorks2014, TRUNCATEONLY); --Reduz até a última extensão alocada

--Reduzindo arquivo de dados

DBCC SHRINKFILE (AdventureWorks2014_Data, 10); -- 10%

DBCC SHRINKFILE (AdventureWorks2014_Log, 5); --5%

Analise de crescimento DB #103

--Verificando tamanho/espaço ocupado pelos banco de dados

EXEC sp_spaceused 'alunos'

EXEC sp_spaceused 'cidaddes'

--Verificando as tabelas

SELECT

   OBJECT_NAME(object_id) AS Tabela, p.Rows AS Linhas, -- tras na tabela p --Na tabela a, vai somar o campo Total_Pages irá multiplicar por 8 

   SUM(a.Total_Pages * 8) AS RESERVADO, --ira trazer as linhas

   SUM(CASE WHEN p.Index_ID) > 1 THEN 0 ELSE a.Data_Pages * 8 END) AS Dados, --Quantos que os dados irá ocupar naquela tabela

    SUM(a.Used_Pages * 8) -

SUM(CASE WHEN p.Index_ID > 1 THEN 0 ELSE a.Data_Pages * 8 END) AS Indice,

   SUM((a.Total_Pages - a.Used_Pages) * 8) AS NaoUtilizado

FROM

    sys.partitions AS p INER JOIN sys.allocation_units AS a

    ON p.hobt_id = a.container_id

GROUP BY OBJECT_NAME(object_id), ROWS

ORDER BY dados desc --Trazer em ordem decrescente

Statistics no Microsoft SQL Server #102

Statistics

Estatisticas (statistics) são objetos que detêm informações importantes sobre a distribuitção dos dados dentro de tabelas e views indexadas. As estatísticas são de extrema importância para o SQL Server, uma vez que o Otimizador de Consulta  (Query Optimizer) utiliza as estatísticas paa analisar a seletividade e 

cardinalidade dos dados.

-- seleciona tudo da tabela alunos exeto o que contém Gustavo

SELECT * FROM alunos WHERE nome NOT LIKE ('Gustavo%) 

--VERIFICANDO STATISTICS

EXEC sp_helpstats 'alunos', 'all'

--verificando tabela de estatisticas

SELECT *FROM sys.stats WHERE object_id = OBJECT_ID('alunos')

--Estatísticas criadas implicitamente é quando geramos um índice 

--seja ele clustered ou não, e por consequencia são criadas estatísticas

implicitamente para os campos chaves do índice

--Força um primary key

ALTER TABLE campoenato ADD CONSTRAINT pc_time PRIMARY KEY 

 CLUSTERED (nometime)

--Verificando estatistics

EXEC sp_helpstats 'campeonato', 'all'

--Estatísticas criadas manualmente

--Também podemos gera -las manualmente, utilizando o comando CREATE STATISTICS

CREATE STATISTICS St_id_nome ON alunos (aluno_id, aluno_nome);

Mini teste 1 #2021/2

Construa um programa (em C) para sistema baseado no microcontrolador PIC16F877A que após o botão B1 ser pressionado ele escreve o dia e o mês do seu nascimento (com interrupção do B1). Quando o B0 for pressionado ele apaga tudo

Ex 25:12 (vinte e cinco de dezembro)

Resolução feita no CCS C Compiler

#include <16F877A.h>

#device adc=8

#use delay(clock = 20MHz)

#fuses NOWDT, HS, NOPUT, NOPROTECT, NODEBUG, BROWNOUT, NOLVP

#fuses NOCPD, NOWRT

#define t 5

unsigned int8 display [ ] = {

   0b000000,   // display desligado

   0b000100,   // display 1

   0b001000,   // display 2

   0b010000,   // display 3

   0b100000,  // display 4

};

unsigned int8 v1[] = {0b00111111, 0b00000110, 0b01011011, 

   0b01001111, 0b01100110, 0b01101101, 0b01111101, 

   0b00000111, 0b01111111, 0b01100111};

#int_EXT

void EXT_isr(void){

   enable_interrupts(INT_RTCC);

   if(input(PIN_B1) == TRUE){

      output_a(display[0]); // desliga todos os display

      delay_ms(500);

      

   }

}

void main(){

   setup_adc_ports(NO_ANALOGS);

   setup_adc(ADC_OFF);

   setup_psp(PSP_DISABLED);

   setup_spi(SPI_SS_DISABLED);

   setup_timer_0(RTCC_INTERNAL | RTCC_DIV_128);

   setup_timer_1(T1_DISABLED);

   setup_timer_2(T2_DISABLED, 0, 1);

   setup_comparator(NC_NC_NC_NC);

   setup_vref(FALSE);

   

   disable_interrupts(INT_RTCC);

   enable_interrupts(INT_EXT);

   

   ext_int_edge(L_TO_H);

   enable_interrupts(GLOBAL);

    

   

   while(true){

            

      for(int i = 0; i < 15; i++){

         output_a(display[1]);

         output_d(v1[1]);

         delay_ms(t);

         

         output_a(display[2]);

         output_d(v1[6]);

         delay_ms(t);

         

         output_a(display[3]);

         output_d(v1[0]);

         delay_ms(t);

         

         output_a(display[4]);

         output_d(v1[8]);

         delay_ms(t);

         

      }

   }

}

Saída gerada no PicsimLab

Backup no SQL Server

--BACKUP

USE MASTER

ALTER DATABAE nome_do_BD SET RECOVERY FULL

BACKUP DATABASE nome_do_BD TO DISK = "C:\LOCAL' WITH STATS

--Processo de restauração do BACKUP

RESTORE DATABASE nome_do_BD FROM DISK = 'C:\LOCAL DO BD' WITH STATS, RECOVERY

--Backup multiplos arquivos

BACKUP DATABASE nome_do_BD 

TO DISK = 'C:\local1',

DISK = 'C:\local2',

DISK = 'C:\local3',

DISK = 'C:\local4',

WITH STATS

--Restauração de mutiplos backups

RESTORE DATABASE nome_do_BD 

 FROM DISK ='C:\local21',

DISK = 'C:\local2',

DISK = 'C:\local3',

WITH STATS, RECOVERY

Modo OFFLINE e ONLINE no SQL Oracle

Objetivo: Derrubar o uso do banco de dados através de comando

--Deixa OFFlILINE e derruba todas as conexões

USE MASTER

GO

ALTER DATABASE curso SET OFFLINE WITH ROLLBACK IMMEDIATE --curso é banco de dados

--Colocar Online

USE MASTER GO

ALTER DATABASE curso SET ONLINE 

USE MASTER;

GO

--BD modo único usuário

ALTER DATABASE curso SET SINGLE_USER WITH ROLLBACK IMMEDIATE;

GO

--Banco de Dados em modo único usuário

USE MASTER;

GO

ALTER DATABASE curso SET SINGLE_USER WITH ROLLBACK IMMEDIATE;

GO

--BD modo de leitura

ALTER DATABASE curso SET READ_ONLY;

GO

--BD modo muitos usuários

ALTER DATABASE curso SET MULTI_USER;

GO

--BD leitua e gravacaao

ALTER DATABASE curso SET READ_WRITE;

GO

Memória EEPROM com PIC 16F877A

 Objetivo: Gravar um dado na memória EEPROM a cada pressionada de botão

Código feito no CCS C Compiler

#include <16F877A.h>

#device adc = 10

#include <math.h>

#use delay(clock = 4MHz)

#fuses XT, NOWDT, NOPROTECT, NOBROWNOUT, PUT, NOLVP

#include <lcd.c>

#define value pin_b1

int8 data = 30, a = 100, location = 0, read_data; // read_data = 255

float analog_temp, actual_temp, temp_ms;

void main(){

   setup_adc(ADC_CLOCK_DIV_32);

   lcd_init();

   read_data = read_eeprom(15); //retornar um byte de um endereço de memória específico

   lcd_gotoxy(1, 1);

   printf(lcd_putc, "Local 15: %u", read_data);

   lcd_gotoxy(1, 2);

   printf(lcd_putc, "Verificar dados: %u", a);

   

   while(TRUE) {

      if(input(value)){// a cada precionada grava byte

         delay_ms(1000);

         data++;

         location++;

         a++;

         write_eeprom(location, data); //Grava um byte no endereço EEPROM de dados especificado

         read_data = read_eeprom(location);

         lcd_gotoxy(21, 2);

         printf(lcd_putc, "Local %u : %u", location, read_data);

      }

   }

   

}

Saída gerada no software Proteus versão 7.9

Frequência com TIMER0 no PIC 16F877A

Código feito no CCS C Compiler

#include <16F877A.h>

#device adc = 8

#FUSES NOWDT, HS, NOPUT, NOPROTECT, NODEBUG, BROWNOUT, NOLVP, NOCPD, NOWRT, NOWRT

#use delay(clock = 20MHz)

unsigned int16 cont1 = 0, cont2 = 0, cont3 = 0;

/*Contagem  frequencia de entrada

   PARA 220 Hz

   PARA 95 Hz

   PARA 82 Hz 

*/

// 274 Hz ---> 36 ---> 3.65ms

#int_TIMER0

void TIMER0_isr(void){

   if(++cont1 >= 44)  { cont1 = 0; output_toggle(pin_B0) ; } // [274 * 36] / 220) = 44

   if(++cont2 >= 103) {cont2 = 0;output_toggle(pin_B1); } //   [274 * 36] / 95 = 103

   if(++cont3 >= 120) {cont3 = 0; output_toggle(pin_B2); } //  [274 * 36] / 82 = 120

}

void main(){

   setup_adc_ports(NO_ANALOGS);

   setup_adc(ADC_OFF);

   setup_psp(PSP_DISABLED);

   setup_spi(SPI_SS_DISABLED);

   setup_timer_0(RTCC_INTERNAL | RTCC_DIV_1); // overflow 51,2 us

   setup_timer_1(T1_DISABLED);

   setup_timer_2(T2_DISABLED,0,1);

   setup_comparator(NC_NC_NC_NC);

   setup_vref(FALSE);

   enable_interrupts(INT_TIMER0);

   enable_interrupts(GLOBAL);

   //disable_interrupts(GLOBAL);

   

   while(true);

}

Saída gerada no software Proteus 7.9

Serial com PIC 16F877A

Código feito no CCS C Compiler

#include <16F877A.h>

#device adc = 8

#FUSES NOWDT, HS, NOPUT, NOPROTECT

#FUSES NODEBUG, NOBROWNOUT, NOLVP, NOCPD, NOWRT

#use delay(clock = 20MHz)

//#use rs232(baud=9600,parity=N,xmit=PIN_C6,rcv=PIN_C7,bits=8)

#use rs232(baud = 9600, parity = N, xmit = PIN_C6, rcv = PIN_C7, bits = 8, STREAM = Wireless)

#ifndef lcd_enable

 #define lcd_enable pin_E1 // pino enable do LCD

 #define lcd_rs pin_E2 // pino rs do LCD

 //#define lcd_rw pin_e2 // pino rw do LCD

 #define lcd_d4 pin_d4 // pino de dados d4 do LCD

 #define lcd_d5 pin_d5 // pino de dados d5 do LCD

 #define lcd_d6 pin_d6 // pino de dados d6 do LCD

 #define lcd_d7 pin_d7 // pino de dados d7 do LCD

#endif

#include <mod_lcd.c>

unsigned int i = 0, tensao = 0;

signed int y = -50;

void main(){

   setup_adc(ADC_CLOCK_DIV_16);

   setup_adc_ports(AN0);

   setup_psp(PSP_DISABLED);

   setup_spi(SPI_SS_DISABLED);

   setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);

   setup_timer_1(T1_DISABLED);

   setup_timer_2(T2_DISABLED,0,1);

   setup_comparator(NC_NC_NC_NC);

   setup_vref(FALSE);

   set_adc_channel(0);

   delay_us( 50 );

   

   lcd_ini();

   while(true){

      

      putc('A');

      putc('\n');

      putc('\r');

      delay_ms(1000);

      for(i = 1; i <= 10; i++){

         //fprintf(Wireless,"%u %d\r", i, y);

         printf(lcd_escreve, "%u %d\r", i, y);

         delay_ms(1000);

         if(++y > 50) y = -50;

      }

   }

}

Saída gerada no PicsimLab

Memória Externa RS232 Long e Float com PIC 16F877A

Código feito no CCS C Compiler

#include <16F877A.h>

#device adc = 8

#FUSES NOWDT //No Watch Dog Timer

#FUSES XT //High speed Osc (> 4mhz for PCM/PCH) (>10mhz for PCD)

#FUSES NOPUT //No Power Up Timer

#FUSES NOPROTECT //Code not protected from reading

#FUSES NODEBUG //No Debug mode for ICD

#FUSES NOBROWNOUT //No brownout reset

#FUSES NOLVP //No low voltage prgming, B3(PIC16) or B5(PIC18) used for I/O

#FUSES NOCPD //No EE protection

#FUSES NOWRT //Program memory not write protected

#use delay(clock = 20MHz)

#ifndef lcd_enable

 #define lcd_enable pin_E1 // pino enable do LCD

 #define lcd_rs pin_E2 // pino rs do LCD

 //#define lcd_rw pin_e2 // pino rw do LCD

 #define lcd_d4 pin_d4 // pino de dados d4 do LCD

 #define lcd_d5 pin_d5 // pino de dados d5 do LCD

 #define lcd_d6 pin_d6 // pino de dados d6 do LCD

 #define lcd_d7 pin_d7 // pino de dados d7 do LCD

#endif

#include "mod_lcd.c"

#include "2404.C"

   long int End_HL(byte H, byte L){

   return (H<<8)+ L;

}

char* IntToHex(int value) {

   int a;

   int b;

   char* buffer;

   a = value && 16;

   b = (value>>4)&16;

   buffer[0] = (a<10)?'0'+a:'A'-(a-10);

   buffer[1] = (b<10)?'0'+b:'A'-(b-10);

   return buffer;

}

WRITE_FLOAT_EXT_EEPROM(long int n, float data) {

   int i;

   for (i = 0; i < 4; i++)

      write_ext_eeprom(i + n, *((int8*)&data + i) ) ;

}

float READ_FLOAT_EXT_EEPROM(long int n) {

   int i;

   float data;

   for (i = 0; i < 4; i++)

      *((int8*)&data + i) = read_ext_eeprom(i + n);

      return(data);

}

void eeprom_int16(unsigned int endereco, int16 valor_i16){

   write_ext_eeprom(endereco, make8(valor_i16,0));

   write_ext_eeprom(endereco+1, make8(valor_i16,1));

}

int16 read_int16_ext_eeprom(long int endereco) {

   int a, b;

   int16 valor;

   a = read_ext_eeprom(endereco);

   b = read_ext_eeprom(endereco + 1);

   valor = make16(b, a);

   return valor;

}

void main() {

   byte dispositivo1,dispositivo2;

   unsigned int8 a,b,c,d;

   unsigned int endereco;

   int16 Temperatura;

   float pressao = 21.37f;

   float result_f;

   setup_adc_ports(NO_ANALOGS);

   setup_adc(ADC_OFF);

   setup_psp(PSP_DISABLED);

   setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);

   setup_timer_1(T1_DISABLED);

   setup_timer_2(T2_DISABLED,0,1);

   setup_comparator(NC_NC_NC_NC);

   setup_vref(FALSE);

   lcd_ini(); // Inicializa LCD

   delay_ms(10);

   init_ext_eeprom();

   delay_ms(10);

   printf (lcd_escreve,"\f iniciando...");

   delay_ms(2000);

   while (true){

      write_ext_eeprom(0x1, 6);

      write_ext_eeprom(0x2, 9);

      write_ext_eeprom(3, 12);

      write_ext_eeprom(4, 40);

      write_ext_eeprom(5, 50);

      write_ext_eeprom(6, 60);

      write_ext_eeprom(7, 70);

      Temperatura = 730;

      endereco = 8;

      eeprom_int16(endereco,Temperatura);

      endereco = 10;

      WRITE_FLOAT_EXT_EEPROM(endereco,pressao);

      printf(lcd_escreve,"\fValor: %d",read_ext_eeprom(0x2 ));

      printf(lcd_escreve,"\r\nValor: %d",read_ext_eeprom(4));

      delay_ms(3000);

      //a = read_ext_eeprom(8);  

      //b = read_ext_eeprom(9);

      //printf(lcd_escreve,"\fTemp.: %lu",make16(b,a));

      printf(lcd_escreve,"\fTemp.: %lu", read_int16_ext_eeprom(8));

      delay_ms(3000);

   

      result_f = READ_FLOAT_EXT_EEPROM(10);

      printf(lcd_escreve,"\fPressao: %.1f", result_f);

      delay_ms(3000);

   }

}

Software: PicsimLab

Memória Externa RS232 com PIC 16F877A

Código feito no CCS C Compiler

#include <16F877A.h>

#fuses HS,NOWDT,NOPROTECT,NOLVP

#use delay(clock = 20MHz)

#use rs232(baud = 9600, xmit = PIN_C6, rcv = PIN_C7)

#ifndef lcd_enable

   #define lcd_enable pin_E1 // pino enable do LCD

   #define lcd_rs pin_E2 // pino rs do LCD

   //#define lcd_rw pin_e2 // pino rw do LCD

   #define lcd_d4 pin_d4 // pino de dados d4 do LCD

   #define lcd_d5 pin_d5 // pino de dados d5 do LCD

   #define lcd_d6 pin_d6 // pino de dados d6 do LCD

   #define lcd_d7 pin_d7 // pino de dados d7 do LCD

#endif

#include "mod_lcd.c"

//#include "input.c"

#include "2401.c"

void main() {

   BYTE value,value_recebido, cmd;

   EEPROM_ADDRESS address;

   unsigned int8 i = 0;

   init_ext_eeprom();

   lcd_ini();

   delay_us(50);

   // TODO: USER CODE!!

   printf (lcd_escreve,"\f iniciando...");

   delay_ms(2000);

   for(i = 0; i <= 128; i++){

      WRITE_EXT_EEPROM(i, 255 );

      WRITE_EXT_EEPROM(0, 8 ); 

      WRITE_EXT_EEPROM(1, 7);

      WRITE_EXT_EEPROM(2, 'P');

      WRITE_EXT_EEPROM(3, 'A');

      WRITE_EXT_EEPROM(4, 55);

      //WRITE_EXT_EEPROM(1, 7); //valores repetidos

   }

   value_recebido = READ_EXT_EEPROM(0);

   while(true){

      printf (lcd_escreve,"\f IFMT ");

      //printf("\n\rTemp = %d", value);

      printf (lcd_escreve,"\n\rValor: %i %c", value_recebido, value_recebido);

      delay_ms(2000);

   }

}

Saída gerada no Software PicsimLab