kolibrios-gitea/programs/fs/Eolite/trunk/include/history.h
Kirill Lipatov (Leency) d34d5f098c Eolite 1.21: History bug fixed.
git-svn-id: svn://kolibrios.org@2596 a494cfbc-eb01-0410-851d-a64ba20cac60
2012-04-10 09:21:59 +00:00

54 lines
1.2 KiB
C

//06.04.2012
#define MAX_HISTORY_NUM 40
path_string history_list[MAX_HISTORY_NUM];
int history_num;
int history_current;
#define add_new_path 1
#define go_back 2
#define go_forward 3
dword GetCurrentFolder()
{
char cur_fol[4096];
copystr(#path,#cur_fol);
cur_fol[strlen(#cur_fol)-1]=0x00; //îáðåçàåì ïîñëåäíèé /
copystr(#cur_fol+find_symbol(#cur_fol,'/'),#cur_fol);
return #cur_fol;
}
void HistoryPath(byte action)
{
if (action==add_new_path)
{
if (history_num>0) && (strcmp(#path,#history_list[history_current].Item)==0) return;
if (history_current>=MAX_HISTORY_NUM-1)
{
history_current/=2;
for (i=0; i<history_current; i++;)
{
copystr(#history_list[MAX_HISTORY_NUM-i].Item, #history_list[i].Item);
}
}
history_current++;
copystr(#path,#history_list[history_current].Item);
history_num=history_current;
}
if (action==go_back)
{
if (history_current<=2) return;
history_current--;
copystr(#history_list[history_current].Item,#path);
}
if (action==go_forward)
{
if (history_current==history_num) return;
history_current++;
copystr(#history_list[history_current].Item,#path);
SelectFile("");
}
}