MLABlibrarysvnkaklikMLAB_E8magsvn

Català-Valencià – Catalan中文 – Chinese (Simplified)中文 – Chinese (Traditional)Česky – CzechDansk – DanishNederlands – DutchEnglish – EnglishSuomi – FinnishFrançais – FrenchDeutsch – Germanעברית – Hebrewहिंदी – HindiMagyar – HungarianBahasa Indonesia – IndonesianItaliano – Italian日本語 – Japanese한국어 – KoreanМакедонски – Macedonianमराठी – MarathiNorsk – NorwegianPolski – PolishPortuguês – PortuguesePortuguês – Portuguese (Brazil)Русский – RussianSlovenčina – SlovakSlovenščina – SlovenianEspañol – SpanishSvenska – SwedishTürkçe – TurkishУкраїнська – UkrainianOëzbekcha – Uzbek

Compare Revisions

• This comparison shows the changes necessary to convert path

  → /schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/ @ 5

  → /schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/ @ 6

  ↔ Reverse comparison

• Compare Path:	Rev

  With Path:	Rev

No changes between revisions

Ignore whitespace Rev 5 → Rev 6

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/!main.c
0,0 → 1,33
#include "E:\@Dokumenty\pic\test_lcd_873\main.h"
#DEFINE LCD_RS PIN_B1 // rizeni registru LCD displeje
#DEFINE LCD_E PIN_B2 // enable LCD displeje
#DEFINE LCD_DATA_LSB PIN_B4 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou)
#INCLUDE "MYLCD.C"
void main() {
setup_adc_ports(NO_ANALOGS);
setup_adc(ADC_CLOCK_DIV_2);
setup_spi(FALSE);
setup_counters(RTCC_INTERNAL,RTCC_DIV_2);
setup_timer_1(T1_DISABLED);
setup_timer_2(T2_DISABLED,0,1);
lcd_init();
printf(lcd_putc,"\fStart 1 ...");
while(true)
{
output_high(PIN_C1);
output_low(PIN_C2);
delay_ms(500);
output_low(PIN_C1);
output_high(PIN_C2);
delay_ms(500);
}
}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/Keybord.xls
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Added: svn:mime-type
+application/octet-stream
\ No newline at end of property

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/Kopie - main.c
0,0 → 1,177
#include "E:\@Dokumenty\pic\vysilac\main.h"
#DEFINE LCD_RS PIN_B1 // rizeni registru LCD displeje
#DEFINE LCD_E PIN_B2 // enable LCD displeje
#DEFINE LCD_DATA_LSB PIN_B4 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou)
#INCLUDE "MYLCD.C"
#DEFINE VYSILAC PIN_C3
#DEFINE OSA_X 0 // adresa A/D prevodniku pro osu X
#DEFINE OSA_Y 1 // adresa A/D prevodniku pro osu Y
#DEFINE IMPULS 250 // sirka impulsu pro false |-|
#DEFINE TTL1 PIN_b4
#DEFINE TTL2 PIN_b3
int stredX, stredY, x, y;
void odeslat (int8 kodeslani)
{
int i;
for (i=0;i<=7;i++)
{
if (1==bit_test(kodeslani,i))
{
output_high(VYSILAC);
delay_us(2*IMPULS); // X pri 1: |--|___
output_low(VYSILAC);
delay_us(3*IMPULS);
}
else
{
output_high(VYSILAC);
delay_us(IMPULS); // X pri 0: |-|__|-|_
output_low(VYSILAC);
delay_us(2*IMPULS);
output_high(VYSILAC);
delay_us(IMPULS);
output_low(VYSILAC);
delay_us(IMPULS);
};
}
}
void synchronizace()
{
int8 sinchro;
sinchro=0b00001111;
odeslat (sinchro); // synchronizace: |--|___|--|___|--|___|--|___|-|__|-|_|-|__|-|_|-|__|-|_|-|__|-|_
}
void odesli (int8 X, int8 Y)
{
odeslat(X+ (X << 4));
odeslat(Y+ (Y << 4));
}
void kalibrace()
{
int8 min_x;
int8 max_x;
int8 min_y;
int8 max_y;
int8 sred_x;
int8 sred_y;
int8 adc;
min_x=max_x=min_y=max_y=sred_x=sred_y=128;
printf(lcd_putc,"Paku dejte do prostred a stisknete tlacitko");
znovu:
if (TTL1 || TTL2)
{
set_adc_channel(OSA_X);
delay_us(10);
sred_x=read_adc();
set_adc_channel(OSA_y);
delay_us(10);
sred_y=read_adc();
};
//else goto znovu;
printf(lcd_putc,"\f");
printf(lcd_putc,"Pak ");
set_adc_channel(OSA_X);
delay_us(10);
adc=read_adc();
if (max_x < adc )max_x=adc;
if (min_x > adc )min_x=adc;
set_adc_channel(OSA_y);
delay_us(10);
adc=read_adc();
if (max_y < adc )max_y=adc;
if (min_y > adc )min_y=adc;
if (TTL1 || TTL2) return;
}
void main()
{
int c=0;
setup_adc_ports(RA0_RA1_RA3_ANALOG);
setup_adc(ADC_CLOCK_DIV_2);
setup_spi(FALSE);
setup_counters(RTCC_INTERNAL,RTCC_DIV_2);
setup_timer_1(T1_DISABLED);
setup_timer_2(T2_DISABLED,0,1);
lcd_init();
/* while (c<=16)
{
lcd_gotoxy(c,1);
printf(lcd_putc,"_");
delay_ms(50);
printf(lcd_putc,"\f");
c++;
}
printf(lcd_putc,"\fAhoj!");
delay_ms(1500);*/
printf(lcd_putc,"\f");
while(true)
{
set_adc_channel(OSA_X);
lcd_gotoxy(1,1);
x=read_adc() >> 4;
printf(lcd_putc,"X: %D ", x);
set_adc_channel(OSA_Y);
lcd_gotoxy(1,2);
y=read_adc() >> 4;
printf(lcd_putc,"Y: %D ", y);
/* output_high(PIN_C1);
output_low(PIN_C2);
delay_ms(100);
output_low(PIN_C1);
output_high(PIN_C2);
delay_ms(100);*/
lcd_gotoxy(7,2);
printf(lcd_putc,"vysilam");
output_high(PIN_C4);
output_high(PIN_C6);
delay_ms(1);
output_low(PIN_C4);
synchronizace();
odesli(x,y);
output_low(PIN_C6);
}
}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/PRG.PIF
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Added: svn:mime-type
+application/octet-stream
\ No newline at end of property

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/VC.MNU
0,0 → 1,4
R: Run
picpgr run
S: Stop
picpgr stop

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/joystick.BAK
0,0 → 1,132
//#DEFINE AD_OSA_X 0 // adresa A/D prevodniku pro osu X
//#DEFINE AD_OSA_Y 1 // adresa A/D prevodniku pro osu Y
//#DEFINE TL1 PIN_A2 // tlacitka
//#DEFINE TL2 PIN_A4
//#DEFINE EEleve_x 0
//#DEFINE EEprave_x 1 //adresovani EEPROM
//#DEFINE EEhorni_y 2
//#DEFINE EEdolni_y 3
//#DEFINE EEmin_x 4 // ulozeni hodnot (adresy)
//#DEFINE EEmax_x 5
//#DEFINE EEmin_y 6
//#DEFINE EEmax_y 7
//#DEFINE EEstred_x 8
//#DEFINE EEstred_y 9
unsigned int min_x;
unsigned int max_x;
unsigned int min_y;
unsigned int max_y;
unsigned int stred_x;
unsigned int stred_y;
unsigned int leve_x;
unsigned int prave_x;
unsigned int horni_y;
unsigned int dolni_y;
/*#DEFINE TEXT0 "Joy set to cent"
#DEFINE TEXT1 "er and press OK"
#DEFINE TEXT2 "Joy move in some "
#DEFINE TEXT3 "full circle"
#DEFINE TEXT4 "Calib. complete"*/
#DEFINE TEXT0 " Dejte paku do "
#DEFINE TEXT1 "prostøed"
#DEFINE TEXT2 "Udelajte par"
#DEFINE TEXT3 "kruhù"
#DEFINE TEXT4 "hotovo"
void Joystick (int *ted_x, int *ted_y, int8 *ted_tl1, int8 *ted_tl2)
{
set_adc_channel(AD_OSA_X);
delay_us(10);
*ted_x=read_adc();
set_adc_channel(AD_OSA_Y);
delay_us(10);
*ted_y=read_adc();
if (!input(TL1))
{
delay_us(500);
if (!input(TL1)) *ted_tl1=True;
}
else *ted_TL1=False;
if (!input(TL2))
{
delay_us(500);
if (!input(TL2)) *ted_tl2=True;
}
else *ted_tl2=False;
}
void kalibrace()
{
int x,y;
int8 tlac1,tlac2;
min_x = max_x = min_y = max_y = stred_x = stred_y = 128;
// ROZSACH JOYSTIKU
printf(lcd_putc,"\f");
printf(lcd_putc,TEXT2);
lcd_gotoxy(1,2);
printf(lcd_putc,TEXT3);
while(input(TL1))
{
if (0x17 == klavesa()) return; // escape
Joystick(&x,&y,&tlac1,&tlac2);
if (max_x < x )max_x=x;
if (min_x > x )min_x=x;
if (max_y < y )max_y=y; //zjisteni meznich hodnot
if (min_y > y )min_y=y;
};
Delay_ms(500);
printf(lcd_putc,"\f");
printf(lcd_putc,TEXT0);
lcd_gotoxy(1,2);
printf(lcd_putc,TEXT1);
while(input(TL1))
joystick(&stred_x,&stred_y,&tlac1,&tlac2); //nastaveni stredu
leve_x=max_x - stred_x;
prave_x=stred_x - min_x;
horni_y=max_y - stred_y;
dolni_y=stred_x - min_x;
leve_x = leve_x / 8; //vypocet parametru
prave_x = prave_x / 8;
horni_y = horni_y / 8;
dolni_y = dolni_y / 8;
write_eeprom(EEleve_x,leve_x);
write_eeprom(EEprave_x,prave_x);
write_eeprom(EEstred_x,stred_x);
write_eeprom(EEstred_y,stred_y);
write_eeprom(EEhorni_y,horni_y);
write_eeprom(EEdolni_y,dolni_y);
//write_eeprom(EEmin_x,min_x); //zapis
//write_eeprom(EEmax_x,max_x);
//write_eeprom(EEmin_y,min_y);
//write_eeprom(EEmax_y,max_y);
}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/joystick.c
0,0 → 1,132
//#DEFINE AD_OSA_X 0 // adresa A/D prevodniku pro osu X
//#DEFINE AD_OSA_Y 1 // adresa A/D prevodniku pro osu Y
//#DEFINE TL1 PIN_A2 // tlacitka
//#DEFINE TL2 PIN_A4
//#DEFINE EEleve_x 0
//#DEFINE EEprave_x 1 //adresovani EEPROM
//#DEFINE EEhorni_y 2
//#DEFINE EEdolni_y 3
//#DEFINE EEmin_x 4 // ulozeni hodnot (adresy)
//#DEFINE EEmax_x 5
//#DEFINE EEmin_y 6
//#DEFINE EEmax_y 7
//#DEFINE EEstred_x 8
//#DEFINE EEstred_y 9
unsigned int min_x;
unsigned int max_x;
unsigned int min_y;
unsigned int max_y;
unsigned int stred_x;
unsigned int stred_y;
unsigned int leve_x;
unsigned int prave_x;
unsigned int horni_y;
unsigned int dolni_y;
/*#DEFINE TEXT0 "Joy set to cent"
#DEFINE TEXT1 "er and press OK"
#DEFINE TEXT2 "Joy move in some "
#DEFINE TEXT3 "full circle"
#DEFINE TEXT4 "Calib. complete"*/
#DEFINE TEXT0 " Dejte paku do "
#DEFINE TEXT1 "prostred"
#DEFINE TEXT2 "Udelajte par"
#DEFINE TEXT3 "kruhu"
#DEFINE TEXT4 "hotovo"
void Joystick (int *ted_x, int *ted_y, int8 *ted_tl1, int8 *ted_tl2)
{
set_adc_channel(AD_OSA_X);
delay_us(10);
*ted_x=read_adc();
set_adc_channel(AD_OSA_Y);
delay_us(10);
*ted_y=read_adc();
if (!input(TL1))
{
delay_us(500);
if (!input(TL1)) *ted_tl1=True;
}
else *ted_TL1=False;
if (!input(TL2))
{
delay_us(500);
if (!input(TL2)) *ted_tl2=True;
}
else *ted_tl2=False;
}
void kalibrace()
{
int x,y;
int8 tlac1,tlac2;
min_x = max_x = min_y = max_y = stred_x = stred_y = 128;
// ROZSACH JOYSTIKU
printf(lcd_putc,"\f");
printf(lcd_putc,TEXT2);
lcd_gotoxy(1,2);
printf(lcd_putc,TEXT3);
while(input(TL1))
{
if (0x17 == klavesa()) return; // escape
Joystick(&x,&y,&tlac1,&tlac2);
if (max_x < x )max_x=x;
if (min_x > x )min_x=x;
if (max_y < y )max_y=y; //zjisteni meznich hodnot
if (min_y > y )min_y=y;
};
Delay_ms(500);
printf(lcd_putc,"\f");
printf(lcd_putc,TEXT0);
lcd_gotoxy(1,2);
printf(lcd_putc,TEXT1);
while(input(TL1))
joystick(&stred_x,&stred_y,&tlac1,&tlac2); //nastaveni stredu
leve_x=max_x - stred_x;
prave_x=stred_x - min_x;
horni_y=max_y - stred_y;
dolni_y=stred_x - min_x;
leve_x = leve_x / 8; //vypocet parametru
prave_x = prave_x / 8;
horni_y = horni_y / 8;
dolni_y = dolni_y / 8;
write_eeprom(EEleve_x,leve_x);
write_eeprom(EEprave_x,prave_x);
write_eeprom(EEstred_x,stred_x);
write_eeprom(EEstred_y,stred_y);
write_eeprom(EEhorni_y,horni_y);
write_eeprom(EEdolni_y,dolni_y);
//write_eeprom(EEmin_x,min_x); //zapis
//write_eeprom(EEmax_x,max_x);
//write_eeprom(EEmin_y,min_y);
//write_eeprom(EEmax_y,max_y);
}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/keybord.BAK
0,0 → 1,128
//#DEFINE PL PIN_B3 // ovladani klavesnice
//#DEFINE STROBE_LED PIN_C0
//#DEFINE STROBE_KL PIN_C1
//#DEFINE DATA_OUT PIN_C2
//#DEFINE CP PIN_C3
//#DEFINE DATA_IN PIN_C4
#DEFINE znak_0 14
#DEFINE znak_1 10
#DEFINE znak_2 11
#DEFINE znak_3 12
#DEFINE znak_4 20
#DEFINE znak_5 21
#DEFINE znak_6 22
#DEFINE znak_7 04
#DEFINE znak_8 05
#DEFINE znak_9 06
#DEFINE znak_R 15
#DEFINE znak_F 16
#DEFINE znak_C 27
#DEFINE nic 80
void KL_init()
{
int8 i;
output_high(STROBE_KL);
output_high(STROBE_LED);
for (i=0;i<=7;i++)
{
output_low(DATA_IN);
output_high(CP);
output_low(CP);
}
output_low(STROBE_KL);
output_low(STROBE_LED);
output_high(CP);
output_high(PL);
}
void KL_CP(j)
{
int8 i;
for (i=0;i<=j;i++)
{
output_high(CP);
output_low(CP);
}
}
void LED(int8 LED) //rosviti LED 1-7
{
int i;
output_low(CP);
output_low(STROBE_LED);
for (i=0;i<=7;i++)
{
output_bit(DATA_IN,bit_test(LED,i));
output_high(CP);
output_low(CP);
};
output_high(STROBE_LED);
output_low(STROBE_LED);
}
int8 klavesa() //vrati cislo klavesy
{
int8 i;
int8 sloupec;
for(sloupec=0; sloupec<=7; sloupec++)
{
output_low(STROBE_KL);
output_low(DATA_IN);
for (i=0;i<=7;i++)
{ //nulovani sloupcu
output_high(CP);
output_low(CP);
}
output_high(DATA_IN);
output_high(CP); //zavedeni 1 do registru sloupcu
output_low(CP);
output_low(DATA_IN);
for (i=0;i<sloupec;i++) //nastaveni sloupce
{
output_high(CP);
output_low(CP);
}
output_high(STROBE_KL);
output_low(PL);
output_high(PL);
for (i=0;i<5;i++) //posunuti cteciho registru
{
output_high(CP);
output_low(CP);
}
if (1==input(DATA_OUT)) return(sloupec); // pokud je 0. radek
output_high(CP);
output_low(CP);
if (1==input(DATA_OUT)) return(0b1000 | sloupec); // pokud je 1. radek
output_high(CP);
output_low(CP);
if (1==input(DATA_OUT)) return(0b10000 | sloupec); // pokud je 2. radek
}
return(0x80); // nastavy nejvissi bit, ze neni nic zmacknuto
}
boolean read_KL(char *klv)
{
const char prev_tabulka[24]={'i','z','m','u','7','8','9','.','1','2','3','b','0','r','f','k','4','5','6','s',' ',' ','t','c'};
*klv = klavesa();
if (0x80==*klv) return(false);
else
{
*klv = prev_tabulka[*klv];
return(true);
}
}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/keybord.c
0,0 → 1,134
//#DEFINE PL PIN_B3 // ovladani klavesnice
//#DEFINE STROBE_LED PIN_C0
//#DEFINE STROBE_KL PIN_C1
//#DEFINE DATA_OUT PIN_C2
//#DEFINE CP PIN_C3
//#DEFINE DATA_IN PIN_C4
#DEFINE znak_0 14
#DEFINE znak_1 10
#DEFINE znak_2 11
#DEFINE znak_3 12
#DEFINE znak_4 20
#DEFINE znak_5 21
#DEFINE znak_6 22
#DEFINE znak_7 04
#DEFINE znak_8 05
#DEFINE znak_9 06
#DEFINE znak_R 15
#DEFINE znak_F 16
#DEFINE znak_C 27
#DEFINE nic 80
void KL_init()
{
int8 i;
output_high(STROBE_KL);
output_high(STROBE_LED);
for (i=0;i<=7;i++)
{
output_low(DATA_IN);
output_high(CP);
output_low(CP);
}
output_low(STROBE_KL);
output_low(STROBE_LED);
output_high(CP);
output_high(PL);
}
void KL_CP(j)
{
int8 i;
for (i=0;i<=j;i++)
{
output_high(CP);
output_low(CP);
}
}
void LED(int8 LED) //rosviti LED 1-7
{
int i;
output_low(CP);
output_low(STROBE_LED);
for (i=0;i<=7;i++)
{
output_bit(DATA_IN,bit_test(LED,i));
output_high(CP);
output_low(CP);
};
output_high(STROBE_LED);
output_low(STROBE_LED);
}
int8 klavesa() //vrati cislo klavesy
{
int8 i;
int8 sloupec;
for(sloupec=0; sloupec<=7; sloupec++)
{
output_low(STROBE_KL);
output_low(DATA_IN);
for (i=0;i<=7;i++)
{ //nulovani sloupcu
output_high(CP);
output_low(CP);
}
output_high(DATA_IN);
output_high(CP); //zavedeni 1 do registru sloupcu
output_low(CP);
output_low(DATA_IN);
for (i=0;i<sloupec;i++) //nastaveni sloupce
{
output_high(CP);
output_low(CP);
}
output_high(STROBE_KL);
output_low(PL);
output_high(PL);
for (i=0;i<5;i++) //posunuti cteciho registru
{
output_high(CP);
output_low(CP);
}
/* if (1==input(DATA_OUT)) return(sloupec); // pokud je 4. radek
output_high(CP);
output_low(CP);
if (1==input(DATA_OUT)) return(sloupec); // pokud je 3. radek
output_high(CP);
output_low(CP);*/
if (1==input(DATA_OUT)) return(sloupec); // pokud je 0. radek
output_high(CP);
output_low(CP);
if (1==input(DATA_OUT)) return(0b1000 | sloupec); // pokud je 1. radek
output_high(CP);
output_low(CP);
if (1==input(DATA_OUT)) return(0b10000 | sloupec); // pokud je 2. radek
}
return(0x80); // nastavy nejvissi bit, ze neni nic zmacknuto
}
boolean read_KL(char *klv)
{
const char prev_tabulka[24]={'i','z','m','u','7','8','9','.','1','2','3','b','0','r','f','k','4','5','6','s',' ',' ','t','c'};
*klv = klavesa();
if (0x80==*klv) return(false);
else
{
*klv = prev_tabulka[*klv];
return(true);
}
}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/lcd2.BAK
0,0 → 1,8
#define LCD_SC 0b0000011000 // posun displeje doleva
#define RIGHT 1
#define LEFT 0
void lcd_sh(int8 lr)
{
if (lr) lcd_send_byte(0,LCD_SC | 0x100); else lcd_send_byte(0,LCD_SC);
}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/lcd2.c
0,0 → 1,8
#define LCD_SC 0b0000011000 // posun displeje doleva
#define RIGHT 1
#define LEFT 0
void lcd_sh(int1 lr)
{
if (lr) lcd_send_byte(0,LCD_SC | 0x100); else lcd_send_byte(0,LCD_SC);
}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/main.BAK
0,0 → 1,183
// Vysilac
#include "main.h"
#include "..\common.h"
//Displej
#DEFINE LCD_RS PIN_B1 // rizeni registru LCD displeje
#DEFINE LCD_E PIN_B2 // enable LCD displeje
#DEFINE LCD_DATA_LSB PIN_B4 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou)
#INCLUDE "MYLCD.C"
#INCLUDE "lcd2.c"
//Klavesnice
#DEFINE PL PIN_B3 // ovladani klavesnice
#DEFINE STROBE_LED PIN_C0
#DEFINE STROBE_KL PIN_C1
#DEFINE DATA_OUT PIN_C2
#DEFINE CP PIN_C3
#DEFINE DATA_IN PIN_C4
#INCLUDE "keybord.c"
//Vysilac
#DEFINE VYSILAC PIN_C5
#INCLUDE "vysilac.c"
//Joistick
#DEFINE EEleve_x 0
#DEFINE EEprave_x 1 //adresovani EEPROM
#DEFINE EEhorni_y 2
#DEFINE EEdolni_y 3
#DEFINE EEmin_x 4
#DEFINE EEmax_x 5
#DEFINE EEmin_y 6
#DEFINE EEmax_y 7
#DEFINE EEstred_x 8
#DEFINE EEstred_y 9
#DEFINE AD_OSA_X 1 // adresa A/D prevodniku pro osu X
#DEFINE AD_OSA_Y 0 // adresa A/D prevodniku pro osu Y
#DEFINE TL1 PIN_C6
#DEFINE TL2 PIN_C7
#INCLUDE "Joystick.c"
int x,y,tlac1,tlac2;
void trimovat()
{
odeslat_paket(Trim,0b0001);
odeslat_paket(OSA_X,x);
odeslat_paket(OSA_Y,y);
}
void vysilat()
{
leve_x = read_eeprom(EEleve_x);
prave_x = read_eeprom(EEprave_x);
stred_x = read_eeprom(EEstred_x);
stred_y = read_eeprom(EEstred_y);
horni_y = read_eeprom(EEhorni_y);
dolni_y = read_eeprom(EEdolni_y);
Delay_ms(200);
lcd_gotoxy(6,2);
printf(lcd_putc,"Vysilam");
while(0x80 == klavesa())
{
Joystick(&x,&y,&tlac1,&tlac2);
/*if (stred_x >= x)
{
x = stred_x - x;
x = x/leve_x;
}
else
{
x = x - stred_x;
x = x/prave_x;
}
if (stred_y >= y)
{
y = stred_y - y;
y = y/dolni_y;
}
else
{
y = y - stred_y;
y = y/horni_y;
}*/
x=x/8;
y=y/8;
odeslat_paket(OSA_X,x);
Delay_us(1600);
odeslat_paket(OSA_Y,y);
Delay_us(1600);
}
}
void menu()
{
int8 polozka = 3;
int8 old_polozka = 0;
int pom;
while(true)
{
pom = klavesa();
if (0x07 == pom) polozka++;
if (0x0f == pom) polozka--;
if (0x04 <= polozka) polozka = 1;
if (0x00 == polozka) polozka = 3;
if (0x16 == pom) // enter
{
LED((1 << (polozka + 1)) | 1);
switch(polozka)
{
case 1:
kalibrace();
break;
case 2:
trimovat();
break;
case 3:
vysilat();
break;
};
LED(1 << (polozka + 1));
old_polozka=0;
};
if (polozka != old_polozka)
{
old_polozka=polozka;
printf(lcd_putc,"\f");
switch(polozka)
{
case 1:
lcd_gotoxy(5,2);
printf(lcd_putc,"Kalibrace");
break;
case 2:
lcd_gotoxy(7,2);
printf(lcd_putc,"Trim");
break;
case 3:
lcd_gotoxy(6,2);
printf(lcd_putc,"Vysilat");
break;
};
LED(1 << (polozka + 1));
Delay_ms(250);
}
}
}
void main()
{
int8 tlacitka,tlacitka_old;
setup_adc_ports(RA0_RA1_RA3_ANALOG);
setup_adc(ADC_CLOCK_DIV_2);
setup_spi(FALSE);
setup_counters(RTCC_INTERNAL,RTCC_DIV_2);
setup_timer_1(T1_DISABLED);
setup_timer_2(T2_DISABLED,0,1);
lcd_init();
KL_init();
menu();
while(true)
{
//char xx;
// if (true == read_kl(&xx))
// {
// printf(lcd_putc,"%C",xx );
// }
}
}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/main.HEX
0,0 → 1,196
:1000000000308A00C12D00000A108A100A118207F0
:1000100028340C34013406340A108A100A1182077D
:100020005534643465346C3461346A347434653402
:10003000203470346134723400340A108A100A118A
:1000400082076B34723475346834753400340A10A6
:100050008A100A1182072034443465346A347434B7
:1000600065342034703461346B3475342034643436
:100070006F34203400340A108A100A118207703459
:1000800072346F34733474347234653464340034CD
:100090000A108A100A11820756347934733469348D
:1000A0006C3461346D3400340A108A100A118207EE
:1000B0004B3461346C346934623472346134633487
:1000C000653400340A108A100A11820754347234DD
:1000D00069346D3400340A108A100A1182075634CC
:1000E0007934733469346C346134743400343F309F
:1000F0008400000803198B280130A100A001A00B87
:100100007F28A10B7E284A30A000A00B8528000084
:100110000000800B7C28003406080F39C600450E0D
:10012000A000F030A0052008F0394604860006152E
:10013000831606110000831206118316061183121E
:100140000034C308031DA6288610A728861483162A
:1001500086108312C40E4408C5008C20C40E4408C7
:10016000C5008C200D30A000A00BB4280034143042
:10017000BF0077200F308316860583128610831602
:10018000861083120611831606118312B6013608F3
:10019000023C031CD3280230BF0077200330C50087
:1001A0008C20B60AC7280D30A000A00BD52802303D
:1001B000C5008C200D30A000A00BDC28B60136084D
:1001C000023C031CEF2836080420B700C30137089F
:1001D000C400A1200230BF007720B60ADF288A11B0
:1001E000022EA51025088316870083128714251078
:1001F00025088316870083120714B6013608073CCA
:10020000031C16292512250883168700831207125E
:10021000A51125088316870083128715A5112508C7
:100220008316870083128711B60AFE28A5102508B9
:1002300083168700831287102510250883168700F0
:1002400083120710A51125088316870083128715CE
:1002500083168611831286158A11032EBE013E086D
:10026000073C031CE429A510250883168700831288
:100270008710251225088316870083120712BD01F7
:100280003D08073C031C5229A51125088316870049
:1002900083128715A51125088316870083128711FD
:1002A000BD0A4029251225088316870083120716E8
:1002B000A51125088316870083128715A511250827
:1002C000831687008312871125122508831687005D
:1002D00083120712BD013E083D0203187D29A511B6
:1002E00025088316870083128715A5112508831614
:1002F000870083128711BD0A6B29A5102508831674
:100300008700831287148316861183128611831641
:10031000861183128615BD013D08043C031C9E29ED
:10032000A51125088316870083128715A5112508B6
:100330008316870083128711BD0A8C29251525088D
:10034000831687000030831207190130013C031D1A
:10035000AC293E08A100E629A511250883168700CF
:1003600083128715A511250883168700831287112C
:1003700025152508831687000030831207190130E0
:10038000013C031DC7293E080838A100E629A51134
:1003900025088316870083128715A5112508831663
:1003A00087008312871125152508831687000030E2
:1003B000831207190130013C031DE2293E08103861
:1003C000A100E629BE0A2F298030A1000034A51122
:1003D00025088316870083128711251025088316A8
:1003E000870083120710BC013C08073C031C1A2A33
:1003F0003B08A0003C08A1000319022A0310A00C2E
:10040000A10BFE292018062A0712072A0716251213
:100410002508831687008312A511250883168700F7
:1004200083128715A511250883168700831287116B
:10043000BC0AF429251025088316870083120714A7
:100440002510250883168700831207100034013019
:100450003F02C1004008023C031D302A4030C10762
:1004600041088038C200C3014208C400A120003402
:100470003E08A0000C30200203194B2A0A3020024B
:100480000319532A0D3020020319592A083020027B
:1004900003195E2A632AC3010130C400A12002307F
:1004A000BF0077206F2A0130BF000230C000272232
:1004B0006F2A0130BF00C00027226F2AC30110300D
:1004C000C400A1206F2A3E081F3C031C692A073084
:1004D000BE050130C3003E08C400A1206F2A0034CD
:1004E0000830A1001F08C73921049F000330A00075
:1004F000A00B782A3D0884001F151F197D2A1E08AD
:1005000080000030A1001F08C73921049F0003307C
:10051000A000A00B892A3E0884001F151F198E2AEF
:100520001E08800025172508831687008312071BE5
:10053000AA2AA630A000A00B9B2A00002517250898
:10054000831687008312071BA92A3F088400013005
:100550008000AD2A3F0884008001A5172508831676
:1005600087008312871BC52AA630A000A00BB62ADD
:100570000000A5172508831687008312871BC42A4D
:100580004008840001308000C82A400884008001AF
:100590000034BE08031DCE2A8712CF2A8716A51263
:1005A00025088316870053308312A000A00BD62A9B
:1005B000BE080319DD2A8712DE2A8716A512250830
:1005C0008316870053308312A000A00BE52A003465
:1005D0001F30BA05390EA000A00DE030A00520089C
:1005E000BA04BA0E3A080F39BC00BA0E3A080F39ED
:1005F000BC07BC0ABE01C9220830BB00BB080319F6
:100600000B2B0030BA1B0130BD00BE00C922031005
:10061000BA0DBB03FE2A0430BB00BB0803191A2B1A
:100620000030BC190130BD00BE00C9220310BC0D52
:10063000BB030D2BA512250883168700831287168E
:1006400000343A308400FC308005800C800C0008B7
:1006500003192E2B2C2B0000800B2B2B8A11452DE0
:100660000330B600B7012E212108B8003808073C36
:10067000031D3B2BB60A38080F3C031D402BB60365
:100680003608033C0318462B0130B600B608031D9C
:100690004B2B0330B6003808163C031D5E2D01308D
:1006A0003607A1000130A000A10803195B2B03103D
:1006B000A00DA10B572B20080138BA00BB00E72181
:1006C00001303602FD3E03184E2D033EB32D80301F
:1006D000AB00AA00A900A800A700A6000C30BE002D
:1006E0003822BD013D080C20BD0ABE0038220C3066
:1006F0003D02031D722B0130BF000230C0002722D3
:10070000BD013D081D20BD0ABE00382205303D0256
:10071000031D812B25172508831687008312071FC9
:10072000B92B2E212108173C031D972BBD2C3930E6
:10073000BD003A30BE003B30BF003C30C0007022EC
:10074000390827020318A62B3908A7002608390202
:100750000318AC2B3908A6003A0829020318B22B5B
:100760003A08A90028083A020318B82B3A08A8004A
:100770008A2B0230BD00FA30BF007720BD0BBB2BA7
:100780000C30BE003822BD013D082720BD0ABE0046
:1007900038220F303D02031DC42B0130BF00023050
:1007A000C0002722BD013D083B20BD0ABE00382203
:1007B00008303D02031DD32B25172508831687001B
:1007C0008312071FED2B2A30BD002B30BE003B30BB
:1007D000BF003C30C0007022DC2B2A082702AC008E
:1007E00026082A02AD002B082902AE0026082A029C
:1007F000AF00AC0CAC0CAC0C1F30AC05AD0CAD0CB0
:10080000AD0CAD05AE0CAE0CAE0CAE05AF0CAF0C26
:10081000AF0CAF0503178D018F0103132C080317CD
:100820008C0083168C130C15831203130B08A00085
:100830008B138316031755308D00AA308D008C144E
:100840008C18202C0C118312031320088B04013008
:1008500003178D008F0103132D0803178C008316D7
:100860008C130C15831203130B08A0008B13831633
:10087000031755308D00AA308D008C148C183E2C37
:100880000C118312031320088B04083003178D000A
:100890008F0103132A0803178C0083168C130C1581
:1008A000831203130B08A0008B1383160317553014
:1008B0008D00AA308D008C148C185C2C0C118312C6
:1008C000031320088B04093003178D008F010313D5
:1008D0002B0803178C0083168C130C15831203133B
:1008E0000B08A0008B138316031755308D00AA3018
:1008F0008D008C148C187A2C0C1183120313200891
:100900008B04023003178D008F0103132E08031789
:100910008C0083168C130C15831203130B08A00094
:100920008B138316031755308D00AA308D008C145D
:100930008C18982C0C118312031320088B0403309D
:1009400003178D008F0103132F0803178C008316E4
:100950008C130C15831203130B08A0008B13831642
:10096000031755308D00AA308D008C148C18B62CCE
:100970000C118312031320088B044E2D0630B9008E
:100980000130BA00E8220130B9003008BA00E8228C
:100990000230B9003108BA00E8224E2D03178D014C
:1009A0008F0183168C130C1483120C080313AC00F4
:1009B000013003178D008F0183168C130C148312E2
:1009C0000C080313AD00083003178D008F01831648
:1009D0008C130C1483120C080313AA00093003179C
:1009E0008D008F0183168C130C1483120C080313D3
:1009F000AB00023003178D008F0183168C130C148B
:100A000083120C080313AE00033003178D008F010F
:100A100083168C130C1483120C080313AF00C83018
:100A2000BF0077200630BF000230C0002722B90186
:100A300039084820B90ABE00382207303902031DA0
:100A4000182D2E212108803C031D4D2D3030BD0076
:100A50003130BE003230BF003330C0007022B00CE5
:100A6000B00CB00C1F30B005B10CB10CB10CB1051D
:100A70000130B9003008BA00E8220130BF00772009
:100A80000330B900BA30BA00212BB90B422D023025
:100A9000B9003108BA00E822212D4E2D0130360769
:100AA000A1000130B900A10803195A2D0310B90D96
:100AB000A10B562D3908BB00E721B70137083602D4
:100AC0000319B02D3608B7000C30BE0038220130B3
:100AD0003602FD3E03189E2D033EBA2D0530BF00A1
:100AE0000230C0002722B90139085420B90ABE00DB
:100AF000382209303902031D742D9E2D0730BF00A6
:100B00000230C0002722B90139086220B90ABE00AC
:100B1000382204303902031D842D9E2D0630BF007B
:100B20000230C0002722B90139086B20B90ABE0083
:100B3000382207303902031D942D9E2D01303607CF
:100B4000A1000130B900A1080319AA2D0310B90DA5
:100B5000A10BA62D3908BB00E721FA30BF00772092
:100B6000332B8A11042E0A148A100A158207672B68
:100B7000BE2CCE2C0A148A100A1582076E2D7E2DEB
:100B80008E2D84011F308305073083169F00FF30B0
:100B90008312A500043083169F0083121F08383982
:100BA00001389F009412A51225088316870083122E
:100BB00025162508831687008312A511250883169C
:100BC0008700003083129400831694008312A001E2
:100BD000A01DF22D07308101813084000008C0394A
:100BE0000F3880006400813084000008C039200480
:100BF000800090010030A100920000308316920026
:0C0C00008312B728F128302B042E63006B
:02400E00F13F80
:00000001FF
;PIC16F873

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/main.LST
0,0 → 1,2386
CCS PCW C Compiler, Version 3.110, 15448
Filename: d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\main.LST
ROM used: 1542 (38%)
Largest free fragment is 2048
RAM used: 22 (11%) at main() level
40 (21%) worst case
Stack: 5 locations
*
0000: MOVLW 00
0001: MOVWF 0A
0002: GOTO 5C1
0003: NOP
.................... // Vysilac
....................
.................... #include "main.h"
.................... #include <16F873.h>
.................... //////// Standard Header file for the PIC16F873 device ////////////////
.................... #device PIC16F873
.................... #list
....................
.................... #use delay(clock=4000000)
*
0077: MOVLW 3F
0078: MOVWF 04
0079: MOVF 00,W
007A: BTFSC 03.2
007B: GOTO 08B
007C: MOVLW 01
007D: MOVWF 21
007E: CLRF 20
007F: DECFSZ 20,F
0080: GOTO 07F
0081: DECFSZ 21,F
0082: GOTO 07E
0083: MOVLW 4A
0084: MOVWF 20
0085: DECFSZ 20,F
0086: GOTO 085
0087: NOP
0088: NOP
0089: DECFSZ 00,F
008A: GOTO 07C
008B: RETLW 00
*
0321: MOVLW 3A
0322: MOVWF 04
0323: MOVLW FC
0324: ANDWF 00,F
0325: RRF 00,F
0326: RRF 00,F
0327: MOVF 00,W
0328: BTFSC 03.2
0329: GOTO 32E
032A: GOTO 32C
032B: NOP
032C: DECFSZ 00,F
032D: GOTO 32B
032E: BCF 0A.3
032F: GOTO 545 (RETURN)
.................... #fuses XT,PUT,NOWDT
....................
....................
.................... #include "..\common.h"
.................... #DEFINE OSA_X 1 // adresy os
.................... #DEFINE OSA_Y 2
.................... #DEFINE OSA_Z 3
.................... #DEFINE OSA_W 4
.................... #DEFINE TLs 5
.................... #DEFINE Trim 6 // ovladani prijimace
....................
.................... #DEFINE IMPULS 250 // sirka impulsu
.................... #DEFINE SYNC 15 // delka uvodniho ticha v IMPULS/4
....................
.................... //Displej
.................... #DEFINE LCD_RS PIN_B1 // rizeni registru LCD displeje
.................... #DEFINE LCD_E PIN_B2 // enable LCD displeje
.................... #DEFINE LCD_DATA_LSB PIN_B4 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou)
.................... #INCLUDE "MYLCD.C"
.................... // LCD modul pro ovladani dvouradkoveho LCD modulu se standardnim Hitachi radicem
.................... // (c)miho 2002
.................... //
.................... // Historie:
.................... //
.................... // 0.0 Uvodni verze se snadnou definici portu LCD displeje
.................... //
.................... //
.................... // Funkce:
.................... //
.................... // lcd_init() inicializuje LCD displej a porty, nutno volat jako prvni
.................... //
.................... // lcd_putc(c) zapis snaku do lcd displeje, zpracovava nasledujici ridici znaky
.................... // \f = \x0C - nova stranka - smazani displeje
.................... // \n = \x0A - odradkovani (prechod na druhou radku)
.................... // \b = \x08 - backspace - posunuti kurzoru o 1 pozici zpet
.................... // \r = \x0D - goto home to position 1,1
.................... // \0 .. \7 - definovatelne znaky v pozicich 0 az 7 v CGRAM
.................... // \20 .. \27 - alternativne zapsane znaky (oktalove) v pozicich 0 az 7 CGRAM
.................... // Pozor na to, ze funkce printf konci tisk pokud narazi na \0 (konec retezce)
.................... //
.................... // lcd_gotoxy(x,y) presune kurzor na uvedenou adresu
.................... // nekontroluje parametry
.................... //
.................... // lcd_cursor_on zapne kurzor
.................... // lcd_cursor_off vypne kurzor
.................... //
.................... // lcd_define_char(Index, Def) Makro, ktere definuje znaky od pozice Index obsahem definicniho
.................... // retezce Def. Kazdych 8 znaku retezce Def definuje dalsi znak v CGRAM.
.................... // Kapacita CGRAM je celkem 8 znaku s indexem 0 az 7.
.................... // Na konci se provede lcd_gotoxy(1,1).
.................... // Na konci teto knihovny je priklad pouziti definovanych znaku
.................... //
.................... // Definice portu:
.................... //
.................... // #DEFINE LCD_RS PIN_B2 // rizeni registru LCD displeje
.................... // #DEFINE LCD_E PIN_B1 // enable LCD displeje
.................... // #DEFINE LCD_DATA_LSB PIN_C2 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou)
....................
....................
....................
....................
.................... // Privatni sekce, cist jen v pripade, ze neco nefunguje
....................
....................
....................
....................
.................... // Generovane defince portu pro ucely teto knihovny aby kod generoval spravne IO operace a soucasne
.................... // bylo mozne jednoduse deklarovat pripojene piny LCD displeje pri pouziti teto knihovny. Problem spociva
.................... // v tom, ze se musi spravne ridit smery portu a soucasne datovy port zabira jen 4 bity ze zadaneho portu
.................... //
.................... #DEFINE LCD_SHIFT (LCD_DATA_LSB&7) // pocet bitu posuvu dataoveho kanalu v datovem portu
.................... #DEFINE LCD_PORT (LCD_DATA_LSB>>3) // adresa LCD datoveho portu
.................... #DEFINE LCD_TRIS (LCD_PORT+0x80) // adresa prislusneho TRIS registru
.................... #DEFINE LCD_MASK (0xF<<LCD_SHIFT) // maska platnych bitu
.................... //
.................... #IF LCD_SHIFT>4 // kontrola mezi
.................... #ERROR LCD data port LSB bit not in range 0..4
.................... #ENDIF
....................
....................
.................... // Definice konstant pro LCD display
.................... //
.................... #define LCD_CURSOR_ON_ 0x0E // kurzor jako blikajici radka pod znakem
.................... #define LCD_CURSOR_OFF_ 0x0C // zadny kurzor
.................... #define LCD_LINE_2 0x40 // adresa 1. znaku 2. radky
....................
....................
.................... // Definice rezimu LCD displeje
.................... //
.................... BYTE const LCD_INIT_STRING[4] =
.................... {
.................... 0x28, // intrfejs 4 bity, 2 radky, font 5x7
.................... LCD_CURSOR_OFF_, // display on, kurzor off,
.................... 0x01, // clear displeje
.................... 0x06 // inkrement pozice kurzoru (posun kurzoru doprava)
.................... };
*
0004: BCF 0A.0
0005: BCF 0A.1
0006: BCF 0A.2
0007: ADDWF 02,F
0008: RETLW 28
0009: RETLW 0C
000A: RETLW 01
000B: RETLW 06
....................
....................
.................... // Odesle nibble do displeje (posle data a klikne signalem e)
.................... //
.................... void lcd_send_nibble( BYTE n )
.................... {
.................... *LCD_PORT = (*LCD_PORT & ~LCD_MASK) | ((n << LCD_SHIFT) & LCD_MASK); // nastav datove bity portu a ostatni zachovej
*
008C: MOVF 06,W
008D: ANDLW 0F
008E: MOVWF 46
008F: SWAPF 45,W
0090: MOVWF 20
0091: MOVLW F0
0092: ANDWF 20,F
0093: MOVF 20,W
0094: ANDLW F0
0095: IORWF 46,W
0096: MOVWF 06
.................... output_bit(LCD_E,1); // vzestupna hrana
0097: BSF 06.2
0098: BSF 03.5
0099: BCF 06.2
.................... delay_us(1); // pockej alespon 450ns od e nebo alespon 195ns od dat
009A: NOP
.................... output_bit(LCD_E,0); // sestupna hrana (minimalni perioda e je 1us)
009B: BCF 03.5
009C: BCF 06.2
009D: BSF 03.5
009E: BCF 06.2
009F: BCF 03.5
00A0: RETLW 00
.................... }
....................
....................
.................... // Odesle bajt do registru LCD
.................... //
.................... // Pokud je Adr=0 .. instrukcni registr
.................... // Pokud je Adr=1 .. datovy registr
.................... //
.................... void lcd_send_byte( BOOLEAN Adr, BYTE n )
.................... {
.................... output_bit(LCD_RS,Adr); // vyber registr
00A1: MOVF 43,F
00A2: BTFSS 03.2
00A3: GOTO 0A6
00A4: BCF 06.1
00A5: GOTO 0A7
00A6: BSF 06.1
00A7: BSF 03.5
00A8: BCF 06.1
.................... swap(n);
00A9: BCF 03.5
00AA: SWAPF 44,F
.................... lcd_send_nibble(n); // posli horni pulku bajtu
00AB: MOVF 44,W
00AC: MOVWF 45
00AD: CALL 08C
.................... swap(n);
00AE: SWAPF 44,F
.................... lcd_send_nibble(n); // posli spodni pulku bajtu
00AF: MOVF 44,W
00B0: MOVWF 45
00B1: CALL 08C
.................... delay_us(40); // minimalni doba na provedeni prikazu
00B2: MOVLW 0D
00B3: MOVWF 20
00B4: DECFSZ 20,F
00B5: GOTO 0B4
00B6: RETLW 00
.................... }
....................
....................
.................... // Provede inicializaci LCD displeje, smaze obsah a nastavi mod displeje
.................... //
.................... // Tato procedura se musi volat pred pouzitim ostatnich lcd_ procedur
.................... //
.................... void lcd_init()
.................... {
....................
.................... int i; // pocitadlo cyklu
....................
.................... delay_ms(20); // spozdeni pro provedeni startu displeje po zapnuti napajeni
00B7: MOVLW 14
00B8: MOVWF 3F
00B9: CALL 077
....................
.................... *LCD_TRIS = *LCD_TRIS & ~LCD_MASK; // nuluj odpovidajici bity tris registru datoveho portu LCD
00BA: MOVLW 0F
00BB: BSF 03.5
00BC: ANDWF 06,F
....................
.................... output_bit(LCD_RS,0); // nastav jako vystup a nastav klidovy stav
00BD: BCF 03.5
00BE: BCF 06.1
00BF: BSF 03.5
00C0: BCF 06.1
.................... output_bit(LCD_E,0); // nastav jako vystup a nastav klidovy stav
00C1: BCF 03.5
00C2: BCF 06.2
00C3: BSF 03.5
00C4: BCF 06.2
....................
.................... for (i=0; i<3; i++) // nastav lcd do rezimu 8 bitu sbernice
00C5: BCF 03.5
00C6: CLRF 36
00C7: MOVF 36,W
00C8: SUBLW 02
00C9: BTFSS 03.0
00CA: GOTO 0D3
.................... {
.................... delay_ms(2); // muze byt rozdelany prenos dat (2x 4 bity) nebo pomaly povel
00CB: MOVLW 02
00CC: MOVWF 3F
00CD: CALL 077
.................... lcd_send_nibble(3); // rezim 8 bitu
00CE: MOVLW 03
00CF: MOVWF 45
00D0: CALL 08C
.................... }
00D1: INCF 36,F
00D2: GOTO 0C7
....................
.................... delay_us(40); // cas na zpracovani
00D3: MOVLW 0D
00D4: MOVWF 20
00D5: DECFSZ 20,F
00D6: GOTO 0D5
.................... lcd_send_nibble(2); // nastav rezim 4 bitu (plati od nasledujiciho prenosu)
00D7: MOVLW 02
00D8: MOVWF 45
00D9: CALL 08C
.................... delay_us(40); // cas na zpracovani
00DA: MOVLW 0D
00DB: MOVWF 20
00DC: DECFSZ 20,F
00DD: GOTO 0DC
....................
.................... for (i=0;i<3;i++) // proved inicializaci (nastaveni modu, smazani apod)
00DE: CLRF 36
00DF: MOVF 36,W
00E0: SUBLW 02
00E1: BTFSS 03.0
00E2: GOTO 0EF
.................... {
.................... lcd_send_byte(0,LCD_INIT_STRING[i]);
00E3: MOVF 36,W
00E4: CALL 004
00E5: MOVWF 37
00E6: CLRF 43
00E7: MOVF 37,W
00E8: MOVWF 44
00E9: CALL 0A1
.................... delay_ms(2);
00EA: MOVLW 02
00EB: MOVWF 3F
00EC: CALL 077
.................... }
00ED: INCF 36,F
00EE: GOTO 0DF
00EF: BCF 0A.3
00F0: GOTO 602 (RETURN)
.................... }
....................
....................
.................... // Proved presun kurzoru
.................... //
.................... // Pozice 1.1 je domu
.................... //
.................... void lcd_gotoxy( BYTE x, BYTE y)
.................... {
....................
.................... BYTE Adr;
....................
.................... Adr=x-1;
*
0227: MOVLW 01
0228: SUBWF 3F,W
0229: MOVWF 41
.................... if(y==2)
022A: MOVF 40,W
022B: SUBLW 02
022C: BTFSS 03.2
022D: GOTO 230
.................... Adr+=LCD_LINE_2;
022E: MOVLW 40
022F: ADDWF 41,F
....................
.................... lcd_send_byte(0,0x80|Adr);
0230: MOVF 41,W
0231: IORLW 80
0232: MOVWF 42
0233: CLRF 43
0234: MOVF 42,W
0235: MOVWF 44
0236: CALL 0A1
0237: RETLW 00
.................... }
....................
....................
.................... // Zapis znaku na displej, zpracovani ridicich znaku
.................... //
.................... void lcd_putc( char c)
.................... {
....................
.................... switch (c)
0238: MOVF 3E,W
0239: MOVWF 20
023A: MOVLW 0C
023B: SUBWF 20,W
023C: BTFSC 03.2
023D: GOTO 24B
023E: MOVLW 0A
023F: SUBWF 20,W
0240: BTFSC 03.2
0241: GOTO 253
0242: MOVLW 0D
0243: SUBWF 20,W
0244: BTFSC 03.2
0245: GOTO 259
0246: MOVLW 08
0247: SUBWF 20,W
0248: BTFSC 03.2
0249: GOTO 25E
024A: GOTO 263
.................... {
.................... case '\f' : lcd_send_byte(0,1); // smaz displej
024B: CLRF 43
024C: MOVLW 01
024D: MOVWF 44
024E: CALL 0A1
.................... delay_ms(2);
024F: MOVLW 02
0250: MOVWF 3F
0251: CALL 077
.................... break;
0252: GOTO 26F
.................... case '\n' : lcd_gotoxy(1,2); break; // presun se na 1. znak 2. radky
0253: MOVLW 01
0254: MOVWF 3F
0255: MOVLW 02
0256: MOVWF 40
0257: CALL 227
0258: GOTO 26F
.................... case '\r' : lcd_gotoxy(1,1); break; // presun home
0259: MOVLW 01
025A: MOVWF 3F
025B: MOVWF 40
025C: CALL 227
025D: GOTO 26F
.................... case '\b' : lcd_send_byte(0,0x10); break; // posun kurzor o 1 zpet
025E: CLRF 43
025F: MOVLW 10
0260: MOVWF 44
0261: CALL 0A1
0262: GOTO 26F
.................... default : if (c<0x20) c&=0x7; // preklopeni definovatelnych znaku na rozsah 0 az 0x1F
0263: MOVF 3E,W
0264: SUBLW 1F
0265: BTFSS 03.0
0266: GOTO 269
0267: MOVLW 07
0268: ANDWF 3E,F
.................... lcd_send_byte(1,c); break; // zapis znak
0269: MOVLW 01
026A: MOVWF 43
026B: MOVF 3E,W
026C: MOVWF 44
026D: CALL 0A1
026E: GOTO 26F
.................... }
026F: RETLW 00
.................... }
....................
....................
.................... // Zapni kurzor
.................... //
.................... void lcd_cursor_on()
.................... {
.................... lcd_send_byte(0,LCD_CURSOR_ON_);
.................... }
....................
....................
.................... // Vypni kurzor
.................... //
.................... void lcd_cursor_off()
.................... {
.................... lcd_send_byte(0,LCD_CURSOR_OFF_);
.................... }
....................
....................
.................... // Definice vlastnich fontu
.................... //
.................... // Vlastnich definic muze byt jen 8 do pozic 0 az 7 pameti CGRAM radice lcd displeje
.................... // Pro snadne definovani jsou pripraveny nasledujici definice a na konci souboru je uveden
.................... // priklad pouziti definovanych znaku.
....................
....................
.................... // Pomocna procedura pro posilani ridicich dat do radice displeje
.................... //
.................... void lcd_putc2(int Data)
.................... {
.................... lcd_send_byte(1,Data);
.................... }
....................
....................
.................... // Pomocne definice pro programovani obsahu CGRAM
.................... //
.................... #DEFINE lcd_define_start(Code) lcd_send_byte(0,0x40+(Code<<3)); delay_ms(2)
.................... #DEFINE lcd_define_def(String) printf(lcd_putc2,String);
.................... #DEFINE lcd_define_end() lcd_send_byte(0,3); delay_ms(2)
....................
....................
.................... // Vlastni vykonne makro pro definovani fontu do pozice Index CGRAM s definicnim retezcem Def
.................... //
.................... #DEFINE lcd_define_char(Index, Def) lcd_define_start(Index); lcd_define_def(Def); lcd_define_end();
....................
....................
.................... // Pripravene definice fontu vybranych znaku
.................... // V tabulce nesmi byt 00 (konec retezce v printf()), misto toho davame 80
.................... //
.................... #DEFINE LCD_CHAR_BAT100 "\x0E\x1F\x1F\x1F\x1F\x1F\x1F\x1F" /* symbol plne baterie */
.................... #DEFINE LCD_CHAR_BAT50 "\x0E\x1F\x11\x11\x13\x17\x1F\x1F" /* symbol polovicni baterie */
.................... #DEFINE LCD_CHAR_BAT0 "\x0E\x1F\x11\x11\x11\x11\x11\x1F" /* symbol vybite baterie */
.................... #DEFINE LCD_CHAR_LUA "\x04\x0E\x11\x11\x1F\x11\x11\x80" /* A s carkou */
.................... #DEFINE LCD_CHAR_LLA "\x01\x02\x0E\x01\x1F\x11\x0F\x80" /* a s carkou */
.................... #DEFINE LCD_CHAR_HUC "\x0A\x0E\x11\x10\x10\x11\x0E\x80" /* C s hackem */
.................... #DEFINE LCD_CHAR_HLC "\x0A\x04\x0E\x10\x10\x11\x0E\x80" /* c s hackem */
.................... #DEFINE LCD_CHAR_HUD "\x0A\x1C\x12\x11\x11\x12\x1C\x80" /* D s hackem */
.................... #DEFINE LCD_CHAR_HLD "\x05\x03\x0D\x13\x11\x11\x0F\x80" /* d s hackem */
.................... #DEFINE LCD_CHAR_LUE "\x04\x1F\x10\x10\x1E\x10\x1F\x80" /* E s carkou */
.................... #DEFINE LCD_CHAR_LLE "\x01\x02\x0E\x11\x1F\x10\x0E\x80" /* e s carkou */
.................... #DEFINE LCD_CHAR_HUE "\x0A\x1F\x10\x1E\x10\x10\x1F\x80" /* E s hackem */
.................... #DEFINE LCD_CHAR_HLE "\x0A\x04\x0E\x11\x1F\x10\x0E\x80" /* e s hackem */
.................... #DEFINE LCD_CHAR_LUI "\x04\x0E\x04\x04\x04\x04\x0E\x80" /* I s carkou */
.................... #DEFINE LCD_CHAR_LLI "\x02\x04\x80\x0C\x04\x04\x0E\x80" /* i s carkou */
.................... #DEFINE LCD_CHAR_HUN "\x0A\x15\x11\x19\x15\x13\x11\x80" /* N s hackem */
.................... #DEFINE LCD_CHAR_HLN "\x0A\x04\x16\x19\x11\x11\x11\x80" /* n s hackem */
.................... #DEFINE LCD_CHAR_LUO "\x04\x0E\x11\x11\x11\x11\x0E\x80" /* O s carkou */
.................... #DEFINE LCD_CHAR_LLO "\x02\x04\x0E\x11\x11\x11\x0E\x80" /* o s carkou */
.................... #DEFINE LCD_CHAR_HUR "\x0A\x1E\x11\x1E\x14\x12\x11\x80" /* R s hackem */
.................... #DEFINE LCD_CHAR_HLR "\x0A\x04\x16\x19\x10\x10\x10\x80" /* r s hackem */
.................... #DEFINE LCD_CHAR_HUS "\x0A\x0F\x10\x0E\x01\x01\x1E\x80" /* S s hackem */
.................... #DEFINE LCD_CHAR_HLS "\x0A\x04\x0E\x10\x0E\x01\x1E\x80" /* s s hackem */
.................... #DEFINE LCD_CHAR_HUT "\x0A\x1F\x04\x04\x04\x04\x04\x80" /* T s hackem */
.................... #DEFINE LCD_CHAR_HLT "\x0A\x0C\x1C\x08\x08\x09\x06\x80" /* t s hackem */
.................... #DEFINE LCD_CHAR_LUU "\x02\x15\x11\x11\x11\x11\x0E\x80" /* U s carkou */
.................... #DEFINE LCD_CHAR_LLU "\x02\x04\x11\x11\x11\x13\x0D\x80" /* u s carkou */
.................... #DEFINE LCD_CHAR_CUU "\x06\x17\x11\x11\x11\x11\x0E\x80" /* U s krouzkem */
.................... #DEFINE LCD_CHAR_CLU "\x06\x06\x11\x11\x11\x11\x0E\x80" /* u s krouzkem */
.................... #DEFINE LCD_CHAR_LUY "\x02\x15\x11\x0A\x04\x04\x04\x80" /* Y s carkou */
.................... #DEFINE LCD_CHAR_LLY "\x02\x04\x11\x11\x0F\x01\x0E\x80" /* y s carkou */
.................... #DEFINE LCD_CHAR_HUZ "\x0A\x1F\x01\x02\x04\x08\x1F\x80" /* Z s hackem */
.................... #DEFINE LCD_CHAR_HLZ "\x0A\x04\x1F\x02\x04\x08\x1F\x80" /* z s hackem */
....................
....................
.................... // Priklad pouziti definovanych znaku
.................... //
.................... //
.................... //void lcd_sample()
.................... //{
.................... // lcd_define_char(0,LCD_CHAR_BAT50); // Priklad definice znaku baterie do pozice 0
.................... // lcd_define_char(2,LCD_CHAR_HLE LCD_CHAR_LUI); // Priklad definice znaku e s hackem a I s carkou od pozice 2
.................... // // vsimnete si, ze neni carka mezi retezci s definici (oba retezce definuji
.................... // // jediny definicni retezec)
.................... // printf(lcd_putc,"\fZnaky:\20\22\23"); // priklad vypisu znaku z pozice 0, 2 a 3
.................... // delay_ms(1000);
.................... // lcd_define_char(0,LCD_CHAR_BAT0); // Predefinovani tvaru znaku v pozici 0
.................... // delay_ms(1000);
.................... //}
....................
.................... #INCLUDE "lcd2.c"
.................... #define LCD_SC 0b0000011000 // posun displeje doleva
.................... #define RIGHT 1
.................... #define LEFT 0
....................
.................... void lcd_sh(int1 lr)
.................... {
.................... if (lr) lcd_send_byte(0,LCD_SC | 0x100); else lcd_send_byte(0,LCD_SC);
.................... }
....................
.................... //Klavesnice
.................... #DEFINE PL PIN_B3 // ovladani klavesnice
.................... #DEFINE STROBE_LED PIN_C0
.................... #DEFINE STROBE_KL PIN_C1
.................... #DEFINE DATA_OUT PIN_C2
.................... #DEFINE CP PIN_C3
.................... #DEFINE DATA_IN PIN_C4
.................... #INCLUDE "keybord.c"
.................... //#DEFINE PL PIN_B3 // ovladani klavesnice
.................... //#DEFINE STROBE_LED PIN_C0
.................... //#DEFINE STROBE_KL PIN_C1
.................... //#DEFINE DATA_OUT PIN_C2
.................... //#DEFINE CP PIN_C3
.................... //#DEFINE DATA_IN PIN_C4
....................
.................... #DEFINE znak_0 14
.................... #DEFINE znak_1 10
.................... #DEFINE znak_2 11
.................... #DEFINE znak_3 12
.................... #DEFINE znak_4 20
.................... #DEFINE znak_5 21
.................... #DEFINE znak_6 22
.................... #DEFINE znak_7 04
.................... #DEFINE znak_8 05
.................... #DEFINE znak_9 06
.................... #DEFINE znak_R 15
.................... #DEFINE znak_F 16
.................... #DEFINE znak_C 27
.................... #DEFINE nic 80
....................
....................
.................... void KL_init()
.................... {
.................... int8 i;
.................... output_high(STROBE_KL);
*
00F1: BCF 25.1
00F2: MOVF 25,W
00F3: BSF 03.5
00F4: MOVWF 07
00F5: BCF 03.5
00F6: BSF 07.1
.................... output_high(STROBE_LED);
00F7: BCF 25.0
00F8: MOVF 25,W
00F9: BSF 03.5
00FA: MOVWF 07
00FB: BCF 03.5
00FC: BSF 07.0
....................
.................... for (i=0;i<=7;i++)
00FD: CLRF 36
00FE: MOVF 36,W
00FF: SUBLW 07
0100: BTFSS 03.0
0101: GOTO 116
.................... {
.................... output_low(DATA_IN);
0102: BCF 25.4
0103: MOVF 25,W
0104: BSF 03.5
0105: MOVWF 07
0106: BCF 03.5
0107: BCF 07.4
.................... output_high(CP);
0108: BCF 25.3
0109: MOVF 25,W
010A: BSF 03.5
010B: MOVWF 07
010C: BCF 03.5
010D: BSF 07.3
.................... output_low(CP);
010E: BCF 25.3
010F: MOVF 25,W
0110: BSF 03.5
0111: MOVWF 07
0112: BCF 03.5
0113: BCF 07.3
.................... }
0114: INCF 36,F
0115: GOTO 0FE
.................... output_low(STROBE_KL);
0116: BCF 25.1
0117: MOVF 25,W
0118: BSF 03.5
0119: MOVWF 07
011A: BCF 03.5
011B: BCF 07.1
.................... output_low(STROBE_LED);
011C: BCF 25.0
011D: MOVF 25,W
011E: BSF 03.5
011F: MOVWF 07
0120: BCF 03.5
0121: BCF 07.0
.................... output_high(CP);
0122: BCF 25.3
0123: MOVF 25,W
0124: BSF 03.5
0125: MOVWF 07
0126: BCF 03.5
0127: BSF 07.3
.................... output_high(PL);
0128: BSF 03.5
0129: BCF 06.3
012A: BCF 03.5
012B: BSF 06.3
012C: BCF 0A.3
012D: GOTO 603 (RETURN)
.................... }
....................
.................... void KL_CP(j)
.................... {
.................... int8 i;
.................... for (i=0;i<=j;i++)
.................... {
.................... output_high(CP);
.................... output_low(CP);
.................... }
.................... }
....................
.................... void LED(int8 LED) //rosviti LED 1-7
.................... {
.................... int i;
.................... output_low(CP);
*
01E7: BCF 25.3
01E8: MOVF 25,W
01E9: BSF 03.5
01EA: MOVWF 07
01EB: BCF 03.5
01EC: BCF 07.3
.................... output_low(STROBE_LED);
01ED: BCF 25.0
01EE: MOVF 25,W
01EF: BSF 03.5
01F0: MOVWF 07
01F1: BCF 03.5
01F2: BCF 07.0
.................... for (i=0;i<=7;i++)
01F3: CLRF 3C
01F4: MOVF 3C,W
01F5: SUBLW 07
01F6: BTFSS 03.0
01F7: GOTO 21A
.................... {
.................... output_bit(DATA_IN,bit_test(LED,i));
01F8: MOVF 3B,W
01F9: MOVWF 20
01FA: MOVF 3C,W
01FB: MOVWF 21
01FC: BTFSC 03.2
01FD: GOTO 202
01FE: BCF 03.0
01FF: RRF 20,F
0200: DECFSZ 21,F
0201: GOTO 1FE
0202: BTFSC 20.0
0203: GOTO 206
0204: BCF 07.4
0205: GOTO 207
0206: BSF 07.4
0207: BCF 25.4
0208: MOVF 25,W
0209: BSF 03.5
020A: MOVWF 07
.................... output_high(CP);
020B: BCF 03.5
020C: BCF 25.3
020D: MOVF 25,W
020E: BSF 03.5
020F: MOVWF 07
0210: BCF 03.5
0211: BSF 07.3
.................... output_low(CP);
0212: BCF 25.3
0213: MOVF 25,W
0214: BSF 03.5
0215: MOVWF 07
0216: BCF 03.5
0217: BCF 07.3
.................... };
0218: INCF 3C,F
0219: GOTO 1F4
.................... output_high(STROBE_LED);
021A: BCF 25.0
021B: MOVF 25,W
021C: BSF 03.5
021D: MOVWF 07
021E: BCF 03.5
021F: BSF 07.0
.................... output_low(STROBE_LED);
0220: BCF 25.0
0221: MOVF 25,W
0222: BSF 03.5
0223: MOVWF 07
0224: BCF 03.5
0225: BCF 07.0
0226: RETLW 00
.................... }
....................
.................... int8 klavesa() //vrati cislo klavesy
.................... {
.................... int8 i;
.................... int8 sloupec;
....................
.................... for(sloupec=0; sloupec<=7; sloupec++)
*
012E: CLRF 3E
012F: MOVF 3E,W
0130: SUBLW 07
0131: BTFSS 03.0
0132: GOTO 1E4
.................... {
.................... output_low(STROBE_KL);
0133: BCF 25.1
0134: MOVF 25,W
0135: BSF 03.5
0136: MOVWF 07
0137: BCF 03.5
0138: BCF 07.1
.................... output_low(DATA_IN);
0139: BCF 25.4
013A: MOVF 25,W
013B: BSF 03.5
013C: MOVWF 07
013D: BCF 03.5
013E: BCF 07.4
.................... for (i=0;i<=7;i++)
013F: CLRF 3D
0140: MOVF 3D,W
0141: SUBLW 07
0142: BTFSS 03.0
0143: GOTO 152
.................... { //nulovani sloupcu
.................... output_high(CP);
0144: BCF 25.3
0145: MOVF 25,W
0146: BSF 03.5
0147: MOVWF 07
0148: BCF 03.5
0149: BSF 07.3
.................... output_low(CP);
014A: BCF 25.3
014B: MOVF 25,W
014C: BSF 03.5
014D: MOVWF 07
014E: BCF 03.5
014F: BCF 07.3
.................... }
0150: INCF 3D,F
0151: GOTO 140
....................
.................... output_high(DATA_IN);
0152: BCF 25.4
0153: MOVF 25,W
0154: BSF 03.5
0155: MOVWF 07
0156: BCF 03.5
0157: BSF 07.4
.................... output_high(CP); //zavedeni 1 do registru sloupcu
0158: BCF 25.3
0159: MOVF 25,W
015A: BSF 03.5
015B: MOVWF 07
015C: BCF 03.5
015D: BSF 07.3
.................... output_low(CP);
015E: BCF 25.3
015F: MOVF 25,W
0160: BSF 03.5
0161: MOVWF 07
0162: BCF 03.5
0163: BCF 07.3
....................
.................... output_low(DATA_IN);
0164: BCF 25.4
0165: MOVF 25,W
0166: BSF 03.5
0167: MOVWF 07
0168: BCF 03.5
0169: BCF 07.4
.................... for (i=0;i<sloupec;i++) //nastaveni sloupce
016A: CLRF 3D
016B: MOVF 3E,W
016C: SUBWF 3D,W
016D: BTFSC 03.0
016E: GOTO 17D
.................... {
.................... output_high(CP);
016F: BCF 25.3
0170: MOVF 25,W
0171: BSF 03.5
0172: MOVWF 07
0173: BCF 03.5
0174: BSF 07.3
.................... output_low(CP);
0175: BCF 25.3
0176: MOVF 25,W
0177: BSF 03.5
0178: MOVWF 07
0179: BCF 03.5
017A: BCF 07.3
.................... }
017B: INCF 3D,F
017C: GOTO 16B
....................
.................... output_high(STROBE_KL);
017D: BCF 25.1
017E: MOVF 25,W
017F: BSF 03.5
0180: MOVWF 07
0181: BCF 03.5
0182: BSF 07.1
.................... output_low(PL);
0183: BSF 03.5
0184: BCF 06.3
0185: BCF 03.5
0186: BCF 06.3
.................... output_high(PL);
0187: BSF 03.5
0188: BCF 06.3
0189: BCF 03.5
018A: BSF 06.3
....................
.................... for (i=0;i<5;i++) //posunuti cteciho registru
018B: CLRF 3D
018C: MOVF 3D,W
018D: SUBLW 04
018E: BTFSS 03.0
018F: GOTO 19E
.................... {
.................... output_high(CP);
0190: BCF 25.3
0191: MOVF 25,W
0192: BSF 03.5
0193: MOVWF 07
0194: BCF 03.5
0195: BSF 07.3
.................... output_low(CP);
0196: BCF 25.3
0197: MOVF 25,W
0198: BSF 03.5
0199: MOVWF 07
019A: BCF 03.5
019B: BCF 07.3
.................... }
019C: INCF 3D,F
019D: GOTO 18C
....................
.................... /* if (1==input(DATA_OUT)) return(sloupec); // pokud je 4. radek
.................... output_high(CP);
.................... output_low(CP);
.................... if (1==input(DATA_OUT)) return(sloupec); // pokud je 3. radek
.................... output_high(CP);
.................... output_low(CP);*/
.................... if (1==input(DATA_OUT)) return(sloupec); // pokud je 0. radek
019E: BSF 25.2
019F: MOVF 25,W
01A0: BSF 03.5
01A1: MOVWF 07
01A2: MOVLW 00
01A3: BCF 03.5
01A4: BTFSC 07.2
01A5: MOVLW 01
01A6: SUBLW 01
01A7: BTFSS 03.2
01A8: GOTO 1AC
01A9: MOVF 3E,W
01AA: MOVWF 21
01AB: GOTO 1E6
.................... output_high(CP);
01AC: BCF 25.3
01AD: MOVF 25,W
01AE: BSF 03.5
01AF: MOVWF 07
01B0: BCF 03.5
01B1: BSF 07.3
.................... output_low(CP);
01B2: BCF 25.3
01B3: MOVF 25,W
01B4: BSF 03.5
01B5: MOVWF 07
01B6: BCF 03.5
01B7: BCF 07.3
.................... if (1==input(DATA_OUT)) return(0b1000 | sloupec); // pokud je 1. radek
01B8: BSF 25.2
01B9: MOVF 25,W
01BA: BSF 03.5
01BB: MOVWF 07
01BC: MOVLW 00
01BD: BCF 03.5
01BE: BTFSC 07.2
01BF: MOVLW 01
01C0: SUBLW 01
01C1: BTFSS 03.2
01C2: GOTO 1C7
01C3: MOVF 3E,W
01C4: IORLW 08
01C5: MOVWF 21
01C6: GOTO 1E6
.................... output_high(CP);
01C7: BCF 25.3
01C8: MOVF 25,W
01C9: BSF 03.5
01CA: MOVWF 07
01CB: BCF 03.5
01CC: BSF 07.3
.................... output_low(CP);
01CD: BCF 25.3
01CE: MOVF 25,W
01CF: BSF 03.5
01D0: MOVWF 07
01D1: BCF 03.5
01D2: BCF 07.3
.................... if (1==input(DATA_OUT)) return(0b10000 | sloupec); // pokud je 2. radek
01D3: BSF 25.2
01D4: MOVF 25,W
01D5: BSF 03.5
01D6: MOVWF 07
01D7: MOVLW 00
01D8: BCF 03.5
01D9: BTFSC 07.2
01DA: MOVLW 01
01DB: SUBLW 01
01DC: BTFSS 03.2
01DD: GOTO 1E2
01DE: MOVF 3E,W
01DF: IORLW 10
01E0: MOVWF 21
01E1: GOTO 1E6
....................
....................
.................... }
01E2: INCF 3E,F
01E3: GOTO 12F
.................... return(0x80); // nastavy nejvissi bit, ze neni nic zmacknuto
01E4: MOVLW 80
01E5: MOVWF 21
01E6: RETLW 00
.................... }
....................
.................... boolean read_KL(char *klv)
.................... {
.................... const char prev_tabulka[24]={'i','z','m','u','7','8','9','.','1','2','3','b','0','r','f','k','4','5','6','s',' ',' ','t','c'};
....................
.................... *klv = klavesa();
.................... if (0x80==*klv) return(false);
.................... else
.................... {
.................... *klv = prev_tabulka[*klv];
.................... return(true);
.................... }
.................... }
....................
....................
.................... //Vysilac
.................... #DEFINE VYSILAC PIN_C5
.................... #INCLUDE "vysilac.c"
.................... // Odesle nulu nebo jednicku podle nejnizsiho bitu predanych dat
.................... // Nula je posloupnost LH a jednicka je HL
.................... void odeslat_bit(int bit)
.................... {
.................... output_bit(VYSILAC,bit);
*
02C9: MOVF 3E,F
02CA: BTFSS 03.2
02CB: GOTO 2CE
02CC: BCF 07.5
02CD: GOTO 2CF
02CE: BSF 07.5
02CF: BCF 25.5
02D0: MOVF 25,W
02D1: BSF 03.5
02D2: MOVWF 07
.................... delay_us(IMPULS);
02D3: MOVLW 53
02D4: BCF 03.5
02D5: MOVWF 20
02D6: DECFSZ 20,F
02D7: GOTO 2D6
.................... output_bit(VYSILAC,!bit);
02D8: MOVF 3E,F
02D9: BTFSC 03.2
02DA: GOTO 2DD
02DB: BCF 07.5
02DC: GOTO 2DE
02DD: BSF 07.5
02DE: BCF 25.5
02DF: MOVF 25,W
02E0: BSF 03.5
02E1: MOVWF 07
.................... delay_us(IMPULS);
02E2: MOVLW 53
02E3: BCF 03.5
02E4: MOVWF 20
02E5: DECFSZ 20,F
02E6: GOTO 2E5
02E7: RETLW 00
.................... }
....................
.................... // odesle datovy ramec
.................... void odeslat_paket(int8 kanal,int8 data)
.................... {
.................... int i;
.................... int8 suma;
....................
....................
.................... data &= 0x1F; // pro jistotu orizneme data, kdyby nekdo chtel prenaset vic poloh
02E8: MOVLW 1F
02E9: ANDWF 3A,F
.................... data |= kanal << 5; // slozi osu a hodnotu do packetu
02EA: SWAPF 39,W
02EB: MOVWF 20
02EC: RLF 20,F
02ED: MOVLW E0
02EE: ANDWF 20,F
02EF: MOVF 20,W
02F0: IORWF 3A,F
....................
.................... swap(data); // vypocet kontrolniho souctu
02F1: SWAPF 3A,F
.................... suma = data & 0xF;
02F2: MOVF 3A,W
02F3: ANDLW 0F
02F4: MOVWF 3C
.................... swap(data);
02F5: SWAPF 3A,F
.................... suma += data & 0xF;
02F6: MOVF 3A,W
02F7: ANDLW 0F
02F8: ADDWF 3C,F
.................... suma++;
02F9: INCF 3C,F
....................
.................... odeslat_bit(0); // start bit
02FA: CLRF 3E
02FB: CALL 2C9
....................
.................... for (i=8; i>0; i--) // data
02FC: MOVLW 08
02FD: MOVWF 3B
02FE: MOVF 3B,F
02FF: BTFSC 03.2
0300: GOTO 30B
.................... {
.................... odeslat_bit(bit_test(data,7));
0301: MOVLW 00
0302: BTFSC 3A.7
0303: MOVLW 01
0304: MOVWF 3D
0305: MOVWF 3E
0306: CALL 2C9
.................... data <<= 1;
0307: BCF 03.0
0308: RLF 3A,F
.................... }
0309: DECF 3B,F
030A: GOTO 2FE
....................
.................... for (i=4; i>0; i--) // checksum
030B: MOVLW 04
030C: MOVWF 3B
030D: MOVF 3B,F
030E: BTFSC 03.2
030F: GOTO 31A
.................... {
.................... odeslat_bit(bit_test(suma,3));
0310: MOVLW 00
0311: BTFSC 3C.3
0312: MOVLW 01
0313: MOVWF 3D
0314: MOVWF 3E
0315: CALL 2C9
.................... suma <<= 1;
0316: BCF 03.0
0317: RLF 3C,F
.................... }
0318: DECF 3B,F
0319: GOTO 30D
.................... output_high(VYSILAC);
031A: BCF 25.5
031B: MOVF 25,W
031C: BSF 03.5
031D: MOVWF 07
031E: BCF 03.5
031F: BSF 07.5
0320: RETLW 00
....................
.................... }
....................
....................
.................... //Joistick
.................... #DEFINE EEleve_x 0
.................... #DEFINE EEprave_x 1 //adresovani EEPROM
.................... #DEFINE EEhorni_y 2
.................... #DEFINE EEdolni_y 3
....................
.................... #DEFINE EEmin_x 4
.................... #DEFINE EEmax_x 5
.................... #DEFINE EEmin_y 6
.................... #DEFINE EEmax_y 7
.................... #DEFINE EEstred_x 8
.................... #DEFINE EEstred_y 9
....................
.................... #DEFINE AD_OSA_X 1 // adresa A/D prevodniku pro osu X
.................... #DEFINE AD_OSA_Y 0 // adresa A/D prevodniku pro osu Y
.................... #DEFINE TL1 PIN_C6
.................... #DEFINE TL2 PIN_C7
.................... #INCLUDE "Joystick.c"
.................... //#DEFINE AD_OSA_X 0 // adresa A/D prevodniku pro osu X
.................... //#DEFINE AD_OSA_Y 1 // adresa A/D prevodniku pro osu Y
.................... //#DEFINE TL1 PIN_A2 // tlacitka
.................... //#DEFINE TL2 PIN_A4
....................
.................... //#DEFINE EEleve_x 0
.................... //#DEFINE EEprave_x 1 //adresovani EEPROM
.................... //#DEFINE EEhorni_y 2
.................... //#DEFINE EEdolni_y 3
....................
.................... //#DEFINE EEmin_x 4 // ulozeni hodnot (adresy)
.................... //#DEFINE EEmax_x 5
.................... //#DEFINE EEmin_y 6
.................... //#DEFINE EEmax_y 7
.................... //#DEFINE EEstred_x 8
.................... //#DEFINE EEstred_y 9
....................
....................
.................... unsigned int min_x;
.................... unsigned int max_x;
.................... unsigned int min_y;
.................... unsigned int max_y;
.................... unsigned int stred_x;
.................... unsigned int stred_y;
.................... unsigned int leve_x;
.................... unsigned int prave_x;
.................... unsigned int horni_y;
.................... unsigned int dolni_y;
....................
....................
.................... /*#DEFINE TEXT0 "Joy set to cent"
.................... #DEFINE TEXT1 "er and press OK"
.................... #DEFINE TEXT2 "Joy move in some "
.................... #DEFINE TEXT3 "full circle"
.................... #DEFINE TEXT4 "Calib. complete"*/
....................
.................... #DEFINE TEXT0 " Dejte paku do "
.................... #DEFINE TEXT1 "prostred"
.................... #DEFINE TEXT2 "Udelajte par"
.................... #DEFINE TEXT3 "kruhu"
.................... #DEFINE TEXT4 "hotovo"
....................
....................
.................... void Joystick (int *ted_x, int *ted_y, int8 *ted_tl1, int8 *ted_tl2)
.................... {
.................... set_adc_channel(AD_OSA_X);
*
0270: MOVLW 08
0271: MOVWF 21
0272: MOVF 1F,W
0273: ANDLW C7
0274: IORWF 21,W
0275: MOVWF 1F
.................... delay_us(10);
0276: MOVLW 03
0277: MOVWF 20
0278: DECFSZ 20,F
0279: GOTO 278
.................... *ted_x=read_adc();
027A: MOVF 3D,W
027B: MOVWF 04
027C: BSF 1F.2
027D: BTFSC 1F.2
027E: GOTO 27D
027F: MOVF 1E,W
0280: MOVWF 00
.................... set_adc_channel(AD_OSA_Y);
0281: MOVLW 00
0282: MOVWF 21
0283: MOVF 1F,W
0284: ANDLW C7
0285: IORWF 21,W
0286: MOVWF 1F
.................... delay_us(10);
0287: MOVLW 03
0288: MOVWF 20
0289: DECFSZ 20,F
028A: GOTO 289
.................... *ted_y=read_adc();
028B: MOVF 3E,W
028C: MOVWF 04
028D: BSF 1F.2
028E: BTFSC 1F.2
028F: GOTO 28E
0290: MOVF 1E,W
0291: MOVWF 00
....................
....................
.................... if (!input(TL1))
0292: BSF 25.6
0293: MOVF 25,W
0294: BSF 03.5
0295: MOVWF 07
0296: BCF 03.5
0297: BTFSC 07.6
0298: GOTO 2AA
.................... {
.................... delay_us(500);
0299: MOVLW A6
029A: MOVWF 20
029B: DECFSZ 20,F
029C: GOTO 29B
029D: NOP
.................... if (!input(TL1)) *ted_tl1=True;
029E: BSF 25.6
029F: MOVF 25,W
02A0: BSF 03.5
02A1: MOVWF 07
02A2: BCF 03.5
02A3: BTFSC 07.6
02A4: GOTO 2A9
02A5: MOVF 3F,W
02A6: MOVWF 04
02A7: MOVLW 01
02A8: MOVWF 00
.................... }
.................... else *ted_TL1=False;
02A9: GOTO 2AD
02AA: MOVF 3F,W
02AB: MOVWF 04
02AC: CLRF 00
....................
.................... if (!input(TL2))
02AD: BSF 25.7
02AE: MOVF 25,W
02AF: BSF 03.5
02B0: MOVWF 07
02B1: BCF 03.5
02B2: BTFSC 07.7
02B3: GOTO 2C5
.................... {
.................... delay_us(500);
02B4: MOVLW A6
02B5: MOVWF 20
02B6: DECFSZ 20,F
02B7: GOTO 2B6
02B8: NOP
.................... if (!input(TL2)) *ted_tl2=True;
02B9: BSF 25.7
02BA: MOVF 25,W
02BB: BSF 03.5
02BC: MOVWF 07
02BD: BCF 03.5
02BE: BTFSC 07.7
02BF: GOTO 2C4
02C0: MOVF 40,W
02C1: MOVWF 04
02C2: MOVLW 01
02C3: MOVWF 00
.................... }
.................... else *ted_tl2=False;
02C4: GOTO 2C8
02C5: MOVF 40,W
02C6: MOVWF 04
02C7: CLRF 00
02C8: RETLW 00
.................... }
....................
....................
....................
.................... void kalibrace()
.................... {
....................
.................... int x,y;
.................... int8 tlac1,tlac2;
....................
.................... min_x = max_x = min_y = max_y = stred_x = stred_y = 128;
*
0367: MOVLW 80
0368: MOVWF 2B
0369: MOVWF 2A
036A: MOVWF 29
036B: MOVWF 28
036C: MOVWF 27
036D: MOVWF 26
....................
.................... // ROZSACH JOYSTIKU
.................... printf(lcd_putc,"\f");
036E: MOVLW 0C
036F: MOVWF 3E
0370: CALL 238
.................... printf(lcd_putc,TEXT2);
*
000C: BCF 0A.0
000D: BCF 0A.1
000E: BCF 0A.2
000F: ADDWF 02,F
0010: RETLW 55
0011: RETLW 64
0012: RETLW 65
0013: RETLW 6C
0014: RETLW 61
0015: RETLW 6A
0016: RETLW 74
0017: RETLW 65
0018: RETLW 20
0019: RETLW 70
001A: RETLW 61
001B: RETLW 72
001C: RETLW 00
*
0371: CLRF 3D
0372: MOVF 3D,W
0373: CALL 00C
0374: INCF 3D,F
0375: MOVWF 3E
0376: CALL 238
0377: MOVLW 0C
0378: SUBWF 3D,W
0379: BTFSS 03.2
037A: GOTO 372
.................... lcd_gotoxy(1,2);
037B: MOVLW 01
037C: MOVWF 3F
037D: MOVLW 02
037E: MOVWF 40
037F: CALL 227
.................... printf(lcd_putc,TEXT3);
*
001D: BCF 0A.0
001E: BCF 0A.1
001F: BCF 0A.2
0020: ADDWF 02,F
0021: RETLW 6B
0022: RETLW 72
0023: RETLW 75
0024: RETLW 68
0025: RETLW 75
0026: RETLW 00
*
0380: CLRF 3D
0381: MOVF 3D,W
0382: CALL 01D
0383: INCF 3D,F
0384: MOVWF 3E
0385: CALL 238
0386: MOVLW 05
0387: SUBWF 3D,W
0388: BTFSS 03.2
0389: GOTO 381
....................
.................... while(input(TL1))
038A: BSF 25.6
038B: MOVF 25,W
038C: BSF 03.5
038D: MOVWF 07
038E: BCF 03.5
038F: BTFSS 07.6
0390: GOTO 3B9
.................... {
.................... if (0x17 == klavesa()) return; // escape
0391: CALL 12E
0392: MOVF 21,W
0393: SUBLW 17
0394: BTFSS 03.2
0395: GOTO 397
0396: GOTO 4BD
....................
.................... Joystick(&x,&y,&tlac1,&tlac2);
0397: MOVLW 39
0398: MOVWF 3D
0399: MOVLW 3A
039A: MOVWF 3E
039B: MOVLW 3B
039C: MOVWF 3F
039D: MOVLW 3C
039E: MOVWF 40
039F: CALL 270
....................
.................... if (max_x < x )max_x=x;
03A0: MOVF 39,W
03A1: SUBWF 27,W
03A2: BTFSC 03.0
03A3: GOTO 3A6
03A4: MOVF 39,W
03A5: MOVWF 27
.................... if (min_x > x )min_x=x;
03A6: MOVF 26,W
03A7: SUBWF 39,W
03A8: BTFSC 03.0
03A9: GOTO 3AC
03AA: MOVF 39,W
03AB: MOVWF 26
.................... if (max_y < y )max_y=y; //zjisteni meznich hodnot
03AC: MOVF 3A,W
03AD: SUBWF 29,W
03AE: BTFSC 03.0
03AF: GOTO 3B2
03B0: MOVF 3A,W
03B1: MOVWF 29
.................... if (min_y > y )min_y=y;
03B2: MOVF 28,W
03B3: SUBWF 3A,W
03B4: BTFSC 03.0
03B5: GOTO 3B8
03B6: MOVF 3A,W
03B7: MOVWF 28
.................... };
03B8: GOTO 38A
....................
.................... Delay_ms(500);
03B9: MOVLW 02
03BA: MOVWF 3D
03BB: MOVLW FA
03BC: MOVWF 3F
03BD: CALL 077
03BE: DECFSZ 3D,F
03BF: GOTO 3BB
.................... printf(lcd_putc,"\f");
03C0: MOVLW 0C
03C1: MOVWF 3E
03C2: CALL 238
.................... printf(lcd_putc,TEXT0);
*
0027: BCF 0A.0
0028: BCF 0A.1
0029: BCF 0A.2
002A: ADDWF 02,F
002B: RETLW 20
002C: RETLW 44
002D: RETLW 65
002E: RETLW 6A
002F: RETLW 74
0030: RETLW 65
0031: RETLW 20
0032: RETLW 70
0033: RETLW 61
0034: RETLW 6B
0035: RETLW 75
0036: RETLW 20
0037: RETLW 64
0038: RETLW 6F
0039: RETLW 20
003A: RETLW 00
*
03C3: CLRF 3D
03C4: MOVF 3D,W
03C5: CALL 027
03C6: INCF 3D,F
03C7: MOVWF 3E
03C8: CALL 238
03C9: MOVLW 0F
03CA: SUBWF 3D,W
03CB: BTFSS 03.2
03CC: GOTO 3C4
.................... lcd_gotoxy(1,2);
03CD: MOVLW 01
03CE: MOVWF 3F
03CF: MOVLW 02
03D0: MOVWF 40
03D1: CALL 227
.................... printf(lcd_putc,TEXT1);
*
003B: BCF 0A.0
003C: BCF 0A.1
003D: BCF 0A.2
003E: ADDWF 02,F
003F: RETLW 70
0040: RETLW 72
0041: RETLW 6F
0042: RETLW 73
0043: RETLW 74
0044: RETLW 72
0045: RETLW 65
0046: RETLW 64
0047: RETLW 00
*
03D2: CLRF 3D
03D3: MOVF 3D,W
03D4: CALL 03B
03D5: INCF 3D,F
03D6: MOVWF 3E
03D7: CALL 238
03D8: MOVLW 08
03D9: SUBWF 3D,W
03DA: BTFSS 03.2
03DB: GOTO 3D3
....................
.................... while(input(TL1))
03DC: BSF 25.6
03DD: MOVF 25,W
03DE: BSF 03.5
03DF: MOVWF 07
03E0: BCF 03.5
03E1: BTFSS 07.6
03E2: GOTO 3ED
.................... joystick(&stred_x,&stred_y,&tlac1,&tlac2); //nastaveni stredu
03E3: MOVLW 2A
03E4: MOVWF 3D
03E5: MOVLW 2B
03E6: MOVWF 3E
03E7: MOVLW 3B
03E8: MOVWF 3F
03E9: MOVLW 3C
03EA: MOVWF 40
03EB: CALL 270
03EC: GOTO 3DC
....................
....................
....................
.................... leve_x=max_x - stred_x;
03ED: MOVF 2A,W
03EE: SUBWF 27,W
03EF: MOVWF 2C
.................... prave_x=stred_x - min_x;
03F0: MOVF 26,W
03F1: SUBWF 2A,W
03F2: MOVWF 2D
.................... horni_y=max_y - stred_y;
03F3: MOVF 2B,W
03F4: SUBWF 29,W
03F5: MOVWF 2E
.................... dolni_y=stred_x - min_x;
03F6: MOVF 26,W
03F7: SUBWF 2A,W
03F8: MOVWF 2F
....................
.................... leve_x = leve_x / 8; //vypocet parametru
03F9: RRF 2C,F
03FA: RRF 2C,F
03FB: RRF 2C,F
03FC: MOVLW 1F
03FD: ANDWF 2C,F
.................... prave_x = prave_x / 8;
03FE: RRF 2D,F
03FF: RRF 2D,F
0400: RRF 2D,F
0401: ANDWF 2D,F
.................... horni_y = horni_y / 8;
0402: RRF 2E,F
0403: RRF 2E,F
0404: RRF 2E,F
0405: ANDWF 2E,F
.................... dolni_y = dolni_y / 8;
0406: RRF 2F,F
0407: RRF 2F,F
0408: RRF 2F,F
0409: ANDWF 2F,F
....................
.................... write_eeprom(EEleve_x,leve_x);
040A: BSF 03.6
040B: CLRF 0D
040C: CLRF 0F
040D: BCF 03.6
040E: MOVF 2C,W
040F: BSF 03.6
0410: MOVWF 0C
0411: BSF 03.5
0412: BCF 0C.7
0413: BSF 0C.2
0414: BCF 03.5
0415: BCF 03.6
0416: MOVF 0B,W
0417: MOVWF 20
0418: BCF 0B.7
0419: BSF 03.5
041A: BSF 03.6
041B: MOVLW 55
041C: MOVWF 0D
041D: MOVLW AA
041E: MOVWF 0D
041F: BSF 0C.1
0420: BTFSC 0C.1
0421: GOTO 420
0422: BCF 0C.2
0423: BCF 03.5
0424: BCF 03.6
0425: MOVF 20,W
0426: IORWF 0B,F
.................... write_eeprom(EEprave_x,prave_x);
0427: MOVLW 01
0428: BSF 03.6
0429: MOVWF 0D
042A: CLRF 0F
042B: BCF 03.6
042C: MOVF 2D,W
042D: BSF 03.6
042E: MOVWF 0C
042F: BSF 03.5
0430: BCF 0C.7
0431: BSF 0C.2
0432: BCF 03.5
0433: BCF 03.6
0434: MOVF 0B,W
0435: MOVWF 20
0436: BCF 0B.7
0437: BSF 03.5
0438: BSF 03.6
0439: MOVLW 55
043A: MOVWF 0D
043B: MOVLW AA
043C: MOVWF 0D
043D: BSF 0C.1
043E: BTFSC 0C.1
043F: GOTO 43E
0440: BCF 0C.2
0441: BCF 03.5
0442: BCF 03.6
0443: MOVF 20,W
0444: IORWF 0B,F
.................... write_eeprom(EEstred_x,stred_x);
0445: MOVLW 08
0446: BSF 03.6
0447: MOVWF 0D
0448: CLRF 0F
0449: BCF 03.6
044A: MOVF 2A,W
044B: BSF 03.6
044C: MOVWF 0C
044D: BSF 03.5
044E: BCF 0C.7
044F: BSF 0C.2
0450: BCF 03.5
0451: BCF 03.6
0452: MOVF 0B,W
0453: MOVWF 20
0454: BCF 0B.7
0455: BSF 03.5
0456: BSF 03.6
0457: MOVLW 55
0458: MOVWF 0D
0459: MOVLW AA
045A: MOVWF 0D
045B: BSF 0C.1
045C: BTFSC 0C.1
045D: GOTO 45C
045E: BCF 0C.2
045F: BCF 03.5
0460: BCF 03.6
0461: MOVF 20,W
0462: IORWF 0B,F
.................... write_eeprom(EEstred_y,stred_y);
0463: MOVLW 09
0464: BSF 03.6
0465: MOVWF 0D
0466: CLRF 0F
0467: BCF 03.6
0468: MOVF 2B,W
0469: BSF 03.6
046A: MOVWF 0C
046B: BSF 03.5
046C: BCF 0C.7
046D: BSF 0C.2
046E: BCF 03.5
046F: BCF 03.6
0470: MOVF 0B,W
0471: MOVWF 20
0472: BCF 0B.7
0473: BSF 03.5
0474: BSF 03.6
0475: MOVLW 55
0476: MOVWF 0D
0477: MOVLW AA
0478: MOVWF 0D
0479: BSF 0C.1
047A: BTFSC 0C.1
047B: GOTO 47A
047C: BCF 0C.2
047D: BCF 03.5
047E: BCF 03.6
047F: MOVF 20,W
0480: IORWF 0B,F
.................... write_eeprom(EEhorni_y,horni_y);
0481: MOVLW 02
0482: BSF 03.6
0483: MOVWF 0D
0484: CLRF 0F
0485: BCF 03.6
0486: MOVF 2E,W
0487: BSF 03.6
0488: MOVWF 0C
0489: BSF 03.5
048A: BCF 0C.7
048B: BSF 0C.2
048C: BCF 03.5
048D: BCF 03.6
048E: MOVF 0B,W
048F: MOVWF 20
0490: BCF 0B.7
0491: BSF 03.5
0492: BSF 03.6
0493: MOVLW 55
0494: MOVWF 0D
0495: MOVLW AA
0496: MOVWF 0D
0497: BSF 0C.1
0498: BTFSC 0C.1
0499: GOTO 498
049A: BCF 0C.2
049B: BCF 03.5
049C: BCF 03.6
049D: MOVF 20,W
049E: IORWF 0B,F
.................... write_eeprom(EEdolni_y,dolni_y);
049F: MOVLW 03
04A0: BSF 03.6
04A1: MOVWF 0D
04A2: CLRF 0F
04A3: BCF 03.6
04A4: MOVF 2F,W
04A5: BSF 03.6
04A6: MOVWF 0C
04A7: BSF 03.5
04A8: BCF 0C.7
04A9: BSF 0C.2
04AA: BCF 03.5
04AB: BCF 03.6
04AC: MOVF 0B,W
04AD: MOVWF 20
04AE: BCF 0B.7
04AF: BSF 03.5
04B0: BSF 03.6
04B1: MOVLW 55
04B2: MOVWF 0D
04B3: MOVLW AA
04B4: MOVWF 0D
04B5: BSF 0C.1
04B6: BTFSC 0C.1
04B7: GOTO 4B6
04B8: BCF 0C.2
04B9: BCF 03.5
04BA: BCF 03.6
04BB: MOVF 20,W
04BC: IORWF 0B,F
....................
.................... //write_eeprom(EEmin_x,min_x); //zapis
.................... //write_eeprom(EEmax_x,max_x);
.................... //write_eeprom(EEmin_y,min_y);
.................... //write_eeprom(EEmax_y,max_y);
.................... }
....................
....................
....................
....................
....................
.................... int x,y,tlac1,tlac2;
....................
.................... void trimovat()
.................... {
.................... odeslat_paket(Trim,0b0001);
*
04BE: MOVLW 06
04BF: MOVWF 39
04C0: MOVLW 01
04C1: MOVWF 3A
04C2: CALL 2E8
.................... odeslat_paket(OSA_X,x);
04C3: MOVLW 01
04C4: MOVWF 39
04C5: MOVF 30,W
04C6: MOVWF 3A
04C7: CALL 2E8
.................... odeslat_paket(OSA_Y,y);
04C8: MOVLW 02
04C9: MOVWF 39
04CA: MOVF 31,W
04CB: MOVWF 3A
04CC: CALL 2E8
.................... }
....................
.................... void vysilat()
.................... {
....................
.................... leve_x = read_eeprom(EEleve_x);
*
04CE: BSF 03.6
04CF: CLRF 0D
04D0: CLRF 0F
04D1: BSF 03.5
04D2: BCF 0C.7
04D3: BSF 0C.0
04D4: BCF 03.5
04D5: MOVF 0C,W
04D6: BCF 03.6
04D7: MOVWF 2C
.................... prave_x = read_eeprom(EEprave_x);
04D8: MOVLW 01
04D9: BSF 03.6
04DA: MOVWF 0D
04DB: CLRF 0F
04DC: BSF 03.5
04DD: BCF 0C.7
04DE: BSF 0C.0
04DF: BCF 03.5
04E0: MOVF 0C,W
04E1: BCF 03.6
04E2: MOVWF 2D
.................... stred_x = read_eeprom(EEstred_x);
04E3: MOVLW 08
04E4: BSF 03.6
04E5: MOVWF 0D
04E6: CLRF 0F
04E7: BSF 03.5
04E8: BCF 0C.7
04E9: BSF 0C.0
04EA: BCF 03.5
04EB: MOVF 0C,W
04EC: BCF 03.6
04ED: MOVWF 2A
.................... stred_y = read_eeprom(EEstred_y);
04EE: MOVLW 09
04EF: BSF 03.6
04F0: MOVWF 0D
04F1: CLRF 0F
04F2: BSF 03.5
04F3: BCF 0C.7
04F4: BSF 0C.0
04F5: BCF 03.5
04F6: MOVF 0C,W
04F7: BCF 03.6
04F8: MOVWF 2B
.................... horni_y = read_eeprom(EEhorni_y);
04F9: MOVLW 02
04FA: BSF 03.6
04FB: MOVWF 0D
04FC: CLRF 0F
04FD: BSF 03.5
04FE: BCF 0C.7
04FF: BSF 0C.0
0500: BCF 03.5
0501: MOVF 0C,W
0502: BCF 03.6
0503: MOVWF 2E
.................... dolni_y = read_eeprom(EEdolni_y);
0504: MOVLW 03
0505: BSF 03.6
0506: MOVWF 0D
0507: CLRF 0F
0508: BSF 03.5
0509: BCF 0C.7
050A: BSF 0C.0
050B: BCF 03.5
050C: MOVF 0C,W
050D: BCF 03.6
050E: MOVWF 2F
....................
.................... Delay_ms(200);
050F: MOVLW C8
0510: MOVWF 3F
0511: CALL 077
.................... lcd_gotoxy(6,2);
0512: MOVLW 06
0513: MOVWF 3F
0514: MOVLW 02
0515: MOVWF 40
0516: CALL 227
.................... printf(lcd_putc,"Vysilam");
*
0048: BCF 0A.0
0049: BCF 0A.1
004A: BCF 0A.2
004B: ADDWF 02,F
004C: RETLW 56
004D: RETLW 79
004E: RETLW 73
004F: RETLW 69
0050: RETLW 6C
0051: RETLW 61
0052: RETLW 6D
0053: RETLW 00
*
0517: CLRF 39
0518: MOVF 39,W
0519: CALL 048
051A: INCF 39,F
051B: MOVWF 3E
051C: CALL 238
051D: MOVLW 07
051E: SUBWF 39,W
051F: BTFSS 03.2
0520: GOTO 518
....................
.................... while(0x80 == klavesa())
0521: CALL 12E
0522: MOVF 21,W
0523: SUBLW 80
0524: BTFSS 03.2
0525: GOTO 54D
.................... {
.................... Joystick(&x,&y,&tlac1,&tlac2);
0526: MOVLW 30
0527: MOVWF 3D
0528: MOVLW 31
0529: MOVWF 3E
052A: MOVLW 32
052B: MOVWF 3F
052C: MOVLW 33
052D: MOVWF 40
052E: CALL 270
.................... /*if (stred_x >= x)
.................... {
.................... x = stred_x - x;
.................... x = x/leve_x;
.................... }
.................... else
.................... {
.................... x = x - stred_x;
.................... x = x/prave_x;
.................... }
....................
.................... if (stred_y >= y)
.................... {
.................... y = stred_y - y;
.................... y = y/dolni_y;
.................... }
.................... else
.................... {
.................... y = y - stred_y;
.................... y = y/horni_y;
.................... }*/
....................
.................... x=x/8;
052F: RRF 30,F
0530: RRF 30,F
0531: RRF 30,F
0532: MOVLW 1F
0533: ANDWF 30,F
.................... y=y/8;
0534: RRF 31,F
0535: RRF 31,F
0536: RRF 31,F
0537: ANDWF 31,F
....................
.................... odeslat_paket(OSA_X,x);
0538: MOVLW 01
0539: MOVWF 39
053A: MOVF 30,W
053B: MOVWF 3A
053C: CALL 2E8
.................... Delay_us(1600);
053D: MOVLW 01
053E: MOVWF 3F
053F: CALL 077
0540: MOVLW 03
0541: MOVWF 39
0542: MOVLW BA
0543: MOVWF 3A
0544: GOTO 321
0545: DECFSZ 39,F
0546: GOTO 542
.................... odeslat_paket(OSA_Y,y);
0547: MOVLW 02
0548: MOVWF 39
0549: MOVF 31,W
054A: MOVWF 3A
054B: CALL 2E8
.................... }
054C: GOTO 521
.................... }
....................
.................... void menu()
.................... {
.................... int8 polozka = 3;
.................... int8 old_polozka = 0;
*
0330: MOVLW 03
0331: MOVWF 36
0332: CLRF 37
.................... int pom;
....................
.................... while(true)
.................... {
.................... pom = klavesa();
0333: CALL 12E
0334: MOVF 21,W
0335: MOVWF 38
.................... if (0x07 == pom) polozka++;
0336: MOVF 38,W
0337: SUBLW 07
0338: BTFSS 03.2
0339: GOTO 33B
033A: INCF 36,F
.................... if (0x0f == pom) polozka--;
033B: MOVF 38,W
033C: SUBLW 0F
033D: BTFSS 03.2
033E: GOTO 340
033F: DECF 36,F
.................... if (0x04 <= polozka) polozka = 1;
0340: MOVF 36,W
0341: SUBLW 03
0342: BTFSC 03.0
0343: GOTO 346
0344: MOVLW 01
0345: MOVWF 36
.................... if (0x00 == polozka) polozka = 3;
0346: MOVF 36,F
0347: BTFSS 03.2
0348: GOTO 34B
0349: MOVLW 03
034A: MOVWF 36
.................... if (0x16 == pom) // enter
034B: MOVF 38,W
034C: SUBLW 16
034D: BTFSS 03.2
034E: GOTO 55E
.................... {
.................... LED((1 << (polozka + 1)) | 1);
034F: MOVLW 01
0350: ADDWF 36,W
0351: MOVWF 21
0352: MOVLW 01
0353: MOVWF 20
0354: MOVF 21,F
0355: BTFSC 03.2
0356: GOTO 35B
0357: BCF 03.0
0358: RLF 20,F
0359: DECFSZ 21,F
035A: GOTO 357
035B: MOVF 20,W
035C: IORLW 01
035D: MOVWF 3A
035E: MOVWF 3B
035F: CALL 1E7
.................... switch(polozka)
0360: MOVLW 01
0361: SUBWF 36,W
0362: ADDLW FD
0363: BTFSC 03.0
0364: GOTO 54E
0365: ADDLW 03
0366: GOTO 5B3
.................... {
.................... case 1:
.................... kalibrace();
.................... break;
*
04BD: GOTO 54E
....................
.................... case 2:
.................... trimovat();
.................... break;
*
04CD: GOTO 54E
....................
.................... case 3:
.................... vysilat();
.................... break;
*
054D: GOTO 54E
.................... };
*
05B3: BSF 0A.0
05B4: BCF 0A.1
05B5: BSF 0A.2
05B6: ADDWF 02,F
05B7: GOTO 367
05B8: GOTO 4BE
05B9: GOTO 4CE
.................... LED(1 << (polozka + 1));
*
054E: MOVLW 01
054F: ADDWF 36,W
0550: MOVWF 21
0551: MOVLW 01
0552: MOVWF 39
0553: MOVF 21,F
0554: BTFSC 03.2
0555: GOTO 55A
0556: BCF 03.0
0557: RLF 39,F
0558: DECFSZ 21,F
0559: GOTO 556
055A: MOVF 39,W
055B: MOVWF 3B
055C: CALL 1E7
.................... old_polozka=0;
055D: CLRF 37
.................... };
....................
.................... if (polozka != old_polozka)
055E: MOVF 37,W
055F: SUBWF 36,W
0560: BTFSC 03.2
0561: GOTO 5B0
.................... {
.................... old_polozka=polozka;
0562: MOVF 36,W
0563: MOVWF 37
.................... printf(lcd_putc,"\f");
0564: MOVLW 0C
0565: MOVWF 3E
0566: CALL 238
.................... switch(polozka)
0567: MOVLW 01
0568: SUBWF 36,W
0569: ADDLW FD
056A: BTFSC 03.0
056B: GOTO 59E
056C: ADDLW 03
056D: GOTO 5BA
.................... {
.................... case 1:
.................... lcd_gotoxy(5,2);
056E: MOVLW 05
056F: MOVWF 3F
0570: MOVLW 02
0571: MOVWF 40
0572: CALL 227
.................... printf(lcd_putc,"Kalibrace");
*
0054: BCF 0A.0
0055: BCF 0A.1
0056: BCF 0A.2
0057: ADDWF 02,F
0058: RETLW 4B
0059: RETLW 61
005A: RETLW 6C
005B: RETLW 69
005C: RETLW 62
005D: RETLW 72
005E: RETLW 61
005F: RETLW 63
0060: RETLW 65
0061: RETLW 00
*
0573: CLRF 39
0574: MOVF 39,W
0575: CALL 054
0576: INCF 39,F
0577: MOVWF 3E
0578: CALL 238
0579: MOVLW 09
057A: SUBWF 39,W
057B: BTFSS 03.2
057C: GOTO 574
.................... break;
057D: GOTO 59E
....................
.................... case 2:
.................... lcd_gotoxy(7,2);
057E: MOVLW 07
057F: MOVWF 3F
0580: MOVLW 02
0581: MOVWF 40
0582: CALL 227
.................... printf(lcd_putc,"Trim");
*
0062: BCF 0A.0
0063: BCF 0A.1
0064: BCF 0A.2
0065: ADDWF 02,F
0066: RETLW 54
0067: RETLW 72
0068: RETLW 69
0069: RETLW 6D
006A: RETLW 00
*
0583: CLRF 39
0584: MOVF 39,W
0585: CALL 062
0586: INCF 39,F
0587: MOVWF 3E
0588: CALL 238
0589: MOVLW 04
058A: SUBWF 39,W
058B: BTFSS 03.2
058C: GOTO 584
.................... break;
058D: GOTO 59E
....................
.................... case 3:
.................... lcd_gotoxy(6,2);
058E: MOVLW 06
058F: MOVWF 3F
0590: MOVLW 02
0591: MOVWF 40
0592: CALL 227
.................... printf(lcd_putc,"Vysilat");
*
006B: BCF 0A.0
006C: BCF 0A.1
006D: BCF 0A.2
006E: ADDWF 02,F
006F: RETLW 56
0070: RETLW 79
0071: RETLW 73
0072: RETLW 69
0073: RETLW 6C
0074: RETLW 61
0075: RETLW 74
0076: RETLW 00
*
0593: CLRF 39
0594: MOVF 39,W
0595: CALL 06B
0596: INCF 39,F
0597: MOVWF 3E
0598: CALL 238
0599: MOVLW 07
059A: SUBWF 39,W
059B: BTFSS 03.2
059C: GOTO 594
.................... break;
059D: GOTO 59E
.................... };
*
05BA: BSF 0A.0
05BB: BCF 0A.1
05BC: BSF 0A.2
05BD: ADDWF 02,F
05BE: GOTO 56E
05BF: GOTO 57E
05C0: GOTO 58E
.................... LED(1 << (polozka + 1));
*
059E: MOVLW 01
059F: ADDWF 36,W
05A0: MOVWF 21
05A1: MOVLW 01
05A2: MOVWF 39
05A3: MOVF 21,F
05A4: BTFSC 03.2
05A5: GOTO 5AA
05A6: BCF 03.0
05A7: RLF 39,F
05A8: DECFSZ 21,F
05A9: GOTO 5A6
05AA: MOVF 39,W
05AB: MOVWF 3B
05AC: CALL 1E7
.................... Delay_ms(250);
05AD: MOVLW FA
05AE: MOVWF 3F
05AF: CALL 077
.................... }
.................... }
05B0: GOTO 333
05B1: BCF 0A.3
05B2: GOTO 604 (RETURN)
.................... }
....................
.................... void main()
.................... {
.................... int8 tlacitka,tlacitka_old;
*
05C1: CLRF 04
05C2: MOVLW 1F
05C3: ANDWF 03,F
05C4: MOVLW 07
05C5: BSF 03.5
05C6: MOVWF 1F
05C7: MOVLW FF
05C8: BCF 03.5
05C9: MOVWF 25
.................... setup_adc_ports(RA0_RA1_RA3_ANALOG);
05CA: MOVLW 04
05CB: BSF 03.5
05CC: MOVWF 1F
.................... setup_adc(ADC_CLOCK_DIV_2);
05CD: BCF 03.5
05CE: MOVF 1F,W
05CF: ANDLW 38
05D0: IORLW 01
05D1: MOVWF 1F
.................... setup_spi(FALSE);
05D2: BCF 14.5
05D3: BCF 25.5
05D4: MOVF 25,W
05D5: BSF 03.5
05D6: MOVWF 07
05D7: BCF 03.5
05D8: BSF 25.4
05D9: MOVF 25,W
05DA: BSF 03.5
05DB: MOVWF 07
05DC: BCF 03.5
05DD: BCF 25.3
05DE: MOVF 25,W
05DF: BSF 03.5
05E0: MOVWF 07
05E1: MOVLW 00
05E2: BCF 03.5
05E3: MOVWF 14
05E4: BSF 03.5
05E5: MOVWF 14
.................... setup_counters(RTCC_INTERNAL,RTCC_DIV_2);
05E6: BCF 03.5
05E7: CLRF 20
05E8: BTFSS 20.3
05E9: GOTO 5F2
05EA: MOVLW 07
05EB: CLRF 01
05EC: MOVLW 81
05ED: MOVWF 04
05EE: MOVF 00,W
05EF: ANDLW C0
05F0: IORLW 0F
05F1: MOVWF 00
05F2: CLRWDT
05F3: MOVLW 81
05F4: MOVWF 04
05F5: MOVF 00,W
05F6: ANDLW C0
05F7: IORWF 20,W
05F8: MOVWF 00
.................... setup_timer_1(T1_DISABLED);
05F9: CLRF 10
.................... setup_timer_2(T2_DISABLED,0,1);
05FA: MOVLW 00
05FB: MOVWF 21
05FC: MOVWF 12
05FD: MOVLW 00
05FE: BSF 03.5
05FF: MOVWF 12
....................
.................... lcd_init();
0600: BCF 03.5
0601: GOTO 0B7
.................... KL_init();
0602: GOTO 0F1
....................
.................... menu();
0603: GOTO 330
....................
.................... while(true)
.................... {
.................... //char xx;
.................... // if (true == read_kl(&xx))
.................... // {
.................... // printf(lcd_putc,"%C",xx );
.................... // }
.................... }
0604: GOTO 604
.................... }
....................
0605: SLEEP

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/main.PJT
0,0 → 1,32
[PROJECT]
Target=main.HEX
Development_Mode=
Processor=0x873F
ToolSuite=CCS
[Directories]
Include=E:\@Dokumenty\pic\lcd;
Library=
LinkerScript=
[Target Data]
FileList=main.c;
BuildTool=CCSC
OptionString=-p +FM
AdditionalOptionString=
BuildRequired=1
[main.c]
Type=4
Path=
FileList=
BuildTool=
OptionString=
AdditionalOptionString=
[mru-list]
1=main.c
[Windows]
0=0000 main.c 0 0 796 451 3 0

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/main.SYM
0,0 → 1,115
015-016 CCP_1
015 CCP_1_LOW
016 CCP_1_HIGH
01B-01C CCP_2
01B CCP_2_LOW
01C CCP_2_HIGH
020 @SCRATCH
021 @SCRATCH
021 _RETURN_
022 @SCRATCH
023 @SCRATCH
024 @SCRATCH
025 @TRIS_C
026 min_x
027 max_x
028 min_y
029 max_y
02A stred_x
02B stred_y
02C leve_x
02D prave_x
02E horni_y
02F dolni_y
030 x
031 y
032 tlac1
033 tlac2
034 main.tlacitka
035 main.tlacitka_old
036 lcd_init.i
036 KL_init.i
036 menu.polozka
037 menu.old_polozka
037 lcd_init.@SCRATCH
038 menu.pom
039 odeslat_paket.kanal
039 kalibrace.x
039 vysilat.@SCRATCH
039 menu.@SCRATCH
03A delay_us.P1
03A odeslat_paket.Data
03A kalibrace.y
03A menu.@SCRATCH
03B LED.LED
03B odeslat_paket.i
03B kalibrace.tlac1
03C LED.i
03C odeslat_paket.suma
03C kalibrace.tlac2
03D klavesa.i
03D Joystick.ted_x
03D odeslat_paket.@SCRATCH
03D kalibrace.@SCRATCH
03E lcd_putc.c
03E klavesa.sloupec
03E odeslat_bit.bit
03E Joystick.ted_y
03F delay_ms.P1
03F lcd_gotoxy.x
03F Joystick.ted_tl1
040 lcd_gotoxy.y
040 Joystick.ted_tl2
041 lcd_gotoxy.Adr
041 Joystick.@SCRATCH
042 lcd_gotoxy.@SCRATCH
043 lcd_send_byte.Adr
044 lcd_send_byte.n
045 lcd_send_nibble.n
046 lcd_send_nibble.@SCRATCH
047 lcd_send_nibble.@SCRATCH
-002 LCD_INIT_STRING
lcd_putc2.Data
lcd_sh.lr
KL_CP.j
KL_CP.i
read_KL.klv
-016 read_KL.prev_tabulka
0077 delay_ms
0321 delay_us
0004 @const28
008C lcd_send_nibble
00A1 lcd_send_byte
00B7 lcd_init
0227 lcd_gotoxy
0238 lcd_putc
00F1 KL_init
01E7 LED
012E klavesa
02C9 odeslat_bit
02E8 odeslat_paket
0270 Joystick
000C @const10254
001D @const10257
0027 @const10278
003B @const10281
0048 @const10301
0330 menu
05B3 @goto10333
0054 @const10344
0062 @const10348
006B @const10352
05BA @goto10355
05C1 main
Project Files:
d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\main.c
d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\main.h
C:\Program Files\PICC\devices\16F873.h
d:\@kaklik\programy\pic_c\prenos\letadlo\common.h
d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\MYLCD.C
d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\lcd2.c
d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\keybord.c
d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\vysilac.c
d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\Joystick.c

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/main.c
0,0 → 1,182
// Vysilac
#include "main.h"
#include "..\common.h"
//Displej
#DEFINE LCD_RS PIN_B1 // rizeni registru LCD displeje
#DEFINE LCD_E PIN_B2 // enable LCD displeje
#DEFINE LCD_DATA_LSB PIN_B4 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou)
#INCLUDE "MYLCD.C"
#INCLUDE "lcd2.c"
//Klavesnice
#DEFINE PL PIN_B3 // ovladani klavesnice
#DEFINE STROBE_LED PIN_C0
#DEFINE STROBE_KL PIN_C1
#DEFINE DATA_OUT PIN_C2
#DEFINE CP PIN_C3
#DEFINE DATA_IN PIN_C4
#INCLUDE "keybord.c"
//Vysilac
#DEFINE VYSILAC PIN_C5
#INCLUDE "vysilac.c"
//Joistick
#DEFINE EEleve_x 0
#DEFINE EEprave_x 1 //adresovani EEPROM
#DEFINE EEhorni_y 2
#DEFINE EEdolni_y 3
#DEFINE EEmin_x 4
#DEFINE EEmax_x 5
#DEFINE EEmin_y 6
#DEFINE EEmax_y 7
#DEFINE EEstred_x 8
#DEFINE EEstred_y 9
#DEFINE AD_OSA_X 1 // adresa A/D prevodniku pro osu X
#DEFINE AD_OSA_Y 0 // adresa A/D prevodniku pro osu Y
#DEFINE TL1 PIN_C6
#DEFINE TL2 PIN_C7
#INCLUDE "Joystick.c"
int x,y,tlac1,tlac2;
void trimovat()
{
odeslat_paket(Trim,0b0001);
odeslat_paket(OSA_X,x);
odeslat_paket(OSA_Y,y);
}
void vysilat()
{
leve_x = read_eeprom(EEleve_x);
prave_x = read_eeprom(EEprave_x);
stred_x = read_eeprom(EEstred_x);
stred_y = read_eeprom(EEstred_y);
horni_y = read_eeprom(EEhorni_y);
dolni_y = read_eeprom(EEdolni_y);
Delay_ms(200);
lcd_gotoxy(6,2);
printf(lcd_putc,"Vysilam");
while(0x80 == klavesa())
{
Joystick(&x,&y,&tlac1,&tlac2);
/*if (stred_x >= x)
{
x = stred_x - x;
x = x/leve_x;
}
else
{
x = x - stred_x;
x = x/prave_x;
}
if (stred_y >= y)
{
y = stred_y - y;
y = y/dolni_y;
}
else
{
y = y - stred_y;
y = y/horni_y;
}*/
x=x/8;
y=y/8;
odeslat_paket(OSA_X,x);
Delay_us(1600);
odeslat_paket(OSA_Y,y);
}
}
void menu()
{
int8 polozka = 3;
int8 old_polozka = 0;
int pom;
while(true)
{
pom = klavesa();
if (0x07 == pom) polozka++;
if (0x0f == pom) polozka--;
if (0x04 <= polozka) polozka = 1;
if (0x00 == polozka) polozka = 3;
if (0x16 == pom) // enter
{
LED((1 << (polozka + 1)) | 1);
switch(polozka)
{
case 1:
kalibrace();
break;
case 2:
trimovat();
break;
case 3:
vysilat();
break;
};
LED(1 << (polozka + 1));
old_polozka=0;
};
if (polozka != old_polozka)
{
old_polozka=polozka;
printf(lcd_putc,"\f");
switch(polozka)
{
case 1:
lcd_gotoxy(5,2);
printf(lcd_putc,"Kalibrace");
break;
case 2:
lcd_gotoxy(7,2);
printf(lcd_putc,"Trim");
break;
case 3:
lcd_gotoxy(6,2);
printf(lcd_putc,"Vysilat");
break;
};
LED(1 << (polozka + 1));
Delay_ms(250);
}
}
}
void main()
{
int8 tlacitka,tlacitka_old;
setup_adc_ports(RA0_RA1_RA3_ANALOG);
setup_adc(ADC_CLOCK_DIV_2);
setup_spi(FALSE);
setup_counters(RTCC_INTERNAL,RTCC_DIV_2);
setup_timer_1(T1_DISABLED);
setup_timer_2(T2_DISABLED,0,1);
lcd_init();
KL_init();
menu();
while(true)
{
//char xx;
// if (true == read_kl(&xx))
// {
// printf(lcd_putc,"%C",xx );
// }
}
}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/main.cod
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Added: svn:mime-type
+application/octet-stream
\ No newline at end of property

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/main.err
0,0 → 1,0
No Errors

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/main.h
0,0 → 1,4
#include <16F873.h>
#use delay(clock=4000000)
#fuses XT,PUT,NOWDT

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/main.sta
0,0 → 1,59
ROM used: 1542 (38%)
2048 (50%) including unused fragments
2 Average locations per line
6 Average locations per statement
RAM used: 22 (11%) at main() level
40 (21%) worst case
Lines Stmts % Files
----- ----- --- -----
183 73 27 d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\main.c
5 0 0 d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\main.h
225 0 0 C:\Program Files\PICC\devices\16F873.h
10 0 0 d:\@kaklik\programy\pic_c\prenos\letadlo\common.h
272 46 14 d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\MYLCD.C
9 3 1 d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\lcd2.c
135 65 17 d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\keybord.c
44 21 5 d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\vysilac.c
133 58 12 d:\@kaklik\programy\pic_c\prenos\letadlo\vysilac\Joystick.c
----- -----
2032 532 Total
Page ROM % RAM Functions:
---- --- --- --- ----------
0 21 1 1 delay_ms
0 15 1 1 delay_us
0 8 1 0 @const28
0 21 1 3 lcd_send_nibble
0 22 1 2 lcd_send_byte
0 58 4 2 lcd_init
0 17 1 4 lcd_gotoxy
0 56 4 1 lcd_putc
0 61 4 1 KL_init
0 64 4 2 LED
0 185 12 2 klavesa
0 31 2 1 odeslat_bit
0 57 4 5 odeslat_paket
0 89 6 5 Joystick
0 17 1 0 @const10254
0 10 1 0 @const10257
0 20 1 0 @const10278
0 13 1 0 @const10281
0 12 1 0 @const10301
0 643 42 5 menu
0 7 0 0 @goto10333
0 14 1 0 @const10344
0 9 1 0 @const10348
0 12 1 0 @const10352
0 7 0 0 @goto10355
0 69 4 2 main
Segment Used Free
--------- ---- ----
0000-0003 4 0
0004-07FF 1538 506
0800-0FFF 0 2048

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/main.tre
0,0 → 1,295
ÀÄmain
ÀÄmain 0/69 Ram=2
ÃÄ??0??
ÃÄlcd_init 0/58 Ram=2
³ ÃÄdelay_ms 0/21 Ram=1
³ ÃÄdelay_ms 0/21 Ram=1
³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ÃÄ@const28 0/8 Ram=0
³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÀÄdelay_ms 0/21 Ram=1
ÃÄKL_init 0/61 Ram=1
ÀÄmenu 0/643 Ram=5
ÃÄklavesa 0/185 Ram=2
ÃÄLED 0/64 Ram=2
ÃÄ@goto10333 0/7 Ram=0
ÃÄkalibrace (Inline) Ram=5
³ ÃÄlcd_putc 0/56 Ram=1
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄdelay_ms 0/21 Ram=1
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄ@const10254 0/17 Ram=0
³ ÃÄlcd_putc 0/56 Ram=1
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄdelay_ms 0/21 Ram=1
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄ@const10257 0/10 Ram=0
³ ÃÄlcd_putc 0/56 Ram=1
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄdelay_ms 0/21 Ram=1
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄklavesa 0/185 Ram=2
³ ÃÄJoystick 0/89 Ram=5
³ ÃÄdelay_ms 0/21 Ram=1
³ ÃÄlcd_putc 0/56 Ram=1
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄdelay_ms 0/21 Ram=1
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄ@const10278 0/20 Ram=0
³ ÃÄlcd_putc 0/56 Ram=1
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄdelay_ms 0/21 Ram=1
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄ@const10281 0/13 Ram=0
³ ÃÄlcd_putc 0/56 Ram=1
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄdelay_ms 0/21 Ram=1
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÀÄJoystick 0/89 Ram=5
ÃÄtrimovat (Inline) Ram=0
³ ÃÄodeslat_paket 0/57 Ram=5
³ ³ ÃÄodeslat_bit 0/31 Ram=1
³ ³ ÃÄodeslat_bit 0/31 Ram=1
³ ³ ÀÄodeslat_bit 0/31 Ram=1
³ ÃÄodeslat_paket 0/57 Ram=5
³ ³ ÃÄodeslat_bit 0/31 Ram=1
³ ³ ÃÄodeslat_bit 0/31 Ram=1
³ ³ ÀÄodeslat_bit 0/31 Ram=1
³ ÀÄodeslat_paket 0/57 Ram=5
³ ÃÄodeslat_bit 0/31 Ram=1
³ ÃÄodeslat_bit 0/31 Ram=1
³ ÀÄodeslat_bit 0/31 Ram=1
ÃÄvysilat (Inline) Ram=1
³ ÃÄdelay_ms 0/21 Ram=1
³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄ@const10301 0/12 Ram=0
³ ÃÄlcd_putc 0/56 Ram=1
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄdelay_ms 0/21 Ram=1
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄklavesa 0/185 Ram=2
³ ÃÄJoystick 0/89 Ram=5
³ ÃÄodeslat_paket 0/57 Ram=5
³ ³ ÃÄodeslat_bit 0/31 Ram=1
³ ³ ÃÄodeslat_bit 0/31 Ram=1
³ ³ ÀÄodeslat_bit 0/31 Ram=1
³ ÃÄdelay_ms 0/21 Ram=1
³ ÃÄdelay_us 0/15 Ram=1
³ ÀÄodeslat_paket 0/57 Ram=5
³ ÃÄodeslat_bit 0/31 Ram=1
³ ÃÄodeslat_bit 0/31 Ram=1
³ ÀÄodeslat_bit 0/31 Ram=1
ÃÄLED 0/64 Ram=2
ÃÄlcd_putc 0/56 Ram=1
³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄdelay_ms 0/21 Ram=1
³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÀÄlcd_send_byte 0/22 Ram=2
³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ÀÄlcd_send_nibble 0/21 Ram=3
ÃÄ@goto10355 0/7 Ram=0
ÃÄlcd_gotoxy 0/17 Ram=4
³ ÀÄlcd_send_byte 0/22 Ram=2
³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ÀÄlcd_send_nibble 0/21 Ram=3
ÃÄ@const10344 0/14 Ram=0
ÃÄlcd_putc 0/56 Ram=1
³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄdelay_ms 0/21 Ram=1
³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÀÄlcd_send_byte 0/22 Ram=2
³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ÀÄlcd_send_nibble 0/21 Ram=3
ÃÄlcd_gotoxy 0/17 Ram=4
³ ÀÄlcd_send_byte 0/22 Ram=2
³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ÀÄlcd_send_nibble 0/21 Ram=3
ÃÄ@const10348 0/9 Ram=0
ÃÄlcd_putc 0/56 Ram=1
³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄdelay_ms 0/21 Ram=1
³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÀÄlcd_send_byte 0/22 Ram=2
³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ÀÄlcd_send_nibble 0/21 Ram=3
ÃÄlcd_gotoxy 0/17 Ram=4
³ ÀÄlcd_send_byte 0/22 Ram=2
³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ÀÄlcd_send_nibble 0/21 Ram=3
ÃÄ@const10352 0/12 Ram=0
ÃÄlcd_putc 0/56 Ram=1
³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄdelay_ms 0/21 Ram=1
³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄlcd_gotoxy 0/17 Ram=4
³ ³ ÀÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÃÄlcd_send_byte 0/22 Ram=2
³ ³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ³ ÀÄlcd_send_nibble 0/21 Ram=3
³ ÀÄlcd_send_byte 0/22 Ram=2
³ ÃÄlcd_send_nibble 0/21 Ram=3
³ ÀÄlcd_send_nibble 0/21 Ram=3
ÃÄLED 0/64 Ram=2
ÀÄdelay_ms 0/21 Ram=1

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/mylcd.BAK
0,0 → 1,271
// LCD modul pro ovladani dvouradkoveho LCD modulu se standardnim Hitachi radicem
// (c)miho 2002
//
// Historie:
//
// 0.0 Uvodni verze se snadnou definici portu LCD displeje
//
//
// Funkce:
//
// lcd_init() inicializuje LCD displej a porty, nutno volat jako prvni
//
// lcd_putc(c) zapis snaku do lcd displeje, zpracovava nasledujici ridici znaky
// \f = \x0C - nova stranka - smazani displeje
// \n = \x0A - odradkovani (prechod na druhou radku)
// \b = \x08 - backspace - posunuti kurzoru o 1 pozici zpet
// \r = \x0D - goto home to position 1,1
// \0 .. \7 - definovatelne znaky v pozicich 0 az 7 v CGRAM
// \20 .. \27 - alternativne zapsane znaky (oktalove) v pozicich 0 az 7 CGRAM
// Pozor na to, ze funkce printf konci tisk pokud narazi na \0 (konec retezce)
//
// lcd_gotoxy(x,y) presune kurzor na uvedenou adresu
// nekontroluje parametry
//
// lcd_cursor_on zapne kurzor
// lcd_cursor_off vypne kurzor
//
// lcd_define_char(Index, Def) Makro, ktere definuje znaky od pozice Index obsahem definicniho
// retezce Def. Kazdych 8 znaku retezce Def definuje dalsi znak v CGRAM.
// Kapacita CGRAM je celkem 8 znaku s indexem 0 az 7.
// Na konci se provede lcd_gotoxy(1,1).
// Na konci teto knihovny je priklad pouziti definovanych znaku
//
// Definice portu:
//
// #DEFINE LCD_RS PIN_B2 // rizeni registru LCD displeje
// #DEFINE LCD_E PIN_B1 // enable LCD displeje
// #DEFINE LCD_DATA_LSB PIN_C2 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou)
// Privatni sekce, cist jen v pripade, ze neco nefunguje
// Generovane defince portu pro ucely teto knihovny aby kod generoval spravne IO operace a soucasne
// bylo mozne jednoduse deklarovat pripojene piny LCD displeje pri pouziti teto knihovny. Problem spociva
// v tom, ze se musi spravne ridit smery portu a soucasne datovy port zabira jen 4 bity ze zadaneho portu
//
#DEFINE LCD_SHIFT (LCD_DATA_LSB&7) // pocet bitu posuvu dataoveho kanalu v datovem portu
#DEFINE LCD_PORT (LCD_DATA_LSB>>3) // adresa LCD datoveho portu
#DEFINE LCD_TRIS (LCD_PORT+0x80) // adresa prislusneho TRIS registru
#DEFINE LCD_MASK (0xF<<LCD_SHIFT) // maska platnych bitu
//
#IF LCD_SHIFT>4 // kontrola mezi
#ERROR LCD data port LSB bit not in range 0..4
#ENDIF
// Definice konstant pro LCD display
//
#define LCD_CURSOR_ON_ 0x0E // kurzor jako blikajici radka pod znakem
#define LCD_CURSOR_OFF_ 0x0C // zadny kurzor
#define LCD_LINE_2 0x40 // adresa 1. znaku 2. radky
// Definice rezimu LCD displeje
//
BYTE const LCD_INIT_STRING[4] =
{
0x28, // intrfejs 4 bity, 2 radky, font 5x7
LCD_CURSOR_OFF_, // display on, kurzor off,
0x01, // clear displeje
0x06 // inkrement pozice kurzoru (posun kurzoru doprava)
};
// Odesle nibble do displeje (posle data a klikne signalem e)
//
void lcd_send_nibble( BYTE n )
{
*LCD_PORT = (*LCD_PORT & ~LCD_MASK) | ((n << LCD_SHIFT) & LCD_MASK); // nastav datove bity portu a ostatni zachovej
output_bit(LCD_E,1); // vzestupna hrana
delay_us(1); // pockej alespon 450ns od e nebo alespon 195ns od dat
output_bit(LCD_E,0); // sestupna hrana (minimalni perioda e je 1us)
}
// Odesle bajt do registru LCD
//
// Pokud je Adr=0 .. instrukcni registr
// Pokud je Adr=1 .. datovy registr
//
void lcd_send_byte( BOOLEAN Adr, BYTE n )
{
output_bit(LCD_RS,Adr); // vyber registr
swap(n);
lcd_send_nibble(n); // posli horni pulku bajtu
swap(n);
lcd_send_nibble(n); // posli spodni pulku bajtu
delay_us(40); // minimalni doba na provedeni prikazu
}
// Provede inicializaci LCD displeje, smaze obsah a nastavi mod displeje
//
// Tato procedura se musi volat pred pouzitim ostatnich lcd_ procedur
//
void lcd_init()
{
int i; // pocitadlo cyklu
delay_ms(20); // spozdeni pro provedeni startu displeje po zapnuti napajeni
*LCD_TRIS = *LCD_TRIS & ~LCD_MASK; // nuluj odpovidajici bity tris registru datoveho portu LCD
output_bit(LCD_RS,0); // nastav jako vystup a nastav klidovy stav
output_bit(LCD_E,0); // nastav jako vystup a nastav klidovy stav
for (i=0; i<3; i++) // nastav lcd do rezimu 8 bitu sbernice
{
delay_ms(2); // muze byt rozdelany prenos dat (2x 4 bity) nebo pomaly povel
lcd_send_nibble(3); // rezim 8 bitu
}
delay_us(40); // cas na zpracovani
lcd_send_nibble(2); // nastav rezim 4 bitu (plati od nasledujiciho prenosu)
delay_us(40); // cas na zpracovani
for (i=0;i<3;i++) // proved inicializaci (nastaveni modu, smazani apod)
{
lcd_send_byte(0,LCD_INIT_STRING[i]);
delay_ms(2);
}
}
// Proved presun kurzoru
//
// Pozice 1.1 je domu
//
void lcd_gotoxy( BYTE x, BYTE y)
{
BYTE Adr;
Adr=x-1;
if(y==2)
Adr+=LCD_LINE_2;
lcd_send_byte(0,0x80|Adr);
}
// Zapis znaku na displej, zpracovani ridicich znaku
//
void lcd_putc( char c)
{
switch (c)
{
case '\f' : lcd_send_byte(0,1); // smaz displej
delay_ms(2);
break;
case '\n' : lcd_gotoxy(1,2); break; // presun se na 1. znak 2. radky
case '\r' : lcd_gotoxy(1,1); break; // presun home
case '\b' : lcd_send_byte(0,0x10); break; // posun kurzor o 1 zpet
default : if (c<0x20) c&=0x7; // preklopeni definovatelnych znaku na rozsah 0 az 0x1F
lcd_send_byte(1,c); break; // zapis znak
}
}
// Zapni kurzor
//
void lcd_cursor_on()
{
lcd_send_byte(0,LCD_CURSOR_ON_);
}
// Vypni kurzor
//
void lcd_cursor_off()
{
lcd_send_byte(0,LCD_CURSOR_OFF_);
}
// Definice vlastnich fontu
//
// Vlastnich definic muze byt jen 8 do pozic 0 az 7 pameti CGRAM radice lcd displeje
// Pro snadne definovani jsou pripraveny nasledujici definice a na konci souboru je uveden
// priklad pouziti definovanych znaku.
// Pomocna procedura pro posilani ridicich dat do radice displeje
//
void lcd_putc2(int Data)
{
lcd_send_byte(1,Data);
}
// Pomocne definice pro programovani obsahu CGRAM
//
#DEFINE lcd_define_start(Code) lcd_send_byte(0,0x40+(Code<<3)); delay_ms(2)
#DEFINE lcd_define_def(String) printf(lcd_putc2,String);
#DEFINE lcd_define_end() lcd_send_byte(0,3); delay_ms(2)
// Vlastni vykonne makro pro definovani fontu do pozice Index CGRAM s definicnim retezcem Def
//
#DEFINE lcd_define_char(Index, Def) lcd_define_start(Index); lcd_define_def(Def); lcd_define_end();
// Pripravene definice fontu vybranych znaku
// V tabulce nesmi byt 00 (konec retezce v printf()), misto toho davame 80
//
#DEFINE LCD_CHAR_BAT100 "\x0E\x1F\x1F\x1F\x1F\x1F\x1F\x1F" /* symbol plne baterie */
#DEFINE LCD_CHAR_BAT50 "\x0E\x1F\x11\x11\x13\x17\x1F\x1F" /* symbol polovicni baterie */
#DEFINE LCD_CHAR_BAT0 "\x0E\x1F\x11\x11\x11\x11\x11\x1F" /* symbol vybite baterie */
#DEFINE LCD_CHAR_LUA "\x04\x0E\x11\x11\x1F\x11\x11\x80" /* A s carkou */
#DEFINE LCD_CHAR_LLA "\x01\x02\x0E\x01\x1F\x11\x0F\x80" /* a s carkou */
#DEFINE LCD_CHAR_HUC "\x0A\x0E\x11\x10\x10\x11\x0E\x80" /* C s hackem */
#DEFINE LCD_CHAR_HLC "\x0A\x04\x0E\x10\x10\x11\x0E\x80" /* c s hackem */
#DEFINE LCD_CHAR_HUD "\x0A\x1C\x12\x11\x11\x12\x1C\x80" /* D s hackem */
#DEFINE LCD_CHAR_HLD "\x05\x03\x0D\x13\x11\x11\x0F\x80" /* d s hackem */
#DEFINE LCD_CHAR_LUE "\x04\x1F\x10\x10\x1E\x10\x1F\x80" /* E s carkou */
#DEFINE LCD_CHAR_LLE "\x01\x02\x0E\x11\x1F\x10\x0E\x80" /* e s carkou */
#DEFINE LCD_CHAR_HUE "\x0A\x1F\x10\x1E\x10\x10\x1F\x80" /* E s hackem */
#DEFINE LCD_CHAR_HLE "\x0A\x04\x0E\x11\x1F\x10\x0E\x80" /* e s hackem */
#DEFINE LCD_CHAR_LUI "\x04\x0E\x04\x04\x04\x04\x0E\x80" /* I s carkou */
#DEFINE LCD_CHAR_LLI "\x02\x04\x80\x0C\x04\x04\x0E\x80" /* i s carkou */
#DEFINE LCD_CHAR_HUN "\x0A\x15\x11\x19\x15\x13\x11\x80" /* N s hackem */
#DEFINE LCD_CHAR_HLN "\x0A\x04\x16\x19\x11\x11\x11\x80" /* n s hackem */
#DEFINE LCD_CHAR_LUO "\x04\x0E\x11\x11\x11\x11\x0E\x80" /* O s carkou */
#DEFINE LCD_CHAR_LLO "\x02\x04\x0E\x11\x11\x11\x0E\x80" /* o s carkou */
#DEFINE LCD_CHAR_HUR "\x0A\x1E\x11\x1E\x14\x12\x11\x80" /* R s hackem */
#DEFINE LCD_CHAR_HLR "\x0A\x04\x16\x19\x10\x10\x10\x80" /* r s hackem */
#DEFINE LCD_CHAR_HUS "\x0A\x0F\x10\x0E\x01\x01\x1E\x80" /* S s hackem */
#DEFINE LCD_CHAR_HLS "\x0A\x04\x0E\x10\x0E\x01\x1E\x80" /* s s hackem */
#DEFINE LCD_CHAR_HUT "\x0A\x1F\x04\x04\x04\x04\x04\x80" /* T s hackem */
#DEFINE LCD_CHAR_HLT "\x0A\x0C\x1C\x08\x08\x09\x06\x80" /* t s hackem */
#DEFINE LCD_CHAR_LUU "\x02\x15\x11\x11\x11\x11\x0E\x80" /* U s carkou */
#DEFINE LCD_CHAR_LLU "\x02\x04\x11\x11\x11\x13\x0D\x80" /* u s carkou */
#DEFINE LCD_CHAR_CUU "\x06\x17\x11\x11\x11\x11\x0E\x80" /* U s krouzkem */
#DEFINE LCD_CHAR_CLU "\x06\x06\x11\x11\x11\x11\x0E\x80" /* u s krouzkem */
#DEFINE LCD_CHAR_LUY "\x02\x15\x11\x0A\x04\x04\x04\x80" /* Y s carkou */
#DEFINE LCD_CHAR_LLY "\x02\x04\x11\x11\x0F\x01\x0E\x80" /* y s carkou */
#DEFINE LCD_CHAR_HUZ "\x0A\x1F\x01\x02\x04\x08\x1F\x80" /* Z s hackem */
#DEFINE LCD_CHAR_HLZ "\x0A\x04\x1F\x02\x04\x08\x1F\x80" /* z s hackem */
// Priklad pouziti definovanych znaku
//
//
//void lcd_sample()
//{
// lcd_define_char(0,LCD_CHAR_BAT50); // Priklad definice znaku baterie do pozice 0
// lcd_define_char(2,LCD_CHAR_HLE LCD_CHAR_LUI); // Priklad definice znaku e s hackem a I s carkou od pozice 2
// // vsimnete si, ze neni carka mezi retezci s definici (oba retezce definuji
// // jediny definicni retezec)
// printf(lcd_putc,"\fZnaky:\20\22\23"); // priklad vypisu znaku z pozice 0, 2 a 3
// delay_ms(1000);
// lcd_define_char(0,LCD_CHAR_BAT0); // Predefinovani tvaru znaku v pozici 0
// delay_ms(1000);
//}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/mylcd.c
0,0 → 1,271
// LCD modul pro ovladani dvouradkoveho LCD modulu se standardnim Hitachi radicem
// (c)miho 2002
//
// Historie:
//
// 0.0 Uvodni verze se snadnou definici portu LCD displeje
//
//
// Funkce:
//
// lcd_init() inicializuje LCD displej a porty, nutno volat jako prvni
//
// lcd_putc(c) zapis snaku do lcd displeje, zpracovava nasledujici ridici znaky
// \f = \x0C - nova stranka - smazani displeje
// \n = \x0A - odradkovani (prechod na druhou radku)
// \b = \x08 - backspace - posunuti kurzoru o 1 pozici zpet
// \r = \x0D - goto home to position 1,1
// \0 .. \7 - definovatelne znaky v pozicich 0 az 7 v CGRAM
// \20 .. \27 - alternativne zapsane znaky (oktalove) v pozicich 0 az 7 CGRAM
// Pozor na to, ze funkce printf konci tisk pokud narazi na \0 (konec retezce)
//
// lcd_gotoxy(x,y) presune kurzor na uvedenou adresu
// nekontroluje parametry
//
// lcd_cursor_on zapne kurzor
// lcd_cursor_off vypne kurzor
//
// lcd_define_char(Index, Def) Makro, ktere definuje znaky od pozice Index obsahem definicniho
// retezce Def. Kazdych 8 znaku retezce Def definuje dalsi znak v CGRAM.
// Kapacita CGRAM je celkem 8 znaku s indexem 0 az 7.
// Na konci se provede lcd_gotoxy(1,1).
// Na konci teto knihovny je priklad pouziti definovanych znaku
//
// Definice portu:
//
// #DEFINE LCD_RS PIN_B2 // rizeni registru LCD displeje
// #DEFINE LCD_E PIN_B1 // enable LCD displeje
// #DEFINE LCD_DATA_LSB PIN_C2 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou)
// Privatni sekce, cist jen v pripade, ze neco nefunguje
// Generovane defince portu pro ucely teto knihovny aby kod generoval spravne IO operace a soucasne
// bylo mozne jednoduse deklarovat pripojene piny LCD displeje pri pouziti teto knihovny. Problem spociva
// v tom, ze se musi spravne ridit smery portu a soucasne datovy port zabira jen 4 bity ze zadaneho portu
//
#DEFINE LCD_SHIFT (LCD_DATA_LSB&7) // pocet bitu posuvu dataoveho kanalu v datovem portu
#DEFINE LCD_PORT (LCD_DATA_LSB>>3) // adresa LCD datoveho portu
#DEFINE LCD_TRIS (LCD_PORT+0x80) // adresa prislusneho TRIS registru
#DEFINE LCD_MASK (0xF<<LCD_SHIFT) // maska platnych bitu
//
#IF LCD_SHIFT>4 // kontrola mezi
#ERROR LCD data port LSB bit not in range 0..4
#ENDIF
// Definice konstant pro LCD display
//
#define LCD_CURSOR_ON_ 0x0E // kurzor jako blikajici radka pod znakem
#define LCD_CURSOR_OFF_ 0x0C // zadny kurzor
#define LCD_LINE_2 0x40 // adresa 1. znaku 2. radky
// Definice rezimu LCD displeje
//
BYTE const LCD_INIT_STRING[4] =
{
0x28, // intrfejs 4 bity, 2 radky, font 5x7
LCD_CURSOR_OFF_, // display on, kurzor off,
0x01, // clear displeje
0x06 // inkrement pozice kurzoru (posun kurzoru doprava)
};
// Odesle nibble do displeje (posle data a klikne signalem e)
//
void lcd_send_nibble( BYTE n )
{
*LCD_PORT = (*LCD_PORT & ~LCD_MASK) | ((n << LCD_SHIFT) & LCD_MASK); // nastav datove bity portu a ostatni zachovej
output_bit(LCD_E,1); // vzestupna hrana
delay_us(1); // pockej alespon 450ns od e nebo alespon 195ns od dat
output_bit(LCD_E,0); // sestupna hrana (minimalni perioda e je 1us)
}
// Odesle bajt do registru LCD
//
// Pokud je Adr=0 .. instrukcni registr
// Pokud je Adr=1 .. datovy registr
//
void lcd_send_byte( BOOLEAN Adr, BYTE n )
{
output_bit(LCD_RS,Adr); // vyber registr
swap(n);
lcd_send_nibble(n); // posli horni pulku bajtu
swap(n);
lcd_send_nibble(n); // posli spodni pulku bajtu
delay_us(40); // minimalni doba na provedeni prikazu
}
// Provede inicializaci LCD displeje, smaze obsah a nastavi mod displeje
//
// Tato procedura se musi volat pred pouzitim ostatnich lcd_ procedur
//
void lcd_init()
{
int i; // pocitadlo cyklu
delay_ms(20); // spozdeni pro provedeni startu displeje po zapnuti napajeni
*LCD_TRIS = *LCD_TRIS & ~LCD_MASK; // nuluj odpovidajici bity tris registru datoveho portu LCD
output_bit(LCD_RS,0); // nastav jako vystup a nastav klidovy stav
output_bit(LCD_E,0); // nastav jako vystup a nastav klidovy stav
for (i=0; i<3; i++) // nastav lcd do rezimu 8 bitu sbernice
{
delay_ms(2); // muze byt rozdelany prenos dat (2x 4 bity) nebo pomaly povel
lcd_send_nibble(3); // rezim 8 bitu
}
delay_us(40); // cas na zpracovani
lcd_send_nibble(2); // nastav rezim 4 bitu (plati od nasledujiciho prenosu)
delay_us(40); // cas na zpracovani
for (i=0;i<3;i++) // proved inicializaci (nastaveni modu, smazani apod)
{
lcd_send_byte(0,LCD_INIT_STRING[i]);
delay_ms(2);
}
}
// Proved presun kurzoru
//
// Pozice 1.1 je domu
//
void lcd_gotoxy( BYTE x, BYTE y)
{
BYTE Adr;
Adr=x-1;
if(y==2)
Adr+=LCD_LINE_2;
lcd_send_byte(0,0x80|Adr);
}
// Zapis znaku na displej, zpracovani ridicich znaku
//
void lcd_putc( char c)
{
switch (c)
{
case '\f' : lcd_send_byte(0,1); // smaz displej
delay_ms(2);
break;
case '\n' : lcd_gotoxy(1,2); break; // presun se na 1. znak 2. radky
case '\r' : lcd_gotoxy(1,1); break; // presun home
case '\b' : lcd_send_byte(0,0x10); break; // posun kurzor o 1 zpet
default : if (c<0x20) c&=0x7; // preklopeni definovatelnych znaku na rozsah 0 az 0x1F
lcd_send_byte(1,c); break; // zapis znak
}
}
// Zapni kurzor
//
void lcd_cursor_on()
{
lcd_send_byte(0,LCD_CURSOR_ON_);
}
// Vypni kurzor
//
void lcd_cursor_off()
{
lcd_send_byte(0,LCD_CURSOR_OFF_);
}
// Definice vlastnich fontu
//
// Vlastnich definic muze byt jen 8 do pozic 0 az 7 pameti CGRAM radice lcd displeje
// Pro snadne definovani jsou pripraveny nasledujici definice a na konci souboru je uveden
// priklad pouziti definovanych znaku.
// Pomocna procedura pro posilani ridicich dat do radice displeje
//
void lcd_putc2(int Data)
{
lcd_send_byte(1,Data);
}
// Pomocne definice pro programovani obsahu CGRAM
//
#DEFINE lcd_define_start(Code) lcd_send_byte(0,0x40+(Code<<3)); delay_ms(2)
#DEFINE lcd_define_def(String) printf(lcd_putc2,String);
#DEFINE lcd_define_end() lcd_send_byte(0,3); delay_ms(2)
// Vlastni vykonne makro pro definovani fontu do pozice Index CGRAM s definicnim retezcem Def
//
#DEFINE lcd_define_char(Index, Def) lcd_define_start(Index); lcd_define_def(Def); lcd_define_end();
// Pripravene definice fontu vybranych znaku
// V tabulce nesmi byt 00 (konec retezce v printf()), misto toho davame 80
//
#DEFINE LCD_CHAR_BAT100 "\x0E\x1F\x1F\x1F\x1F\x1F\x1F\x1F" /* symbol plne baterie */
#DEFINE LCD_CHAR_BAT50 "\x0E\x1F\x11\x11\x13\x17\x1F\x1F" /* symbol polovicni baterie */
#DEFINE LCD_CHAR_BAT0 "\x0E\x1F\x11\x11\x11\x11\x11\x1F" /* symbol vybite baterie */
#DEFINE LCD_CHAR_LUA "\x04\x0E\x11\x11\x1F\x11\x11\x80" /* A s carkou */
#DEFINE LCD_CHAR_LLA "\x01\x02\x0E\x01\x1F\x11\x0F\x80" /* a s carkou */
#DEFINE LCD_CHAR_HUC "\x0A\x0E\x11\x10\x10\x11\x0E\x80" /* C s hackem */
#DEFINE LCD_CHAR_HLC "\x0A\x04\x0E\x10\x10\x11\x0E\x80" /* c s hackem */
#DEFINE LCD_CHAR_HUD "\x0A\x1C\x12\x11\x11\x12\x1C\x80" /* D s hackem */
#DEFINE LCD_CHAR_HLD "\x05\x03\x0D\x13\x11\x11\x0F\x80" /* d s hackem */
#DEFINE LCD_CHAR_LUE "\x04\x1F\x10\x10\x1E\x10\x1F\x80" /* E s carkou */
#DEFINE LCD_CHAR_LLE "\x01\x02\x0E\x11\x1F\x10\x0E\x80" /* e s carkou */
#DEFINE LCD_CHAR_HUE "\x0A\x1F\x10\x1E\x10\x10\x1F\x80" /* E s hackem */
#DEFINE LCD_CHAR_HLE "\x0A\x04\x0E\x11\x1F\x10\x0E\x80" /* e s hackem */
#DEFINE LCD_CHAR_LUI "\x04\x0E\x04\x04\x04\x04\x0E\x80" /* I s carkou */
#DEFINE LCD_CHAR_LLI "\x02\x04\x80\x0C\x04\x04\x0E\x80" /* i s carkou */
#DEFINE LCD_CHAR_HUN "\x0A\x15\x11\x19\x15\x13\x11\x80" /* N s hackem */
#DEFINE LCD_CHAR_HLN "\x0A\x04\x16\x19\x11\x11\x11\x80" /* n s hackem */
#DEFINE LCD_CHAR_LUO "\x04\x0E\x11\x11\x11\x11\x0E\x80" /* O s carkou */
#DEFINE LCD_CHAR_LLO "\x02\x04\x0E\x11\x11\x11\x0E\x80" /* o s carkou */
#DEFINE LCD_CHAR_HUR "\x0A\x1E\x11\x1E\x14\x12\x11\x80" /* R s hackem */
#DEFINE LCD_CHAR_HLR "\x0A\x04\x16\x19\x10\x10\x10\x80" /* r s hackem */
#DEFINE LCD_CHAR_HUS "\x0A\x0F\x10\x0E\x01\x01\x1E\x80" /* S s hackem */
#DEFINE LCD_CHAR_HLS "\x0A\x04\x0E\x10\x0E\x01\x1E\x80" /* s s hackem */
#DEFINE LCD_CHAR_HUT "\x0A\x1F\x04\x04\x04\x04\x04\x80" /* T s hackem */
#DEFINE LCD_CHAR_HLT "\x0A\x0C\x1C\x08\x08\x09\x06\x80" /* t s hackem */
#DEFINE LCD_CHAR_LUU "\x02\x15\x11\x11\x11\x11\x0E\x80" /* U s carkou */
#DEFINE LCD_CHAR_LLU "\x02\x04\x11\x11\x11\x13\x0D\x80" /* u s carkou */
#DEFINE LCD_CHAR_CUU "\x06\x17\x11\x11\x11\x11\x0E\x80" /* U s krouzkem */
#DEFINE LCD_CHAR_CLU "\x06\x06\x11\x11\x11\x11\x0E\x80" /* u s krouzkem */
#DEFINE LCD_CHAR_LUY "\x02\x15\x11\x0A\x04\x04\x04\x80" /* Y s carkou */
#DEFINE LCD_CHAR_LLY "\x02\x04\x11\x11\x0F\x01\x0E\x80" /* y s carkou */
#DEFINE LCD_CHAR_HUZ "\x0A\x1F\x01\x02\x04\x08\x1F\x80" /* Z s hackem */
#DEFINE LCD_CHAR_HLZ "\x0A\x04\x1F\x02\x04\x08\x1F\x80" /* z s hackem */
// Priklad pouziti definovanych znaku
//
//
//void lcd_sample()
//{
// lcd_define_char(0,LCD_CHAR_BAT50); // Priklad definice znaku baterie do pozice 0
// lcd_define_char(2,LCD_CHAR_HLE LCD_CHAR_LUI); // Priklad definice znaku e s hackem a I s carkou od pozice 2
// // vsimnete si, ze neni carka mezi retezci s definici (oba retezce definuji
// // jediny definicni retezec)
// printf(lcd_putc,"\fZnaky:\20\22\23"); // priklad vypisu znaku z pozice 0, 2 a 3
// delay_ms(1000);
// lcd_define_char(0,LCD_CHAR_BAT0); // Predefinovani tvaru znaku v pozici 0
// delay_ms(1000);
//}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/prg.bat
0,0 → 1,8
:start
call picpgr stop
call picpgr erase pic16f873
call picpgr program main.hex hex pic16f873 LVP_OFF
call picpgr run
pause
call picpgr stop
rem goto start

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/run.bat
0,0 → 1,5
call picpgr run
pause
call picpgr stop
pause
run.bat

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/vssver.scc
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Added: svn:mime-type
+application/octet-stream
\ No newline at end of property

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/vysilac.BAK
0,0 → 1,43
// Odesle nulu nebo jednicku podle nejnizsiho bitu predanych dat
// Nula je posloupnost LH a jednicka je HL
void odeslat_bit(int bit)
{
output_bit(VYSILAC,bit);
delay_us(IMPULS);
output_bit(VYSILAC,!bit);
delay_us(IMPULS);
}
// odesle datovy ramec
void odeslat_paket(int8 kanal,int8 data)
{
int i;
int8 suma;
data &= 0x1F; // pro jistotu orizneme data, kdyby nekdo chtel prenaset vic poloh
data |= kanal << 5; // slozi osu a hodnotu do packetu
swap(data); // vypocet kontrolniho souctu
suma = data & 0xF;
swap(data);
suma += (data & 0xF);
suma++;
odeslat_bit(0); // start bit
for (i=8; i>0; i--) // data
{
odeslat_bit(bit_test(data,7));
data <<= 1;
}
for (i=4; i>0; i--) // checksum
{
odeslat_bit(bit_test(suma,4));
suma <<= 1;
}
output_high(VYSILAC);
}

/schemata/prenos/letadlo/SW/vysilac/posledni_funkcni_verze/vysilac.c
0,0 → 1,43
// Odesle nulu nebo jednicku podle nejnizsiho bitu predanych dat
// Nula je posloupnost LH a jednicka je HL
void odeslat_bit(int bit)
{
output_bit(VYSILAC,bit);
delay_us(IMPULS);
output_bit(VYSILAC,!bit);
delay_us(IMPULS);
}
// odesle datovy ramec
void odeslat_paket(int8 kanal,int8 data)
{
int i;
int8 suma;
data &= 0x1F; // pro jistotu orizneme data, kdyby nekdo chtel prenaset vic poloh
data |= kanal << 5; // slozi osu a hodnotu do packetu
swap(data); // vypocet kontrolniho souctu
suma = data & 0xF;
swap(data);
suma += data & 0xF;
suma++;
odeslat_bit(0); // start bit
for (i=8; i>0; i--) // data
{
odeslat_bit(bit_test(data,7));
data <<= 1;
}
for (i=4; i>0; i--) // checksum
{
odeslat_bit(bit_test(suma,3));
suma <<= 1;
}
output_high(VYSILAC);
}