Obiettivi :

Realizzazione di un programma in linguaggio assembler 8051 per la scheda a microcontrollore 8051 della centralina che svolga  le seguenti funzioni:

1. Acquisizione ad intervalli regolari dei valori di temperatura dalle due sonde di temperatura, di velocità e direzione del vento, di valore umidità relativa e livello di insolazione. 
2. Memorizzazione massimo  minimo della giornata e valore attuale delle variabili acquisite per eventuali consultazione in tempo reale.

Realizzazione di un programma in linguaggio visual C  per PC che svolga  le seguenti funzioni:

1. Consultazione in tempo reale di valore massimo minimo della giornata e valore attuale delle variabili raccolte dalla centralina
2. Download dati acquisiti dalla centralina,  con possibilità di  salvataggio su file in formato CSV e graficazione dell'andamento nel tempo.

Realizzazione di pagina Web in codice PHP che svolga  le seguenti funzioni:

1. Consultare i dati CSV precedentemente salvati dal sw su PC.
2. Consultazione in tempo reale di valore massimo minimo della giornata.

Specifiche software asm 8051

Definizione variabili principali:

Definizione costanti principali:

Esempio di sistemazione delle variabili su memoria esterna.

Esempio di sistemazione dei valori acquisti memoria esterna.

Algoritmi

main

Inizializzazione

Timer 0 sarà utilizzato per generare la base dei tempi per l'orologio e eventuali conteggi di temporizzazione, deve essere impostato in modo di funzionamento 1 e deve chiamare il proprio servizio di interruzione ogni 10ms.

La porta seriale deve essere configurata per un velocità di trasferimento da 9600b/s, 8 bit di dati e un bit di stop, timer 1 svolge la funzione di generatore di clock per la porta seriale e deve essere impostato nel modo di funzionamento 2

Vedi: http://xnullo/corso/labsitel/docs/scheda_8051/seriale.htm

Timing acq

Rilevamento ed acquisizione

Algoritmo da utilizzare per rilevamento ed  acquisizione di ciascuna grandezza: Te1,Te2, VelV, DirV, Um, Ins, Vbatt

Interpretazione dei nomi indicati nel diagramma di flusso:

MinMax

Algoritmo di rilevazione del massimo e minimo della giornata

Interpretazione dei nomi indicati nel diagramma di flusso:

Azz. Min Max

Acq

Algoritmo di acquisizione.
Lo schema di allocazione dei buffers su Ram esterna deve come indicato in figura

Interpretazione dei nomi indicati nel diagramma di flusso:

Lettura valore ADC

8 bit

10 bit

Seriale

La porta seriale RS232 sarà utilizzata per il trasferimento dati da  Centralina meteo e PC

Si ipotizza un funzionamento Master Slave dove il ruolo di slave spetta alla centralina. La centralina rimane  sempre in ascolto e processa le eventuali richiesta fatte da PC e risponde in base alla richiesta.

Definizione del protocollo:

Si articola in 4 comandi

r_wrmemb

r_rdmemb

r_wrmem

r_rdmem

wrmemb = 07h
rdmemb = 08h
wrmem =  0Bh
rdmem =  0Ch
 

check acall rx
ck2 cjne a,#wrmemb,ck3
sjmp r_wrmemb
ck3 cjne a,#rdmemb,ck4
sjmp r_rdmemb
ck4 cjne a,#wrmem,ck5
sjmp r_wrmem
ck5 cjne a,#rdmem,ck6
sjmp r_rdmem

fine:
reti

r_rdmemb:
acall rx
mov dpl,a
acall rx
mov dph,a
movx a,@dptr
acall tx
sjmp fine

r_wrmemb:
acall rx
mov dpl,a
acall rx
mov dph,a
acall rx
movx @dptr,a
sjmp fine

r_wrmem:
acall rx
mov dpl,a
acall rx
mov dph,a
acall rx
mov 7FH,a
lr_wr acall rx
movx @dptr,a
inc dptr
djnz 7FH,lr_wr
sjmp fine


