#include "..\inc\swilib.h" #include "..\inc\cfg_items.h" #pragma inline void patch_header(HEADER_DESC* head) { head->rc.x=0; head->rc.y=YDISP; head->rc.x2=ScreenW()-1; head->rc.y2=HeaderH()+YDISP; } #pragma inline void patch_input(INPUTDIA_DESC* inp) { inp->rc.x=0; inp->rc.y=HeaderH()+1+YDISP; inp->rc.x2=ScreenW()-1; inp->rc.y2=ScreenH()-SoftkeyH()-1; } #pragma inline void patch_rect(RECT*rc,int x,int y, int x2, int y2) { rc->x=x; rc->y=y; rc->x2=x2; rc->y2=y2; } int menusoftkeys[]={0,1,2}; SOFTKEY_DESC menu_sk[]= { {0x0018,0x0000,(int)"СЎФс"}, {0x0001,0x0000,(int)"·µ»Ш"}, {0x003D,0x0000,(int)LGP_DOIT_PIC} }; SOFTKEYSTAB menu_skt= { menu_sk,0 }; #define icon 0 char t_bm1[]="КйЗ©1 000000000"; char t_bm2[]="КйЗ©2 000000000"; char t_bm3[]="КйЗ©3 000000000"; char t_bm4[]="КйЗ©4 000000000"; WSHDR *info_ws; WSHDR *upinfo_ws; WSHDR *e_ws; extern const unsigned int INK; extern const unsigned int PAPER; extern const unsigned int DISPLAY_LIGHT; volatile int terminated=0; volatile int loadmenu_id; volatile int edit_id; volatile int text_changed=0; void DrwImg(IMGHDR *img, int x, int y, char *pen, char *brush) { RECT rc; DRWOBJ drwobj; StoreXYWHtoRECT(&rc,x,y,img->w,img->h); SetPropTo_Obj5(&drwobj,&rc,0,img); SetColor(&drwobj,pen,brush); DrawObject(&drwobj); } volatile unsigned int editmode=0; volatile int stk_fhandle=-1; volatile unsigned int draw_mode=255; volatile unsigned int font_size=6; volatile unsigned int clip_pasted; typedef struct { GUI gui; // WSHDR *ws1; // WSHDR *ws2; // int i1; }MAIN_GUI; typedef struct { CSM_RAM csm; int gui_id; }MAIN_CSM; const int minus11=-11; const char bmpDiskAccess[12]={0xFC,0x86,0xB3,0xA9,0xB1,0xA9,0x81,0xFF}; const IMGHDR imgDiskAccess = {8,8,0x1,(char *)bmpDiskAccess}; int u_disk; //Дисковый указател?верхнего стек?(?блоках по STKSZ50) int d_disk; //Дисковый указател?нижнег?стек?(?блоках по STKSZ50) unsigned int usp; //Указател?на верхни?стек unsigned int dsp; //Указател?на нижний стек //Флаг работы ?диском #define FIRSTLOAD 1 #define LOAD_UP 2 #define LOAD_DOWN 4 #define SAVE_UP 8 #define SAVE_DOWN 16 #define SAVE_FILE 32 volatile int disk_access=FIRSTLOAD; int cursor_cnt; int disable_exit; int win_dos_koi; unsigned int cursor_off; extern const char ted_path[]; char stkfile[128]; unsigned long seek_to_line; unsigned long total_line; unsigned long curline; unsigned int curpos; unsigned long viewline; unsigned int viewpos; unsigned int max_y; unsigned int max_y_emode; unsigned int max_x; unsigned int sheight_emode; unsigned int sheight; //--------------------------------- // //--------------------------------- //unsigned int CSM; //unsigned int eolsymb; unsigned int ConvertFormat(int fin,int fs,int fmt); unsigned int ConvertSimple(int fin,int fs); #define SSIZE 131072 unsigned int STKSZ=(SSIZE); unsigned int STKMAX=(SSIZE-16000); unsigned int STKMIN=(16000); unsigned int STKSZ50=(SSIZE/2); char *ustk; char *dstk; #define MAXBLOCK 1024 unsigned int dbat[MAXBLOCK]; unsigned int ubat[MAXBLOCK]; char bfree[MAXBLOCK]; char font[4096]; char editline[256]; char filename[128]; struct { char name[128]; char font; char fmt; char codepage; char cursor_off; unsigned long line; unsigned long total; unsigned long bookm1; unsigned long bookm2; unsigned long bookm3; unsigned long bookm4; } HISTORY; #define SCR_WIDTH 256 #define SCR_MODULO (SCR_WIDTH/8) char myscr[SCR_MODULO*320]; #ifdef ELKA IMGHDR MyScrHdr = {SCR_WIDTH,320-YDISP,0x1,myscr}; #else IMGHDR MyScrHdr = {255,255,0x1,myscr}; #endif /*GBSTMR tmr2sec; void tmr2sec_proc(void) { if ((disk_access)||(draw_mode>1)) { REDRAW; GBS_StartTimerProc(&tmr2sec,262/2,tmr2sec_proc); } } void Start_tmr2sec(void) { GBS_StartTimerProc(&tmr2sec,262/2,tmr2sec_proc); }*/ volatile char Q_DiskError; void DiskErrorMsg(int mode) { if (Q_DiskError&(1<=128) { switch(win_dos_koi) { case 1: //Win->Dos c=wintranslation[c-128]; break; case 2: //Koi8->Dos c=koi8translation[c-128]; break; } if (c<128) return(c); return(dos2unicode[c-128]); } return(c); } // RECODING TABLE //utf16,cp866,cp1251,koi8 //const far unsigned int unicode2char[]= typedef struct { unsigned short u; char dos; char win; char koi8; } TUNICODE2CHAR; const TUNICODE2CHAR unicode2char[]= { // CAPITAL Cyrillic letters (base) 0x410,0x80,0xC0,0xE1, // ? 0x411,0x81,0xC1,0xE2, // ? 0x412,0x82,0xC2,0xF7, // ? 0x413,0x83,0xC3,0xE7, // ? 0x414,0x84,0xC4,0xE4, // ? 0x415,0x85,0xC5,0xE5, // ? 0x416,0x86,0xC6,0xF6, // ? 0x417,0x87,0xC7,0xFA, // ? 0x418,0x88,0xC8,0xE9, // ? 0x419,0x89,0xC9,0xEA, // ? 0x41A,0x8A,0xCA,0xEB, // ? 0x41B,0x8B,0xCB,0xEC, // ? 0x41C,0x8C,0xCC,0xED, // ? 0x41D,0x8D,0xCD,0xEE, // ? 0x41E,0x8E,0xCE,0xEF, // ? 0x41F,0x8F,0xCF,0xF0, // ? 0x420,0x90,0xD0,0xF2, // ? 0x421,0x91,0xD1,0xF3, // ? 0x422,0x92,0xD2,0xF4, // ? 0x423,0x93,0xD3,0xF5, // ? 0x424,0x94,0xD4,0xE6, // ? 0x425,0x95,0xD5,0xE8, // ? 0x426,0x96,0xD6,0xE3, // ? 0x427,0x97,0xD7,0xFE, // ? 0x428,0x98,0xD8,0xFB, // ? 0x429,0x99,0xD9,0xFD, // ? 0x42A,0x9A,0xDA,0xFF, // ? 0x42B,0x9B,0xDB,0xF9, // ? 0x42C,0x9C,0xDC,0xF8, // ? 0x42D,0x9D,0xDD,0xFC, // ? 0x42E,0x9E,0xDE,0xE0, // ? 0x42F,0x9F,0xDF,0xF1, // ? // CAPITAL Cyrillic letters (additional) 0x402,'_',0x80,'_', // _ .*.* 0x403,'_',0x81,'_', // _ .*.* 0x409,'_',0x8A,'_', // _ .*.* 0x40A,'_',0x8C,'_', // _ .*.* 0x40C,'_',0x8D,'_', // _ .*.* 0x40B,'_',0x8E,'_', // _ .*.* 0x40F,'_',0x8F,'_', // _ .*.* 0x40E,0xF6,0xA1,'_', // ?...* 0x408,0x4A,0xA3,0x4A, // _ .*.* 0x409,0x83,0xA5,0xBD, // _ .*.. 0x401,0xF0,0xA8,0xB3, // ? 0x404,0xF2,0xAA,0xB4, // ? 0x407,0xF4,0xAF,0xB7, // ? 0x406,0x49,0xB2,0xB6, // _ .*.. 0x405,0x53,0xBD,0x53, // _ .*.* // SMALL Cyrillic letters (base) 0x430,0xA0,0xE0,0xC1, // ? 0x431,0xA1,0xE1,0xC2, // ? 0x432,0xA2,0xE2,0xD7, // ? 0x433,0xA3,0xE3,0xC7, // ? 0x434,0xA4,0xE4,0xC4, // ? 0x435,0xA5,0xE5,0xC5, // ? 0x436,0xA6,0xE6,0xD6, // ? 0x437,0xA7,0xE7,0xDA, // ? 0x438,0xA8,0xE8,0xC9, // ? 0x439,0xA9,0xE9,0xCA, // ? 0x43A,0xAA,0xEA,0xCB, // ? 0x43B,0xAB,0xEB,0xCC, // ? 0x43C,0xAC,0xEC,0xCD, // ? 0x43D,0xAD,0xED,0xCE, // ? 0x43E,0xAE,0xEE,0xCF, // ? 0x43F,0xAF,0xEF,0xD0, // ? 0x440,0xE0,0xF0,0xD2, // ? 0x441,0xE1,0xF1,0xD3, // ? 0x442,0xE2,0xF2,0xD4, // ? 0x443,0xE3,0xF3,0xD5, // ? 0x444,0xE4,0xF4,0xC6, // ? 0x445,0xE5,0xF5,0xC8, // ? 0x446,0xE6,0xF6,0xC3, // ? 0x447,0xE7,0xF7,0xDE, // ? 0x448,0xE8,0xF8,0xDB, // ? 0x449,0xE9,0xF9,0xDD, // ? 0x44A,0xEA,0xFA,0xDF, // ? 0x44B,0xEB,0xFB,0xD9, // ? 0x44C,0xEC,0xFC,0xD8, // ? 0x44D,0xED,0xFD,0xDC, // ? 0x44E,0xEE,0xFE,0xC0, // ? 0x44F,0xEF,0xFF,0xD1, // я // SMALL Cyrillic letters (additional) 0x452,'_',0x90,'_', // _ .*.* 0x453,'_',0x83,'_', // _ .*.* 0x459,'_',0x9A,'_', // _ .*.* 0x45A,'_',0x9C,'_', // _ .*.* 0x45C,'_',0x9D,'_', // _ .*.* 0x45B,'_',0x9E,'_', // _ .*.* 0x45F,'_',0x9F,'_', // _ .*.* 0x45E,0xF7,0xA2,'_', // ?...* 0x458,0x6A,0xBC,0x6A, // _ .*.* 0x491,0xA3,0xB4,0xAD, // _ .*.. 0x451,0xF1,0xB8,0xA3, // ? 0x454,0xF3,0xBA,0xA4, // ? 0x457,0xF5,0xBF,0xA7, // ? 0x456,0x69,0xB3,0xA6, // _ .*.. 0x455,0x73,0xBE,0x73, // _ .*.* 0x0A0,'_',0xA0,0x20, // space .*.. 0x0A4,'_',0xA4,0xFD, // ? .*.. 0x0A6,'_',0xA6,'_', // ? .*.* 0x0B0,0xF8,0xB0,0x9C, // ? 0x0B7,0xFA,0xB7,0x9E, // ? // 0x2022,,0x95,0x95, //  .*.. // 0x2116,0xFC,0xB9,0x23, // ? ...* // 0x2219,,0xF9,0x9E, //  .*.. // 0x221A,0xFB,,0x96, // v ..*. // 0x25A0,0xFE,,0x94, // ? 0x0000,0,0,0 }; unsigned int char16to8(unsigned int c) { const TUNICODE2CHAR *p=unicode2char; unsigned int i; if (c<32) return(' '); if (c<128) return(c); while((i=p->u)) { if (c==i) { switch(win_dos_koi) { case 1: //Win return(p->win); case 2: //Koi8 return(p->koi8); } return(p->dos); } p++; } c&=0xFF; if (c<32) return(' '); return(c); } //-------------------------------------------------------------------------- //Печать символ? void DrawChar(int c,int x,int y) { char *d; //Куда рисуем char *s; //Откуда рисуем int i; int ms; int md; if (c>=128) switch(win_dos_koi) { case 1: //Win->Dos c=wintranslation[c-128]; break; case 2: //Koi8->Dos c=koi8translation[c-128]; break; } i=8; switch(font_size) { case 4: s=font+(c<<3); //Обрабатываем фонт размером 4 d=myscr+(y*(8*SCR_MODULO)+(x>>1)); //Основной экра? ms=0xF0; md=0x0F; if (x&1) {ms=0x0F;md=0xF0;} //Печать ?тетрад? do { *d=(*d&md)|(*s++&ms); d+=SCR_MODULO; } while(--i); break; case 6: s=font+(c<<3); //Обрабатываем фонт размером 6 d=myscr+(y*(8*SCR_MODULO)+((x>>2)*3)); //0E:160C - Основной экра? switch(x&3) { case 0: do { *d=(*d&0x03)|(*s++); d+=SCR_MODULO; } while(--i); break; case 1: do { *d=(*d&0xFC)|(*s>>6); d++; *d=(*d&0x0F)|(*s++<<2); d+=SCR_MODULO-1; } while(--i); break; case 2: d++; do { *d=(*d&0xF0)|(*s>>4); d++; *d=(*d&0x3F)|(*s++<<4); d+=SCR_MODULO-1; } while(--i); break; case 3: d+=2; do { *d=(*d&0xC0)|(*s++>>2); d+=SCR_MODULO; } while(--i); break; } break; case 8: s=font+(c<<3); //Обрабатываем фонт размером 8 d=myscr+(y*(8*SCR_MODULO)+x); //0E:160C - Основной экра? do { *d=*s++; d+=SCR_MODULO; } while(--i); break; case 14: i=14; s=font+(c*14); //Обрабатываем фонт размером 8 d=myscr+(y*(14*SCR_MODULO)+x); //0E:160C - Основной экра? do { *d=*s++; d+=SCR_MODULO; } while(--i); break; case 16: i=16; s=font+(c*16); //Обрабатываем фонт размером 16 d=myscr+(y*(16*SCR_MODULO)+x); //0E:160C - Основной экра? do { *d=*s++; d+=SCR_MODULO; } while(--i); break; default: break; } } //Печать строки из буфера текста void drawStkStr(char *p, unsigned int y, unsigned int vp, int ep) { unsigned int i=0; unsigned int c; do { c=*p; if (c) { if (ep>=0) editline[ep++]=c; p++; if (vp!=0) vp--; else DrawChar(c,i++,y); } else { DrawChar(' ',i++,y); } } while(i=0) while((c=*p++)) editline[ep++]=c; //Добиваем остато?строки } void drawFrmStkStr(char *p, unsigned int y, unsigned int vp, int ep) { unsigned int i=0; unsigned int c; unsigned long spcsum; unsigned long spcadd; unsigned int spcs=0; //Надо посчитат?пробел? i=0; if (*p) { i=1; //Считае?со второг?символ? while((c=p[i])) //Пока не коне?строки { if (c==' ') spcs++; //Считае?пробел? i++; } } if (i>max_x) i=0; //Не добавляем пробел? строка длинне? че?экра? else i=max_x-i; //Теперь ?i - обще?количество добавляемых пробелов spcadd=0; spcsum=0; if (spcs) { spcadd=((unsigned long)i<<16)/spcs; spcsum=((unsigned long)i<<16)%spcs; } spcsum+=spcadd; //Начально?значение i=0; c=*p; if (c) { if (ep>=0) editline[ep++]=c; if (vp!=0) vp--; else DrawChar(c,i++,y); p++; } else goto L2; do { c=*p; if (c) { if (ep>=0) editline[ep++]=c; if (vp!=0) vp--; else DrawChar(c,i++,y); if (c==' ') { //Добавляем пробел? if (spcsum>=65536) { spcsum-=65536; continue; } spcsum+=spcadd; } p++; } else { L2: DrawChar(' ',i++,y); } } while(i=0) while((c=*p++)) editline[ep++]=c; //Добиваем остато?строки } //Поис?начала строки ?верхне?стек? extern unsigned int bl_us(unsigned int pos); extern unsigned int bl_ds(unsigned int pos); //Перено?из верхнего стек??нижний (на строку ввер? extern void move_up(void); //Перено?из нижнег?стек??верхни?(на строку вниз) extern void move_dw(void); //--------------------------------------- // Работа ?таблицей блоков //--------------------------------------- //Поис?первог?свободного блок? int FindFreeBlock(void) { unsigned int i=0; do { if (!bfree[i]) { bfree[i]=1; break; } } while((++i)!=MAXBLOCK); return(i); } //--------------------------------------- // Загрузка ?диск?нового фрагмент? //--------------------------------------- void DoDiskAccess(unsigned int flag) { int f; char b; unsigned int ul; unsigned int seekpos; if ((f=stk_fhandle)==-1) { stk_fhandle=f=fopen(stkfile,A_ReadWrite+A_BIN,P_READ+P_WRITE,&ul); //Файл верхнего стек? if (stk_fhandle==-1) DiskErrorMsg(3); } if (disk_access&LOAD_UP) { memcpy(ustk+STKSZ50,ustk,usp); b=ubat[u_disk--]; bfree[b]=0; seekpos=STKSZ50*b; if (lseek(f,seekpos,0,&ul,&ul)!=seekpos) DiskErrorMsg(2); if (fread(f,ustk,STKSZ50,&ul)!=STKSZ50) DiskErrorMsg(0); usp+=STKSZ50; } if (disk_access&LOAD_DOWN) { memcpy(dstk+(dsp-STKSZ50),dstk+dsp,STKSZ-dsp); b=dbat[d_disk--]; bfree[b]=0; seekpos=STKSZ50*b; if (lseek(f,seekpos,0,&ul,&ul)!=seekpos) DiskErrorMsg(2); if (fread(f,dstk+STKSZ50,STKSZ50,&ul)!=STKSZ50) DiskErrorMsg(0); dsp-=STKSZ50; } if (disk_access&SAVE_UP) { b=FindFreeBlock(); ubat[++u_disk]=b; seekpos=STKSZ50*b; if (lseek(f,seekpos,0,&ul,&ul)!=seekpos) DiskErrorMsg(2); if (fwrite(f,ustk,STKSZ50,&ul)!=STKSZ50) DiskErrorMsg(1); memcpy(ustk,ustk+STKSZ50,usp-=STKSZ50); } if (disk_access&SAVE_DOWN) { b=FindFreeBlock(); dbat[++d_disk]=b; seekpos=STKSZ50*b; if (lseek(f,seekpos,0,&ul,&ul)!=seekpos) DiskErrorMsg(2); if (fwrite(f,dstk+STKSZ50,STKSZ50,&ul)!=STKSZ50) DiskErrorMsg(1); memcpy(dstk+(dsp+STKSZ50),dstk+dsp,STKSZ50-dsp); dsp+=STKSZ50; } disk_access=0; if (flag) { fclose(f,&ul); stk_fhandle=-1; } if ((!terminated)/*&&flag*/) { REDRAW(); } return; } //------------------------------------------ // Проверка необходимост?чтен?/записи ?диск?на диск //------------------------------------------ void CheckDiskAccess(void) { if ((usp=0)) disk_access|=LOAD_UP; if ((dsp>STKMAX)&&(d_disk>=0)) disk_access|=LOAD_DOWN; if (usp>STKMAX) disk_access|=SAVE_UP; if (dsp='a')&&(c<='z')) c+='A'-'a'; return(c); } int strcmp_nocase(const char *s1,const char *s2) { int i; int c; while(!(i=(c=toupper(*s1++))-toupper(*s2++))) if (!c) break; return(i); } unsigned int SearchHistory(void) { unsigned int history_pos=0; int fin; int i; unsigned int ul; char historyfile[128]; snprintf(historyfile,sizeof(historyfile),"%sTED.history",ted_path); if ((fin=fopen(historyfile,A_ReadOnly+A_BIN,P_READ,&ul))!=-1) { for(;;) { i=fread(fin,&HISTORY,sizeof(HISTORY),&ul); if (ii) viewline-=i; else viewline=0; } while(i) { move_up(); i--; } } void PageDw(unsigned int lines) { unsigned int i; // unsigned int l; // unsigned int p; i=lines; do { if (dsp==STKSZ) break; //Коне?текста viewline++; curline++; move_dw(); } while(--i); } void ToEOL(void) { unsigned int i=strlen(editline); if (i>255) curpos=0; else curpos=i; if (curpos>=max_x) viewpos=curpos-max_x+1; else viewpos=0; } void ToBOL(void) { curpos=0; viewpos=0; } void WordLeft(void) { if (curpos==0) return; for(;;) { if ((--curpos)==0) break; if ((editline[curpos-1]==' ')&&(editline[curpos]!=' ')) break; } while(curpos8) viewpos-=8; else viewpos=0; } } void WordRight(void) { if (!editline[curpos]) return; for(;;) { curpos++; if (!editline[curpos]) break; if ((editline[curpos-1]==' ')&&(editline[curpos]!=' ')) break; } while((curpos-viewpos)>=max_x) { viewpos+=8; } } void DrawInfo(void) { TTime t; TDate d; GetDateTime(&d,&t); int scr_w=ScreenW(); int scr_h=ScreenH(); DrawRoundedFrame(0,YDISP,scr_w-1,scr_h-1,0,0,0,GetPaletteAdrByColorIndex(0),GetPaletteAdrByColorIndex(20)); str_2ws(e_ws,filename,126); char *info_chr=malloc(512); sprintf(info_chr, "К±јд:\n%02d:%02d\nРР: %lu\nЧЬРРКэ: %lu\n\nОДјю:\n%w", t.hour,t.min,curline,total_line,e_ws); //wsprintf(info_ws,"Time:\n%02d:%02d\n" // "Current line %lu\nTotal lines %lu\n\nCurrent file:\n%w", // t.hour,t.min,curline,total_line,e_ws); utf8_2ws(info_ws, info_chr, strlen(info_chr)); DrawString(info_ws,3,3+YDISP,scr_w-4,scr_h-4,FONT_SMALL,2,GetPaletteAdrByColorIndex(0),GetPaletteAdrByColorIndex(23)); mfree(info_chr); } //============================================================================= //Выво?на экра? //============================================================================= #pragma optimize=z 9 void DrawScreen(void) { unsigned int y; unsigned int p; unsigned int c; int f; unsigned int my; int scr_w=ScreenW(); int scr_h=ScreenH(); char *ink=GetPaletteAdrByColorIndex(INK); char *paper=GetPaletteAdrByColorIndex(PAPER); char *upinfo_chr=malloc(256); if (disk_access) { DrawRoundedFrame(0,YDISP+8,8,GetFontYSIZE(FONT_SMALL)+YDISP-1,0,0,0,paper,paper); DrwImg((IMGHDR *)&imgDiskAccess,0,YDISP,ink,paper); if (draw_mode==2) { sprintf(upinfo_chr,"ЧЄµЅРР %u...",curline); //wsprintf(upinfo_ws,"Goto line %u...",curline); utf8_2ws(upinfo_ws, upinfo_chr, strlen(upinfo_chr)); goto L_W1; } if (disk_access==SAVE_FILE) { sprintf(upinfo_chr,"ХэФЪ±Јґж..."); //wsprintf(upinfo_ws,"Saving..."); utf8_2ws(upinfo_ws, upinfo_chr, strlen(upinfo_chr)); goto L_W1; } if (disk_access==FIRSTLOAD) { //wsprintf(upinfo_ws,"Line %u...",curline); sprintf(upinfo_chr,"РР %u...",curline); utf8_2ws(upinfo_ws, upinfo_chr, strlen(upinfo_chr)); L_W1: DrawRoundedFrame(8,YDISP,scr_w-1,GetFontYSIZE(FONT_SMALL)+YDISP-1,0,0,0,paper,paper); DrawString(upinfo_ws,8,YDISP,scr_w-1,GetFontYSIZE(FONT_SMALL)+YDISP-1,FONT_SMALL,2,ink,paper); goto L_WELLCOME2; } if (draw_mode==255) goto L_WELLCOME; } else { switch(draw_mode) { case 1: my=editmode?max_y_emode:max_y; zeromem(editline,256); y=curline-viewline; p=usp; if (dsp!=STKSZ) c=dstk[dsp]; else c=0; //Первый символ текуще?строки - если букв?- форматируе? while(y) { //Есть строки выше текуще? p=bl_us(p); if ((c>' ')&&(!(HISTORY.fmt&0x80))&&(cursor_off)) drawFrmStkStr(ustk+p,--y,viewpos,-1); else drawStkStr(ustk+p,--y,viewpos,-1); c=ustk[p]; } y=curline-viewline; //Теперь печатаем от текуще?вниз p=dsp; f=0; while(y!=(my)) { if (p==STKSZ) { drawStkStr("<>",y++,0,-1); while(y!=my) drawStkStr("",y++,viewpos,-1); break; } else { unsigned int p1; p1=bl_ds(p); if (p1!=STKSZ) c=dstk[p1]; else c=0; //Посл. строка не расширяет? if ((c>' ')&&(!(HISTORY.fmt&0x80))&&(cursor_off)) drawFrmStkStr(dstk+p,y++,viewpos,f); else drawStkStr(dstk+p,y++,viewpos,f); p=p1; f=-1; } } //DrawCursor(curpos-viewpos,curline-viewline); { //Рисуем скролл-ба? char *d=myscr+((scr_w-1)>>3); //Последни?байт if (total_line) { y=((editmode?sheight_emode-8:sheight-8)*curline)/total_line; } else { y=0; } p=0; do { if ((p(y+7))) { *d=p&1?0x50:0x28; } else { *d=0x78; } d+=SCR_MODULO; p++; } while(p8?8:font_size); int yy=y*(font_size>8?font_size:8)+dy; //static const int cur_color=0x40FFFFFF; if (font_size>8) { //DrawRoundedFrame(xx,yy,xx+8,yy+font_size,0,0,0,(int *)&cur_color,GetPaletteAdrByColorIndex(23)); DrawRoundedFrame(xx,yy+YDISP,xx+8,yy+YDISP+font_size,0,0,0,ink,GetPaletteAdrByColorIndex(23)); } else { //DrawRoundedFrame(xx,yy,xx+font_size,yy+8,0,0,0,(int *)&cur_color,GetPaletteAdrByColorIndex(23)); DrawRoundedFrame(xx,yy+YDISP,xx+font_size,yy+YDISP+8,0,0,0,ink,GetPaletteAdrByColorIndex(23)); } } } break; } draw_mode=1; } mfree(upinfo_chr); return; } int DrawLoadMenu(void); void DrawSoftMenu(void); void doCurRight(void) { if (cursor_off) { if (curpos>=(256-8)) return; curpos+=8; viewpos+=8; draw_mode=1; return; } if (curpos>=256) return; curpos++; if ((curpos-viewpos)>=max_x) { viewpos+=8; } draw_mode=1; } void doCurLeft(void) { if (cursor_off) { if (curpos<8) curpos=0; else curpos-=8; if (viewpos<8) viewpos=0; else viewpos-=8; draw_mode=1; return; } if (curpos==0) return; draw_mode=1; curpos--; if (curpos>=viewpos) return; if (viewpos>8) viewpos-=8; else viewpos=0; } void insline(void) { text_changed=1; dstk[--dsp]=0; total_line++; GeneralFuncF1(1); } void delline(void) { text_changed=1; if (dsp!=STKSZ) { dsp=bl_ds(dsp); total_line--; } GeneralFuncF1(1); } void splitline(void) { if ((curpos<=strlen(dstk+dsp))&&(dsp!=STKSZ)) { while(curpos) { ustk[usp++]=dstk[dsp++]; curpos--; } viewpos=0; ustk[usp++]=0; total_line++; curline++; text_changed=1; } GeneralFuncF1(1); } void joinlines(void) { unsigned int p=bl_ds(dsp); if (p!=STKSZ) { p--; while(p!=dsp) { dstk[p]=dstk[p-1]; p--; } dsp++; total_line--; text_changed=1; } GeneralFuncF1(1); } void instime(void) { TTime t; TDate d; GetDateTime(&d,&t); usp+=sprintf(ustk+usp,"%02d:%02d",t.hour,t.min)+1; curline++; total_line++; text_changed=1; GeneralFuncF1(1); } void insdate(void) { TTime t; TDate d; GetDateTime(&d,&t); usp+=sprintf(ustk+usp,"%02d-%02d-%04d",d.day,d.month,d.year)+1; curline++; total_line++; text_changed=1; GeneralFuncF1(1); } void paste(void) { clip_pasted=1; GeneralFuncF1(1); } //void cliperase(void) //{ // FileErase((STR)clipfile); //} void clearclipb(void) { // FilesysICall(cliperase); clip_pasted=1; GeneralFuncF1(1); } void* edmenu_HNDLS[8]= { (void *)insline, (void *)delline, (void *)splitline, (void *)joinlines, (void *)instime, (void *)insdate, (void *)paste, (void *)clearclipb }; MENUITEM_DESC edmenu_ITEMS[8]= { {NULL,(int)"ІеИлРР" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"ЙѕіэРР" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"¶ПїЄРР" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"Б¬ЅУРР" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"ІеИлК±јд" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"ІеИлИХЖЪ" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"ХіМщ" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"ЗеїХјфМщ°е",LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2} }; HEADER_DESC edmenu_HDR={0,0,0,0,icon,(int)"±ај­...",LGP_NULL}; MENU_DESC edmenu_STRUCT= { 8,NULL,NULL,NULL, menusoftkeys, &menu_skt, 0, NULL, edmenu_ITEMS, (MENUPROCS_DESC*)&edmenu_HNDLS, 8 }; int ed_inp_onkey(GUI *data, GUI_MSG *msg) { int k=msg->gbsmsg->submess; if (msg->keys==0xFFF) { editmode=0xFFF; //Призна?меню patch_header(&edmenu_HDR); edit_id=CreateMenu(0,0,&edmenu_STRUCT,&edmenu_HDR,0,8,0,0); return(1); //Закрывае?лавочк? } if ((msg->gbsmsg->msg==KEY_DOWN)||(msg->gbsmsg->msg==LONG_PRESS)) { switch(k) { case GREEN_BUTTON: case UP_BUTTON: case DOWN_BUTTON: case VOL_UP_BUTTON: case VOL_DOWN_BUTTON: editmode=k; return(1); } } return(0); //Do standart keys //1: close } void ed_inp_redraw(void *data) { unsigned int sz; unsigned int p; sz=e_ws->wsbody[0]; p=0; while((p<255)&&(pwsbody[p+1]; editline[p]=char16to8(wc); p++; } editline[p]=0; if ((sz=dsp)==STKSZ) { text_changed=1; total_line++; } else { if (strcmp(editline,dstk+dsp)!=0) text_changed=1; } sz=bl_ds(sz); //Ищем начало сл. строки sz-=p+1; //Внов?добавляем? строка strcpy(dstk+(dsp=sz),editline); //Добавляем draw_mode=1; DrawScreen(); } void ed_inp_locret(void){} void ed_inp_ghook(GUI *data, int cmd) { static SOFTKEY_DESC sk={0x0FFF,0x0000,(int)"ІЛµҐ"}; static void *methods[16]; EDITCONTROL ec; int ecp; if (cmd==2) { //Called after onCreate void **m=GetDataOfItemByID(data,4); memcpy(methods,m[1],sizeof(methods)); // old_inp_redraw=methods[0]; methods[0]=(void *)ed_inp_redraw; m[1]=methods; } if (cmd==7) { if (!editmode) { EDIT_SetCursorPos(data,curpos+1); editmode=0xFFFFFFFF; } ecp=EDIT_GetCursorPos(data); ecp--; while(ecp>curpos) doCurRight(); while(ecp=max_y_emode) viewline++; //Если ниже че?16 стро?- перемещаем? CutWSTR(e_ws,0); if ((p=dsp)!=STKSZ) { while((c=dstk[p])) { wsAppendChar(e_ws,char8to16(c)); p++; } } PrepareEditControl(&ec); eq=AllocEQueue(ma,mfree_adr()); ConstructEditControl(&ec,3,0x40,e_ws,255); AddEditControlToEditQend(eq,&ec,ma); patch_header(&ed_inp_hdr); patch_input(&ed_inp_desc); edit_id=CreateInputTextDialog(&ed_inp_desc,&ed_inp_hdr,eq,1,0); } /*void add_to_clip(char far *s) { int f=FileOpen((STR)clipfile, clip_pasted?_O_CREAT+_O_RDWR+_O_TRUNC:_O_CREAT+_O_RDWR+_O_APPEND ,_S_IREAD); if (f!=-1) { FileWrite(f,s,strlen(s)); FileClose(f); } EX_heap_free_with_lock(s); clip_pasted=0; }*/ /*volatile int light_count; GBSTMR light_tmr; void LightTimerProc(void) { if (light_count) { light_count--; GBS_StartTimerProc(&light_tmr,262,LightTimerProc); } }*/ void SetViewIllumination(void) { extern const int ADJ_LIGHT; if (ADJ_LIGHT) { #ifdef ELKA #else SetIllumination(0,1,DISPLAY_LIGHT,0); SetIllumination(1,1,0,0); #endif } // light_count=30; // GBS_StartTimerProc(&light_tmr,1,LightTimerProc); } //Перерисовк?основног?диалог? void method0(MAIN_GUI *data) { if (data->gui.state==2) { DrawScreen(); } } void method1(MAIN_GUI *data, void *(*malloc_adr)(int)) { void FirstLoadFile(unsigned int); SUBPROC((void *)FirstLoadFile,0xFFFFFFFF); data->gui.state=1; } void method2(MAIN_GUI *data, void (*mfree_adr)(void *)) { terminated=1; data->gui.state=0; } void method3(MAIN_GUI *data, void *(*malloc_adr)(int), void (*mfree_adr)(void *)) { if (!draw_mode) draw_mode=1; DisableIDLETMR(); data->gui.state=2; } void method4(MAIN_GUI *data, void (*mfree_adr)(void *)) { if (data->gui.state!=2) return; data->gui.state=1; } extern void kill_data(void *p, void (*func_p)(void *)); void method7(MAIN_GUI *data, void (*mfree_adr)(void *)) { kill_data(data,mfree_adr); // mfree_adr(data); } int method8(void){return(0);} int method9(void){return(0);} //------------------------------------------------------------------------------ // Ос? диалог - обработк?кнопок //------------------------------------------------------------------------------ int method5(MAIN_GUI *data, GUI_MSG *msg) { if (disk_access) return(0); //Если дисковые операции if ((draw_mode>1)&&(draw_mode!=4)) return(0); //Если ещ?рисуем if (msg->gbsmsg->msg==KEY_UP) { if (draw_mode==4) { draw_mode=1; SetViewIllumination(); DrawScreen(); } return(0); } if ((msg->gbsmsg->msg==KEY_DOWN)||(msg->gbsmsg->msg==LONG_PRESS)) { switch(msg->gbsmsg->submess) { case RED_BUTTON: case RIGHT_SOFT: // L_EXIT: return(1); //Происходит вызо?GeneralFunc для те? GUI -> закрытие GUI case GREEN_BUTTON: // L_EDIT: CreateEditDialog(); return(0); case ENTER_BUTTON: DrawLoadMenu(); loadmenu_id=0; return(0); case LEFT_SOFT: DrawSoftMenu(); return(0); case UP_BUTTON: if (cursor_off) PageUp(1); else LineUp(); draw_mode=1; break; /* case RECORD_BUTTON: if (cursor_off||(dsp==STKSZ)) break; else { unsigned int i=strlen(dstk+dsp); //Длин?те? строки char far *s; s=EX_heap_malloc_with_lock(i+2); //?? добавляем 0 ?0d if (s) { strcpy(s,dstk+dsp); s[i]=0x0D; s[i+1]=0x00; FilesysICall_FP(add_to_clip,s); } }*/ case DOWN_BUTTON: if (cursor_off) PageDw(1); else LineDw(); draw_mode=1; break; case VOL_UP_BUTTON: case '2': PageUp(max_y); draw_mode=1; break; case VOL_DOWN_BUTTON: case '8': PageDw(max_y); draw_mode=1; break; case '5': cursor_off^=1; draw_mode=1; break; case LEFT_BUTTON: if (msg->gbsmsg->msg!=LONG_PRESS) { doCurLeft(); break; } case '4': //На слов?влев? WordLeft(); cursor_off&=0xFE; draw_mode=1; break; case RIGHT_BUTTON: if (msg->gbsmsg->msg!=LONG_PRESS) { doCurRight(); break; } case '6': //На слов?вправо WordRight(); cursor_off&=0xFE; draw_mode=1; break; case '9': ToEOL(); cursor_off&=0xFE; draw_mode=1; break; case '7': ToBOL(); cursor_off&=0xFE; draw_mode=1; break; case '0': draw_mode=4; break; case '#': if (win_dos_koi>1) win_dos_koi=0; else win_dos_koi++; draw_mode=1; break; default: break; } CheckDiskAccess(); if (disk_access) SUBPROC((void *)DoDiskAccess,1); SetViewIllumination(); DrawScreen(); return(0); } return(0); } //=================================================================== // Меню загрузки файл? //=================================================================== int sf_inp_onkey(GUI *data, GUI_MSG *msg) { if (msg->keys==0xFFF) { extern void savetext(void); void UpdateCSMname(void); ws_2str(e_ws,filename,126); UpdateCSMname(); HISTORY.fmt=0; //Грузим ег?теперь ка?DirectLoad disk_access=SAVE_FILE; text_changed=0; SUBPROC((void *)savetext); return(1); //Close } return(0); } void sf_inp_ghook(GUI *data, int cmd) { static SOFTKEY_DESC sk={0x0FFF,0x0000,(int)"±Јґж..."}; EDITCONTROL ec; if (cmd==7) { SetSoftKey(data,&sk,SET_SOFT_KEY_N); ExtractEditControl(data,1,&ec); wstrcpy(e_ws,ec.pWS); } } void sf_inp_locret(void){} HEADER_DESC sf_inp_hdr={0,0,0,0,icon,(int)"±ЈґжОЄ:",LGP_NULL}; INPUTDIA_DESC sf_inp_desc= { 1, sf_inp_onkey, sf_inp_ghook, (void *)sf_inp_locret, 0, &menu_skt, {0,0,0,0}, 4, 100, 101, 0, 0, 0x40000000 }; void CreateSaveAsDialog(void) { void *ma=malloc_adr(); void *eq; EDITCONTROL ec; str_2ws(e_ws,filename,126); PrepareEditControl(&ec); eq=AllocEQueue(ma,mfree_adr()); ConstructEditControl(&ec,3,0x40,e_ws,128); AddEditControlToEditQend(eq,&ec,ma); patch_header(&sf_inp_hdr); patch_input(&sf_inp_desc); CreateInputTextDialog(&sf_inp_desc,&sf_inp_hdr,eq,1,0); } void loadfont(int flag) { char fn_font[128]; int fin; unsigned int ul; int bytew; int pixw; int eh; snprintf(fn_font,sizeof(fn_font),"%s%d.fnt",ted_path,font_size); if ((fin=fopen(fn_font,A_ReadOnly+A_BIN,P_READ,&ul))!=-1) { fread(fin,font,sizeof(font),&ul); fclose(fin,&ul); } bytew=(ScreenW()-1)>>3; pixw=bytew*8; sheight_emode=eh=(sheight=ScreenH()-YDISP)-((HeaderH()+7)&(~7))-((SoftkeyH()+7)&(~7)); switch(font_size) { case 16: max_y_emode=eh/16; max_y=(ScreenH()-YDISP)/16; max_x=pixw/8; break; case 14: max_y_emode=eh/14; max_y=(ScreenH()-YDISP)/14; max_x=pixw/8; break; default: max_y_emode=eh/8; max_y=(ScreenH()-YDISP)/8; max_x=pixw/font_size; break; } zeromem(myscr,sizeof(myscr)); if(flag) { disk_access=0; draw_mode=1; if (!terminated) REDRAW(); //Перерисовываем } } void setfont(char sz) { font_size=sz; if (disk_access==FIRSTLOAD) //Пришли из первой загрузки { ShowMSG(1,(int)"ЧЦМеТС±д»»!"); return; } disk_access=FIRSTLOAD; draw_mode=255; //Экра?приветствия SUBPROC((void *)loadfont,1); GeneralFuncF1(1); //Закрывае?меню } void load_setfont4(void){setfont(4);} void load_setfont6(void){setfont(6);} void load_setfont8(void){setfont(8);} void load_setfont14(void){setfont(14);} void load_setfont16(void){setfont(16);} void FirstLoadFile(unsigned int fmt); void load_direct(void) { loadmenu_id=0; draw_mode=255; disk_access=FIRSTLOAD; HISTORY.fmt=0; GeneralFuncF1(1); SUBPROC((void *)FirstLoadFile,0); } void load_format(void) { loadmenu_id=0; draw_mode=255; disk_access=FIRSTLOAD; HISTORY.fmt=1; GeneralFuncF1(1); SUBPROC((void *)FirstLoadFile,1); } void load_eolspc(void) { loadmenu_id=0; draw_mode=255; disk_access=FIRSTLOAD; HISTORY.fmt=2; GeneralFuncF1(1); SUBPROC((void *)FirstLoadFile,2); } void load_pad(void) { HISTORY.fmt^=0x80; GeneralFuncF1(1); } void load_save(void) { GeneralFuncF1(1); CreateSaveAsDialog(); } void *loadmenu_HNDLS[10]= { (void *)load_setfont4, (void *)load_setfont6, (void *)load_setfont8, (void *)load_setfont14, (void *)load_setfont16, (void *)load_direct, (void *)load_format, (void *)load_eolspc, (void *)load_pad, (void *)load_save }; MENUITEM_DESC loadmenu_ITEMS[10]= { {NULL,(int)"4єЕЧЦМе" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"6єЕЧЦМе" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"8єЕЧЦМе" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"14єЕЧЦМе",LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"16єЕЧЦМе",LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"Ц±ЅУФШИл" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"DOSёсКЅ" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"WINёсКЅ" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"їЄ/№ШPadding",LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"±ЈґжОЄ..." ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2} }; HEADER_DESC loadmenu_HDR={0,0,0,0,icon,(int)"ЦчІЛµҐ...",LGP_NULL}; MENU_DESC loadmenu_STRUCT= { 8,NULL,NULL,NULL, menusoftkeys, &menu_skt, 0, NULL, loadmenu_ITEMS, (MENUPROCS_DESC*)&loadmenu_HNDLS, 8 }; int DrawLoadMenu(void) { int n; if (disk_access==FIRSTLOAD) n=8; else n=10; *((int *)(&loadmenu_STRUCT.n_items))=n; patch_header(&loadmenu_HDR); return CreateMenu(0,0,&loadmenu_STRUCT,&loadmenu_HDR,0,n,0,0); } //------------------------------------------------------------------- //=================================================================== // Меню Goto... //=================================================================== void goto_l(unsigned long l) { seek_to_line=l; draw_mode=2; //Переходи?на нужную строку SUBPROC((void *)GotoLine); GeneralFuncF1(1); } void goto_top(void) { goto_l(0); } void goto_bot(void) { goto_l(0xFFFFFFFF); } int gl_num; unsigned int my_atoui(WSHDR *ws) { unsigned int i=0; int p=1; unsigned int c; while(p<=ws->wsbody[0]) { c=ws->wsbody[p]-'0'; if (c>9) break; i=(i*10)+c; p++; } return(i); } int gl_inp_onkey(GUI *data, GUI_MSG *msg) { if (msg->keys==0xFFF) { if (gl_num) { seek_to_line=total_line*my_atoui(e_ws)/100; } else { seek_to_line=my_atoui(e_ws); } draw_mode=2; //Переходи?на нужную строку SUBPROC((void *)GotoLine); return(1); //Close } return(0); } void gl_inp_ghook(GUI *data, int cmd) { static SOFTKEY_DESC sk={0x0FFF,0x0000,(int)"ЧЄµЅ..."}; EDITCONTROL ec; if (cmd==7) { SetSoftKey(data,&sk,SET_SOFT_KEY_N); ExtractEditControl(data,1,&ec); wstrcpy(e_ws,ec.pWS); } } void gl_inp_locret(void){} HEADER_DESC gl_inp_hdr_percent={0,0,0,0,icon,(int)"ЧЄµЅ°Щ·ЦЦ®:",LGP_NULL}; HEADER_DESC gl_inp_hdr_line={0,0,0,0,icon,(int)"ЧЄµЅРР:",LGP_NULL}; INPUTDIA_DESC gl_inp_desc= { 1, gl_inp_onkey, gl_inp_ghook, (void *)gl_inp_locret, 0, &menu_skt, {0,0,0,0}, 4, 100, 101, 0, 0, 0x40000000 }; void goto_line_inp(int f) { void *ma=malloc_adr(); void *eq; EDITCONTROL ec; CutWSTR(e_ws,0); wsAppendChar(e_ws,'0'); gl_num=f; PrepareEditControl(&ec); eq=AllocEQueue(ma,mfree_adr()); ConstructEditControl(&ec,2,0x40,e_ws,7); AddEditControlToEditQend(eq,&ec,ma); patch_input(&gl_inp_desc); patch_header(f?&gl_inp_hdr_percent:&gl_inp_hdr_line); CreateInputTextDialog(&gl_inp_desc,f?&gl_inp_hdr_percent:&gl_inp_hdr_line,eq,1,0); } void goto_line(void) { GeneralFuncF1(1); goto_line_inp(0); //Призна?перехода по строке } void goto_percent(void) { GeneralFuncF1(1); goto_line_inp(1); //Призна?перехода по процента? } void goto_last_saved(void) { goto_l(HISTORY.line); } void goto_book1(void) { goto_l(HISTORY.bookm1); } void goto_book2(void) { goto_l(HISTORY.bookm2); } void goto_book3(void) { goto_l(HISTORY.bookm3); } void goto_book4(void) { goto_l(HISTORY.bookm4); } void *gotomenu_HNDLS[9]= { (void *)goto_top, (void *)goto_line, (void *)goto_percent, (void *)goto_bot, (void *)goto_last_saved, (void *)goto_book1, (void *)goto_book2, (void *)goto_book3, (void *)goto_book4 }; MENUITEM_DESC gotomenu_ITEMS[9]= { {NULL,(int)"¶ҐІї" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"РР" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"°Щ·ЦЦ®?" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"µЧІї" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"ЙПТ»ґО" ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)t_bm1 ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)t_bm2 ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)t_bm3 ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)t_bm4 ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, }; HEADER_DESC gotomenu_HDR={0,0,0,0,icon,(int)"ЧЄµЅ...",LGP_NULL}; MENU_DESC gotomenu_STRUCT= { 8,NULL,NULL,NULL, menusoftkeys, &menu_skt, 0, NULL, gotomenu_ITEMS, (MENUPROCS_DESC*)&gotomenu_HNDLS, 9 }; void goto_menu(void) { GeneralFuncF1(1); patch_header(&gotomenu_HDR); CreateMenu(0,0,&gotomenu_STRUCT,&gotomenu_HDR,0,9,0,0); } //=================================================================== // Меню Bookmark... //=================================================================== void set_book1(void) { HISTORY.bookm1=curline; GeneralFuncF1(1); } void set_book2(void) { HISTORY.bookm2=curline; GeneralFuncF1(1); } void set_book3(void) { HISTORY.bookm3=curline; GeneralFuncF1(1); } void set_book4(void) { HISTORY.bookm4=curline; GeneralFuncF1(1); } MENUITEM_DESC bookmenu_ITEMS[4]= { {NULL,(int)t_bm1,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)t_bm2,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)t_bm3,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)t_bm4,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, }; void *bookmenu_HNDLS[4]= { (void *)set_book1, (void *)set_book2, (void *)set_book3, (void *)set_book4 }; HEADER_DESC bookmenu_HDR={0,0,0,0,icon,(int)"ЙиЦГКйЗ©...",LGP_NULL}; MENU_DESC bookmenu_STRUCT= { 8,NULL,NULL,NULL, menusoftkeys, &menu_skt, 0, NULL, bookmenu_ITEMS, (MENUPROCS_DESC*)&bookmenu_HNDLS, 4 }; void bookm_menu(void) { GeneralFuncF1(1); patch_header(&bookmenu_HDR); CreateMenu(0,0,&bookmenu_STRUCT,&bookmenu_HDR,0,4,0,0); } //=================================================================== // Меню по левому софт? //=================================================================== void search_menu(void) { } MENUITEM_DESC softmenu_ITEMS[3]= { {NULL,(int)"ЧЄµЅ..." ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, {NULL,(int)"ЙиЦГКйЗ©...",LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, //{NULL,(int)"Search..." ,LGP_NULL,0,NULL,MENU_FLAG3,MENU_FLAG2}, }; void *softmenu_HNDLS[3]= { (void *)goto_menu, (void *)bookm_menu, //(void *)search_menu }; HEADER_DESC softmenu_HDR={0,0,0,0,icon,(int)"TEDІЛµҐ",LGP_NULL}; MENU_DESC softmenu_STRUCT= { 8,NULL,NULL,NULL, menusoftkeys, &menu_skt, 0, NULL, softmenu_ITEMS, (MENUPROCS_DESC*)&softmenu_HNDLS, 2 }; void DrawSoftMenu(void) { static const char lfrm[]="%u"; sprintf(t_bm1+6,lfrm,HISTORY.bookm1); sprintf(t_bm2+6,lfrm,HISTORY.bookm2); sprintf(t_bm3+6,lfrm,HISTORY.bookm3); sprintf(t_bm4+6,lfrm,HISTORY.bookm4); patch_header(&softmenu_HDR); CreateMenu(0,0,&softmenu_STRUCT,&softmenu_HDR,0,2,0,0); } //====================================================================== //Загрузка куск?входного файл? unsigned int FL_loader(int fin, unsigned int p) { unsigned int i; unsigned int ul; if (p==0xFFFFFFFF) { //Перв? загрузка i=fread(fin,dstk,STKSZ,&ul); if (i=STKSZ50) //Если указател?переше?за границ?половины буфера { memcpy(dstk,dstk+STKSZ50,STKSZ50); //Копируем коне?буфера ?начало p-=STKSZ50; //Новы?указател? i=fread(fin,dstk+STKSZ50,STKSZ50,&ul); //Следующи?по?буфера if (i=STKSZ50) { b=FindFreeBlock(); ubat[++u_disk]=b; seekpos=STKSZ50*b; if (lseek(fs,seekpos,0,&ul,&ul)!=seekpos) DiskErrorMsg(2); if (fwrite(fs,ustk,STKSZ50,&ul)!=STKSZ50) DiskErrorMsg(1); p-=STKSZ50; memcpy(ustk,ustk+STKSZ50,p); if (!terminated) REDRAW(); } return(p); } //================================================================== // Перв? загрузка файл? // TODO: //================================================================== void FirstLoadFile(unsigned int fmt) { int fin; int fs; unsigned int ul; extern const int ENA_AUTOF; extern const int AUTOF_MODE; extern const int AUTOF_FONT; u_disk=-1; //Дисковый указател?верхнего стек? d_disk=-1; //Дисковый указател?нижнег?стек? zeromem(ubat,sizeof(ubat)); //Прочищае?таблиц?блоков верхнего стек? zeromem(dbat,sizeof(dbat)); //Прочищае?таблиц?блоков нижнег?стек? zeromem(bfree,sizeof(bfree)); //Прочищае?таблиц?за?ты?блоков usp=0; //Указател?на верхни?стек dsp=STKSZ; //Указател?на нижний стек viewpos=0; curpos=0; curline=0; text_changed=0; //CSM=0; draw_mode=255; if (fmt==0xFFFFFFFF) { //Ищем истори? if (SearchHistory()&0x8000) { font_size=HISTORY.font; fmt=HISTORY.fmt; win_dos_koi=HISTORY.codepage; cursor_off=HISTORY.cursor_off; } else { win_dos_koi=0xFF; //Неизвестны? switch(AUTOF_FONT) //Шриф? { case 0: font_size=4; break; default: case 1: font_size=6; break; case 2: font_size=8; break; case 3: font_size=14; break; case 4: font_size=16; break; } zeromem(&HISTORY.line,4*6); //Вс?на само?верх? HISTORY.cursor_off=cursor_off=1; //Выключит?курсор HISTORY.total=1; // HISTORY.fmt=0; HISTORY.fmt=255; //Первый запуск!!!! if (ENA_AUTOF) { HISTORY.fmt=fmt=AUTOF_MODE; } else { LockSched(); loadmenu_id=DrawLoadMenu(); //Опреде?ем, ка?грузит?чере?меню UnlockSched(); return; } } } if ((fmt&0x7F)>2) fmt=0; switch(font_size) { case 4: case 6: case 8: case 14: case 16: break; default: font_size=6; break; } //Загружае?шриф? loadfont(0); //Конвертируем вс?строки ?верхни?стек fs=fopen(stkfile,A_Create+A_ReadWrite+A_BIN,P_READ+P_WRITE,&ul); //Файл верхнего стек? if (fs==-1) DiskErrorMsg(3); if ((fin=fopen(filename,A_ReadOnly+A_BIN,P_READ,&ul))!=-1) { switch(fmt&0x7F) { case 1: case 2: usp=ConvertFormat(fin,fs,fmt&0x7F); break; case 0: default: if (win_dos_koi==0xFF) win_dos_koi=0; usp=ConvertSimple(fin,fs); break; } fclose(fin,&ul); } fclose(fs,&ul); total_line=viewline=curline; //Находимся ?последне?строке HISTORY.font=font_size; HISTORY.fmt=fmt; memcpy(HISTORY.name,filename,sizeof(HISTORY.name)); //Расчитывае? куда перейт? if (HISTORY.total==total_line) { seek_to_line=HISTORY.line; //Прямо?перехо? } else { if (HISTORY.total) seek_to_line=(total_line*HISTORY.line)/HISTORY.total; //По отношени? else seek_to_line=0; HISTORY.line=seek_to_line; } draw_mode=2; //Переходи?на нужную строку GotoLine(); } //========================================================================= const void * const gui_methods[11]={ (void *)method0, //Redraw (void *)method1, //Create (void *)method2, //Close (void *)method3, //Focus (void *)method4, //Unfocus (void *)method5, //OnKey 0, (void *)method7, //Destroy (void *)method8, (void *)method9, 0 }; const RECT Canvas={0,0,0,0}; void maincsm_oncreate(CSM_RAM *data) { MAIN_GUI *main_gui=malloc(sizeof(MAIN_GUI)); MAIN_CSM*csm=(MAIN_CSM*)data; zeromem(main_gui,sizeof(MAIN_GUI)); info_ws=AllocWS(512); upinfo_ws=AllocWS(256); e_ws=AllocWS(256); patch_rect((RECT*)&Canvas,0,0,ScreenW()-1,ScreenH()-1); main_gui->gui.canvas=(void *)(&Canvas); main_gui->gui.flag30=2; main_gui->gui.methods=(void *)gui_methods; main_gui->gui.item_ll.data_mfree=(void (*)(void *))mfree_adr(); csm->csm.state=0; csm->csm.unk1=0; csm->gui_id=CreateGUI(main_gui); } void Killer2(void) { extern void *ELF_BEGIN; kill_data(&ELF_BEGIN,(void (*)(void *))mfree_adr()); } void Killer(void) { static unsigned int ul; if (text_changed) { extern void savetext(void); LockSched(); ShowMSG(1,(int)"ОДјюЧчОЄ.newТС±Јґж!"); UnlockSched(); strcat(filename,".new"); HISTORY.fmt=0; //Грузим ег?теперь ка?DirectLoad disk_access=SAVE_FILE; text_changed=0; savetext(); } if (HISTORY.fmt!=255) { SaveHistory(); } mfree(ustk); mfree(dstk); FreeWS(info_ws); FreeWS(upinfo_ws); FreeWS(e_ws); unlink(stkfile,&ul); // ((void (*)(void *))(mfree_adr()))(&ELF_BEGIN); SUBPROC((void *)Killer2); } void maincsm_onclose(CSM_RAM *csm) { // GBS_StopTimer(&light_tmr); SUBPROC((void *)Killer); } int maincsm_onmessage(CSM_RAM *data, GBS_MSG *msg) { MAIN_CSM *csm=(MAIN_CSM*)data; if (msg->msg==MSG_GUI_DESTROYED) { if ((int)msg->data0==loadmenu_id) { GeneralFuncF1(1); } if ((int)msg->data0==csm->gui_id) { csm->csm.state=-3; } if ((int)msg->data0==edit_id) { //Закрыт диалог редактирован?, проверяем //Вышл?из редактор?стрелкам?ввер?вниз, выполняем перехо? switch(editmode) { case VOL_UP_BUTTON: PageUp(max_y_emode); break; case UP_BUTTON: LineUp(); break; case VOL_DOWN_BUTTON: PageDw(max_y_emode); break; case DOWN_BUTTON: LineDw(); break; case 0xFFF: //Просто меню break; default: editmode=0; //Выключае?редактор REDRAW(); return(1); } CheckDiskAccess(); if (disk_access) { DoDiskAccess(1); //Ту?кривость, принято чере?SUBPROC } CreateEditDialog(); } } return(1); } unsigned short maincsm_name_body[140]; const struct { CSM_DESC maincsm; WSHDR maincsm_name; }MAINCSM = { { maincsm_onmessage, maincsm_oncreate, #ifdef NEWSGOLD 0, 0, 0, 0, #endif maincsm_onclose, sizeof(MAIN_CSM), 1, &minus11 }, { maincsm_name_body, NAMECSM_MAGIC1, NAMECSM_MAGIC2, 0x0, 139 } }; void UpdateCSMname(void) { WSHDR *ws=AllocWS(256); str_2ws(ws,filename,126); wsprintf((WSHDR *)(&MAINCSM.maincsm_name),"TED: %w",ws); FreeWS(ws); } #pragma segment="CONFIG_C" int LoadConfigData(const char *fname) { int f; unsigned int ul; char *buf; int result=0; void *cfg; extern const CFG_HDR cfghdr0; //first var in CONFIG cfg=(void*)&cfghdr0; unsigned int len=(int)__segment_end("CONFIG_C")-(int)__segment_begin("CONFIG_C"); if (!(buf=malloc(len))) return -1; if ((f=fopen(fname,A_ReadOnly+A_BIN,P_READ,&ul))!=-1) { if (fread(f,buf,len,&ul)==len) { memcpy(cfg,buf,len); fclose(f,&ul); } else { fclose(f,&ul); goto L_SAVENEWCFG; } } else { L_SAVENEWCFG: if ((f=fopen(fname,A_ReadWrite+A_Create+A_Truncate,P_READ+P_WRITE,&ul))!=-1) { if (fwrite(f,cfg,len,&ul)!=len) result=-1; fclose(f,&ul); } else result=-1; } mfree(buf); return(result); } int main(char *exename, char *fname) { char dummy[sizeof(MAIN_CSM)]; TDate d; TTime t; if (LoadConfigData("4:\\ZBin\\etc\\TED.bcfg")<0) { LoadConfigData("0:\\ZBin\\etc\\TED.bcfg"); } GetDateTime(&d,&t); snprintf(stkfile,sizeof(stkfile),"%s%d_%d_%d_%d_%d_%d.tmp",ted_path,d.year,d.month,d.day,t.hour,t.min,t.sec); if (fname) { if (strlen(fname)<128) { strcpy(filename,fname); } } UpdateCSMname(); if ((ustk=malloc(STKSZ))) { if ((dstk=malloc(STKSZ))) { LockSched(); CreateCSM(&MAINCSM.maincsm,dummy,0); UnlockSched(); return 0; } mfree(ustk); LockSched(); ShowMSG(1,(int)"ґЕЕМїХјдІ»Чг!"); UnlockSched(); SUBPROC((void *)Killer2); return 0; } LockSched(); ShowMSG(1,(int)"ОЮ·ЁЙкЗлUSTK!"); UnlockSched(); SUBPROC((void *)Killer2); return 0; }