Subversion Repositories Kolibri OS

Compare Revisions

No changes between revisions

Regard whitespace Rev 4152 → Rev 4151

/programs/cmm/liza/img/letter_icons.raw
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property
/programs/cmm/liza/img/letter_icons.png
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Deleted: svn:mime-type
-application/octet-stream
\ No newline at end of property
/programs/cmm/liza/img/letter_icons.h
File deleted
\ No newline at end of file
/programs/cmm/liza/img
Property changes:
Deleted: tsvn:logminsize
-5
\ No newline at end of property
/programs/cmm/liza/liza.c
2,25 → 2,24
 
//libraries
#define MEMSIZE 0xA0000
#include "../lib/kolibri.h"
#include "../lib/strings.h"
#include "../lib/mem.h"
#include "../lib/dll.h"
#include "../lib/encoding.h"
#include "../lib/figures.h"
#include "../lib/file_system.h"
#include "../lib/list_box.h"
#include "../lib/socket_new.h"
#include "..\lib\kolibri.h"
#include "..\lib\strings.h"
#include "..\lib\mem.h"
#include "..\lib\dll.h"
#include "..\lib\encoding.h"
#include "..\lib\figures.h"
#include "..\lib\file_system.h"
#include "..\lib\list_box.h"
#include "..\lib\socket_new.h"
//*.obj libraries
#include "../lib/lib.obj/box_lib.h"
#include "../lib/lib.obj/network.h"
#include "../lib/lib.obj/libio_lib.h"
#include "../lib/lib.obj/libimg_lib.h"
#include "../lib/lib.obj/netcode.h"
#include "../lib/lib.obj/iconv.h"
#include "..\lib\lib.obj\box_lib.h"
#include "..\lib\lib.obj\network.h"
#include "..\lib\lib.obj\libio_lib.h"
#include "..\lib\lib.obj\libimg_lib.h"
#include "..\lib\lib.obj\netcode.h"
#include "..\lib\lib.obj\iconv.h"
//images
byte letter_icons[sizeof(file "img/letter_icons.raw")] = FROM "img/letter_icons.raw";
#include "img/letter_icons.h"
byte in_out_mail[18*36] = FROM "in_out_mail.raw";
 
//connection algorithm
enum {
46,9 → 45,9
#define WIN_H 440
#define WIN_MIN_W 500
#define WIN_MIN_H 380
#define LOGIN_HEADER "Login - Email client Liza 0.9b"
#define OPTIONS_HEADER "Options - Email client Liza 0.9b"
#define MAILBOX_HEADER "Mail Box - Email client Liza 0.9b"
#define LOGIN_HEADER "Login - Email client Liza 0.9a"
#define OPTIONS_HEADER "Options - Email client Liza 0.9a"
#define MAILBOX_HEADER "Mail Box - Email client Liza 0.9a"
#define BUFFERSIZE 512
proc_info Form;
system_colors sc;
114,9 → 113,7
ReadFile(0, 512, #read_data, "/sys/network/mail.dat");
if (!read_data)
{
//strcpy(#email_text, "example@mail.com");
strcpy(#email_text, "eiroglif@yandex.ru"); //temporarily, for testing
strcpy(#pass_text, "rostov");
strcpy(#email_text, "example@mail.com");
}
else
{
/programs/cmm/liza/mail_box.c
163,11 → 163,35
case evKey:
key = GetKey();
 
if (!aim) && (mail_list.ProcessKey(key))
{
if (key == 177){ //down
if (aim) break;
if (mail_list.current >= mail_list.count-1) break;
mail_list.current++ ;
if (mail_list.current >= mail_list.first + mail_list.visible) mail_list.first++ ;
DrawMailList();
aim = SEND_RETR;
}
if (key == 178){ //up
if (aim) break;
if (mail_list.current<=0) break;
mail_list.current-- ;
if (mail_list.current < mail_list.first) mail_list.first-- ;
DrawMailList();
aim = SEND_RETR;
}
if (key == 180){ //home
if (aim) break;
mail_list.first = mail_list.current = 0;
DrawMailList();
aim = SEND_RETR;
}
if (key == 181){ //end
if (aim) break;
mail_list.first = mail_list.count - mail_list.visible;
mail_list.current = mail_list.count - 1;
DrawMailList();
aim = SEND_RETR;
}
 
break;
case evReDraw: _MB_DRAW:
261,13 → 285,11
if (!mailbuffer) {debug("alloc error!"); aim=NULL; break;}
mailpointer = mailbuffer;
aim = GET_ANSWER_RETR;
debugi(letter_size);
}
if (aim == GET_ANSWER_RETR)
{
ticks = Receive(socketnum, mailpointer, letter_size + mailbuffer - mailpointer , MSG_DONTWAIT);
debugi(ticks);
if (ticks == 0xffffffff) break;
//debugi(EAX);
330,10 → 352,10
DrawBar(0, mail_list.y-1, mail_list.w,1, 0xf0f0f0);
}
 
 
void DrawMailList()
{
int i, on_y, on_x, direction;
dword sel_col;
mail_list.visible = mail_list.h / mail_list.line_h;
 
for (i=30; i<150; i++) DeleteButton(i);
340,13 → 362,17
for (i=0; (i<mail_list.visible) && (i+mail_list.first<mail_list.count); i++)
{
on_y = i*mail_list.line_h + mail_list.y;
if (mail_list.current==mail_list.first+i) sel_col=0xEEEeee; else sel_col=0xFFFfff;
DrawBar(0, on_y, mail_list.w, mail_list.line_h-1, sel_col);
if (mail_list.current==mail_list.first+i)
{
DrawBar(0, on_y, mail_list.w, mail_list.line_h-1, 0xEEEeee);
}
else
{
DrawBar(0, on_y, mail_list.w, mail_list.line_h-1, 0xFFFfff);
}
direction = atr.GetDirection(i+mail_list.first+1);
on_x = strlen(itoa(i+mail_list.first+1))*6;
letter_icons_pal[0]=sel_col;
PutPaletteImage(sizeof(letter_icons)/3*direction + #letter_icons, 18,12, on_x+18,
mail_list.line_h-12/2+ on_y, 8, #letter_icons_pal);
_PutImage(on_x + 18, mail_list.line_h-12/2+ on_y, 18,12, sizeof(in_out_mail)/3*direction + #in_out_mail);
WriteText(on_x + 42, on_y+5, 0x80, 0, atr.GetSubject(i+mail_list.first+1));
DefineButton(0, on_y, mail_list.w-1, mail_list.line_h, 30+i+BT_HIDE+BT_NOFRAME);
DrawBar(0, on_y + mail_list.line_h-1, mail_list.w, 1, 0xCCCccc);
/programs/cmm/liza/compile.bat
1,5 → 1,5
..\C--\C-- liza.c
@del liza
@rename liza.com liza
@del liza_mail
@rename liza.com liza_mail
@del warning.txt
@pause
/programs/cmm/liza/in_out_mail.png
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
/programs/cmm/liza/in_out_mail.raw
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