Konwersja programu Bascom AVR na C dla LCD 16x2 (ATmega8, wyświetlanie tekstu)

$regfile = "m8def.dat"                                      'informuje kompilator o pliku
      'dyrektyw mikrokontrolera
$crystal = 8000000                                          'informuje kompilator
      'o częstotliwości oscylatora
      'taktującego mikrokontroler

Config Lcd = 16 * 2                                         'konfiguracja typu wyświetlacza
      'LCD
Config Lcdpin = Pin , Db4 = Portd.5 , Db5 = Portd.6 , Db6 = Portd.7 , Db7 = Portd.4 , E = Portd.3 , Rs = Portd.2       'konfiguracja linii
      'mikrokontrolera, do których
      'dołączono wyświetlacz
      'LCD
Dim B1 As String * 20
B1 = "Bascom"
Cls
do
locate 1,1

Lcd "BI{097}LO NIEBIESKI"
Locate 2 , 1
Lcd B1
Loop
End

#include<avr/io.h> //sam typ procesora wybiera się w opcjach
#include "lcd.h" //tu są przypisane wyprowadzenia do lcd i prototypy funkcji do obsługi lcd
#ifndef F_CPU 
#define F_CPU  8000000UL //to w sumie nie potrzebne bo wybiera się w oppcjach
#endif

char B1[21] = "Bascom";//w C dodatkowo 1 bajt na koniec łańcuch znaków
//można też tak B1[] = "Bascom"; kompilator sam dobierze rozmiar  
int main(void)
{
   cls();
   do
   { 
      locate(1,1); 
      lcd_puts_P ("BIALO NIEBIESKI");//wyświetlenie łańcuch z pamięci programu i umieszczenie łańcuch w pamięci programu
      locate(2,1); 
      lcd_puts(B1);//wyświetlenie łańcuch z pamięci danych
   } 
   while(1); 
   return 0; 
}

#define lcdPort PORTD
#define lcdDb4 5
#define lcdDb5 6
#define lcdDb6 7
#define lcdDb7 4
#define lcdE 3
#define lcdRs 2