r_rdmem:
acall rx
mov dpl,a
acall rx
mov dph,a
acall rx
mov 7FH,a
lr_rd movx a,@dptr
acall tx
inc dptr
djnz 7FH,lr_rd
jmp fine

rx jnb ri,$
rxf clr ri
mov a,sbuf
ret

tx mov sbuf,a
jnb ti,$
clr ti
ret

Specifiche software BC4Builder

//---------------------------------------------------------------------------
#include <vcl.h>

#pragma hdrstop

#include "UCom8051.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "uCiaComport"
#pragma link "VaClasses"
#pragma link "VaComm"
#pragma link "VaClasses"
#pragma resource "*.dfm"
TFormCom8051 *FormCom8051;
#define InMemByte_K 8
#define InMem_K 12
#define OutMem_K 11
#define OutMemByte_K 7

//---------------------------------------------------------------------------
__fastcall TFormCom8051::TFormCom8051(TComponent* Owner)
: TForm(Owner)
{

}
//---------------------------------------------------------------------------
bool __fastcall TFormCom8051::InMemByte(unsigned int Add,char *Value)
{
int ts;
char st[3];
char rx[1];
st[0]=InMemByte_K;
st[1]=Add & 0xFF;
st[2]=Add >> 8;
ts=GetTickCount();
VaComm1->WriteBuf(st,3);
while ((VaComm1->ReadBufUsed()==0) && ((GetTickCount()-ts)<500))
{
Application->ProcessMessages();
}
if ((GetTickCount()-ts)<500)
{
VaComm1->ReadBuf(Value,1);
return True;
}
else
{
return False;
}
}

bool __fastcall TFormCom8051::InMem(unsigned int Add,char *Value,unsigned char Len)
{
int ts;
char st[4];

st[0]=InMem_K;
st[1]=Add & 0xFF;
st[2]=Add >> 8;
st[3]=Len;
ts=GetTickCount();
VaComm1->WriteBuf(st,4);
while ((VaComm1->ReadBufUsed()<Len) && ((GetTickCount()-ts)<500))
{
Application->ProcessMessages();
}
if ((GetTickCount()-ts)<500)
{
VaComm1->ReadBuf(Value,Len);
return True;
}
else
{
return False;
}
}

bool __fastcall TFormCom8051::OutMem(unsigned int Add,char *Value,unsigned char Len)
{
int ts,n;
char st[260];
st[0]=OutMem_K;
st[1]=Add & 0xFF;
st[2]=Add >> 8;
st[3]=Len;
for (n=0;n<Len;n++)
st[4+n]=Value[n];
ts=GetTickCount();
VaComm1->WriteBuf(st,4+Len);
while ((VaComm1->WriteBufUsed()!=0) && ((GetTickCount()-ts)<500))
{
Application->ProcessMessages();
}
if ((GetTickCount()-ts)<500)
{
return True;
}
else
{
return False;
}
}

bool __fastcall TFormCom8051::OutMemByte(unsigned int Add,char *Value)
{
int ts;
char st[4];
st[0]=OutMemByte_K;
st[1]=Add & 0xFF;
st[2]=Add >> 8;
st[3]=Value[0];
ts=GetTickCount();
VaComm1->WriteBuf(st,4);
while ((VaComm1->WriteBufUsed()!=0) && ((GetTickCount()-ts)<500))
{
Application->ProcessMessages();
}
if ((GetTickCount()-ts)<500)
{
return True;
}
else
{
return False;
}
}

bool __fastcall TFormCom8051::OutMemByteVerify(unsigned int Add,char *Value)
{
char v[1];
if ((OutMemByte(Add,Value)) && (InMemByte(Add,v)) && (v[0]=Value[0]))
return True;
else
return False;
}

bool __fastcall TFormCom8051::OutMemVerify(unsigned int Add,char *Value, int Len)
{
char v[255];
if ((OutMem(Add,Value,Len)) && (InMem(Add,v,Len)) && (memcmp(v,Value,Len)==0))
return True;
else
return False;
}


//---------------------------------------------------------------------------

void __fastcall TFormCom8051::FormCreate(TObject *Sender)
{
VaComm1->Open();
}
//---------------------------------------------------------------------------