// exportuje buttony pre predchádzajúcu a nasledujúcu modlitbu | bolo v _hlavicka() aj _patka()
void _buttons_prev_up_next(FILE * expt){
short int _local_modlitba_prev, _local_modlitba_next;
_local_modlitba_prev = modlitba_predchadzajuca(_local_modlitba, (isGlobalOption(OPT_4_OFFLINE_EXPORT, BIT_OPT_4_EXCLUDE_MCD_KOMPLET)));
_local_modlitba_next = modlitba_nasledujuca(_local_modlitba, (isGlobalOption(OPT_4_OFFLINE_EXPORT, BIT_OPT_4_EXCLUDE_MCD_KOMPLET)));
Export_to_file(expt, "\n<div class=\"nav\">");
pismeno_modlitby = CHAR_MODL_NEURCENA;
if ((_local_modlitba < MODL_NEURCENA) && (_local_modlitba >= MODL_INVITATORIUM)){
if (!isGlobalOption(OPT_4_OFFLINE_EXPORT, BIT_OPT_4_FNAME_MODL_ID)){
pismeno_modlitby = char_modlitby[_local_modlitba];
}
else{
pismeno_modlitby = _local_modlitba + '0';
}
}
sprintf(ext, "%c", pismeno_modlitby);
strcat(ext, ".htm");
Export_to_file(expt, HTML_P_BEGIN);
// << prev
mystrcpy(file_name_pom, FILE_EXPORT, MAX_STR);
ptr = strstr(file_name_pom, ext);
if ((_local_modlitba < MODL_NEURCENA) && (_local_modlitba > MODL_INVITATORIUM) && (_local_modlitba_prev < MODL_NEURCENA)){
if (ptr != NULL){
if (!isGlobalOption(OPT_4_OFFLINE_EXPORT, BIT_OPT_4_FNAME_MODL_ID)){
sprintf(pismeno_prev, "%c", char_modlitby[_local_modlitba_prev]);
}
else{
sprintf(pismeno_prev, "%d", _local_modlitba_prev);
}
strncpy(ptr, pismeno_prev, 1);
}
Export_to_file(expt, HTML_A_HREF_BEGIN"\"%s\"%s>", file_name_pom, optional_html_class_button);
Export_to_file(expt, optional_html_button_begin);
Export_to_file(expt, (char *)html_text_batch_Prev[_global_jazyk]);
Export_to_file(expt, " ");
Export_to_file(expt, (char *)nazov_modlitby(_local_modlitba_prev));
Export_to_file(expt, optional_html_button_end);
Export_to_file(expt, HTML_A_END);
// |
Export_to_file(expt, " | ");
}
// ^ hore
Export_to_file(expt, HTML_A_HREF_BEGIN"\".%s%s\"%s>", STR_PATH_SEPARATOR_HTML, _global_export_navig_hore, optional_html_class_button); // v tom istom adresári
Export_to_file(expt, optional_html_button_begin);
Export_to_file(expt, (char *)html_text_batch_Back[_global_jazyk]);
Export_to_file(expt, optional_html_button_end);
Export_to_file(expt, HTML_A_END);
// >> next
mystrcpy(file_name_pom, FILE_EXPORT, MAX_STR);
ptr = strstr(file_name_pom, ext);
if ((_local_modlitba != MODL_NEURCENA) && (_local_modlitba < MODL_KOMPLETORIUM) && (_local_modlitba_next < MODL_NEURCENA)){
if (ptr != NULL){
if (!isGlobalOption(OPT_4_OFFLINE_EXPORT, BIT_OPT_4_FNAME_MODL_ID)){
sprintf(pismeno_next, "%c", char_modlitby[_local_modlitba_next]);
}
else{
sprintf(pismeno_next, "%d", _local_modlitba_next);
}
strncpy(ptr, pismeno_next, 1);
}
// |
Export_to_file(expt, " | ");
Export_to_file(expt, HTML_A_HREF_BEGIN"\"%s\"%s>", file_name_pom, optional_html_class_button);
Export_to_file(expt, optional_html_button_begin);
Export_to_file(expt, (char *)nazov_modlitby(_local_modlitba_next));
Export_to_file(expt, " ");
Export_to_file(expt, (char *)html_text_batch_Next[_global_jazyk]);
Export_to_file(expt, optional_html_button_end);
Export_to_file(expt, HTML_A_END);
}
Export_to_file(expt, HTML_P_END);
Export_to_file(expt, HTML_DIV_END"\n");
}
/* exportuje hlavicku HTML dokumentu, kam pojde vysledok query */
void _hlavicka(char *title, FILE * expt, short int level, short int spec) {
Log("_hlavicka() -- za�iatok...\n");
_local_modlitba = _global_modlitba;
if((_local_modlitba == MODL_PRVE_VESPERY) || (_local_modlitba == MODL_DRUHE_VESPERY))
_local_modlitba = MODL_VESPERY;
if((_local_modlitba == MODL_PRVE_KOMPLETORIUM) || (_local_modlitba == MODL_DRUHE_KOMPLETORIUM))
_local_modlitba = MODL_KOMPLETORIUM;
// 2009-08-04: viackr�t sa pri exporte modlitby do HTML exportovala hlavi�ka; pridan� kontrola
if(_global_hlavicka_Export > 0) {
Log("return... (_global_hlavicka_Export > 0)\n");
return;
}
_global_hlavicka_Export++;
/*
* 2003-07-01, pridane pripadne citanie zo suboru
* 2008-08-08: ��tanie zo s�boru odstr�nen�
*/
const char *nazov_css_suboru;
if(_global_css == CSS_UNDEF) {
nazov_css_suboru = nazov_css[CSS_breviar_sk];
}// _global_css == CSS_UNDEF
else {
nazov_css_suboru = nazov_css[_global_css];
}// else
Log("nazov_css_suboru == %s...\n", nazov_css_suboru);
/*
* 2011-05-05: nastavenie font-family
* zatia� len pevn� re�azce; �asom mo�no bude premenn� pre n�zov fontu
* 2011-05-06: doplnen�: najprv sa testuje nastavenie _global_font; n�sledne sa pr�padne nastavia defaulty
*/
if((_global_font == FONT_UNDEF) || (_global_font == FONT_CHECKBOX)) {
Log("(_global_font == FONT_UNDEF) || (_global_font == FONT_CHECKBOX)...\n");
if((_global_opt[OPT_2_HTML_EXPORT] & BIT_OPT_2_FONT_FAMILY) == BIT_OPT_2_FONT_FAMILY) {
Log("_global_opt[OPT_2_HTML_EXPORT] & BIT_OPT_2_FONT_FAMILY...\n");
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_SANS_SERIF, SMALL);
}
else {
Log("NOT _global_opt[OPT_2_HTML_EXPORT] & BIT_OPT_2_FONT_FAMILY...\n");
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_SERIF, SMALL);
}
}/* (_global_font == FONT_UNDEF) || (_global_font == FONT_CHECKBOX) */
else if(_global_font == FONT_CSS) {
Log("_global_font == FONT_CSS...\n");
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_INHERIT, SMALL);
}// (_global_font == FONT_CSS)
else {
Log("_global_font != FONT_CSS...\n");
mystrcpy(_global_css_font_family, nazov_fontu[_global_font], SMALL);
}// else
Log("_global_css_font_family == %s...\n", _global_css_font_family);
// 2011-05-13: doplnen�: nastavenie font-size
if(_global_font_size == FONT_SIZE_UNDEF) {
mystrcpy(_global_css_font_size, STR_EMPTY, SMALL);
}// (_global_font_size == FONT_SIZE_UNDEF)
else if(_global_font_size == FONT_SIZE_CSS) {
mystrcpy(_global_css_font_size, DEFAULT_FONT_SIZE_INHERIT, SMALL);
}// (_global_font_size == FONT_SIZE_CSS)
else {
mystrcpy(_global_css_font_size, nazov_font_size_css[_global_font_size], SMALL);
}// else
Log("_global_css_font_size == %s...\n", _global_css_font_size);
if(bol_content_type_text_html == NIE) {
#if defined(OS_linux)
Export_to_file(expt, "Content-type: text/html\n");
Export_to_file(expt, "\n");
#elif defined(OS_Windows_Ruby)
Export_to_file(expt, "Content-type: text/html\n");
Export_to_file(expt, "\n");
#endif
bol_content_type_text_html = ANO;
}
Log("creating header...\n");
/* 2003-07-15, zmenene na hlavicku pre css-ko; zrusene <style>
* 2008-08-08: pridan� dynamicky css-ko
* 2010-02-15: statick� texty do kon�t�nt
* 2011-05-18: charset sa nastav� pod�a jazyka
*/
Log("<head>...\n");
Export_to_file(expt, (char *)html_header_1, charset_jazyka[_global_jazyk]);
_header_css(expt, level, nazov_css_suboru);
if (_global_opt[OPT_2_HTML_EXPORT] & BIT_OPT_2_NOCNY_REZIM) {
_header_css(expt, level, nazov_css_invert_colors);
}
Export_to_file(expt, "\t<meta name=\"viewport\" content=\"width=device-width, user-scalable=yes, initial-scale=1.0\" />\n");
Export_to_file(expt, "<title>%s</title>\n", title);
Export_to_file(expt, "</head>\n\n");
Log("</head>...\n");
Log("<body>...\n");
/* 2011-05-05: pridanie font-family
* 2011-05-06: font sa neprid�va v�dy
*/
Export_to_file(expt, "<body");
if((_global_font != FONT_CSS) || (_global_font_size != FONT_SIZE_CSS)) {
Export_to_file(expt, " style=\"");
if(_global_font != FONT_CSS) {
Export_to_file(expt, "font-family: %s", _global_css_font_family);
}
if(_global_font_size != FONT_SIZE_CSS) {
if(_global_font != FONT_CSS) {
Export_to_file(expt, "; ");
}
Export_to_file(expt, "font-size: %s", _global_css_font_size);
}
Export_to_file(expt, "\"");
}
/* 2010-02-15: kv�li �peci�lnemu "zoznam.htm" */
if(spec == 1) {
Export_to_file(expt, " onLoad=\"fn_aktualne(0,0,0)\"");
}
Export_to_file(expt, ">\n");
/* 2010-02-15: doplnen� predo�l� a nasledovn� modlitba */
if(_global_opt_batch_monthly == ANO && query_type != PRM_BATCH_MODE) {
Export_to_file(expt, "<center>\n");
pismeno_modlitby = CHAR_MODL_NEURCENA;
if((_local_modlitba < MODL_NEURCENA) && (_local_modlitba >= MODL_INVITATORIUM))
pismeno_modlitby = char_modlitby[_local_modlitba];
sprintf(ext, "%c", pismeno_modlitby);
strcat(ext, ".htm");
Export_to_file(expt, "<p>");
// << prev
mystrcpy(file_name_pom, FILE_EXPORT, MAX_STR);
ptr = strstr(file_name_pom, ext);
if((_local_modlitba < MODL_NEURCENA) && (_local_modlitba > MODL_INVITATORIUM)) {
if(ptr != NULL) {
sprintf(pismeno_prev, "%c", char_modlitby[_local_modlitba - 1]);
strncpy(ptr, pismeno_prev, 1);
}
Export_to_file(expt, "<a href=\"%s\" "HTML_CLASS_BUTTON">", file_name_pom);
Export_to_file(expt, (char *)html_text_batch_Prev[_global_jazyk]);
Export_to_file(expt, " ");
Export_to_file(expt, (char *)nazov_modlitby(_local_modlitba - 1));
Export_to_file(expt, "</a>");
}
// |
Export_to_file(expt, " | ");
// ^ hore
Export_to_file(expt, "<a href=\".%s%s\" "HTML_CLASS_BUTTON">", STR_PATH_SEPARATOR_HTML, _global_export_navig_hore); // v tom istom adres�ri
Export_to_file(expt, (char *)html_text_batch_Back[_global_jazyk]);
Export_to_file(expt, "</a>");
// |
Export_to_file(expt, " | ");
// >> next
mystrcpy(file_name_pom, FILE_EXPORT, MAX_STR);
ptr = strstr(file_name_pom, ext);
if((_local_modlitba != MODL_NEURCENA) && (_local_modlitba < MODL_KOMPLETORIUM)) {
if(ptr != NULL) {
sprintf(pismeno_next, "%c", char_modlitby[_local_modlitba + 1]);
strncpy(ptr, pismeno_next, 1);
}
Export_to_file(expt, "<a href=\"%s\" "HTML_CLASS_BUTTON">", file_name_pom);
Export_to_file(expt, (char *)nazov_modlitby(_local_modlitba + 1));
Export_to_file(expt, " ");
Export_to_file(expt, (char *)html_text_batch_Next[_global_jazyk]);
Export_to_file(expt, "</a>");
}
Export_to_file(expt, "</p>");
Export_to_file(expt, "</center>\n");
}/* << predo�l� | ^ hore | nasledovn� >> */
Log("_hlavicka() -- koniec.\n");
return;
}// _hlavicka()
/* exportuje patku HTML dokumentu (vysledok query) */
void _patka(FILE * expt) {
char mail_addr[MAX_MAIL_STR] = "";
Log("_patka() -- za�iatok...\n");
_local_modlitba = _global_modlitba;
if((_local_modlitba == MODL_PRVE_VESPERY) || (_local_modlitba == MODL_DRUHE_VESPERY))
_local_modlitba = MODL_VESPERY;
if((_local_modlitba == MODL_PRVE_KOMPLETORIUM) || (_local_modlitba == MODL_DRUHE_KOMPLETORIUM))
_local_modlitba = MODL_KOMPLETORIUM;
/* 2011-07-01: viackr�t sa pri exporte modlitby do HTML exportovala p�tka; pridan� kontrola */
if(_global_patka_Export > 0)
return;
_global_patka_Export++;
time_t t;
struct tm dnes;
int baserok = 1999;
#define ROK 5
char rok[ROK];
time(&t);
/* konvertuje date/time na strukturu */
dnes = *localtime(&t);
/* upravenie time_check structure with the data */
dnes.tm_year = dnes.tm_year + 1900;
dnes.tm_yday = dnes.tm_yday + 1;
mystrcpy(rok, STR_EMPTY, ROK);
if(dnes.tm_year > baserok) {
sprintf(rok, "-%d", dnes.tm_year);
}
/* 2010-02-15: vlo�en� "^ hore" pod�a hlavicka(); doplnen� predo�l� a nasledovn� modlitba */
if(_global_opt_batch_monthly == ANO && query_type != PRM_BATCH_MODE) {
Export_to_file(expt, "<center>\n");
pismeno_modlitby = CHAR_MODL_NEURCENA;
if((_local_modlitba < MODL_NEURCENA) && (_local_modlitba >= MODL_INVITATORIUM))
pismeno_modlitby = char_modlitby[_local_modlitba];
sprintf(ext, "%c", pismeno_modlitby);
strcat(ext, ".htm");
Export_to_file(expt, "<p>");
// << prev
mystrcpy(file_name_pom, FILE_EXPORT, MAX_STR);
ptr = strstr(file_name_pom, ext);
if((_local_modlitba < MODL_NEURCENA) && (_local_modlitba > MODL_INVITATORIUM)) {
if(ptr != NULL) {
sprintf(pismeno_prev, "%c", char_modlitby[_local_modlitba - 1]);
strncpy(ptr, pismeno_prev, 1);
}
Export_to_file(expt, "<a href=\"%s\" "HTML_CLASS_BUTTON">", file_name_pom);
Export_to_file(expt, (char *)html_text_batch_Prev[_global_jazyk]);
Export_to_file(expt, " ");
Export_to_file(expt, (char *)nazov_modlitby(_local_modlitba - 1));
Export_to_file(expt, "</a>");
}
// |
Export_to_file(expt, " | ");
// ^ hore
Export_to_file(expt, "<a href=\".%s%s\" "HTML_CLASS_BUTTON">", STR_PATH_SEPARATOR_HTML, _global_export_navig_hore); // v tom istom adres�ri
Export_to_file(expt, (char *)html_text_batch_Back[_global_jazyk]);
Export_to_file(expt, "</a>");
// |
Export_to_file(expt, " | ");
// >> next
mystrcpy(file_name_pom, FILE_EXPORT, MAX_STR);
ptr = strstr(file_name_pom, ext);
if((_local_modlitba != MODL_NEURCENA) && (_local_modlitba < MODL_KOMPLETORIUM)) {
if(ptr != NULL) {
sprintf(pismeno_next, "%c", char_modlitby[_local_modlitba + 1]);
strncpy(ptr, pismeno_next, 1);
}
Export_to_file(expt, "<a href=\"%s\" "HTML_CLASS_BUTTON">", file_name_pom);
Export_to_file(expt, (char *)nazov_modlitby(_local_modlitba + 1));
Export_to_file(expt, " ");
Export_to_file(expt, (char *)html_text_batch_Next[_global_jazyk]);
Export_to_file(expt, "</a>");
}
Export_to_file(expt, "</p>");
Export_to_file(expt, "</center>\n");
}/* << predo�l� | ^ hore | nasledovn� >> */
Export_to_file(expt, (char *)html_footer_1);
if(_global_opt_batch_monthly == ANO && query_type != PRM_BATCH_MODE) {
mystrcpy(html_mail_label, html_mail_label_short, MAX_MAIL_LABEL);
}
else
{
mystrcpy(html_mail_label, html_mail_label_long, MAX_MAIL_LABEL);
}
Export("\n");
/* 2010-02-15: cel� zapozn�mkovan�
* 2011-07-01: pre web sa exportuje
*/
Export_to_file(expt, "<"HTML_P_PATKA">\n");
#ifdef BEHAVIOUR_WEB
if(_global_opt_batch_monthly == ANO && query_type != PRM_BATCH_MODE) {
Export_to_file(expt, "%s\n", gpage[_global_jazyk]);
/* Export_to_file(expt, "(%s). ", ctime(&t) + 4); */
/* 2008-12-22: odvetven� - pre commandline export (do s�boru) sa netla�� �asov� zlo�ka, kedy bolo HTML generovan� */
#if defined(EXPORT_TO_FILE) && !defined(IO_ANDROID)
Export_to_file(expt, (char *)datum_template[_global_jazyk],
dnes.tm_mday,
nazov_mesiaca(dnes.tm_mon) /* nm[dnes.tm_mon] */,
dnes.tm_year
);
#else
Export_to_file(expt, (char *)datum_cas_template[_global_jazyk],
dnes.tm_mday,
nazov_mesiaca(dnes.tm_mon) /* nm[dnes.tm_mon] */,
dnes.tm_year,
dnes.tm_hour,
dnes.tm_min
// , dnes.tm_sec
);
#endif
Export_to_file(expt, ". ");
}
/* nezabudni zmenit #define BUILD_DATE v mydefs.h (2003-07-15) */
Export_to_file(expt, (char *)build_template[_global_jazyk], BUILD_DATE);
/* zapoznamkovane, 2003-06-30 */
/* Export_to_file(expt, "K�dovanie Windows-1250 (Central European).\n"); */
Export_to_file(expt, "<br>\n");
#endif
/* pridana stranka cfg_HTTP_ADDRESS_default, 12/04/2000A.D. */
Export_to_file(expt, "<"HTML_LINK_NORMAL" href=\"%s\" target=\"_top\">%s</a>\n", cfg_HTTP_ADDRESS_default, cfg_HTTP_DISPLAY_ADDRESS_default);
if(_global_jazyk == JAZYK_HU) {
Log("cfg_MAIL_ADDRESS_default_HU == %s\n", cfg_MAIL_ADDRESS_default_HU);
mystrcpy(mail_addr, cfg_MAIL_ADDRESS_default_HU, MAX_MAIL_STR);
}
else {
Log("cfg_MAIL_ADDRESS_default == %s\n", cfg_MAIL_ADDRESS_default);
mystrcpy(mail_addr, cfg_MAIL_ADDRESS_default, MAX_MAIL_STR);
}
Log("mail_addr == %s\n", mail_addr);
Export_to_file(expt, "© %d%s <"HTML_LINK_NORMAL" href=\"mailto:%s\">%s</a>\n", baserok, rok, mail_addr, html_mail_label);
Export_to_file(expt, "</p>\n"); /* pridane kvoli tomu, ze cele to bude <p class="patka">, 2003-07-02 */
Export_to_file(expt, "</body>\n</html>\n");
Log("_patka() -- koniec.\n");
return;
}// _patka()
void hlavicka(char *title, short int level, short int spec){
Log("hlavicka() -- za�iatok...\n");
_local_modlitba = _global_modlitba;
if((_local_modlitba == MODL_PRVE_VESPERY) || (_local_modlitba == MODL_DRUHE_VESPERY))
_local_modlitba = MODL_VESPERY;
if((_local_modlitba == MODL_PRVE_KOMPLETORIUM) || (_local_modlitba == MODL_DRUHE_KOMPLETORIUM))
_local_modlitba = MODL_KOMPLETORIUM;
/* 2009-08-04: viackr�t sa pri exporte modlitby do HTML exportovala hlavi�ka; pridan� kontrola */
if(_global_hlavicka_Export > 0)
return;
_global_hlavicka_Export++;
/*
* 2003-07-01, pridane pripadne citanie zo suboru
* 2008-08-08: ��tanie zo s�boru odstr�nen�
*/
const char *nazov_css_suboru;
if(_global_css == CSS_UNDEF)
nazov_css_suboru = nazov_css[CSS_breviar_sk];
else
nazov_css_suboru = nazov_css[_global_css];
/*
* 2011-05-05: nastavenie font-family
* zatia� len pevn� re�azce; �asom mo�no bude premenn� pre n�zov fontu
* 2011-05-06: doplnen�: najprv sa testuje nastavenie _global_font; n�sledne sa pr�padne nastavia defaulty
*/
if((_global_font == FONT_UNDEF) || (_global_font == FONT_CHECKBOX)){
if((_global_opt[OPT_2_HTML_EXPORT] & BIT_OPT_2_FONT_FAMILY) == BIT_OPT_2_FONT_FAMILY){
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_SANS_SERIF, MAX_STR);
}
else{
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_SERIF, MAX_STR);
}
}/* (_global_font == FONT_UNDEF) || (_global_font == FONT_CHECKBOX) */
else if(_global_font == FONT_CSS){
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_INHERIT, MAX_STR);
}/* (_global_font == FONT_CSS) */
else{
mystrcpy(_global_css_font_family, nazov_fontu[_global_font], MAX_STR);
}/* else */
/*
* 2011-05-13: doplnen�: nastavenie font-size
*/
if(_global_font_size == FONT_SIZE_UNDEF){
mystrcpy(_global_css_font_size, STR_EMPTY, MAX_STR);
}/* (_global_font_size == FONT_SIZE_UNDEF) */
else if(_global_font_size == FONT_SIZE_CSS){
mystrcpy(_global_css_font_size, DEFAULT_FONT_SIZE_INHERIT, MAX_STR);
}/* (_global_font_size == FONT_SIZE_CSS) */
else{
mystrcpy(_global_css_font_size, nazov_font_size_css[_global_font_size], MAX_STR);
}/* else */
if(bol_content_type_text_html == NIE){
#if defined(OS_linux)
Export("Content-type: text/html\n");
Export("\n");
#elif defined(OS_Windows_Ruby)
Export("Content-type: text/html\n");
Export("\n");
#endif
bol_content_type_text_html = ANO;
}
Log("creating header...\n");
/* 2003-07-15, zmenene na hlavicku pre css-ko; zrusene <style>
* 2008-08-08: pridan� dynamicky css-ko
* 2010-02-15: statick� texty do kon�t�nt
* 2011-05-18: charset sa nastav� pod�a jazyka
*/
Export((char *)html_header_1, charset_jazyka[_global_jazyk]);
#ifdef EXPORT_CMDLINE_CSS
// pre command-line pou�itie (aj pre batch m�d): "./breviar.css" resp. ".\breviar.css"
/* 2009-08-03: level ozna�uje po�et adres�rov, o ktor� je treba �s� "hore" (pre mesa�n� export) */
if(level == 0 && _global_opt_batch_monthly == ANO)
level = 1;
if(level < 0 || level > 5)
level = 0;
if(level == 0)
Export(".");
else{
while(level > 1){
Export("..");
Export(STR_PATH_SEPARATOR_HTML);
level--;
}
Export("..");
}
Export(STR_PATH_SEPARATOR_HTML);
#else
// pre web-pou�itie (aj pre ruby): "/breviar.css"
Export("/");
#endif
Export("%s\">\n", nazov_css_suboru); // n�zov css s�boru
Export("<title>%s</title>\n", title);
Export("</head>\n\n");
/* 2011-05-05: pridanie font-family
* 2011-05-06: font sa neprid�va v�dy
*/
Export("<body");
if((_global_font != FONT_CSS) || (_global_font_size != FONT_SIZE_CSS)){
Export(" style=\"");
if(_global_font != FONT_CSS){
Export("font-family: %s", _global_css_font_family);
}
if(_global_font_size != FONT_SIZE_CSS){
if(_global_font != FONT_CSS){
Export("; ");
}
Export("font-size: %s", _global_css_font_size);
}
Export("\"");
}
/* 2010-02-15: kv�li �peci�lnemu "zoznam.htm" */
if(spec == 1){
Export(" onLoad=\"fn_aktualne(0,0,0)\"");
}
Export(">\n");
/* 2010-02-15: doplnen� predo�l� a nasledovn� modlitba */
if(_global_opt_batch_monthly == ANO && query_type != PRM_BATCH_MODE){
Export("<center>\n");
pismeno_modlitby = CHAR_MODL_NEURCENA;
if((_local_modlitba < MODL_NEURCENA) && (_local_modlitba >= MODL_INVITATORIUM))
pismeno_modlitby = char_modlitby[_local_modlitba];
sprintf(ext, "%c", pismeno_modlitby);
strcat(ext, ".htm");
Export("<p>");
// << prev
mystrcpy(file_name_pom, FILE_EXPORT, MAX_STR);
ptr = strstr(file_name_pom, ext);
if((_local_modlitba < MODL_NEURCENA) && (_local_modlitba > MODL_INVITATORIUM)){
if(ptr != NULL){
sprintf(pismeno_prev, "%c", char_modlitby[_local_modlitba - 1]);
strncpy(ptr, pismeno_prev, 1);
}
Export("<a href=\"%s\">", file_name_pom);
Export((char *)html_text_batch_Prev[_global_jazyk]);
Export(" ");
Export((char *)nazov_modlitby(_local_modlitba - 1));
Export("</a>");
}
// |
Export(" | ");
// ^ hore
Export("<a href=\".%s%s\">", STR_PATH_SEPARATOR_HTML, _global_export_navig_hore); // v tom istom adres�ri
Export((char *)html_text_batch_Back[_global_jazyk]);
Export("</a>");
// |
Export(" | ");
// >> next
mystrcpy(file_name_pom, FILE_EXPORT, MAX_STR);
ptr = strstr(file_name_pom, ext);
if((_local_modlitba != MODL_NEURCENA) && (_local_modlitba < MODL_KOMPLETORIUM)){
if(ptr != NULL){
sprintf(pismeno_next, "%c", char_modlitby[_local_modlitba + 1]);
strncpy(ptr, pismeno_next, 1);
}
Export("<a href=\"%s\">", file_name_pom);
Export((char *)nazov_modlitby(_local_modlitba + 1));
Export(" ");
Export((char *)html_text_batch_Next[_global_jazyk]);
Export("</a>");
}
Export("</p>");
Export("</center>\n");
}/* << predo�l� | ^ hore | nasledovn� >> */
Log("hlavicka() -- koniec.\n");
return;
}/* hlavicka() */